Scheduling

ZoomZoom/Private/Get-DaysInRange.ps1

@@ -0,0 +1,48 @@
+<#
+.SYNOPSIS
+    Returns the days, months, and years of all days between 2 days
+.DESCRIPTION
+    Calculates a timespan between 2 dates, then returns each day between those 2 dates as datetime objects
+.EXAMPLE
+    Get-DaysInRange -StartDate 1/1/2020 -EndDate 30/1/2020
+    Returns all days in January 2020 as an array
+.INPUTS
+    Datetime strings
+.OUTPUTS
+    Array of Datetime objects
+.NOTES
+
+#>
+
+function Get-DaysInRange {
+    [CmdletBinding()]
+    param (
+        # The Start Date for the array to calculate
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true)]
+        [string]
+        $StartDate,
+
+        # The end date for the array to calculate
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true)]
+        [string]
+        $EndDate
+    )
+
+    begin {
+        $Timespan = New-Timespan -Start $StartDate -End $EndDate
+        $DateArray = @()
+    }
+
+    process {
+        $DateArray += Get-Date $StartDate
+        $WorkingTime = Get-Date $StartDate
+        foreach ($_ in 1..$Timespan.Days) {
+            $WorkingTime = $WorkingTime.AddDays(1)
+            $DateArray += $WorkingTime
+        }
+    }
+
+    end {
+        return $DateArray
+    }
+}

ZoomZoom/Private/Get-RecurringMeetingDates.ps1

@@ -0,0 +1,97 @@
+<#
+.SYNOPSIS
+    Returns an appointment object and all dates for that appointment based off its recurrence pattern
+.DESCRIPTION
+    Takes an Outlook Recurring Appointment object. Calculates all possible occurences of the appointment based off of
+    the Start timestampt, and the Recurrence Pattern.
+    The Recurrence Pattern defines a RecurrenceType, an integer that specifies if it's a daily, weekly, monthly, nth monthly,
+    yearly, or nth yearly meeting.
+    Each Typoe can then contain DayofWeek masks or WeekofMonth masks that confirm what day, days, or week they occur on.
+.EXAMPLE
+    $Appointment | Get-RecurringMeetingDates -EndDate 30/01/2020
+    Returns all valid appointment dates for the input recurring appointment object
+.INPUTS
+    Outlook Recurring Appointment
+.OUTPUTS
+    pscustomobject
+.NOTES
+
+#>
+function Get-RecurringMeetingDates {
+    param (
+        # An Outlook appointment item
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true)]
+        [object]
+        $Appointment,
+
+        # The date to calculate the last occurence of a recurring appointment
+        [Parameter(Mandatory = $false, ValueFromPipeline = $true)]
+        $EndDate
+    )
+
+    $DateArray = Get-DaysinRange -StartDate ($Appointment.Start).ToString() -EndDate (Get-Date $EndDate).ToString()
+    $Results = @()
+
+    Switch (($Appointment.GetRecurrencePattern()).DayOfWeekMask) {
+        #CdoMonday/2 - The appointment recurs on Mondays.
+        2 {
+            $DayOfWeekMask = $DateArray | Where-Object -Property DayOfWeek -eq 'Monday'
+        }
+        #CdoTuesday/4 - The appointment recurs on Tuesdays.
+        4 {
+            $DayOfWeekMask = $DateArray | Where-Object -Property DayOfWeek -eq 'Tuesday'
+        }
+        #CdoWednesday/8 - The appointment recurs on Wednesdays.
+        8 {
+            $DayOfWeekMask = $DateArray | Where-Object -Property DayOfWeek -eq 'Wednesday'
+        }
+        #CdoThursday/16 - The appointment recurs on Thursdays.
+        16 {
+            $DayOfWeekMask = $DateArray | Where-Object -Property DayOfWeek -eq 'Thursday'
+        }
+        #CdoFriday/32 - The appointment recurs on Fridays.
+        32 {
+            $DayOfWeekMask = $DateArray | Where-Object -Property DayOfWeek -eq 'Friday'
+        }
+        #Meeting that occur on every week day have the value of 62 (2+4+8+16+32)
+        62 {
+            $DayOfWeekMask += $DateArray | Where-Object -Property DayOfWeek -NotMatch ^[S*]
+        }
+    }
+
+    Switch (($Appointment.GetRecurrencePattern()).RecurrenceType) {
+        #CdoRecurTypeDaily/0 - Appointments that recur daily
+        0 {
+            $Results += $DateArray | Where-Object -Property DayOfWeek -NotMatch ^[S*]
+            return $Results
+        }
+        #CdoRecurTypeWeekly/1 - Appointment recurs weekly (DayOfWeekMask,Interval)
+        1 {
+            $AppointmentDates = @()
+            for ($i = 0; $i -lt ($DayOfWeekMask).Count; $i += (($Appointment.GetRecurrencePattern()).Interval)) {
+                $AppointmentDates += $DayOfWeekMask[$i]
+            }
+            $Results += [PSCustomObject]@{
+                Appointment      = $Appointment
+                AppointmentDates = $AppointmentDates
+            }
+        }
+        #CdoRecurTypeMonthly/2 - Appointment recurs monthly (DayOfMonth Interval)
+        2 {
+            #Not yet doing anything with these
+        }
+        #CdoRecurTypeMonthlyNth/3 - Appointment recurs every Nth month
+        3 {
+            #Not yet doing anything with these
+        }
+        #CdoRecurTypeYearly/5 - Appointment recurs every year
+        5 {
+            #Not yet doing anything with these
+        }
+        #CdoRecurTypeYearlyNth/6 - Appointment recurs every Nth year
+        6 {
+            #Not yet doing anything with these
+        }
+    }
+    return $results
+}

ZoomZoom/Private/Get-ZoomStringFromBody.ps1

@@ -0,0 +1,45 @@
+<#
+.SYNOPSIS
+    Searches a string for a Zoom Meeting invite URL and returns the first instance found
+.DESCRIPTION
+    Searches a string of text for any Zoom URL's based off the standard Zoom uses. Returns the first line found and splits this incase
+    there are multiple URLS in 1 line (Common for hyperlink formats)
+.INPUTS
+    String
+.OUTPUTS
+    String
+.NOTES
+    Used to scrape meeting object bodies for Zoom meeting URLs
+#>
+function Get-ZoomStringFromBody {
+    [CmdletBinding()]
+    param (
+        # A body of text that will contain a Zoom URL
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true)]
+        $Body
+    )
+
+    begin {
+    }
+
+    process {
+        $SplitString = $Body -Split ([Environment]::NewLine)
+        Foreach ($String in $SplitString) {
+            if ($String -match "\D{5,6}\/\/\S*\/j\/\d{10,11}\?{1}\S*") {
+                $Results = (Select-String -InputObject $String -Pattern "\D{5,6}\/\/\S*\/j\/\d{10,11}\?{1}\S*").Matches.Value
+                break
+            }
+            elseif ($String -match "\D{5,6}\/\/\S*\/j\/\d{10,11}") {
+                $results = (Select-String -InputObject $String -Pattern "\D{5,6}\/\/\S*\/j\/\d{10,11}").Matches.Value
+                break
+            }
+            else {
+                $results = $null
+            }
+        }
+    }
+
+    end {
+        return $results
+    }
+}

ZoomZoom/Public/Get-OutlookCalendarAppointment.ps1

@@ -0,0 +1,100 @@
+<#
+.SYNOPSIS
+    Returns meeting objects from Outlook
+.DESCRIPTION
+    Creates an Outlook COM application and returns all objects with message class IPM.Appointment from the Calendar Folder from the specified date range. If no date range is specified, all meetings from midnight the previous day, to the current time are returned
+.EXAMPLE
+    Get-OutlookCalendarAppointments
+    Returns Outlook calendar appointments for the next 48 hours
+
+    Get-OutlookCalendarAppointments -Start 12/01/2020 -End 21/02/2020
+    Returns all non-recurring meetings between 12th January and 21st February 2020
+
+.OUTPUTS
+    PSCustomObject
+.NOTES
+
+#>
+function Get-OutlookCalendarAppointment {
+
+    [CmdletBinding(DefaultParameterSetName = 'Default')]
+
+    param (
+
+        # The start date for the search
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true, ParameterSetName = 'SearchTime')]
+        $Start,
+
+        # The end date for the search
+        [Parameter(Mandatory = $true, ValueFromPipeline = $true, ParameterSetName = 'SearchTime')]
+        $End
+    )
+
+    begin {
+        #Add the required Assembly to PowerShell before processing input
+        Add-Type -assembly "Microsoft.Office.Interop.Outlook"
+
+        #Defines the DefaultFolderID for the Calendar, and creates our new COM Object
+        $OutlookFolders = 'Microsoft.Office.Interop.Outlook.OlDefaultFolders' -as [type]
+        $Outlook = New-Object -ComObject Outlook.Application
+        $NameSpace = $Outlook.GetNamespace('MAPI')
+
+        #Empty array to store our results
+        $Meetings = @()
+        $Results = @()
+        if ($PSCmdlet.ParameterSetName -eq 'Default') {
+            $Start = Get-Date
+            $End = $Start.AddDays(2)
+        }
+    }
+
+    process {
+        $Folder = $NameSpace.getDefaultFolder($OutlookFolders::olFolderCalendar)
+        $RecurringAppointments = $Folder.Items | Where-Object -Property IsRecurring -eq $True
+        if ($null -eq $start) {
+            $Meetings += $Folder.Items | Where-Object -Property Start -gt ((Get-Date -Hour 00 -Minute 00 -Second 00).AddDays(-1))
+        }
+        else {
+            $Meetings += $Folder.Items | Where-Object -Property Start -gt (Get-Date $Start -Hour 00 -Minute 00 -Second 00) | Where-Object -Property End -lt (Get-Date $End -Hour 00 -Minute 00 -Second 00)
+        }
+    }
+
+    end {
+        foreach ($Meeting in $Meetings) {
+            $Results += [PSCustomObject]@{
+                MeetingTime    = $Meeting.Start
+                MeetingSubject = $Meeting.Subject
+                MeetingBody    = $Meeting.Body
+                MeetingURL     = Get-ZoomStringFromBody $Meeting.Body
+                Recurring      = $false
+            }
+        }
+        if ($Null -eq $RecurringAppointments) {
+            return $Results
+        }
+        else {
+            Foreach ($Appointment in $RecurringAppointments) {
+                $AppointmentDates = @()
+                $AppointmentDates += (Get-RecurringMeetingDates -Appointment $Appointment -EndDate (Get-Date $End).ToString()).AppointmentDates
+                foreach ($Date in $AppointmentDates) {
+                    if ($Date -gt (Get-Date $Start)) {
+                        $Results += [pscustomobject]@{
+                            MeetingTime    = $Date
+                            MeetingSubject = $Appointment.Subject
+                            MeetingBody    = $Appointment.Body
+                            MeetingURL     = Get-ZoomStringFromBody $Appointment.Body
+                            Recurring      = $true
+                        }
+                    }
+                }
+            }
+
+            $defaultProperties = @('MeetingTime', 'MeetingSubject', 'MeetingURL', 'Recurring')
+            $defaultDisplayPropertySet = New-Object System.Management.Automation.PSPropertySet(‘DefaultDisplayPropertySet’, [string[]]$defaultProperties)
+            $PSStandardMembers = [System.Management.Automation.PSMemberInfo[]]@($defaultDisplayPropertySet)
+            $Results | Add-Member MemberSet PSStandardMembers $PSStandardMembers
+
+            return $Results
+        }
+    }
+}