MSFT_BizTalkServer.psm1
|
Import-Module PSDesiredStateConfiguration enum Ensure { Absent Present } enum HostType { InProcess Isolated } [DscResource()] class BizTalkServerHost { [DscProperty(Key)] [string]$Name [DscProperty(Mandatory)] [bool] $Trusted [DscProperty(Mandatory)] [bool] $Tracking [DscProperty(Mandatory)] [HostType] $Type [DscProperty(Mandatory)] [bool] $Is32Bit [DscProperty(Mandatory)] [bool] $Default [DscProperty(Mandatory)] [string] $WindowsGroup [DscProperty(Mandatory)] [Ensure] $Ensure [string] $namespace = 'ROOT\MicrosoftBizTalkServer' [void] Set() { if($this.Ensure -eq [Ensure]::Present) { $properties = @{ Name = $this.Name; AuthTrusted = $this.Trusted; HostTracking = $this.Tracking; HostType = &{if($this.Type -eq [HostType]::Inprocess) {1} else {2}}; IsDefault = $this.Default; IsHost32BitOnly = $this.Is32Bit; NTGroupName = $this.WindowsGroup; MgmtDbServerOverride = ''; MgmtDbNameOverride = '' } $instanceClass = Get-CimClass -ClassName MSBTS_HostSetting -Namespace $this.namespace $instance = New-CimInstance -CimClass $instanceClass -Property $properties Set-CimInstance -InputObject $instance } else { $query = "SELECT * FROM MSBTS_HostSetting WHERE Name='$($this.Name)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace if($null -ne $instance) { Remove-CimInstance -InputObject $instance } } } [bool] Test() { $query = "SELECT * FROM MSBTS_HostSetting WHERE Name='$($this.Name)'" Write-Verbose "Ensure : $($this.Ensure)" Write-Verbose "Namespace : $($this.namespace)" Write-Verbose "Query: $query" $instance = Get-CimInstance -Query $query -Namespace $this.namespace if($this.Ensure -eq [Ensure]::Present) { $result = ($null -ne $instance) } else { $result = ($null -eq $instance) } Write-Verbose "Test: $result" return $result } [BizTalkServerHost] Get() { $result = $this.Test() if($result) { return $this } else { return $null } } } [DscResource()] class BizTalkServerHostInstance { [DscProperty(Key)] [string]$Host [DscProperty(Mandatory)] [pscredential] $Credentials [DscProperty(Mandatory)] [Ensure] $Ensure [string] $namespace = 'ROOT\MicrosoftBizTalkServer' [void] Set() { if($this.Ensure -eq [Ensure]::Present){ Write-Verbose "Create MSBTS_ServerHost $($this.Host)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_ServerHost $properties = @{ ServerName = $($env:COMPUTERNAME); HostName = $($this.Host); MgmtDbNameOverride=''; MgmtDbServerOverride=''; } $instance = New-CimInstance -CimClass $instanceClass -Property $properties -ClientOnly $arguments = @{} Invoke-CimMethod -InputObject $instance -MethodName Map -Arguments $arguments Write-Verbose "Create MSBTS_HostInstance $($this.Host)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_HostInstance $name = "Microsoft BizTalk Server $($this.Host) $($env:COMPUTERNAME)" $properties = @{ Name =$name; MgmtDbNameOverride=''; MgmtDbServerOverride=''; } $instance = New-CimInstance -CimClass $instanceClass -Property $properties -ClientOnly $user = $this.Credentials.UserName $password = $this.Credentials.GetNetworkCredential().Password $arguments = @{ GrantLogOnAsService = $true; Logon = $user; Password = $password; } Invoke-CimMethod -InputObject $instance -MethodName Install -Arguments $arguments } else{ $query = "SELECT * FROM MSBTS_HostInstance WHERE HostName='$($this.Host)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace Write-Verbose "Find MSBTS_HostInstance $($this.Host)" $arguments = @{} if($null -ne $instance){ if($instance.ServiceState =eq 4){ Write-Verbose "Stop MSBTS_HostInstance $($this.Host)" Invoke-CimMethod -InputObject $instance -MethodName Stop -Arguments $arguments } Write-Verbose "UnInstall MSBTS_HostInstance $($this.Host)" Invoke-CimMethod -InputObject $instance -MethodName UnInstall -Arguments $arguments } Write-Verbose "UnMap MSBTS_ServerHost $($this.Host)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_ServerHost $properties = @{ ServerName = $($env:COMPUTERNAME); HostName = $($this.Host); MgmtDbNameOverride=''; MgmtDbServerOverride=''; } $instance = New-CimInstance -CimClass $instanceClass -Property $properties -ClientOnly Invoke-CimMethod -InputObject $instance -MethodName ForceUnmap -Arguments $arguments } } [bool] Test() { $query = "SELECT * FROM MSBTS_HostInstance WHERE HostName='$($this.Host)'" Write-Verbose "Ensure : $($this.Ensure)" Write-Verbose "Namespace : $($this.namespace)" Write-Verbose "Query: $query" $instance = Get-CimInstance -Query $query -Namespace $this.namespace if($this.Ensure -eq [Ensure]::Present){ $result = ($null -ne $instance) } else{ $result = ($null -eq $instance) } Write-Verbose "Test: $result" return $result } [BizTalkServerHostInstance] Get() { $result = $this.Test() if($result){ return $this } else{ return $null } } } [DscResource()] class BizTalkServerAdapter{ [DscProperty(Key)] [string]$Name [DscProperty()] [string] $Comment [DscProperty(Mandatory)] [string] $MgmtCLSID [DscProperty()] [int] $Constraints [DscProperty(Mandatory)] [Ensure] $Ensure [string] $namespace = 'ROOT\MicrosoftBizTalkServer' [void] Set() { if($this.Ensure -eq [Ensure]::Present){ Write-Verbose "Create MSBTS_AdapterSetting $($this.Name)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_AdapterSetting $properties = @{ Name = $($this.Name); Constraints = &{if($this.Constraints -gt 0) {$this.Constraints} else {0}}; Comment = $this.Comment; MgmtCLSID = $this.MgmtCLSID; } $instance = New-CimInstance -CimClass $instanceClass -Property $properties Set-CimInstance -InputObject $instance } else{ $query = "SELECT * FROM MSBTS_AdapterSetting WHERE Name='$($this.Name)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace Write-Verbose "Find MSBTS_AdapterSetting $($this.Name)" $arguments = @{} if($null -ne $instance){ Write-Verbose "Remove MSBTS_HostAdapterSetting $($this.Name)" Remove-CimInstance -InputObject $instance } } } [bool] Test() { $query = "SELECT * FROM MSBTS_AdapterSetting WHERE Name='$($this.Name)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace $this.Comment = $instance.Comment $this.Constraints = $instance.Class $this.MgmtCLSID = $instance.MgmtCLSID if($this.Ensure -eq [Ensure]::Present){ $result = ($null -ne $instance) } else{ $result = ($null -eq $instance) } Write-Verbose "Test: $result" return $result } [BizTalkServerAdapter] Get() { $result = $this.Test() if($result){ return $this } else{ return $null } } } [DscResource()] class BizTalkServerSendHandler{ [DscProperty(Key)] [string]$Adapter [DscProperty(Key)] [string] $Host [DscProperty(Mandatory)] [bool] $Default [DscProperty(Mandatory)] [Ensure] $Ensure [string] $namespace = 'ROOT\MicrosoftBizTalkServer' [void] Set() { if($this.Ensure -eq [Ensure]::Present){ Write-Verbose "Create MSBTS_SendHandler2 $($this.Adapter) on $($this.Host)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_SendHandler2 $properties = @{ AdapterName = $this.Adapter; HostName = $this.Host; IsDefault = $this.Default; MgmtDbNameOverride = ''; MgmtDbServerOverride = ''; CustomCfg = '' } $instance = New-CimInstance -CimClass $instanceClass -Property $properties Set-CimInstance -InputObject $instance } else{ $query = "SELECT * FROM MSBTS_SendHandler2 WHERE AdapterName='$($this.Adapter)' AND HostName = '$($this.Host)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace Write-Verbose "Find MSBTS_SendHandler2 $($this.Adapter) on $($this.Host)" if($null -ne $instance){ Write-Verbose "Remove MSBTS_SendHandler2 $($this.Adapter) on $($this.Host)" Remove-CimInstance -InputObject $instance } } } [bool] Test() { $query = "SELECT * FROM MSBTS_SendHandler2 WHERE AdapterName='$($this.Adapter)' AND HostName = '$($this.Host)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace $this.Default = $instance.IsDefault if($this.Ensure -eq [Ensure]::Present){ $result = ($null -ne $instance) } else{ $result = ($null -eq $instance) } Write-Verbose "Test: $result" return $result } [BizTalkServerSendHandler] Get() { $result = $this.Test() if($result){ return $this } else{ return $null } } } [DscResource()] class BizTalkServerReceiveHandler{ [DscProperty(Key)] [string]$Adapter [DscProperty(Key)] [string] $Host [DscProperty(Mandatory)] [Ensure] $Ensure [string] $namespace = 'ROOT\MicrosoftBizTalkServer' [void] Set() { if($this.Ensure -eq [Ensure]::Present){ Write-Verbose "Create MSBTS_ReceiveHandler $($this.Adapter) on $($this.Host)" $instanceClass = Get-CimClass -Namespace $this.namespace –ClassName MSBTS_ReceiveHandler $properties = @{ AdapterName = $this.Adapter; HostName = $this.Host; MgmtDbNameOverride = ''; MgmtDbServerOverride = ''; CustomCfg = '' } $instance = New-CimInstance -CimClass $instanceClass -Property $properties Set-CimInstance -InputObject $instance } else{ $query = "SELECT * FROM MSBTS_ReceiveHandler WHERE AdapterName='$($this.Adapter)' AND HostName = '$($this.Host)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace Write-Verbose "Find MSBTS_SendHandler2 $($this.Adapter) on $($this.Host)" if($null -ne $instance){ Write-Verbose "Remove MSBTS_ReceiveHandler $($this.Adapter) on $($this.Host)" Remove-CimInstance -InputObject $instance } } } [bool] Test() { $query = "SELECT * FROM MSBTS_ReceiveHandler WHERE AdapterName='$($this.Adapter)' AND HostName = '$($this.Host)'" $instance = Get-CimInstance -Query $query -Namespace $this.namespace if($this.Ensure -eq [Ensure]::Present){ $result = ($null -ne $instance) } else{ $result = ($null -eq $instance) } Write-Verbose "Test: $result" return $result } [BizTalkServerReceiveHandler] Get() { $result = $this.Test() if($result){ return $this } else{ return $null } } } |