tmuxclihook 0.5.10 → 0.5.12

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "tmuxclihook",
-  "version": "0.5.10",
+  "version": "0.5.12",
   "description": "交互式 TUI 安装器：环境侦测、AI CLI 侦测、tmux-ai-status hooks 装/卸/修、TPM 软链校验",
   "type": "module",
   "bin": {

package/scripts/adapters/claude.sh

@@ -175,6 +175,24 @@ _ccswitch_warn_gui() {
     fi
 }
 
+# live 模式的真源是 $HOME/.claude/settings.json（cc-switch 硬编码，不随
+# CLAUDE_CONFIG_DIR 变）。若当前环境的 CLAUDE_CONFIG_DIR 指向非 cc-switch
+# 实例目录（用户自定义目录裸跑 claude），该进程读的是自定义目录，本插件写入
+# 的真源可能不生效——纯诊断告警，不改写入行为（不做双写，理由同 2026-10-13
+# 决策：外部覆盖拉锯风险大于收益）。
+_ccswitch_warn_config_dir_mismatch() {
+    [ -n "${CLAUDE_CONFIG_DIR:-}" ] || return 0
+    local inst="${HOME}/.cc-switch/instances/claude" resolved
+    resolved=$(cd "$CLAUDE_CONFIG_DIR" 2>/dev/null && pwd -P) || resolved="$CLAUDE_CONFIG_DIR"
+    case "$resolved" in
+        "$inst"|"$inst"/*) ;;
+        *)
+            echo "WARN: CLAUDE_CONFIG_DIR=$CLAUDE_CONFIG_DIR 不是 cc-switch 实例目录；" \
+                 "live 模式写入 $(_ccswitch_live_file) 可能不被该进程读取" >&2
+            ;;
+    esac
+}
+
 # 读通用配置 value → mktemp 文件，路径写入 $1 命名的变量。
 # 行缺失/空白 → "{}"；非空但非法 JSON → 明确报错 return 1（绝不覆盖用户数据）。
 # 注意：内部临时变量名不得与调用方常用名（tmp 等）同名——bash 动态作用域下
@@ -407,6 +425,7 @@ adapter_install_hooks() {
             ;;
         live)
             _ccswitch_warn_gui
+            _ccswitch_warn_config_dir_mismatch
             target=$(_ccswitch_live_file)
             ;;
         *)

package/scripts/install-claude-hooks.sh

@@ -18,6 +18,15 @@ _LIB_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd -P)"
 source "${_LIB_DIR}/lib-install-hooks.sh"
 source "${_LIB_DIR}/adapters/claude.sh"
 
+# 子命令白名单：必须在取锁前校验——拼错的子命令不应先白等最多 10s 锁超时
+case "${1:-install}" in
+    install|uninstall|check|auto) ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]|auto]" >&2
+        exit 2
+        ;;
+esac
+
 # 写路径互斥（check 只读不锁）：临界区覆盖 adapter 调用 + suppress 标记读-改-写，
 # 串行化 auto 与显式 uninstall 的标记 TOCTOU。失败语义见 _install_acquire_lock：
 # 降级无锁（rc=2）继续；等待超时（rc=1）退出。
@@ -63,8 +72,12 @@ case "${1:-install}" in
         adapter_install_hooks
         _hooks_suppress_clear claude || true
         ;;
-    *)
+    install)
         adapter_install_hooks
         _hooks_suppress_clear claude || true
         ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]|auto]" >&2
+        exit 2
+        ;;
 esac

package/scripts/install-codex-hooks.sh

@@ -15,6 +15,15 @@ _LIB_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd -P)"
 source "${_LIB_DIR}/lib-install-hooks.sh"
 source "${_LIB_DIR}/adapters/codex.sh"
 
+# 子命令白名单：必须在取锁前校验——拼错的子命令不应先白等最多 10s 锁超时
+case "${1:-install}" in
+    install|uninstall|check) ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]]" >&2
+        exit 2
+        ;;
+esac
+
 # 写路径互斥（check 只读不锁）：见 _install_acquire_lock 头注释。
 case "${1:-install}" in
     check) ;;
@@ -43,8 +52,12 @@ case "${1:-install}" in
             exit 1
         fi
         ;;
-    *)
+    install)
         adapter_install_hooks
         _hooks_suppress_clear codex || true
         ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]]" >&2
+        exit 2
+        ;;
 esac

package/scripts/install-opencode-hooks.sh

@@ -15,6 +15,15 @@ _LIB_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd -P)"
 source "${_LIB_DIR}/lib-install-hooks.sh"
 source "${_LIB_DIR}/adapters/opencode.sh"
 
+# 子命令白名单：必须在取锁前校验——拼错的子命令不应先白等最多 10s 锁超时
+case "${1:-install}" in
+    install|uninstall|check) ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]]" >&2
+        exit 2
+        ;;
+esac
+
 # 写路径互斥（check 只读不锁）：见 _install_acquire_lock 头注释。
 case "${1:-install}" in
     check) ;;
@@ -43,8 +52,12 @@ case "${1:-install}" in
             exit 1
         fi
         ;;
-    *)
+    install)
         adapter_install_hooks
         _hooks_suppress_clear opencode || true
         ;;
+    *)
+        echo "Usage: $0 [install|uninstall|check [--json]]" >&2
+        exit 2
+        ;;
 esac

package/scripts/lib-tmux-ai-status.sh

@@ -94,7 +94,7 @@ _load_pane_snapshot() {
     _CURRENT_SERVER_PID=""
     command -v tmux >/dev/null 2>&1 || return 1
     _PANE_SNAPSHOT=$(tmux list-panes -a -F \
-        '#{pane_id}|#{pane_current_path}|#{pane_current_command}|#{pane_pid}|#{pid}|#{session_attached}|#{pane_title}' \
+        '#{pane_id}|#{s/[|]/_/:pane_current_path}|#{s/[|]/_/:pane_current_command}|#{pane_pid}|#{pid}|#{session_attached}|#{pane_title}' \
         2>/dev/null)
     [ -n "$_PANE_SNAPSHOT" ] || return 1
     _PANE_SNAPSHOT_OK=1
@@ -184,7 +184,8 @@ _narrow_panes_by_adapter() {
 _narrow_panes_by_cwd() {
     local base="$1" want="" matches="" id path cmd pid server attached title
     [ -n "${HOOK_CWD:-}" ] || { printf '%s\n' "$base"; return; }
-    want=$(_normalize_path "$HOOK_CWD") || want="${HOOK_CWD%/}"
+    # _normalize_path 对非空输入恒返回 0（cd 失败时返回去尾斜杠原串），无需兜底分支
+    want=$(_normalize_path "$HOOK_CWD")
     while IFS='|' read -r id path cmd pid server attached title; do
         [ -n "$id" ] || continue
         [ "$(_normalize_path "$path")" = "$want" ] && matches="$matches $id"
@@ -410,7 +411,10 @@ build_all_status() {
     _ai_names=$(_collect_ai_process_names)
     # 动态追加上 monitor 的 seen 标记（无 SessionEnd 工具的进程树探测结果）。
     # switch/volta-shim 启动的 pane 前台命令不是 codex，必须靠该标记补 idle `-`。
-    _fmt="#{pane_id}|#{session_name}|#{window_index}|#{pane_index}|#{@ai_pane_status}|#{session_attached}|#{session_created}|#{@ai_entered_time}|#{pane_current_command}|#{@ai_provider}|#{@ai_provider_id}"
+    # 自由文本字段就地消毒：tmux format 的 s/[|]/_/ 替换（`|` 是 ERE 交替符，
+    # 必须写成 [|] 或 \|；裸 s/|/…/ 不生效）。session 名/provider 名含 `|` 时
+    # 会劈裂字段——attached 位变状态字符使 $6>0 误判、该 session 整行消失。
+    _fmt="#{pane_id}|#{s/[|]/_/:session_name}|#{window_index}|#{pane_index}|#{@ai_pane_status}|#{session_attached}|#{session_created}|#{@ai_entered_time}|#{s/[|]/_/:pane_current_command}|#{s/[|]/_/:@ai_provider}|#{s/[|]/_/:@ai_provider_id}"
     for _n in $_ai_names; do
         _fmt="$_fmt|#{@ai_monitor_seen_$_n}"
     done
@@ -662,6 +666,23 @@ _clear_pending() {
     _release_lock
 }
 
+# pending 集合中是否有 N 秒内的条目（每行 "id tool ts"）。用于区分「工具确实在
+# 跑」与「泄漏/中断残留的旧条目」——并发 hook 抢锁超时会让 _remove_pending_id
+# 静默放弃，集合可能长期残留陈旧 id（实测存在），不能只按非空判定活跃。
+_pending_recent() {  # $1=秒数 → 0=有新鲜条目
+    local max="${1:-10}" now f
+    now=$(date +%s)
+    for f in "$(_pending_pre_path)" "$(_pending_perm_path)"; do
+        [ -s "$f" ] || continue
+        if awk -v now="$now" -v max="$max" '
+            $3 ~ /^[0-9]+$/ && now - $3 <= max { found = 1; exit }
+            END { exit !found }' "$f" 2>/dev/null; then
+            return 0
+        fi
+    done
+    return 1
+}
+
 # 根据当前 pending-perm / pending-pre 派生 STATUS。结果写入全局 DERIVED
 # return 0 = 派生出非空 STATUS, return 1 = 都空（事件需自行决定）
 _derive_status_from_pending() {
@@ -874,7 +895,7 @@ _is_pane_session_dead() {
 # 有对应文件但文件过期且进程已死（Stop 未触发的崩溃场景），也清除。
 _cleanup_stale_panes() {
     local active_panes=""
-    local f pane_id
+    local f pane_id pane_status pane_dir pid pid_file
     for f in "${_STATUS_DIR}"/*/pane-*; do
         [ -f "$f" ] || continue
         pane_id=$(cat "$f" 2>/dev/null)
@@ -925,7 +946,6 @@ _cleanup_stale_panes() {
             # 清理孤儿 poll 进程
             for pid_file in "${pane_dir}"*-poll-pid; do
                 [ -f "$pid_file" ] || continue
-                local pid
                 pid=$(cat "$pid_file" 2>/dev/null)
                 [ -n "$pid" ] && kill "$pid" 2>/dev/null
             done
@@ -935,6 +955,25 @@ _cleanup_stale_panes() {
     done
 }
 
+# 清理已断开 client 的 @ai_prev_sess_* 残留。key 是写入端有损 sanitize
+# （tr -c 'A-Za-z0-9._-' '_'），无法从 key 反推 client → 反向枚举存活集比对。
+# 实测关注：长期运行的 server 会累积已 detach 的 client 键（8 option / 4 存活）。
+_prune_prev_sess_options() {
+    local alive=" " name key opt
+    while IFS= read -r name; do
+        [ -n "$name" ] || continue
+        key=$(printf '%s' "$name" | tr -c 'A-Za-z0-9._-' '_')
+        alive="$alive$key "
+    done < <(tmux list-clients -F '#{client_name}' 2>/dev/null)
+    for opt in $(tmux show-options -g 2>/dev/null | awk '/^@ai_prev_sess_/{print $1}'); do
+        key="${opt#@ai_prev_sess_}"
+        case "$alive" in
+            *" $key "*) ;;
+            *) tmux set-option -gu "$opt" 2>/dev/null || true ;;
+        esac
+    done
+}
+
 # 频率限制的孤儿清理（每次 hook 调用，最多每 60s 执行一次）
 _maybe_cleanup_stale() {
     local marker="${_STATUS_DIR}/.stale-cleanup-ts"
@@ -947,6 +986,7 @@ _maybe_cleanup_stale() {
         [ $((now - ${last:-0})) -lt 60 ] && return
     fi
     _cleanup_stale_panes
+    _prune_prev_sess_options
     echo "$now" > "$marker"
 }
 

package/scripts/tmux-ai-reload

@@ -0,0 +1,29 @@
+#!/bin/bash
+# tmux-ai-reload — prefix+r 重载：source 实际存在的配置文件后重跑插件入口
+#
+# 背景：入口曾用 mktemp conf 绑定 `source-file ~/.tmux.conf \; run-shell 入口`：
+#   1) 硬编码 ~/.tmux.conf（XDG / tmux -f 用户 reload 读错文件）
+#   2) 一次性哨兵：source-file 内用户自己的 `bind r` 会把绑定重置回原命令，
+#      哨兵已置位 → 纯 TPM 模式（配置无 run-shell 行）从第二次重载起插件初始化
+#      静默停止
+# 本 helper 每次由绑定直接调用（入口每次加载都重绑，自愈）：
+#   - 按 tmux 的 #{config_files} 候选列表逐个过滤存在性后 source（顺序同启动）
+#   - 再显式跑一次入口（纯 TPM 模式也能重新初始化；配置里的 run-shell 行会让
+#     入口再跑一次——幂等，仅一次多余启动）
+set -u
+
+_SELF_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
+_ENTRY="$(cd "${_SELF_DIR}/.." && pwd)/tmux-ai-hooks-status.tmux"
+
+_cfg=$(tmux display-message -p '#{config_files}' 2>/dev/null || true)
+# config_files 实测是「候选列表」而非已加载列表（含不存在路径）→ 逐个 [ -f ] 过滤；
+# 老版本 tmux 无该 format 时回落 ~/.tmux.conf。
+[ -n "$_cfg" ] || _cfg="$HOME/.tmux.conf"
+# 注意用 printf '%s\n'：末项无换行符时 read 返回非零，循环体会漏掉最后一项
+printf '%s\n' "$_cfg" | tr ',' '\n' | while IFS= read -r _f; do
+    [ -n "$_f" ] && [ -f "$_f" ] || continue
+    tmux source-file "$_f" 2>/dev/null || true
+done
+
+[ -f "$_ENTRY" ] && tmux run-shell "$_ENTRY" 2>/dev/null || true
+tmux display-message "配置已重载" 2>/dev/null || true

package/scripts/tmux-ai-status

@@ -78,6 +78,33 @@ _current_pane_status() {
     tmux display-message -pt "$TMUX_PANE" -p "#{@ai_pane_status}" 2>/dev/null
 }
 
+# Notification「隐式」路径（idle_prompt / waiting for your input）的状态解析：
+# 通知可能乱序晚到（async hook 无顺序保证），不能无条件降级为 idle '-'。
+# 判定顺序（⚠️ 不能颠倒）：
+#   1. live 审批态 !/? → 保持。审批等待期间 pending-pre 非空（PreToolUse 先于
+#      PermissionRequest），若先看 pending 会派生出 '>' 把 '!' 降级——违反
+#      「审批态永不覆盖」
+#   2. pending 派生出 !/? → 采用（codex/opencode 的审批集合；claude 不写 perm）
+#   3. pending 派生出 '>' → **仅当存在 10s 内的新条目才可信**（并发 hook 抢锁
+#      超时会让清理静默放弃，集合可能残留陈旧 id），否则视为残留
+#   4. 其余 → '-'
+# 显式重置消息（denied/cancelled/rejected）不走本函数——denial 携带「等待已结束」
+# 语义，应无条件置 '-'。
+_notification_implicit_status() {
+    local live
+    live=$(_current_pane_status)
+    case "$live" in
+        "!"|"?") printf '%s' "$live"; return ;;
+    esac
+    if _derive_status_from_pending; then
+        case "$DERIVED" in
+            "!"|"?") printf '%s' "$DERIVED"; return ;;
+        esac
+        if _pending_recent 10; then printf '%s' ">"; return; fi
+    fi
+    printf '%s' "-"
+}
+
 # 重建聚合状态（_refresh / _entered 共用）
 _run_refresh() {
     _maybe_repair_hooks
@@ -94,6 +121,7 @@ PREV_STATUS=$(_current_pane_status)
 TOOL=""
 TOOL_USE_ID=""
 INPUT_DIGEST=""
+_log_flags=""
 
 case "$EVENT" in
   Notification)
@@ -102,14 +130,15 @@ case "$EVENT" in
     INPUT_DIGEST=$(echo "$INPUT" | jq -c '{notification_type, message}' 2>/dev/null)
     case "$NOTIF_TYPE" in
       idle_prompt)
-        STATUS="-"
+        STATUS=$(_notification_implicit_status)
         ;;
       *)
         case "$MSG" in
           *"waiting for your input"*)
-            STATUS="-"
+            STATUS=$(_notification_implicit_status)
             ;;
           *"denied"*|*"cancelled"*|*"canceled"*|*"rejected"*)
+            # 显式重置：denial 表示等待已结束，无条件 idle（即便有 pending 残项）
             STATUS="-"
             ;;
           *)
@@ -118,6 +147,8 @@ case "$EVENT" in
         esac
         ;;
     esac
+    # 写入循环内不再对 Notification 重复 re-derive：事件锁（tmux-ai-status 头部）
+    # 已串行化同 pane 事件，分支内判定即最终判定。
     ;;
   PermissionRequest)
     # 一次 @tsv 提取 tool_name/tool_use_id（digest 单独一次；stdin 只能读一次，
@@ -209,8 +240,12 @@ case "$EVENT" in
     else
         STATUS="✓"
     fi
-    # fallback: TMUX_PANE 未解析时，精准清理孤儿状态（不碰其他活跃 pane）
+    # fallback: TMUX_PANE 未解析时，精准清理孤儿状态（不碰其他活跃 pane）。
+    # 此时事件无处写入——不要伪造 ✓ 写入日志（真实 pane 可能仍是 !）：
+    # STATUS 置空 + flags 标注，日志显示「无状态转移」。
     if [ -n "$TMUX" ] && [ -z "$TMUX_PANE" ]; then
+        STATUS=""
+        _log_flags="PANE=unresolved"
         _cleanup_stale_panes
         build_all_status
         tmux set-option -g @ai_all_status "$ALL" 2>/dev/null || true
@@ -294,7 +329,7 @@ if [ -n "$INPUT_DIGEST" ] && [ "$INPUT_DIGEST" != "null" ]; then
         _log_input_line="input: $(_ai_log_truncate_input "$INPUT_DIGEST")"
     fi
 fi
-_ai_log_event "$PREV_STATUS" "$STATUS" "" "$_log_tool_line" "$_log_input_line"
+_ai_log_event "$PREV_STATUS" "$STATUS" "$_log_flags" "$_log_tool_line" "$_log_input_line"
 
 if [ -n "$TMUX_PANE" ] && { [ -n "$TMUX" ] || command -v tmux &>/dev/null; }; then
     # 写入前重新读取 pending，避免并发事件用过期结果覆盖仍有效的审批态。

package/tmux-ai-hooks-status.tmux

@@ -43,19 +43,25 @@ tmux set-option -g "status-format[${CLAUDE_ROW}]" "#[align=centre]#{?#{@ai_all_s
 # 不动 status-right，让用户自行管理第 1 行内容
 # Claude 状态通过多行 status-format 的独立行显示，不修改 status-right
 
-# --- Reload 保护：覆盖 prefix+r reload 绑定，source-file 后追加本插件初始化 ---
-# 用哨兵变量防止重复覆盖（tmux server 生命周期内只覆盖一次）
-# 注意：不能在 shell CLI 中用 \; 分隔多条 tmux 命令传给 bind-key，
-# 因为 tmux CLI 会将 \; 作为命令分隔符立即执行后续命令（而不是绑定到按键）。
-# 解决方案：写入临时 tmux config 文件再 source，确保 \; 被 tmux config parser 正确处理。
-if [ -z "$(tmux show-option -gv @claude_hooks_reload_registered 2>/dev/null)" ]; then
-    _bind_tmpfile=$(mktemp /tmp/tmux-ai-bind-XXXXXX.conf)
-    printf "bind-key r source-file ~/.tmux.conf \\; run-shell '%s' \\; display-message '配置已重载'\n" \
-        "${CURRENT_DIR}/tmux-ai-hooks-status.tmux" > "$_bind_tmpfile"
-    tmux source-file "$_bind_tmpfile" 2>/dev/null || true
-    rm -f "$_bind_tmpfile"
-    tmux set-option -g @claude_hooks_reload_registered "1"
-fi
+# --- Reload 保护：prefix+r = source 实际配置文件 + 重跑本插件初始化 ---
+# 绑定单命令指向 scripts/tmux-ai-reload（不再需要 mktemp conf 规避 \;）。
+# ⚠️ 每次加载都重绑（bind-key 是 upsert，幂等）：旧实现用一次性哨兵
+# @claude_hooks_reload_registered，但 source-file 配置内用户自己的 `bind r`
+# 会把绑定重置回原命令，哨兵已置位 → 纯 TPM 模式从第二次重载起插件初始化
+# 静默停止。每次重绑使其自愈。
+# 原绑定保存：覆盖前捕获（排除本插件新旧两种命令形态），供手动恢复：
+#   tmux show-option -gv @claude_hooks_saved_bind_r   # 查看
+#   eval "$(tmux show-option -gv @claude_hooks_saved_bind_r)"  # 回放
+_prev_r=$(tmux list-keys -T prefix r 2>/dev/null || true)
+case "$_prev_r" in
+    ""|*tmux-ai-reload*|*tmux-ai-hooks-status.tmux*) ;;
+    *)
+        if [ -z "$(tmux show-option -gv @claude_hooks_saved_bind_r 2>/dev/null)" ]; then
+            tmux set-option -g @claude_hooks_saved_bind_r "$_prev_r" 2>/dev/null || true
+        fi
+        ;;
+esac
+tmux bind-key r run-shell "'${CURRENT_DIR}/scripts/tmux-ai-reload'" 2>/dev/null || true
 
 # --- 自动注册 Claude hooks（幂等，每次插件加载时确保 hooks 存在）---
 # auto 模式：用户显式卸载过（suppressed-claude 标记在）时静默跳过，尊重卸载意图；
@@ -119,4 +125,20 @@ else
 fi
 
 # Esc 拒绝检测：! / ? 状态下 Esc → -
+# 全局 root 表绑定会覆盖用户既有 Escape 绑定——覆盖前保存 + 一次性告警
+# （无法安全链式调用任意已有绑定，恢复需手动）：
+#   tmux show-option -gv @claude_hooks_saved_bind_escape
+_prev_esc=$(tmux list-keys -T root Escape 2>/dev/null || true)
+case "$_prev_esc" in
+    ""|*tmux-ai-esc*) ;;
+    *)
+        if [ -z "$(tmux show-option -gv @claude_hooks_saved_bind_escape 2>/dev/null)" ]; then
+            tmux set-option -g @claude_hooks_saved_bind_escape "$_prev_esc" 2>/dev/null || true
+        fi
+        if [ -z "$(tmux show-option -gv @claude_hooks_esc_warned 2>/dev/null)" ]; then
+            tmux display-message "⚠ tmux-ai-hooks-status 覆盖了全局 Esc 绑定；原绑定已存 @claude_hooks_saved_bind_escape" 2>/dev/null || true
+            tmux set-option -g @claude_hooks_esc_warned "1" 2>/dev/null || true
+        fi
+        ;;
+esac
 tmux bind-key -n Escape run-shell "${CURRENT_DIR}/scripts/tmux-ai-esc"