Burkard Josh – Josh's IT-Blog

Pester tests for PowerShell modules

21. August 201919. August 2019 by Burkard Josh

if you write regularly PowerShell modules, you have to test the functions in it.

i wrote some Pester tests, which are doing this tests for all functions in a PowerShell module:

the function has SYNOPSIS, DESCRIPTION and EXAMPLES

the function has cmdletbinding

the function has an OutputType defined

the function name starts with an approved verb

the function name has an common prefix

all parameters have a help text

all parameters have a type declaration

all variables inside the function has the same upper/lower case

pass parameter values to Invoke-CMScript

30. July 201930. July 2019 by Burkard Josh

The Invoke-CMScript cmdlet invokes a PowerShell script in Microsoft System Center Configuration Manager. System Center Configuration Manager has an integrated ability to run Powershell scripts. The scripts simplify building custom tools to administer software and let you accomplish mundane tasks quickly, allowing you to get large jobs done more easily and more consistently. For more information, see Create and run PowerShell scripts from the Configuration Manager console.

unfortunately the Invoke-CMScript doesn’t allow to pass values to defined script params. if you want to do this, you have to invoke the script through the Configuration Manager console. read more

PowerShell and PSHTML in Azure Function App

10. June 201910. June 2019 by Burkard Josh

PowerShell is now available in Azure Function App (still in preview).

you can create a Powershell Function App like this:

using PowerShell modules

currently, you can’t install a powershell module inside Azure Function App, but you can upload your module to the script directory and access it from there. to do this, use Kudu:

browse to site / wwwroot:

then you can drag and drop your module ZIP-file to the right part of the explorer

the file will be uploaded and unpacked automatically

now you can reference this module directly from your function script read more

getting info about users password expiration

14. November 201814. November 2018 by Burkard Josh

i work in a multi domain environment. each domain has different password expiration rules. unfortunattely there is no notification system for the password expiration, so i have to check manually how long my passwords are valid.

for this, i wrote this PowerShell function, which does work without the use of any additional module:

function get-UserPwdInfo {
    Param (
        $UserDN
    )
    $ACCOUNTDISABLE       = 0x000002
    $DONT_EXPIRE_PASSWORD = 0x010000
    $PASSWORD_EXPIRED     = 0x800000

    if ( [string]::IsNullOrEmpty( $UserDN ) ) {
        $SysInfo = New-Object -ComObject "ADSystemInfo"
        $UserDN = $SysInfo.GetType().InvokeMember("UserName", "GetProperty", $Null, $SysInfo, $Null)
    }

    $User = [ADSI]"LDAP://$UserDN"
    
    $searcher=New-Object DirectoryServices.DirectorySearcher
    $searcher.Filter="(&(distinguishedName=$($User.distinguishedName)))"
    $results=$searcher.findone()
    $PwdLastSet = [datetime]::fromfiletime($results.properties.pwdlastset[0])
    
    $DomainName = ( $UserDN -split ',' | Where-Object { $_ -match 'DC' } | ForEach-Object { $_ -replace 'DC=', '' } ) -join '.'
    [ADSI]$domain = "WinNT://$( $DomainName )"

    $MaxPasswordAge = $domain.MaxPasswordAge.Value

    New-Object -TypeName PSObject -Property @{
        Domain                = $domain.Name.ToString()
        UserDisplayName       = $results.Properties.displayname[0].ToString()
        UserDistinguishedName = $results.Properties.distinguishedname[0].ToString()
        userPrincipalName     = $User.userPrincipalName.ToString()
        sAMAccountName        = $user.sAMAccountName.ToString()
        Enabled               = ( -not [bool]($results.Properties.useraccountcontrol[0] -band $ACCOUNTDISABLE ) )
        PasswordNeverExpires  = ( [bool]($results.Properties.useraccountcontrol[0] -band $DONT_EXPIRE_PASSWORD ) )
        PasswordExpired       = ( [bool]($results.Properties.useraccountcontrol[0] -band $PASSWORD_EXPIRED ) )
        MaxPasswordAge        = $domain.MaxPasswordAge.Value / 3600 / 24 
        MinPasswordAge        = $domain.MinPasswordAge.Value / 3600 / 24 
        LastPasswordSet       = $PwdLastSet 
        CurrentPasswordAge    = ( New-TimeSpan -Start $PwdLastSet -End ( Get-Date ) )
        PasswordExpiresOn     = $PwdLastSet.AddSeconds( $MaxPasswordAge )
        PasswordExpiresIn     = ( New-TimeSpan -Start ( Get-Date ) -End $PwdLastSet.AddSeconds( $MaxPasswordAge ) )
    } | Select-Object Domain, UserDisplayName, UserDistinguishedName, userPrincipalName, sAMAccountName, Enabled, PasswordNeverExpires, PasswordExpired, MaxPasswordAge, MinPasswordAge, LastPasswordSet, CurrentPasswordAge, PasswordExpiresOn, PasswordExpiresIn
}
$UserPwdInfo = get-UserPwdInfo 
$UserPwdInfo

function get-UserPwdInfo {

Param (

$UserDN

)

$ACCOUNTDISABLE = 0x000002

$DONT_EXPIRE_PASSWORD = 0x010000

$PASSWORD_EXPIRED = 0x800000

if ( [string]::IsNullOrEmpty( $UserDN ) ) {

$SysInfo = New-Object -ComObject "ADSystemInfo"

$UserDN = $SysInfo.GetType().InvokeMember("UserName", "GetProperty", $Null, $SysInfo, $Null)

}

$User = [ADSI]"LDAP://$UserDN"

$searcher=New-Object DirectoryServices.DirectorySearcher

$searcher.Filter="(&(distinguishedName=$($User.distinguishedName)))"

$results=$searcher.findone()

$PwdLastSet = [datetime]::fromfiletime($results.properties.pwdlastset[0])

$DomainName = ( $UserDN -split ',' | Where-Object { $_ -match 'DC' } | ForEach-Object { $_ -replace 'DC=', '' } ) -join '.'

[ADSI]$domain = "WinNT://$( $DomainName )"

$MaxPasswordAge = $domain.MaxPasswordAge.Value

New-Object -TypeName PSObject -Property @{

Domain = $domain.Name.ToString()

UserDisplayName = $results.Properties.displayname[0].ToString()

UserDistinguishedName = $results.Properties.distinguishedname[0].ToString()

userPrincipalName = $User.userPrincipalName.ToString()

sAMAccountName = $user.sAMAccountName.ToString()

Enabled = ( -not [bool]($results.Properties.useraccountcontrol[0] -band $ACCOUNTDISABLE ) )

PasswordNeverExpires = ( [bool]($results.Properties.useraccountcontrol[0] -band $DONT_EXPIRE_PASSWORD ) )

PasswordExpired = ( [bool]($results.Properties.useraccountcontrol[0] -band $PASSWORD_EXPIRED ) )

MaxPasswordAge = $domain.MaxPasswordAge.Value / 3600 / 24

MinPasswordAge = $domain.MinPasswordAge.Value / 3600 / 24

LastPasswordSet = $PwdLastSet

CurrentPasswordAge = ( New-TimeSpan -Start $PwdLastSet -End ( Get-Date ) )

PasswordExpiresOn = $PwdLastSet.AddSeconds( $MaxPasswordAge )

PasswordExpiresIn = ( New-TimeSpan -Start ( Get-Date ) -End $PwdLastSet.AddSeconds( $MaxPasswordAge ) )

} | Select-Object Domain, UserDisplayName, UserDistinguishedName, userPrincipalName, sAMAccountName, Enabled, PasswordNeverExpires, PasswordExpired, MaxPasswordAge, MinPasswordAge, LastPasswordSet, CurrentPasswordAge, PasswordExpiresOn, PasswordExpiresIn

}

$UserPwdInfo = get-UserPwdInfo

$UserPwdInfo

the result of this script looks like this:

reclaime diskspace on zero detection storage when deletening vmware vm

22. October 2018 by Burkard Josh

some time ago, i had the problem that my 3Par storage was getting full. in this time i removed a lot of test vm’s from this storage, but nothing happens. the storage was still full. the reason was the mechanisme how vmware deletes files from a DataStore and the activated zero-detection feature on the storage. if you delete a virtual disk file on the vmware datastore, it will only marked as deleted, but the datas are still there in the same format. to get the storage’s zero detection work, we have to zero out the deleted part of the datastore manually.

you can do this with this script:

$vCenterName   = "vcenter.domain.fqdn"
$vCenterCreds  = New-Object System.Management.Automation.PSCredential ( "username", ( ConvertTo-SecureString "PlainTextPassword" -AsPlainText -Force ) )

& 'C:\Program Files (x86)\VMware\Infrastructure\vSphere PowerCLI\Scripts\Initialize-PowerCLIEnvironment.ps1'

Connect-VIServer -Server $vCenterName -Credential $vCenterCreds -WarningAction SilentlyContinue
Set-PowerCLIConfiguration -Scope Session -WebOperationTimeoutSeconds -1  -Confirm:$false

$VMHost = ( Get-VMHost )[0]
$EsxCli = Get-EsxCli -VMHost $VMHost.Name

$Datastores = $VMHost | Get-Datastore

foreach ( $Datastore in ( $Datastores | Sort-Object Name ) )
{
    Write-Output $Datastore.Name
    $res = $EsxCli.storage.vmfs.unmap(200, $Datastore.Name, $null)
    Write-Output "   $( $res )"
}

Disconnect-VIServer -confirm:$false

Get-Module | Remove-Module -Force

$vCenterName = "vcenter.domain.fqdn"

$vCenterCreds = New-Object System.Management.Automation.PSCredential ( "username", ( ConvertTo-SecureString "PlainTextPassword" -AsPlainText -Force ) )

& 'C:\Program Files (x86)\VMware\Infrastructure\vSphere PowerCLI\Scripts\Initialize-PowerCLIEnvironment.ps1'

Connect-VIServer -Server $vCenterName -Credential $vCenterCreds -WarningAction SilentlyContinue

Set-PowerCLIConfiguration -Scope Session -WebOperationTimeoutSeconds -1 -Confirm:$false

$VMHost = ( Get-VMHost )[0]

$EsxCli = Get-EsxCli -VMHost $VMHost.Name

$Datastores = $VMHost | Get-Datastore

foreach ( $Datastore in ( $Datastores | Sort-Object Name ) )

{

Write-Output $Datastore.Name

$res = $EsxCli.storage.vmfs.unmap(200, $Datastore.Name, $null)

Write-Output " $( $res )"

}

Disconnect-VIServer -confirm:$false

Get-Module | Remove-Module -Force

how to get the correct Virtual Disk for a VMware vm

8. March 20188. March 2017 by Burkard Josh

Some times I have the problem, I need to resize or delete a VMware virtual disk, but I only know the guest’s drive letter. In vm’s where there are only one virtual disk, or where each virtual disk has a different size, this isn’t a problem. but if you have a vm with multiple virtual disk with exactly the same size, you can’t compare it between the guest Disk Manager and the virtual disk sizes. if your vm has more than one SCSI controller, the problem will increase.

Windows Disk Manager	VMware VM settings

I searched long time to solve this problem, but I couldn’t find an easy solution for this. so I wrote this PowerShell script:

<#
.SYNOPSIS
    This script will return informations about virtual disks and windows disk allocation

.DESCRIPTION
    This script will return informations about virtual disks and windows disk allocation

.PARAMETER vCenterName
    defines the fqdn of the vCenter

.PARAMETER vmName
    defines the name of the vm (like naming in vCenter, not the fqdn / dns name)

.PARAMETER vmCred
    enter credentials to connect to the guest vm

.EXAMPLE
    $vmCred = New-Object System.Management.Automation.PSCredential ('domain\username', ( ConvertTo-SecureString 'YourSecretPassword' -AsPlainText -Force ) )
    .\ALL-OPR-get-VMDiskInfos.ps1 -vCenterName 'vcenter.domain.local' -vmName 'VMName' -vmcred $vmCred 

.NOTES
    -Author:		Josh Burkard
    -Email :		josh@burkard.it
    -CreationDate:	07.03.2018
    -LastModifiedDate: 
    -Version:		1.0.0.0
    -History:
        07.03.2018	1.0.0.0	Josh Burkard	InitalVersion

.LINK

#>
Param 
(
    # Parameter help description
    [Parameter(Mandatory=$true)][string]$vCenterName,
    [Parameter(Mandatory=$true)][string]$vmName,
    [System.Management.Automation.PSCredential][Parameter(Mandatory=$true)]$vmCred
)

#region Decalarations
#endregion Decalarations

#region Functions
#endregion Functions

#region Execution
    #region verify Params
        if ( [string]::IsNullOrEmpty( $vCenterName ) )
        {
            Write-Host  "parameter vCenterName was  not definied" -ForegroundColor Red
        } elseif ( [string]::IsNullOrEmpty( $vmName ) )
        {
            Write-Host  "parameter vmName was  not definied" -ForegroundColor Red
        } elseif ( [string]::IsNullOrEmpty( $vmCred ) )
        {
            $vmCred = Get-Credential
        } else {
            Write-Verbose "all needed parameters set"
        }
    #endregion verify Params


    #region load VMware Snapins
        Write-Verbose "load VMware Snappins"
        foreach ($comp in "VMware.VimAutomation.Core", "VMware.ImageBuilder") {
            if (Get-Module -ListAvailable -Name $comp -ErrorAction:SilentlyContinue) {
                if (!(Get-Module -Name $comp -ErrorAction:SilentlyContinue)) {
                    if (!(Import-Module -PassThru -Name $comp -ErrorAction:SilentlyContinue)) {
                        Write-Host "FATAL ERROR: Failed to import the $comp module!" -ForegroundColor Red
                        # Exit
                    }
                }
            } else {
                if (Get-PSSnapin -Registered -Name $comp -ErrorAction:SilentlyContinue) {
                    if (!(Get-PSSnapin -Name $comp -ErrorAction:SilentlyContinue)) {
                        if (!(Add-PSSnapin -PassThru -Name $comp -ErrorAction:SilentlyContinue)) {
                            Write-Host "FATAL ERROR: Failed to add the $comp snapin!" -ForegroundColor Red
                            # Exit
                        }
                    }
                } else {
                    Write-Host "FATAL ERROR: $comp is not available as a module or snapin! It looks like there is no compatible version of PowerCLI installed!" -ForegroundColor Red
                    # Exit
                }
            }
        }
    #endregion load VMware Snapins

    #region connect to vCenter
        Write-Verbose "connecting to vCenter $vCenterName"
        try 
        {
            Connect-VIServer -Server $vCenterName -WarningAction SilentlyContinue | Out-Null
            Write-Verbose "connected to vCenter $vCenterName"
        } catch {
            $ErrorMessage = $_.Exception.Message
            # $FailedItem = $_.Exception.ItemName
            Write-Host "couldn't connect to vCenter '$vCenter'" -ForegroundColor Red
            Write-Host $ErrorMessage -ForegroundColor Red
            # Exit
        }
    #endregion connect to vCenter
    
    #region get VM
        $vm = Get-VM -Name $vmName
        if ( [string]::IsNullOrEmpty( $vm ) )
        {
            Write-Host  "VM not found" -ForegroundColor Red
            # exit
        } else {
            Write-Verbose "vm $vmName found" 
        }
    #endregion get VM
    
    #region get VM View for SCSI Controller
        $vmview = Get-View -ViewType VirtualMachine -Filter @{"Name" = $vmName}
        if ( !( [string]::IsNullOrEmpty( $vmview ) ) )
        {
            Write-Verbose "vmView $vmName found" 
            $vmDisks = @()
            $VirtualSCSIControllers = $vmview.Config.Hardware.Device | Where-Object {$_.DeviceInfo.Label -match "SCSI"}
            $VirtualSCSIController = $VirtualSCSIControllers[0]
            foreach ($VirtualSCSIController in $VirtualSCSIControllers ) 
            {
                $VirtualDiskDevices = $vmview.Config.Hardware.Device | Where-Object { $_.ControllerKey -eq $VirtualSCSIController.Key }
                foreach ($VirtualDiskDevice in $VirtualDiskDevices ) 
                {
                    $vmDisks += New-Object -TypeName PSObject -Property @{
                        VirtualDeviceNode    = "SCSI ($( $VirtualSCSIController.BusNumber ):$( $VirtualDiskDevice.UnitNumber )) $( $VirtualDiskDevice.DeviceInfo.Label )"
                        PciSlotNumber        = $VirtualSCSIController.SlotInfo.PciSlotNumber
                        DataStore            = $VirtualDiskDevice.Backing.DataStore
                        FileName             = $VirtualDiskDevice.Backing.FileName
                        ControllerKey        = $VirtualSCSIController.Key
                        DiskKey              = $VirtualDiskDevice.Key
                        ControllerBus        = $VirtualSCSIController.BusNumber
                        ControllerUnitNumber = $VirtualSCSIController.UnitNumber
                        DiskUnitNumber       = $VirtualDiskDevice.UnitNumber
                    }
                }
            }
        } else {
            Write-Host  "VMView not found" -ForegroundColor Red
            # exit
        }
    #endregion get VM View for SCSI Controller
    
    #region get Disk and volumes from guest system
        $scripttext = @"
[Int64]$('$')HKLM = "2147483650"
[String]$('$')value = "UINumber"
$('$')Reg_Query = Get-WmiObject -List "StdRegProv" -Namespace root\cimv2 
$('$')PhysicalDisks = Get-WmiObject -Class "Win32_DiskDrive" -Namespace "root\CIMV2"    
# $('$')PhysicalDisks
$('$')DiskDrives = Get-WmiObject Win32_DiskDrive
$('$')DiskInfos = Get-WmiObject Win32_DiskDrive | ForEach-Object {
    $('$')DiskDrive = $('$')_
    $('$')PNPDeviceID = $('$')DiskDrive.PNPDeviceID.split('\')
    $('$')key = "SYSTEM\CurrentControlSet\Enum\$('$')($('$')PNPDeviceID[0])\$('$')($('$')PNPDeviceID[1])\$('$')($('$')PNPDeviceID[2])"
    $('$')PciSlotNumber = ($('$')Reg_Query.GetDWORDValue($('$')HKLM,$('$')key,$('$')value)).uvalue

    $('$')UniqueId = ( ( $('$')PhysicalDisks | Where-Object { $('$')DiskDrive.DeviceID -eq "\\.\PHYSICALDRIVE$('$')( $('$')_.DeviceId )" } ).UniqueId )
    If ( [string]::IsNullOrEmpty( $('$')UniqueId ) )
    {
        $('$')UniqueId = ( $('$')PhysicalDisks | Where-Object { $('$')DiskDrive.DeviceID -eq $('$')_.Name } ).SerialNumber
    }
    $('$')DiskDriveToDiskPartitions = Get-WmiObject -Query "ASSOCIATORS OF {Win32_DiskDrive.DeviceID='$('$')($('$')DiskDrive.DeviceID)'} WHERE AssocClass = Win32_DiskDriveToDiskPartition"
    $('$')DiskDriveToDiskPartitions | ForEach-Object {
        $('$')partition = $('$')_
        
        $('$')LogicalDiskToPartitions = Get-WmiObject -Query "ASSOCIATORS OF {Win32_DiskPartition.DeviceID='$('$')($('$')partition.DeviceID)'} WHERE AssocClass = Win32_LogicalDiskToPartition" 
        $('$')LogicalDiskToPartitions | ForEach-Object {
            New-Object -Type PSCustomObject -Property @{
                DiskSize        = $('$')DiskDrive.Size
                DiskModel       = $('$')DiskDrive.Model
                SCSIBus         = $('$')DiskDrive.SCSIBus
                SCSILogicalUnit = $('$')DiskDrive.SCSILogicalUnit
                SCSIPort        = $('$')DiskDrive.SCSIPort
                SCSITargetId    = $('$')DiskDrive.SCSITargetId
                PNPDeviceID     = $('$')DiskDrive.PNPDeviceID
                PciSlotNumber   = $('$')PciSlotNumber
                UniqueId        = $('$')UniqueId
                Partition       = $('$')partition.Name
                RawSize         = $('$')partition.Size
                DiskID          = $('$')partition.DiskIndex
                StartingOffset  = $('$')partition.StartingOffset
                DriveLetter     = $('$')_.DeviceID
                VolumeName      = $('$')_.VolumeName
                Size            = $('$')_.Size
                FreeSpace       = $('$')_.FreeSpace
            }
        }
    }
}
$('$')DiskInfos = $('$')DiskInfos | Where-Object { ( ! ( [string]::IsNullOrEmpty( $('$')_.UniqueId ) ) ) }
# $('$')DiskInfos | Sort-Object DriveLetter, DiskID | Select-Object -Unique UniqueId, DiskID, DriveLetter, SCSIBus, SCSILogicalUnit, SCSIPort, SCSITargetId, PNPDeviceID, PciSlotNumber | Format-Table
$('$')DiskInfos | convertTo-CSV
"@
        try {
            $WinDisks = Invoke-VMScript -VM $vm -ScriptText $scripttext -GuestCredential $vmCred -ErrorAction stop | convertfrom-csv    
        }
        catch {
            $ErrorMessage = $_.Exception.Message
            # $FailedItem = $_.Exception.ItemName
            Write-Host "couldn't connect to VM guest" -ForegroundColor Red
            Write-Host $ErrorMessage -ForegroundColor Red
            exit
        }
        
    #endregion get Disk and volumes from guest system
    
    #region merge WinDisk and VMware Disk Infos
        $DiskInfos = @()
        # $WinDisk = $WinDisks[1] 
        foreach ( $WinDisk in $WinDisks )
        {
            $vmDisk = $vmDisks | Where-Object { $_.PciSlotNumber -eq $WinDisk.PciSlotNumber -and $_.DiskUnitNumber -eq $WinDisk.SCSITargetId }
            $DiskInfos += New-Object -TypeName PSOBject -Property @{
                WinDiskID              = $WinDisk.DiskID
                PCISlotNumber          = $WinDisk.PciSlotNumber
                WinVolumeName          = $WinDisk.VolumeName
                WinDiskSCSITargetId    = $WinDisk.SCSITargetId
                DriveLetter            = $WinDisk.DriveLetter
                VMControllerBusNumber  = $vmDisk.ControllerBus
                VirtualDeviceNode      = $vmDisk.VirtualDeviceNode
                FileName               = $vmDisk.FileName
                DataStore              = $vmDisk.DataStore
            }
        }
        $DiskInfos 
    #endregion merge WinDisk and VMware Disk Infos
#endregion Execution

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

.SYNOPSIS

This script will return informations about virtual disks and windows disk allocation

.DESCRIPTION

This script will return informations about virtual disks and windows disk allocation

.PARAMETER vCenterName

defines the fqdn of the vCenter

.PARAMETER vmName

defines the name of the vm (like naming in vCenter, not the fqdn / dns name)

.PARAMETER vmCred

enter credentials to connect to the guest vm

.EXAMPLE

$vmCred = New-Object System.Management.Automation.PSCredential ('domain\username', ( ConvertTo-SecureString 'YourSecretPassword' -AsPlainText -Force ) )

.\ALL-OPR-get-VMDiskInfos.ps1 -vCenterName 'vcenter.domain.local' -vmName 'VMName' -vmcred $vmCred

.NOTES

-Author: Josh Burkard

-Email : josh@burkard.it

-CreationDate: 07.03.2018

-LastModifiedDate:

-Version: 1.0.0.0

-History:

07.03.2018 1.0.0.0 Josh Burkard InitalVersion

.LINK

Param

(

# Parameter help description

[Parameter(Mandatory=$true)][string]$vCenterName,

[Parameter(Mandatory=$true)][string]$vmName,

[System.Management.Automation.PSCredential][Parameter(Mandatory=$true)]$vmCred

)

#region Decalarations

#endregion Decalarations

#region Functions

#endregion Functions

#region Execution

#region verify Params

if ( [string]::IsNullOrEmpty( $vCenterName ) )

{

Write-Host "parameter vCenterName was not definied" -ForegroundColor Red

} elseif ( [string]::IsNullOrEmpty( $vmName ) )

{

Write-Host "parameter vmName was not definied" -ForegroundColor Red

} elseif ( [string]::IsNullOrEmpty( $vmCred ) )

{

$vmCred = Get-Credential

} else {

Write-Verbose "all needed parameters set"

}

#endregion verify Params

#region load VMware Snapins

Write-Verbose "load VMware Snappins"

foreach ($comp in "VMware.VimAutomation.Core", "VMware.ImageBuilder") {

if (Get-Module -ListAvailable -Name $comp -ErrorAction:SilentlyContinue) {

if (!(Get-Module -Name $comp -ErrorAction:SilentlyContinue)) {

if (!(Import-Module -PassThru -Name $comp -ErrorAction:SilentlyContinue)) {

Write-Host "FATAL ERROR: Failed to import the $comp module!" -ForegroundColor Red

# Exit

}

} else {

if (Get-PSSnapin -Registered -Name $comp -ErrorAction:SilentlyContinue) {

if (!(Get-PSSnapin -Name $comp -ErrorAction:SilentlyContinue)) {

if (!(Add-PSSnapin -PassThru -Name $comp -ErrorAction:SilentlyContinue)) {

Write-Host "FATAL ERROR: Failed to add the $comp snapin!" -ForegroundColor Red

# Exit

}

} else {

Write-Host "FATAL ERROR: $comp is not available as a module or snapin! It looks like there is no compatible version of PowerCLI installed!" -ForegroundColor Red

# Exit

}

#endregion load VMware Snapins

#region connect to vCenter

Write-Verbose "connecting to vCenter $vCenterName"

try

{

Connect-VIServer -Server $vCenterName -WarningAction SilentlyContinue | Out-Null

Write-Verbose "connected to vCenter $vCenterName"

} catch {

$ErrorMessage = $_.Exception.Message

# $FailedItem = $_.Exception.ItemName

Write-Host "couldn't connect to vCenter '$vCenter'" -ForegroundColor Red

Write-Host $ErrorMessage -ForegroundColor Red

# Exit

}

#endregion connect to vCenter

#region get VM

$vm = Get-VM -Name $vmName

if ( [string]::IsNullOrEmpty( $vm ) )

{

Write-Host "VM not found" -ForegroundColor Red

# exit

} else {

Write-Verbose "vm $vmName found"

}

#endregion get VM

#region get VM View for SCSI Controller

$vmview = Get-View -ViewType VirtualMachine -Filter @{"Name" = $vmName}

if ( !( [string]::IsNullOrEmpty( $vmview ) ) )

{

Write-Verbose "vmView $vmName found"

$vmDisks = @()

$VirtualSCSIControllers = $vmview.Config.Hardware.Device | Where-Object {$_.DeviceInfo.Label -match "SCSI"}

$VirtualSCSIController = $VirtualSCSIControllers[0]

foreach ($VirtualSCSIController in $VirtualSCSIControllers )

{

$VirtualDiskDevices = $vmview.Config.Hardware.Device | Where-Object { $_.ControllerKey -eq $VirtualSCSIController.Key }

foreach ($VirtualDiskDevice in $VirtualDiskDevices )

{

$vmDisks += New-Object -TypeName PSObject -Property @{

VirtualDeviceNode = "SCSI ($( $VirtualSCSIController.BusNumber ):$( $VirtualDiskDevice.UnitNumber )) $( $VirtualDiskDevice.DeviceInfo.Label )"

PciSlotNumber = $VirtualSCSIController.SlotInfo.PciSlotNumber

DataStore = $VirtualDiskDevice.Backing.DataStore

FileName = $VirtualDiskDevice.Backing.FileName

ControllerKey = $VirtualSCSIController.Key

DiskKey = $VirtualDiskDevice.Key

ControllerBus = $VirtualSCSIController.BusNumber

ControllerUnitNumber = $VirtualSCSIController.UnitNumber

DiskUnitNumber = $VirtualDiskDevice.UnitNumber

}

} else {

Write-Host "VMView not found" -ForegroundColor Red

# exit

}

#endregion get VM View for SCSI Controller

#region get Disk and volumes from guest system

$scripttext = @"

[Int64]$('$')HKLM = "2147483650"

[String]$('$')value = "UINumber"

$('$')Reg_Query = Get-WmiObject -List "StdRegProv" -Namespace root\cimv2

$('$')PhysicalDisks = Get-WmiObject -Class "Win32_DiskDrive" -Namespace "root\CIMV2"

# $('$')PhysicalDisks

$('$')DiskDrives = Get-WmiObject Win32_DiskDrive

$('$')DiskInfos = Get-WmiObject Win32_DiskDrive | ForEach-Object {

$('$')DiskDrive = $('$')_

$('$')PNPDeviceID = $('$')DiskDrive.PNPDeviceID.split('\')

$('$')key = "SYSTEM\CurrentControlSet\Enum\$('$')($('$')PNPDeviceID[0])\$('$')($('$')PNPDeviceID[1])\$('$')($('$')PNPDeviceID[2])"

$('$')PciSlotNumber = ($('$')Reg_Query.GetDWORDValue($('$')HKLM,$('$')key,$('$')value)).uvalue

$('$')UniqueId = ( ( $('$')PhysicalDisks | Where-Object { $('$')DiskDrive.DeviceID -eq "\\.\PHYSICALDRIVE$('$')( $('$')_.DeviceId )" } ).UniqueId )

If ( [string]::IsNullOrEmpty( $('$')UniqueId ) )

{

$('$')UniqueId = ( $('$')PhysicalDisks | Where-Object { $('$')DiskDrive.DeviceID -eq $('$')_.Name } ).SerialNumber

}

$('$')DiskDriveToDiskPartitions = Get-WmiObject -Query "ASSOCIATORS OF {Win32_DiskDrive.DeviceID='$('$')($('$')DiskDrive.DeviceID)'} WHERE AssocClass = Win32_DiskDriveToDiskPartition"

$('$')DiskDriveToDiskPartitions | ForEach-Object {

$('$')partition = $('$')_

$('$')LogicalDiskToPartitions = Get-WmiObject -Query "ASSOCIATORS OF {Win32_DiskPartition.DeviceID='$('$')($('$')partition.DeviceID)'} WHERE AssocClass = Win32_LogicalDiskToPartition"

$('$')LogicalDiskToPartitions | ForEach-Object {

New-Object -Type PSCustomObject -Property @{

DiskSize = $('$')DiskDrive.Size

DiskModel = $('$')DiskDrive.Model

SCSIBus = $('$')DiskDrive.SCSIBus

SCSILogicalUnit = $('$')DiskDrive.SCSILogicalUnit

SCSIPort = $('$')DiskDrive.SCSIPort

SCSITargetId = $('$')DiskDrive.SCSITargetId

PNPDeviceID = $('$')DiskDrive.PNPDeviceID

PciSlotNumber = $('$')PciSlotNumber

UniqueId = $('$')UniqueId

Partition = $('$')partition.Name

RawSize = $('$')partition.Size

DiskID = $('$')partition.DiskIndex

StartingOffset = $('$')partition.StartingOffset

DriveLetter = $('$')_.DeviceID

VolumeName = $('$')_.VolumeName

Size = $('$')_.Size

FreeSpace = $('$')_.FreeSpace

}

$('$')DiskInfos = $('$')DiskInfos | Where-Object { ( ! ( [string]::IsNullOrEmpty( $('$')_.UniqueId ) ) ) }

# $('$')DiskInfos | Sort-Object DriveLetter, DiskID | Select-Object -Unique UniqueId, DiskID, DriveLetter, SCSIBus, SCSILogicalUnit, SCSIPort, SCSITargetId, PNPDeviceID, PciSlotNumber | Format-Table

$('$')DiskInfos | convertTo-CSV

try {

$WinDisks = Invoke-VMScript -VM $vm -ScriptText $scripttext -GuestCredential $vmCred -ErrorAction stop | convertfrom-csv

}

catch {

$ErrorMessage = $_.Exception.Message

# $FailedItem = $_.Exception.ItemName

Write-Host "couldn't connect to VM guest" -ForegroundColor Red

Write-Host $ErrorMessage -ForegroundColor Red

exit

}

#endregion get Disk and volumes from guest system

#region merge WinDisk and VMware Disk Infos

$DiskInfos = @()

# $WinDisk = $WinDisks[1]

foreach ( $WinDisk in $WinDisks )

{

$vmDisk = $vmDisks | Where-Object { $_.PciSlotNumber -eq $WinDisk.PciSlotNumber -and $_.DiskUnitNumber -eq $WinDisk.SCSITargetId }

$DiskInfos += New-Object -TypeName PSOBject -Property @{

WinDiskID = $WinDisk.DiskID

PCISlotNumber = $WinDisk.PciSlotNumber

WinVolumeName = $WinDisk.VolumeName

WinDiskSCSITargetId = $WinDisk.SCSITargetId

DriveLetter = $WinDisk.DriveLetter

VMControllerBusNumber = $vmDisk.ControllerBus

VirtualDeviceNode = $vmDisk.VirtualDeviceNode

FileName = $vmDisk.FileName

DataStore = $vmDisk.DataStore

}

$DiskInfos

#endregion merge WinDisk and VMware Disk Infos

#endregion Execution

when you run the script, it will ask you for credentials and then shows you the informations about booth of your virtual disk and Windows drive :

Azure Automation Hybrid Worker behind a Firewall / Proxy

24. March 201624. March 2016 by Burkard Josh

One nice feature of Azure Automation is the Hybrid Worker. With the Hybrid Worker you can execute Runbooks inside your onPremise infrastructure. according to the official documentation or at John Hennen’s post, you have to open your FireWall for outbound traffic to *.cloudapp.net for this ports 443,9354,30000-30199.

When i told this requirement to our security-team, they weren’t very enthusiastic about the wildcard rule for *.cloudapp.net. So i have to search another solution.

To configure the Microsoft Monitoring Agent to use your proxy services, go to the Control Panel → System and Security → Microsoft Monitoring Agent and then go to the Proxy Settings tab:

after confiring the Proxy ettings, you can configure the Workspace ID and Key:

Now, you have to run one Job on the new Hybrid Worker, which will fail cause of additional needed firewall exceptions.

Inside the Hybrid Worker server in the directory %AllUsersProfile%\Microsoft\System Center\Orchestrator\7.2\SMA\Sandboxes\ you will find for each Runbook-Job a SubDirectory (for example 5hrotqyb.mz5). Inside this directory, there is one file with the file-extension *.SandboxID. Open this file, and you would found the Value “sandboxHubEndpointDetail”, inside which is the Server-URL. in my case net.tcp://oaas-prod-wes1.cloudapp.net:30016/AzureRunbookWorker/16/SandboxManager/12345678-1234-1234-1234-123456789012

now you should create an outbound firewall rule like this:

Source:	your internal Server IP
Destination URL:	oaas-prod-wes1.cloudapp.net
Protocol:	TCP
Destination Ports:	9354, and 30000-30199

daily Backup Report for SC DPM

2. November 2015 by Burkard Josh

i like System Center Dataprotection Manager, especially for the backup possibilites of remote Windows servers and the Online backup to Azure. But in my past, i lost the overview about succeded and failed backup jobs. The included reporting doesn’t helped me enough, and the alert notification was like spam. I needed a daily reportÂ with one view of all Jobs, Disks, Agents and other states. To reach this goal, i wrote my own PowerShell script, which i want toÂ share here.

the report, sent by mail will look like this:

the code for this is here:

<#
.Synopsis
   creates a report about SCDPM Backup
.DESCRIPTION
   this script creates and send a report about the state from System Center DataProtection Manager 2012 R2
   - recovery points
   - jobs in progress
   - failed jobs for yesterday and today
   - agent status
   - disk status
.EXAMPLE
   DPM-Report.ps1
.NOTES
   Author:    Josh Burkard - mRLedV9cTF2k0GlpfxQa@burkard.it
   Date:      22.10.2015
   Version:   1.0.0
   Requires:  PowerShell V2
              Module yxz in directory C:\Windows\System32\WindowsPowerShell\v1.0\Modules (for x64)
              Module xyz in directory C:\Windows\SysWOW64\WindowsPowerShell\v1.0\Modules (for x86)
#>

#region ScriptStart
    $elapsed = [System.Diagnostics.Stopwatch]::StartNew()
    if ($Host.Version.Major -ne 2)
    {
        clear
        write-host "Started at $(get-date)"
    }

    # Set Error Action to Silently Continue
    # $ErrorActionPreference = "SilentlyContinue"
    # $WarningPreference = "SilentlyContinue"
#endregion ScriptStart

#region Declarations
    $sendEmail                = $true
    $saveHTML                 = $false
    $emailTo                  = 'xxx@domain.com'
    $emailFrom                = 'SC DPM <scdpm@domain.com>'
    $emailSubjectPrefix       = '[Information]:'
    $emailSubject             = 'SCDPM Backup Report'
    $emailHost                = 'mail.domain.com'
    $file                     = "$($env:TEMP)\dpm-backup-report.html"

    $DPMServerName            = 'scdpmserver.domain.com'
    $tableWidth               = '1000'

    $colorGreen               = 'rgb(0,   176,  80)'
    $colorYellow              = 'rgb(255, 217, 108)'
    $colorOrange              = 'rgb(255, 128,   0)'
    $colorRed                 = 'rgb(251, 152, 149)'
    $colorGray                = 'rgb(228, 228, 228)'

    $showJobsInProgress       = $true
    $showJobsFailed           = $false
    $showAgentStatus          = $true
    $showAgentsDeleted        = $false
    $showDisks                = $true

    $RecoveryPointAgeOK       = 1 # days
    $RecoveryPointAgeWarning  = 7 # days
#endregion Declarations

#region Functions
    Function ConvertTo-AdvHTML                                                                                                                                                                                                   .SYNOPSIS
        Advanced replacement of ConvertTo-HTML cmdlet
    .DESCRIPTION
        Source: http://thesurlyadmin.com/tag/convertto-advhtml/
        This function allows for vastly greater control over cells and rows
        in a HTML table.  It takes ConvertTo-HTML to a whole new level!  You
        can now specify what color a cell or row is (either dirctly or through 
        the use of CSS).  You can add links, pictures and pictures AS links.
        You can also specify a cell to be a bar graph where you control the 
        colors of the graph and text that can be included in the graph.
        
        All color functions are through the use of imbedded text tags inside the
        properties of the object you pass to this function.  It is important to note 
        that this function does not do any processing for you, you must make sure all 
        control tags are already present in the object before passing it to the 
        function.
        
        Here are the different tags available:
        
        Syntax                          Comment
        ===================================================================================
        [cell:<color>]<optional text>   Designate the color of the cell.  Must be 
                                        at the beginning of the string.
                                        Example:
                                            [cell:red]System Down
                                            
        [row:<color>]                   Designate the color of the row.  This control
                                        can be anywhere, in any property of the object.
                                        Example:
                                            [row:orchid]
                                            
        [cellclass:<class>]<optional text>  
                                        Designate the color, and other properties, of the
                                        cell based on a class in your CSS.  You must 
                                        have the class in your CSS (use the -CSS parameter).
                                        Must be at the beginning of the string.
                                        Example:
                                            [cellclass:highlight]10mb
                                            
        [rowclass:<class>]              Designate the color, and other properties, of the
                                        row based on a class in your CSS.  You must 
                                        have the class in your CSS (use the -CSS parameter).
                                        This control can be anywhere, in any property of the 
                                        object.
                                        Example:
                                            [rowclass:greyishbold]
                                            
        [image:<height;width;url>]<alternate text>
                                        Include an image in your cell.  Put size of picture
                                        in pixels and url seperated by semi-colons.  Format
                                        must be height;width;url.  You can also include other
                                        text in the cell, but the [image] tag must be at the
                                        end of the tag (so the alternate text is last).
                                        Example:
                                            [image:100;200;http://www.sampleurl.com/sampleimage.jpg]Alt Text For Image
                                            
        [link:<url>]<link text>         Include a link in your cell.  Other text is allowed in
                                        the string, but the [link] tag must be at the end of the 
                                        string.
                                        Example:
                                            blah blah blah [link:www.thesurlyadmin.com]Cool PowerShell Link
                                            
        [linkpic:<height;width;url to pic>]<url for link>
                                        This tag uses a picture which you can click on and go to the
                                        specified link.  You must specify the size of the picture and 
                                        url where it is located, this information is seperated by semi-
                                        colons.  Other text is allowed in the string, but the [link] tag 
                                        must be at the end of the string.
                                        Example:
                                            [linkpic:100;200;http://www.sampleurl.com/sampleimage.jpg]www.thesurlyadmin.com
                                            
        [bar:<percent;bar color;remainder color>]<optional text>
                                        Bar graph makes a simple colored bar graph within the cell.  The
                                        length of the bar is controlled using <percent>.  You can 
                                        designate the color of the bar, and the color of the remainder
                                        section.  Due to the mysteries of HTML, you must designate a 
                                        width for the column with the [bar] tag using the HeadWidth parameter.
                                        
                                        So if you had a percentage of 95, say 95% used disk you
                                        would want to highlight the remainder for your report:
                                        Example:
                                            [bar:95;dark green;red]5% free
                                        
                                        What if you were at 30% of a sales goal with only 2 weeks left in
                                        the quarter, you would want to highlight that you have a problem.
                                        Example:
                                            [bar:30;darkred;red]30% of goal
    .PARAMETER InputObject
        The object you want converted to an HTML table
    .PARAMETER HeadWidth
        You can specify the width of a cell.  Cell widths are in pixels
        and are passed to the parameter in array format.  Each element
        in the array corresponds to the column in your table, any element
        that is set to 0 will designate the column with be dynamic.  If you had
        four elements in your InputObject and wanted to make the 4th a fixed
        width--this is required for using the [bar] tag--of 600 pixels:
        
        -HeadWidth 0,0,0,600
    .PARAMETER CSS
        Designate custom CSS for your HTML
    .PARAMETER Title
        Specifies a title for the HTML file, that is, the text that appears between the <TITLE> tags.
    .PARAMETER PreContent
        Specifies text to add before the opening <TABLE> tag. By default, there is no text in that position.
    .PARAMETER PostContent
        Specifies text to add after the closing </TABLE> tag. By default, there is no text in that position.
    .PARAMETER Body
        Specifies the text to add after the opening <BODY> tag. By default, there is no text in that position.
    .PARAMETER Fragment
        Generates only an HTML table. The HTML, HEAD, TITLE, and BODY tags are omitted.
    .INPUTS
        System.Management.Automation.PSObject
        You can pipe any .NET object to ConvertTo-AdvHtml.
    .OUTPUTS
        System.String
        ConvertTo-AdvHtml returns series of strings that comprise valid HTML.
    .EXAMPLE
        $Data = @"
Server,Description,Status,Disk
[row:orchid]Server1,Hello1,[cellclass:up]Up,"[bar:45;Purple;Orchid]55% Free"
Server2,Hello2,[cell:green]Up,"[bar:65;DarkGreen;Green]65% Used"
Server3,Goodbye3,[cell:red]Down,"[bar:95;DarkGreen;DarkRed]5% Free"
server4,This is quite a cool test,[cell:green]Up,"[image:150;650;http://pughspace.files.wordpress.com/2014/01/test-connection.png]Test Images"
server5,SurlyAdmin,[cell:red]Down,"[link:http://thesurlyadmin.com]The Surly Admin"
server6,MoreSurlyAdmin,[cell:purple]Updating,"[linkpic:150;650;http://pughspace.files.wordpress.com/2014/01/test-connection.png]http://thesurlyadmin.com"
"@
        $Data = $Data | ConvertFrom-Csv
        $HTML = $Data | ConvertTo-AdvHTML -HeadWidth 0,0,0,600 -PreContent "<p><h1>This might be the best report EVER</h1></p><br>" -PostContent "<br>Done! $(Get-Date)" -Title "Cool Test!"
        
        This is some sample code where I try to put every possibile tag and use into a single set
        of data.  $Data is the PSObject 4 columns.  Default CSS is used, so the [cellclass:up] tag
        will not work but I left it there so you can see how to use it.
    .NOTES
        Author:             Martin Pugh
        Twitter:            @thesurlyadm1n
        Spiceworks:         Martin9700
        Blog:               www.thesurlyadmin.com
          
        Changelog:
            1.0             Initial Release
    .LINK
        http://thesurlyadmin.com/convertto-advhtml-help/
    .LINK
        http://community.spiceworks.com/scripts/show/2448-create-advanced-html-tables-in-powershell-convertto-advhtml
    #>
        #requires -Version 2.0
        [CmdletBinding()]
        Param (
            [Parameter(Mandatory=$true,
                ValueFromPipeline=$true)]
            [Object[]]$InputObject,
            [string[]]$HeadWidth,
            [string[]]$HeadwidthPercent,
            [string]$CSS = "", 
            [string]$CSS_old = @"
<style>
TABLE {border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse; width: 1000px;}
TH {border-width: 1px;padding: 3px;border-style: solid;border-color: black;background-color: #6495ED;font-size:120%;}
TD {border-width: 1px;padding: 3px;border-style: solid;border-color: black;}
</style>
"@,
            [string]$Title,
            [string]$PreContent,
            [string]$PostContent,
            [string]$Body,
            [switch]$Fragment
        )
    
        Begin {
            If ($Title)
            {   $CSS += "`n<title>$Title</title>`n"
            }
            $Params = @{
                Head = $CSS
            }
            If ($PreContent)
            {   $Params.Add("PreContent",$PreContent)
            }
            If ($PostContent)
            {   $Params.Add("PostContent",$PostContent)
            }
            If ($Body)
            {   $Params.Add("Body",$Body)
            }
            If ($Fragment)
            {   $Params.Add("Fragment",$true)
            }
            $Data = @()
        }
    
        Process {
            ForEach ($Line in $InputObject)
            {   $Data += $Line
            }
        }
    
        End {
            $Html = $Data | ConvertTo-Html -Fragment

            $NewHTML = @()
            ForEach ($Line in $Html)
            {   
                If ($Line -like "*<table>*")
                {
                    $Line = $Line.Replace('<table>', '<table width="' + $tableWidth + '">')
                }
                If ($Line -like "*<th>*")
                {   
                    If ($Headwidth)
                    {
                        $Index = 0
                        $Reg = $Line | Select-String -AllMatches -Pattern "<th>(.*?)<\/th>"
                        ForEach ($th in $Reg.Matches)
                        {   
                            If ($Index -le ($HeadWidth.Count - 1))
                            {
                                If ($HeadWidth[$Index] -and $HeadWidth[$Index] -gt 0)
                                {
                                    $Line = $Line.Replace($th.Value,"<th width=""$($HeadWidth[$Index])"" style=""width:$($HeadWidth[$Index])px"">$($th.Groups[1])</th>")
                                }
                            }
                            $Index ++
                        }
                    }
                    If ($HeadwidthPercent)
                    {   $Index = 0
                        $Reg = $Line | Select-String -AllMatches -Pattern "<th>(.*?)<\/th>"
                        ForEach ($th in $Reg.Matches)
                        {   
                            If ($Index -le ($HeadwidthPercent.Count - 1))
                            {
                                If ($HeadwidthPercent[$Index] -and $HeadwidthPercent[$Index] -gt 0)
                                {
                                    $Line = $Line.Replace($th.Value,"<th style=""width:$($HeadwidthPercent[$Index])%"">$($th.Groups[1])</th>")
                                }
                            }
                            $Index ++
                        }
                    }
                }
        
                Do {
                    Switch -regex ($Line)
                    {   "<td>\[cell:(.*?)\].*?<\/td>"
                        {
                            $Line = $Line.Replace("<td>[cell:$($Matches[1])]","<td style=""background-color:$($Matches[1])"">")
                            Break
                        }
                        "\[cellclass:(.*?)\]"
                        {   $Line = $Line.Replace("<td>[cellclass:$($Matches[1])]","<td class=""$($Matches[1])"">")
                            Break
                        }
                        "\[row:(.*?)\]"
                        {   $Line = $Line.Replace("<tr>","<tr style=""background-color:$($Matches[1])"">")
                            $Line = $Line.Replace("[row:$($Matches[1])]","")
                            Break
                        }
                        "\[rowclass:(.*?)\]"
                        {   $Line = $Line.Replace("<tr>","<tr class=""$($Matches[1])"">")
                            $Line = $Line.Replace("[rowclass:$($Matches[1])]","")
                            Break
                        }
                        "<td>\[bar:(.*?)\](.*?)<\/td>"
                        {   $Bar = $Matches[1].Split(";")
                            $Width = 100 - [int]$Bar[0]
                            If (-not $Matches[2])
                            {   $Text = "&nbsp;"
                            }
                            Else
                            {   $Text = $Matches[2]
                            }
                            $Line = $Line.Replace($Matches[0],"<td><div style=""background-color:$($Bar[1]);float:left;width:$($Bar[0])%"">$Text</div><div style=""background-color:$($Bar[2]);float:left;width:$width%"">&nbsp;</div></td>")
                            Break
                        }
                        "\[image:(.*?)\](.*?)<\/td>"
                        {   $Image = $Matches[1].Split(";")
                            $Line = $Line.Replace($Matches[0],"<img src=""$($Image[2])"" alt=""$($Matches[2])"" height=""$($Image[0])"" width=""$($Image[1])""></td>")
                        }
                        "\[link:(.*?)\](.*?)<\/td>"
                        {   $Line = $Line.Replace($Matches[0],"<a href=""$($Matches[1])"">$($Matches[2])</a></td>")
                        }
                        "\[linkpic:(.*?)\](.*?)<\/td>"
                        {   $Images = $Matches[1].Split(";")
                            $Line = $Line.Replace($Matches[0],"<a href=""$($Matches[2])""><img src=""$($Image[2])"" height=""$($Image[0])"" width=""$($Image[1])""></a></td>")
                        }
                        Default
                        {   Break
                        }
                    }
                } Until ($Line -notmatch "\[.*?\]")
                $NewHTML += $Line
            }
            Return $NewHTML
        }
    }
#endregion Functions

#region Execution
    Import-Module  DataProtectionManager

    #region bodyTop
        $bodyTop = @"
	        <body>
		        <table style="width: $($tableWidth)px;" width="$tableWidth">
			        <tr>
				        <td style="width: 80%;border: none;" class="headerTable">System Center Data Protection Manager - Backup Report</td>
				        <td style="width: 20%;border: none;vertical-align:text-top;font-size:xx-small;text-align:right;padding: 2px 2px 2px 2px;" class="headerTable">SC DPM Version: <a href="https://buildnumbers.wordpress.com/scdpm/">$( ( get-wmiobject win32_product | where { $_.Name -match 'Data Protection Manager' } ).Version )</a></td>
			        </tr>
		        </table>
"@
    #endregion bodyTop
    
    #region SubHead
        #region Table Begin
            $subHead01 = @"
		            <table cellspacing="0" cellpadding="0" class="inner" border="0" style="margin: 0px; width: $tableWidth;">
			            <tr>
				            <td class="subheader" style="border-top: none;border-bottom: none;">
"@ 
        #endregion Table Begin

        #region Table End
            $subHead02 = @"
				            </td>
			            </tr>
		            </table>
"@
        #endregion Table End
    #endregion SubHead

    Connect-DPMServer -DPMServerName $DPMServerName


    #region RecoveryPoints
        $ProdServers = Get-DPMProductionServer 
    
        $DPMAlerts = Get-DPMAlert -IncludeAlerts AllActive
        $Report = ''

        $listRecoveryPoints = @()
        $i = 0
        $RecoveryPointErrors = 0

        $DPMProtectionGroups = Get-DPMProtectionGroup
        foreach ($DPMProtectionGroup in $DPMProtectionGroups)
        {
            $i++
            Write-Progress -Activity "loop throught Protection Groups" -Status "Server $($DPMProtectionGroup.Name) $i / $($DPMProtectionGroups.Count)" -PercentComplete ( $i / $DPMProtectionGroups.Count * 100) -Id 0

            $DataSources = $DPMProtectionGroup.GetDatasources()
            # $DataSources | Out-GridView
            Write-Verbose "Loop through each available DataSource"
            $j = 0
            foreach ($DataSource in $DataSources)
            {
                $j++
                Write-Progress -Activity "loop throught Data Sources" -Status "DataSource $($DataSource.Name) $j / $($DataSources.Count)" -PercentComplete ( $j / $DataSources.Count * 100) -Id 1 -ParentId 0

                Write-Verbose "Get a list of RecoveryPoints for each DataSource"
                $RecoveryPoints = Get-RecoveryPoint -Datasource $DataSource
                $RecoveryPointsOnline = Get-RecoveryPoint -Datasource $DataSource -Online
                $DPMAlert = ''
                $DPMAlert = ( $DPMAlerts | where { $_.Server -eq $DataSource.ProductionServerName -and $_.AffectedArea -eq $DataSource.Name } ).ErrorInfo.ShortProblem -join ', '

                
                if ( $DPMAlert -ne '' )
                {
                    $DPMAlert = "[cell:$colorRed]$DPMAlert"
                    $RecoveryPointErrors++
                }
                if ( @($RecoveryPoints).Count -ne 0 )
                {
                    $LastPoint = Get-Date ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime ) -Format "dd.MM.yyyy HH:mm:ss"
                    if ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeOK ) )
                    {
                        $LastPoint = "[cell:$colorGreen]$LastPoint"
                    } elseif ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeWarning ) ) {
                        $LastPoint = "[cell:$colorYellow]$LastPoint"
                    } else {
                        $LastPoint = "[cell:$colorRed]$LastPoint"
                    }
                } else {
                    $LastPoint = "[cell:$colorRed]never"
                }
                if ( $DataSource.IsPresentOnCloud )
                {
                    if ( @($RecoveryPointsOnline).Count -ne 0 )
                    {
                        $LastPointOnline = Get-Date ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime ) -Format "dd.MM.yyyy HH:mm:ss"
                        if ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeOK ) )
                        {
                            $LastPointOnline = "[cell:$colorGreen]$LastPointOnline"
                        } elseif ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeWarning ) ) {
                            $LastPointOnline = "[cell:$colorYellow]$LastPointOnline"
                        } else {
                            $LastPointOnline = "[cell:$colorRed]$LastPointOnline"
                        }

                    } else {
                        $LastPointOnline = "[cell:$colorRed]never"
                    }
                } else {
                    $LastPointOnline = "not configured"
                }

                $LineItem = New-Object -TypeName PSobject -Property @{
                    "Recovery Points"  = @( $RecoveryPoints ).Count
                    "First Point"      = ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -First 1 ).RepresentedPointInTime
                    "Last Point"       = $LastPoint
                    "Size GB"          = [int]( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).Size / 1GB * 100 ) / 100
                    "Cloud Recovery Points"  = @( $RecoveryPointsOnline ).Count
                    "Cloud First Point"      = ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -First 1 ).RepresentedPointInTime
                    "Cloud Last Point"       = $LastPointOnline
                    "Cloud Size GB"          = $CloudSize
                    Server             = "[cellclass:overflowhidden]$($DataSource.ProductionServerName)"
                    Name               = "[cellclass:overflowhidden]$($DataSource.Name -replace "_", "_ ")"
                    "Protection Group" = $DataSource.ProtectionGroup.Name
                    "Object Type"      = $DataSource.ObjectType
                    Alerts             = $DPMAlert
                    Activity           = $DataSource.Activity
                    State              = $DataSource.State
                }
                $listRecoveryPoints += $LineItem
            }
        }
        $ReportRecoveryPoints = $listRecoveryPoints | Sort-Object Server, Name | Select Server, Name, "Object Type", "Protection Group", "Recovery Points", "First Point", "Last Point", "Size GB", "Cloud Recovery Points", "Cloud First Point", "Cloud Last Point", Alerts | ConvertTo-AdvHTML -HeadWidth 72,146,72,72,72,72,72,52,52,72,72,137 -Fragment
        $ReportRecoveryPoints = $subHead01 + "Recovery Points" + $subHead02 + $ReportRecoveryPoints

        Write-Progress -Activity "loop throught Data Sources" -Status "completed" -id 1 -Completed
        Write-Progress -Activity "loop throught Protection Groups" -Status "completed" -id 0 -Completed
    #endregion RecoveryPoints

    #region AgentStatus
        if ( $showAgentStatus -eq $true )
        {
            $AgentStatus = @()
            $i = 0
            foreach ($ProdServer in $ProdServers)
            {
                $i++
                Write-Progress -Activity "Update Agent Status" -Status "Agent $($ProdServer.ServerName) $i / $($ProdServers.Count)" -PercentComplete ( $i / $ProdServers.Count * 100)
                Update-DPMProductionServer -ProductionServer $ProdServer -ErrorAction SilentlyContinue
            }
            $ProdServers = Get-DPMProductionServer
            $i = 0
            foreach ($ProdServer in $ProdServers)
            {
                $i++
                Write-Progress -Activity "Update Agent Status" -Status "Agent $($ProdServer.ServerName) $i / $($ProdServers.Count)" -PercentComplete ( $i / $ProdServers.Count * 100)
                
                if ( $ProdServer.ServerProtectionState -ne 'Deleted' -or $showAgentsDeleted -eq $true ) 
                {
                    switch ($ProdServer.Connectivity.Status)
                    {
                        'OK'              { $ServerConnectivity = "[cell:$colorGreen]OK" }
                        'Error'           { $ServerConnectivity = "[cell:$colorRed]Error" }
                        'Unavailable'     { $ServerConnectivity = "[cell:$colorRed]Unavailable" }
                        'Restart pending' { $ServerConnectivity = "[cell:$colorYellow]Restart pending" }
                        Default           { $ServerConnectivity = "[cell:$colorYellow]$($ProdServer.Connectivity)" }
                                                    
                    }
                    if ($ProdServer.UpgradeAvailable -eq $true)
                    {
                        $UpgradeAvailable = "[cell:$colorYellow]Yes"
                    } else {
                        $UpgradeAvailable = "[cell:$colorGreen]No"
                    }

                    $IsThrottled = $ProdServer.IsThrottled
                    switch ($ProdServer.ServerProtectionState)
                    {
                        'HasDatasourcesProtected' {
                            $ServerProtectionState = "[cell:$colorGreen]has Datasources protected"
                        }
                        'Deleted'                { 
                            $ServerProtectionState = "[cell:$colorGray]deleted" 
                            $ServerConnectivity    = "[cell:$colorGray]"
                            $UpgradeAvailable      = "[cell:$colorGray]"
                            $IsThrottled           = "[cell:$colorGray]"
                        }
                        'NoDatasourcesProtected' { $ServerProtectionState = "[cell:$colorRed]no Datasources protected" }

                    }
                    $AgentStatus += New-Object -TypeName PSObject -Property @{
                        "Server Name"       = $ProdServer.MachineName
                        "Protection State"  = $ServerProtectionState
                        "Connectivity"      = $ServerConnectivity
                        "Upgrade Available" = $UpgradeAvailable
                        IsThrottled         = $IsThrottled

                    }
                }
            }
        
            $ReportAgentStatus = $AgentStatus | select "Server Name", "Protection State", Connectivity, "Upgrade Available", IsThrottled | Sort-Object "Server Name" | ConvertTo-AdvHTML -HeadWidth 197,197,197,197,196 -Fragment
            $ReportAgentStatus = $subHead01 + "Agents" + $subHead02 + $ReportAgentStatus
        } else {
            $ReportAgentStatus = ''
        }
        Write-Progress -Activity "Update Agent Status" -Status "completed" -id 0 -Completed
    #endregion AgentStatus

    #region DiskStatus
        if ( $showDisks -eq $true )
        {
            $DPMDisks = Get-DPMDisk | where { $_.IsInStoragePool -eq $true }
            $ReportDisks = @()
            foreach ($DPMDisk in $DPMDisks)
            {
                $percent = @( ( ( $DPMDisk.TotalCapacity - $DPMDisk.UnallocatedSpace ) / $DPMDisk.TotalCapacity * 100 ) -split "\." )[0]
                if ( $percent -le 70 )
                {
                    $barcolor = $colorGreen
                } elseif ( $percent -le 90 ) {
                    $barcolor = $colorYellow
                } else {
                    $barcolor = $colorRed
                }
                $percentUsed = "[bar:$( $percent + 1 );$barcolor;#FFFFFF]$( $percent.ToString() ) % used"
                $ReportDisks += New-Object -TypeName PSObject -Property @{
                    Name = "Disk $($DPMDisk.NtDiskId) ($($DPMDisk.Name))"
                    Capacity = $DPMDisk.TotalCapacityLabel
                    'Free Space' = $DPMDisk.UnallocatedSpaceLabel
                    'Disk Status' = $DPMDisk.DiskStatus
                    'Percent Used' = $percentUsed

                }
            }


            $ReportDisks += New-Object -TypeName PSObject -Property @{
                    Name = "Total"
                    Capacity = ( ( ( $DPMDisks | Measure-Object TotalCapacity -Sum ).Sum / 1GB ) -split "\." )[0] + " GB"
                    'Free Space' = ( ( ( $DPMDisks | Measure-Object UnallocatedSpace -Sum ).Sum / 1GB ) -split "\." )[0] + " GB"
                    'Disk Status' = ''
                    'Percent Used' = ''

                }            

            # $ReportDisks = $ReportDisks | Select Name, Capacity, 'Free Space', 'Percent Used', 'Disk Status' | ConvertTo-AdvHTML -HeadWidth 197,197,197,197,196 -Fragment
            $ReportDisks = $ReportDisks | Select Name, Capacity, 'Free Space', 'Disk Status' | ConvertTo-AdvHTML -HeadWidth 397,197,197,196 -Fragment
            $ReportDisks = $subHead01 + "Disks" + $subHead02 + $ReportDisks
        } else {
            $ReportDisks = ''
        }
    #endregion DiskStatus

    #region Jobs in Progress
        if ( $showJobsInProgress -eq $true )
        {
            $DPMJobsInProgress = Get-DPMJob -Status InProgress -DPMServerName $DPMServerName 
            # $DPMJobsInProgress.Count
            $DPMJobsTasks = @()
            foreach ( $DPMJobInProgress in $DPMJobsInProgress ) 
            {
                foreach ( $DPMJobTask in $DPMJobInProgress.TaskList )
                {
                    # $DPMJobsTasks += $DPMJobTask
                    if ( $DPMJobTask.StartTime -eq (Get-Date "01.01.0001") )
                    {
                        $timeElapsed = New-TimeSpan -Start $DPMJobTask.CreatedTime -End ( Get-Date )
                        $timeElapsed = @( ( "{0:G}" -f $timeElapsed ) -split "\." )[0]
                        $StartTime   = ''
                    } else {
                        $timeElapsed = New-TimeSpan -Start $DPMJobTask.StartTime -End ( Get-Date )
                        $timeElapsed = @( ( "{0:G}" -f $timeElapsed ) -split "\." )[0]
                        $StartTime   = $DPMJobTask.StartTime
                    }
                    $DPMJobsTasks += New-Object -TypeName PSObject -Property @{
                        Created  = $DPMJobTask.CreatedTime
                        'Start Time' = $StartTime
                        'Time Elapsed' = $timeElapsed
                        Status = $DPMJobTask.Status
                        Type   = $DPMJobTask.Type
                        Server = $DPMJobTask.ProductionServerName
                        Transfered = "$( [int]($DPMJobInProgress.DataSize / 1GB * 100) / 100 ) GB"
                        Path = "[cellclass:overflowhidden]$($DPMJobTask.DatasourcePath)"
                        Error = $DPMJobTask.ErrorInfo.ShortProblem
                    }
                }
            }
            $ReportJobsTasks = $DPMJobsTasks | Select Created, 'Start Time', 'Time Elapsed', Status, Transfered, Type, Server, Path | ConvertTo-AdvHTML -HeadWidth 117,117,117,187,97,97,147,96 -Fragment
            $ReportJobsTasks = $subHead01 + "Jobs in Progress" + $subHead02 + $ReportJobsTasks 
        } else {
            $ReportJobsTasks = ''
        }
    #endregion Jobs in Progress

    #region Jobs Failed
        if ( $showJobsFailed -eq $true )
        {
            $DPMJobsFailed = Get-DPMJob -Status Failed -From ( Get-Date ( ( Get-Date ).AddDays( -1 ) ) -Format "dd.MM.yyyy" )
            $DPMJobsFailedTasks = @()
            foreach ( $DPMJobFailed in $DPMJobsFailed ) 
            {
                # $DPMJobFailed = $DPMJobsFailed[0]
                foreach ( $DPMJobTask in $DPMJobFailed.TaskList )
                {
                    # $DPMJobsFailedTasks += $DPMJobTask
                    $DPMJobsFailedTasks += New-Object -TypeName PSObject -Property @{
                        Created  = $DPMJobTask.CreatedTime
                        'Start Time' = $DPMJobTask.StartTime
                        'End Time' = $DPMJobTask.EndTime
                        Status = $DPMJobTask.Status
                        Type   = $DPMJobTask.Type
                        Server = $DPMJobTask.ProductionServerName
                        Path = "[cellclass:overflowhidden]$($DPMJobTask.DatasourcePath)"
                        Error = $DPMJobTask.ErrorInfo.ShortProblem
                    }
                }
            }
            $ReportJobsTasksFailed = $DPMJobsFailedTasks | Select Created, 'Start Time', 'End Time', Status, Type, Server, Path, Error | ConvertTo-AdvHTML -HeadWidth 117,117,117,77,97,147,97,206 -Fragment
            $ReportJobsTasksFailed = $subHead01 + "Failed Jobs for yesterday and today" + $subHead02 + $ReportJobsTasksFailed 
        } else {
            $ReportJobsTasksFailed = ''
        }
    #endregion Jobs Failed

    #region Azure
        Import-Module MSOnlineBackup
        $OBMachineUsage = [int]( ( Get-OBMachineUsage ).StorageUsedByMachineInBytes / 1GB * 100) / 100

        $ReportAzure = @"
            <table style="width: $tableWidth;">
                <tr>
                    <td>
                        Total Space used in Azure:
                    </td>
                    <td>
                        $OBMachineUsage GB
                    </td>
                </tr>
            </table>
"@
        $ReportAzure = $subHead01 + "Azure Backup" + $subHead02 + $ReportAzure 

    #endregion Azure

    #region Overall-State
        if ( 
            ( $RecoveryPointErrors -ne 0 ) -or `
            ( @( $ProdServers | where { $_.Connectivity -eq 'Error' } ).Count -ne 0 ) -or  `
            ( @( $ProdServers | where { $_.Connectivity -eq 'Unavailable' } ).Count -ne 0 )
        ) {
            $StateColor = $colorRed
            $OverAllState = 'Failed'
        } elseif ( 
            (@( $AgentStatus | where { $_."Upgrade Available" -match 'Yes' } ).Count -ne 0 ) -or  `
            (@( $ProdServers | where { $_.Connectivity.Status -eq 'RebootRequired' } ).Count -ne 0 ) -or `
            (@( $ProdServers | where { $_.Connectivity.Status -eq 'Unknown' } ).Count -ne 0 )
        ) {
            $StateColor = $colorYellow
            $OverAllState = 'Warning'
        } else {
            $StateColor = $colorGreen
            $OverAllState = 'Success'
        }
    #endregion Overall-State
    
    #region Header
        $headerObj = @"
        <html>
	        <head>
		        <title>$emailSubject</title>
		        <style>  
			        body {font-family: Tahoma; background-color:#fff;width: 1000px;}
			        h1.top {background-color: #fb9895;color: White;font-weight: bold;font-size: 16px;vertical-align: center;padding: 5px;}
			        table {font-family: Tahoma;font-size: 12px;background-color: #e3e3e3;width:$($tableWidth)px;border-collapse:collapse; table-layout: fixed;}
			        .headerTable{background-color: $StateColor ;color: White;font-weight: bold;font-size: 16px;height: 70px;vertical-align: bottom;padding: 0 0 15px 15px;border-bottom: none;}
			        .subheader{height: 35px;background-color: #f3f4f4;font-size: 16px;vertical-align: middle;padding: 5px 0 0 15px;color: #626365;}
			        table.inner tr{height: 17px;}
			        table.inner td{padding: 2px 2px 2px 2px;vertical-align: top;border: 1px solid #a7a9ac; }
			        table.inner .subheader{height: 35px;background-color: #f3f4f4;font-size: 16px;vertical-align: middle;padding: 5px 0 0 15px;color: #626365;}
                    td.overflowhidden { overflow: hidden; }
			        th {border: 1px solid #a7a9ac;border-bottom: none;}
			        tr {height: 17px;}
			        td {background-color: #fff;border: 1px solid #a7a9ac;padding: 2px 2px 2px 2px;vertical-align: top;}  
                </style>
            </head>
"@
    #endregion Header

    #region Footer
        $bodyScript = @"
            <table style="width: $tableWidth;">
            <tr><td>This report was generated by Script <b>$( $MyInvocation.InvocationName )</b> on Server <b>$env:computername</b></td></tr>
            </table>
"@
    #endregion Footer

    #region composite Output
        $htmlOutput = $headerObj + `
                      $bodyTop + `
                      $ReportRecoveryPoints + `
                      $ReportJobsTasks + `
                      $ReportJobsTasksFailed + `
                      $ReportAgentStatus + `
                      $ReportDisks + `
                      $ReportAzure + `
                      $footerObj + `
                      $bodyScript
    #endregion composite Output

    #region Output
        if ($sendEmail -eq $true) 
        {
            $emailSubject = "$emailSubjectPrefix [$OverAllState] $emailSubject"

            Send-MailMessage -To $emailTo -From $emailFrom -Subject $emailSubject -Body $htmlOutput -BodyAsHTML -SmtpServer $emailHost
        } 
        if ( $saveHTML -eq $true )
        {
	        $htmlOutput | Out-File $file
            # [Reflection.Assembly]::LoadWithPartialName("System.Xml.Linq")
            # [System.Xml.Linq.XDocument]::Load($file).Save($file)
	        Invoke-Expression $file
        }
    #endregion
#endregion Execution

#region ScriptEnd
    Write-Host "`r`n Ended at $(get-date)"
    Write-Host "`r`n Total Elapsed Time: $($elapsed.Elapsed.ToString())"
#endregion ScriptEnd

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

292

293

294

295

296

297

298

299

300

301

302

303

304

305

306

307

308

309

310

311

312

313

314

315

316

317

318

319

320

321

322

323

324

325

326

327

328

329

330

331

332

333

334

335

336

337

338

339

340

341

342

343

344

345

346

347

348

349

350

351

352

353

354

355

356

357

358

359

360

361

362

363

364

365

366

367

368

369

370

371

372

373

374

375

376

377

378

379

380

381

382

383

384

385

386

387

388

389

390

391

392

393

394

395

396

397

398

399

400

401

402

403

404

405

406

407

408

409

410

411

412

413

414

415

416

417

418

419

420

421

422

423

424

425

426

427

428

429

430

431

432

433

434

435

436

437

438

439

440

441

442

443

444

445

446

447

448

449

450

451

452

453

454

455

456

457

458

459

460

461

462

463

464

465

466

467

468

469

470

471

472

473

474

475

476

477

478

479

480

481

482

483

484

485

486

487

488

489

490

491

492

493

494

495

496

497

498

499

500

501

502

503

504

505

506

507

508

509

510

511

512

513

514

515

516

517

518

519

520

521

522

523

524

525

526

527

528

529

530

531

532

533

534

535

536

537

538

539

540

541

542

543

544

545

546

547

548

549

550

551

552

553

554

555

556

557

558

559

560

561

562

563

564

565

566

567

568

569

570

571

572

573

574

575

576

577

578

579

580

581

582

583

584

585

586

587

588

589

590

591

592

593

594

595

596

597

598

599

600

601

602

603

604

605

606

607

608

609

610

611

612

613

614

615

616

617

618

619

620

621

622

623

624

625

626

627

628

629

630

631

632

633

634

635

636

637

638

639

640

641

642

643

644

645

646

647

648

649

650

651

652

653

654

655

656

657

658

659

660

661

662

663

664

665

666

667

668

669

670

671

672

673

674

675

676

677

678

679

680

681

682

683

684

685

686

687

688

689

690

691

692

693

694

695

696

697

698

699

700

701

702

703

704

705

706

707

708

709

710

711

712

713

714

715

716

717

718

719

720

721

722

723

724

725

726

727

728

729

730

731

732

733

734

735

736

737

738

739

740

741

742

743

744

745

746

747

748

749

750

751

752

753

754

755

756

757

758

759

760

761

762

763

764

765

766

767

768

769

770

771

772

773

774

775

776

777

778

779

780

781

782

783

784

785

786

787

788

.Synopsis

creates a report about SCDPM Backup

.DESCRIPTION

this script creates and send a report about the state from System Center DataProtection Manager 2012 R2

- recovery points

- jobs in progress

- failed jobs for yesterday and today

- agent status

- disk status

.EXAMPLE

DPM-Report.ps1

.NOTES

Author: Josh Burkard - mRLedV9cTF2k0GlpfxQa@burkard.it

Date: 22.10.2015

Version: 1.0.0

Requires: PowerShell V2

Module yxz in directory C:\Windows\System32\WindowsPowerShell\v1.0\Modules (for x64)

Module xyz in directory C:\Windows\SysWOW64\WindowsPowerShell\v1.0\Modules (for x86)

#region ScriptStart

$elapsed = [System.Diagnostics.Stopwatch]::StartNew()

if ($Host.Version.Major -ne 2)

{

clear

write-host "Started at $(get-date)"

}

# Set Error Action to Silently Continue

# $ErrorActionPreference = "SilentlyContinue"

# $WarningPreference = "SilentlyContinue"

#endregion ScriptStart

#region Declarations

$sendEmail = $true

$saveHTML = $false

$emailTo = 'xxx@domain.com'

$emailFrom = 'SC DPM <scdpm@domain.com>'

$emailSubjectPrefix = '[Information]:'

$emailSubject = 'SCDPM Backup Report'

$emailHost = 'mail.domain.com'

$file = "$($env:TEMP)\dpm-backup-report.html"

$DPMServerName = 'scdpmserver.domain.com'

$tableWidth = '1000'

$colorGreen = 'rgb(0, 176, 80)'

$colorYellow = 'rgb(255, 217, 108)'

$colorOrange = 'rgb(255, 128, 0)'

$colorRed = 'rgb(251, 152, 149)'

$colorGray = 'rgb(228, 228, 228)'

$showJobsInProgress = $true

$showJobsFailed = $false

$showAgentStatus = $true

$showAgentsDeleted = $false

$showDisks = $true

$RecoveryPointAgeOK = 1 # days

$RecoveryPointAgeWarning = 7 # days

#endregion Declarations

#region Functions

Function ConvertTo-AdvHTML .SYNOPSIS

Advanced replacement of ConvertTo-HTML cmdlet

.DESCRIPTION

Source: http://thesurlyadmin.com/tag/convertto-advhtml/

This function allows for vastly greater control over cells and rows

in a HTML table. It takes ConvertTo-HTML to a whole new level! You

can now specify what color a cell or row is (either dirctly or through

the use of CSS). You can add links, pictures and pictures AS links.

You can also specify a cell to be a bar graph where you control the

colors of the graph and text that can be included in the graph.

All color functions are through the use of imbedded text tags inside the

properties of the object you pass to this function. It is important to note

that this function does not do any processing for you, you must make sure all

control tags are already present in the object before passing it to the

function.

Here are the different tags available:

Syntax Comment

===================================================================================

[cell:<color>]<optional text> Designate the color of the cell. Must be

at the beginning of the string.

Example:

[cell:red]System Down

[row:<color>] Designate the color of the row. This control

can be anywhere, in any property of the object.

Example:

[row:orchid]

[cellclass:<class>]<optional text>

Designate the color, and other properties, of the

cell based on a class in your CSS. You must

have the class in your CSS (use the -CSS parameter).

Must be at the beginning of the string.

Example:

[cellclass:highlight]10mb

[rowclass:<class>] Designate the color, and other properties, of the

row based on a class in your CSS. You must

have the class in your CSS (use the -CSS parameter).

This control can be anywhere, in any property of the

object.

Example:

[rowclass:greyishbold]

[image:<height;width;url>]<alternate text>

Include an image in your cell. Put size of picture

in pixels and url seperated by semi-colons. Format

must be height;width;url. You can also include other

text in the cell, but the [image] tag must be at the

end of the tag (so the alternate text is last).

Example:

[image:100;200;http://www.sampleurl.com/sampleimage.jpg]Alt Text For Image

[link:<url>]<link text> Include a link in your cell. Other text is allowed in

the string, but the [link] tag must be at the end of the

string.

Example:

blah blah blah [link:www.thesurlyadmin.com]Cool PowerShell Link

[linkpic:<height;width;url to pic>]<url for link>

This tag uses a picture which you can click on and go to the

specified link. You must specify the size of the picture and

url where it is located, this information is seperated by semi-

colons. Other text is allowed in the string, but the [link] tag

must be at the end of the string.

Example:

[linkpic:100;200;http://www.sampleurl.com/sampleimage.jpg]www.thesurlyadmin.com

[bar:<percent;bar color;remainder color>]<optional text>

Bar graph makes a simple colored bar graph within the cell. The

length of the bar is controlled using <percent>. You can

designate the color of the bar, and the color of the remainder

section. Due to the mysteries of HTML, you must designate a

width for the column with the [bar] tag using the HeadWidth parameter.

So if you had a percentage of 95, say 95% used disk you

would want to highlight the remainder for your report:

Example:

[bar:95;dark green;red]5% free

What if you were at 30% of a sales goal with only 2 weeks left in

the quarter, you would want to highlight that you have a problem.

Example:

[bar:30;darkred;red]30% of goal

.PARAMETER InputObject

The object you want converted to an HTML table

.PARAMETER HeadWidth

You can specify the width of a cell. Cell widths are in pixels

and are passed to the parameter in array format. Each element

in the array corresponds to the column in your table, any element

that is set to 0 will designate the column with be dynamic. If you had

four elements in your InputObject and wanted to make the 4th a fixed

width--this is required for using the [bar] tag--of 600 pixels:

-HeadWidth 0,0,0,600

.PARAMETER CSS

Designate custom CSS for your HTML

.PARAMETER Title

Specifies a title for the HTML file, that is, the text that appears between the <TITLE> tags.

.PARAMETER PreContent

Specifies text to add before the opening <TABLE> tag. By default, there is no text in that position.

.PARAMETER PostContent

Specifies text to add after the closing </TABLE> tag. By default, there is no text in that position.

.PARAMETER Body

Specifies the text to add after the opening <BODY> tag. By default, there is no text in that position.

.PARAMETER Fragment

Generates only an HTML table. The HTML, HEAD, TITLE, and BODY tags are omitted.

.INPUTS

System.Management.Automation.PSObject

You can pipe any .NET object to ConvertTo-AdvHtml.

.OUTPUTS

System.String

ConvertTo-AdvHtml returns series of strings that comprise valid HTML.

.EXAMPLE

$Data = @"

Server,Description,Status,Disk

[row:orchid]Server1,Hello1,[cellclass:up]Up,"[bar:45;Purple;Orchid]55% Free"

Server2,Hello2,[cell:green]Up,"[bar:65;DarkGreen;Green]65% Used"

Server3,Goodbye3,[cell:red]Down,"[bar:95;DarkGreen;DarkRed]5% Free"

server4,This is quite a cool test,[cell:green]Up,"[image:150;650;http://pughspace.files.wordpress.com/2014/01/test-connection.png]Test Images"

server5,SurlyAdmin,[cell:red]Down,"[link:http://thesurlyadmin.com]The Surly Admin"

server6,MoreSurlyAdmin,[cell:purple]Updating,"[linkpic:150;650;http://pughspace.files.wordpress.com/2014/01/test-connection.png]http://thesurlyadmin.com"

$Data = $Data | ConvertFrom-Csv

$HTML = $Data | ConvertTo-AdvHTML -HeadWidth 0,0,0,600 -PreContent "<p><h1>This might be the best report EVER</h1></p><br>" -PostContent "<br>Done! $(Get-Date)" -Title "Cool Test!"

This is some sample code where I try to put every possibile tag and use into a single set

of data. $Data is the PSObject 4 columns. Default CSS is used, so the [cellclass:up] tag

will not work but I left it there so you can see how to use it.

.NOTES

Author: Martin Pugh

Twitter: @thesurlyadm1n

Spiceworks: Martin9700

Blog: www.thesurlyadmin.com

Changelog:

1.0 Initial Release

.LINK

http://thesurlyadmin.com/convertto-advhtml-help/

.LINK

http://community.spiceworks.com/scripts/show/2448-create-advanced-html-tables-in-powershell-convertto-advhtml

#requires -Version 2.0

[CmdletBinding()]

Param (

[Parameter(Mandatory=$true,

ValueFromPipeline=$true)]

[Object[]]$InputObject,

[string[]]$HeadWidth,

[string[]]$HeadwidthPercent,

[string]$CSS = "",

[string]$CSS_old = @"

<style>

TABLE {border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse; width: 1000px;}

TH {border-width: 1px;padding: 3px;border-style: solid;border-color: black;background-color: #6495ED;font-size:120%;}

TD {border-width: 1px;padding: 3px;border-style: solid;border-color: black;}

</style>

"@,

[string]$Title,

[string]$PreContent,

[string]$PostContent,

[string]$Body,

[switch]$Fragment

)

Begin {

If ($Title)

{ $CSS += "`n<title>$Title</title>`n"

}

$Params = @{

Head = $CSS

}

If ($PreContent)

{ $Params.Add("PreContent",$PreContent)

}

If ($PostContent)

{ $Params.Add("PostContent",$PostContent)

}

If ($Body)

{ $Params.Add("Body",$Body)

}

If ($Fragment)

{ $Params.Add("Fragment",$true)

}

$Data = @()

}

Process {

ForEach ($Line in $InputObject)

{ $Data += $Line

}

End {

$Html = $Data | ConvertTo-Html -Fragment

$NewHTML = @()

ForEach ($Line in $Html)

{

If ($Line -like "*<table>*")

{

$Line = $Line.Replace('<table>', '<table width="' + $tableWidth + '">')

}

If ($Line -like "*<th>*")

{

If ($Headwidth)

{

$Index = 0

$Reg = $Line | Select-String -AllMatches -Pattern "<th>(.*?)<\/th>"

ForEach ($th in $Reg.Matches)

{

If ($Index -le ($HeadWidth.Count - 1))

{

If ($HeadWidth[$Index] -and $HeadWidth[$Index] -gt 0)

{

$Line = $Line.Replace($th.Value,"<th width=""$($HeadWidth[$Index])"" style=""width:$($HeadWidth[$Index])px"">$($th.Groups[1])</th>")

}

$Index ++

}

If ($HeadwidthPercent)

{ $Index = 0

$Reg = $Line | Select-String -AllMatches -Pattern "<th>(.*?)<\/th>"

ForEach ($th in $Reg.Matches)

{

If ($Index -le ($HeadwidthPercent.Count - 1))

{

If ($HeadwidthPercent[$Index] -and $HeadwidthPercent[$Index] -gt 0)

{

$Line = $Line.Replace($th.Value,"<th style=""width:$($HeadwidthPercent[$Index])%"">$($th.Groups[1])</th>")

}

$Index ++

}

Do {

Switch -regex ($Line)

{ "<td>\[cell:(.*?)\].*?<\/td>"

{

$Line = $Line.Replace("<td>[cell:$($Matches[1])]","<td style=""background-color:$($Matches[1])"">")

Break

}

"\[cellclass:(.*?)\]"

{ $Line = $Line.Replace("<td>[cellclass:$($Matches[1])]","<td class=""$($Matches[1])"">")

Break

}

"\[row:(.*?)\]"

{ $Line = $Line.Replace("<tr>","<tr style=""background-color:$($Matches[1])"">")

$Line = $Line.Replace("[row:$($Matches[1])]","")

Break

}

"\[rowclass:(.*?)\]"

{ $Line = $Line.Replace("<tr>","<tr class=""$($Matches[1])"">")

$Line = $Line.Replace("[rowclass:$($Matches[1])]","")

Break

}

"<td>\[bar:(.*?)\](.*?)<\/td>"

{ $Bar = $Matches[1].Split(";")

$Width = 100 - [int]$Bar[0]

If (-not $Matches[2])

{ $Text = " "

}

Else

{ $Text = $Matches[2]

}

$Line = $Line.Replace($Matches[0],"<td><div style=""background-color:$($Bar[1]);float:left;width:$($Bar[0])%"">$Text</div><div style=""background-color:$($Bar[2]);float:left;width:$width%""> </div></td>")

Break

}

"\[image:(.*?)\](.*?)<\/td>"

{ $Image = $Matches[1].Split(";")

$Line = $Line.Replace($Matches[0],"<img src=""$($Image[2])"" alt=""$($Matches[2])"" height=""$($Image[0])"" width=""$($Image[1])""></td>")

}

"\[link:(.*?)\](.*?)<\/td>"

{ $Line = $Line.Replace($Matches[0],"<a href=""$($Matches[1])"">$($Matches[2])</a></td>")

}

"\[linkpic:(.*?)\](.*?)<\/td>"

{ $Images = $Matches[1].Split(";")

$Line = $Line.Replace($Matches[0],"<a href=""$($Matches[2])""><img src=""$($Image[2])"" height=""$($Image[0])"" width=""$($Image[1])""></a></td>")

}

Default

{ Break

}

} Until ($Line -notmatch "\[.*?\]")

$NewHTML += $Line

}

Return $NewHTML

}

#endregion Functions

#region Execution

Import-Module DataProtectionManager

#region bodyTop

$bodyTop = @"

<body>

<tr>

<td style="width: 80%;border: none;" class="headerTable">System Center Data Protection Manager - Backup Report</td>

<td style="width: 20%;border: none;vertical-align:text-top;font-size:xx-small;text-align:right;padding: 2px 2px 2px 2px;" class="headerTable">SC DPM Version: <a href="https://buildnumbers.wordpress.com/scdpm/">$( ( get-wmiobject win32_product | where { $_.Name -match 'Data Protection Manager' } ).Version )</a></td>

</tr>

</table>

#endregion bodyTop

#region SubHead

#region Table Begin

$subHead01 = @"

<tr>

#endregion Table Begin

#region Table End

$subHead02 = @"

</td>

</tr>

</table>

#endregion Table End

#endregion SubHead

Connect-DPMServer -DPMServerName $DPMServerName

#region RecoveryPoints

$ProdServers = Get-DPMProductionServer

$DPMAlerts = Get-DPMAlert -IncludeAlerts AllActive

$Report = ''

$listRecoveryPoints = @()

$i = 0

$RecoveryPointErrors = 0

$DPMProtectionGroups = Get-DPMProtectionGroup

foreach ($DPMProtectionGroup in $DPMProtectionGroups)

{

$i++

Write-Progress -Activity "loop throught Protection Groups" -Status "Server $($DPMProtectionGroup.Name) $i / $($DPMProtectionGroups.Count)" -PercentComplete ( $i / $DPMProtectionGroups.Count * 100) -Id 0

$DataSources = $DPMProtectionGroup.GetDatasources()

# $DataSources | Out-GridView

Write-Verbose "Loop through each available DataSource"

$j = 0

foreach ($DataSource in $DataSources)

{

$j++

Write-Progress -Activity "loop throught Data Sources" -Status "DataSource $($DataSource.Name) $j / $($DataSources.Count)" -PercentComplete ( $j / $DataSources.Count * 100) -Id 1 -ParentId 0

Write-Verbose "Get a list of RecoveryPoints for each DataSource"

$RecoveryPoints = Get-RecoveryPoint -Datasource $DataSource

$RecoveryPointsOnline = Get-RecoveryPoint -Datasource $DataSource -Online

$DPMAlert = ''

$DPMAlert = ( $DPMAlerts | where { $_.Server -eq $DataSource.ProductionServerName -and $_.AffectedArea -eq $DataSource.Name } ).ErrorInfo.ShortProblem -join ', '

if ( $DPMAlert -ne '' )

{

$DPMAlert = "[cell:$colorRed]$DPMAlert"

$RecoveryPointErrors++

}

if ( @($RecoveryPoints).Count -ne 0 )

{

$LastPoint = Get-Date ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime ) -Format "dd.MM.yyyy HH:mm:ss"

if ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeOK ) )

{

$LastPoint = "[cell:$colorGreen]$LastPoint"

} elseif ( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeWarning ) ) {

$LastPoint = "[cell:$colorYellow]$LastPoint"

} else {

$LastPoint = "[cell:$colorRed]$LastPoint"

}

} else {

$LastPoint = "[cell:$colorRed]never"

}

if ( $DataSource.IsPresentOnCloud )

{

if ( @($RecoveryPointsOnline).Count -ne 0 )

{

$LastPointOnline = Get-Date ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime ) -Format "dd.MM.yyyy HH:mm:ss"

if ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeOK ) )

{

$LastPointOnline = "[cell:$colorGreen]$LastPointOnline"

} elseif ( ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -Last 1 ).RepresentedPointInTime -gt ( Get-Date ).AddDays( 0 - $RecoveryPointAgeWarning ) ) {

$LastPointOnline = "[cell:$colorYellow]$LastPointOnline"

} else {

$LastPointOnline = "[cell:$colorRed]$LastPointOnline"

}

} else {

$LastPointOnline = "[cell:$colorRed]never"

}

} else {

$LastPointOnline = "not configured"

}

$LineItem = New-Object -TypeName PSobject -Property @{

"Recovery Points" = @( $RecoveryPoints ).Count

"First Point" = ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -First 1 ).RepresentedPointInTime

"Last Point" = $LastPoint

"Size GB" = [int]( ( $RecoveryPoints | Sort-Object RepresentedPointInTime | Select -Last 1 ).Size / 1GB * 100 ) / 100

"Cloud Recovery Points" = @( $RecoveryPointsOnline ).Count

"Cloud First Point" = ( $RecoveryPointsOnline | Sort-Object RepresentedPointInTime | Select -First 1 ).RepresentedPointInTime

"Cloud Last Point" = $LastPointOnline

"Cloud Size GB" = $CloudSize

Server = "[cellclass:overflowhidden]$($DataSource.ProductionServerName)"

Name = "[cellclass:overflowhidden]$($DataSource.Name -replace "_", "_ ")"

"Protection Group" = $DataSource.ProtectionGroup.Name

"Object Type" = $DataSource.ObjectType

Alerts = $DPMAlert

Activity = $DataSource.Activity

State = $DataSource.State

}

$listRecoveryPoints += $LineItem

}

$ReportRecoveryPoints = $listRecoveryPoints | Sort-Object Server, Name | Select Server, Name, "Object Type", "Protection Group", "Recovery Points", "First Point", "Last Point", "Size GB", "Cloud Recovery Points", "Cloud First Point", "Cloud Last Point", Alerts | ConvertTo-AdvHTML -HeadWidth 72,146,72,72,72,72,72,52,52,72,72,137 -Fragment

$ReportRecoveryPoints = $subHead01 + "Recovery Points" + $subHead02 + $ReportRecoveryPoints

Write-Progress -Activity "loop throught Data Sources" -Status "completed" -id 1 -Completed

Write-Progress -Activity "loop throught Protection Groups" -Status "completed" -id 0 -Completed

#endregion RecoveryPoints

#region AgentStatus

if ( $showAgentStatus -eq $true )

{

$AgentStatus = @()

$i = 0

foreach ($ProdServer in $ProdServers)

{

$i++

Write-Progress -Activity "Update Agent Status" -Status "Agent $($ProdServer.ServerName) $i / $($ProdServers.Count)" -PercentComplete ( $i / $ProdServers.Count * 100)

Update-DPMProductionServer -ProductionServer $ProdServer -ErrorAction SilentlyContinue

}

$ProdServers = Get-DPMProductionServer

$i = 0

foreach ($ProdServer in $ProdServers)

{

$i++

Write-Progress -Activity "Update Agent Status" -Status "Agent $($ProdServer.ServerName) $i / $($ProdServers.Count)" -PercentComplete ( $i / $ProdServers.Count * 100)

if ( $ProdServer.ServerProtectionState -ne 'Deleted' -or $showAgentsDeleted -eq $true )

{

switch ($ProdServer.Connectivity.Status)

{

'OK' { $ServerConnectivity = "[cell:$colorGreen]OK" }

'Error' { $ServerConnectivity = "[cell:$colorRed]Error" }

'Unavailable' { $ServerConnectivity = "[cell:$colorRed]Unavailable" }

'Restart pending' { $ServerConnectivity = "[cell:$colorYellow]Restart pending" }

Default { $ServerConnectivity = "[cell:$colorYellow]$($ProdServer.Connectivity)" }

}

if ($ProdServer.UpgradeAvailable -eq $true)

{

$UpgradeAvailable = "[cell:$colorYellow]Yes"

} else {

$UpgradeAvailable = "[cell:$colorGreen]No"

}

$IsThrottled = $ProdServer.IsThrottled

switch ($ProdServer.ServerProtectionState)

{

'HasDatasourcesProtected' {

$ServerProtectionState = "[cell:$colorGreen]has Datasources protected"

}

'Deleted' {

$ServerProtectionState = "[cell:$colorGray]deleted"

$ServerConnectivity = "[cell:$colorGray]"

$UpgradeAvailable = "[cell:$colorGray]"

$IsThrottled = "[cell:$colorGray]"

}

'NoDatasourcesProtected' { $ServerProtectionState = "[cell:$colorRed]no Datasources protected" }

}

$AgentStatus += New-Object -TypeName PSObject -Property @{

"Server Name" = $ProdServer.MachineName

"Protection State" = $ServerProtectionState

"Connectivity" = $ServerConnectivity

"Upgrade Available" = $UpgradeAvailable

IsThrottled = $IsThrottled

}

$ReportAgentStatus = $AgentStatus | select "Server Name", "Protection State", Connectivity, "Upgrade Available", IsThrottled | Sort-Object "Server Name" | ConvertTo-AdvHTML -HeadWidth 197,197,197,197,196 -Fragment

$ReportAgentStatus = $subHead01 + "Agents" + $subHead02 + $ReportAgentStatus

} else {

$ReportAgentStatus = ''

}

Write-Progress -Activity "Update Agent Status" -Status "completed" -id 0 -Completed

#endregion AgentStatus

#region DiskStatus

if ( $showDisks -eq $true )

{

$DPMDisks = Get-DPMDisk | where { $_.IsInStoragePool -eq $true }

$ReportDisks = @()

foreach ($DPMDisk in $DPMDisks)

{

$percent = @( ( ( $DPMDisk.TotalCapacity - $DPMDisk.UnallocatedSpace ) / $DPMDisk.TotalCapacity * 100 ) -split "\." )[0]

if ( $percent -le 70 )

{

$barcolor = $colorGreen

} elseif ( $percent -le 90 ) {

$barcolor = $colorYellow

} else {

$barcolor = $colorRed

}

$percentUsed = "[bar:$( $percent + 1 );$barcolor;#FFFFFF]$( $percent.ToString() ) % used"

$ReportDisks += New-Object -TypeName PSObject -Property @{

Name = "Disk $($DPMDisk.NtDiskId) ($($DPMDisk.Name))"

Capacity = $DPMDisk.TotalCapacityLabel

'Free Space' = $DPMDisk.UnallocatedSpaceLabel

'Disk Status' = $DPMDisk.DiskStatus

'Percent Used' = $percentUsed

}

$ReportDisks += New-Object -TypeName PSObject -Property @{

Name = "Total"

Capacity = ( ( ( $DPMDisks | Measure-Object TotalCapacity -Sum ).Sum / 1GB ) -split "\." )[0] + " GB"

'Free Space' = ( ( ( $DPMDisks | Measure-Object UnallocatedSpace -Sum ).Sum / 1GB ) -split "\." )[0] + " GB"

'Disk Status' = ''

'Percent Used' = ''

}

# $ReportDisks = $ReportDisks | Select Name, Capacity, 'Free Space', 'Percent Used', 'Disk Status' | ConvertTo-AdvHTML -HeadWidth 197,197,197,197,196 -Fragment

$ReportDisks = $ReportDisks | Select Name, Capacity, 'Free Space', 'Disk Status' | ConvertTo-AdvHTML -HeadWidth 397,197,197,196 -Fragment

$ReportDisks = $subHead01 + "Disks" + $subHead02 + $ReportDisks

} else {

$ReportDisks = ''

}

#endregion DiskStatus

#region Jobs in Progress

if ( $showJobsInProgress -eq $true )

{

$DPMJobsInProgress = Get-DPMJob -Status InProgress -DPMServerName $DPMServerName

# $DPMJobsInProgress.Count

$DPMJobsTasks = @()

foreach ( $DPMJobInProgress in $DPMJobsInProgress )

{

foreach ( $DPMJobTask in $DPMJobInProgress.TaskList )

{

# $DPMJobsTasks += $DPMJobTask

if ( $DPMJobTask.StartTime -eq (Get-Date "01.01.0001") )

{

$timeElapsed = New-TimeSpan -Start $DPMJobTask.CreatedTime -End ( Get-Date )

$timeElapsed = @( ( "{0:G}" -f $timeElapsed ) -split "\." )[0]

$StartTime = ''

} else {

$timeElapsed = New-TimeSpan -Start $DPMJobTask.StartTime -End ( Get-Date )

$timeElapsed = @( ( "{0:G}" -f $timeElapsed ) -split "\." )[0]

$StartTime = $DPMJobTask.StartTime

}

$DPMJobsTasks += New-Object -TypeName PSObject -Property @{

Created = $DPMJobTask.CreatedTime

'Start Time' = $StartTime

'Time Elapsed' = $timeElapsed

Status = $DPMJobTask.Status

Type = $DPMJobTask.Type

Server = $DPMJobTask.ProductionServerName

Transfered = "$( [int]($DPMJobInProgress.DataSize / 1GB * 100) / 100 ) GB"

Path = "[cellclass:overflowhidden]$($DPMJobTask.DatasourcePath)"

Error = $DPMJobTask.ErrorInfo.ShortProblem

}

$ReportJobsTasks = $DPMJobsTasks | Select Created, 'Start Time', 'Time Elapsed', Status, Transfered, Type, Server, Path | ConvertTo-AdvHTML -HeadWidth 117,117,117,187,97,97,147,96 -Fragment

$ReportJobsTasks = $subHead01 + "Jobs in Progress" + $subHead02 + $ReportJobsTasks

} else {

$ReportJobsTasks = ''

}

#endregion Jobs in Progress

#region Jobs Failed

if ( $showJobsFailed -eq $true )

{

$DPMJobsFailed = Get-DPMJob -Status Failed -From ( Get-Date ( ( Get-Date ).AddDays( -1 ) ) -Format "dd.MM.yyyy" )

$DPMJobsFailedTasks = @()

foreach ( $DPMJobFailed in $DPMJobsFailed )

{

# $DPMJobFailed = $DPMJobsFailed[0]

foreach ( $DPMJobTask in $DPMJobFailed.TaskList )

{

# $DPMJobsFailedTasks += $DPMJobTask

$DPMJobsFailedTasks += New-Object -TypeName PSObject -Property @{

Created = $DPMJobTask.CreatedTime

'Start Time' = $DPMJobTask.StartTime

'End Time' = $DPMJobTask.EndTime

Status = $DPMJobTask.Status

Type = $DPMJobTask.Type

Server = $DPMJobTask.ProductionServerName

Path = "[cellclass:overflowhidden]$($DPMJobTask.DatasourcePath)"

Error = $DPMJobTask.ErrorInfo.ShortProblem

}

$ReportJobsTasksFailed = $DPMJobsFailedTasks | Select Created, 'Start Time', 'End Time', Status, Type, Server, Path, Error | ConvertTo-AdvHTML -HeadWidth 117,117,117,77,97,147,97,206 -Fragment

$ReportJobsTasksFailed = $subHead01 + "Failed Jobs for yesterday and today" + $subHead02 + $ReportJobsTasksFailed

} else {

$ReportJobsTasksFailed = ''

}

#endregion Jobs Failed

#region Azure

Import-Module MSOnlineBackup

$OBMachineUsage = [int]( ( Get-OBMachineUsage ).StorageUsedByMachineInBytes / 1GB * 100) / 100

$ReportAzure = @"

<tr>

<td>

Total Space used in Azure:

</td>

<td>

$OBMachineUsage GB

</td>

</tr>

</table>

$ReportAzure = $subHead01 + "Azure Backup" + $subHead02 + $ReportAzure

#endregion Azure

#region Overall-State

if (

( $RecoveryPointErrors -ne 0 ) -or `

( @( $ProdServers | where { $_.Connectivity -eq 'Error' } ).Count -ne 0 ) -or `

( @( $ProdServers | where { $_.Connectivity -eq 'Unavailable' } ).Count -ne 0 )

) {

$StateColor = $colorRed

$OverAllState = 'Failed'

} elseif (

(@( $AgentStatus | where { $_."Upgrade Available" -match 'Yes' } ).Count -ne 0 ) -or `

(@( $ProdServers | where { $_.Connectivity.Status -eq 'RebootRequired' } ).Count -ne 0 ) -or `

(@( $ProdServers | where { $_.Connectivity.Status -eq 'Unknown' } ).Count -ne 0 )

) {

$StateColor = $colorYellow

$OverAllState = 'Warning'

} else {

$StateColor = $colorGreen

$OverAllState = 'Success'

}

#endregion Overall-State

#region Header

$headerObj = @"

<html>

<head>

<title>$emailSubject</title>

<style>

body {font-family: Tahoma; background-color:#fff;width: 1000px;}

h1.top {background-color: #fb9895;color: White;font-weight: bold;font-size: 16px;vertical-align: center;padding: 5px;}

table {font-family: Tahoma;font-size: 12px;background-color: #e3e3e3;width:$($tableWidth)px;border-collapse:collapse; table-layout: fixed;}

.headerTable{background-color: $StateColor ;color: White;font-weight: bold;font-size: 16px;height: 70px;vertical-align: bottom;padding: 0 0 15px 15px;border-bottom: none;}

.subheader{height: 35px;background-color: #f3f4f4;font-size: 16px;vertical-align: middle;padding: 5px 0 0 15px;color: #626365;}

table.inner tr{height: 17px;}

table.inner td{padding: 2px 2px 2px 2px;vertical-align: top;border: 1px solid #a7a9ac; }

table.inner .subheader{height: 35px;background-color: #f3f4f4;font-size: 16px;vertical-align: middle;padding: 5px 0 0 15px;color: #626365;}

td.overflowhidden { overflow: hidden; }

th {border: 1px solid #a7a9ac;border-bottom: none;}

tr {height: 17px;}

td {background-color: #fff;border: 1px solid #a7a9ac;padding: 2px 2px 2px 2px;vertical-align: top;}

</style>

</head>

#endregion Header

#region Footer

$bodyScript = @"

<tr><td>This report was generated by Script <b>$( $MyInvocation.InvocationName )</b> on Server <b>$env:computername</b></td></tr>

</table>

#endregion Footer

#region composite Output

$htmlOutput = $headerObj + `

$bodyTop + `

$ReportRecoveryPoints + `

$ReportJobsTasks + `

$ReportJobsTasksFailed + `

$ReportAgentStatus + `

$ReportDisks + `

$ReportAzure + `

$footerObj + `

$bodyScript

#endregion composite Output

#region Output

if ($sendEmail -eq $true)

{

$emailSubject = "$emailSubjectPrefix [$OverAllState] $emailSubject"

Send-MailMessage -To $emailTo -From $emailFrom -Subject $emailSubject -Body $htmlOutput -BodyAsHTML -SmtpServer $emailHost

}

if ( $saveHTML -eq $true )

{

$htmlOutput | Out-File $file

# [Reflection.Assembly]::LoadWithPartialName("System.Xml.Linq")

# [System.Xml.Linq.XDocument]::Load($file).Save($file)

Invoke-Expression $file

}

#endregion

#endregion Execution

#region ScriptEnd

Write-Host "`r`n Ended at $(get-date)"

Write-Host "`r`n Total Elapsed Time: $($elapsed.Elapsed.ToString())"

#endregion ScriptEnd

document your SCOM 2012 environment

30. March 201711. April 2014 by Burkard Josh

This is quite huge for me, because I’ve been working on this script for the last two months and finally decided, to release the script to public, although I know that it’s still far from complete.

Document your Operations Manager 2012 environment

You should know your environment and what happens in it and you should be able to show people what exactly has been configured in your environment. This is quite important for consultants, but also for admins. Consultants need to create a documentation after implementing Operations Manager 2012 at a costumer’s site and admins should be able to know how their environment looks like at any given time.

Usually people ‘only’ document the most important stuff or what they think is the most important stuff. Every documentation looks different and my believe is that it shouldn’t be that way. I’d like to have my documentations all look the same, no matter where I create them.

Like automation, I like standardization. That’s why, i created a PowerShell script for create my “SCOM 2012 configuration Report”.

Here is a preview of the report:

Powershell cmdlets for Operations Manager 2012

Before I started to write this script I asked myself if I wanted to use WMI only or also the OM12 native cmdlets for Powershell. Both Technologies have their own Advantages and disadvantages.

This is a script that will ONLY get you information, it won’t change anything in your environment, that’s why I decided to use the Powershell cmdlets wherever possible and to avoid using WMI.

Version 0.1

I rate this script at version 0.1, because there are still some things missing. They will be added in time.

Maybee you will find some problems. tell me and I will try to correct them.

Requirements

In order to run this script the following requirements have to be met:

Microsoft System Center 2012 Configuration Manager SP1 (at least)
Powershell 3.0
installed Operations Manager Admin GUI
read-access to the RMS
read-Access to all involved SCOM servers
Microsoft Word (best with an English installation)

How to execute the script

I added a comment-based help to the script, so you shouldn’t have any problems running it, but here’s one way to execute the script:

.\SCOM-configuration-Report.ps1 -SCOMServer <servername>

1	.\SCOM-configuration-Report.ps1 -SCOMServer <servername>

Thanks

Thanks also to David, which gives me the idea of this script and has also a wonderful Inventory Script for SCCM here.

I’m hoping for lots of feedback on this script, because I can’t possibly test everything in my demo lab. So if you find an error or have issues with this script, please tell me!

Download the script here:

SCOM-configuration-report-v0.1.0.zip size: 22.8 kB, counter: 1042, updated: 11. April 2014

demoted Domain Controller still present in SCOM

24. February 201424. February 2014 by Burkard Josh

If you demote a Domain Controller, SCOM will generate a lot of alerts. By design, there is no automatically undiscovery for the Rules and Monitores for the Active Directory Roles.

Solution 1

This solution will remove all disabled Class instances from an existing object. it will not change any other properties of the object.

Open the Operations Management Shell
type in this command:

Remove-SCOMDisabledClassInstance -ComputerName <Demoted Server>

1	Remove-SCOMDisabledClassInstance -ComputerName <Demoted Server>

Stop the System Center Management service
Delete the folder C:\Program Files\System Center Operations Manager\Agent\Health Service State
Start the System Center Management service

Solution 2

This solution will clear only the agent cache. Sometime this will be sufficient, if the server discovery / undiscovery was already done well:

Stop the System Center Management service
Delete the folder C:\Program Files\System Center Operations Manager\Agent\Health Service State
Start the System Center Management service

Solution 3

This solution will remove the entire object and then recreate the object with it’s discovery. The new object wouldn’t be discovered as Domain Controller. The new object will have an new guid and any overwrites to the old object will be lost.

Stop the System Center Management service

Delete the folder C:\Program Files\System Center Operations Manager\Agent\Health Service State

Open the SCOM console

go to AdministrationÂ â†’ Agent Managed
delete the affected server
use the Discovery Wizard to redeploy the agent to the affected server

Share this:

Share this:

using PowerShell modules

Share this:

Share this:

Share this:

Share this:

Share this:

Share this:

Document your Operations Manager 2012 environment

Powershell cmdlets for Operations Manager 2012

Version 0.1

Requirements

How to execute the script

Thanks

Share this:

Solution 1

Solution 2

Solution 3

Share this: