1266 lines
117 KiB
PowerShell
1266 lines
117 KiB
PowerShell
#PowerShell 3.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.1.0
|
||
#Version Date: 15.02.2017
|
||
|
||
#Requires –Version 3.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 ConfigValues -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 FileTest -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-ConfigFile","Write-LogFile","Remove-Item-withLogging","Test-Path-withLogging","Load-EMLFile-withLogging","MoveOrCopy-Item-withLogging","Test-FileState-withLogging","DD_LIB_Standards")
|
||
Set-Variable -Scope Global -Name ModuleOverrideSourcePath -Value $NULL
|
||
Set-Variable -Scope Global -Name ModuleDefaultSourcePath -Value $NULL
|
||
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 SMTPDomains -Value $NULL
|
||
Set-Variable -Scope Global -Name SourcePath -Value $NULL
|
||
Set-Variable -Scope Global -Name SourcePathRecurse -Value $NULL
|
||
Set-Variable -Scope Global -Name EMLFile -Value $NULL
|
||
Set-Variable -Scope Global -Name EMLFileExtension -Value "eml"
|
||
Set-Variable -Scope Global -Name EMLFileContent -Value $NULL
|
||
Set-Variable -Scope Global -Name EMLObject -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressTEMP -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressesTEMP -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressTo -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressToRegEx -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressesTo -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressFrom -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressFromRegEx -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailAddressesFrom -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailDateSentOn -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailDateSentOnTEMP -Value $NULL
|
||
Set-Variable -Scope Global -Name EMailSubject -Value $NULL
|
||
|
||
Set-Variable -Scope Global -Name WDObjecttyp -Value $NULL
|
||
Set-Variable -Scope Global -Name WDIndexEMailTo -Value $NULL
|
||
Set-Variable -Scope Global -Name WDIndexEMailFrom -Value $NULL
|
||
Set-Variable -Scope Global -Name WDIndexEMailDate -Value $NULL
|
||
Set-Variable -Scope Global -Name WDIndexEMailSubject -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, Counter
|
||
|
||
.REQUIREMENT Functions
|
||
<NONE>
|
||
|
||
.VERSION
|
||
1.0.0.0 / 11.09.2016
|
||
|
||
.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 ModuleFileExtension
|
||
Optional Parameter. Give the Module File-Extension (regular: "psm1") 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 -ModuleFileExtension psm1
|
||
|
||
.EXAMPLE
|
||
Load-PowerShellModule -ModuleName Write-LogFile -Force
|
||
|
||
.EXAMPLE
|
||
Load-PowerShellModule -ModuleName Write-LogFile -ModuleFileExtension psm1 -ModuleOverrideSourcePath D:\ScriptFiles\Modules
|
||
#>
|
||
|
||
[cmdletbinding()]
|
||
|
||
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(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(mandatory=$False,HelpMessage='Optional Parameter. Give the Module File-Extension (regular: "psm1") without a dot ("."), this is just for the checking routine, not the Import itself.')]
|
||
[ValidateNotNullOrEmpty()]
|
||
[String]$ModuleFileExtension = "psm1",
|
||
|
||
[Parameter(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()
|
||
|
||
#If FileExtension was given, remove it! Because otherwise "Import-Module" Function will have trouble importing.
|
||
$ModuleName = $ModuleName.Replace(".$ModuleFileExtension","")
|
||
Write-Host "DEBUG Info - Load-PowerShellModule: You want to load Module $ModuleName"
|
||
|
||
#Try this if $ModuleOverrideSourcePath was given by calling the function
|
||
IF ((([String]::IsNullOrWhiteSpace($ModuleOverrideSourcePath)) -ne $true) -and (([String]::IsNullOrEmpty($ModuleOverrideSourcePath)) -ne $true)) {
|
||
|
||
Write-Host ""
|
||
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"
|
||
$PathTest = Test-Path -Path "$ModuleOverrideSourcePath\$ModuleName.$ModuleFileExtension" -PathType Leaf
|
||
|
||
IF ($PathTest -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 -ErrorVariable Error -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 psm1 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 ($($Paths[$Counter]) -gt $Null) {
|
||
|
||
$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) psm1 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])) {
|
||
|
||
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 -ErrorVariable Error -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 ""
|
||
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: 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."
|
||
|
||
$PathTest = (Test-Path $ModuleSourcePath\$ModuleName.$ModuleFileExtension)
|
||
|
||
IF ($PathTest -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 -ErrorVariable Error -ErrorAction SilentlyContinue
|
||
|
||
IF ("$Result" -eq "$ModuleName") {
|
||
|
||
$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 ((($PathTest -eq $True) -and ($? -eq $true)) -or ($FolderBrowserDialogShow -eq "Cancel"))
|
||
|
||
IF ($ModuleSourcePath -gt $Null) {
|
||
|
||
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")
|
||
$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 -ErrorVariable Error -ErrorAction Stop | Out-Null
|
||
New-ItemProperty -Path "$ModuleHKLMRegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorVariable Error -ErrorAction Stop | Out-Null
|
||
$env:PSModulePath = $env:PSModulePath + ";" + "$ModuleSourcePath"
|
||
|
||
} #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 -ErrorVariable Error -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")
|
||
$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 -ErrorVariable Error -ErrorAction Stop | Out-Null
|
||
New-ItemProperty -Path "$ModuleHKCURegistryPath" -Name ModuleSourcePath -Value $ModuleSourcePath -ErrorAction Stop | Out-Null
|
||
$env:PSModulePath = $env:PSModulePath + ";" + "$ModuleSourcePath"
|
||
|
||
} #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 -ErrorVariable Error -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 process
|
||
|
||
} #end function
|
||
|
||
#[Reflection.Assembly]::LoadFrom("$ModuleDefaultSourcePath\DD_LIB_Standards.dll") #| Out-Null
|
||
[DD_LIB_Standards.clsLogger]::LOGFILE_PATH=$LogPath+'\'+($LogFile.Replace('.log','.txt'))
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
########################################### 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
|
||
|
||
#Allocate Variable Values, depending on the read ConfigFile
|
||
Set-Variable -Scope Global -Name LogPaths -Value (Read-ConfigFile -ConfigLabel LogPath -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name LogFileKeepTime -Value (Read-ConfigFile -ConfigLabel LogFileKeepTime -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name VersionSeperator -Value (Read-ConfigFile -ConfigLabel VersionSeperator -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name FileDelayAge -Value (Read-ConfigFile -ConfigLabel FileDelayAge -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name SMTPDomains -Value (Read-ConfigFile -ConfigLabel SMTPDomains -ConfigLinesValue MultiValue) -Force
|
||
Set-Variable -Scope Global -Name SourcePath -Value (Read-ConfigFile -ConfigLabel SourcePath -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name SourcePathRecurse -Value (Read-ConfigFile -ConfigLabel SourcePathRecurse -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name EMailAddressToRegEx -Value (Read-ConfigFile -ConfigLabel EMailAddressToRegEx -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name EMailAddressFromRegEx -Value (Read-ConfigFile -ConfigLabel EMailAddressFromRegEx -ConfigLinesValue SingleValue) -Force
|
||
|
||
Set-Variable -Scope Global -Name WDObjecttyp -Value (Read-ConfigFile -ConfigLabel WDObjecttyp -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name WDIndexEMailTo -Value (Read-ConfigFile -ConfigLabel WDIndexEMailTo -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name WDIndexEMailFrom -Value (Read-ConfigFile -ConfigLabel WDIndexEMailFrom -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name WDIndexEMailDate -Value (Read-ConfigFile -ConfigLabel WDIndexEMailDate -ConfigLinesValue SingleValue) -Force
|
||
Set-Variable -Scope Global -Name WDIndexEMailSubject -Value (Read-ConfigFile -ConfigLabel WDIndexEMailSubject -ConfigLinesValue SingleValue) -Force
|
||
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
############################################# main part ###############################################
|
||
#-----------------------------------------------------------------------------------------------------#
|
||
|
||
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 "********************************************************************************"
|
||
|
||
IF ($SourcePath) {
|
||
|
||
$PathTest = Test-Path -Path "$SourcePath" -PathType Container -ErrorAction SilentlyContinue
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Checking the set SourcePath: $SourcePath"
|
||
|
||
IF ($PathTest -eq $True) {
|
||
|
||
IF ($SourcePathRecurse -like "True") {
|
||
|
||
Write-Logfile -LogLine "Recurse mode is enabled!"
|
||
$Items = Get-ChildItem -Path "$SourcePath" -Recurse -Force -ErrorAction SilentlyContinue -Filter "*.$EMLFileExtension" | where {$_.lastwritetime -lt $((Get-Date).AddMinutes(-$FileDelayAge)) -and -not $_.psiscontainer}
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Recurse mode is disabled!"
|
||
$Items = Get-ChildItem -Path "$SourcePath" -Force -ErrorAction SilentlyContinue -Filter "*.$EMLFileExtension" | where {$_.lastwritetime -lt $((Get-Date).AddMinutes(-$FileDelayAge)) -and -not $_.psiscontainer}
|
||
|
||
} #end else
|
||
|
||
IF ($Items.count -gt 0) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found $($Items.count) $EMLFileExtension File(s) in SourcePath!"
|
||
FOREACH ($Item in $Items) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
Write-Logfile -LogLine "Processing File: $($Item.FullName)"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
#Retrieve EML Object
|
||
$EMLObject = Load-EMLFile-withLogging -EMLFileName $($Item.FullName)
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "----------------- Getting EML Attributes... (unfilterd!) -----------------------"
|
||
Write-Logfile -LogLine "EML Attribut TO:"
|
||
Write-Logfile -LogLine "-> $($EMLObject.To)"
|
||
Write-Logfile -LogLine "EML Attribut FROM:"
|
||
Write-Logfile -LogLine "-> $($EMLObject.FROM)"
|
||
Write-Logfile -LogLine "EML Attribut SentOn Date:"
|
||
Write-Logfile -LogLine "-> $($EMLObject.SentOn)"
|
||
Write-Logfile -LogLine "EML Attribut Subject:"
|
||
Write-Logfile -LogLine "-> $($EMLObject.Subject)"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
#Prepare dynamic Arrays
|
||
[System.Collections.ArrayList]$EMailAddressesTo = @()
|
||
[System.Collections.ArrayList]$EMailAddressesFrom = @()
|
||
[System.Collections.ArrayList]$EMailAddressesTEMP = @()
|
||
#$SMTPDomains = $($SMTPDomains.tochararray())
|
||
|
||
#Get E-Mail To Attribut
|
||
IF (($EMLObject.TO).count -gt 0) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-LogFile -LogLine "Found $($EMLObject.TO.Count) E-Mail Adress(es) in the TO Attribut."
|
||
[Array]$EMailAddressesTEMP = ($EMLObject.TO)
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ',')
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ';')
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ' ')
|
||
|
||
FOREACH ($EMailAddressTEMP in $EMailAddressesTEMP) {
|
||
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace('\<|\>|\(|\)|\[|\]|\"|\s\,\;\:\=\\',''))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace("'",""))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimStart())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimEnd())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.ToLower())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP | Select-String -Pattern $SMTPDomains -AllMatches)
|
||
|
||
#Fill array, if Value is greater than $NULL
|
||
IF ($EMailAddressTEMP) {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML TO Attribut from EML Object) is valid!"
|
||
Write-Host "DEBUG Info: $EMailAddressTEMP"
|
||
$EMailAddressesTO.Add($EMailAddressTEMP)
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML TO Attribut from EML Object) is invalid!"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
[Array]$EMailAddressesTo = $EMailAddressesTo | Sort-Object
|
||
[Array]$EMailAddressesTo = $EMailAddressesTo | Select -Unique
|
||
[String]$EMailAddressesTEMP = $EMailAddressesTo | Out-String -Stream
|
||
[String]$EMailAddressesTo = $NULL
|
||
[String]$EMailAddressesTo = $EMailAddressesTEMP
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.TrimStart()
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.TrimEnd()
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.Replace(" ",", ")
|
||
[String]$EMailAddressTEMP = $NULL
|
||
[Array]$EMailAddressesTEMP = $NULL
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "-----------------This is the final EML Object TO String:------------------------"
|
||
Write-LogFile -LogLine "$EMailAddressesTo"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-LogFile -LogLine " "
|
||
Write-LogFile -LogLine "Found none valid E-Mail adress(es)in the To Attribut for this Mail, via EML Object."
|
||
Write-LogFile -LogLine "Now trying via EML Sourcecode!"
|
||
|
||
Try {
|
||
|
||
$EMLFileContent = $NULL
|
||
$EMLFileContent = Get-Content $($Item.FullName)
|
||
$EMailAddressesTEMP = [RegEx]::Matches($EMLFileContent, $EMailAddressToRegEx)
|
||
$EMailAddressesTEMP = ($EMailAddressesTEMP -split " ")
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-LogFile -LogLine "Cannot get Sourcecode from EMLFile: $($Item.FullName)"
|
||
|
||
} #end catch
|
||
|
||
Finally {
|
||
|
||
FOREACH ($EMailAddressTEMP in $EMailAddressesTEMP) {
|
||
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace('\<|\>|\(|\)|\[|\]|\"|\s\,\;\:\=\\',''))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace("'",""))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimStart())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimEnd())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.ToLower())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP | Select-String -Pattern $SMTPDomains -AllMatches)
|
||
|
||
IF ($EMailAddressTEMP) {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML TO Attribut from EML Sourcecode) is valid!"
|
||
Write-Host "DEBUG Info: $EMailAddressTEMP"
|
||
$EMailAddressesTO.Add($EMailAddressTEMP)
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML TO Attribut from EML Sourcecode) is invalid!"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
[String]$EMailAddressesTEMP = $EMailAddressesTo | Out-String -Stream
|
||
[String]$EMailAddressesTo = $NULL
|
||
[String]$EMailAddressesTo = $EMailAddressesTEMP
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.TrimStart()
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.TrimEnd()
|
||
[String]$EMailAddressesTo = $EMailAddressesTo.Replace(" ",", ")
|
||
[String]$EMailAddressTEMP = $NULL
|
||
[Array]$EMailAddressesTEMP = $NULL
|
||
|
||
Write-Logfile -LogLine "----------------This is the final EML Sourcecode TO String:---------------------"
|
||
Write-LogFile -LogLine "$EMailAddressesTo"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end finally
|
||
|
||
} #end else
|
||
|
||
#Get E-Mail From Attribut
|
||
IF (($EMLObject.From) -match "$SMTPDomains") {
|
||
|
||
Write-LogFile -LogLine " "
|
||
Write-LogFile -LogLine "Found $($EMLObject.From.Count) E-Mail Adresses in the FROM Attribut."
|
||
[Array]$EMailAddressesTEMP = ($EMLObject.FROM)
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ',')
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ';')
|
||
[Array]$EMailAddressesTEMP = ($EMailAddressesTEMP -Split ' ')
|
||
|
||
FOREACH ($EMailAddressTEMP in $EMailAddressesTEMP) {
|
||
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace('\<|\>|\(|\)|\[|\]|\"|\s\,\;\:\=\\',''))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace("'",""))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimStart())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimEnd())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.ToLower())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP | Select-String -Pattern $SMTPDomains -AllMatches)
|
||
|
||
#Fill array, if Value is greater than $NULL
|
||
IF ($EMailAddressTEMP) {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML FROM Attribut from EML Object) is valid!"
|
||
Write-Host "DEBUG Info: $EMailAddressTEMP"
|
||
$EMailAddressesFrom.Add($EMailAddressTEMP)
|
||
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML FROM Attribut from EML Object) is invalid!"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
[Array]$EMailAddressesFrom = $EMailAddressesFrom | Sort-Object
|
||
[Array]$EMailAddressesFrom = $EMailAddressesFrom | Select -Unique
|
||
[String]$EMailAddressesTEMP = $EMailAddressesFrom | Out-String -Stream
|
||
[String]$EMailAddressesFrom = $NULL
|
||
[String]$EMailAddressesFrom = $EMailAddressesTEMP
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.TrimStart()
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.TrimEnd()
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.Replace(" ",", ")
|
||
[String]$EMailAddressTEMP = $NULL
|
||
[Array]$EMailAddressesTEMP = $NULL
|
||
|
||
Write-Logfile -LogLine "---------------This is the final EML Object FROM String:------------------------"
|
||
Write-LogFile -LogLine "$EMailAddressesFrom"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-LogFile -LogLine " "
|
||
Write-LogFile -LogLine "Found none valid E-Mail adress(es)in the From Attribut for this Mail, via EML Object."
|
||
Write-LogFile -LogLine "Now trying via EML Sourcecode!"
|
||
|
||
Try {
|
||
|
||
$EMLFileContent = $NULL
|
||
$EMLFileContent = Get-Content $($Item.FullName)
|
||
$EMailAddressesTEMP = [RegEx]::Matches($EMLFileContent, $EMailAddressFromRegEx) | Select-Object -First 1
|
||
$EMailAddressesTEMP = ($EMailAddressesTEMP -split " ")
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-LogFile -LogLine "Cannot get Sourcecode from EMLFile: $($Item.FullName)"
|
||
|
||
} #end catch
|
||
|
||
Finally {
|
||
|
||
FOREACH ($EMailAddressTEMP in $EMailAddressesTEMP) {
|
||
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace('\<|\>|\(|\)|\[|\]|\"|\s\,\;\:\=\\',''))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP -Replace("'",""))
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimStart())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.TrimEnd())
|
||
$EMailAddressTEMP = ($EMailAddressTEMP.ToLower())
|
||
$EMailAddressTEMP = (($EMailAddressTEMP | Select-String -Pattern $SMTPDomains -AllMatches | Select-Object -First 1))
|
||
|
||
IF ($EMailAddressTEMP) {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML FROM Attribut from EML Sourcecode) is valid!"
|
||
Write-Host "DEBUG Info: $EMailAddressTEMP"
|
||
$EMailAddressesFrom.Add($EMailAddressTEMP)
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Host "DEBUG Info: Current Value (EML FROM Attribut from EML Sourcecode) is invalid!"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
[Array]$EMailAddressesFrom = $EMailAddressesFrom | Sort-Object
|
||
[Array]$EMailAddressesFrom = $EMailAddressesFrom | Select -Unique
|
||
[String]$EMailAddressesTEMP = $EMailAddressesFrom | Out-String -Stream
|
||
[String]$EMailAddressesFrom = $NULL
|
||
[String]$EMailAddressesFrom = $EMailAddressesTEMP
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.TrimStart()
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.TrimEnd()
|
||
[String]$EMailAddressesFrom = $EMailAddressesFrom.Replace(" ",", ")
|
||
[String]$EMailAddressTEMP = $NULL
|
||
[Array]$EMailAddressesTEMP = $NULL
|
||
|
||
Write-Logfile -LogLine "---------------This is the final EML Sourcecode FROM String:--------------------"
|
||
Write-LogFile -LogLine "$EMailAddressesFrom"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end finally
|
||
|
||
} #end else
|
||
|
||
#Get E-Mail Date Attribut
|
||
IF (($EMLObject.SentOn).count -eq 1) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-LogFile -LogLine "Found Date Value - $($EMLObject.SentOn) - seems to be valid!"
|
||
$EMailDateSentOn = $($EMLObject.SentOn)
|
||
$EMailDateSentOnTEMP = $EMailDateSentOn -split " "
|
||
$EMailDateSentOn = $EMailDateSentOnTEMP[0]
|
||
[Array]$EMailDateSentOn = $EMailDateSentOn -Split "/"
|
||
[String]$EMailDateSentOn = ($EMailDateSentOn[1]+'.'+$EMailDateSentOn[0]+'.'+$EMailDateSentOn[2])
|
||
|
||
Write-Logfile -LogLine "-----------------This is the final EML Object SentOn Date-----------------------"
|
||
Write-LogFile -LogLine "$EMailDateSentOn"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-LogFile -LogLine "Found Date Value seems to be invalid!"
|
||
|
||
} #end else
|
||
|
||
#Get E-Mail Subject Attribut
|
||
IF (($EMLObject.Subject).count -eq 1) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-LogFile -LogLine "Found Subject Value - $($EMLObject.Subject) - seems to be valid!"
|
||
$EMailSubject = $($EMLObject.Subject)
|
||
$EMailSubject = $EMailSubject.TrimStart()
|
||
$EMailSubject = $EMailSubject.TrimEnd()
|
||
|
||
Write-Logfile -LogLine "--------------------This is the final EML Object Subject------------------------"
|
||
Write-LogFile -LogLine "$EMailSubject"
|
||
Write-Logfile -LogLine "--------------------------------------------------------------------------------"
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-LogFile -LogLine "Found Subject Value seems to be invalid!"
|
||
|
||
} #end else
|
||
|
||
#Start indexing if all Values are set
|
||
IF (($EMailAddressesTo) -and ($EMailAddressesFrom) -and ($EMailDateSentOn) -and ($EMailSubject)) {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "All required Values are set!"
|
||
|
||
#Creating windream Session
|
||
$Result = $NULL
|
||
$Result = [DD_LIB_Standards.clsWindream]::Create_Session()
|
||
|
||
IF ($Result -like "True") {
|
||
|
||
Write-Logfile -LogLine "windream Session created!"
|
||
|
||
#Check for exisiting File
|
||
|
||
$Result = $NULL
|
||
$Result = [DD_LIB_Standards.clsWD_GET]::WDFile_exists($($Item.FullName))
|
||
|
||
IF ($Result -like "True") {
|
||
|
||
Try {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Starting indexing..."
|
||
|
||
Write-Logfile -LogLine "Indexing: WDIndexEMailTo in windream Index: $WDIndexEMailTo with: $EMailAddressesTo (Objecttype is: $WDObjecttyp)!"
|
||
$Result =[DD_LIB_Standards.clsWD_SET]::IndexFile($($Item.FullName),"$WDIndexEMailTo","$EMailAddressesTo","$WDObjecttyp")
|
||
Write-Logfile -LogLine "Index was successfully been set (True = OK | False = not OK): $Result"
|
||
|
||
Write-Logfile -LogLine "Indexing: WDIndexEMailFrom in windream Index: $WDIndexEMailFrom with: $EMailAddressesFrom (Objecttype is: $WDObjecttyp)!"
|
||
$Result = [DD_LIB_Standards.clsWD_SET]::IndexFile($($Item.FullName),"$WDIndexEMailFrom","$EMailAddressesFrom","$WDObjecttyp")
|
||
Write-Logfile -LogLine "Index was successfully been set (True = OK | False = not OK): $Result"
|
||
|
||
Write-Logfile -LogLine "Indexing: WDIndexEMailDate in windream Index: $WDIndexEMailDate with: $EMailDateSentOn (Objecttype is: $WDObjecttyp)!"
|
||
$Result = [DD_LIB_Standards.clsWD_SET]::IndexFile($($Item.FullName),"$WDIndexEMailDate","$EMailDateSentOn","$WDObjecttyp")
|
||
Write-Logfile -LogLine "Index was successfully been set (True = OK | False = not OK): $Result"
|
||
|
||
Write-Logfile -LogLine "Indexing: WDIndexEMailSubject in windream Index: $WDIndexEMailSubject with: $EMailSubject (Objecttype is: $WDObjecttyp)!"
|
||
$Result = [DD_LIB_Standards.clsWD_SET]::IndexFile($($Item.FullName),"$WDIndexEMailSubject","$EMailSubject","$WDObjecttyp")
|
||
Write-Logfile -LogLine "Index was successfully been set (True = OK | False = not OK): $Result"
|
||
|
||
Write-Logfile -LogLine "Indexing completed!"
|
||
|
||
} #end try
|
||
|
||
Catch {
|
||
|
||
Write-Logfile -LogLine "Indexing went wrong!"
|
||
Write-Logfile -LogLine "Check the additional LogFile, please."
|
||
Write-Logfile -LogLine "windream Indexing stopped!"
|
||
|
||
} #end catch
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Cannot access File anymore!"
|
||
Write-Logfile -LogLine "windream Indexing stopped!"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Cannot create windream Session!"
|
||
Write-Logfile -LogLine "windream Indexing stopped!"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine "Not all required Values are set!"
|
||
Write-Logfile -LogLine "windream Indexing stopped!"
|
||
Write-Logfile -LogLine "$EMailAddressesTo"
|
||
Write-Logfile -LogLine "$EMailAddressFrom"
|
||
Write-Logfile -LogLine "$EMailDateSentOn"
|
||
Write-Logfile -LogLine "$EMailSubject"
|
||
|
||
} #end else
|
||
|
||
} #end foreach
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Found no valid $EMLFileExtension Files in SourcePath!"
|
||
|
||
} #end else
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Error accessing SourcePath!"
|
||
|
||
} #end if
|
||
|
||
} #end if
|
||
|
||
ELSE {
|
||
|
||
Write-Logfile -LogLine " "
|
||
Write-Logfile -LogLine "Invalid SourcePath, check the ConfigFile!"
|
||
|
||
} #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 ConfigValues -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 FileTest -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 SMTPDomains -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name SourcePath -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name SourcePathRecurse -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMLFile -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMLFileExtension -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMLFileContent -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMLObject -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressTEMP -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressesTEMP -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressTo -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressToRegEx -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressesTo -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressFrom -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressFromRegEx -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailAddressesFrom -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailDateSentOn -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailDateSentOnTEMP -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name EMailSubject -Force -ErrorAction SilentlyContinue
|
||
|
||
Remove-Variable -Name WDObjecttyp -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name WDIndexEMailTo -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name WDIndexEMailFrom -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name WDIndexEMailDate -Force -ErrorAction SilentlyContinue
|
||
Remove-Variable -Name WDIndexEMailSubject -Force -ErrorAction SilentlyContinue
|
||
|
||
$error.clear() |