Modify debug messages

Because process rclone output can't be processed with % {} when script
that call clone module when executed by scheduled task.

backup.ps1

@@ -13,7 +13,8 @@ $global:logfile = $false
 $tmp_path = "$PSScriptRoot\tmp"
 $global:bin_path = "$PSScriptRoot\bin"
 $ProgressPreference = "SilentlyContinue"
-$ErrorActionPreference = "SilentlyContinue"
+$ErrorActionPreference = "Stop"
+$DebugPreference = "SilentlyContinue"
 
 if ( $debug ) {
     $DebugPreference = "Continue"
@@ -21,6 +22,7 @@ if ( $debug ) {
 
 Import-Module -Name "$PSScriptRoot\lib\backupscript-global_utils.psm1" -Scope Global -Force
 
+
 function json_to_hash () {
     [CmdletBinding()]
     Param(
@@ -36,6 +38,7 @@ function json_to_hash () {
         Write-Debug "Found value $_"
         $r[$_.Name] = $_.Value
     }
+	Write-debug "End json_to_hash"
     return $r 
 }
 
@@ -63,7 +66,7 @@ if ( -not $conf ) {
 if ( $log ) {
     $logname = (Get-Item $conf ).Basename
     $global:logfile = "$PSScriptRoot\log\$((Get-Date).ToString("yyyy.MM.dd"))_$($logname).log"
-    write-debug "Write fo Set-Messagefile $($global:logfile) "
+    write-debug "Write to logfile: $($global:logfile) "
 
     # Zip old messah=ges (Archives)
     # TODO: Test this functionnality
@@ -81,7 +84,7 @@ if ( $log ) {
                 "\log\",  
                 $logname, 
                 ".archives.", 
-                $_.CreationTime).ToString("yyyy.MM"),
+                ($_.CreationTime).ToString("yyyy.MM"),
                 ".log.7z`"",
                 " `"", 
                 $_.FullName, 
@@ -126,9 +129,12 @@ $backup.actions | % {
     $destination = ""
     $source = ""
 
-    # Test input path
+    Set-Message "---"
-	Write-Debug "Process action : $($_.name) | type: $($_.type)"
+	Set-Message "Process action : $($_.name) | type: $($_.type)"
-	if ( $_.psobject.properties.match('source_eval').Count -and $_.source_eval -eq $true ) {
+    Set-Message "---"
+
+    # Process source
+    if ( $_.psobject.properties.match('source_eval').Count -and $_.source_eval -eq $true ) {
 		$_.source = eval_var $($_.source)
 		Write-Debug "Result $($_.source)"
 	}
@@ -194,8 +200,9 @@ $backup.actions | % {
     }
 
     try {
-	    Import-Module -Name "$PSScriptRoot\lib\backupscript-$($_.type).psm1" -Force
+        Write-Debug "Import module $($_.type)"
-        Backup-Create -source $source -dest $destination -name $_.name -opt $opt #-EA Stop
+        Import-Module -Name "$PSScriptRoot\lib\backupscript-$($_.type).psm1"
+        Backup-Create -source $source -dest $destination -name $_.name -opt $opt
         if ( $_.psobject.properties.match('hook_postexec').Count -and $_.hook_postexec -ne "" ) {
 		    Set-Message "Postexec hook : execute $($_.hook_postexec)"
 			Invoke-Expression $_.hook_postexec
@@ -210,9 +217,8 @@ $backup.actions | % {
         if ( Test-Path "$($net_default_letter):" ){
             Remove-PSDrive -Name $net_default_letter
         }
-
         # Remove Module
-        Remove-Module -Name $_.type -Force
+        Get-Module -Name "backupscript-$($_.type)" | Remove-Module -Force
     }
 }
 Set-Message "Backup operation done"

lib/backupscript-clone.psm1

@@ -1,46 +1,64 @@
-function Backup-Create () {
+Write-Debug "Module Clone loaded"
-    Param(
-    [Parameter(Mandatory=$True)]
-    [string]
-    $source,
-    [Parameter(Mandatory=$True)]
-    [string]
-    $dest,
-    [Parameter(Mandatory=$false)]
-    [string]
-    $name,
-    [Parameter(Mandatory=$false)]
-    [object]
-    $options
-    )
 
-    $copy_opt = "--stats=0 --log-level INFO --log-format `"shorfile`" "
+function Backup-Create () {
-    Set-Message "Sync files from $source to $dest"
+	Param(
-    
+		[Parameter(Mandatory=$True)][string]$source,
-    if ( -not (Test-Path "$global:bin_path\rclone.exe") ) {
+		[Parameter(Mandatory=$True)][string]$dest,
-        Throw "Rclone executable not found"
+		[Parameter(Mandatory=$false)][string]$name,
-    }
+		[Parameter(Mandatory=$false)][object]$options
-    $copy_opt = -join($copy_opt, $(ConvertTo-CmdlineOptions $options))
+	 )
-    $command = -join($global:bin_path, "\rclone.exe", " sync", " `"$source`"", " `"$dest`"", " $copy_opt", " 2>&1")
-    Set-Message "$command"
-    Invoke-Expression $command -ErrorAction Ignore | % {
-        if ($_ -ne ""){
-            $type, $mdg = ($_ -split ':')[0]
-            $msg = -join ($_ -split ':')[1..2]
 
-            switch ( $type.trim() ){
+	if ( -not (Test-Path "$global:bin_path\rclone.exe") ) {
-                "INFO" {
+		Throw "Rclone executable not found"
-                    Set-Message $msg.trim()
+	}
-                }
+
-                "WARN" {
+	# While I can't process rclone output with | %{ } when script that call this
-                    Set-Warning $msg.trim()
+	# module is exetutes by a scheduled task, I log all rclone stuff to a
-                }
+	# temporary file and process it later
-                "ERROR" {
+
-                    Set-Error $msg.trim()
+	$rclone_logfile = "$env:TEMP\rclone.log"
-                }
+	$clone_options = "--stats=0 --log-level INFO --log-format `"shorfile`" --log-file $rclone_logfile"
-            }
+	if ( Test-Path $rclone_logfile ) {
-        }
+		Remove-Item $rclone_logfile -Force
-    }
+	}
+	Set-Message "Sync files from $source to $dest encule ta mere"
+	$clone_options = -join($clone_options, $(ConvertTo-CmdlineOptions $options))
+	$command = -join($global:bin_path, "\rclone.exe", " sync", " `"$source`"", " `"$dest`"", $clone_options, " 2>&1")
+	Set-Message "execute: $command"
+	try {
+		Invoke-Expression $command -ErrorAction Ignore | Out-Null
+	}
+	catch {
+		Throw "Error on rclone command execution"
+	}
+	Set-Message "Process rclone log file"
+	Get-Content "$rclone_logfile" | % {
+		if ($_ -ne ""){
+			$type, $mdg = ($_ -split ':')[0]
+			$msg = -join ($_ -split ':')[1..2]
+
+			switch ( $type.trim() ){
+				"INFO" {
+					Set-Message $msg.trim()
+				}
+				"NOTICE" {
+					Set-Warning $msg.trim()
+				}
+				"ERROR" {
+					Set-Error $msg.trim()
+				}
+			}
+		}
+	}
+	try {
+		Remove-Item $rclone_logfile -Force -EA Stop | Out-Null
+	}
+	catch [System.Management.Automation.ItemNotFoundException] {
+		Throw "$rclone_logfile not found, can't delete"
+	}
+	catch {
+		Throw "Can't delete $rclone_logfile, reason unknown"
+	}
 }
 
-Export-ModuleMember -Function Backup-Create
+Export-ModuleMember -Function Backup-Create

lib/backupscript-global_utils.psm1

@@ -1,4 +1,4 @@
-Write-Output "chargement du module"
+Write-Debug "Utils module loaded"
 
 function Get-LogTimeStamp {
     return (Get-Date).toString("yyyy.MM.dd HH:mm:ss")
@@ -16,7 +16,7 @@ function ConvertTo-CmdlineOptions {
     $sep=" "
     )
 	
-    Write-Debug "Call parse_options with $options, separator: `"$sep`""
+    Write-Debug "Call ConvertTo-CmdlineOptions with $options, separator: `"$sep`""
     $opt = ""
     if ($options -eq $false) {
         return ""
@@ -81,4 +81,4 @@ function Set-Message {
 	}
 }
 
-Export-ModuleMember -Function ConvertTo-CmdlineOptions, Set-Message, Set-Warning, Set-Error
+Export-ModuleMember -Function ConvertTo-CmdlineOptions, Set-Message, Set-Warning, Set-Error