merge: v0.5.0 terminal search, keyword alerts, TeraTerm-compatible TTL

This commit is contained in:
2026-07-02 16:08:12 +08:00
15 changed files with 2288 additions and 231 deletions
+2
View File
@@ -10,6 +10,8 @@ ETTerms 是一個 **C# .NET 8 WinForms** 的原生 Windows 終端機工作台,
**進度:** Phase 15 ✅、Phase 6 ✅(TTL 引擎 + Group 同步,SSH 待驗收)、Phase 7 ✅(Settings/About)、Phase 8 ✅(PDU + Shell/ConPTY + SFTP + Settings 擴充)、Phase 9 ✅(Serial MCP server**GUI 持有 COM portMCP 經本機 named pipe 橋接**,AI 收發的資料即時以 `[AI]` 標色顯示在 GUI)。打包待指示。
**v0.5.0** 搜尋 / 關鍵字警示 / TTL 大擴充。**(1) Ctrl+F scrollback 搜尋** — `TerminalView` 內建搜尋列(Enter 往上找、Shift+Enter 往下、F3/Esc),全部命中黃底、目前命中橘底;命中以「絕對行號 = `ScreenBuffer.DroppedLines` + abs」錨定,環形緩衝丟舊行不漂移。**(2) 關鍵字高亮 + 分頁警示** — `AppSettings.KeywordRules``KeywordRule{Text,Enabled}` + 全域開關),Settings 新 **Highlight** 分頁可增刪/勾選;`TerminalView` 每次重繪只掃可見行標紅底(不分大小寫),`Feed` 路徑用獨立 Decoder+去 ANSI 偵測觸發 `KeywordAlert`(每關鍵字 2s 冷卻)→ `SessionPage``WorkspaceView` 把**非 active 分頁**的圓點標紅、切過去自動清除。**(3) TTL 對齊 TeraTerm** — 新 `TtlExpression` 運算式解析器(括號/邏輯/比較/十六進位 `0x`/`$`,失敗退回 legacy 規則相容舊腳本);新增控制流 `goto/call(行內執行,迴圈內可用)/return/for-next/do-loop/until-enduntil/break/continue/end/exit/include/mpause`、等待 `waitln/waitregex/recvln/wait 多字串(TeraTerm 語意:逾時 result=0 繼續)/mtimeout`、字串 `strlen/strcompare/strconcat/strcopy/strinsert/strremove/strmatch/strscan/strreplace/strtrim/strsplit/strjoin/tolower/toupper/str2int/int2str/code2str/str2code/sprintf(→inputstr)/expandenv`、檔案 `fileopen/filereadln(result=1 是 EOF)/filewrite(ln)/fileclose/filecreate/filedelete/filesearch/basename/dirname/makepath/foldercreate/folderdelete/foldersearch/getdir/setdir`、雜項 `beep/getdate/gettime(strftime 子集)/getenv/setenv/random/exec/getver/getttdir/uptime/ifdefined/clipb2var/var2clipb/inputbox/yesnobox/crc32/checksum8/16/32/dispstr`、serial 專用 `sendbreak/setbaud/setdtr/setrts/sendfile``SerialChannel` 新增對應方法);單行 `if <expr> <statement>` 支援;`Preprocess` 引號內 `;` 不再被當註解;系統變數 `inputstr/matchstr/groupmatchstr1-9``_vars` 改大小寫不敏感;**單字串 `wait` 保留 ETTerms settle+逾時中止語意(勿改)**,多字串才是 TeraTerm 語意。`SessionPage``runner.Output`trace`[wait]`/`>>`/錯誤)以灰色 echo 進終端機,**可由 Settings → Terminal 的 `ShowScriptTrace` 開關關閉**`dispstr` 走獨立的 `Display` 事件一律顯示。灰色訊息只進畫面 buffer——不進 ⏺ Log 側錄、不進 AI bridge、不送裝置(機台原始 log 乾淨)。指令表+範例:[docs/ttl-script-reference.md](docs/ttl-script-reference.md)(前段 ETTerms 獨有、後段與 TeraTerm 共有)。
**v0.4.0** 效能 / 穩定性總整理(來自全 codebase 審視)。**(1) 終端機繪製熱路徑去配置** — `TerminalView` 快取 4 種 Font 變體(Bold/Underline 組合)與單一可變色 `SolidBrush`,run 合併時每 cell 顏色只解析一次,`Dispose` 收掉 GDI 資源;**(2) scrollback 改環形緩衝** — `ScreenBuffer``List+RemoveRange(0,…)`(滿了每行 O(n) 搬移)改 O(1) ring buffer**(3) UTF-8 跨 chunk 亂碼修正(3 處)** — `TTLInterpreter.OnData``SerialBridgeServer` rx 轉發、`SessionLogger.Write` 改用 stateful `Decoder`(比照 `AnsiParser` 原本的正確做法);**(4) PDU SNMP 批次查詢** — 新共用專案 **`src/ETTerms.PduCore/`** 取代 GUI 與 PduMcp 兩份複製的 `PduController`log 走建構子委派),新增 `GetAllPortsStatus()` 一個 SNMP GET 帶 12 個 varbind12 port 輪詢從 36 個 UDP 來回縮成 3 個(StatusView 與 `pdu_status` 都改用);**(5) ShellChannel 資源修正** — `DeleteProcThreadAttributeList`+`FreeHGlobal` 釋放 attribute list、`CloseHandle(pi.hProcess)`shell 自行 exit 時顯示灰色 `[ETTerms] shell process exited` 提示;**(6) SSH 斷線可見** — 訂 `ErrorOccurred`/`ShellStream.Closed` 顯示提示,`Write` 例外不再炸 UI thread;**(7) 終端機行為** — 新輸出只在已貼底時跟隨(看歷史不被拉回底部)、alt screen 滾輪轉方向鍵(vim/htop 可滾)、回應 DSR `ESC[6n`/`ESC[5n` 與 DA `ESC[c`(TUI 查游標位置不再卡住);**(8) TTL** — `_recv` 上限 1MB、wait 輪詢長度沒變不重掃;**(9) 去重複** — `ScriptRunner` 兩個 Run 合併、`TtlScript` 共用選檔/group 指令檢查(SessionPage/WorkspaceView 三份流程收斂)、`ConnectionStore` 讀取改 InvariantCulture+RoundtripKind。註:group `waitall` 一個成員失敗其他成員停在 barrier 是**刻意行為**(使用者要求整組停下),勿「修」。
**v0.3.2** **(1) 新增左側 `Status` rail view** — 位於 Terminal 與 Settings 之間(圖示 `⚡`,新增 `ActivityRail.RailView.Status` 列舉與 `Items`),獨立 `App/StatusView.cs`,沿用 `SettingsView` 的自繪 tab strip + panel 切換風格(避免 TabControl 白邊);`MainForm``_statusView` 欄位、佈局與 rail 切換可見性。目前只有 **PDU 分頁**,未來會再加分頁(`MakeTab(...)` 即可擴充)。**(2) PDU 搬到 Status 並改自動輪詢** — PDU 從 `SettingsView` 移到 `StatusView`**移除手動 Refresh 按鈕**,連線成功後以 `System.Threading.Timer`period 3000ms)在**背景執行緒**讀 SNMP、再 `BeginInvoke` 回 UI 更新表格(不卡 UI);`Interlocked` 旗標防止前一輪未讀完就重入;斷線 / 控制項 Dispose 時自動停掉 timer 與 `PduController`;表格下方顯示「last update HH:mm:ss」。`SettingsView` 移除 `BuildPduTab`/`RefreshPduGrid``ETTerms.Scripting.Pdu` import,現只剩 **Terminal / AI MCP** 兩分頁。**(2b) PDU 分頁加手動開關鈕** — 狀態表格新增 **Control** 欄(`DataGridViewButtonColumn`),每個 Port 一顆鈕,文字隨狀態切換(ON→「Turn OFF」、OFF→「Turn ON」、未知→「—」);點擊在背景執行緒呼叫 `PduController.SetPortOn/SetPortOff`(不卡 UI),等 ~400ms 後回讀刷新整表,失敗跳 `MessageBox`;未連線點擊會提示先 Connect,斷線時清空表格避免顯示過時狀態。**(3) 修 `ShellChannel` 啟動目錄 fallback** — 本機 Shell 的 `StartupDirectory` 若已不存在(外接碟拔除 / 資料夾被刪)會 `CreateProcess failed: 267 (ERROR_DIRECTORY)`;改為「為空 **或** `Directory.Exists` 為 false」即 fallback 到使用者家目錄(`Environment.SpecialFolder.UserProfile`,隨登入者變動,例如 `C:\Users\et_wen`),與 Windows PowerShell 行為一致。
+243 -115
View File
@@ -1,178 +1,306 @@
# TTL Script Reference — ETTerms
> ETTerms 的 TTLTera Term Language)腳本引擎移植自 MyTeraTerm,改為驅動原生
> `ISessionChannel`SSH / Serial 皆可)。在 **Scripts 檢視**載入 `.ttl` 腳本,對
> **目前 active session** 執行(先在 Terminal 檢視開好連線)
> `ISessionChannel`SSH / Serial / Shell 皆可)。在分頁上按 **Script** 載入 `.ttl`
> 對該分頁執行;或用 toolbar 的 **▶ Run All** / **▶ Group1-3** 批次執行
>
> v0.5.0 起大幅對齊 [TeraTerm macro 指令集](https://teratermproject.github.io/manual/5/en/macro/command/index.html)。
> 本文**前段是 ETTerms 獨有指令****後段是與 TeraTerm 共有的指令**。
執行於背景執行緒,可隨時按 **Stop** 中止;`wait` / `pause` 期間皆可取消。
腳本的 trace 訊息(`[wait]` 進度、`>>` 送出回顯、錯誤)會以灰色顯示在該分頁的終端機裡,
可由 **Settings → Terminal → Show script trace in terminal** 關閉;`dispstr` 是腳本明確要
顯示的內容,一律顯示。**這些灰色訊息只出現在畫面上**——不會送到裝置、不會寫進 ⏺ Log
側錄檔、AI serial bridge 也讀不到,機台原始 log 保持乾淨。
---
## 語法規則
- 一行一個指令;前後空白會被去除。
- 註解:`;` 之後到行尾視為註解
- 字串引號 `'...'``"..."` 皆可,送出時引號會被去除
- 變數以 `名稱 = 值` 指派;名稱須符合 `^[a-zA-Z_][a-zA-Z0-9_]*$`
- 內建變數 `result``wait` 命中為 `1`、逾時為 `0`
- 換行:`sendln` 自動附加 `\r\n`
- 註解:`;` 之後到行尾**引號內的 `;` 不算**
- 字串引號 `'...'``"..."` 皆可。
- Label`:名稱` 一行,供 `goto` / `call` 跳轉
- 變數 `名稱 = 運算式` 指派;名稱須符合 `[a-zA-Z_][a-zA-Z0-9_]*`,大小寫不分
- 運算式支援:整數(十進位 / `0x1F` / `$1F`)、字串、括號、`+ - * / %`
比較 `= == <> != > < >= <=`、邏輯 `and or xor not`(同義 `&& || !`)。
比較時兩邊都是數字用數值比較,否則字串比較;未定義變數視為 `0`
- 單行 if`if <條件> <指令>`(如 `if result = 0 goto retry`);區塊 if 用 `then ... endif`
### 系統變數
| 變數 | 說明 |
|------|------|
| `result` | 多數指令的結果碼(各指令說明)。 |
| `inputstr` | `waitln` / `recvln` / `inputbox` / `sprintf` 的結果字串。 |
| `matchstr` | `waitregex` / `strmatch` 命中的整段文字。 |
| `groupmatchstr1``9` | regex 群組(`waitregex` / `strmatch`)或 `strsplit` 的分段。 |
| `timeout` | wait 家族的逾時(秒),`timeout = 10`0 = 無限等待。 |
| `mtimeout` | 逾時的毫秒部分,與 `timeout` 相加(`mtimeout = 500`)。 |
---
## 指令對照表
# 一、ETTerms 獨有指令
## Group 同步(多分頁協同)
以下指令**只能在 Run Group 模式**下使用(toolbar 的 `▶ Group1-3`)。
`▶ Script``▶ Run All` 會拒絕含這些指令的腳本。
Group 內的成員依序編為 **A, B, C...**(顯示在 cell footer,如 `[Group1-A]`)。
> ⚠ 刻意設計:group 同步時**一個成員停止(Stop / 逾時 / 錯誤),其他成員會停在
> barrier 等**——整組一起停下來,避免半組繼續跑造成狀態不一致。
| 指令 | 語法 | 說明 |
|------|------|------|
| `send` | `send '文字'` | 送出文字(不加換行)到 active session。 |
| `sendln` | `sendln '文字'` | 送出文字並附加 `\r\n`。 |
| `wait` | `wait '字串'` | **一直等到**接收緩衝出現指定字串才往下;預設無限等待(可按 Stop 取消)。命中後會再確認裝置「安靜」約 300ms(無新資料)才接受,以排除夾在輸出中途的回顯(如 `SVOS> help`),並消費到該字串**最後一次**出現(含)之前的內容,`result=1`。 |
| `pause` | `pause 秒數` | 暫停指定秒數(可被 Stop 中止)。 |
| `timeout` | `timeout = 秒數` | 設定 `wait` 的逾時秒數。預設 `0`=無限等待;若設為 `N>0``wait` 超過 N 秒仍未命中會**中止整個腳本並報錯**(不會略過 `wait` 往下做)。 |
| `flushrecv` | `flushrecv` | 清空接收緩衝區。 |
| `logopen` | `logopen '檔名'` | 開啟 log 檔(覆寫);`send``logwrite` 會寫入。 |
| `logwrite` | `logwrite '文字'` | 寫一行到 log 檔。 |
| `logclose` | `logclose` | 關閉 log 檔(腳本結束時自動關閉)。 |
| `messagebox` | `messagebox '訊息'` | 跳出訊息對話框。 |
| `sprintf2` | `sprintf2 變數 格式 [引數 ...]` | C `printf` 風格格式化,結果存入字串變數。詳見下方說明。 |
| `if` / `elseif` / `else` / `endif` | 見下 | 條件分支(可巢狀)。 |
| `while` / `endwhile` | 見下 | 迴圈(可巢狀,可被 Stop 中止)。 |
| `名稱 = 值` | `idx = 0` | 變數指派,支援 `+ - * /` 整數運算與字串。 |
> **注意:** PDU 控制指令(`pductrl` / `pduconnect`)屬 Phase 7,本階段尚未提供。
---
## Group 同步指令
以下指令**只能在 Run Group 模式**下使用(toolbar 的 `▶ Group1` / `▶ Group2` / `▶ Group3`)。
若在 `▶ Script`(分頁個別執行)或 `▶ Run All` 使用,會跳 Warning 並拒絕執行。
Group 內的成員依加入順序編為 **A, B, C, D...**,顯示在 cell footer(如 `[Group1-A]`)。
| 指令 | 語法 | 說明 |
|------|------|------|
| `waitall` | `waitall '字串'` | 各成員各自 `wait` 到指定字串出現後,再等其他成員也完成,全員到齊才繼續下一步。 |
| `sendlnall` | `sendlnall '文字'` | 等所有成員到達此行後,每人各自對自己的 channel `sendln` 同一段文字。 |
| `sendlngroup` | `sendlngroup A '文字'` | 只有指定 memberA/B/C...)會 `sendln`,其他成員跳過。用於 Group 內各設備需送不同指令的情境。 |
### Group 範例:同步升級多台交換機
| `waitall` | `waitall '字串'` | 各成員各自 `wait` 到字串出現,再等其他成員到齊才繼續。 |
| `sendlnall` | `sendlnall '文字'` | 等所有成員到達此行後,每人各自 `sendln` 同一段文字。 |
| `sendlngroup` | `sendlngroup A '文字'` | 只有指定 memberA/B/C...`sendln`,其他成員跳過。 |
```ttl
; Group1 A=SW1, B=SW2, C=SW3
; prompt
; Group1 A=SW1, B=SW2, C=SW3
waitall '#'
;
sendlngroup A 'copy tftp://10.0.0.1/sw1.bin flash:'
sendlngroup B 'copy tftp://10.0.0.1/sw2.bin flash:'
sendlngroup C 'copy tftp://10.0.0.1/sw3.bin flash:'
;
waitall '#'
; reload
sendlnall 'reload'
waitall 'confirm'
sendlnall 'y'
```
### Group 設定方式
## PDU 電源控制(iPoMan II/IIISNMP
1. 在分頁 Tab 上**右鍵** → 選擇 `Group 1` / `Group 2` / `Group 3`(或 `No Group` 取消)
2. 設定後 cell footer 會顯示 `[Group1-A]``[Group1-B]` 等標籤
3. 點 toolbar 的 `▶ Group1` 載入 `.ttl` 檔,Group 內所有成員平行執行同一份腳本
| 指令 | 語法 | 說明 |
|------|------|------|
| `pduconnect` | `pduconnect <device> <ip>` | 連 PDU 並驗證,`result` 1/0。device 為自訂編號。 |
| `pductrl` | `pductrl <device> <port> <0\|1>` | 指定插座 OFF(0)/ON(1)`result` 1/0。 |
```ttl
pduconnect 1 192.168.1.21
if result = 0 goto fail
pductrl 1 3 0 ; DUT
pause 5
pductrl 1 3 1 ; DUT
wait 'login:'
:fail
```
## 行為與 TeraTerm 不同之處(重要)
| 項目 | ETTerms 行為 |
|------|--------------|
| `wait`(**單字串**) | 命中後需裝置**安靜 300ms**(無新資料)才接受,並取「最後一次」出現——排除輸出中途的指令回顯(如 `SVOS> help`)造成腳本搶跑。**逾時會中止腳本**(TeraTerm 是 `result=0` 繼續)。 |
| `wait`**多字串** | TeraTerm 相容:任一命中即繼續,`result` = 第幾個字串(1 起算);逾時 `result=0` **繼續執行**、無 settle。 |
| `goto` / 跨區塊跳轉 | `goto` 跳出 `if`/`while` 區塊後,該區塊的迴圈控制即結束(同層繼續直行)。避免 goto 跳「進」區塊中間。 |
| `call` | 可以在迴圈 / if 內使用(行內執行,返回後迴圈續跑)。 |
| `include` | 路徑須為絕對路徑,或相對於 ETTerms 的工作目錄。 |
| 浮點數 | TTL 無浮點型別;`sprintf/sprintf2` 的浮點引數以字串傳入(`'3.14'`)。 |
---
## 條件運算子
# 二、與 TeraTerm 共有指令
`if` / `elseif` / `while` 條件支援:
## 通訊
| 運算子 | 類型 | 範例 |
|--------|------|------|
| `>=` `<=` `>` `<` | 數值 | `if idx >= 3 then` |
| `==` `!=` | 字串 / 數值 | `if result == 1 then` |
| `=` | 數值或字串相等 | `if result = 0 then` |
| (無運算子) | 非零為真 | `if result then` |
| 指令 | 語法 | 說明 |
|------|------|------|
| `send` | `send '文字'` | 送出文字(不加換行)。 |
| `sendln` | `sendln '文字'` | 送出文字 + `\r\n` |
| `sendfile` | `sendfile '路徑'` | 把整個檔案內容原樣送出(`result` 1/0)。 |
| `wait` | `wait '字串' ['字串2' ...]` | 等待字串出現(行為差異見上表)。 |
| `waitln` | `waitln '字串' ['字串2' ...]` | 等**包含**任一字串的完整一行;該行存入 `inputstr``result`=第幾個;逾時 0。 |
| `waitregex` | `waitregex '樣式' ['樣式2' ...]` | 等 regex 命中;`matchstr` / `groupmatchstr1-9` 設定,`result`=第幾個;逾時 0。 |
| `recvln` | `recvln` | 收下一行到 `inputstr``result` 1 成功 / 0 逾時。 |
| `flushrecv` | `flushrecv` | 清空接收緩衝。 |
| `dispstr` | `dispstr '文字' [更多...]` | 在終端機顯示訊息(灰色;不送裝置、不進側錄 log、不受 Show script trace 開關影響)。 |
| `sendbreak` | `sendbreak` | 送 serial break**Serial 限定**,約 300ms)。 |
| `setbaud` | `setbaud 115200` | 執行中改 baud rate**Serial 限定**)。 |
| `setdtr` / `setrts` | `setdtr 1` / `setrts 0` | 控制 DTR / RTS 腳位(**Serial 限定**)。 |
`then` 關鍵字可省略。
## 控制流
| 指令 | 語法 | 說明 |
|------|------|------|
| `if` | `if <條件> <指令>``if <條件> then ... [elseif] [else] endif` | 單行或區塊,可巢狀。 |
| `while` / `endwhile` | `while <條件>` | 條件為真時重複。 |
| `until` / `enduntil` | `until <條件>` | 條件為**假**時重複。 |
| `for` / `next` | `for i 1 10` | i 從 1 到 10(含),自動 ±1。 |
| `do` / `loop` | `do [while\|until <條件>]` ... `loop [while\|until <條件>]` | 前測或後測迴圈;都不帶條件時為無限迴圈(用 `break` 離開)。 |
| `break` / `continue` | | 跳出 / 提前進入下一輪(while / until / for / do 皆可)。 |
| `goto` | `goto 標籤` | 跳到 `:標籤`。 |
| `call` / `return` | `call 標籤` | 呼叫副程式(`:標籤` 起,`return` 返回;可在迴圈內用)。 |
| `include` | `include '檔案.ttl'` | 執行另一個腳本檔(可巢狀 8 層;檔內 `exit` 只離開該檔)。 |
| `pause` | `pause 秒` | 暫停(可 Stop 取消)。 |
| `mpause` | `mpause 毫秒` | 毫秒級暫停。 |
| `end` | `end` | 結束腳本(成功)。 |
| `exit` | `exit` | include 檔內=離開該檔;主檔=同 `end`。 |
| `timeout` / `mtimeout` | `timeout = 10` | wait 家族逾時(秒 / 毫秒,兩者相加)。 |
## 字串
| 指令 | 語法 | 說明 |
|------|------|------|
| `strlen` | `strlen <str>` | `result` = 長度。 |
| `strcompare` | `strcompare <s1> <s2>` | `result` = -1 / 0 / 1。 |
| `strconcat` | `strconcat <strvar> <str>` | strvar += str。 |
| `strcopy` | `strcopy <str> <pos> <len> <strvar>` | 取子字串(pos 1 起算)。 |
| `strinsert` / `strremove` | `strinsert <strvar> <pos> <str>` / `strremove <strvar> <pos> <len>` | 插入 / 刪除。 |
| `strscan` | `strscan <str> <substr>` | `result` = 位置(1 起算,0 = 沒找到)。 |
| `strmatch` | `strmatch <str> <regex>` | regex 比對:`result` = 位置,`matchstr` / `groupmatchstr1-9`。 |
| `strreplace` | `strreplace <strvar> <pos> <regex> <newstr>` | 自 pos 起 regex 全部取代,`result` 1/0。 |
| `strtrim` | `strtrim <strvar> ['字元集']` | 去頭尾字元(預設空白)。 |
| `strsplit` | `strsplit <str> <sep> [count]` | 切成 `groupmatchstr1-9``result` = 個數。 |
| `strjoin` | `strjoin <strvar> <sep> [count]` | 把 `groupmatchstr1..count` 接回一串。 |
| `tolower` / `toupper` | `tolower <strvar> <str>` | 轉小寫 / 大寫。 |
| `str2int` / `int2str` | `str2int <intvar> <str>` / `int2str <strvar> <int>` | 字串 ↔ 整數(str2int 的 `result` 1/0)。 |
| `code2str` / `str2code` | `code2str <strvar> 65` / `str2code <intvar> 'A'` | 字元碼 ↔ 字元。 |
| `sprintf` | `sprintf <格式> [引數...]` | C printf 格式化 → **`inputstr`**。 |
| `sprintf2` | `sprintf2 <strvar> <格式> [引數...]` | 同上但存到指定變數(詳見下節)。 |
| `expandenv` | `expandenv <strvar> '%USERPROFILE%\x'` | 展開環境變數。 |
## 檔案 / 資料夾
| 指令 | 語法 | 說明 |
|------|------|------|
| `fileopen` | `fileopen <fhvar> <路徑> <append 0\|1> [readonly 0\|1]` | 開檔;fh 存入變數(-1 失敗)。readonly=1 開來讀。 |
| `filecreate` | `filecreate <fhvar> <路徑>` | 建新檔(覆寫)供寫入。 |
| `filereadln` | `filereadln <fh> <strvar>` | 讀一行;`result` **1 = EOF**、0 = 成功(TeraTerm 相容)。 |
| `filewrite` / `filewriteln` | `filewrite <fh> <str>` | 寫入(ln 版加換行)。 |
| `fileclose` | `fileclose <fh>` | 關檔(腳本結束會自動關)。 |
| `filedelete` | `filedelete <路徑>` | 刪檔,`result` 1/0。 |
| `filesearch` | `filesearch <路徑>` | `result` 1 = 檔案存在。 |
| `basename` / `dirname` | `basename <strvar> <路徑>` | 取檔名 / 取目錄。 |
| `makepath` | `makepath <strvar> <dir> <file>` | 合成路徑。 |
| `foldercreate` / `folderdelete` / `foldersearch` | `foldercreate <路徑>` | 建 / 刪(空)/ 查資料夾。 |
| `getdir` / `setdir` | `getdir <strvar>` / `setdir <路徑>` | 取得 / 變更工作目錄。 |
| `logopen` / `logwrite` / `logclose` | `logopen '檔名'` | 腳本專屬 log 檔(`send``logwrite` 會寫入)。 |
## 對話框 / 雜項
| 指令 | 語法 | 說明 |
|------|------|------|
| `messagebox` | `messagebox '訊息' ['標題']` | 訊息框。 |
| `inputbox` | `inputbox '提示' ['標題'] [預設值]` | 輸入框 → `inputstr`(取消 `result=0`)。 |
| `yesnobox` | `yesnobox '訊息' ['標題']` | Yes/No → `result` 1/0。 |
| `beep` | `beep` | 系統提示音。 |
| `getdate` / `gettime` | `getdate <strvar> ['%Y%m%d']` | 日期 / 時間字串(strftime 子集:`%Y %y %m %d %H %M %S %j %a %A %b`)。 |
| `getenv` / `setenv` | `getenv 'PATH' <strvar>` | 讀 / 寫環境變數(行程內)。 |
| `random` | `random <intvar> <max>` | 0〜max(含)亂數。 |
| `exec` | `exec '記事本.exe 檔案' ['show'\|'hide'] [wait 0\|1]` | 啟動外部程式;wait=1 時 `result` = exit code。 |
| `getver` | `getver <strvar>` | ETTerms 版本字串。 |
| `getttdir` | `getttdir <strvar>` | ETTerms 執行檔目錄。 |
| `uptime` | `uptime <intvar>` | 系統開機至今毫秒數。 |
| `ifdefined` | `ifdefined <var>` | `result`:0 未定義 / 1 整數 / 2 字串。 |
| `clipb2var` / `var2clipb` | `clipb2var <strvar>` / `var2clipb <str>` | 剪貼簿 ↔ 變數。 |
| `crc32` | `crc32 <intvar> <str>` | CRC-32。 |
| `checksum8/16/32` | `checksum8 <intvar> <str>` | byte 加總(8/16/32 bit)。 |
### 未支援(節錄)
檔案傳輸協定(`xmodem*` / `zmodem*` / `kmt*` / `scp*`)、連線管理(`connect` / `disconnect` /
`closett`)、密碼系列(`getpassword` 等——ETTerms 密碼一律走 Windows Credential Manager)、
陣列(`intdim` / `strdim`)、`waitevent` / `waitn` / `setecho` / `settitle` / `listbox` / `statusbox`
---
## sprintf2 格式化
`sprintf2 變數 格式字串 [引數 ...]` 以 C 語言 `printf` 規則格式化,結果存入指定字串變數,與
Tera Term 的 `sprintf2` 行為一致。
`sprintf2 變數 格式字串 [引數 ...]` 以 C `printf` 規則格式化,與 Tera Term 一致。
```ttl
sprintf2 ver 'Tera Term 4.%d' 51 ; ver = "Tera Term 4.51"
sprintf2 win 'Windows %d (+%s)' 2000 'SP4' ; win = "Windows 2000 (+SP4)"
sprintf2 test '%s=%d %s=0x%x' 'dec' 10 'hex' 33 ; test = "dec=10 hex=0x21"
messagebox test
```
- **轉換型別**`c d i o u x X e E f g G a A s`
- **旗標**`-`(靠左)、`+`(顯示正負號)、`0`(補零)、`#`(替代格式,如 `0x`)、空白(正數前空格)
- **寬度/精度**:十進位整數,或用 `*` 從引數動態取得(如 `%*d``%.*f`
- 浮點數須以**字串**傳入(TTL 無浮點型別),例 `sprintf2 s '%.2f' '3.14159'`
- **格式字串不展開變數**(保持字面值),僅各引數會展開變數,故可累加自身:
`sprintf2 s '%s,' s` 會把 `s` 接上 `,`
執行後設定系統變數 `result`
| 值 | 狀態 |
|----|------|
| 0 | 格式化成功 |
| 1 | 缺少格式字串 |
| 2 | 格式無效 |
| 3 | 引數無效(缺少或無法解析) |
| 4 | 目的變數名稱無效 |
- **轉換型別**`c d i o u x X e E f g G a A s`**旗標**`- + 0 #` 與空白;寬度/精度支援 `*`
- 浮點數以**字串**傳入:`sprintf2 s '%.2f' '3.14159'`
- 格式字串不展開變數(保持字面值),引數會展開,故 `sprintf2 s '%s,' s` 可累加自身
- `result`:0 成功、1 缺格式、2 格式無效、3 引數無效、4 目的變數無效
---
## 範例SSH 自動登入 + 收 log
## 範例
### 自動登入 + 失敗重試(goto / 單行 if
```ttl
;
timeout = 15
retry = 0
:login
sendln ''
wait 'login:'
sendln 'admin'
wait 'Password:'
sendln 'secret'
wait '$'
wait 'Login incorrect' '$'
if result = 2 goto ok ; 2 $
retry = retry + 1
if retry < 3 goto login
messagebox '登入失敗 3 次' 'Login'
end
logopen 'session.log'
sendln 'uname -a'
wait '$'
sendln 'uptime'
wait '$'
logclose
messagebox 'Done'
:ok
dispstr 'login ok'
```
## 範例:while 迴圈下命令
### waitln + strmatch 解析輸出
```ttl
idx = 0
while idx < 5
sendln 'echo loop'
wait '$'
idx = idx + 1
endwhile
```
## 範例:if / elseif / else
```ttl
sendln 'whoami'
wait '$'
if result == 1 then
logwrite 'prompt matched'
elseif result == 0 then
logwrite 'timed out'
else
logwrite 'unknown'
sendln 'show environment'
timeout = 10
waitln 'Temperature' ; "Temperature: 47 C"
if result = 0 goto notfound
strmatch inputstr 'Temperature:\s*(\d+)'
if result > 0 then
str2int temp groupmatchstr1
if temp > 60 then
messagebox '過溫!' 'ALERT'
endif
endif
:notfound
```
### for 迴圈 + 檔案輸出
```ttl
getdate today '%Y%m%d'
sprintf 'report_%s.txt' today
filecreate fh inputstr
for i 1 5
sendln 'cat /proc/loadavg'
recvln ;
recvln ;
filewriteln fh inputstr
pause 2
next
fileclose fh
```
### call 副程式(迴圈內可用)
```ttl
for i 1 3
call powercycle
wait 'login:'
next
end
:powercycle
pductrl 1 3 0
pause 5
pductrl 1 3 1
return
```
### do-loop 等裝置就緒
```ttl
; wait waitln result=0
timeout = 2
do
sendln ''
waitln 'SVOS>'
loop until result = 1 ; 2
```
+9
View File
@@ -183,6 +183,15 @@ public sealed class AboutView : UserControl
private static readonly ChangelogEntry[] Changelog =
[
new("0.5.0", new DateOnly(2026, 7, 2), "Search, keyword alerts & a much bigger scripting language",
[
"Press Ctrl+F in any terminal to search everything you've scrolled past — all hits are highlighted, Enter jumps between them.",
"New Settings → Highlight page: add your own keywords (like ERROR or FAIL) and they light up in red wherever they appear.",
"When a keyword shows up in a tab you're not looking at, that tab's dot turns red so you don't miss it.",
"TTL scripting grew from ~15 commands to 90+, matching Tera Term macros: loops (for / do / until), goto and subroutines, waitln / waitregex with regex capture, string and file operations, input dialogs, and serial line control (sendbreak, setbaud).",
"Scripts now show their progress in gray right inside the terminal — display only, never written to session logs; turn it off in Settings → Terminal (Show script trace) if you want a clean screen.",
"See the full command table with examples in docs/ttl-script-reference.md.",
]),
new("0.4.0", new DateOnly(2026, 7, 2), "Performance & stability overhaul",
[
"The terminal is much smoother during heavy output (long boot logs, big file dumps) — drawing and scroll history were reworked to stay fast no matter how much text has scrolled by.",
+119
View File
@@ -52,6 +52,7 @@ public sealed class SettingsView : UserControl
var termBtn = MakeTab("Terminal", BuildTerminalTab());
tabBar.Controls.Add(termBtn);
tabBar.Controls.Add(MakeTab("Highlight", BuildHighlightTab()));
tabBar.Controls.Add(MakeTab("AI MCP", BuildAiMcpTab()));
Controls.Add(body);
@@ -93,6 +94,14 @@ public sealed class SettingsView : UserControl
flow.Controls.Add(MakeRow("Scrollback Lines", scrollback));
flow.Controls.Add(MakeRow("Color Scheme", scheme));
flow.Controls.Add(MakeRow("Default Newline", newline));
var scriptTrace = new CheckBox
{
Text = "Show script trace in terminal ([wait] / sent commands / errors in gray; dispstr always shows)",
Checked = s.ShowScriptTrace, AutoSize = true,
ForeColor = Theme.Text, Font = Theme.UiFont, Margin = new Padding(0, 6, 0, 0)
};
flow.Controls.Add(scriptTrace);
flow.Controls.Add(MakeSpacer(16));
// Shell settings
@@ -160,6 +169,7 @@ public sealed class SettingsView : UserControl
s.ScrollbackLines = (int)scrollback.Value;
s.ColorScheme = scheme.Text;
s.DefaultNewLine = newline.Text;
s.ShowScriptTrace = scriptTrace.Checked;
s.ShellType = shellType.Text;
s.ShellStartupDir = shellDir.Text;
s.Save();
@@ -171,6 +181,115 @@ public sealed class SettingsView : UserControl
return page;
}
// ═══ Highlight Tab ═══
private Panel BuildHighlightTab()
{
var page = new Panel { BackColor = Theme.WorkspaceBack, Padding = new Padding(20) };
var s = AppSettings.Instance;
var flow = new FlowLayoutPanel
{
Dock = DockStyle.Fill, FlowDirection = FlowDirection.TopDown,
WrapContents = false, BackColor = Theme.WorkspaceBack, AutoScroll = true
};
flow.Controls.Add(new Label
{
Text = "Keyword Highlighting", AutoSize = true,
ForeColor = Theme.Accent, Font = Theme.UiFontBold, Margin = new Padding(0, 0, 0, 4)
});
flow.Controls.Add(new Label
{
Text = "Keywords below are highlighted in red in every terminal (case-insensitive).\n" +
"When a keyword appears in a background tab, that tab's dot turns red until you open it.",
AutoSize = false, Width = 520, Height = 34,
ForeColor = Theme.TextDim, Font = Theme.UiFont, Margin = new Padding(0, 0, 0, 8)
});
var enable = new CheckBox
{
Text = "Enable keyword highlighting", Checked = s.KeywordHighlightEnabled,
AutoSize = true, ForeColor = Theme.Text, Font = Theme.UiFont, Margin = new Padding(0, 0, 0, 8)
};
flow.Controls.Add(enable);
// 規則清單:每列 = 啟用勾選 + 關鍵字(可直接編輯)
var grid = new DataGridView
{
Width = 420, Height = 240,
BackgroundColor = Theme.WorkspaceBack, ForeColor = Theme.Text, GridColor = Theme.Border,
BorderStyle = BorderStyle.None, CellBorderStyle = DataGridViewCellBorderStyle.SingleHorizontal,
DefaultCellStyle = { BackColor = Theme.TabBack, ForeColor = Theme.Text, SelectionBackColor = Theme.Hover, SelectionForeColor = Theme.Text },
ColumnHeadersDefaultCellStyle = { BackColor = Theme.RailBack, ForeColor = Theme.Accent, Font = Theme.UiFontBold },
ColumnHeadersBorderStyle = DataGridViewHeaderBorderStyle.Single,
EnableHeadersVisualStyles = false, RowHeadersVisible = false,
AllowUserToAddRows = false, AllowUserToDeleteRows = false,
AllowUserToResizeRows = false, SelectionMode = DataGridViewSelectionMode.FullRowSelect,
Font = Theme.UiFont, RowTemplate = { Height = 24 }, Margin = new Padding(0, 0, 0, 8)
};
grid.Columns.Add(new DataGridViewCheckBoxColumn { Name = "On", HeaderText = "On", Width = 44 });
grid.Columns.Add(new DataGridViewTextBoxColumn
{
Name = "Keyword", HeaderText = "Keyword",
AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
});
foreach (var r in s.KeywordRules) grid.Rows.Add(r.Enabled, r.Text);
flow.Controls.Add(grid);
// 新增 / 移除
var newKw = new TextBox { Width = 220, BackColor = Theme.TabBack, ForeColor = Theme.Text, Font = Theme.UiFont, BorderStyle = BorderStyle.FixedSingle };
var addBtn = MakeButton("Add", Theme.Accent);
var removeBtn = MakeButton("Remove Selected", Color.FromArgb(210, 120, 120));
void AddKeyword()
{
var t = newKw.Text.Trim();
if (t.Length == 0) return;
grid.Rows.Add(true, t);
newKw.Clear();
newKw.Focus();
}
addBtn.Click += (_, _) => AddKeyword();
newKw.KeyDown += (_, e) => { if (e.KeyCode == Keys.Enter) { AddKeyword(); e.Handled = e.SuppressKeyPress = true; } };
removeBtn.Click += (_, _) =>
{
foreach (DataGridViewRow row in grid.SelectedRows) grid.Rows.Remove(row);
};
var editRow = new FlowLayoutPanel
{
FlowDirection = FlowDirection.LeftToRight, AutoSize = true,
WrapContents = false, BackColor = Theme.WorkspaceBack, Margin = new Padding(0, 0, 0, 12)
};
editRow.Controls.Add(newKw);
editRow.Controls.Add(addBtn);
editRow.Controls.Add(removeBtn);
flow.Controls.Add(editRow);
var save = MakeButton("Save", Theme.Accent);
save.Margin = new Padding(0);
save.Click += (_, _) =>
{
grid.EndEdit();
s.KeywordHighlightEnabled = enable.Checked;
s.KeywordRules = grid.Rows.Cast<DataGridViewRow>()
.Select(r => new KeywordRule
{
Enabled = r.Cells["On"].Value is true,
Text = r.Cells["Keyword"].Value?.ToString()?.Trim() ?? ""
})
.Where(r => r.Text.Length > 0)
.ToList();
s.Save();
MessageBox.Show(this, "Highlight settings saved.\nThey apply immediately to all open sessions.",
"Highlight", MessageBoxButtons.OK, MessageBoxIcon.Information);
};
flow.Controls.Add(save);
page.Controls.Add(flow);
return page;
}
// ═══ AI MCP Tab ═══
private Panel BuildAiMcpTab()
{
+10 -1
View File
@@ -20,6 +20,7 @@ public sealed class WorkspaceView : UserControl
public required SessionPage Page;
public Rectangle TabBounds;
public Rectangle CloseRect;
public bool Alert; // 背景分頁出現高亮關鍵字 → 標紅點,切到該分頁時清除
}
private readonly FlowLayoutPanel _toolbar;
@@ -114,6 +115,12 @@ public sealed class WorkspaceView : UserControl
var page = BuildPage(conn);
var s = new Session { Title = conn.Name, IsSsh = conn.IsSsh, Page = page };
page.ConnectFailed += msg => OnConnectFailed(s, msg);
page.KeywordAlert += _ =>
{
if (s == _active || s.Alert) return;
s.Alert = true;
_tabStrip.Invalidate();
};
_sessions.Add(s);
_active = s;
Relayout();
@@ -191,6 +198,7 @@ public sealed class WorkspaceView : UserControl
}
_empty.Visible = false;
_active ??= _sessions[0];
_active.Alert = false; // 使用者正在看這個分頁,警示清除
int cells = _rows * _cols;
int activeIdx = _sessions.IndexOf(_active);
@@ -360,7 +368,8 @@ public sealed class WorkspaceView : UserControl
if (drag)
using (var pen = new Pen(Theme.Accent, 1))
g.DrawRectangle(pen, new Rectangle(s.TabBounds.Left, s.TabBounds.Top, s.TabBounds.Width - 1, s.TabBounds.Height - 1));
using (var dot = new SolidBrush(s.IsSsh ? Theme.SshColor : Theme.SerialColor))
// 警示中的背景分頁:型別圓點改紅色,切過去看時清除
using (var dot = new SolidBrush(s.Alert ? Color.FromArgb(235, 85, 85) : s.IsSsh ? Theme.SshColor : Theme.SerialColor))
g.FillEllipse(dot, s.TabBounds.Left + 9, StripH / 2 - 4, 8, 8);
var tr = new Rectangle(s.TabBounds.Left + 22, s.TabBounds.Top, s.TabBounds.Width - 22 - CloseSz - 10, StripH);
TextRenderer.DrawText(g, s.Title, Theme.UiFont, tr, active ? Theme.Text : Theme.TextDim,
+3 -3
View File
@@ -10,7 +10,7 @@
<AssemblyName>ETTerms</AssemblyName>
<!-- 版本資訊 -->
<Version>0.4.0</Version>
<Version>0.5.0</Version>
<Product>ETTerms</Product>
<Company>ETTerms Project</Company>
@@ -51,9 +51,9 @@
<_McpSelfContained Condition="'$(SelfContained)' != ''">$(SelfContained)</_McpSelfContained>
<_McpSelfContained Condition="'$(SelfContained)' == ''">false</_McpSelfContained>
</PropertyGroup>
<Message Importance="high" Text="[ETTerms] Publishing ETTerms.SerialMcp -> $(PublishDir)ETTerms.SerialMcp (self-contained=$(_McpSelfContained))" />
<Message Importance="high" Text="[ETTerms] Publishing ETTerms.SerialMcp -&gt; $(PublishDir)ETTerms.SerialMcp (self-contained=$(_McpSelfContained))" />
<Exec Command="dotnet publish &quot;$(MSBuildThisFileDirectory)..\ETTerms.SerialMcp\ETTerms.SerialMcp.csproj&quot; -c $(Configuration) -r $(_McpRid) --self-contained $(_McpSelfContained) -o &quot;$(PublishDir)ETTerms.SerialMcp&quot;" />
<Message Importance="high" Text="[ETTerms] Publishing ETTerms.PduMcp -> $(PublishDir)ETTerms.PduMcp (self-contained=$(_McpSelfContained))" />
<Message Importance="high" Text="[ETTerms] Publishing ETTerms.PduMcp -&gt; $(PublishDir)ETTerms.PduMcp (self-contained=$(_McpSelfContained))" />
<Exec Command="dotnet publish &quot;$(MSBuildThisFileDirectory)..\ETTerms.PduMcp\ETTerms.PduMcp.csproj&quot; -c $(Configuration) -r $(_McpRid) --self-contained $(_McpSelfContained) -o &quot;$(PublishDir)ETTerms.PduMcp&quot;" />
</Target>
+14
View File
@@ -22,11 +22,18 @@ public sealed class AppSettings
public int ScrollbackLines { get; set; } = 5000;
public string DefaultNewLine { get; set; } = "\\r\\n";
public string ColorScheme { get; set; } = "Dark";
/// <summary>TTL 腳本執行時,[wait] / >> 送出回顯 / 錯誤等 trace 是否以灰色顯示在終端機
/// (只影響畫面;本來就不會寫進側錄 log。dispstr 一律顯示,不受此開關影響)。</summary>
public bool ShowScriptTrace { get; set; } = true;
// ── Shell ──
public string ShellType { get; set; } = "PowerShell"; // PowerShell, Bash, Cmd
public string ShellStartupDir { get; set; } = "";
// ── Keyword highlight(終端機關鍵字標色 + 分頁警示;Settings → Highlight 分頁設定)──
public bool KeywordHighlightEnabled { get; set; } = true;
public List<KeywordRule> KeywordRules { get; set; } = new();
// ── Window ──
public int WindowX { get; set; } = -1;
public int WindowY { get; set; } = -1;
@@ -83,3 +90,10 @@ public sealed class AppSettings
return new();
}
}
/// <summary>一條關鍵字高亮規則:關鍵字文字 + 是否啟用(比對不分大小寫)。</summary>
public sealed class KeywordRule
{
public string Text { get; set; } = "";
public bool Enabled { get; set; } = true;
}
+5 -1
View File
@@ -14,9 +14,12 @@ public sealed class ScriptRunner
/// <summary>(檔名, 行號, 指令) 進度。</summary>
public event Action<string, int, string>? StatusChanged;
/// <summary>輸出訊息(log / 提示 / 錯誤)。</summary>
/// <summary>trace 訊息([wait] 進度 / >> 送出回顯 / 錯誤);顯示與否由 UI 依設定決定。</summary>
public event Action<string>? Output;
/// <summary>dispstr 的顯示輸出(一律顯示)。</summary>
public event Action<string>? Display;
/// <summary>結束:(成功, 訊息)。</summary>
public event Action<bool, string>? Finished;
@@ -37,6 +40,7 @@ public sealed class ScriptRunner
var interp = new TTLInterpreter(channel, sync, memberLabel);
interp.StatusChanged += (f, l, c) => StatusChanged?.Invoke(f, l, c);
interp.Output += m => Output?.Invoke(m);
interp.Display += m => Display?.Invoke(m);
_interp = interp;
try
File diff suppressed because it is too large Load Diff
+253
View File
@@ -0,0 +1,253 @@
using System.Globalization;
namespace ETTerms.Scripting;
/// <summary>
/// TTL 運算式解析 / 求值器(v0.5.0,供 if / elseif / while / until / for / 變數指派使用)。
///
/// 支援:
/// - 整數:十進位、<c>0x1F</c>、<c>$1F</c>TeraTerm 十六進位)
/// - 字串常值:<c>'...'</c> 或 <c>"..."</c>
/// - 變數(由呼叫端 resolver 解析;未定義視為 0)
/// - 括號、一元 <c>-</c> / <c>not</c> / <c>!</c> / <c>~</c>
/// - 算術 <c>* / % + -</c>
/// - 比較 <c>= == &lt;&gt; != &gt; &lt; &gt;= &lt;=</c>(兩邊皆可為整數時用數值比較,否則字串比較)
/// - 邏輯 <c>and or xor</c>(同義:<c>&amp;&amp; ||</c>
///
/// 值為 <see cref="object"/>int 或 string;比較 / 邏輯運算結果為 int 1/0。
/// </summary>
public static class TtlExpression
{
/// <summary>求值整段文字;結尾若有多餘內容視為錯誤(FormatException)。</summary>
public static object Evaluate(string text, Func<string, object?> resolve)
{
int pos = 0;
var v = ParseOr(text, ref pos, resolve);
SkipWs(text, ref pos);
if (pos < text.Length) throw new FormatException($"unexpected '{text[pos..]}'");
return v;
}
/// <summary>從 <paramref name="pos"/> 起解析一個運算式,pos 停在運算式之後(供單行 if 判斷剩餘 statement)。</summary>
public static object Parse(string text, ref int pos, Func<string, object?> resolve)
=> ParseOr(text, ref pos, resolve);
public static bool Truthy(object? v) => ToInt(v) != 0;
public static int ToInt(object? v) => v switch
{
int i => i,
string s when TryParseInt(s.Trim(), out int r) => r,
_ => 0
};
public static string ToStr(object? v) => v switch
{
null => "",
string s => s,
_ => v.ToString() ?? ""
};
// ── 文法(優先序低 → 高)─────────────────────────────────
private static object ParseOr(string s, ref int p, Func<string, object?> r)
{
var v = ParseAnd(s, ref p, r);
while (true)
{
SkipWs(s, ref p);
if (MatchWord(s, ref p, "or") || MatchOp(s, ref p, "||"))
v = (Truthy(v) | Truthy(ParseAnd(s, ref p, r))) ? 1 : 0;
else if (MatchWord(s, ref p, "xor"))
v = (Truthy(v) ^ Truthy(ParseAnd(s, ref p, r))) ? 1 : 0;
else return v;
}
}
private static object ParseAnd(string s, ref int p, Func<string, object?> r)
{
var v = ParseCompare(s, ref p, r);
while (true)
{
SkipWs(s, ref p);
if (MatchWord(s, ref p, "and") || MatchOp(s, ref p, "&&"))
v = (Truthy(v) & Truthy(ParseCompare(s, ref p, r))) ? 1 : 0;
else return v;
}
}
private static object ParseCompare(string s, ref int p, Func<string, object?> r)
{
var l = ParseAdd(s, ref p, r);
SkipWs(s, ref p);
string? op =
MatchOp(s, ref p, ">=") ? ">=" :
MatchOp(s, ref p, "<=") ? "<=" :
MatchOp(s, ref p, "<>") ? "!=" :
MatchOp(s, ref p, "==") ? "==" :
MatchOp(s, ref p, "!=") ? "!=" :
MatchOp(s, ref p, "=") ? "==" :
MatchOp(s, ref p, ">") ? ">" :
MatchOp(s, ref p, "<") ? "<" : null;
if (op == null) return l;
var rt = ParseAdd(s, ref p, r);
// 兩邊皆可為整數 → 數值比較;否則字串比較(僅 == / !=;大小比較退回數值 0)
bool numeric = l is int || rt is int
|| (TryParseInt(ToStr(l).Trim(), out _) && TryParseInt(ToStr(rt).Trim(), out _));
if (numeric)
{
int a = ToInt(l), b = ToInt(rt);
return op switch
{
"==" => a == b ? 1 : 0,
"!=" => a != b ? 1 : 0,
">=" => a >= b ? 1 : 0,
"<=" => a <= b ? 1 : 0,
">" => a > b ? 1 : 0,
_ => a < b ? 1 : 0
};
}
int cmp = string.CompareOrdinal(ToStr(l), ToStr(rt));
return op switch
{
"==" => cmp == 0 ? 1 : 0,
"!=" => cmp != 0 ? 1 : 0,
">=" => cmp >= 0 ? 1 : 0,
"<=" => cmp <= 0 ? 1 : 0,
">" => cmp > 0 ? 1 : 0,
_ => cmp < 0 ? 1 : 0
};
}
private static object ParseAdd(string s, ref int p, Func<string, object?> r)
{
var v = ParseMul(s, ref p, r);
while (true)
{
SkipWs(s, ref p);
if (MatchOp(s, ref p, "+")) v = ToInt(v) + ToInt(ParseMul(s, ref p, r));
else if (MatchOp(s, ref p, "-")) v = ToInt(v) - ToInt(ParseMul(s, ref p, r));
else return v;
}
}
private static object ParseMul(string s, ref int p, Func<string, object?> r)
{
var v = ParseUnary(s, ref p, r);
while (true)
{
SkipWs(s, ref p);
if (MatchOp(s, ref p, "*")) v = ToInt(v) * ToInt(ParseUnary(s, ref p, r));
else if (MatchOp(s, ref p, "/"))
{
int d = ToInt(ParseUnary(s, ref p, r));
v = d != 0 ? ToInt(v) / d : 0;
}
else if (MatchOp(s, ref p, "%"))
{
int d = ToInt(ParseUnary(s, ref p, r));
v = d != 0 ? ToInt(v) % d : 0;
}
else return v;
}
}
private static object ParseUnary(string s, ref int p, Func<string, object?> r)
{
SkipWs(s, ref p);
if (MatchOp(s, ref p, "-")) return -ToInt(ParseUnary(s, ref p, r));
if (MatchOp(s, ref p, "~")) return ~ToInt(ParseUnary(s, ref p, r));
if (MatchOp(s, ref p, "!")) return Truthy(ParseUnary(s, ref p, r)) ? 0 : 1;
if (MatchWord(s, ref p, "not")) return Truthy(ParseUnary(s, ref p, r)) ? 0 : 1;
return ParsePrimary(s, ref p, r);
}
private static object ParsePrimary(string s, ref int p, Func<string, object?> r)
{
SkipWs(s, ref p);
if (p >= s.Length) throw new FormatException("unexpected end of expression");
char c = s[p];
if (c == '(')
{
p++;
var v = ParseOr(s, ref p, r);
SkipWs(s, ref p);
if (p >= s.Length || s[p] != ')') throw new FormatException("missing ')'");
p++;
return v;
}
if (c is '\'' or '"')
{
char q = c;
int start = ++p;
while (p < s.Length && s[p] != q) p++;
if (p >= s.Length) throw new FormatException("unterminated string");
var str = s[start..p];
p++;
return str;
}
if (c == '$') // TeraTerm 十六進位 $1F
{
int start = ++p;
while (p < s.Length && Uri.IsHexDigit(s[p])) p++;
if (p == start) throw new FormatException("invalid hex literal");
return int.Parse(s[start..p], NumberStyles.HexNumber, CultureInfo.InvariantCulture);
}
if (char.IsDigit(c))
{
if (c == '0' && p + 1 < s.Length && (s[p + 1] is 'x' or 'X'))
{
int hs = p + 2, hp = hs;
while (hp < s.Length && Uri.IsHexDigit(s[hp])) hp++;
if (hp == hs) throw new FormatException("invalid hex literal");
p = hp;
return int.Parse(s[hs..hp], NumberStyles.HexNumber, CultureInfo.InvariantCulture);
}
int ds = p;
while (p < s.Length && char.IsDigit(s[p])) p++;
return int.Parse(s[ds..p], CultureInfo.InvariantCulture);
}
if (char.IsLetter(c) || c == '_')
{
int ws = p;
while (p < s.Length && (char.IsLetterOrDigit(s[p]) || s[p] == '_')) p++;
return r(s[ws..p]) ?? 0; // 未定義變數 → 0
}
throw new FormatException($"unexpected character '{c}'");
}
// ── 小工具 ───────────────────────────────────────────────
private static void SkipWs(string s, ref int p) { while (p < s.Length && char.IsWhiteSpace(s[p])) p++; }
private static bool MatchOp(string s, ref int p, string op)
{
if (p + op.Length > s.Length || !s.AsSpan(p, op.Length).SequenceEqual(op)) return false;
// "=" 不可吃掉 "=="、"<" 不可吃掉 "<=" / "<>"(呼叫端已按長度優先排序,這裡防呆單字元誤判)
if (op == "=" && p + 1 < s.Length && s[p + 1] == '=') return false;
if (op == ">" && p + 1 < s.Length && s[p + 1] == '=') return false;
if (op == "<" && p + 1 < s.Length && (s[p + 1] == '=' || s[p + 1] == '>')) return false;
p += op.Length;
return true;
}
private static bool MatchWord(string s, ref int p, string word)
{
if (p + word.Length > s.Length) return false;
if (!s.AsSpan(p, word.Length).Equals(word, StringComparison.OrdinalIgnoreCase)) return false;
int after = p + word.Length;
if (after < s.Length && (char.IsLetterOrDigit(s[after]) || s[after] == '_')) return false; // 是識別字的一部分
p = after;
return true;
}
private static bool TryParseInt(string s, out int v)
{
if (s.StartsWith("0x") || s.StartsWith("0X"))
return int.TryParse(s[2..], NumberStyles.HexNumber, CultureInfo.InvariantCulture, out v);
if (s.StartsWith("$"))
return int.TryParse(s[1..], NumberStyles.HexNumber, CultureInfo.InvariantCulture, out v);
return int.TryParse(s, NumberStyles.Integer, CultureInfo.InvariantCulture, out v);
}
}
+16
View File
@@ -72,6 +72,22 @@ public sealed class SerialChannel : ISessionChannel
if (_port.IsOpen) _port.Write(data, 0, data.Length);
}
// ── TTL serial 控制指令用(sendbreak / setbaud / setdtr / setrts)──
/// <summary>送出 serial break(拉 break 狀態約 300ms)。</summary>
public void SendBreak()
{
if (!_port.IsOpen) return;
try { _port.BreakState = true; Thread.Sleep(300); }
finally { try { _port.BreakState = false; } catch { } }
}
/// <summary>執行中變更 baud rateTTL setbaud)。</summary>
public void SetBaudRate(int baud) => _port.BaudRate = baud;
public void SetDtr(bool on) => _port.DtrEnable = on;
public void SetRts(bool on) => _port.RtsEnable = on;
public void Resize(int cols, int rows) { /* serial 無 PTY size */ }
public void Close()
+14
View File
@@ -63,6 +63,9 @@ public sealed class SessionPage : UserControl
/// <summary>同步開啟失敗(主要是 Serial 連不上 / 被占用)時觸發,附帶訊息。</summary>
public event Action<string>? ConnectFailed;
/// <summary>輸出中出現啟用的高亮關鍵字(UI thread),供 WorkspaceView 標分頁警示。</summary>
public event Action<string>? KeywordAlert;
public SessionPage(ISessionChannel channel, string title)
{
_channel = channel;
@@ -90,12 +93,23 @@ public sealed class SessionPage : UserControl
_term = new TerminalView(new TerminalProfile()) { Dock = DockStyle.Fill };
_term.SendData += data => _channel.Write(data);
_term.Resized += (cols, rows) => _channel.Resize(cols, rows);
_term.KeywordAlert += k => KeywordAlert?.Invoke(k);
Controls.Add(_term); // Fill 先加
Controls.Add(bar); // Top
_runner.StatusChanged += (_, line, cmd) => Ui(() => _status.Text = $"line {line}: {Trunc(cmd)}");
_runner.Finished += (_, msg) => Ui(() => { _status.Text = msg; SetRunning(false); });
// 腳本 trace[wait] 進度 / >> 送出回顯 / 錯誤)以灰色 echo 到終端機;
// 可由 Settings → Terminal 的 Show script trace 關閉。只影響畫面,不會進側錄 log。
_runner.Output += m =>
{
if (!AppSettings.Instance.ShowScriptTrace) return;
Ui(() => _term.Feed(System.Text.Encoding.UTF8.GetBytes($"\x1b[90m{m}\x1b[0m\r\n")));
};
// dispstr 是腳本明確要顯示的內容,一律顯示(不受開關影響)
_runner.Display += m => Ui(() =>
_term.Feed(System.Text.Encoding.UTF8.GetBytes($"\x1b[90m{m}\x1b[0m\r\n")));
}
private async void OnRunScript(object? sender, EventArgs e)
+6 -2
View File
@@ -62,6 +62,10 @@ public sealed class ScreenBuffer
public int TotalRows => _sbCount + Rows;
public Cell[] LineAt(int abs) => abs < _sbCount ? _sb[(_sbHead + abs) % _sb.Length]! : _screen[abs - _sbCount];
/// <summary>scrollback 滿後被丟棄的總行數。搜尋以「絕對行號 = DroppedLines + abs」錨定命中,
/// 舊行被丟棄時命中位置不會漂移。</summary>
public long DroppedLines { get; private set; }
// ── 內部建構工具 ─────────────────────────────────────────
private Cell BlankPen() => new() { Ch = ' ', Fg = PenFg, Bg = PenBg, Attr = CellAttr.None };
private Cell BlankDefault() => new() { Ch = ' ', Fg = DefaultFg, Bg = DefaultBg, Attr = CellAttr.None };
@@ -78,7 +82,7 @@ public sealed class ScreenBuffer
{
if (_sb.Length == 0) return;
if (_sbCount < _sb.Length) _sb[(_sbHead + _sbCount++) % _sb.Length] = line;
else { _sb[_sbHead] = line; _sbHead = (_sbHead + 1) % _sb.Length; } // 滿了:覆蓋最舊一行
else { _sb[_sbHead] = line; _sbHead = (_sbHead + 1) % _sb.Length; DroppedLines++; } // 滿了:覆蓋最舊一行
}
// ── 輸出字元 ─────────────────────────────────────────────
@@ -233,7 +237,7 @@ public sealed class ScreenBuffer
public void EraseInDisplay(int mode)
{
if (mode == 3) { Array.Clear(_sb); _sbHead = 0; _sbCount = 0; return; }
if (mode == 3) { DroppedLines += _sbCount; Array.Clear(_sb); _sbHead = 0; _sbCount = 0; return; }
if (mode == 2) { for (int r = 0; r < Rows; r++) _screen[r] = BlankLine(); return; }
if (mode == 0)
{
+293
View File
@@ -1,7 +1,9 @@
using System.Drawing;
using System.Runtime.InteropServices;
using System.Text;
using System.Text.RegularExpressions;
using System.Windows.Forms;
using ETTerms.Infrastructure;
namespace ETTerms.Terminal;
@@ -33,6 +35,31 @@ public sealed class TerminalView : UserControl
private (int row, int col) _selStart, _selEnd;
private bool _hasSel;
// ── 搜尋(Ctrl+F)──
private Panel? _searchPanel;
private TextBox _searchBox = null!;
private Label _searchCount = null!;
private readonly List<(long line, int col, int len)> _matches = new(); // line = DroppedLines + abs
private int _matchIdx = -1;
// ── 高亮標記(搜尋命中 + 關鍵字),每次 OnPaint 對可見行重建 ──
private enum MarkKind { Keyword, Search, SearchCurrent }
private readonly Dictionary<int, List<(int col, int len, MarkKind kind)>> _rowMarks = new();
private readonly StringBuilder _lineSb = new();
private readonly List<int> _lineColMap = new();
// ── 關鍵字警示(Feed 偵測,分頁標紅點用)──
private static readonly Regex AnsiStrip = new(
@"\x1B\][^\x07\x1B]*(\x07|\x1B\\)|\x1B[@-Z\\-_]|\x1B\[[0-?]*[ -/]*[@-~]",
RegexOptions.Compiled);
private readonly Decoder _alertDec = Encoding.UTF8.GetDecoder();
private string _alertCarry = "";
private readonly Dictionary<string, long> _alertLastFired = new(StringComparer.OrdinalIgnoreCase);
private const int AlertCooldownMs = 2000;
/// <summary>啟用的關鍵字在輸出中出現(UI thread 觸發),供分頁標警示。</summary>
public event Action<string>? KeywordAlert;
public TerminalView(TerminalProfile profile)
{
SetStyle(ControlStyles.AllPaintingInWmPaint | ControlStyles.UserPaint
@@ -63,6 +90,7 @@ public sealed class TerminalView : UserControl
/// <summary>餵入遠端資料(須在 UI thread 呼叫)。</summary>
public void Feed(byte[] data)
{
DetectKeywords(data);
int before = _buf.ScrollbackCount;
_parser.Feed(data);
// 已貼底才跟隨新輸出;使用者往回看歷史時,補償 scrollback 增量讓畫面停在原處,
@@ -88,6 +116,8 @@ public sealed class TerminalView : UserControl
if (ClientSize.Width < _cellW || ClientSize.Height < _cellH) return;
if (FindForm() is { WindowState: FormWindowState.Minimized }) return;
PositionSearchPanel();
int cols = VisibleCols, rows = VisibleRows;
if (cols == _lastCols && rows == _lastRows) return;
_lastCols = cols; _lastRows = rows;
@@ -106,6 +136,8 @@ public sealed class TerminalView : UserControl
int top = _buf.ScrollbackCount - _scrollOffset; // 視窗第一列的絕對 index
if (top < 0) top = 0;
CollectMarks(top, rows);
for (int vr = 0; vr < rows; vr++)
{
int abs = top + vr;
@@ -179,6 +211,27 @@ public sealed class TerminalView : UserControl
fg = cell.Fg.A == 0 ? _buf.DefaultFg : cell.Fg;
bg = cell.Bg.A == 0 ? _buf.DefaultBg : cell.Bg;
if ((cell.Attr & CellAttr.Inverse) != 0) (fg, bg) = (bg, fg);
// 標記優先序:目前搜尋命中 > 其他搜尋命中 > 關鍵字(選取反白最後蓋上)
if (_rowMarks.TryGetValue(abs, out var marks))
{
var best = MarkKind.Keyword; bool hit = false;
foreach (var (c0, len, kind) in marks)
{
if (col < c0 || col >= c0 + len) continue;
if (!hit || kind > best) { best = kind; hit = true; }
}
if (hit)
{
switch (best)
{
case MarkKind.SearchCurrent: bg = Color.FromArgb(215, 160, 40); fg = Color.Black; break;
case MarkKind.Search: bg = Color.FromArgb(120, 100, 25); break;
case MarkKind.Keyword: bg = Color.FromArgb(150, 45, 45); break;
}
}
}
if (_hasSel && InSelection(abs, col)) (fg, bg) = (bg, Color.FromArgb(70, 90, 140));
}
@@ -199,6 +252,9 @@ public sealed class TerminalView : UserControl
{
if (e.Control && e.KeyCode == Keys.C && _hasSel) { CopySelection(); e.Handled = e.SuppressKeyPress = true; return; }
if ((e.Control && e.KeyCode == Keys.V) || (e.Shift && e.KeyCode == Keys.Insert)) { Paste(); e.Handled = e.SuppressKeyPress = true; return; }
if (e.Control && e.KeyCode == Keys.F) { OpenSearch(); e.Handled = e.SuppressKeyPress = true; return; }
if (e.KeyCode == Keys.F3 && _searchPanel is { Visible: true }) { StepMatch(e.Shift ? +1 : -1); e.Handled = e.SuppressKeyPress = true; return; }
if (e.KeyCode == Keys.Escape && _searchPanel is { Visible: true }) { CloseSearch(); e.Handled = e.SuppressKeyPress = true; return; }
var bytes = TerminalInput.Map(e, _parser.AppCursorKeys);
if (bytes != null) { SendData?.Invoke(bytes); e.Handled = e.SuppressKeyPress = true; }
@@ -358,6 +414,243 @@ public sealed class TerminalView : UserControl
catch { }
}
// ── 搜尋(Ctrl+F)─────────────────────────────────────────
private void OpenSearch()
{
EnsureSearchUi();
_searchPanel!.Visible = true;
PositionSearchPanel();
_searchBox.SelectAll();
_searchBox.Focus();
if (_searchBox.Text.Length > 0) RunSearch();
}
private void CloseSearch()
{
if (_searchPanel == null) return;
_searchPanel.Visible = false;
_matches.Clear();
_matchIdx = -1;
Focus();
Invalidate();
}
private void EnsureSearchUi()
{
if (_searchPanel != null) return;
var back = Color.FromArgb(32, 32, 38);
_searchPanel = new Panel { Size = new Size(268, 30), BackColor = back, Visible = false };
_searchPanel.Paint += (_, pe) =>
{
using var pen = new Pen(Color.FromArgb(58, 58, 66));
pe.Graphics.DrawRectangle(pen, 0, 0, _searchPanel.Width - 1, _searchPanel.Height - 1);
};
_searchBox = new TextBox
{
Bounds = new Rectangle(6, 5, 130, 20), BorderStyle = BorderStyle.None,
BackColor = back, ForeColor = Color.FromArgb(222, 222, 226), Font = new Font("Segoe UI", 9.5f)
};
_searchBox.TextChanged += (_, _) => RunSearch();
_searchBox.KeyDown += (_, e) =>
{
if (e.KeyCode == Keys.Enter || e.KeyCode == Keys.F3)
{ StepMatch(e.Shift ? +1 : -1); e.Handled = e.SuppressKeyPress = true; } // Enter 往上找(較舊),Shift 往下
else if (e.KeyCode == Keys.Escape)
{ CloseSearch(); e.Handled = e.SuppressKeyPress = true; }
};
_searchCount = new Label
{
Bounds = new Rectangle(138, 7, 56, 16), Text = "",
ForeColor = Color.FromArgb(150, 150, 158), BackColor = back,
Font = new Font("Segoe UI", 8.5f), TextAlign = ContentAlignment.MiddleRight
};
Button MakeBtn(string text, int x, Action onClick)
{
var b = new Button
{
Bounds = new Rectangle(x, 4, 22, 22), Text = text, FlatStyle = FlatStyle.Flat,
ForeColor = Color.FromArgb(180, 180, 188), BackColor = back,
Font = new Font("Segoe UI", 8.5f), TabStop = false, Cursor = Cursors.Hand
};
b.FlatAppearance.BorderSize = 0;
b.FlatAppearance.MouseOverBackColor = Color.FromArgb(60, 60, 70);
b.Click += (_, _) => { onClick(); _searchBox.Focus(); };
return b;
}
var up = MakeBtn("▲", 196, () => StepMatch(-1)); // 往上(較舊)
var down = MakeBtn("▼", 218, () => StepMatch(+1)); // 往下(較新)
var close = MakeBtn("✕", 240, CloseSearch);
_searchPanel.Controls.AddRange(new Control[] { _searchBox, _searchCount, up, down, close });
Controls.Add(_searchPanel);
_searchPanel.BringToFront();
}
private void PositionSearchPanel()
{
if (_searchPanel == null) return;
_searchPanel.Location = new Point(Math.Max(0, ContentWidth - _searchPanel.Width - 8), 6);
}
/// <summary>重掃整個 bufferscrollback + 畫面)建立命中清單,並跳到最靠近底部的命中。</summary>
private void RunSearch()
{
_matches.Clear();
_matchIdx = -1;
string q = _searchBox.Text;
if (q.Length > 0)
{
long dropped = _buf.DroppedLines;
for (int abs = 0; abs < _buf.TotalRows; abs++)
{
BuildLineText(_buf.LineAt(abs), _lineSb, _lineColMap);
string s = _lineSb.ToString();
int at = 0;
while (s.Length >= q.Length && (at = s.IndexOf(q, at, StringComparison.OrdinalIgnoreCase)) >= 0)
{
int colStart = _lineColMap[at];
int colEnd = at + q.Length < _lineColMap.Count
? _lineColMap[at + q.Length]
: _buf.LineAt(abs).Length;
_matches.Add((dropped + abs, colStart, Math.Max(1, colEnd - colStart)));
at++;
}
}
if (_matches.Count > 0) { _matchIdx = _matches.Count - 1; ScrollToMatch(); }
}
UpdateSearchCount();
Invalidate();
}
/// <summary>dir = -1 往上(較舊)、+1 往下(較新),循環。</summary>
private void StepMatch(int dir)
{
if (_matches.Count == 0) { RunSearch(); if (_matches.Count == 0) return; }
else
{
_matchIdx = (_matchIdx + dir + _matches.Count) % _matches.Count;
ScrollToMatch();
}
UpdateSearchCount();
Invalidate();
}
private void ScrollToMatch()
{
if (_matchIdx < 0 || _matchIdx >= _matches.Count) return;
int abs = (int)(_matches[_matchIdx].line - _buf.DroppedLines);
if (abs < 0) return; // 該行已被 scrollback 丟棄
int top = Math.Max(0, abs - VisibleRows / 2);
_scrollOffset = Math.Clamp(_buf.ScrollbackCount - top, 0, _buf.ScrollbackCount);
UpdateScrollBar();
}
private void UpdateSearchCount() =>
_searchCount.Text = _matches.Count == 0
? (_searchBox.Text.Length > 0 ? "0" : "")
: $"{_matchIdx + 1}/{_matches.Count}";
// ── 高亮標記收集(每次重繪對可見行執行)──────────────────
private void CollectMarks(int top, int rows)
{
_rowMarks.Clear();
// 關鍵字(Settings → Highlight):只掃可見行,成本固定
var settings = AppSettings.Instance;
bool kwOn = settings.KeywordHighlightEnabled && settings.KeywordRules.Count > 0;
if (kwOn)
{
for (int vr = 0; vr < rows; vr++)
{
int abs = top + vr;
if (abs >= _buf.TotalRows) break;
BuildLineText(_buf.LineAt(abs), _lineSb, _lineColMap);
string s = _lineSb.ToString();
foreach (var rule in settings.KeywordRules)
{
if (!rule.Enabled || rule.Text.Length == 0) continue;
int at = 0;
while (s.Length >= rule.Text.Length &&
(at = s.IndexOf(rule.Text, at, StringComparison.OrdinalIgnoreCase)) >= 0)
{
int colStart = _lineColMap[at];
int colEnd = at + rule.Text.Length < _lineColMap.Count
? _lineColMap[at + rule.Text.Length]
: _buf.LineAt(abs).Length;
AddMark(abs, colStart, Math.Max(1, colEnd - colStart), MarkKind.Keyword);
at++;
}
}
}
}
// 搜尋命中(RunSearch 已算好,換算回目前 abs)
if (_matches.Count > 0)
{
long dropped = _buf.DroppedLines;
for (int i = 0; i < _matches.Count; i++)
{
int abs = (int)(_matches[i].line - dropped);
if (abs < top || abs >= top + rows) continue;
AddMark(abs, _matches[i].col, _matches[i].len,
i == _matchIdx ? MarkKind.SearchCurrent : MarkKind.Search);
}
}
}
private void AddMark(int abs, int col, int len, MarkKind kind)
{
if (!_rowMarks.TryGetValue(abs, out var list)) _rowMarks[abs] = list = new();
list.Add((col, len, kind));
}
/// <summary>把一行 cell 轉成緊湊字串(略過 WideTrail),並記錄字元 index → 欄位 col 的對應。</summary>
private static void BuildLineText(Cell[] line, StringBuilder sb, List<int> colMap)
{
sb.Clear();
colMap.Clear();
for (int c = 0; c < line.Length; c++)
{
var cell = line[c];
if ((cell.Attr & CellAttr.WideTrail) != 0) continue;
sb.Append(cell.Ch == '\0' ? ' ' : cell.Ch);
colMap.Add(c);
}
}
// ── 關鍵字警示(Feed 路徑偵測,供分頁標紅點)──────────────
private void DetectKeywords(byte[] data)
{
var settings = AppSettings.Instance;
if (!settings.KeywordHighlightEnabled || settings.KeywordRules.Count == 0 || KeywordAlert == null)
{ _alertCarry = ""; return; }
var chars = new char[data.Length];
int n = _alertDec.GetChars(data, 0, data.Length, chars, 0);
if (n == 0) return;
string text = _alertCarry + AnsiStrip.Replace(new string(chars, 0, n), "");
int maxKw = 1;
foreach (var rule in settings.KeywordRules)
{
if (!rule.Enabled || rule.Text.Length == 0) continue;
maxKw = Math.Max(maxKw, rule.Text.Length);
if (text.IndexOf(rule.Text, StringComparison.OrdinalIgnoreCase) < 0) continue;
long now = Environment.TickCount64;
if (_alertLastFired.TryGetValue(rule.Text, out var last) && now - last < AlertCooldownMs) continue;
_alertLastFired[rule.Text] = now;
KeywordAlert.Invoke(rule.Text);
}
// 保留尾巴(最長關鍵字 - 1),跨 chunk 的關鍵字下一輪才接得上
int keep = maxKw - 1;
_alertCarry = text.Length <= keep ? text : text[^keep..];
}
// ── IME(中文 / 日文 / 韓文輸入)─────────────────────────
// 自繪控制項預設不處理 IME 組字,故攔截 WM_IME_COMPOSITION 取「結果字串」直接送出 UTF-8。
private const int WM_IME_STARTCOMPOSITION = 0x010D;
+1 -1
View File
@@ -28,7 +28,7 @@ while 1
wait "ServiceOS login:"
sendln "admin"
wait prompt_SVOS ;
wait prompt_SVOS
sendln "version"
wait prompt_SVOS
sendln "help"