powershell脚本格式表输出中的颜色词

Question

是否可以使用格式表为 powershell 输出仅对某些单词（而不是完整的行）进行着色。例如，此脚本递归扫描文件夹中的字符串，然后使用格式表输出结果。

dir -r -i *.* | Select-String $args[0] |
format-table -Property @{label="Line #"; Expression={$_.LineNumber}; width=6},
Path, Line -wrap

如果能够用特定的颜色来格式化我们正在搜索的单词，那就太好了，这样您就可以准确地看到它在行中的位置。

Answer 1

您可以将表通过管道传输到 Out-String 中，然后使用 Write-Host 和 -NoNewLine 开关将字符串分段写入。

像这样的东西：

filter ColorWord {
    param(
        [string] $word,
        [string] $color
    )
    $line = $_
    $index = $line.IndexOf($word, [System.StringComparison]::InvariantCultureIgnoreCase)
    while($index -ge 0){
        Write-Host $line.Substring(0,$index) -NoNewline
        Write-Host $line.Substring($index, $word.Length) -NoNewline -ForegroundColor $color
        $used = $word.Length + $index
        $remain = $line.Length - $used
        $line = $line.Substring($used, $remain)
        $index = $line.IndexOf($word, [System.StringComparison]::InvariantCultureIgnoreCase)
    }
    Write-Host $line
}

Get-Process| Format-Table| Out-String| ColorWord -word 1 -color magenta

Answer 2

我喜欢 Rynant 的方法。这是一个替代实现，使用 -split 而不是 IndexOf：

filter ColorWord( [string]$word, [ConsoleColor]$color ) {
    $later = $false
    $_ -split [regex]::Escape( $word ) | foreach {
      if( $later ) { Write-Host "$word" -NoNewline -ForegroundColor $color }
      else { $later = $true }
      Write-Host $_ -NoNewline
    }
    Write-Host
}

如果该行以给定单词开头或结尾，则拆分包含空字符串，因此有额外的“如果不是第一个”逻辑。

---

编辑：根据 Rynant 的评论，这是另一个支持简单模式和正则表达式模式的实现：

filter ColorPattern( [string]$Pattern, [ConsoleColor]$Color, [switch]$SimpleMatch ) {
  if( $SimpleMatch ) { $Pattern = [regex]::Escape( $Pattern ) }
  
  $split = $_ -split $Pattern
  $found = [regex]::Matches( $_, $Pattern, 'IgnoreCase' )
  for( $i = 0; $i -lt $split.Count; ++$i ) {
    Write-Host $split[$i] -NoNewline
    Write-Host $found[$i] -NoNewline -ForegroundColor $Color
  }
  
  Write-Host
}

以下示例的输出显示了差异：

PS> '\d00\d！' | ColorPattern '\d' '洋红色' -简单
\d00\d！

PS> '\d00\d！' | ColorPattern '\d' '洋红色'
\d00\d!

Answer 3

我喜欢@Ryant 给出的答案。我这里有一个修改版本，可用于通过传入数组或单词和颜色来对输出中的多个单词进行着色。诀窍是您必须根据换行符将输入文本拆分为行。

filter ColorWord2 {
param(
    [string[]] $word,
    [string[]] $color
)
$all = $_
$lines = ($_ -split '\r\n')

$lines | % {
    $line = $_      
    $x = -1

    $word | % {
        $x++
        $item = $_      

        $index = $line.IndexOf($item, [System.StringComparison]::InvariantCultureIgnoreCase)                            
            while($index -ge 0){
                Write-Host $line.Substring(0,$index) -NoNewline                 
                Write-Host $line.Substring($index, $item.Length) -NoNewline -ForegroundColor $color[$x]
                $used =$item.Length + $index
                $remain = $line.Length - $used
                $line =$line.Substring($used, $remain)
                $index = $line.IndexOf($item, [System.StringComparison]::InvariantCultureIgnoreCase)
            }
        }

    Write-Host $line
} }

并将执行如下

Get-Service | Format-Table| Out-String| ColorWord2 -word 'Running','Stopped' -color 'Green','Red'