1082 lines
103 KiB
PowerShell
1082 lines
103 KiB
PowerShell
#PowerShell 4.0 Script
|
||
#Please use the "_Settings.ini"-File for configurations.
|
||
|
||
#Digital Data
|
||
#Ludwig-Rinn-Strasse 16
|
||
#35452 Heuchelheim
|
||
#Tel.: 0641 / 202360
|
||
#E-Mail: info@didalog.de
|
||
|
||
#Version Number: 1.0.0.0
|
||
#Version Date: 20.03.2019
|
||
|
||
#Requires –Version 4.0
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
######################################## check for arguments ##########################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
################################## add additional buildin assemblys ###################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
#Add-Type -AssemblyName System.Windows.Forms -ErrorAction Stop
|
||
#Add-Type -AssemblyName PresentationCore -ErrorAction Stop
|
||
#Add-Type -AssemblyName PresentationFramework -ErrorAction Stop
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
############################################ set variables ############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
Set-Variable -Scope Global -Name ScriptName -Value (($MyInvocation.MyCommand.Name) -split "\.")[0].ToString()
|
||
Set-Variable -Scope Global -Name ScriptPath -Value (Split-Path ($MyInvocation.MyCommand.Path))
|
||
Set-Variable -Scope Global -Name ConfigFile -Value (Get-ChildItem -Path "$ScriptPath" -Recurse -Filter "$ScriptName`_Settings.ini" -File -Force).FullName
|
||
Set-Variable -Scope Global -Name ConfigFileContent -Value $NULL
|
||
Set-Variable -Scope Global -Name Timestamp1 -Value $(Get-Date -Format 'ddMMyyyy')
|
||
Set-Variable -Scope Global -Name Timestamp2 -Value $(Get-Date -Format 'ddMMyyyy_HHmmss')
|
||
Set-Variable -Scope Global -Name Timestamp3 -Value $(Get-Date -Format 'ddMMyyyy_HHmmssffff')
|
||
Set-Variable -Scope Global -Name Timestamp4 -Value $(Get-Date -Format 'yyyyMMdd HH:mm:ss.fff')
|
||
Set-Variable -Scope Global -Name Item -Value $NULL
|
||
Set-Variable -Scope Global -Name Items -Value $NULL
|
||
Set-Variable -Scope Global -Name VersionSeperator -Value "~"
|
||
Set-Variable -Scope Global -Name Counter1 -Value 0
|
||
Set-Variable -Scope Global -Name LogFile -Value "$ScriptName`_$Timestamp2.log"
|
||
Set-Variable -Scope Global -Name LogFileKeepTime -Value 60
|
||
Set-Variable -Scope Global -Name LogPath -Value $NULL
|
||
Set-Variable -Scope Global -Name FileDelayAge -Value 5
|
||
Set-Variable -Scope Global -Name FileTest1 -Value $NULL
|
||
Set-Variable -Scope Global -Name FileTest2 -Value $NULL
|
||
Set-Variable -Scope Global -Name FileTest3 -Value $NULL
|
||
Set-Variable -Scope Global -Name PathTest -Value $NULL
|
||
Set-Variable -Scope Global -Name Module -Value $NULL
|
||
Set-Variable -Scope Global -Name Modules -Value ("Read-ConfigFile2","Write-LogFile","Test-Path-withLogging","Test-Path-withLogging")
|
||
Set-Variable -Scope Global -Name ModuleOverrideSourcePath -Value $NULL
|
||
Set-Variable -Scope Global -Name ModuleDefaultSourcePath -Value "P:\Skriptentwickung\released-and-published\Modules"
|
||
Set-Variable -Scope Global -Name ModuleHKLMRegistryPath -Value "HKLM:\SOFTWARE\Digital Data\Modules"
|
||
Set-Variable -Scope Global -Name ModuleHKCURegistryPath -Value "HKCU:\SOFTWARE\Digital Data\Modules"
|
||
Set-Variable -Scope Global -Name Profile -Value $NULL
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
############################################ set functions ############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
Function Load-PowerShellModule {
|
||
|
||
<#
|
||
.SYNOPSIS
|
||
Function will load external - additional - PowerShell Modules into current PSSession.
|
||
|
||
.DESCRIPTION
|
||
By working with Modules, this Function is necessary to load external Modul Functions into the current PowerShell Session.
|
||
In a productive Enviroment it is recommanded to let this Function set the Registry Key in HKLM for the ModuleSourcePath.
|
||
In develepment and Test Enviroment it is possible, to work with distributed Folders with different Modules. Therefor the Parameter
|
||
"ModuleOverrideSourcePath" and the preset Variable "ModuleDefaultSourcePath" are made for.
|
||
After a successful Import of a Module, Function will Return $True, otherwise a $False.
|
||
|
||
.REQUIREMENT General
|
||
PowerShell V3
|
||
|
||
.REQUIREMENT Assembly
|
||
System.Windows.Forms, PresentationCore, PresentationFramework
|
||
|
||
.REQUIREMENT Variables
|
||
ModuleOverrideSourcePath, ModuleName, Path, Paths, PathTest, FileTest, Result
|
||
|
||
.REQUIREMENT Variables preSet
|
||
ScriptName, ScriptPath, ModuleDefaultSourcePath (optional)
|
||
|
||
.REQUIREMENT Functions
|
||
<NONE>
|
||
|
||
.VERSION
|
||
1.1.0.0 / 22.02.2017
|
||
|
||
.PARAMETER ModuleName
|
||
Give the Module Name, you want to load into the current PSSession (without File-Extension).
|
||
|
||
.PARAMETER ModuleOverrideSourcePath
|
||
Optional Parameter. By giving the ModuleOverrideSourcePath, Function will not check other Paths for the Function you want to load.
|
||
|
||
.PARAMETER ModuleFileExtensions
|
||
Optional Parameter. Give the Module File-Extension (regular: "psm1" or "dll") without a dot ("."), this is just for the checking routine, not the Import itself.')]
|
||
|
||
.PARAMETER Force
|
||
Optional Parameter. By using the Force Parameter, Module will be unload and reload.
|
||
|
||
.EXAMPLE
|
||
Load-PowerShellModule -ModuleName Write-LogFile -ModuleFileExtensions psm1
|
||
|
||
.EXAMPLE
|
||
Load-PowerShellModule -ModuleName Write-LogFile -Force
|
||
|
||
.EXAMPLE
|
||
Load-PowerShellModule -ModuleName Write-LogFile -ModuleFileExtensions psm1 -ModuleOverrideSourcePath D:\ScriptFiles\Modules
|
||
#>
|
||
|
||
Param (
|
||
|
||
[Parameter(Position=0,Mandatory=$True,ValueFromPipeline=$True,HelpMessage='Give the ModuleName, you want to load into the current PSSession (without File-Extension)')]
|
||
[ValidateNotNullOrEmpty()]
|
||
[String]$ModuleName,
|
||
|
||
[Parameter(Position=1,Mandatory=$False,HelpMessage='Optional Parameter. By giving the ModuleOverrideSourcePath, Function will not check other Paths for the Function you want to load.')]
|
||
[ValidateNotNullOrEmpty()]
|
||
[String]$ModuleOverrideSourcePath,
|
||
|
||
[Parameter(Position=2,Mandatory=$False,HelpMessage='Optional Parameter. Give the Module File-Extension (regular: "psm1" or "dll") without a dot ("."), this is just for the checking routine, not the Import itself.')]
|
||
[ValidateSet("psm1","dll")]
|
||
[Array]$ModuleFileExtensions = @("psm1","dll"),
|
||
|
||
[Parameter(Position=3,Mandatory=$False,HelpMessage='Optional Parameter. By using the Force Parameter, Module will be unload and reload.')]
|
||
[Switch]$Force
|
||
|
||
) #end param
|
||
|
||
Process {
|
||
|
||
#Clear Error Variable
|
||
$error.clear()
|
||
|
||
#Loop for every possible File Extension (eg. psm1 and dll)
|
||
FOREACH ($ModuleFileExtension in $ModuleFileExtensions) {
|
||
|
||
#If FileExtension was given, remove it! Because otherwise "Import-Module" Function will have trouble importing.
|
||
$ModuleName = $ModuleName -Replace("\.[a-zA-Z0-9]{3,4}","")
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: You want to load Module $ModuleName.$ModuleFileExtension"
|
||
|
||
IF ((([String]::IsNullOrWhiteSpace($ScriptName) -ne $True) -and ([String]::IsNullOrEmpty($ScriptName) -ne $True)) -and (([String]::IsNullOrWhiteSpace($ScriptPath) -ne $True) -and ([String]::IsNullOrEmpty($ScriptPath) -ne $True))) {
|
||
|
||
#Try this if $ModuleOverrideSourcePath was given by calling the function
|
||
IF ((([String]::IsNullOrWhiteSpace($ModuleOverrideSourcePath)) -ne $True) -and (([String]::IsNullOrEmpty($ModuleOverrideSourcePath)) -ne $True)) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Function has been called with 'ModuleOverrideSourcePath' Parameter input!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Testing for existence: $ModuleOverrideSourcePath\$ModuleName.$ModuleFileExtension"
|
||
$FileTest = Test-Path -Path "$ModuleOverrideSourcePath\$ModuleName.$ModuleFileExtension" -PathType Leaf
|
||
|
||
IF ($FileTest -eq $True) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: $ModuleOverrideSourcePath and ModuleName seems to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to import Module: $ModuleName.$ModuleFileExtension"
|
||
|
||
Try {
|
||
|
||
$Result = Import-Module $ModuleOverrideSourcePath\$ModuleName -Verbose -DisableNameChecking -Scope Global -Force:$Force -PassThru -ErrorAction SilentlyContinue
|
||
|
||
IF ("$Result" -eq "$ModuleName") {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Successfully loaded Module: $ModuleName.$ModuleFileExtension"
|
||
Return $True
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Error "DEBUG Info - Load-PowerShellModule: Unsuccessfully loaded Module: $ModuleName.$ModuleFileExtension"
|
||
Return $False
|
||
|
||
} #end else
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Error while importing the Module:"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: $ModuleName"
|
||
Write-Host $Error
|
||
Return $False
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ModuleOverrideSourcePath and/or ModuleName seems not to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Cannot load Module, please check your input!"
|
||
Return $False
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
#If $ModuleOverrideSourcePath was not given, try to find a matching folder
|
||
ELSE {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Function has been called without 'ModuleOverrideSourcePath' Parameter input!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to find Module Files on some Places of this Computer."
|
||
|
||
#Set dynamic Array for locations Modul Path could be, even for some testing.
|
||
#The first value of the array is just a dummy and will never be used -but keep it for the array value starting with 0!
|
||
[System.Collections.ArrayList]$Paths = @()
|
||
Write-Host ""
|
||
$Paths.Add("$env:systemroot\") | Out-Null
|
||
|
||
IF (([String]::IsNullOrEmpty($ModuleDefaultSourcePath)) -or ([String]::IsNullOrWhiteSpace($ModuleDefaultSourcePath))) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ModuleDefaultSourcePath was not set! That could be a normal behavior in productive enviroment!"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (1): $ModuleDefaultSourcePath" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$ModuleDefaultSourcePath") | Out-Null
|
||
|
||
} #end else
|
||
|
||
IF ([String]::IsNullOrEmpty($ScriptPath) -or ([String]::IsNullOrWhiteSpace($ScriptPath))) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ScriptPath is invalid! That is terrifying! How could that be???"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (2): $ScriptPath" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$ScriptPath") | Out-Null
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (3): $($ScriptPath+"\Module")" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$($ScriptPath+"\Module")") | Out-Null
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (4): $($ScriptPath+"\Modules")" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$($ScriptPath+"\Modules")") | Out-Null
|
||
|
||
} #end else
|
||
|
||
IF (([String]::IsNullOrEmpty((Get-Item $ScriptPath).Parent.FullName)) -or ([String]::IsNullOrWhiteSpace((Get-Item $ScriptPath).Parent.FullName))) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ScriptPath has no Parent Folders!"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (5): $((Get-Item $ScriptPath).Parent.FullName)" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$((Get-Item $ScriptPath).Parent.FullName)") | Out-Null
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (6): $(((Get-Item $ScriptPath).Parent.FullName)+"\Module")" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$(((Get-Item $ScriptPath).Parent.FullName)+"\Module")") | Out-Null
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (7): $(((Get-Item $ScriptPath).Parent.FullName)+"\Modules")" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$(((Get-Item $ScriptPath).Parent.FullName)+"\Modules")") | Out-Null
|
||
|
||
} #end else
|
||
|
||
IF (([String]::IsNullOrEmpty($((Get-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath))) -or ([String]::IsNullOrWhiteSpace($((Get-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)))) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ModuleSourcePath was not set to Windows Registry (HKLM)!"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (8): $((Get-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$((Get-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)") | Out-Null
|
||
|
||
} #end else
|
||
|
||
IF (([String]::IsNullOrEmpty($((Get-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath))) -or ([String]::IsNullOrWhiteSpace($((Get-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)))) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ModuleSourcePath was not set to Windows Registry (HKCU)!"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Possible Path (8): $((Get-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)" -ErrorAction SilentlyContinue
|
||
$Paths.Add("$((Get-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -ErrorAction SilentlyContinue).ModuleSourcePath)") | Out-Null
|
||
|
||
} #end else
|
||
|
||
[Int]$Counter = 0
|
||
[String]$ModuleSourcePath = $Null
|
||
|
||
#Loop for multiple Pathtests - for each Path, where Module files could be
|
||
DO {
|
||
|
||
$Counter++
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Testing mutiple Paths ( $Counter of"($($Paths.Count)-1)") for existence, now testing:"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: $($Paths[$Counter])"
|
||
|
||
IF ((([String]::IsNullOrWhiteSpace($($Paths[$Counter]))) -ne $True) -and (([String]::IsNullOrEmpty($($Paths[$Counter])) -ne $True))) {
|
||
|
||
$PathTest = (Test-Path $($Paths[$Counter]) -ErrorAction SilentlyContinue)
|
||
|
||
IF ($PathTest -eq $True) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Yes, Path seems to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Lets check, if there are any Module Files, in it."
|
||
|
||
$FileTest = Get-ChildItem -Path $($Paths[$Counter]) -Filter *.$ModuleFileExtension
|
||
|
||
IF ($($FileTest.count) -gt 0) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Found $($FileTest.count) $ModuleFileExtension Module Files in Path!"
|
||
Set-Variable -Name ModuleSourcePath -Value $($Paths[$Counter]) -Scope local
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Found no $ModuleFileExtension Module Files in Path!"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: No, Path seems not to exist."
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Path seems to be invalid!"
|
||
|
||
} #end else
|
||
|
||
} #end do
|
||
|
||
UNTIL ($Counter -ge ($($Paths.Count)-1) -or ($ModuleSourcePath -eq $($Paths[$Counter])))
|
||
|
||
IF ($ModuleSourcePath -eq $($Paths[$Counter])) {
|
||
|
||
$FileTest = (Test-Path -Path $ModuleSourcePath\$ModuleName.$ModuleFileExtension -PathType Leaf -ErrorAction SilentlyContinue)
|
||
|
||
IF ($FileTest -eq $True) {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to import Module: $ModuleName.$ModuleFileExtension"
|
||
|
||
Try {
|
||
|
||
$Result = Import-Module $ModuleSourcePath\$ModuleName -Verbose -DisableNameChecking -Scope Global -Force:$Force -PassThru -ErrorAction SilentlyContinue
|
||
|
||
IF ("$Result" -eq "$ModuleName") {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Successfully loaded Module: $ModuleName.$ModuleFileExtension"
|
||
Set-Variable -Name ModuleDefaultSourcePath -Value $ModuleSourcePath -Scope Global
|
||
Return $True
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Error "DEBUG Info - Load-PowerShellModule: Unsuccessfully loaded Module: $ModuleName.$ModuleFileExtension"
|
||
Return $False
|
||
|
||
} #end else
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Loading Module: $ModuleName went wrong."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this error!"
|
||
Write-Host $Error
|
||
Return $False
|
||
exit
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Module does not exist!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Skipping: $ModuleName.$ModuleFileExtension"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Cant locate Module Files automaticlly!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Please select Folder in Dialog."
|
||
|
||
#Prepare Folder Browser Dialog, to choose the Directory with the .psm1 Files.
|
||
$FolderBrowserDialog = New-Object System.Windows.Forms.FolderBrowserDialog
|
||
$FolderBrowserDialog.Rootfolder = "Desktop"
|
||
$FolderBrowserDialog.Description = "Please, choose the Folder, where the Module ""$ModuleName.$ModuleFileExtension"" is stored."
|
||
$FolderBrowserDialog.SelectedPath = "$ScriptPath"
|
||
$FolderBrowserDialog.ShowNewFolderButton = $True
|
||
|
||
DO {
|
||
|
||
#Now show the Folder Browser, if neccessary in a loop
|
||
$FolderBrowserDialogShow = $FolderBrowserDialog.ShowDialog()
|
||
|
||
#By pressing the OK Button..
|
||
If ($FolderBrowserDialogShow -eq "OK") {
|
||
|
||
#Save selected folder path in the variable
|
||
$ModuleSourcePath = ($FolderBrowserDialog.SelectedPath)
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: You choose: $ModuleSourcePath"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: ...testing, if Module ""$ModuleName.$ModuleFileExtension"" can be found there."
|
||
|
||
$FileTest = (Test-Path $ModuleSourcePath\$ModuleName.$ModuleFileExtension -PathType Leaf -ErrorAction SilentlyContinue)
|
||
|
||
IF ($FileTest -eq $True) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Module seems to exist, in the selected Folder."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Now trying to load Module: $ModuleName.$ModuleFileExtension"
|
||
|
||
Try {
|
||
|
||
$Result = Import-Module $ModuleSourcePath\$ModuleName -Verbose -DisableNameChecking -Scope Global -Force:$Force -PassThru -ErrorAction SilentlyContinue
|
||
|
||
IF ("$Result" -eq "$ModuleName") {
|
||
|
||
Set-Variable -Name ModuleDefaultSourcePath -Value $ModuleSourcePath -Scope Global
|
||
|
||
$MessageBoxBody = "Module: $ModuleName.$ModuleFileExtension - successsfully loaded into current PSSession!"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Information"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon) | Out-Null
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
$MessageBoxBody = "Module: $ModuleName.$ModuleFileExtension - cannot load into current PSSession!"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Warning"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon) | Out-Null
|
||
|
||
} #end else
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Loading Module: $ModuleName.$ModuleFileExtension went wrong."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this error!"
|
||
Write-Host $Error
|
||
exit
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Module seems not to exist, in the selected Folder."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Please, select another one! ...this Time the right!"
|
||
|
||
$MessageBoxBody = "Module seems not to exist, in the selected Folder! Please, select another one!"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Warning"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon) | Out-Null
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
#If you didnt pressed the OK Button..
|
||
Else {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Operation cancelled by user."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this!"
|
||
exit
|
||
|
||
} #end else
|
||
|
||
} #end do
|
||
|
||
#Variable "$?" is $True when last operation was ok
|
||
UNTIL ((($FileTest -eq $True) -and ($? -eq $True)) -or ($FolderBrowserDialogShow -eq "Cancel"))
|
||
|
||
IF (([String]::IsNullOrWhiteSpace($ModuleSourcePath) -ne $True) -and ([String]::IsNullOrEmpty($ModuleSourcePath) -ne $True)) {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Should ModuleSourcePath written to Windows Registry?"
|
||
|
||
$MessageBoxBody = "Would you like to save the ModulePath to the Windows Registry?"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "YesNo"
|
||
$MessageBoxIcon = "Question"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
|
||
IF ($MessageBox -eq 'Yes') {
|
||
|
||
$PathTest = (Test-Path -Path "$ModuleHKLMRegistryPath" -ErrorAction SilentlyContinue)
|
||
$MessageBox = $NULL
|
||
|
||
IF ($PathTest -eq $False) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Registry Key seems not to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to write ModuleSourcepath to HKLM."
|
||
|
||
Try {
|
||
|
||
New-Item -Path "$ModuleHKLMRegistryPath" -Force -ErrorAction Stop | Out-Null
|
||
New-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorAction Stop | Out-Null
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host $Error
|
||
$MessageBoxBody = "Could not save ModuleSourcePath to Windows Registry! Check your access rights! To bypass this issue you can write the ModuleSourcePath to User Registry (HKCU). Would you?"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "YesNo"
|
||
$MessageBoxIcon = "Question"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSEIF ($PathTest -eq $True) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Registry Key seems to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to write ModuleSourcepath to HKLM."
|
||
|
||
Try {
|
||
|
||
Set-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorAction Stop | Out-Null
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host $Error
|
||
$MessageBoxBody = "Could not save ModuleSourcePath to Windows Registry! Check your access rights! To Bypass Error: Write ModuleSource Path to User Registry (HKCU)?"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "YesNo"
|
||
$MessageBoxIcon = "Question"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
|
||
} #end catch
|
||
|
||
} #end elseif
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Something went wrong, by getting the ModuleSourcePath!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this!"
|
||
exit
|
||
|
||
} #end else
|
||
|
||
#Block for trying to write the ModuleSourcePath to the User Registry, if System Registry failed.
|
||
IF ($MessageBox -eq 'Yes') {
|
||
|
||
$PathTest = (Test-Path -Path "$ModuleHKCURegistryPath" -ErrorAction SilentlyContinue)
|
||
$MessageBox = $NULL
|
||
|
||
IF ($PathTest -eq $False) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Registry Key seems not to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to write ModuleSourcepath to HKCU."
|
||
|
||
Try {
|
||
|
||
New-Item -Path "$ModuleHKCURegistryPath" -Force -ErrorAction Stop | Out-Null
|
||
New-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorAction Stop | Out-Null
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host $Error
|
||
$MessageBoxBody = "Could not save ModuleSourcePath to Windows Registry! Not even to User Registry! Check your access rights! Exiting now.."
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Warning"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
exit
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSEIF ($PathTest -eq $True) {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Registry Key seems to exist."
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Trying to write ModuleSourcepath to HKCU."
|
||
|
||
Try {
|
||
|
||
Set-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorAction Stop | Out-Null
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Host $Error
|
||
$MessageBoxBody = "Could not save ModuleSourcePath to Windows Registry! Not even to User Registry! Check your access rights! Exiting now.."
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Warning"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
exit
|
||
|
||
} #end catch
|
||
|
||
} #end elseif
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Something went wrong, by getting the ModuleSourcePath!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this!"
|
||
exit
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: You choose, not to save the ModuleSourcePath to the Windows Registry!"
|
||
|
||
$MessageBoxBody = "You choose, not to save the ModuleSourcePath to the Windows Registry!"
|
||
$MessageBoxTitle = "ScriptName: $ScriptName - Module/Section: Load-PowerShellModule"
|
||
$MessageBoxButtonType = "OK"
|
||
$MessageBoxIcon = "Warning"
|
||
$MessageBox = [Windows.Forms.MessageBox]::Show($MessageBoxBody,$MessageBoxTitle,$MessageBoxButtonType,$MessageBoxIcon)
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Something went wrong, by getting the ModuleSourcePath!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Exiting Script, because of this!"
|
||
exit
|
||
|
||
} #end else
|
||
|
||
} #end else
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host ""
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Required Variables (ScriptName and ScriptPath) were not set!"
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: Module Import is unvailable without this Variables!"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
} #end process
|
||
|
||
} #end function
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
########################################### preparing part ############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
#Clear Console Content
|
||
Clear-Host
|
||
|
||
#Load external Modules - use Force ( -Force) Parameter, to reload in every run
|
||
FOREACH ($Module in $Modules) {
|
||
|
||
$Result = Load-PowerShellModule -ModuleName $Module -Force
|
||
|
||
IF ($Result -eq $False) {
|
||
|
||
Write-Host "DEBUG Info: Module: $Module was not succesful been loaded!"
|
||
Write-Host "DEBUG Info: Please load the Module and try again, running this Function/Module!"
|
||
Write-Host "DEBUG Info: Exiting, because of this Issue."
|
||
Write-Host $Error
|
||
EXIT
|
||
|
||
} #end if
|
||
|
||
} #end foreach
|
||
|
||
#Read ConfigFile and load its content into a Object
|
||
[OBJECT]$ConfigFileContent = Read-ConfigFile2 -ConfigFile $ConfigFile
|
||
|
||
#Allocate Variable Values, depending on the read ConfigFile
|
||
[ARRAY]$LogPaths = $ConfigFileContent."LogPath_$($ConfigFileContent.LogPath[0])"
|
||
[STRING]$LogFileKeepTime = $ConfigFileContent."LogFileKeepTime_$($ConfigFileContent.LogFileKeepTime[0])"
|
||
[STRING]$VersionSeperator = $ConfigFileContent."VersionSeperator_$($ConfigFileContent.VersionSeperator[0])"
|
||
[STRING]$FileDelayAge = $ConfigFileContent."FileDelayAge_$($ConfigFileContent.FileDelayAge[0])"
|
||
|
||
#Create Object for Profile, the most Propertys of it will be rewritten in the main loop
|
||
Try {
|
||
|
||
[OBJECT]$Profile = New-Object PSObject -ErrorAction Stop
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name Count -Value "$($ConfigFileContent.Profile[0])" -ErrorAction Stop
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name Counter -Value 0 -ErrorAction Stop
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Error creating Object for: Profile"
|
||
Write-Logfile -LogLine "Property Value is missing or invalid!"
|
||
|
||
#Removeing incomplete Object
|
||
Remove-Variable -Name Profile -Force -ErrorAction SilentlyContinue
|
||
|
||
} #end catch
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
############################################# main part ###############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
#Clear Error Variable
|
||
$Error.Clear() | Out-Null
|
||
|
||
#Clear Console Output
|
||
Clear-Host
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "********************************************************************************"
|
||
Write-Logfile -LogLine "Program Startup: $ScriptName on $env:COMPUTERNAME,"
|
||
Write-Logfile -LogLine "from Account $env:USERDOMAIN\$env:USERNAME."
|
||
Write-Logfile -LogLine "********************************************************************************"
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found $($Profile.Count) Profile(s) to process."
|
||
|
||
#Start main part, if there is at least one profile defined
|
||
IF ($Profile.Count -gt 0) {
|
||
|
||
#Loop for every Profile configured. Every Profile is one line in the ConfigFile.
|
||
DO {
|
||
|
||
$Profile.Counter++ | Out-Null
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
Write-Logfile -LogLine "This is Profile: $($Profile.Counter) of $($Profile.Count)"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name ProfileType -Value ($ConfigFileContent."Profile_$($Profile.Counter)")[0] -Force
|
||
Write-Logfile -LogLine "Configured ProfileType is: $($Profile.ProfileType)"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name SourcePath -Value ($ConfigFileContent."Profile_$($Profile.Counter)")[1] -Force
|
||
Write-Logfile -LogLine "Configured SourcePath is: $($Profile.SourcePath)"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name SourcePathFilter -Value ($ConfigFileContent."Profile_$($Profile.Counter)")[2] -Force
|
||
Write-Logfile -LogLine "Configured SourcePathFilter is: $($Profile.SourcePathFilter)"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name SourcePathRecurse -Value ($ConfigFileContent."Profile_$($Profile.Counter)")[3] -Force
|
||
Write-Logfile -LogLine "Configured SourcePathRecurse is: $($Profile.SourcePathRecurse)"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name DeleteItemsOlderThen -Value ($ConfigFileContent."Profile_$($Profile.Counter)")[4] -Force
|
||
Write-Logfile -LogLine "Configured DeleteItemsOlderThen is: $($Profile.DeleteItemsOlderThen)"
|
||
|
||
Add-Member -InputObject $Profile -MemberType NoteProperty -Name DeleteItemsOlderThenUnit -Value $NULL -Force
|
||
|
||
#Check if every Mandatory Value is set.
|
||
IF ($Profile.SourcePath -and $Profile.SourcePathFilter -and $Profile.SourcePathRecurse -and $Profile.DeleteItemsOlderThen) {
|
||
|
||
#Do all needed folders exist?
|
||
Test-Path-withLogging -Path $($Profile.SourcePath) | Out-Null
|
||
|
||
#Determ if subfolders should be searched to
|
||
IF (($Profile.SourcePathRecurse -eq $true) -or ($Profile.SourcePathRecurse -eq "true") -or ($Profile.SourcePathRecurse -eq "treu") -or ($Profile.SourcePathRecurse -eq 1) -or ($Profile.SourcePathRecurse -eq "yes")) {
|
||
|
||
$Profile.SourcePathRecurse = $true
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
$Profile.SourcePathRecurse = $false
|
||
|
||
} #end else
|
||
|
||
IF ((($Profile.ProfileType) -match "FilesOnly") -or (($Profile.ProfileType) -match "FilesAndFolders")) {
|
||
|
||
#Determ if we are looking for files which are older then .. years, days, hours or minutes
|
||
IF ($Profile.DeleteItemsOlderThen -match "year") {
|
||
|
||
Write-Host "DEBUG Info: Keyword 'Year' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'Year' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Filter "$($Profile.SourcePathFilter)" -Recurse:$($Profile.SourcePathRecurse) -File -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddYears(-$Profile.DeleteItemsOlderThen)) -and -not $_.psiscontainer}
|
||
|
||
} #end if
|
||
|
||
ELSEIF ($Profile.DeleteItemsOlderThen -match "day") {
|
||
|
||
Write-Host "DEBUG Info: Keyword 'day' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'day' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Filter "$($Profile.SourcePathFilter)" -Recurse:$($Profile.SourcePathRecurse) -File -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddDays(-$Profile.DeleteItemsOlderThen)) -and -not $_.psiscontainer}
|
||
|
||
} #end elseif
|
||
|
||
ELSEIF ($Profile.DeleteItemsOlderThen -match "hour") {
|
||
|
||
Write-Host "DEBUG Info: Keyword 'hour' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'hour' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Filter "$($Profile.SourcePathFilter)" -Recurse:$($Profile.SourcePathRecurse) -File -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddHours(-$Profile.DeleteItemsOlderThen)) -and -not $_.psiscontainer}
|
||
|
||
} #end elseif
|
||
|
||
ELSEIF ($Profile.DeleteItemsOlderThen -match "minute") {
|
||
|
||
Write-Host "DEBUG Info: Keyword 'minute' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'minute' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Filter "$($Profile.SourcePathFilter)" -Recurse:$($Profile.SourcePathRecurse) -File -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddMinutes(-$Profile.DeleteItemsOlderThen)) -and -not $_.psiscontainer}
|
||
|
||
} #end elseif
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Unknown value in 'DeleteItemsOlderThen'."
|
||
Write-Logfile -LogLine "Cannot proceed."
|
||
$Items = $NULL
|
||
|
||
} #end else
|
||
|
||
IF ($Items.count -gt 0) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found $($Items.count) Files in the SourcePath!"
|
||
|
||
#Loop for every found File in this Profile
|
||
FOREACH ($Item in $Items) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
Write-Logfile -LogLine "Processing File: $($Item.fullname)"
|
||
Write-Logfile -LogLine "Attributes: $($Item.Attributes)"
|
||
Write-Logfile -LogLine "CreationTime: $($Item.CreationTime)"
|
||
Write-Logfile -LogLine "LastAccessTime: $($Item.LastAccessTime)"
|
||
Write-Logfile -LogLine "LastWriteTime: $($Item.LastWriteTime)"
|
||
|
||
#Setting input file vars for this loop
|
||
TRY {
|
||
|
||
Write-Logfile -LogLine "Trying to delete..."
|
||
$Item | Remove-Item -Force -ErrorAction Stop
|
||
Write-Logfile -LogLine "Successful!"
|
||
|
||
} #end try
|
||
|
||
CATCH {
|
||
|
||
Write-Logfile -LogLine "Error, cannot delete File!"
|
||
Write-Logfile -LogLine "$Error"
|
||
|
||
} #end catch
|
||
|
||
} #end foreach
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found no valid Files in the SourcePath!"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSEIF ((($Profile.ProfileType) -match "FoldersOnly") -or (($Profile.ProfileType) -match "FilesAndFolders")) {
|
||
|
||
DO {
|
||
|
||
#Determ if we are looking for files which are older then .. years, days, hours or minutes
|
||
IF (($Profile.DeleteItemsOlderThen -match "year") -or ($Profile.DeleteItemsOlderThenUnit -eq "year")) {
|
||
|
||
$Profile.DeleteItemsOlderThenUnit = "year"
|
||
Write-Host "DEBUG Info: Keyword 'Year' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'Year' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Directory -Recurse:$($Profile.SourcePathRecurse) -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddYears(-$Profile.DeleteItemsOlderThen)) -and $_.psiscontainer} | Where { (gci $_.fullName -ErrorAction SilentlyContinue).count -eq 0 } #| select -expandproperty FullName -ErrorAction SilentlyContinue
|
||
|
||
} #end if
|
||
|
||
ELSEIF (($Profile.DeleteItemsOlderThen -match "day") -or ($Profile.DeleteItemsOlderThenUnit -eq "day")) {
|
||
|
||
$Profile.DeleteItemsOlderThenUnit = "day"
|
||
Write-Host "DEBUG Info: Keyword 'day' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'day' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Directory -Recurse:$($Profile.SourcePathRecurse) -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddDays(-$Profile.DeleteItemsOlderThen)) -and $_.psiscontainer} | Where { (gci $_.fullName -ErrorAction SilentlyContinue).count -eq 0 } #| select -expandproperty FullName -ErrorAction SilentlyContinue
|
||
|
||
} #end elseif
|
||
|
||
ELSEIF (($Profile.DeleteItemsOlderThen -match "hour") -or ($Profile.DeleteItemsOlderThenUnit -eq "hour")) {
|
||
|
||
$Profile.DeleteItemsOlderThenUnit = "hour"
|
||
Write-Host "DEBUG Info: Keyword 'hour' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'hour' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Directory -Recurse:$($Profile.SourcePathRecurse) -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddHours(-$Profile.DeleteItemsOlderThen)) -and $_.psiscontainer} | Where { (gci $_.fullName -ErrorAction SilentlyContinue).count -eq 0 } #| select -expandproperty FullName -ErrorAction SilentlyContinue
|
||
|
||
} #end elseif
|
||
|
||
ELSEIF (($Profile.DeleteItemsOlderThen -match "minute") -or ($Profile.DeleteItemsOlderThenUnit -eq "minute")) {
|
||
|
||
$Profile.DeleteItemsOlderThenUnit = "minute"
|
||
Write-Host "DEBUG Info: Keyword 'minute' found in profile definition."
|
||
$Profile.DeleteItemsOlderThen = ($Profile.DeleteItemsOlderThen | Select-String -pattern "[0-9]{1,}" -AllMatches | Foreach-Object {$_.Matches}).value
|
||
Write-Host "DEBUG Info: The 'minute' Value is: $($Profile.DeleteItemsOlderThen)."
|
||
$Items = Get-ChildItem -Path $($Profile.SourcePath) -Directory -Recurse:$($Profile.SourcePathRecurse) -ErrorAction SilentlyContinue | where {$_.lastwritetime -lt $((Get-Date).AddMinutes(-$Profile.DeleteItemsOlderThen)) -and $_.psiscontainer} | Where { (gci $_.fullName -ErrorAction SilentlyContinue).count -eq 0 } #| select -expandproperty FullName -ErrorAction SilentlyContinue
|
||
|
||
} #end elseif
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Unknown value in 'DeleteItemsOlderThen'."
|
||
Write-Logfile -LogLine "Cannot proceed."
|
||
$Items = $NULL
|
||
|
||
} #end else
|
||
|
||
IF ($Items.count -gt 0) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found $($Items.count) empty Folders in the SourcePath!"
|
||
|
||
#Loop for every found Folder in this Profile
|
||
FOREACH ($Item in $Items) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
Write-Logfile -LogLine "Processing Folder: $($Item.fullname)"
|
||
Write-Logfile -LogLine "Attributes: $($Item.Attributes)"
|
||
Write-Logfile -LogLine "CreationTime: $($Item.CreationTime)"
|
||
Write-Logfile -LogLine "LastAccessTime: $($Item.LastAccessTime)"
|
||
Write-Logfile -LogLine "LastWriteTime: $($Item.LastWriteTime)"
|
||
|
||
#Setting input file vars for this loop
|
||
TRY {
|
||
|
||
Write-Logfile -LogLine "Trying to delete..."
|
||
$Item | Remove-Item -Force -ErrorAction Stop
|
||
Write-Logfile -LogLine "Successful!"
|
||
|
||
} #end try
|
||
|
||
CATCH {
|
||
|
||
Write-Logfile -LogLine "Error, cannot delete Folder!"
|
||
Write-Logfile -LogLine "$Error"
|
||
|
||
} #end catch
|
||
|
||
} #end foreach
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found no (further) empty Folders in the SourcePath!"
|
||
|
||
} #end else
|
||
|
||
} WHILE ($Items.count -gt 0)
|
||
|
||
} #end elseif
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Unknown value in 'ProfileType'."
|
||
Write-Logfile -LogLine "Cannot proceed."
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Not all required Variables are set for this Profile."
|
||
Write-Logfile -LogLine "Skipping Profile because of that reason!"
|
||
|
||
} #end else
|
||
|
||
} UNTIL ($($Profile.Counter) -eq $($Profile.Count))
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "No Profiles are defined!"
|
||
Write-Logfile -LogLine "Check ConfigFile, please."
|
||
|
||
} #end else
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
Write-Logfile -LogLine "Checking for old LogFiles."
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
Remove-Item-withLogging -Path $LogPath -FileKeepTime $LogFileKeepTime -FileBaseName $ScriptName
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "********************************************************************************"
|
||
Write-Logfile -LogLine "Program Completed: $ScriptName on $env:COMPUTERNAME,"
|
||
Write-Logfile -LogLine "from Account $env:USERDOMAIN\$env:USERNAME."
|
||
Write-Logfile -LogLine "********************************************************************************"
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
########################################### finishing part ############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
Remove-Variable -Name ScriptName -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ScriptPath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ConfigFile -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ConfigFileContent -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Timestamp1 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Timestamp2 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Timestamp3 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Timestamp4 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Item -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Items -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name VersionSeperator -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name FileDelayAge -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name FileTest1 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name FileTest2 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name FileTest3 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name PathTest -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name PathTest2 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name PathTests -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Result -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Counter1 -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name LogFile -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name LogFileKeepTime -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name LogPath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name LogPaths -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Module -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Modules -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ModuleOverrideSourcePath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ModuleDefaultSourcePath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ModuleHKLMRegistryPath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name ModuleHKCURegistryPath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name Profile -Force -ErrorAction SilentlyContinue
|
||
|
||
$error.clear() |