56 lines
3.0 KiB
PowerShell
56 lines
3.0 KiB
PowerShell
[Console]::OutputEncoding = [Text.Encoding]::UTF8
|
|
$ErrorActionPreference = "Stop"
|
|
function H2B($hex) {
|
|
if (-not $hex) { return $null }
|
|
$n = $hex.Length / 2
|
|
$b = New-Object byte[] $n
|
|
for ($i = 0; $i -lt $n; $i++) { $b[$i] = [Convert]::ToByte($hex.Substring(2*$i, 2), 16) }
|
|
return $b
|
|
}
|
|
$lines = [IO.File]::ReadAllLines("$env:TEMP\opencode\ss123.tsv")
|
|
$acks = New-Object System.Collections.ArrayList
|
|
$qs = New-Object System.Collections.ArrayList
|
|
foreach ($l in $lines) {
|
|
$p = $l -split "`t"; if ($p.Count -lt 5 -or -not $p[4]) { continue }
|
|
$b = H2B $p[4]; if ($b.Length -lt 0x2A) { continue }
|
|
$t = [double]$p[0]
|
|
if ($p[1] -eq "192.168.123.1" -and $p[2] -eq "192.168.123.113" -and $b.Length -eq 42 -and [int]$b[4] -eq 4) {
|
|
$v = [int]$b[0x20] + [int]$b[0x21]*256 + [int]$b[0x22]*65536 + [int]$b[0x23]*16777216
|
|
[void]$acks.Add(@{ t=$t; v=$v; hex=(($b[0x1A..0x29] | ForEach-Object { $_.ToString("x2") }) -join "") })
|
|
}
|
|
if ($p[1] -eq "192.168.123.113" -and $p[2] -eq "192.168.123.1" -and $b.Length -gt 0x52 -and $b.Length -lt 2000 -and [int]$b[4] -eq 4 -and $b[0x20] -eq 2 -and $b[0x21] -eq 0 -and $b[0x30] -eq 0 -and $b[0x3C] -eq 1) {
|
|
[void]$qs.Add(@{ t=$t; cmd=$b[0x3D] })
|
|
}
|
|
}
|
|
Write-Host ("42B 帧数={0}" -f $acks.Count)
|
|
# 0x20-0x23 值序列: 单调性 + 间隔
|
|
$mono = 0; $notMono = 0; $gaps = @{}
|
|
for ($i = 1; $i -lt $acks.Count; $i++) {
|
|
$d = $acks[$i].v - $acks[$i-1].v
|
|
if ($d -gt 0) { $mono++ } else { $notMono++ }
|
|
$gk = "$d"
|
|
if (-not $gaps.ContainsKey($gk)) { $gaps[$gk] = 0 }; $gaps[$gk]++
|
|
}
|
|
Write-Host ("0x20-0x23 值: 递增={0} 非递增={1}" -f $mono, $notMono)
|
|
Write-Host "--- 相邻差值分布 ---"
|
|
$gaps.GetEnumerator() | Sort-Object { [int]$_.Key } | Select-Object -First 10 | ForEach-Object { Write-Host (" 差={0} : {1}" -f $_.Key, $_.Value) }
|
|
Write-Host "--- 前 8 个 42B 帧 (时间/值/hex) ---"
|
|
foreach ($a in ($acks | Select-Object -First 8)) { Write-Host (" t={0,8:F3} v={1} hex={2}" -f $a.t, $a.v, $a.hex) }
|
|
Write-Host "--- 后 4 个 ---"
|
|
foreach ($a in ($acks | Select-Object -Last 4)) { Write-Host (" t={0,8:F3} v={1} hex={2}" -f $a.t, $a.v, $a.hex) }
|
|
# 42B 帧与 cmd 查询的时间相关性: 每个 42B 前 50ms 内最近的查询 cmd
|
|
$byCmd = @{}
|
|
foreach ($a in $acks) {
|
|
$best = $null
|
|
for ($i = $qs.Count - 1; $i -ge 0; $i--) { if ($qs[$i].t -le $a.t) { $best = $qs[$i]; break } }
|
|
$k = if ($best -and (($a.t - $best.t) -lt 0.05)) { "cmd={0:x2}" -f $best.cmd } else { "无临近查询" }
|
|
if (-not $byCmd.ContainsKey($k)) { $byCmd[$k] = 0 }; $byCmd[$k]++
|
|
}
|
|
Write-Host "--- 42B 帧前 50ms 内最近查询 ---"
|
|
$byCmd.GetEnumerator() | Sort-Object { [int]$_.Value } -Descending | ForEach-Object { Write-Host (" {0} : {1}" -f $_.Key, $_.Value) }
|
|
# 42B 帧间时间隔
|
|
$tlast = $null; $tg = New-Object System.Collections.ArrayList
|
|
foreach ($a in $acks) { if ($null -ne $tlast) { [void]$tg.Add([int](($a.t - $tlast) * 1000)) }; $tlast = $a.t }
|
|
$tgs = $tg | Sort-Object
|
|
Write-Host ("--- 42B 帧时间隔ms: min={0} 中位={1} max={2}" -f $tgs[0], $tgs[[int]($tgs.Count/2)], $tgs[-1])
|