Update use of clang PowerShell

scripts/psClang/io.ps1

@@ -0,0 +1,238 @@
+#Console IO
+# ------------------------------------------------------------------------------------------------
+Function Write-Message([parameter(Mandatory = $true)][string] $msg
+    , [Parameter(Mandatory = $true)][System.ConsoleColor] $color)
+{
+    $foregroundColor = $host.ui.RawUI.ForegroundColor
+    $host.ui.RawUI.ForegroundColor = $color
+    Write-Output $msg
+    $host.ui.RawUI.ForegroundColor = $foregroundColor
+}
+
+# Writes an error without the verbose PowerShell extra-info (script line location, etc.)
+Function Write-Err([parameter(ValueFromPipeline, Mandatory = $true)][string] $msg)
+{
+    Write-Message -msg $msg -color Red
+}
+
+Function Write-Success([parameter(ValueFromPipeline, Mandatory = $true)][string] $msg)
+{
+    Write-Message -msg $msg -color Green
+}
+
+Function Write-Array($array, $name)
+{
+    Write-Output "$($name):"
+    $array | ForEach-Object { Write-Output "  $_" }
+    Write-Output "" # empty line separator
+}
+
+Function Write-Verbose-Array($array, $name)
+{
+    Write-Verbose "$($name):"
+    $array | ForEach-Object { Write-Verbose "  $_" }
+    Write-Verbose "" # empty line separator
+}
+
+Function Write-Verbose-Timed([parameter(ValueFromPipeline, Mandatory = $true)][string] $msg)
+{
+    Write-Verbose "$([DateTime]::Now.ToString("[HH:mm:ss]")) $msg"
+}
+
+Function Print-InvocationArguments()
+{
+    $bParams = $PSCmdlet.MyInvocation.BoundParameters
+    if ($bParams)
+    {
+        [string] $paramStr = "clang-build.ps1 invocation args: `n"
+        foreach ($key in $bParams.Keys)
+        {
+            $paramStr += "  $($key) = $($bParams[$key]) `n"
+        }
+        Write-Verbose $paramStr
+    }
+}
+
+Function Print-CommandParameters([Parameter(Mandatory = $true)][string] $command)
+{
+    $params = @()
+    foreach ($param in ((Get-Command $command).ParameterSets[0].Parameters))
+    {
+        if (!$param.HelpMessage)
+        {
+            continue
+        }
+
+        $params += New-Object PsObject -Prop @{ "Option" = "-$($param.Aliases[0])"
+                                              ; "Description" = $param.HelpMessage
+                                              }
+    }
+
+   $params | Sort-Object -Property "Option" | Out-Default
+}
+
+
+
+# Function that gets the name of a command argument when it is only known by its alias
+# For streamlining purposes, it also accepts the name itself.
+Function Get-CommandParameterName([Parameter(Mandatory = $true)][string] $command
+                                 ,[Parameter(Mandatory = $true)][string] $nameOrAlias)
+{
+  foreach ($param in ((Get-Command $command).ParameterSets[0].Parameters))
+  {
+    if ($param.Name    -eq       $nameOrAlias -or
+        $param.Aliases -contains $nameOrAlias)
+    {
+      return $param.Name
+    }
+  }
+  return ""
+}
+
+# File IO
+# ------------------------------------------------------------------------------------------------
+Function Remove-PathTrailingSlash([Parameter(Mandatory = $true)][string] $path)
+{
+    return $path -replace '\\$', ''
+}
+
+Function Get-FileDirectory([Parameter(Mandatory = $true)][string] $filePath)
+{
+    return ([System.IO.Path]::GetDirectoryName($filePath) + "\")
+}
+
+Function Get-FileName( [Parameter(Mandatory = $true)][string] $path
+    , [Parameter(Mandatory = $false)][switch] $noext)
+{
+    if ($noext)
+    {
+        return ([System.IO.Path]::GetFileNameWithoutExtension($path))
+    }
+    else
+    {
+        return ([System.IO.Path]::GetFileName($path))
+    }
+}
+
+Function IsFileMatchingName( [Parameter(Mandatory = $true)][string] $filePath
+    , [Parameter(Mandatory = $true)][string] $matchName)
+{
+    if ([System.IO.Path]::IsPathRooted($matchName))
+    {
+        return $filePath -ieq $matchName
+    }
+
+    if ($aDisableNameRegexMatching)
+    {
+        [string] $fileName      = (Get-FileName -path $filePath)
+        [string] $fileNameNoExt = (Get-FileName -path $filePath -noext)
+        return (($fileName -eq $matchName) -or ($fileNameNoExt -eq $matchName))
+    }
+    else
+    {
+        return $filePath -match $matchName
+    }
+}
+
+Function FileHasExtension( [Parameter(Mandatory = $true)][string]   $filePath
+                         , [Parameter(Mandatory = $true)][string[]] $ext
+                         )
+{
+    foreach ($e in $ext)
+    {
+        if ($filePath.EndsWith($e))
+        {
+            return $true
+        }
+    }
+    return $false
+}
+
+<#
+  .DESCRIPTION
+  Merges an absolute and a relative file path.
+  .EXAMPLE
+  Having base = C:\Windows\System32 and child = .. we get C:\Windows
+  .EXAMPLE
+  Having base = C:\Windows\System32 and child = ..\..\..\.. we get C:\ (cannot go further up)
+  .PARAMETER base
+  The absolute path from which we start.
+  .PARAMETER child
+  The relative path to be merged into base.
+  .PARAMETER ignoreErrors
+  If this switch is not present, an error will be triggered if the resulting path
+  is not present on disk (e.g. c:\Windows\System33).
+
+  If present and the resulting path does not exist, the function returns an empty string.
+  #>
+Function Canonize-Path( [Parameter(Mandatory = $true)][string] $base
+    , [Parameter(Mandatory = $true)][string] $child
+    , [switch] $ignoreErrors)
+{
+    [string] $errorAction = If ($ignoreErrors) {"SilentlyContinue"} Else {"Stop"}
+
+    if ([System.IO.Path]::IsPathRooted($child))
+    {
+        if (!(Test-Path $child))
+        {
+            return ""
+        }
+        return $child
+    }
+    else
+    {
+        [string[]] $paths = Join-Path -Path "$base" -ChildPath "$child" -Resolve -ErrorAction $errorAction
+        return $paths
+    }
+}
+
+function HasTrailingSlash([Parameter(Mandatory = $true)][string] $str)
+{
+    return $str.EndsWith('\') -or $str.EndsWith('/')
+}
+
+
+function EnsureTrailingSlash([Parameter(Mandatory = $true)][string] $str)
+{
+    [string] $ret = If (HasTrailingSlash($str)) { $str } else { "$str\" }
+    return $ret
+}
+
+function Exists([Parameter(Mandatory = $false)][string] $path)
+{
+    if ([string]::IsNullOrEmpty($path))
+    {
+        return $false
+    }
+
+    return Test-Path $path
+}
+
+function MakePathRelative( [Parameter(Mandatory = $true)][string] $base
+                         , [Parameter(Mandatory = $true)][string] $target
+                         )
+{
+    Push-Location "$base\"
+    [string] $relativePath = (Resolve-Path -Relative $target) -replace '^\.\\',''
+    Pop-Location
+    if ( (HasTrailingSlash $target) -or $target.EndsWith('.') )
+    {
+        $relativePath += '\'
+    }
+    return "$relativePath"
+}
+
+# Command IO
+# ------------------------------------------------------------------------------------------------
+Function Exists-Command([Parameter(Mandatory = $true)][string] $command)
+{
+    try
+    {
+        Get-Command -name $command -ErrorAction Stop | out-null
+        return $true
+    }
+    catch
+    {
+        return $false
+    }
+}