Shuery
60f2ae3e0f
grilling 三轮把设计树走完了，这里把它落成文件，避免决策只活在对话里。 ADR-0010 零依赖自研 TUI：三个候选库全部实测排除 —— ConsoleGuiTools 的 PSGallery 元数据声明最低 7.2（5.1 装不上）；Spectre.Console 0.49.1 能在 5.1 加载但要塞 4 个第三方 DLL 且不支持鼠标；Terminal.Gui 1.15.0 能反射接线到真的渲染出窗口，但 Application.Shutdown() 在两端都抛 NRE。同时记下两条实测坑：无控制台时 $Host.UI.SupportsVirtualTerminal 会撒谎返回 True（第一道闸门必须是 [Console]::IsOutputRedirected），以及 5.1 的 RawUI.LengthInBufferCells 对中文返回 2、对边框字符返回 6（都不能用来排版）。 ADR-0011 进度回调这个例外：它是注入点不是状态，无头路径为 $null 时行为与今天完全一致。 ADR-0012 入口改名与垫片：这次留垫片而 Common.psm1 直接删，是因为前者是外部接口（断了是静默没用）后者是内部实现（断了当场报错）。并纠正了自己的一个伪前提 —— 本机实测没有注册任何 BakNRet 计划任务。 ADR-0013 TUI 写配置：外科式改写 + 校验通过才原子替换。硬事实是 SoftwareCatalog.psd1 根本不能被 Import-PowerShellDataFile 读入（动态表达式），任何"解析成对象再序列化"的方案都会毁掉表达式与注释。 .scratch/tui/spec.md 是这次改造的验收锚点：9 条已定决策 + 三轮的判据 + 风险表。 验收：Parse 两版仍绿。
58 lines
4.2 KiB
PowerShell
58 lines
4.2 KiB
PowerShell
param([Parameter(Mandatory=$true)][string]$HostLabel, [Parameter(Mandatory=$true)][string]$OutFile, [int]$WatchSeconds = 3)
|
|
$o = New-Object System.Collections.Specialized.OrderedDictionary
|
|
$src = @"
|
|
using System;
|
|
using System.Runtime.InteropServices;
|
|
public static class K32 {
|
|
[DllImport("kernel32.dll")] public static extern IntPtr GetStdHandle(int n);
|
|
[DllImport("kernel32.dll", SetLastError=true)] public static extern bool GetConsoleMode(IntPtr h, out uint m);
|
|
[DllImport("kernel32.dll")] public static extern IntPtr GetConsoleWindow();
|
|
[DllImport("kernel32.dll")] public static extern uint GetConsoleOutputCP();
|
|
}
|
|
"@
|
|
Add-Type -TypeDefinition $src -ErrorAction Stop
|
|
$mOut = 0; $ok = [K32]::GetConsoleMode([K32]::GetStdHandle(-11), [ref]$mOut)
|
|
$o['HostLabel'] = $HostLabel
|
|
$o['PSVersion'] = $PSVersionTable.PSVersion.ToString()
|
|
$o['IsOutputRedirected'] = [Console]::IsOutputRedirected
|
|
$o['HWND'] = ('0x{0:X}' -f ([K32]::GetConsoleWindow().ToInt64()))
|
|
$o['ConsoleTitle'] = [Console]::Title
|
|
$o['GetConsoleOutputCP'] = [K32]::GetConsoleOutputCP()
|
|
$o['OutputEncoding'] = [Console]::OutputEncoding.WebName
|
|
$o['STDOUT_mode_hex'] = ('0x{0:X}' -f $mOut)
|
|
$o['STDOUT_VT_PROCESSING_0x4'] = (($mOut -band 4) -eq 4)
|
|
$o['Host_UI_SupportsVirtualTerminal'] = [string]$Host.UI.SupportsVirtualTerminal
|
|
$o['RawUI_SupportsVirtualTerminal_member'] = [bool]($Host.UI.RawUI | Get-Member -Name SupportsVirtualTerminal -ErrorAction SilentlyContinue)
|
|
$o['WT_SESSION'] = [string]$env:WT_SESSION
|
|
$o['WT_PROFILE_ID'] = [string]$env:WT_PROFILE_ID
|
|
$o['TERM_PROGRAM'] = [string]$env:TERM_PROGRAM
|
|
$o['TERM'] = [string]$env:TERM
|
|
$o['ConEmuANSI'] = [string]$env:ConEmuANSI
|
|
$o['PSEdition'] = $PSVersionTable.PSEdition
|
|
try { $o['RawUI_KeyAvailable'] = 'ok:' + $Host.UI.RawUI.KeyAvailable } catch { $o['RawUI_KeyAvailable'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['Console_KeyAvailable'] = 'ok:' + [Console]::KeyAvailable } catch { $o['Console_KeyAvailable'] = 'THREW: ' + $_.Exception.Message }
|
|
try {
|
|
[Console]::SetCursorPosition(5, 5)
|
|
$o['Console_SetCursorPosition_5_5'] = 'ok -> CursorLeft=' + [Console]::CursorLeft + ' CursorTop=' + [Console]::CursorTop
|
|
} catch { $o['Console_SetCursorPosition_5_5'] = 'THREW: ' + $_.Exception.Message }
|
|
try {
|
|
$c = New-Object System.Management.Automation.Host.Coordinates 7, 7
|
|
$Host.UI.RawUI.CursorPosition = $c
|
|
$o['RawUI_SetCursorPosition'] = 'ok -> ' + $Host.UI.RawUI.CursorPosition.X + ',' + $Host.UI.RawUI.CursorPosition.Y
|
|
} catch { $o['RawUI_SetCursorPosition'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['RawUI_WindowSize'] = "$($Host.UI.RawUI.WindowSize.Width)x$($Host.UI.RawUI.WindowSize.Height)" } catch { $o['RawUI_WindowSize'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['RawUI_BufferSize'] = "$($Host.UI.RawUI.BufferSize.Width)x$($Host.UI.RawUI.BufferSize.Height)" } catch { $o['RawUI_BufferSize'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['RawUI_MaxWindowSize'] = "$($Host.UI.RawUI.MaxWindowSize.Width)x$($Host.UI.RawUI.MaxWindowSize.Height)" } catch { $o['RawUI_MaxWindowSize'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['RawUI_MaxPhysicalWindowSize'] = "$($Host.UI.RawUI.MaxPhysicalWindowSize.Width)x$($Host.UI.RawUI.MaxPhysicalWindowSize.Height)" } catch { $o['RawUI_MaxPhysicalWindowSize'] = 'THREW: ' + $_.Exception.Message }
|
|
try { $o['CursorSize'] = [string]$Host.UI.RawUI.CursorSize } catch { $o['CursorSize'] = 'THREW' }
|
|
try { $o['ForegroundColor'] = [string]$Host.UI.RawUI.ForegroundColor } catch { $o['ForegroundColor'] = 'THREW' }
|
|
try { $o['WindowTitle'] = [string]$Host.UI.RawUI.WindowTitle } catch { $o['WindowTitle'] = 'THREW' }
|
|
$o['ProgressPreference'] = [string]$ProgressPreference
|
|
$o['HostName'] = $Host.Name
|
|
$json = $o | ConvertTo-Json -Compress
|
|
[System.IO.File]::WriteAllText($OutFile, $json, (New-Object System.Text.UTF8Encoding($false)))
|
|
Write-Host ("[{0}] PS {1} VT={2} redirected={3} WT_SESSION={4}" -f $HostLabel, $PSVersionTable.PSVersion, $Host.UI.SupportsVirtualTerminal, [Console]::IsOutputRedirected, $env:WT_SESSION) -ForegroundColor Yellow
|
|
Write-Host (" ANSI: " + [char]27 + "[31mRED" + [char]27 + "[0m " + [char]27 + "[104mBG-BRIGHT-BLUE" + [char]27 + "[0m " + [char]27 + "[38;2;255;128;0mTRUECOLOR" + [char]27 + "[0m")
|
|
Write-Host (" Positioned: " + [char]27 + "[2;10HAT-ROW2-COL10")
|
|
if ($WatchSeconds -gt 0) { Start-Sleep -Seconds $WatchSeconds }
|