Src/Private/Get-AbrVbrCloudConnectRR.ps1
|
function Get-AbrVbrCloudConnectRR { <# .SYNOPSIS Used by As Built Report to retrieve Veeam Cloud Connect Replica Resources .DESCRIPTION Documents the configuration of Veeam VBR in Word/HTML/Text formats using PScribo. .NOTES Version: 0.8.4 Author: Jonathan Colon Twitter: @jcolonfzenpr Github: rebelinux Credits: Iain Brighton (@iainbrighton) - PScribo module .LINK https://github.com/AsBuiltReport/AsBuiltReport.Veeam.VBR #> [CmdletBinding()] param ( ) begin { Write-PscriboMessage "Discovering Veeam VBR Cloud Connect Replica Resources information from $System." } process { if ($VbrLicenses | Where-Object {$_.CloudConnect -ne "Disabled"}) { $CloudObjects = Get-VBRCloudHardwarePlan if ($CloudObjects) { Section -Style Heading3 'Replica Resources' { Paragraph "The following table provides a summary of Replica Resources." BlankLine try { $OutObj = @() foreach ($CloudObject in $CloudObjects) { try { Write-PscriboMessage "Discovered $($CloudObject.Name) Cloud Connect Replica Resources information." $inObj = [ordered] @{ 'Name' = $CloudObject.Name 'Platform' = $CloudObject.Platform 'CPU' = Switch ([string]::IsNullOrEmpty($CloudObject.CPU)) { $true {'Unlimited'} $false {"$([math]::Round($CloudObject.CPU / 1000, 1)) Ghz"} default {'--'} } 'Memory' = Switch ([string]::IsNullOrEmpty($CloudObject.Memory)) { $true {'Unlimited'} $false {"$([math]::Round($CloudObject.Memory / 1Kb, 2)) GB"} default {'--'} } 'Storage Quota' = "$(($CloudObject.Datastore.Quota | Measure-Object -Sum).Sum) GB" 'Network Count' = $CloudObject.NumberOfNetWithInternet + $CloudObject.NumberOfNetWithoutInternet 'Subscribers Count' = ($CloudObject.SubscribedTenantId).count } $OutObj += [pscustomobject]$inobj } catch { Write-PscriboMessage -IsWarning "Replica Resources $($CloudObject.Name) Section: $($_.Exception.Message)" } } if ($HealthCheck.CloudConnect.ReplicaResources) { $OutObj | Where-Object { $_.'Subscribers Count' -eq 0} | Set-Style -Style Warning -Property 'Subscribers Count' } $TableParams = @{ Name = "Replica Resources - $($VeeamBackupServer)" List = $false ColumnWidths = 26, 12, 12, 12, 12, 12, 14 } if ($Report.ShowTableCaptions) { $TableParams['Caption'] = "- $($TableParams.Name)" } $OutObj | Sort-Object -Property 'Name' | Table @TableParams #---------------------------------------------------------------------------------------------# # Replica Resources Configuration Section # #---------------------------------------------------------------------------------------------# if ($InfoLevel.CloudConnect.ReplicaResources -ge 2) { Section -Style Heading4 'Replica Resources Configuration' { try { $OutObj = @() foreach ($CloudObject in $CloudObjects) { try { Section -Style Heading5 $CloudObject.Name { try { Section -ExcludeFromTOC -Style NOTOCHeading6 'Host Hardware Quota' { Write-PscriboMessage "Discovered $($CloudObject.Name) Cloud Connect Hardware Quota information." $inObj = [ordered] @{ 'Host or Cluster' = "$($CloudObject.Host.Name) ($($CloudObject.Host.Type))" 'Platform' = $CloudObject.Platform 'CPU' = Switch ([string]::IsNullOrEmpty($CloudObject.CPU)) { $true {'Unlimited'} $false {"$([math]::Round($CloudObject.CPU / 1000, 1)) Ghz"} default {'--'} } 'Memory' = Switch ([string]::IsNullOrEmpty($CloudObject.Memory)) { $true {'Unlimited'} $false {"$([math]::Round($CloudObject.Memory / 1Kb, 2)) GB"} default {'--'} } 'Network Count' = $CloudObject.NumberOfNetWithInternet + $CloudObject.NumberOfNetWithoutInternet 'Subscribed Tenant' = Switch ([string]::IsNullOrEmpty($CloudObject.SubscribedTenantId)) { $true {'None'} $false {($CloudObject.SubscribedTenantId | ForEach-Object {Get-VBRCloudTenant -Id $_}).Name -join ", "} default {'Unknown'} } 'Description' = $CloudObject.Description } $OutObj += [pscustomobject]$inobj if ($HealthCheck.CloudConnect.ReplicaResources) { $OutObj | Where-Object {$_.'Subscribed Tenant' -eq 'None'} | Set-Style -Style Warning -Property 'Subscribed Tenant' } $TableParams = @{ Name = "Host Hardware Quota - $($CloudObject.Name)" List = $true ColumnWidths = 40, 60 } if ($Report.ShowTableCaptions) { $TableParams['Caption'] = "- $($TableParams.Name)" } $OutObj | Sort-Object -Property 'Name' | Table @TableParams } } catch { Write-PscriboMessage -IsWarning "Host Hardware Quota $($CloudObject.Host.Name) Section: $($_.Exception.Message)" } try { Section -ExcludeFromTOC -Style NOTOCHeading6 'Storage Quota' { $OutObj = @() Write-PscriboMessage "Discovered $($CloudObject.Name) Cloud Connect Storage Quota information." foreach ($Storage in $CloudObject.Datastore) { $inObj = [ordered] @{ 'Datastore Name' = $Storage.Datastore 'Friendly Name' = $Storage.FriendlyName 'Platform' = $Storage.Platform 'Storage Quota' = "$($Storage.Quota) GB" 'Storage Policy' = Switch ([string]::IsNullOrEmpty($Storage.StoragePolicy.Name)) { $true {'--'} $false {$Storage.StoragePolicy.Name} default {'Unknown'} } } $OutObj = [pscustomobject]$inobj $TableParams = @{ Name = "Storage Quota - $($Storage.Datastore)" List = $true ColumnWidths = 40, 60 } if ($Report.ShowTableCaptions) { $TableParams['Caption'] = "- $($TableParams.Name)" } $OutObj | Sort-Object -Property 'Name' | Table @TableParams } } } catch { Write-PscriboMessage -IsWarning "Storage Quota $($CloudObject.Name) Section: $($_.Exception.Message)" } try { Section -ExcludeFromTOC -Style NOTOCHeading6 'Network Quota' { $OutObj = @() $VlanConfiguration = Get-VBRCloudVLANConfiguration | Where-Object {$_.Host.Name -eq $CloudObject.Host.Name} Write-PscriboMessage "Discovered $($CloudObject.Name) Cloud Connect Network Quota information." $inObj = [ordered] @{ 'Specify number of networks with Internet Access' = $CloudObject.NumberOfNetWithInternet + $CloudObject.NumberOfNetWithoutInternet 'Specify number of internal networks' = $CloudObject.NumberOfNetWithoutInternet } if ($VlanConfiguration) { $inObj.add('Host or Cluster', "$($VlanConfiguration.Host.Name) ($($VlanConfiguration.Host.Type))") $inObj.add('Platform', $VlanConfiguration.Platform) $inObj.add('Virtual Switch', $VlanConfiguration.VirtualSwitch) $inObj.add('VLANs With Internet', "$($VlanConfiguration.FirstVLANWithInternet) - $($VlanConfiguration.LastVLANWithInternet)") $inObj.add('VLANs Without Internet', "$($VlanConfiguration.FirstVLANWithoutInternet) - $($VlanConfiguration.LastVLANWithoutInternet)") } $OutObj = [pscustomobject]$inobj $TableParams = @{ Name = "Network Quota - $($CloudObject.Name)" List = $true ColumnWidths = 40, 60 } if ($Report.ShowTableCaptions) { $TableParams['Caption'] = "- $($TableParams.Name)" } $OutObj | Sort-Object -Property 'Name' | Table @TableParams } } catch { Write-PscriboMessage -IsWarning "Network Quota $($CloudObject.Name) Section: $($_.Exception.Message)" } try { $Tenants = Get-VBRCloudTenant | where-Object {$_.ReplicationResources.HardwarePlanOptions.HardwarePlanId -eq $CloudObject.Id} $TenantHardwarePlan = @() foreach ($Tenant in $Tenants) { $planOption = $Tenant.ReplicationResources.HardwarePlanOptions | Where-Object {$_.HardwarePlanId -eq $CloudObject.Id} $TenantHardwarePlan += $Tenant | Select-Object Name, @{n='CPUUsage';e={$planOption.UsedCPU}}, @{n='MemoryUsage';e={$planOption.UsedMemory}}, @{n='StorageUsage';e={$planOption.DatastoreQuota}} } if ($TenantHardwarePlan) { Section -ExcludeFromTOC -Style NOTOCHeading6 'Tenant Utilization' { $OutObj = @() foreach ($TenantUtil in $TenantHardwarePlan) { $inObj = [ordered] @{ 'Name' = $TenantUtil.Name 'CPU Usage' = $TenantUtil.CPUUsage 'Memory Usage' = $TenantUtil.MemoryUsage 'Storage Usage' = $TenantUtil.StorageUsage | ForEach-Object {"$($_.UsedSpace) GB ($($_.FriendlyName))"} } $OutObj += [pscustomobject]$inobj } $TableParams = @{ Name = "Tenant Utilization - $($CloudObject.Name)" List = $false ColumnWidths = 25, 25, 25, 25 } if ($Report.ShowTableCaptions) { $TableParams['Caption'] = "- $($TableParams.Name)" } $OutObj | Sort-Object -Property 'Name' | Table @TableParams } } } catch { Write-PscriboMessage -IsWarning "Tenant Utilization $($CloudObject.Name) Section: $($_.Exception.Message)" } } } catch { Write-PscriboMessage -IsWarning "Replica Resources Configuration $($CloudObject.Name) Section: $($_.Exception.Message)" } } } catch { Write-PscriboMessage -IsWarning "Replica Resources Configuration Section: $($_.Exception.Message)" } } } } catch { Write-PscriboMessage -IsWarning "Replica Resources Section: $($_.Exception.Message)" } } } } } end {} } |