Initial Commit

source/Private/Assert-ModuleAvailability.ps1

@@ -0,0 +1,33 @@
+function Assert-ModuleAvailability {
+    param(
+        [string]$ModuleName,
+        [string]$RequiredVersion,
+        [string]$SubModuleName
+    )
+
+    try {
+        $module = Get-Module -ListAvailable -Name $ModuleName | Where-Object { $_.Version -ge [version]$RequiredVersion }
+
+        if ($null -eq $module) {$auditResult.Profile
+            Write-Host "Installing $ModuleName module..."
+            Install-Module -Name $ModuleName -RequiredVersion $RequiredVersion -Force -AllowClobber -Scope CurrentUser | Out-Null
+        }
+        elseif ($module.Version -lt [version]$RequiredVersion) {
+            Write-Host "Updating $ModuleName module to required version..."
+            Update-Module -Name $ModuleName -RequiredVersion $RequiredVersion -Force | Out-Null
+        }
+        else {
+            Write-Host "$ModuleName module is already at required version or newer."
+        }
+
+        if ($SubModuleName) {
+            Import-Module -Name "$ModuleName.$SubModuleName" -RequiredVersion $RequiredVersion -ErrorAction Stop | Out-Null
+        }
+        else {
+            Import-Module -Name $ModuleName -RequiredVersion $RequiredVersion -ErrorAction Stop | Out-Null
+        }
+    }
+    catch {
+        Write-Warning "An error occurred with module $ModuleName`: $_"
+    }
+}

source/Private/Connect-M365Suite.ps1

@@ -0,0 +1,56 @@
+function Connect-M365Suite {
+    [CmdletBinding()]
+    param (
+        # Parameter to specify the SharePoint Online Tenant Admin URL
+        [Parameter(Mandatory)]
+        [string]$TenantAdminUrl
+    )
+$VerbosePreference = "SilentlyContinue"
+    try {
+
+        # Attempt to connect to Azure Active Directory
+        Write-Host "Connecting to Azure Active Directory..." -ForegroundColor Cyan
+        Connect-AzureAD | Out-Null
+        Write-Host "Successfully connected to Azure Active Directory." -ForegroundColor Green
+
+        # Attempt to connect to Exchange Online
+        Write-Host "Connecting to Exchange Online..." -ForegroundColor Cyan
+        Connect-ExchangeOnline | Out-Null
+        Write-Host "Successfully connected to Exchange Online." -ForegroundColor Green
+        try {
+            # Attempt to connect to Microsoft Graph with specified scopes
+            Write-Host "Connecting to Microsoft Graph with scopes: Directory.Read.All, Domain.Read.All, Policy.Read.All, Organization.Read.All" -ForegroundColor Cyan
+            Connect-MgGraph -Scopes "Directory.Read.All", "Domain.Read.All", "Policy.Read.All", "Organization.Read.All" -NoWelcome | Out-Null
+            Write-Host "Successfully connected to Microsoft Graph with specified scopes." -ForegroundColor Green
+        }
+        catch {
+            Write-Host "Failed to connect o MgGraph, attempting device auth." -ForegroundColor Yellow
+            # Attempt to connect to Microsoft Graph with specified scopes
+            Write-Host "Connecting to Microsoft Graph using device auth with scopes: Directory.Read.All, Domain.Read.All, Policy.Read.All, Organization.Read.All" -ForegroundColor Cyan
+            Connect-MgGraph -Scopes "Directory.Read.All", "Domain.Read.All", "Policy.Read.All", "Organization.Read.All" -UseDeviceCode -NoWelcome | Out-Null
+            Write-Host "Successfully connected to Microsoft Graph with specified scopes." -ForegroundColor Green
+        }
+
+        # Validate SharePoint Online Tenant Admin URL
+        if (-not $TenantAdminUrl) {
+            throw "SharePoint Online Tenant Admin URL is required."
+        }
+
+        # Attempt to connect to SharePoint Online
+        Write-Host "Connecting to SharePoint Online..." -ForegroundColor Cyan
+        Connect-SPOService -Url $TenantAdminUrl | Out-Null
+        Write-Host "Successfully connected to SharePoint Online." -ForegroundColor Green
+
+        # Attempt to connect to Microsoft Teams
+        Write-Host "Connecting to Microsoft Teams..." -ForegroundColor Cyan
+        Connect-MicrosoftTeams | Out-Null
+        Write-Host "Successfully connected to Microsoft Teams." -ForegroundColor Green
+    }
+    catch {
+        $VerbosePreference = "Continue"
+        Write-Host "There was an error establishing one or more connections: $_" -ForegroundColor Red
+        throw $_
+    }
+    $VerbosePreference = "Continue"
+}
+

source/Private/Disconnect-M365Suite.ps1

@@ -0,0 +1,39 @@
+function Disconnect-M365Suite {
+    # Clean up sessions
+    try {
+        Write-Host "Disconnecting from Exchange Online..." -ForegroundColor Green
+        Disconnect-ExchangeOnline -Confirm:$false | Out-Null
+    }
+    catch {
+        Write-Warning "Failed to disconnect from Exchange Online: $_"
+    }
+    try {
+        Write-Host "Disconnecting from Azure AD..." -ForegroundColor Green
+        Disconnect-AzureAD | Out-Null
+    }
+    catch {
+        Write-Warning "Failed to disconnect from Azure AD: $_"
+    }
+    try {
+        Write-Host "Disconnecting from Microsoft Graph..." -ForegroundColor Green
+        Disconnect-MgGraph | Out-Null
+    }
+    catch {
+        Write-Warning "Failed to disconnect from Microsoft Graph: $_"
+    }
+    try {
+        Write-Host "Disconnecting from SharePoint Online..." -ForegroundColor Green
+        Disconnect-SPOService | Out-Null
+    }
+    catch {
+        Write-Warning "Failed to disconnect from SharePoint Online: $_"
+    }
+    try {
+        Write-Host "Disconnecting from Microsoft Teams..." -ForegroundColor Green
+        Disconnect-MicrosoftTeams | Out-Null
+    }
+    catch {
+        Write-Warning "Failed to disconnect from Microsoft Teams: $_"
+    }
+    Write-Host "All sessions have been disconnected." -ForegroundColor Green
+}