EventSources/@ModuleChanged.ps1
|
<#
.Synopsis Watches for Module loads and unloads. .Description Polls the current set of globally imported PowerShell modules. When this changes, one of two events will be generated: PowerShell.Module.Loaded will be sent when one or more modules is loaded PowerShell.Module.Unloaded will be sent when one or more modules is unloaded Only one event if each will be sent per polling interval. #> param( # The frequency to check for a module load. [Timespan] $PollingInterval = [Timespan]::FromMilliseconds(7037) ) process { $eventSubscriber = Get-EventSubscriber -SourceIdentifier "ModuleLoaded_Check" -ErrorAction SilentlyContinue if ($eventSubscriber) { $eventSubscriber | Unregister-Event } $timer = [Timers.Timer]::new() $timer.AutoReset = $true $timer.Interval = $PollingInterval.TotalMilliseconds $timer.Start() Register-ObjectEvent -SourceIdentifier "ModuleLoaded_Check" -InputObject $timer -EventName Elapsed -Action { $loadedModules = Get-Module if ($script:ModuleLoadedList) { $Compared = Compare-Object -ReferenceObject $script:ModuleLoadedList -DifferenceObject $loadedModules $newModules = $compared | Where-Object SideIndicator -eq '=>' | Select-Object -ExpandProperty InputObject $removedModules = $compared | Where-Object SideIndicator -eq '<=' | Select-Object -ExpandProperty InputObject if ($newModules) { New-Event -SourceIdentifier "PowerShell.Module.Loaded" -EventArguments $newModules -MessageData $newModules } if ($removedModules) { New-Event -SourceIdentifier "PowerShell.Module.Unloaded" -EventArguments $removedModules -MessageData $removedModules } } $script:ModuleLoadedList = $loadedModules } | Out-Null [PSCustomObject]@{ SourceIdentifier = "PowerShell.Module.Loaded","PowerShell.Module.Unloaded" } } |