pf-string-replace.ps1

function Update-String_Replace_Multiple {
    [CmdLetBinding()]
    param (
        [HashTable]$replacements, 
        [switch]$all,
        [Parameter(ValueFromPipeline=$true)]
        [String]$src
    )
    begin {
        $rep = @()
        if ($replacements) {
            $rep += $replacements.GetEnumerator() |  ForEach-Object { 
                [PSCustomObject]@{Find=[RegEx]::Escape($_.Key); ReplaceWith = $_.Value; length = $_.Key.Length } } 
            # Gives priority to longer values to replace
            $rep = $rep | Sort-Object Find -Descending | Sort-Object Length -Descending
        }
    }
    process {
        foreach ($r in $rep) {
            $result = $src -ireplace  $r.Find, $r.ReplaceWith
            if ( -not $all -and ( $result -ne $src) ) {
                return $result
            }
            $src = $result
        }
        return $src
    }
}
function Update-String_Replace_Multiple:::Test {
    'a/b/c/d/' | Update-String_Replace_Multiple | assert 'a/b/c/d/' 
    'a/b/c\d/' | Update-String_Replace_Multiple -all @{'b/'='2'; 'c\'='3'} | assert 'a/23d/'
    'a/b/c/d/' | Update-String_Replace_Multiple -all @{'b'='2'; d='4'} | assert 'a/2/c/4/'
    'a/b/c/d/' | Update-String_Replace_Multiple -all @{'B'='2'; d='4'} | assert 'a/2/c/4/'
} 

function Update-FileContent_Replace_Multiple {
    [CmdLetBinding()]
    param(
        [Parameter(Mandatory=$true, ValueFromPipeline=$true)]
        $Path,
        [HashTable]$replacements, 
        [switch]$all,
        [switch]$PSExpressions,
        $destination
    )
    process {
        $path = Get-Path $path
        if ($path) {

            if (-not $destination) {
                $destination = $path
            }

            $enc = Get-FileEncoding -FullName $path
            $content = ( Get-Content -Raw -Path $path )
            $newContent = $content | Update-String_Replace_Multiple -replacements $replacements -all:$all.IsPresent
            if ($newContent -ne $content) {
                Write-Verbose "Replacing from '$path' "
                Set-Content -Path $destination $newContent -Encoding $enc
            }
        }
    }
}

#Replace content in a file without changing the encoding
function Update-FileContent_Replace {
    [CmdletBinding()]
    param (
        [Parameter(Mandatory=$true)]
        $find, 
        $replacement = '',
        [Parameter(ValueFromPipeline=$true, ValueFromPipelineByPropertyName=$true)]
        $file
    )
    begin {
        $find = [regex]::Escape( $find )
        $find = '(?ms)' + $find.Replace('\*','(.*?)')
    }
    process {
        $path = Get-Path $file
        if ($path) {
            $enc = Get-FileEncoding -FullName $path
            $content = ( Get-Content -Raw -Path $path )
            $newContent = $content -replace $find, $replacement

            if ($PSExpressions) {
                $psExp = '"' + $newContent + '"'
                $newContent = Invoke-Expression -Command $psExp
            }

            if ($newContent -ne $content) {
                Write-Verbose "Replacing in '$path' , '$find' -> '$replacement' "
                Set-Content -Path $path $newContent -Encoding $enc
            }
        }
    }
}

function Update-FolderContent_Replace {
    [CmdletBinding()]
    param(
        [Parameter(Mandatory=$true, ValueFromPipeline=$true)]
        $folder, 
        [Parameter(Mandatory=$true)]
        $currentValue, 
        [Parameter(Mandatory=$true)]
        $newValue, 
        $filter = '*.xml'
    )
    process {
        $folder = Get-Path $folder

        # Replace Content
        $matches = Get-ChildItem -Path $folder -Include $filter -Recurse | 
            Select-String -SimpleMatch $currentValue
        if ($matches) {
            $matches.Path | Update-FileContent_Replace $currentValue $newValue
        }

        # Rename files
        $torename = Get-ChildItem -Path $folder -fi "*$currentValue.*" -Recurse -File
        $torename | Rename-Item_Replace -currentValue $currentValue -newValue $newValue

        # Rename Folders
        $torename = Get-ChildItem -Path $folder -fi "*$currentValue.*" -Recurse -Directory
        $torename | Rename-Item_Replace -currentValue $currentValue -newValue $newValue
    }
}

function Invoke-PSTemplate {
    [CmdletBinding()]
    param (
        [Parameter(ValueFromPipeline=$true)]
        $templateContent,
        $TemplateContext
    )
    process {
        $quotesScaped = $templateContent.Replace('`','``')
        $quotesScaped = $quotesScaped.Replace('"','`"')
        try {
            $Content = Invoke-Expression "`"$quotesScaped`"" -ErrorAction SilentlyContinue 
        }
        catch {
            # For now ignoring any errors
            $Content = $templateContent
        }
        return $Content
    }
}

#Replace content by executing Powershell expressions indicated in the file content
function Update-File_Replace_PSTemplate {
    [CmdletBinding()]
    param (
        [Parameter(ValueFromPipeline=$true)]
        $file,
        [ScriptBlock]$fileNameRenamer,
        [switch]$NoRename,
        $TemplateContext
    )
    begin {
        if (-not $fileNameRenamer) {
            if ($NoRename) {
                $fileNameRenamer = { param($filename)
                    $filename 
                }
            }
            else {
                $fileNameRenamer = { param([string]$fullname) 
                    Get-NewName_Preextension $fullname
                }
            }
        }
    }
    process {
        $file = Get-Path $file
        $templateContent = Get-Content -Path $file -Raw
        $enc = Get-FileEncoding -FullName $file

        $Content = Invoke-PSTemplate -templateContent $templateContent -TemplateContext $TemplateContext

        $newFile = $fileNameRenamer.Invoke($file)
        Set-Content -Path $newFile -Value $Content -Encoding $enc -Verbose
        return $newFile
    }
}
function Update-File_Replace_PSTemplate:::Example {
    $testFolder = "$env:TEMP\Update-File_Replace_PSTemplate"
    New-Folder_EnsureExists -folder $testFolder -New
    $testFile = "$testFolder\input.sql.pstemplate"
    $testFile = "$testFolder\input"
    
    $templateContext = @{ A = 1; B = @{ C = 'AAA' } }
    Write-Debug $templateContext

    $content = @'
     $($templateContext.A)
     '$($templateContext.A)'
     "$($templateContext.A)"
     `$($templateContext.A)`
     $($templateContext.B.C)
'@


    Set-Content -Path $testFile -Value $content

    $newFile = $testFile | Update-File_Replace_PSTemplate -fileNameRenamer {
        param([string]$fullname) 
            Get-NewName_Preextension $fullname
        }
    Write-Host $newFile
    Write-Host (Get-Content $newFile -Raw)
}

#Replace content in a file without changing the encoding
function Update-FileContent_Replace {
    [CmdletBinding()]
    param (
        [Parameter(Mandatory=$true)]
        $find, 
        $replacement = '',
        [Parameter(ValueFromPipeline=$true, ValueFromPipelineByPropertyName=$true)]
        $file
    )
    begin {
        $find = [regex]::Escape( $find )
        $find = '(?ims)' + $find.Replace('\*','(.*?)')
        $regex = [Regex]$find
    }
    process {
        $path = Get-Path $file
        if ($path) {
            $enc = Get-FileEncoding -FullName $path
            $content = [System.IO.File]::ReadAllText($path)
            $newContent = $regex.Replace($content, $replacement)
            if ($newContent -ne $content) {
                Write-Verbose "Replacing in '$path' , '$find' -> '$replacement' "
                Set-Content -Path $path $newContent -Encoding $enc
            }
        }
    }
}
function Update-FileContent_Replace:::Test {
    $testfile = "$env:TEMP\Update-FileContent_Replace.txt"
 
    function GenTestContent ($lines = 10) {
        begin { @(1..$lines) }
        process { $_ }    
        end { @(1..$lines) }
    }

    GenTestContent > $testfile 
    $replacement = 'AAAA'
    $testfile | Update-FileContent_Replace '5' $replacement
    $newContent = Get-Content $testfile -Raw
    $newContent.Contains($replacement) | Assert $true

    # on line with *
    'start between end' | GenTestContent > $testfile 
    $testfile | Update-FileContent_Replace 'start * end' 'start MID end'
    $newContent = Get-Content $testfile -Raw
    $newContent.Contains('start MID end') | Assert $true

    # Multiline with *
    'begin between inter', 'inter between close' | GenTestContent > $testfile 
    $testfile | Update-FileContent_Replace 'begin * close' 'begin MID close'
    $newContent = Get-Content $testfile  -Raw
    $newContent.Contains('begin MID close') | Assert $true

    # Multiline with *
    ' { between } ' | GenTestContent > $testfile 
    $testfile | Update-FileContent_Replace '{ * }' '{ MID }'
    $newContent = Get-Content $testfile -Raw
    $newContent.Contains('{ MID }') | Assert $true

    # Multiline with *
    ' <# inter ',  ' inter #> '| GenTestContent > $testfile 
    $testfile | Update-FileContent_Replace '<# * #>' '<# MID #>'
    $newContent = Get-Content $testfile -Raw
    $newContent.Contains('<# MID #>') | Assert $true

    Remove-Item $testfile -Force
}