Merge pull request LabtechConsulting#40 from DarrenWhite99/Get-LTServiceInfo-Update

Fixes for Get-LTErrors and Get-LTProbeErrors Date handling

Author: LabtechConsulting

LabTech.psm1

@@ -1744,21 +1744,21 @@ Function Update-LTService{
     }#End End
 }#End Function Update-LTService
 
-Function Get-LTError{
+Function Get-LTErrors{
 <#
 .SYNOPSIS
     This will pull the %ltsvcdir%\LTErrors.txt file into an object.
 
 .EXAMPLE
-    Get-LTError | where {(Get-date $_.Time) -gt (get-date).AddHours(-24)}
+    Get-LTErrors | where {(Get-date $_.Time) -gt (get-date).AddHours(-24)}
     Get a list of all errors in the last 24hr
 
 .EXAMPLE
-    Get-LTError | Out-Gridview
+    Get-LTErrors | Out-Gridview
     Open the log file in a sortable searchable window.
 
 .NOTES
-    Version:        1.2
+    Version:        1.3
     Author:         Chris Taylor
     Website:        labtechconsulting.com
     Creation Date:  3/14/2016
@@ -1770,31 +1770,36 @@ Function Get-LTError{
     Update Date: 3/18/2018
     Purpose/Change: Changed Erroraction from Stop to unspecified to allow caller to set the ErrorAction.
 
+    Update Date: 1/26/2019
+    Purpose/Change: Update for better international date parsing support. Function rename.
+
 .LINK
     http://labtechconsulting.com
 #> 
     [CmdletBinding()]
     Param()
 
     Begin{
+        Set-Alias -name LINENUM -value Get-CurrentLineNumber -WhatIf:$False -Confirm:$False
+        Write-Debug "Starting $($myInvocation.InvocationName) at line $(LINENUM)"
         $BasePath = $(Get-LTServiceInfo -EA 0 -Verbose:$False -WhatIf:$False -Confirm:$False -Debug:$False|Select-Object -Expand BasePath -EA 0)
         if (!$BasePath){$BasePath = "$env:windir\LTSVC"}
     }#End Begin
 
     Process{
         if ($(Test-Path -Path "$BasePath\LTErrors.txt") -eq $False) {
-            Write-Error "ERROR: Unable to find log. $($Error[0])"
+            Write-Error "ERROR: Line $(LINENUM): Unable to find lelog."
             return
         }
         Try{
             $errors = Get-Content "$BasePath\LTErrors.txt"
-            $errors = $errors -join ' ' -split ':::'
+            $errors = $errors -join ' ' -split '::: '
             foreach($Line in $Errors){
                 $items = $Line -split "`t" -replace ' - ',''
                 if ($items[1]){
                     $object = New-Object -TypeName PSObject
                     $object | Add-Member -MemberType NoteProperty -Name ServiceVersion -Value $items[0]
-                    $object | Add-Member -MemberType NoteProperty -Name Timestamp -Value $([datetime]$items[1])
+                    $object | Add-Member -MemberType NoteProperty -Name Timestamp -Value $(Try {[datetime]::Parse($items[1])} Catch {})
                     $object | Add-Member -MemberType NoteProperty -Name Message -Value $items[2]
                     Write-Output $object
                 }
@@ -1803,16 +1808,18 @@ Function Get-LTError{
         }#End Try
 
         Catch{
-            Write-Error "ERROR: There was an error reading the log. $($Error[0])"
+            Write-Error "ERROR: Line $(LINENUM): There was an error reading the log. $($Error[0])"
         }#End Catch
     }#End Process
 
     End{
         if ($?){
         }
         Else {$Error[0]}
+        Write-Debug "Exiting $($myInvocation.InvocationName) at line $(LINENUM)"
     }#End End
-}#End Function Get-LTError
+}#End Function Get-LTErrors
+Set-Alias -Name Get-LTError -Value Get-LTErrors
 
 Function Reset-LTService{
 <#
@@ -2478,7 +2485,7 @@ Function Get-LTProbeErrors{
     Open the log file in a sortable searchable window.
 
 .NOTES
-    Version:        1.1
+    Version:        1.3
     Author:         Chris Taylor
     Website:        labtechconsulting.com
     Creation Date:  3/14/2016
@@ -2490,39 +2497,50 @@ Function Get-LTProbeErrors{
     Update Date: 3/18/2018
     Purpose/Change: Changed Erroraction from Stop to unspecified to allow caller to set the ErrorAction.
 
+    Update Date: 1/26/2019
+    Purpose/Change: Update for better international date parsing support
+
 .LINK
     http://labtechconsulting.com
 #> 
     [CmdletBinding()]
     Param()
 
     Begin{
+        Set-Alias -name LINENUM -value Get-CurrentLineNumber -WhatIf:$False -Confirm:$False
+        Write-Debug "Starting $($myInvocation.InvocationName) at line $(LINENUM)"
         $BasePath = $(Get-LTServiceInfo -EA 0 -Verbose:$False -WhatIf:$False -Confirm:$False -Debug:$False|Select-Object -Expand BasePath -EA 0)
         if (!($BasePath)){$BasePath = "$env:windir\LTSVC"}
     }#End Begin
 
     Process{
         if ($(Test-Path -Path "$BasePath\LTProbeErrors.txt") -eq $False) {
-            Write-Error "ERROR: Unable to find log. $($Error[0])"
+            Write-Error "ERROR: Line $(LINENUM): Unable to find log."
             return
         }
         $errors = Get-Content "$BasePath\LTProbeErrors.txt"
-        $errors = $errors -join ' ' -split ':::'
-        Foreach($Line in $Errors){
-            $items = $Line -split "`t" -replace ' - ',''
-            $object = New-Object -TypeName PSObject
-            $object | Add-Member -MemberType NoteProperty -Name ServiceVersion -Value $items[0]
-            $object | Add-Member -MemberType NoteProperty -Name Timestamp -Value $([datetime]$items[1])
-            $object | Add-Member -MemberType NoteProperty -Name Message -Value $items[2]
-            Write-Output $object
-        }#End Foreach
+        $errors = $errors -join ' ' -split '::: '
+        Try {
+            Foreach($Line in $Errors){
+                $items = $Line -split "`t" -replace ' - ',''
+                $object = New-Object -TypeName PSObject
+                $object | Add-Member -MemberType NoteProperty -Name ServiceVersion -Value $items[0]
+                $object | Add-Member -MemberType NoteProperty -Name Timestamp -Value $(Try {[datetime]::Parse($items[1])} Catch {})
+                $object | Add-Member -MemberType NoteProperty -Name Message -Value $items[2]
+                Write-Output $object
+            }#End Foreach
+        }#End Try
+    
+        Catch{
+            Write-Error "ERROR: Line $(LINENUM): There was an error reading the log. $($Error[0])"
+        }#End Catch
     }
 
     End{
         if ($?){
         }
         Else {$Error[0]}
-        
+        Write-Debug "Exiting $($myInvocation.InvocationName) at line $(LINENUM)"
     }#End End
 }#End Function Get-LTProbeErrors
 
@@ -3521,7 +3539,7 @@ Function Initialize-LTServiceModule{
 $PublicFunctions=@(((@"
 ConvertFrom-LTSecurity
 ConvertTo-LTSecurity
-Get-LTError
+Get-LTErrors
 Get-LTLogging
 Get-LTProbeErrors
 Get-LTProxy
@@ -3547,6 +3565,7 @@ Update-LTService
 "@) -replace "[`r`n,\s]+",',') -split ',')
 
 $PublicAlias=@(((@"
+Get-LTError
 ReInstall-LTService
 "@) -replace "[`r`n,\s]+",',') -split ',')