Question

有没有人知道从Azure IaaS虚拟机实施中检索以下信息的方式和/或有示例代码？

关联的虚拟网络，按名称 - 不是子网;我已经可以获得此信息，并且由于它不是订阅中所有虚拟网络的唯一选项，因此无法使用。
虚拟机附加磁盘的存储帐户

对于问题的其他上下文，我们尝试生成用于DR目的的XML，这将允许我们在主要故障的情况下在辅助数据中心上重建我们的IaaS实现。我们设法检索了大部分（如果不是全部）我们需要的信息，但无法找到从VM（或反之亦然）或存储帐户获取VNet的方法（s））/ VM的磁盘容器。

Answer 1

在（2）上，您是否无法为每个磁盘提取MediaLocation值？

<PersistentVMRole xmlns="http://schemas.microsoft.com/windowsazure" xmlns:i="http://www.w3.org/2001/XMLSchema-instance">
  <RoleName>name-of-the-virtual-machine</RoleName>
  <RoleType>PersistentVMRole</RoleType>
  <VMImage>name-of-vm-image</VMImage>
  <MediaLocation>path-to-vhds</MediaLocation>

这将使用GET on：

完成

https://management.core.windows.net/<subscription-id>/services/hostedservices/<cloudservice-name>/deployments/<deployment-name>/roles/<role-name>

-matt

Answer 2

我将回答你问题的第二部分。使用PowerShell非常容易。假设vm名称为“testvm”，服务名称为“testservice”。 Powershell 获取存储帐户名称 -

 $disk = Get-AzureVM -ServiceName "testservice" –Name "testvm" | Get-AzureOSDisk
 $mediaLink = $disk.MediaLink
 $storageAccountName = $mediaLink.Host.Split('.')[0]
 $storageAccountName

希望这能回答你的问题。

Answer 3

我知道这个问题已经过时了，但它并没有完整的答案。我使用此PowerShell脚本将单个订阅中的VM的XML数据收集到文件中。从本质上讲，它可以获得所有内容，然后进行过滤。

$VMs = Get-AzureRmVM
$NICs = Get-AzureRmNetworkInterface
$VNETs = Get-AzureRmVirtualNetwork

$AzureVMInventory = foreach ($VM in $VMs) {

    $NIC = $NICs | Where { $_.Id -eq $VM.NetworkProfile.NetworkInterfaces.Id }
    $Subnet = $VNETs.Subnets | Where { $_.Id -eq $NIC.IPConfigurations.Subnet.Id }
    $VNET = $VNETs | Where {$_.Subnets.Id -eq $NIC.IPConfigurations.Subnet.Id}

    $Property = [ordered]@{
        Name = $VM.OSProfile.ComputerName
        VMSize = $VM.HardwareProfile.VmSize
        ResourceGroup = $VM.ResourceGroupName
        OSDisk = $VM.StorageProfile.OsDisk.Vhd.Uri
        DataDisk = $VM.StorageProfile.DataDisks.Vhd.Uri -join "#"
        IPAddresses = $NIC.IpConfigurations.PrivateIPAddress
        IPAllocationMethod = $NIC.IpConfigurations.PrivateIPAllocationMethod
        nicName = $NIC.Name
        vNet = $VNET.Name
        Subnet = $Subnet.Name
        Location = $NIC.Location
    }

    New-Object -TypeName PSObject -Property $Property
}

$XML = $AzureVMInventory | ConvertTo-Xml -Depth 99

# Inject XSLT processing into the XML
$ProcessInstruction = $XML.CreateProcessingInstruction('xml-stylesheet', 'type="text/xsl" href="style.xsl"')
$XML.InsertBefore($ProcessInstruction, $XML.DocumentElement)

$XML.Save("$PSScriptRoot\ProductionVMs.xml")

由于阅读XML是一个皇家的噩梦，我插入一个处理指令并调用一个XSL样式表，这样当浏览器打开XML文件时，它可以被格式化为HTML并可以作为表格读取。这适合上面生成的XML，但为了我的目的有一些特定的代码。

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output encoding="ISO-8859-1"/>

    <xsl:template name="tokenizeString">
        <!--passed template parameter -->
        <xsl:param name="list"/>
        <xsl:param name="delimiter"/>
        <xsl:choose>
            <xsl:when test="contains($list, $delimiter)">                
                    <!-- get everything in front of the first delimiter -->
                    <xsl:value-of select="substring-before($list,$delimiter)"/>
                <br />
                <xsl:call-template name="tokenizeString">
                    <!-- store anything left in another variable -->
                    <xsl:with-param name="list" select="substring-after($list,$delimiter)"/>
                    <xsl:with-param name="delimiter" select="$delimiter"/>
                </xsl:call-template>
            </xsl:when>
            <xsl:otherwise>
                <xsl:choose>
                    <xsl:when test="$list = ''">
                        <xsl:text/>
                    </xsl:when>
                    <xsl:otherwise>
                            <xsl:value-of select="$list"/>
                        <br />
                    </xsl:otherwise>
                </xsl:choose>
            </xsl:otherwise>
        </xsl:choose>
    </xsl:template> 

 <xsl:template match="/">

<html>
<head>
<title>Azure Virtual Machines</title>
<link rel="stylesheet" href="style.css" type="text/css" />
</head>
<body>
    <table>
    <tr>
      <th>Name</th>
      <th>IP Addresses</th>
      <th>IP Allocation Method</th>
      <th>Virtual Network</th>
      <th>Subnet</th>
      <th>VMSize</th>
      <th>Resource Group</th>
      <th>Network Interface</th>
      <th>Location</th>
      <th>OS Disk</th>
      <th>Data Disks</th>
    </tr>
    <xsl:for-each select="//Objects/Object">
    <xsl:sort select="Property[@Name='Name']" order="ascending" data-type="text"/>
        <xsl:variable name="datadisks" select="Property[@Name='DataDisk']"/>
        <tr>
            <td><xsl:value-of select="Property[@Name='Name']" /></td>
            <td><xsl:value-of select="Property[@Name='IPAddresses']" /></td>
            <td><xsl:value-of select="Property[@Name='IPAllocationMethod']" /></td>
            <td><xsl:value-of select="Property[@Name='vNet']" /></td>
            <td><xsl:value-of select="Property[@Name='Subnet']" /></td>
            <td><xsl:value-of select="Property[@Name='VMSize']" /></td>
            <td><xsl:value-of select="Property[@Name='ResourceGroup']" /></td>
            <td><xsl:value-of select="Property[@Name='nicName']" /></td>

                <!-- <td><xsl:value-of select="Property[@Name='Location']" /></td> -->
                <xsl:choose>
                    <xsl:when test="Property[@Name='Location'] = 'northeurope'">
                        <td class="loc_ne">North Europe</td>
                    </xsl:when>
                    <xsl:when test="Property[@Name='Location'] = 'westeurope'">
                        <td class="loc_we">West Europe</td>
                    </xsl:when>
                    <xsl:otherwise>
                        <td class="loc_err">NOT EUROPE</td>
                    </xsl:otherwise>
                </xsl:choose>

            <td><xsl:value-of select="Property[@Name='OSDisk']" /></td>
            <td>
                <!-- <xsl:value-of select="Property[@Name='DataDisk']" /> -->
                <xsl:choose>
                    <xsl:when test="boolean(Property[@Name='DataDisk'])">
                        <xsl:call-template name="tokenizeString">
                            <xsl:with-param name="list" select="Property[@Name='DataDisk']"/>
                            <xsl:with-param name="delimiter" select="'#'"/>
                        </xsl:call-template>
                    </xsl:when>
                    <xsl:otherwise/>
                </xsl:choose>
            </td>
        </tr>
    </xsl:for-each> 
    </table>

</body>
</html>

</xsl:template>

</xsl:stylesheet>

最后用一点CSS来使它整洁和漂亮。

body * {
    font-family: 'Segoe UI', Arial, Helvetica, sans-serif;
    font-size: 9pt;
}
table {
    width: 100%;
}
table, th, td {
    border: 1px solid rgba(0,188,242,0.2);
    border-collapse: collapse;
    text-align: center;
}
th {
    background: rgb(0,32,80);
    color: #fff;
    font-size: 11pt;
}
td {
    width: 10%;
    padding: 2px;
}
td.loc_ne {
    background: rgba(0,188,242,0.5);
}
td.loc_we {
    background: rgba(0,127,0,0.5);
}
td.loc_err {
    background: rgba(219,20,61,0.5);
}
tr:nth-child(even) {background: rgba(0,188,242,0.5);}
tr:nth-child(odd) {background: #fff}
tr:hover {background-color: #ddd}

由于该对象是PowerShell对象，因此不必将其导出为XML，可以将其导出为JSON，CSV等。通过在PowerShell脚本的底部标记一些额外的代码，可以直接导入XSL，然后在需要共享单个文件时导出为纯HTML。

# Convert to HTML (if required)
$XSLT = New-Object System.Xml.Xsl.XslCompiledTransform;
$XSLT.Load("style.xsl");
$XSLT.Transform("VMs.xml", "VMs.html");

PowerShell Azure IaaS导出虚拟机，虚拟网络和存储DR

3 个答案: