[Azure]使用Azure Powershell输出ASM模式下某个账号中所有订阅下的虚拟网络拓扑
2017-02-25 11:16
453 查看
该脚本输出ASM模式下某个账号中所有订阅下的网络拓扑结构,包括虚拟网络地址空间,子网范围,子网内的虚拟机的基本信息等。
脚本如下:
$Cred = New-Object System.Management.Automation.PSCredential("XXXXXXXXX@XXXXXXXXX.partner.onmschina.cn",(ConvertTo-SecureString "XXXXXXXXX" -AsPlainText -Force));
$AzureRMCred = Get-Credential -Credential $Cred;
Add-AzureAccount -Environment AzureChinaCloud -Credential $AzureRMCred;
Function WriteToXMLOutput($str)
{
$OutputfilePath = $PSScriptRoot + "\Network_Topology.xml";
$str | Out-File $OutputfilePath -Append;
}
Function BuildLevelSpace($level)
{
$levelSpace = " ";
$result = "";
for ($i = 1; $i -lt $level; $i++)
{
$result += $levelSpace;
}
return $result;
}
Function BuildSubscriptionsHead()
{
return (BuildLevelSpace 1) + "<subscriptions>";
}
Function BuildSubscriptionsEnd()
{
return (BuildLevelSpace 1) + "</subscriptions>";
}
Function BuildSubscriptionHead($subscriptionName)
{
return (BuildLevelSpace 2) + "<subscription name='$subscriptionName'>";
}
Function BuildSubscriptionEnd($subscriptionName)
{
return (BuildLevelSpace 2) + "</subscription>";
}
Function BuildVirtualNetworksHead()
{
return (BuildLevelSpace 3) + "<virtualnetworks>";
}
Function BuildVirtualNetworksEnd()
{
return (BuildLevelSpace 3) + "</virtualnetworks>";
}
Function BuildVirtualNetworkHead($name, $address, $location)
{
return (BuildLevelSpace 4) + "<virtualnetwork Name='$name' AddressSpace='$address' Location='$location'>";
}
Function BuildVirtualNetworkEnd()
{
return (BuildLevelSpace 4) + "</virtualnetwork>";
}
Function BuildSubnetsHead()
{
return (BuildLevelSpace 5) + "<subnets>";
}
Function BuildSubnetsEnd()
{
return (BuildLevelSpace 5) + "</subnets>";
}
Function BuildSubnetHead($name, $address)
{
return (BuildLevelSpace 6) + "<subnet Name='$name' AddressRange='$address'>";
}
Function BuildSubnetEnd()
{
return (BuildLevelSpace 6) + "</subnet>";
}
Function BuildVirtualMachinesHead()
{
return (BuildLevelSpace 7) + "<virtualmachines>";
}
Function BuildVirtualMachinesEnd()
{
return (BuildLevelSpace 7) + "</virtualmachines>";
}
Function BuildVirtualMachine($Name, $OSType, $Size, $IPAddress)
{
if($IPAddress -ne $NULL)
{
return (BuildLevelSpace 4) + "<virtualmachine Name='$Name' OS='$OSType' Size='$Size' IPAddress='$IPAddress'></virtualmachine>";
} else {
return (BuildLevelSpace 4) + "<virtualmachine Name='$Name' OS='$OSType' Size='$Size'></virtualmachine>";
}
}
Function ListVNETTopology()
{
$subscriptions = Get-AzureSubscription;
WriteToXMLOutput ((BuildLevelSpace 1) + "<?xml version='1.0'?>");
WriteToXMLOutput (BuildSubscriptionsHead);
# loop all the subscriptions
foreach($subscription in $subscriptions)
{
$subscriptionName = $subscription.SubscriptionName;
Select-AzureSubscription -SubscriptionName $subscriptionName;
WriteToXMLOutput (BuildSubscriptionHead $subscriptionName);
# initialize mappings
$VMDict = @{}; # key:vm.ServiceName#vm.Name value:@{Name=vm.Name; OSType=vm.VM.OSVirtualHardDisk.OS; Size=vm.VM.RoleSize; IpAddress=$vm.IpAddress}
$VNET_VM_Map = @{}; # key:VirtualNetworkName#SubnetName value:vm.ServiceName#vm.Name
$vms = Get-AzureVM;
foreach($vm in $vms)
{
$VMDict.Add(($vm.ServiceName + "#" + $vm.Name), @{Name=$vm.Name; OSType=$vm.VM.OSVirtualHardDisk.OS; Size=$vm.VM.RoleSize; IpAddress=$vm.IpAddress});
$key = $vm.VirtualNetworkName + "#" + $vm.VM.ConfigurationSets.SubnetNames;
if(!$VNET_VM_Map.ContainsKey($key))
{
$VNET_VM_Map[$key] = New-Object System.Collections.ArrayList;
}
$VNET_VM_Map[$key].Add($vm.ServiceName + "#" + $vm.Name);
}
$vnetConfig = Get-AzureVNetConfig;
$vnetXml = [xml]($vnetConfig.XMLConfiguration);
$vnets = $vnetXml.NetworkConfiguration.VirtualNetworkConfiguration.VirtualNetworkSites.ChildNodes;
if($vnets.Count -gt 0)
{
WriteToXMLOutput (BuildVirtualNetworksHead);
foreach($vnet in $vnets)
{
$vnetaddress = "";
foreach($prefix in $vnet.AddressSpace.AddressPrefix)
{
$vnetaddress += $prefix;
$vnetaddress += " "
}
$vnetaddress.TrimEnd(' ');
WriteToXMLOutput (BuildVirtualNetworkHead $vnet.name $vnetaddress $vnet.Location);
$subnets = $vnet.Subnets.ChildNodes;
if($subnets.Count -gt 0)
{
WriteToXMLOutput (BuildSubnetsHead);
foreach($subnet in $subnets)
{
WriteToXMLOutput (BuildSubnetHead $subnet.Name $subnet.AddressPrefix);
$key = $vnet.name + "#" + $subnet.name;
if($VNET_VM_Map[$key].Count -gt 0)
{
WriteToXMLOutput (BuildVirtualMachinesHead);
foreach($vmKey in $VNET_VM_Map[$key])
{
$vmProp = $VMDict[$vmKey];
$vmName = $vmProp["Name"];
$OSType = $vmProp["OSType"];
$size = $vmProp["Size"];
$cip = $vmProp["IpAddress"];
WriteToXMLOutput (BuildVirtualMachine $vmName $OSType $size $cip);
}
WriteToXMLOutput (BuildVirtualMachinesEnd);
}
WriteToXMLOutput (BuildSubnetEnd);
}
WriteToXMLOutput (BuildSubnetsEnd);
}
WriteToXMLOutput (BuildVirtualNetworkEnd);
}
WriteToXMLOutput (BuildVirtualNetworksEnd);
}
WriteToXMLOutput (BuildSubscriptionEnd);
}
WriteToXMLOutput (BuildSubscriptionsEnd);
}
ListVNETTopology
脚本输出:
该脚本输出ASM模式下某个账号中所有订阅下的网络拓扑结构,包括虚拟网络地址空间,子网范围,子网内的虚拟机的基本信息等。
脚本如下:
$Cred = New-Object System.Management.Automation.PSCredential("XXXXXXXXX@XXXXXXXXX.partner.onmschina.cn",(ConvertTo-SecureString "XXXXXXXXX" -AsPlainText -Force));
$AzureRMCred = Get-Credential -Credential $Cred;
Add-AzureAccount -Environment AzureChinaCloud -Credential $AzureRMCred;
Function WriteToXMLOutput($str)
{
$OutputfilePath = $PSScriptRoot + "\Network_Topology.xml";
$str | Out-File $OutputfilePath -Append;
}
Function BuildLevelSpace($level)
{
$levelSpace = " ";
$result = "";
for ($i = 1; $i -lt $level; $i++)
{
$result += $levelSpace;
}
return $result;
}
Function BuildSubscriptionsHead()
{
return (BuildLevelSpace 1) + "<subscriptions>";
}
Function BuildSubscriptionsEnd()
{
return (BuildLevelSpace 1) + "</subscriptions>";
}
Function BuildSubscriptionHead($subscriptionName)
{
return (BuildLevelSpace 2) + "<subscription name='$subscriptionName'>";
}
Function BuildSubscriptionEnd($subscriptionName)
{
return (BuildLevelSpace 2) + "</subscription>";
}
Function BuildVirtualNetworksHead()
{
return (BuildLevelSpace 3) + "<virtualnetworks>";
}
Function BuildVirtualNetworksEnd()
{
return (BuildLevelSpace 3) + "</virtualnetworks>";
}
Function BuildVirtualNetworkHead($name, $address, $location)
{
return (BuildLevelSpace 4) + "<virtualnetwork Name='$name' AddressSpace='$address' Location='$location'>";
}
Function BuildVirtualNetworkEnd()
{
return (BuildLevelSpace 4) + "</virtualnetwork>";
}
Function BuildSubnetsHead()
{
return (BuildLevelSpace 5) + "<subnets>";
}
Function BuildSubnetsEnd()
{
return (BuildLevelSpace 5) + "</subnets>";
}
Function BuildSubnetHead($name, $address)
{
return (BuildLevelSpace 6) + "<subnet Name='$name' AddressRange='$address'>";
}
Function BuildSubnetEnd()
{
return (BuildLevelSpace 6) + "</subnet>";
}
Function BuildVirtualMachinesHead()
{
return (BuildLevelSpace 7) + "<virtualmachines>";
}
Function BuildVirtualMachinesEnd()
{
return (BuildLevelSpace 7) + "</virtualmachines>";
}
Function BuildVirtualMachine($Name, $OSType, $Size, $IPAddress)
{
if($IPAddress -ne $NULL)
{
return (BuildLevelSpace 4) + "<virtualmachine Name='$Name' OS='$OSType' Size='$Size' IPAddress='$IPAddress'></virtualmachine>";
} else {
return (BuildLevelSpace 4) + "<virtualmachine Name='$Name' OS='$OSType' Size='$Size'></virtualmachine>";
}
}
Function ListVNETTopology()
{
$subscriptions = Get-AzureSubscription;
WriteToXMLOutput ((BuildLevelSpace 1) + "<?xml version='1.0'?>");
WriteToXMLOutput (BuildSubscriptionsHead);
# loop all the subscriptions
foreach($subscription in $subscriptions)
{
$subscriptionName = $subscription.SubscriptionName;
Select-AzureSubscription -SubscriptionName $subscriptionName;
WriteToXMLOutput (BuildSubscriptionHead $subscriptionName);
# initialize mappings
$VMDict = @{}; # key:vm.ServiceName#vm.Name value:@{Name=vm.Name; OSType=vm.VM.OSVirtualHardDisk.OS; Size=vm.VM.RoleSize; IpAddress=$vm.IpAddress}
$VNET_VM_Map = @{}; # key:VirtualNetworkName#SubnetName value:vm.ServiceName#vm.Name
$vms = Get-AzureVM;
foreach($vm in $vms)
{
$VMDict.Add(($vm.ServiceName + "#" + $vm.Name), @{Name=$vm.Name; OSType=$vm.VM.OSVirtualHardDisk.OS; Size=$vm.VM.RoleSize; IpAddress=$vm.IpAddress});
$key = $vm.VirtualNetworkName + "#" + $vm.VM.ConfigurationSets.SubnetNames;
if(!$VNET_VM_Map.ContainsKey($key))
{
$VNET_VM_Map[$key] = New-Object System.Collections.ArrayList;
}
$VNET_VM_Map[$key].Add($vm.ServiceName + "#" + $vm.Name);
}
$vnetConfig = Get-AzureVNetConfig;
$vnetXml = [xml]($vnetConfig.XMLConfiguration);
$vnets = $vnetXml.NetworkConfiguration.VirtualNetworkConfiguration.VirtualNetworkSites.ChildNodes;
if($vnets.Count -gt 0)
{
WriteToXMLOutput (BuildVirtualNetworksHead);
foreach($vnet in $vnets)
{
$vnetaddress = "";
foreach($prefix in $vnet.AddressSpace.AddressPrefix)
{
$vnetaddress += $prefix;
$vnetaddress += " "
}
$vnetaddress.TrimEnd(' ');
WriteToXMLOutput (BuildVirtualNetworkHead $vnet.name $vnetaddress $vnet.Location);
$subnets = $vnet.Subnets.ChildNodes;
if($subnets.Count -gt 0)
{
WriteToXMLOutput (BuildSubnetsHead);
foreach($subnet in $subnets)
{
WriteToXMLOutput (BuildSubnetHead $subnet.Name $subnet.AddressPrefix);
$key = $vnet.name + "#" + $subnet.name;
if($VNET_VM_Map[$key].Count -gt 0)
{
WriteToXMLOutput (BuildVirtualMachinesHead);
foreach($vmKey in $VNET_VM_Map[$key])
{
$vmProp = $VMDict[$vmKey];
$vmName = $vmProp["Name"];
$OSType = $vmProp["OSType"];
$size = $vmProp["Size"];
$cip = $vmProp["IpAddress"];
WriteToXMLOutput (BuildVirtualMachine $vmName $OSType $size $cip);
}
WriteToXMLOutput (BuildVirtualMachinesEnd);
}
WriteToXMLOutput (BuildSubnetEnd);
}
WriteToXMLOutput (BuildSubnetsEnd);
}
WriteToXMLOutput (BuildVirtualNetworkEnd);
}
WriteToXMLOutput (BuildVirtualNetworksEnd);
}
WriteToXMLOutput (BuildSubscriptionEnd);
}
WriteToXMLOutput (BuildSubscriptionsEnd);
}
ListVNETTopology
脚本输出:
相关文章推荐
- [Azure]使用Azure Powershell输出ARM模式下某个账号中所有订阅下的虚拟网络拓扑
- [Azure]使用Powershell输出Azure订阅下所有虚拟机的ACL信息
- [Azure] 使用Azure Powershell脚本查看账号下所有订阅中的云服务公网IP地址绑定情况
- Azure PowerShell (9) 使用PowerShell导出订阅下所有的Azure VM的Public IP和Private IP
- Azure PowerShell (10) 使用PowerShell导出订阅下所有的Azure VM和Cloud Service的高可用情况
- [Azure]使用Azure Powershell查看ASM模式下Azure存储中的vhd文件对应的虚拟机
- [Azure]使用Powershell删除ARM模式下单台虚拟机及相关资源(托管磁盘)
- [Azure]使用Powershell导出所有订阅下的ARM虚拟机的信息
- 使用 Azure PowerShell 管理 Azure 虚拟网络和 Windows 虚拟机
- [Azure]使用Powershell获取Azure ARM模式订阅下的一些常用信息
- [Azure]使用Azure Powershell清理ASM模式下未使用的Disk和vhd
- [Azure]使用Powershell删除ARM模式下单台虚拟机及相关资源(非托管磁盘)
- [Azure]使用Powershell输出某台ASM虚拟机的NSG和ACL
- [Azure]ARM模式下使用Powershell找出订阅中没有被使用的vhd
- [Azure]使用Powershell输出经典模式下全部云服务的VIP
- 使用 Azure PowerShell 管理 Azure 虚拟网络和 Windows 虚拟机
- [Azure]使用Powershell统计ARM存储账号下容器中Blob的使用情况
- [Azure]使用Azure Powershell重新部署ASM虚拟机
- 使用 Azure CLI 管理 Azure 虚拟网络和 Linux 虚拟机