Includes/PwSh.Fw.Image.psm1

<#
.SYNOPSIS
   Resize an image
.DESCRIPTION
   Resize an image based on a new given height or width or a single dimension and a maintain ratio flag.
   The execution of this CmdLet creates a new file named "OriginalName_resized" and maintains the original
   file extension
.PARAMETER Width
   The new width of the image. Can be given alone with the MaintainRatio flag
.PARAMETER Height
   The new height of the image. Can be given alone with the MaintainRatio flag
.PARAMETER ImagePath
   The path to the image being resized
.PARAMETER MaintainRatio
   Maintain the ratio of the image by setting either width or height. Setting both width and height and also this parameter
   results in an error
.PARAMETER Percentage
   Resize the image *to* the size given in this parameter. It's imperative to know that this does not resize by the percentage but to the percentage of
   the image.
.PARAMETER SmoothingMode
   Sets the smoothing mode. Default is HighQuality.
.PARAMETER InterpolationMode
   Sets the interpolation mode. Default is HighQualityBicubic.
.PARAMETER PixelOffsetMode
   Sets the pixel offset mode. Default is HighQuality.
.EXAMPLE
   Resize-Image -Height 45 -Width 45 -ImagePath "Path/to/image.jpg"
.EXAMPLE
   Resize-Image -Height 45 -MaintainRatio -ImagePath "Path/to/image.jpg"
.EXAMPLE
   #Resize to 50% of the given image
   Resize-Image -Percentage 50 -ImagePath "Path/to/image.jpg"
.NOTES
   Written By:
   Christopher Walker
.LINK
    https://gist.github.com/someshinyobject/617bf00556bc43af87cd
#>

Function Resize-Image() {
    [CmdLetBinding(
        SupportsShouldProcess=$true,
        PositionalBinding=$false,
        ConfirmImpact="Low",
        DefaultParameterSetName="Absolute"
    )]
    Param (
        [Parameter(Mandatory=$True)]
        [ValidateScript({
                Test-Path $_
        })][String]$Image,
        [Parameter(Mandatory=$False, ParameterSetName="ABSOLUTE")][Switch]$MaintainRatio,
        [Parameter(Mandatory=$False, ParameterSetName="ABSOLUTE")][Int]$Height,
        [Parameter(Mandatory=$False, ParameterSetName="ABSOLUTE")][Int]$Width,
        [Parameter(Mandatory=$False, ParameterSetName="PERCENT")][Double]$Percentage,
        [Parameter(Mandatory=$False)][System.Drawing.Drawing2D.SmoothingMode]$SmoothingMode = "HighQuality",
        [Parameter(Mandatory=$False)][System.Drawing.Drawing2D.InterpolationMode]$InterpolationMode = "HighQualityBicubic",
        [Parameter(Mandatory=$False)][System.Drawing.Drawing2D.PixelOffsetMode]$PixelOffsetMode = "HighQuality",
        [Parameter(Mandatory=$False)][String]$NameModifier,
        [Parameter(Mandatory=$False)][String]$Destination,
        [Parameter(Mandatory=$False)][String]$Filename
    )
    Begin {
        If ($Width -and $Height -and $MaintainRatio) {
            Throw "Absolute Width and Height cannot be given with the MaintainRatio parameter."
        }

        If (($Width -xor $Height) -and (-not $MaintainRatio)) {
            Throw "MaintainRatio must be set with incomplete size parameters (Missing height or width without MaintainRatio)"
        }
    }
    Process {
        $Item = Get-Item $Image
        # $Path = (Resolve-Path $Image).Path
        $Path = $Item.FullName
        # $Dot = $Path.LastIndexOf(".")

        $OldImage = New-Object -TypeName System.Drawing.Bitmap -ArgumentList $Path
        # Grab these for use in calculations below.
        $OldHeight = $OldImage.Height
        $OldWidth = $OldImage.Width

        If ($MaintainRatio) {
            $OldHeight = $OldImage.Height
            $OldWidth = $OldImage.Width
            If ($Height) {
                $Width = $OldWidth / $OldHeight * $Height
            }
            If ($Width) {
                $Height = $OldHeight / $OldWidth * $Width
            }
        }

        If ($Percentage) {
            $Product = ($Percentage / 100)
            $Height = $OldHeight * $Product
            $Width = $OldWidth * $Product
        }

        $Bitmap = New-Object -TypeName System.Drawing.Bitmap -ArgumentList $Width, $Height
        $NewImage = [System.Drawing.Graphics]::FromImage($Bitmap)

        #Retrieving the best quality possible
        $NewImage.SmoothingMode = $SmoothingMode
        $NewImage.InterpolationMode = $InterpolationMode
        $NewImage.PixelOffsetMode = $PixelOffsetMode
        $NewImage.DrawImage($OldImage, $(New-Object -TypeName System.Drawing.Rectangle -ArgumentList 0, 0, $Width, $Height))

        #Add name modifier (OriginalName_{$NameModifier}.jpg)
        if ([string]::IsNullOrEmpty($Destination)) { $Destination = $Item.DirectoryName }
        if ([string]::IsNullOrEmpty($Filename)) { $Filename = "$($Item.Basename)" }
        if ([string]::IsNullOrEmpty($NameModifier)) {
            $OutputPath = "$Destination/${Filename}"
        } else {
            switch ($NameModifier) {
                'NEWSIZE' {
                    # $OutputPath = $Path.Substring(0,$Dot) + "_" + $Width + "x" + $Height + $Path.Substring($Dot,$Path.Length - $Dot)
                    $OutputPath = "${Destination}/${Filename}_${Width}x${Height}$($Item.Extension)"
                }
                default {
                    # $OutputPath = $Path.Substring(0,$Dot) + "_" + $NameModifier + $Path.Substring($Dot,$Path.Length - $Dot)
                    $OutputPath = "${Destination}/${Filename}_${NameModifier}$($Item.Extension)"
                }
            }
        }
        If ($PSCmdlet.ShouldProcess("Resized image based on $Path", "save to $OutputPath")) {
            $Bitmap.Save($OutputPath)
        }

        $Bitmap.Dispose()
        $NewImage.Dispose()
        $OldImage.Dispose()
    }
}