param( [switch]$debug, [switch]$clear ) if ($debug) { $script:debug = $debug } $teamsName = "IT Support & Delivery" $scheduleGroupName = "IT SUPPORT" # App Registration details & Tenant ID $ClientId = "6cb76bbf-f253-4551-87a8-5e1f49d8ace3" $ClientSecret = "IQg8Q~JTBTDbrHyjKMc.KMSETtQoKWvUhnCr1aY1" $tenantid = "e81b4a31-e8ad-4df6-aa30-3bdcc1da2cdd" $userIdAdmin = "747bd624-5cd7-4ae0-952f-5dc374e07a5e" $logPath = (".\log_{0}.log" -f (Get-Date).toString("yyyy_MM_dd")) function Write-Debug { param( [string]$message ) if ($script:debug) { Write-Host $message } else { $message | Add-Content $logPath } } #Naplánování konkrétní směny function Set-Shift { param( [string]$userId, [string]$groupID, [string]$shiftName, [System.DateTime]$StartDate, [System.DateTime]$EndDate, [string]$color, [string]$teamID, [string]$mail ) $params = @{ UserId = $userId schedulingGroupId = $groupID sharedShift = @{ notes = ($shiftName) startDateTime = [System.DateTime]::Parse($StartDate.ToString("yyyy-MM-dd'T'HH:mm:ssZ")) endDateTime = [System.DateTime]::Parse($EndDate.ToString("yyyy-MM-dd'T'HH:mm:ssZ")) theme = $color } } #$headers = @{ # "MS-APP-ACTS-AS" = $userIdAdmin # "Prefer" = "no-notification" #} $newShift = New-MgTeamScheduleShift -TeamId $teamID -BodyParameter $params -Headers @{ "MS-APP-ACTS-AS" = $userIdAdmin } #Write-Debug ("SCHEDULING: {0} {1} - {2}" -f $newShift.SharedShift.StartDateTime.ToString("yyyy-MM-dd HH:mm"), $newShift.SharedShift.EndDateTime.ToString("yyyy-MM-dd HH:mm"), $newShift.SharedShift.Notes) #("SCHEDULING: {0} {1} - {2}" -f $newShift.SharedShift.StartDateTime.ToString("yyyy-MM-dd HH:mm"), $newShift.SharedShift.EndDateTime.ToString("yyyy-MM-dd HH:mm"), $newShift.SharedShift.Notes) | Add-Content -Path $logPath Write-Debug ("{0} {1}: {2} {3} {4} {5}" -f $dayDate, $dayDate.DayOfWeek, $mail, $shiftName, $StartDate, $EndDate) #$newShift = 0 return $newShift } function Invoke-HasTimeOff { param( [string]$UID, [PSCustomObject]$timeoff, [string]$mail ) foreach ($toff in $timeoff) { if ($toff.UserId -eq $UID) { Write-Debug ("{0} {1}: {2} has time off at this time" -f $dayDate, $dayDate.DayOfWeek, $mail) return $true break } } return $false } function Invoke-HasShift { param( [string]$UID, [PSCustomObject]$shifts, [string]$mail ) foreach ($shift in $shifts) { if ($shift.UserId -eq $UID) { Write-Debug ("{0} {1}: {2} has a shift at this time" -f $dayDate, $dayDate.DayOfWeek, $mail) return $true break } } return $false } function Invoke-HasShiftorTimeOff { param( [string]$UID, [PSCustomObject]$shifts, [PSCustomObject]$timeoff, [string]$mail ) foreach ($shift in $shifts) { if ($shift.UserId -eq $UID) { Write-Debug ("{0} {1}: {2} has a shift or time off at this time" -f $dayDate, $dayDate.DayOfWeek, $mail) return $true break } } foreach ($toff in $timeoff) { if ($toff.UserId -eq $UID) { Write-Debug ("{0} {1}: {2} has a shift or time off at this time" -f $dayDate, $dayDate.DayOfWeek, $mail) return $true break } } return $false } #Microsoft auth $body = @{ grant_type = "client_credentials" resource = "https://graph.microsoft.com" client_id = $ClientId client_secret = $ClientSecret } $authUri = "https://login.microsoftonline.com/$tenantid/oauth2/token" $response = Invoke-RestMethod $authUri -Method 'POST' -Body $body $token = $response.access_token Import-Module Microsoft.Graph.Teams Connect-MgGraph -AccessToken $($token | ConvertTo-SecureString -AsPlainText -Force) >> $null # Dnešní datum a plán směn #$today = (Get-Date).Date #$today = $today_old.AddYears(2) $today = (Get-Date -Day 14 -Month 10 -Year 2025).Date $schedule = Get-Content -Path "./config.json" -Raw | ConvertFrom-Json $allemails = $schedule.PSObject.Properties | ForEach-Object { if ($_.Name -in @("monday", "tuesday", "wednesday", "thursday", "friday")) { $_.Value.PSObject.Properties | ForEach-Object { if ($_.Name -in @("ds", "ho", "os", "ns")) { $_.Value | ForEach-Object { $_ } } } } } | Select-Object -Unique #Časové rozmezí plánování $daysahead = 5 $startSpanDate = Get-Date -Day $today.Day -Month $today.Month -Year $today.Year -Hour 9 -Minute 00 -Second 00 -Millisecond 00 $endSpanDate = Get-Date -Day $startSpanDate.AddDays($daysahead).Day -Month $startSpanDate.AddDays($daysahead).Month -Year $startSpanDate.AddDays($daysahead).Year -Hour 17 -Minute 00 -Second 00 -Millisecond 00 #RLCZ maintenance $rlcz_mtnc_email = "jiri.kotlan@itego.cz" $rlcz_shift_reduction = -3 # SKRIPT try { $team = Get-MgTeam -Property "id,displayName" | Where-Object -property displayName -value $teamsName -eq $group = Get-MgTeamScheduleSchedulingGroup -TeamId $team.id -Headers @{ "MS-APP-ACTS-AS" = $userIdAdmin } | Where-Object -property displayName -value $scheduleGroupName -eq $allshifts = [object[]] (Get-MgTeamScheduleShift -TeamId $team.id -Filter "SharedShift/StartDateTime ge $($startSpanDate.toString('yyyy-MM-ddT00:00:00Z'))" -All -Headers @{ "MS-APP-ACTS-AS" = $userIdAdmin }) $timeoff_all = [object[]] (Get-MgTeamScheduleTimeOff -TeamId $team.id -Filter "SharedTimeOff/StartDateTime ge $($startSpanDate.toString('yyyy-MM-ddT00:00:00Z'))" -All -Headers @{ "MS-APP-ACTS-AS" = $userIdAdmin } | Select-Object -Property *, @{name = "Date"; expression = { $_.SharedTimeOff.StartDateTime.AddHours(1).Date } }) #Procházíme dny v časovém rozmezí $timeSpan = New-TimeSpan -Start $startSpanDate -End $endSpanDate Write-Debug ("Planning from {0} to {1}" -f $startSpanDate, $endSpanDate) for ($dayNumber = 0; $dayNumber -lt $timespan.Days; $dayNumber++) { $dayDate = $today.AddDays($dayNumber); #Pokud jde o pracovní den, jinak se jde ihned na další den if ($dayDate.DayOfWeek -in @("Saturday", "Sunday")) { Write-Debug ("is weekend {0}" -f $dayDate) continue } #Množina emailů pro tento den v týdnu co mají mít home office $ho_emails = $schedule.($dayDate.DayOfWeek.ToString().ToLower()).'ho' #Email a ID toho kdo má mít tento den denní směnu $ds_email = $schedule.($dayDate.DayOfWeek.ToString().ToLower()).'ds' #Emaily těch co jsou on-site u zákazníka $os_emails = $schedule.($dayDate.DayOfWeek.ToString().ToLower()).'os' #Emaily těch co nemají mít dnes žádnou směnu $ns_emails = $schedule.($dayDate.DayOfWeek.ToString().ToLower()).'ns' #Upravení času $dateStart = $(get-date -Day $dayDate.Day -Month $dayDate.Month -Year $dayDate.Year -Hour 9 -Minute 00 -Second 00).AddHours(-1) $dateEnd = $(get-date -Day $dayDate.Day -Month $dayDate.Month -Year $dayDate.Year -Hour 17 -Minute 00 -Second 00).AddHours(-1) if (($dayDate.IsDaylightSavingTime()) -eq $true) { $dateStart = $dateStart.AddHours(-1) $dateEnd = $dateEnd.AddHours(-1) } $shifts_today = [Object[]] $allshifts | Where-Object -Filter { $_.schedulingGroupId -eq $group.Id -and $_.SharedShift.StartDateTime.ToString("yyyy-MM-dd HH:mm") -ge $dateStart.ToString("yyyy-MM-dd HH:mm") -and $_.SharedShift.EndDateTime.ToString("yyyy-MM-dd HH:mm") -le $dateEnd.ToString("yyyy-MM-dd HH:mm") } $timeoff_today = [Object[]] $timeoff_all | Where-Object -Filter { ($_.SharedTimeOff.StartDateTime.Date -eq $dateStart.Date -or $_.SharedTimeOff.EndDateTime.Date -eq $dateEnd.Date) } Write-Debug ("Shifts {0}, TimeOff: {1}" -f $shifts_today.length, $timeoff_today.length) $ds_covered = $false; $userEmailToIdHashtable = @{} $userEmailNotAvailable = @() foreach ($email in $allemails) { $userId = $(Get-MgUser -Filter "UserPrincipalName eq '$email' or proxyAddresses/any(c:c eq 'smtp:$email')").Id $userEmailToIdHashtable[$email] = $userId if ($userId -in $shifts_today.UserId) { $userEmailNotAvailable += $email Write-Debug ("{0} has Manual Shift" -f $email) continue; } if ($userId -in $timeoff_today.UserId) { $userEmailNotAvailable += $email Write-Debug ("{0} has TimeOff" -f $email) continue; } #NoShift if ($email -in $ns_emails) { $userEmailNotAvailable += $email Write-Debug ("{0} has NULL Shift " -f $email) continue } #OnSite if ($email -in $os_emails) { Write-Debug ("{0} has On Site " -f $email) #$newshift = Set-Shift -userId $userId -groupID $group.id -shiftName "On-site" -StartDate $dateStart -EndDate $dateEnd -color "gray" -teamID $team.id -mail $os_email #$allshifts += [Object[]] $newshift continue } #Dení Směna if ($email -eq $ds_email -and $email -in $ho_emails) { Write-Debug ("{0} has Denní HO" -f $email) #$newshift = Set-Shift -userId $userId -groupID $group.id -shiftName "Home Office - Denní směna" -StartDate $dateStart -EndDate $dateEnd -color "purple" -teamID $team.id -mail $ds_email #$allshifts += [Object[]] $newshift $ds_covered = $true; continue } elseif ($email -eq $ds_email) { Write-Debug ("{0} has Denní" -f $email) #$newshift = Set-Shift -userId $userId -groupID $group.id -shiftName "Denní směna" -StartDate $dateStart -EndDate $dateEnd -color "purple" -teamID $team.id -mail $ds_email #$allshifts += [Object[]] $newshift $ds_covered = $true; continue } } $timeoff_today = [Object[]] $timeoff_all | Where-Object -Filter { ($_.SharedTimeOff.StartDateTime.Date -eq $dateStart.Date -or $_.SharedTimeOff.EndDateTime.Date -eq $dateEnd.Date) } foreach ($email in ($allemails | Where-Object -Filter {$_ -notin $userEmailNotAvailable} | Where-Object -Filter {$userEmailToIdHashtable[$_] -notin $timeoff_today.UserId})) { if (($ds_covered -eq $false)) { $ds_covered = $true; Write-Debug ("{0} has backup Denní" -f $email) #$newshift = Set-Shift -userId $userId -groupID $group.id -shiftName "Office" -StartDate $dateStart -EndDate $dateEnd -color "purple" -teamID $team.id -mail $ds_email #$allshifts += [Object[]] $newshift continue } Write-Debug ("{0} has Office" -f $email) #$newshift = Set-Shift -userId $userId -groupID $group.id -shiftName "Office" -StartDate $dateStart -EndDate $dateEnd -color "purple" -teamID $team.id -mail $ds_email #$allshifts += [Object[]] $newshift } } $params = @{ notifyTeam = $false startDateTime = [System.DateTime]::Parse($startSpanDate.ToString("yyyy-MM-dd'T'HH:mm:ssZ")) endDateTime = [System.DateTime]::Parse($endSpanDate.ToString("yyyy-MM-dd'T'HH:mm:ssZ")) } Invoke-MgShareTeamSchedule -TeamId $team.Id -BodyParameter $params -Headers @{ "MS-APP-ACTS-AS" = $userIdAdmin } ("SHARING: {0}" -f $scheduleGroupName) | Add-Content -Path $logPath } catch { $_ break; }