feat(tui): 配置标量的读改核心（第二轮第一块）
先侦察事实：BackupConfig.psd1 共 99 行 —— 52 行注释、18 行单行标量、3 处嵌套哈希、1 处数组、1 处行内空哈希（SidMap = @{}）。所以"外科式改一个值"的边界很明确：**只认单行标量**。值跨行或本身是集合时，"改一行"这个动作没有明确含义 —— 那种就不该在界面上提供（如实显示为只读）。
路径用点号拼（Snapshot.Enabled）：同名键在不同嵌套里会出现（Enabled 有两处），只用键名会把它们混成一个。非标量（行内哈希、数组）显式排除。读出来的是**含引号的原文** —— 原样写回才逐字节等价。
判据 12 条，核心是往返：**把每个标量设成它当前的值，文本必须逐字节相同**（含键名对齐与全部注释）；真改一个时只有那一行不同、注释行数不变、改完还能读出新值；找不到路径或不是标量必须抛错而不是静默不动。
真实配置上的实测：认出 18 个标量（含 3 组嵌套的点号路径，排除了 SidMap 与 DefaultExcludes），**往返后逐字节相同 = True**。
过程里插入的测试代码带过一行手滑的垃圾（被 Parse 层当场抓住 —— 它是这个仓库最便宜的一道闸），以及一条期望值写错（忘了 Value 含引号）。
验收：test.ps1 9/9 全绿（5.1 与 7）；真实清单只读冒烟 4/4。
This commit is contained in:
Shuery committed
1 parent
c2bae35506
commit
7733b1bf6d
5 files changed
+150
No files matched your search
@@ -19,6 +19,8 @@
|
||||
CompatiblePSEditions = @('Desktop', 'Core')
|
||||
|
||||
FunctionsToExport = @(
|
||||
'Get-BakNRetConfigSetting',
|
||||
'Set-BakNRetConfigSetting',
|
||||
'Invoke-BakNRetEntryScript',
|
||||
'Invoke-BakNRetBackupListEditor',
|
||||
'Set-BakNRetBackupListDirection',
|
||||
|
||||
@@ -168,7 +168,12 @@
|
||||
|
||||
. (Join-Path $PSScriptRoot 'Public\Invoke-BakNRetEntryScript.ps1')
|
||||
|
||||
. (Join-Path $PSScriptRoot 'Public\Get-BakNRetConfigSetting.ps1')
|
||||
. (Join-Path $PSScriptRoot 'Public\Set-BakNRetConfigSetting.ps1')
|
||||
|
||||
Export-ModuleMember -Function @(
|
||||
'Get-BakNRetConfigSetting',
|
||||
'Set-BakNRetConfigSetting',
|
||||
'Invoke-BakNRetEntryScript',
|
||||
'Invoke-BakNRetBackupListEditor',
|
||||
'Set-BakNRetBackupListDirection',
|
||||
|
||||
@@ -0,0 +1,67 @@
|
||||
function Get-BakNRetConfigSetting {
|
||||
<#
|
||||
.SYNOPSIS
|
||||
把配置文本拆成"一行一个标量设置"的表：行号、点号路径、键、原值、行尾注释。
|
||||
|
||||
.DESCRIPTION
|
||||
为什么只认**单行标量**：这份配置文件里还有三处嵌套哈希、一处数组、一处行内空哈希
|
||||
（SidMap = @{}）与大量多行注释。外科式改写（ADR-0013）只碰"一行就是一个值"的那些 ——
|
||||
值跨行或本身是集合时，"改一行"这个动作没有明确含义，宁可不在界面上提供（如实显示为只读）。
|
||||
|
||||
路径用点号拼（Snapshot.Enabled）：同名键在不同嵌套里会出现（Enabled 就有两处），
|
||||
只用键名会把它们混成一个。
|
||||
|
||||
`Raw` 是原始行文本：编辑时若没动这一行，就写回原样，键名与对齐的空格一字节都不变。
|
||||
#>
|
||||
param([Parameter(Mandatory = $true)][AllowEmptyString()][string]$Text)
|
||||
|
||||
$lines = $Text -split "`r?`n"
|
||||
$stack = New-Object System.Collections.Generic.List[string]
|
||||
$rows = @()
|
||||
|
||||
for ($index = 0; $index -lt $lines.Count; $index++) {
|
||||
$line = $lines[$index]
|
||||
$trimmed = $line.Trim()
|
||||
if ($trimmed -eq '' -or $trimmed.StartsWith('#')) { continue }
|
||||
|
||||
# 进入一层嵌套哈希
|
||||
if ($trimmed -match '^([\w'']+)\s*=\s*@\{\s*$') {
|
||||
$stack.Add($Matches[1])
|
||||
continue
|
||||
}
|
||||
|
||||
# 离开一层：闭括号可能带后续内容，只关心它是否以 } 开头
|
||||
if ($trimmed.StartsWith('}')) {
|
||||
if ($stack.Count -gt 0) { $stack.RemoveAt($stack.Count - 1) }
|
||||
continue
|
||||
}
|
||||
|
||||
# 单行标量：有 = ，且值不以 @ 开头（集合与嵌套不是标量）
|
||||
if ($trimmed -match '^([\w'']+)\s*=\s*(.+)$') {
|
||||
$key = $Matches[1]
|
||||
$rest = $Matches[2]
|
||||
if ($rest.StartsWith('@')) { continue }
|
||||
|
||||
$value = $rest
|
||||
$comment = ''
|
||||
$commentIndex = $rest.IndexOf(' #')
|
||||
if ($commentIndex -ge 0) {
|
||||
$value = $rest.Substring(0, $commentIndex).Trim()
|
||||
$comment = $rest.Substring($commentIndex + 1).Trim()
|
||||
}
|
||||
|
||||
$path = if ($stack.Count -gt 0) { ($stack -join '.') + '.' + $key } else { $key }
|
||||
|
||||
$rows += [pscustomobject]@{
|
||||
Line = $index + 1
|
||||
Path = $path
|
||||
Key = $key
|
||||
Value = $value
|
||||
Comment = $comment
|
||||
Raw = $line
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return @($rows)
|
||||
}
|
||||
@@ -0,0 +1,38 @@
|
||||
function Set-BakNRetConfigSetting {
|
||||
<#
|
||||
.SYNOPSIS
|
||||
改**一个**标量设置的值：只动那一行、且只动 `=` 之后的部分，其余逐字节保持。
|
||||
|
||||
.DESCRIPTION
|
||||
键名与对齐的空格一律不动（那一列对齐是给人读的，改了它 diff 会变得没法看），行尾注释也原样
|
||||
保留。写回时 `=` 后固定留一个空格 —— 与文件里既有的写法一致。
|
||||
|
||||
找不到路径、或该路径不是"单行标量"（值跨行 / 是集合）时**抛错**：静默不动会制造
|
||||
"保存成功但其实没改"，而用户看到的是一份以为改过、其实没改的配置。
|
||||
|
||||
本函数只处理字符串；写盘由调用方走 Save-BakNRetConfigFile（校验通过才原子替换 + 时间戳备份）。
|
||||
#>
|
||||
param(
|
||||
[Parameter(Mandatory = $true)][AllowEmptyString()][string]$Text,
|
||||
[Parameter(Mandatory = $true)][string]$Path,
|
||||
[Parameter(Mandatory = $true)][AllowEmptyString()][string]$Value
|
||||
)
|
||||
|
||||
$row = @(Get-BakNRetConfigSetting -Text $Text | Where-Object { $_.Path -eq $Path }) | Select-Object -First 1
|
||||
|
||||
if (-not $row) {
|
||||
throw ('配置里找不到单行标量设置：{0}（它可能不存在，也可能值跨行或本身是集合）' -f $Path)
|
||||
}
|
||||
|
||||
$lines = @($Text -split "`r?`n")
|
||||
$original = $lines[$row.Line - 1]
|
||||
$equalsIndex = $original.IndexOf('=')
|
||||
if ($equalsIndex -lt 0) { throw ('这一行没有 = ：{0}' -f $original) }
|
||||
|
||||
$head = $original.Substring(0, $equalsIndex + 1) + ' '
|
||||
$tail = ''
|
||||
if ($row.Comment) { $tail = ' # ' + $row.Comment.TrimStart('#').Trim() }
|
||||
|
||||
$lines[$row.Line - 1] = $head + $Value + $tail
|
||||
return ($lines -join "`n")
|
||||
}
|
||||
@@ -1736,6 +1736,44 @@ Test-Case '主入口：-Quiet 不画界面、菜单能渲染、进不去界面
|
||||
}
|
||||
}
|
||||
|
||||
Test-Case '配置标量：只认单行标量；改一个值只动那一行；设成当前值则逐字节不变' {
|
||||
$configPath = Join-Path (Split-Path -Parent $PSScriptRoot) 'BackupConfig.psd1'
|
||||
$text = Get-Content -LiteralPath $configPath -Raw -Encoding UTF8
|
||||
|
||||
$rows = @(Get-BakNRetConfigSetting -Text $text)
|
||||
Assert-True ($rows.Count -ge 15) ('真实配置里应当认出足够多的标量，实际 ' + $rows.Count)
|
||||
Assert-Equal "'Backups'" ($rows | Where-Object { $_.Path -eq 'BackupDir' }).Value '顶层标量（读出来的是含引号的原文 —— 原样写回才逐字节等价）'
|
||||
Assert-Equal 'Snapshot.Enabled' (($rows | Where-Object { $_.Path -eq 'Snapshot.Enabled' }).Path) '嵌套里的键要用点号路径（Enabled 有两处）'
|
||||
Assert-Equal '$true' (($rows | Where-Object { $_.Path -eq 'Encryption.EncryptHeaders' }).Value) '布尔值按原文读出（$true 本身就是原文）'
|
||||
|
||||
# 非标量必须被排除：行内空哈希与数组都不是"一行一个值"
|
||||
Assert-Equal 0 @($rows | Where-Object { $_.Path -eq 'Security.SidMap' }).Count '行内哈希不算标量'
|
||||
Assert-Equal 0 @($rows | Where-Object { $_.Path -like 'DefaultExcludes*' }).Count '数组不算标量'
|
||||
|
||||
# 往返：把每个标量设成它当前的值，文本必须**逐字节相同**（外科式改写的最强形式）
|
||||
$roundTripped = $text
|
||||
foreach ($row in $rows) { $roundTripped = Set-BakNRetConfigSetting -Text $roundTripped -Path $row.Path -Value $row.Value }
|
||||
Assert-Equal $text $roundTripped '每个标量设成当前值后文本逐字节相同'
|
||||
|
||||
# 真改一个：只有那一行不同，注释行数不变，并且改完还能读出新值
|
||||
$changed = Set-BakNRetConfigSetting -Text $text -Path 'BackupDir' -Value "'Backups2'"
|
||||
$before = @($text -split "`n")
|
||||
$after = @($changed -split "`n")
|
||||
Assert-Equal $before.Count $after.Count '行数不变'
|
||||
Assert-Equal 2 @(Compare-Object -ReferenceObject $before -DifferenceObject $after).Count '只应当有一行不同'
|
||||
$commentCount = @($before | Where-Object { $_.TrimStart().StartsWith('#') }).Count
|
||||
Assert-Equal $commentCount @($after | Where-Object { $_.TrimStart().StartsWith('#') }).Count '注释行数不变'
|
||||
Assert-Equal "'Backups2'" ((Get-BakNRetConfigSetting -Text $changed | Where-Object { $_.Path -eq 'BackupDir' }).Value) '改完还能读出同一个值'
|
||||
|
||||
# 找不到 / 不是标量：必须抛错，不能静默不动
|
||||
$threw = $false
|
||||
try { Set-BakNRetConfigSetting -Text $text -Path 'No.Such.Key' -Value '1' | Out-Null } catch { $threw = $true }
|
||||
Assert-True $threw '找不到的路径必须抛错'
|
||||
$threw2 = $false
|
||||
try { Set-BakNRetConfigSetting -Text $text -Path 'Security.SidMap' -Value '@{}' | Out-Null } catch { $threw2 = $true }
|
||||
Assert-True $threw2 '非标量（行内哈希）也必须抛错'
|
||||
}
|
||||
|
||||
# ============================================================================
|
||||
Remove-Item -LiteralPath $sandbox -Recurse -Force -ErrorAction SilentlyContinue
|
||||
Remove-Item -LiteralPath $itemSandbox -Recurse -Force -ErrorAction SilentlyContinue
|
||||
|
||||
Reference in new issue
Block a user