[Azure]使用Azure Powershell查看ARM模式下Azure存储中的vhd文件对应的虚拟机

$Cred = New-Object System.Management.Automation.PSCredential("XXXXXXXXX@XXXXXXXXX.partner.onmschina.cn",(ConvertTo-SecureString "XXXXXXXXX" -AsPlainText -Force));
$AzureRMCred = Get-Credential -Credential $Cred;
Login-AzureRmAccount -EnvironmentName AzureChinaCloud -Credential $AzureRMCred;

$vm_url_mapping = @{};
$storage_url_mapping = @{};

Function FillStorageMapping()
{
$storage_url_mapping.Clear();
$storages = Get-AzureRmStorageAccount;

foreach($storage in $storages)
{
$storageAccountName = $storage.StorageAccountName;
$blobs = Get-AzureStorageBlob -Context $storage.Context -Container vhds -ErrorAction Ignore;

foreach ($blob in $blobs)
{
if ($blob.BlobType -eq "PageBlob")
{
$url = $blob.ICloudBlob.Uri.AbsoluteUri;
if ($url.EndsWith(".vhd") -and !$storage_url_mapping.ContainsKey($url))
{
$storage_url_mapping.Add($url, $storageAccountName);
}
}
}
}
}

Function FillVmMapping()
{
$vm_url_mapping.Clear();
$vms = Get-AzureRmVM;

foreach($vm in $vms)
{
$resourceGroupAndVM = $vm.ResourceGroupName + "#" + $vm.Name;

$osDiskUrl = $vm.StorageProfile.OsDisk.Vhd.Uri;
if (!$vm_url_mapping.ContainsKey($osDiskUrl))
{
$vm_url_mapping.Add($osDiskUrl, $resourceGroupAndVM);
}

$dataDisks = $vm.StorageProfile.DataDisks;
foreach($dataDisk in $dataDisks)
{
$dataDiskUrl = $dataDisk.Vhd.Uri;
if (!$vm_url_mapping.ContainsKey($dataDiskUrl))
{
$vm_url_mapping.Add($dataDiskUrl, $resourceGroupAndVM);
}
}
}
}

Function ShowStorageVhdOwners()
{
$subscriptions = Get-AzureRmSubscription;
$results = New-Object System.Collections.ArrayList;

foreach($subscription in $subscriptions)
{
$subscriptionName = $subscription.SubscriptionName;
Select-AzureRmSubscription -SubscriptionName $subscriptionName;
FillStorageMapping;
FillVmMapping;
foreach ($url in $storage_url_mapping.Keys)
{
$storageAccount = $storage_url_mapping[$url];
$resourceGroup = "";
$vmName = "";
if ($vm_url_mapping.ContainsKey($url))
{
$resourceGroupAndVM = $vm_url_mapping[$url].Split('#');
$resourceGroup = $resourceGroupAndVM[0];
$vmName = $resourceGroupAndVM[1];
}
$results.Add(@{SubscriptionName=$subscriptionName; StorageAccountName=$storageAccount; VhdUrl=$url; ResourceGroupName=$resourceGroup; VirtualMachineName=$vmName;});
}
}

$results | Select @{Name="SubscriptionName"; Expression={$_["SubscriptionName"]}}, @{Name="StorageAccountName";Expression={$_["StorageAccountName"]}}, @{Name="VHD Url"; Expression={$_["VhdUrl"]}}, @{Name="ResourceGroupName"; Expression={$_["ResourceGroupName"]}}, @{Name="VirtualMachineName"; Expression={$_["VirtualMachineName"]}} | Out-GridView;
}

ShowStorageVhdOwners