DSCResources/MSFT_EXOMailboxSettings/MSFT_EXOMailboxSettings.psm1
|
function Get-TargetResource { [CmdletBinding()] [OutputType([System.Collections.Hashtable])] param ( [Parameter(Mandatory = $true)] [System.String] $DisplayName, [Parameter()] [System.String] $TimeZone, [Parameter()] [System.String] $Locale, [Parameter()] [ValidateSet("Present")] [System.String] $Ensure = "Present", [Parameter(Mandatory = $true)] [System.Management.Automation.PSCredential] $GlobalAdminAccount ) Write-Verbose -Message "Getting configuration of Office 365 Mailbox Settings for $DisplayName" #region Telemetry $data = [System.Collections.Generic.Dictionary[[String], [String]]]::new() $data.Add("Resource", $MyInvocation.MyCommand.ModuleName) $data.Add("Method", $MyInvocation.MyCommand) Add-M365DSCTelemetryEvent -Data $data #endregion $nullReturn = @{ DisplayName = $DisplayName TimeZone = $null Locale = $null Ensure = "Absent" } Test-MSCloudLogin -CloudCredential $GlobalAdminAccount ` -Platform ExchangeOnline try { $mailboxSettings = Get-MailboxRegionalConfiguration -Identity $DisplayName -ErrorAction Stop } catch { return $nullReturn } if ($null -eq $mailboxSettings) { Write-Verbose -Message "The specified Mailbox doesn't already exist." return $nullReturn } $result = @{ DisplayName = $DisplayName TimeZone = $mailboxSettings.TimeZone Locale = $mailboxSettings.Language.Name Ensure = "Present" GlobalAdminAccount = $GlobalAdminAccount } Write-Verbose -Message "Found an existing instance of Mailbox '$($DisplayName)'" return $result } function Set-TargetResource { [CmdletBinding()] param ( [Parameter(Mandatory = $true)] [System.String] $DisplayName, [Parameter()] [System.String] $TimeZone, [Parameter()] [System.String] $Locale, [Parameter()] [ValidateSet("Present")] [System.String] $Ensure = "Present", [Parameter(Mandatory = $true)] [System.Management.Automation.PSCredential] $GlobalAdminAccount ) Write-Verbose -Message "Setting configuration of Office 365 Mailbox Settings for $DisplayName" #region Telemetry $data = [System.Collections.Generic.Dictionary[[String], [String]]]::new() $data.Add("Resource", $MyInvocation.MyCommand.ModuleName) $data.Add("Method", $MyInvocation.MyCommand) Add-M365DSCTelemetryEvent -Data $data #endregion Test-MSCloudLogin -CloudCredential $GlobalAdminAccount ` -Platform ExchangeOnline $currentMailbox = Get-TargetResource @PSBoundParameters # CASE: Mailbox doesn't exist but should; if ($Ensure -eq "Present" -and $currentMailbox.Ensure -eq "Absent") { throw "The specified mailbox {$($DisplayName)} does not exist." } $AllowedTimeZones = (Get-ChildItem "HKLM:\Software\Microsoft\Windows NT\CurrentVersion\Time zones" | ` ForEach-Object { Get-ItemProperty $_.PSPath }).PSChildName if ($AllowedTimeZones.Contains($TimeZone) -eq $false) { throw "The specified Time Zone {$($TimeZone)} is not valid." } Set-MailboxRegionalConfiguration -Identity $DisplayName ` -Language $Locale ` -TimeZone $TimeZone } function Test-TargetResource { [CmdletBinding()] [OutputType([System.Boolean])] param ( [Parameter(Mandatory = $true)] [System.String] $DisplayName, [Parameter()] [System.String] $TimeZone, [Parameter()] [System.String] $Locale, [Parameter()] [ValidateSet("Present")] [System.String] $Ensure = "Present", [Parameter(Mandatory = $true)] [System.Management.Automation.PSCredential] $GlobalAdminAccount ) Write-Verbose -Message "Testing configuration of Office 365 Mailbox Settings for $DisplayName" $CurrentValues = Get-TargetResource @PSBoundParameters Write-Verbose -Message "Current Values: $(Convert-M365DscHashtableToString -Hashtable $CurrentValues)" Write-Verbose -Message "Target Values: $(Convert-M365DscHashtableToString -Hashtable $PSBoundParameters)" $TestResult = Test-Microsoft365DSCParameterState -CurrentValues $CurrentValues ` -Source $($MyInvocation.MyCommand.Source) ` -DesiredValues $PSBoundParameters ` -ValuesToCheck @("Ensure", ` "DisplayName", ` "TimeZone", ` "Locale") Write-Verbose -Message "Test-TargetResource returned $TestResult" return $TestResult } function Export-TargetResource { [CmdletBinding()] [OutputType([System.String])] param ( [Parameter(Mandatory = $true)] [System.Management.Automation.PSCredential] $GlobalAdminAccount ) $InformationPreference = 'Continue' #region Telemetry $data = [System.Collections.Generic.Dictionary[[String], [String]]]::new() $data.Add("Resource", $MyInvocation.MyCommand.ModuleName) $data.Add("Method", $MyInvocation.MyCommand) Add-M365DSCTelemetryEvent -Data $data #endregion Test-MSCloudLogin -CloudCredential $GlobalAdminAccount ` -Platform ExchangeOnline $mailboxes = Get-Mailbox -ResultSize 'Unlimited' $i = 1 $content = '' foreach ($mailbox in $mailboxes) { Write-Information " [$i/$($mailboxes.Length)] $($mailbox.Name)" $mailboxName = $mailbox.Name if (![System.String]::IsNullOrEmpty($mailboxName)) { $params = @{ GlobalAdminAccount = $GlobalAdminAccount DisplayName = $mailboxName } $result = Get-TargetResource @params if ($result.Ensure -eq "Present") { $result.GlobalAdminAccount = Resolve-Credentials -UserName "globaladmin" $modulePath = $PSScriptRoot + "\MSFT_EXOMailboxSettings.psm1" $content += " EXOMailboxSettings " + (New-GUID).ToString() + "`r`n" $content += " {`r`n" $currentDSCBlock = Get-DSCBlock -Params $result -ModulePath $modulePath $content += Convert-DSCStringParamToVariable -DSCBlock $currentDSCBlock -ParameterName "GlobalAdminAccount" $content += " }`r`n" } } $i++ } return $content } Export-ModuleMember -Function *-TargetResource |