Powershell LDAP query to find Azure / O365 users synchronised with AD Sync

 

Recently I needed to create a quick report that would allow me to see at a glance which accounts in that domain had been synchronised with AD Sync into Azure AD.  It wasn’t possible using Get-ADuser and I knew an LDAP query would do the trick.  First I had to download a powershell module called System.DirectoryServices.Protocols.  Once the module is downloaded run:

Add-Type -AssemblyName System.DirectoryServices.Protocols Import-Module C:\Cloudwyse\Tools\S.DS.P.psm1

Then to query the information I required I ran:

$MigratedUsers=Find-LdapObject -SearchFilter:"(msDS-ExternalDirectoryObjectId=*)" -SearchBase:"DC=contoso,DC=com" -LdapConnection:"server01.contoso.com" -PageSize 500

Conversely, if you wanted to find all users that HADN’T been synchronised you could run the following:

$MigratedUsers=Find-LdapObject -SearchFilter:"(!msDS-ExternalDirectoryObjectId=*)" -SearchBase:"DC=contoso,DC=com" -LdapConnection:"server01.contoso.com" -PageSize 500

I still had a few service accounts showing so I just filtered these in Excel based on the DN.  To export the fil just run…

Export-CSV C:\Cloudwyse\User_report.csv

 

 

Powershell Script to Create Random Complex Passwords suitable for O365

 

This script enables you to generate a set of random complex passwords for a list of users which is imported as a CSV file.  The password will contain upper and lowercase letters, symbols, numbers and will always be between 8-16 characters in length (meeting the O365 requirements).  Obviously the functions can be tweaked to make the passords more or less secure and the script could be altered to add more sections to the password.  Remember each time a function is called within the foreach, the variable name will need to be different in order to stop the same part of the password repeating.  That’s why there are multiple random symbol and random numbers.

$JobStart = Get-Date $userlistpath = "C:\cloudwyse\users_requiring_passwords.csv" $wordlistpath = "C:\cloudwyse\dictionary.csv" $DateTime = (Get-Date -Format "ddMMyyyy-HHmmss") $exportpath = "C:\Cloudwyse\users_with_passwords$DateTime.csv" Write-Host  -ForegroundColor Magenta "Importing lists from $userlistpath and $wordlistpath..." $userlist = import-csv $userlistpath $wordlist = import-csv $wordlistpath $JobEnd = Get-Date $JobSecondsTaken = ($JobEnd - $JobStart) Write-Host -ForegroundColor Yellow "Lists imported taking" $JobSecondsTaken.Minutes "minute(s) and" $JobSecondsTaken.Seconds "second(s)." $symbollist = @("`^","`!","`%","`&") function RandomWord {$wordlist[(get-random -maximum 716)] | select-object -ExpandProperty Word} function RandomNumber {get-random -minimum 10 -maximum 99} function RandomSymbol {$symbollist[(get-random -maximum 4)]} $total = $null $Job2Start = Get-Date $pwList = @() foreach ($user in $userlist)     {        $pwPart1 = RandomSymbol        $pwPart2a = RandomWord        $pwPart2 = (Get-Culture).TextInfo.ToTitleCase($pwPart2a.ToLower())        $pwPart3 = RandomSymbol        $pwPart4 = RandomNumber        $pwPart5 = RandomNumber        $longpass = "$pwPart1$pwPart2$pwPart3$pwPart4"        if ($longpass.length -lt 8) {                  do {              $longpass += $pwPart5              }              until ($longpass.length -ge 8)              }        $password = $longpass.substring(0, [System.Math]::Min(16, $longpass.Length))        $username = $user | Select-Object -ExpandProperty User        $pw = New-Object PSObject        $pw | Add-Member -type NoteProperty -Name 'User' -Value $username        $pw | Add-Member -type NoteProperty -Name 'Password' -Value $password        Write-Host  -ForegroundColor Magenta "Processed password for user" $username        $pwlist += $pw        $total = $total +1        } $Job2End = Get-Date $Job2SecondsTaken = ($Job2End - $Job2Start) Write-Host -ForegroundColor Yellow "Processed $total passwords in" $Job2SecondsTaken.Minutes "minute(s) and" $Job2SecondsTaken.Seconds "second(s)." Write-Host  -ForegroundColor Magenta "Exporting list..." $pwList | Export-csv -Path $exportpath Write-Host -ForegroundColor Yellow "Finished exporting list to $exportpath"

The CSV file I used for the dictionary can be downloaded here.

 

 

Powershell Script to export a list of all proxyaddresses for all users in the O365 tenant

 

This script allows you to export a list of all users in the tenant and all associated proxy addresses.  It’s helpful to be able to get this as a csv filer for future reference so that you can quickly filter on whichever user you like.  It’s also been helpful for me on a recent migration where I was able to make sure that each user’s email addresses were properly migrated.

$LogFilePath = $env:LOCALAPPDATA + "\Cloudwyse\Logs\user_proxy_addresses_" + $(get-date -Format ddMMyy_HHmmss) + ".log" Start-Transcript -Path $LogFilePath -NoClobber $365Pass = cat C:\cloudwyse\securestring365.txt | convertto-securestring $365Cred = new-object -typename System.Management.Automation.PSCredential -argumentlist "admin@contoso.com",$365Pass $DateTime = (Get-Date -Format "ddMMyyyy-HHmmss")   $365Session = New-PSSession -ConfigurationName Microsoft.Exchange -ConnectionUri https://outlook.office365.com/powershell-liveid/ -Credential $365cred -Authentication Basic -AllowRedirection Import-PSSession $365Session Connect-Msolservice -Credential $365Cred     Write-Host  -ForegroundColor Magenta "Pulling mailbox information for all users, please be patient..." $JobStart = Get-Date $getmailbox = get-Mailbox $JobEnd = Get-Date $JobSecondsTaken =($JobEnd - $JobStart) Write-Host  -ForegroundColor Yellow "Extract complete.  The Job took" $JobSecondsTaken.Seconds "seconds." $total = $null $Job2Start = Get-Date $userList = @() foreach ($user in $getmailbox)   { $lookup = get-msoluser -userprincipalname $user.userprincipalname        Write-Host  -ForegroundColor Magenta "Current user is" $user.userprincipalname        $addresses = $lookup.proxyaddresses        foreach ($address in $addresses) {        $us = New-Object PSObject              $us | Add-Member -type NoteProperty -Name 'UPN' -Value $lookup.userprincipalname              $us | Add-Member -type NoteProperty -Name 'ProxyAddresses' -Value $address              Write-Host  -ForegroundColor Cyan "Address is" $address              $userList += $us                                                                                               }        $total = $total +1                                                              } $Job2End = Get-Date $Job2SecondsTaken =($Job2End - $Job2Start) Write-Host -ForegroundColor Yellow "$total users processed in" $Job2SecondsTaken.Minutes "minute(s) and" $Job2SecondsTaken.Seconds "second(s)." Remove-PSSession $365Session $userlist | export-csv C:\Cloudwyse\user_proxy_addresses$datetime.csv Write-Host -ForegroundColor Yellow "Report exported to C:\Cloudwyse\user_proxy_addresses$datetime.csv"   Stop-Transcript

I’ve shared this before, but if you are unsure how to securely store credentials in a script without using plain text then follow the instructions here to create the securestring.txt.