Re-inventing the wheel for fun. I was going through Community-Submitted Scripts Center on Microsoft TechNet and came across a script named, "BackupFiles.ps1" by Greg Lyon.

The script is functional and works.
But I didn't like the fact that it looked more like a VBScript script than a PowerShell script.
Moreover, the script was heavily utilizing a COM object instance of type "Scripting.FileSystemObject".

My goal was simply to change the code to make it look more PowerShell-like(uhm, this should mean different for different people, but in my case, i tend to use "PowerShell-Like" when a script is written mostly with built-in (cmdlets -and functions)). Nothing less, nothing more.

Re-inventing the wheel for fun.

Modified mostly "function BackupFolder" part

# BackupFiles.ps1
# Greg Lyon - July 2006
# reference: http://www.microsoft.com/technet/scriptcenter/csc/scripts/backup/backup/cscbk013.mspx
# Modified by DBMwS - July 14, 2006

param($strSourceFolder = "C:\programming\ps\test",
    $strDestinationFolder = "F:\backup\programming\ps\test")

#{{{ function BackupFolder
function BackupFolder
{
    param([string] $SourceDir = $(throw 'Enter Source Directory Name'),
        [string] $DestinationDir = $(throw 'Enter Desitnation Directory Name'))

    if (! (test-path $SourceDir)) {
        throw "$($SourceDir) is not a valid directory!"
    }
    if (! (test-path $DestinationDir)) {
        throw "$($DestinationDir) is not a valid directory!"
    }

    # Check if destination directory is missing any files in the source
    # directory.if any file is missing, copy them over to the backup dir. 
    get-childitem $SourceDir |
    foreach {
        if ($_.PsIsContainer) {
            $childDstDir = (join-path $DestinationDir $_.Name)
            if (! (test-path $childDstDir)) { [void](mkdir $childDstDir) }
            BackupFolder $_.FullName $childDstDir
        } else {
            $srcFile = $_.FullName
            $destFile = join-path $DestinationDir $_.Name

            if (test-path $destFile) {
                $timeDiff = ($srcFile.LastWriteTime - $destFile.LastWriteTime).TotalSeconds
                if ($timeDiff -gt 2) {
                    copy-item $srcFile $destFile -Force
                    write-host "Copied file $($srcFile) to $($destFile)"
                    $script:iCopyCount++
                }
            } else {
                copy-item $srcFile $destFile -Force
                write-host "Copied file $($srcFile) to $($destFile)"
                $script:iCopyCount++
            }
        }
    }

    # Check if Source dir is missing any files on the backup dir.
    # if there is/are file(s) missing, copy them over from backup dir to src dir
    get-childitem $DestinationDir |
    foreach {
        if ($_.PsIsContainer) {
            $childSrcDir = (join-path $SourceDir $_.Name)
            if (! (test-path $childSrcDir)) { [void](mkdir $childSrcDir) }
            BackupFolder $childSrcDir $_.FullName
        } else {
            $srcFile = join-path $SourceDir $_.Name
            if (! (test-path $srcFile)) {
                remove-item $_
                write-host "Deleted file $($_)"
                $script:iDestDeletedCount++
            }
        }
    }
}
#}}}


#{{{ function WaitKey
function WaitKey {
  param( [String] $strPrompt = "Press any key to continue ... ")
  Write-Host
  Write-Host $strPrompt -NoNewline
  $key = [Console]::ReadKey($true)
  Write-Host
}
#}}}


#{{{ MAIN BODY
$iCopyCount = 0
$iDestDeletedCount = 0

Write-Host
Write-Host "Backing up " -NoNewline -ForegroundColor "White"
Write-Host $strSourceFolder -ForegroundColor "Cyan" -NoNewline
Write-Host " to " -NoNewline -ForegroundColor "White"
Write-Host $strDestinationFolder -ForegroundColor "Cyan"
Write-Host


if (! (test-path $strSourceFolder)) {
    Write-Host "Error: source folder does not exist!" -ForegroundColor "Red"
    Write-Host
    Write-Host "Exiting script"
    WaitKey "Press any key to exit ... "
    exit
}

if (! (test-path $strDestinationFolder)) {
    Write-Host "Warning: destination folder`($($strDestinationFolder)`) does not exist"
    $p = Read-Host "Create folder and continue? "
    Write-Host

    if ( $p[0] -ieq 'y' ) {
    new-item -Type Directory -Path $strDestinationFolder | out-null
  } else {
        Write-Host "Exiting script"
        WaitKey "Press any key to exit ... "
        exit
  }
}

BackupFolder $strSourceFolder $strDestinationFolder

if( ($iCopyCount -eq 0) -and ($iDestDeletedCount -eq 0) ) {
  Write-Host
  Write-Host "Folders are synchronized" -ForegroundColor "magenta"
} else {
  Write-Host
  Write-Host $iCopyCount "files copied from source to destination" -ForegroundColor "magenta"
  Write-Host $iDestDeletedCount "orphaned destination files deleted" -ForegroundColor "magenta"
}

WaitKey "Press any key to exit ... "

#}}}

Tags : Monad msh PowerShell  ¶ 10:57 PM