Private/Migration/CloudData/Invoke-NewCloudData.ps1

Add-Type -AssemblyName System.Web
function Invoke-NewCloudData {
    [CmdletBinding()]
    param (
        [Parameter()]
        $ConvertedData,

        [Parameter(Mandatory)]
        [ValidateSet('Mailboxes', 'MailUsers', 'AzureADUsers')]
        $Type
    )
    $ErrorActionPreference = 'stop'
    $Count = @($ConvertedData).Count
    $iUP = 0
    if ($Type -match 'Mailboxes|MailUsers') {
        foreach ($Converted in $ConvertedData) {
            $iUP++
            $MeuCreated, $MeuSet = $null
            $GeneratedPW = [System.Web.Security.Membership]::GeneratePassword(16, 3)
            try {
                $NewParams = @{
                    Name                      = $Converted.Name
                    DisplayName               = $Converted.DisplayName
                    MicrosoftOnlineServicesID = $Converted.UserPrincipalName
                    PrimarySMTPAddress        = $Converted.PrimarySmtpAddress
                    Alias                     = $Converted.Alias
                    Password                  = ConvertTo-SecureString -String $GeneratedPW -AsPlainText:$true -Force
                    ErrorAction               = 'Stop'
                }
                if ($Converted.ExternalEmailAddress) {
                    $NewParams['ExternalEmailAddress'] = $Converted.ExternalEmailAddress
                }
                $MeuCreated = New-MailUser @NewParams
                Write-Host "[$iUP of $Count] Success New MailUser: $($MeuCreated.DisplayName)" -ForegroundColor Green

                $SetParams = @{
                    Identity       = $MeuCreated.ExternalDirectoryObjectId
                    EmailAddresses = @{Add = $Converted.EmailAddresses -split [regex]::Escape('|') }
                    ErrorAction    = 'Stop'
                }
                if ($Type -eq 'Mailboxes') {
                    $SetParams['ExchangeGuid'] = $Converted.SourceExchangeGuid
                }
                $i = 0
                while (-not ($null = Get-MailUser -Filter ('PrimarySmtpAddress -eq "{0}"' -f $Converted.PrimarySmtpAddress) -ErrorAction SilentlyContinue) -and $i -lt 20) {
                    Write-Host ('Waiting for {0}' -f $Converted.PrimarySmtpAddress) -ForegroundColor White
                    Start-Sleep -Seconds $i
                    $i++
                }
                Set-MailUser @SetParams
                $MeuSet = Get-MailUser -Filter ('PrimarySmtpAddress -eq "{0}"' -f $Converted.PrimarySmtpAddress)
                Write-Host "[$iUP of $Count] Success Set MailUser: $($MeuSet.DisplayName)" -ForegroundColor Green

                [PSCustomObject]@{
                    ResultNew                 = 'SUCCESS'
                    ResultSet                 = 'SUCCESS'
                    Name                      = $MeuSet.Name
                    DisplayName               = $MeuSet.DisplayName
                    SourceType                = $Converted.RecipientTypeDetails
                    MicrosoftOnlineServicesID = $MeuSet.MicrosoftOnlineServicesID
                    UserPrincipalName         = $MeuSet.UserPrincipalName
                    PrimarySMTPAddress        = $MeuSet.PrimarySMTPAddress
                    Alias                     = $MeuSet.Alias
                    ExternalEmailAddress      = $MeuSet.ExternalEmailAddress
                    ExchangeGuid              = $MeuSet.ExchangeGuid
                    SourceId                  = $Converted.ExternalDirectoryObjectId
                    TargetId                  = $MeuSet.ExternalDirectoryObjectId
                    Password                  = $GeneratedPW
                    TargetEmailAddresses      = @($MeuSet.EmailAddresses) -ne '' -join '|'
                    SourcePrimarySmtpAddress  = $Converted.SourcePrimarySmtpAddress
                    SourceUserPrincipalName   = $Converted.SourceUserPrincipalName
                    SourceEmailAddresses      = $Converted.SourceEmailAddresses
                    Log                       = 'SUCCESS'
                }
            }
            catch {
                if ($MeuCreated -and -not $MeuSet) {
                    [PSCustomObject]@{
                        ResultNew                 = 'SUCCESS'
                        ResultSet                 = 'FAILED'
                        Name                      = $MeuCreated.Name
                        DisplayName               = $MeuCreated.DisplayName
                        SourceType                = $Converted.RecipientTypeDetails
                        MicrosoftOnlineServicesID = $MeuCreated.MicrosoftOnlineServicesID
                        UserPrincipalName         = $MeuCreated.UserPrincipalName
                        PrimarySMTPAddress        = $MeuCreated.PrimarySMTPAddress
                        Alias                     = $MeuCreated.Alias
                        ExternalEmailAddress      = $MeuCreated.ExternalEmailAddress
                        ExchangeGuid              = 'FAILED'
                        SourceId                  = $Converted.ExternalDirectoryObjectId
                        TargetId                  = $MeuCreated.ExternalDirectoryObjectId
                        Password                  = $GeneratedPW
                        TargetEmailAddresses      = @($MeuCreated.EmailAddresses) -ne '' -join '|'
                        SourcePrimarySmtpAddress  = $Converted.SourcePrimarySmtpAddress
                        SourceUserPrincipalName   = $Converted.SourceUserPrincipalName
                        SourceEmailAddresses      = $Converted.SourceEmailAddresses
                        Log                       = $_.Exception.Message
                    }
                    Write-Host "[$iUP of $Count] Failed Set MailUser: $($MeuCreated.DisplayName) <$($_.Exception.Message)>" -ForegroundColor Yellow
                }
                else {
                    [PSCustomObject]@{
                        ResultNew                 = 'FAILED'
                        ResultSet                 = 'FAILED'
                        Name                      = $Converted.DisplayName
                        DisplayName               = $Converted.DisplayName
                        SourceType                = $Converted.RecipientTypeDetails
                        MicrosoftOnlineServicesID = $Converted.PrimarySmtpAddress
                        UserPrincipalName         = $Converted.UserPrincipalName
                        PrimarySMTPAddress        = $Converted.PrimarySMTPAddress
                        Alias                     = $Converted.Alias
                        ExternalEmailAddress      = $Converted.ExternalEmailAddress
                        ExchangeGuid              = 'FAILED'
                        SourceId                  = $Converted.ExternalDirectoryObjectId
                        TargetId                  = 'FAILED'
                        Password                  = $GeneratedPW
                        TargetEmailAddresses      = 'FAILED'
                        SourcePrimarySmtpAddress  = $Converted.SourcePrimarySmtpAddress
                        SourceUserPrincipalName   = $Converted.SourceUserPrincipalName
                        SourceEmailAddresses      = $Converted.SourceEmailAddresses
                        Log                       = $_.Exception.Message
                    }
                    Write-Host "[$iUP of $Count] Failed New & Set MailUser: $($Converted.DisplayName) <$($_.Exception.Message)>" -ForegroundColor Red
                }
            }
            if ($MeuCreated) {
                $i = 0
                $MeuPasswordProfile = [Microsoft.Open.AzureAD.Model.PasswordProfile]::new()
                $MeuPasswordProfile.ForceChangePasswordNextLogin = $true
                do {
                    try {
                        Set-AzureAdUser -ObjectId $MeuCreated.ExternalDirectoryObjectId -PasswordProfile $MeuPasswordProfile -ErrorAction Stop
                        $FlagAz = $true
                    }
                    catch {
                        Write-Host ('Waiting for AzureAdUser: {0}' -f $MeuCreated.DisplayName) -ForegroundColor White
                    }
                    $i++
                } until ($FlagAz -or $i -gt 50)
            }
        }
    }
    elseif ($Type -eq 'AzureADUsers') {
        foreach ($ConvertedAz in $ConvertedData) {
            $iUP++
            try {
                $GeneratedPW = [System.Web.Security.Membership]::GeneratePassword(16, 3)
                $PasswordProfile = [Microsoft.Open.AzureAD.Model.PasswordProfile]::new()
                $PasswordProfile.Password = $GeneratedPW
                $PasswordProfile.ForceChangePasswordNextLogin = $true
                $AzUserParams = @{
                    DisplayName       = $ConvertedAz.DisplayName
                    UserPrincipalName = $ConvertedAz.UserPrincipalName
                    MailNickName      = $ConvertedAz.MailNickName
                    PasswordProfile   = $PasswordProfile
                    AccountEnabled    = $true
                    ErrorAction       = 'Stop'
                }
                $NewAzADUser = New-AzureADUser @AzUserParams
                Write-Host "[$iUP of $Count] Success New AzureADUser: $($NewAzADUser.DisplayName)" -ForegroundColor Green
                [PSCustomObject]@{
                    ResultNew         = 'SUCCESS'
                    DisplayName       = $NewAzADUser.DisplayName
                    SourceType        = 'AzureADUser'
                    UserPrincipalName = $NewAzADUser.UserPrincipalName
                    MailNickName      = $ConvertedAz.MailNickName
                    SourceObjectId    = $ConvertedAz.ObjectId
                    TargetObjectId    = $NewAzADUser.ObjectId
                    Password          = $GeneratedPW
                    Log               = 'SUCCESS'
                }
            }
            catch {
                [PSCustomObject]@{
                    ResultNew         = 'FAILED'
                    DisplayName       = $NewAzADUser.DisplayName
                    SourceType        = 'FAILED'
                    UserPrincipalName = 'FAILED'
                    MailNickName      = $ConvertedAz.MailNickName
                    SourceObjectId    = $ConvertedAz.ObjectId
                    TargetObjectId    = 'FAILED'
                    Password          = $GeneratedPW
                    Log               = $_.Exception.Message
                }
                Write-Host "[$iUP of $Count] Failed New AzureADUser: $($ConvertedAz.DisplayName) <$($_.Exception.Message)>" -ForegroundColor Red
            }
        }
    }
    $ErrorActionPreference = 'continue'
}