thincoder 0.12.67 → 0.12.69

package/src/tui/model-picker.mjs

@@ -7,20 +7,24 @@
  * 拉到的行直接可选）；显式 `provider:model` 一律放行（M4——仅[空值/裸值/未知 provider]无效）。
  * 切换成功回显规格来源（M6）；渠道默认模型 = `providers[].model` 单值（M3——显示回退读取）。
  * 配置写入面（加渠道 / 设 key）探一次 `/models`（M9——探不通标「不可用」+ 明示原因，不阻断保存）。
- * 渠道管理流（add/remove/key/context）是 provider 级 config 写——语义不变。F-4 (ISSUE-FIX-BATCH)：
- * removeProviderFlow 级联清理悬挂引用（cascadeRemoveProvider——文件尾导出）。
+ * 渠道管理流（add/remove/key/context）是 provider 级 config 写——语义不变；2026-09-29 结构拆分起
+ * 四流居 provider-admin.mjs（本档装配 ∥ 尾同名再出口）。F-4 (ISSUE-FIX-BATCH)：removeProviderFlow
+ * 级联清理悬挂引用（cascadeRemoveProvider——定义同在 provider-admin.mjs）。
  * ctx: { agent, state, render, ansi, C, pushLine, persistRaw, askQuestion, maskKey, showPicker,
  *      closePicker, renderPickerLines, confirmDelete }（后四者为 pickers.mjs 通用 picker 绑定——闭包入参，环安全）。
  */
 import { sliceByWidth } from "./render.mjs"
-import { PROVIDER_PRESETS as PRESETS, providerSpec, specMatch } from "@thincoder/core/config.mjs"
+import { providerSpec, specMatch } from "@thincoder/core/config.mjs"
 import { saveSession } from "@thincoder/core/session.mjs"
-import { getProviderModels, probeChannelModels, modelListFailureText, dedupeModels } from "./model-catalog.mjs"
+import { getProviderModels, modelListFailureText, dedupeModels } from "./model-catalog.mjs"
+import { createProviderAdmin } from "./provider-admin.mjs"
 
 /** createModelPicker(ctx) → { openModelPicker, selectModel, setProviderKey, setContextFlow, pickModelForSlot } */
 export function createModelPicker(ctx) {
   const { agent, state, pushLine, persistRaw, askQuestion, maskKey, showPicker, closePicker, renderPickerLines, confirmDelete = () => { throw new Error("ctx.confirmDelete missing — deletion refused (fail-closed)") } } = ctx
   const { ansi, C } = ctx
+  // 渠道管理四流 + 级联清理（provider-admin.mjs——structure-split-2 迁出：本档装配 ∥ 尾同名再出口）
+  const admin = createProviderAdmin({ agent, pushLine, persistRaw, askQuestion, maskKey, showPicker, confirmDelete, C, fmtContextK, defaultModelLabel })
 
   /** entry 唯一标识：异步更新 entries 后按它恢复选中项 */
   function entryKey(e) {
@@ -68,13 +72,13 @@ export function createModelPicker(ctx) {
         if (modelSelected) return // model selected, close picker
         // Esc from model list → return to provider list
       } else if (e.action === "add") {
-        await addProviderFlow()
+        await admin.addProviderFlow()
       } else if (e.action === "remove") {
-        await removeProviderFlow()
+        await admin.removeProviderFlow()
       } else if (e.action === "key") {
-        await setKeyFlow()
+        await admin.setKeyFlow()
       } else if (e.action === "context") {
-        await setContextFlow()
+        await admin.setContextFlow()
       }
     }
   }
@@ -113,7 +117,7 @@ export function createModelPicker(ctx) {
       const shown = active ? (agent.activeModel ?? defaultModelLabel(p)) : defaultModelLabel(p)
       const marker = active ? "●" : ""
       // A1（第 20 批 §12.5）：渠道警示（(no key) / (不可用)）上移 text——与既有状态标
-      // （(ctx …) / ← session）同簇（先例 = 本文件 setKeyFlow / wizard 的 (added, no key)）：
+      // （(ctx …) / ← session）同簇（先例 = provider-admin.mjs setKeyFlow / wizard 的 (added, no key)）：
       // 警示不再位于最先牺牲段。note 收窄为 baseURL（补充信息——超宽随行右截断可接受）。
       const sessionNote = active ? " ← session" : ""
       const keyStatus = p.apiKey ? "" : " (no key)"
@@ -247,7 +251,7 @@ export function createModelPicker(ctx) {
     )
     if (!agent.provider.apiKey) {
       const selKey = await askQuestion(`Enter API key for ${item.provider} (leave empty to skip):`)
-      if (selKey) await setProviderKey(item.provider, selKey)
+      if (selKey) await admin.setProviderKey(item.provider, selKey)
     }
   }
 
@@ -306,194 +310,7 @@ export function createModelPicker(ctx) {
     renderPickerLines()
   }
 
-  // ═══ 渠道管理流（provider 级 config 写——语义不变——与 /model 会话选择分离）═══
-
-  /** M9 配置阶段准入探：探通 → 清标记；探不通 → 会话内存标「不可用」+ 明示原因（绝不落 config；
-   *  不阻断保存——条目已保存，仅标注）。 */
-  async function probeChannelFlow(cfg, label) {
-    const r = await probeChannelModels(cfg)
-    if (r.ok) {
-      delete cfg._unavailable
-      pushLine(`${label}: /models 可用（${r.list.length} 个模型可候选）`, C.tool)
-    } else {
-      cfg._unavailable = true
-      pushLine(`${label} 不可用 — ${r.message}`, C.error)
-    }
-    return r
-  }
-
-  async function addProviderFlow() {
-    const entries = [
-      { type: "header", text: "Select a preset provider" },
-      ...Object.entries(PRESETS).filter(([name]) => !agent.providers.some((p) => p.name === name))
-        .map(([name, p]) => ({ type: "item", text: `${name.padEnd(10)} ${p.desc ?? ""} (${p.model ?? ""})`, name, kind: "preset" })),
-      { type: "header", text: "Other" },
-      { type: "item", text: "Custom (manual config)", name: "__custom__", kind: "custom" },
-    ]
-    const se = await showPicker("Add Provider", entries)
-    if (!se) return // Esc → 返回上级（openModelPicker 循环会重开主菜单）
-    if (se.kind === "custom") {
-      const name = await askQuestion("Enter provider name:")
-      if (!name) return
-      if (agent.providers.some((p) => p.name === name)) return
-      const baseURL = (await askQuestion("Enter baseURL:")).replace(/\/+$/, "")
-      if (!baseURL) return
-      const model = await askQuestion("Enter model name:")
-      if (!model) return
-      const format = await showPicker("API format", [
-        { type: "item", text: "openai", name: "openai" },
-        { type: "item", text: "anthropic", name: "anthropic" },
-        { type: "item", text: "google", name: "google" },
-      ])
-      if (!format) return // Esc/取消 → 中止流程
-      const cfg = { name, baseURL, model }
-      if (format.name === "anthropic" || format.name === "google") cfg.format = format.name
-      else if (format.name !== "openai") return // 防御：未知格式（理论不可达——picker 枚举）
-      await persistRaw((raw) => { raw.providers ??= []; raw.providers.push(cfg) }) // D-F5a 先盘后存
-      agent.providers.push(cfg)
-      const key = await askQuestion(`Enter API key for ${name} (skip if none):`)
-      if (key) await setProviderKey(name, key, { probe: false }) // 探统一在流尾（M9——精确一次）
-      await probeChannelFlow(cfg, name) // M9 准入探（加渠道配置写入面；保存已落——不阻断）
-      return
-    }
-    const preset = PRESETS[se.name]
-    if (!preset || agent.providers.some((p) => p.name === se.name)) return
-    const cfg = { name: se.name, baseURL: preset.baseURL, model: preset.model }
-    if (preset.thinking) cfg.thinking = preset.thinking
-    if (preset.reasoningEffort) cfg.reasoningEffort = preset.reasoningEffort
-    if (preset.maxTokens) cfg.maxTokens = preset.maxTokens
-    if (preset.chatPath) cfg.chatPath = preset.chatPath
-    if (preset.format) cfg.format = preset.format
-    await persistRaw((raw) => { raw.providers ??= []; raw.providers.push(cfg) }) // D-F5a 先盘后存
-    agent.providers.push(cfg)
-    const key = await askQuestion(`Enter API key for ${se.name} (skip if none):`)
-    if (key) await setProviderKey(se.name, key, { probe: false }) // 探统一在流尾（M9——精确一次）
-    await probeChannelFlow(cfg, se.name) // M9 准入探（加渠道配置写入面；保存已落——不阻断）
-  }
-
-  async function removeProviderFlow() {
-    const candidates = agent.providers.filter((p) => p.name !== agent.activeProvider)
-    if (!candidates.length) return
-    const se = await showPicker("Remove Provider", [
-      { type: "header", text: "Select provider to remove" },
-      ...candidates.map((p) => ({ type: "item", text: `${p.name} (${defaultModelLabel(p)})`, name: p.name })),
-    ])
-    if (!se) return
-    if (!(await confirmDelete(`Remove provider ${se.name}?`))) return
-    await persistRaw((raw) => {
-      raw.providers ??= []
-      const idx = raw.providers.findIndex((p) => p?.name === se.name)
-      if (idx !== -1) raw.providers.splice(idx, 1)
-      // F-4 级联（IKCDMR——AC-4）：同盘清 consultModels/subagentModels/advisor.provider 悬挂引用
-      cascadeRemoveProvider(raw, se.name)
-    })
-    agent.providers.splice(agent.providers.findIndex((p) => p.name === se.name), 1)
-    // 会话内存镜像同清（agent.config = loadConfig 产物——consult/escalate 同会话读
-    // agent.config.agent.*；merged.advisor 为 agent.advisor 的提升拷贝——双处清理）
-    if (agent.config) {
-      cascadeRemoveProvider(agent.config, se.name)
-      if (agent.config.advisor?.provider === se.name) delete agent.config.advisor.provider
-    }
-  }
-
-  async function setKeyFlow() {
-    const se = await showPicker("Configure API Key", [
-      { type: "header", text: "Select provider" },
-      ...agent.providers.map((p) => ({ type: "item", text: `${p.name} ${p.apiKey ? `(has key: ${maskKey(p.apiKey)})` : "(no key)"}`, name: p.name })),
-    ])
-    if (!se) return
-    const key = await askQuestion(`Enter API key for ${se.name}:`)
-    if (key) await setProviderKey(se.name, key)
-  }
-
-  /** 设 API key（可以来自渠道管理流 / 加渠道流内的 key 步）：写盘 + 内存镜像；
-   *  M9：设 key 属配置写入面——默认探一次 `/models`（不阻断——key 已保存）；
-   *  加渠道流内调用传 `{ probe: false }`（探由该流尾部统一执行——精确一次）。 */
-  async function setProviderKey(name, key, { probe = true } = {}) {
-    const target = agent.providers.find((p) => p.name === name)
-    if (!target) return
-    await persistRaw((raw) => {
-      raw.providers ??= []
-      const t = raw.providers.find((p) => p?.name === name)
-      if (t) t.apiKey = key
-    })
-    target.apiKey = key
-    if (name === agent.activeProvider) agent.provider.apiKey = key
-    if (probe) await probeChannelFlow(target, name)
-  }
-
-  /** /model provider 管理：context 窗口字段（K 单位）——picker 选 provider + 表单输入。 */
-  async function setContextFlow() {
-    const se = await showPicker("Set Context Window", [
-      { type: "header", text: "Select provider" },
-      ...agent.providers.map((p) => ({
-        type: "item",
-        text: `${p.name} (ctx ${fmtContextK(providerSpec(p).context)})`,
-        name: p.name,
-      })),
-    ])
-    if (!se?.name) return // Esc
-    const target = agent.providers.find((p) => p.name === se.name)
-    if (!target) return
-    const current = Number.isInteger(target.context) && target.context > 0 ? target.context : null
-    const val = (await askQuestion(
-      `Context window for ${se.name} in K units (current: ${current ? `${current}K` : "spec default"} — e.g. 128 = 128K; empty to clear):`
-    ))?.trim() ?? ""
-    let newCtx // undefined = 清空（回 spec 值）
-    if (val !== "") {
-      const n = Number(val)
-      if (!Number.isInteger(n) || n <= 0) {
-        pushLine(`Invalid context: "${val}" — must be a positive integer in K units (e.g. 128 = 128K)`, C.error)
-        return
-      }
-      newCtx = n
-    }
-    await persistRaw((raw) => {
-      raw.providers ??= []
-      const t = raw.providers.find((p) => p?.name === se.name)
-      if (!t) return
-      if (newCtx === undefined) delete t.context
-      else t.context = newCtx
-    })
-    if (newCtx === undefined) delete target.context
-    else target.context = newCtx
-    if (se.name === agent.activeProvider) {
-      if (newCtx === undefined) delete agent.provider.context
-      else agent.provider.context = newCtx
-      if (agent.config?.agent?.compactThresholdAuto) {
-        const { resolveCompactThreshold } = await import("@thincoder/core/config.mjs")
-        agent.config.agent.compactThreshold = resolveCompactThreshold(null, agent.provider).value
-      }
-    }
-    pushLine(target.context !== undefined
-      ? `ctx = ${target.context}K (${target.context * 1024} tokens)`
-      : `context cleared — using model spec (${fmtContextK(providerSpec(target).context)})`, C.tool)
-  }
-
-  return { openModelPicker, selectModel, setProviderKey, setContextFlow, pickModelForSlot }
+  return { openModelPicker, selectModel, setProviderKey: admin.setProviderKey, setContextFlow: admin.setContextFlow, pickModelForSlot }
 }
 
-/** F-4 (IKCDMR) 级联清理（删渠道共享写点）：raw/merged config 移除 name 渠道后清悬挂引用——
- *  agent.consultModels 条目 / agent.subagentModels 角色值（=== name 或 "name:…" 前缀——
- *  角色值是 "provider:model" | 裸渠道名 | 裸模型名）/ agent.advisor.provider。
- *  纯 mutate（removeProviderFlow persistRaw 的 D-F5 新鲜 raw 上调用；agent.config 内存镜像
- *  子树与 raw.agent 同构可复用）。空数组/空对象键删除（规范形态）。 */
-export function cascadeRemoveProvider(raw, name) {
-  const a = raw?.agent
-  if (!a || typeof a !== "object" || Array.isArray(a)) return
-  if (Array.isArray(a.consultModels)) {
-    const keep = a.consultModels.filter((m) => m?.provider !== name)
-    if (keep.length) a.consultModels = keep
-    else delete a.consultModels
-  }
-  if (a.subagentModels && typeof a.subagentModels === "object" && !Array.isArray(a.subagentModels)) {
-    for (const role of Object.keys(a.subagentModels)) {
-      const v = a.subagentModels[role]
-      if (typeof v === "string" && (v === name || v.startsWith(`${name}:`))) delete a.subagentModels[role]
-    }
-    if (Object.keys(a.subagentModels).length === 0) delete a.subagentModels
-  }
-  if (a.advisor && typeof a.advisor === "object" && !Array.isArray(a.advisor) && a.advisor.provider === name) {
-    delete a.advisor.provider
-  }
-}
+export { cascadeRemoveProvider } from "./provider-admin.mjs"

package/src/tui/mouse.mjs

@@ -36,7 +36,7 @@ export function handleWheel(ctx, button, col, row) {
   if (mouseOob(col, row, dims)) return false // F-3 sane-gate ②：越界滚轮丢弃——不落面板（> 非 >=——末行列合法）
   const layout = computeLayout(state, dims)
   const P = layout.panels
-  // §7.2.1 D4: 固定子agent 面板（conversation 与 todo 之间）——面板行默认穿出
+  // docs/cli/design/TUI.md §6.8 D4: 固定子agent 面板（conversation 与 todo 之间）——面板行默认穿出
   // 滚会话（F3，与 todo 面板同型）；命中展开区块内容行（_foldBlock 标记）→
   // 块内滚动（现状能力不丢）。
   if (P.subagent && r >= P.subagent.y && r < P.subagent.y + P.subagent.h) {
@@ -134,7 +134,7 @@ export function handleMouseClick(ctx, col, row) {
     return true
   }
 
-  // ── §7.2.1 D4: 固定子agent 面板（conversation 与 todo 之间）——折叠/展开/翻窗
+  // ── docs/cli/design/TUI.md §6.8 D4: 固定子agent 面板（conversation 与 todo 之间）——折叠/展开/翻窗
   // 坐标映射到面板行（与 todo 面板同型；layout.subagentLines = 面板渲染行）。
   if (P.subagent && r >= P.subagent.y && r < P.subagent.y + P.subagent.h) {
     // 评审 #4：保底截断后可见行 ≠ 前 h 行——命中映射与 render-frame 同一几何契约
@@ -201,7 +201,7 @@ export function createMouseDispatch({ agent, state, pushLine, render, popPicker
       const isAdvisorBlock = key.startsWith("advisor#")
       // af 批 #1（发射单源化）：`emit` = 本层通道，传进核调用供其单点发射（本层不另发）。
       const emit = (t) => { if (!routeSubToken(state, t, render)) pushLine(t, C.dim) }
-      // §11.2 D-24b (②-6b): ⏹ on an advisor block cancels the background review
+      // AGENT-LOOP-ASYNC-POOL.md §6.10 D-24b (②-6b): ⏹ on an advisor block cancels the background review
       // (directed abort → cancelled settle: no pending entry / no token).
       // SYNC-CANCEL F3: async 池/advisor miss 后查 sync registry（⏹ 门控已放开 sync——
       // cancelSyncChild 与 async cancel 同模块同形态——subagent-async.mjs）。

package/src/tui/pickers.mjs

@@ -12,7 +12,7 @@ import { createModelPicker } from "./model-picker.mjs"
  *  删除类二次确认件：confirmDelete（TUI-COMMANDS.md §5.4 单源——形态同 cmd-clear / cmd-new 先例）。
  *  选中即关闭（Enter = resolve + pop）；Esc = pop 当前层并 resolve(null)。菜单循环由调用方 while 重开。 */
 export function createPickers(ctx) {
-  const { agent, state, render, ansi, C, pushLine, persistRaw, askQuestion, maskKey } = ctx
+  const { agent, state, render, ansi, C, pushLine, persistRaw, askQuestion, maskKey, onModalClose = null } = ctx
 
   state.pickerStack ??= []
 
@@ -22,7 +22,9 @@ export function createPickers(ctx) {
     return p.entries.filter((e) => e.type === "item" && (!f || e.text.toLowerCase().includes(f)))
   }
 
-  /** 弹出栈顶 picker 并 resolve 其 Promise。返回是否有 picker 被弹出。 */
+  /** 弹出栈顶 picker 并 resolve 其 Promise。返回是否有 picker 被弹出。
+   *  #448①「关闭后补评估」：本弹出使 picker 面退场（栈空 ∧ 无 wizard）⇒ 通知链尾（闩重武装——模态期
+   *  被抑制的到期件即达）；其余模态仍在场 ⇒ 零动作（交其关闭点）。 */
   function popPicker(value) {
     const p = state.pickerStack.pop()
     if (!p) return false
@@ -30,6 +32,7 @@ export function createPickers(ctx) {
     if (state.picker) rebuildLines()
     else render()
     p.resolve(value)
+    if (state.picker === null && state.wizard == null) onModalClose?.()
     return true
   }
 
@@ -119,6 +122,7 @@ export function createPickers(ctx) {
   }
 
   // /model 两级面 + selectModel + 渠道管理 + pickModelForSlot —— 迁 model-picker.mjs
+  // （2026-09-29 结构拆分：渠道管理四流再迁 provider-admin.mjs——本层与会话面转发零改。）
   // （MODEL-MERGE-SESSION——pick 后本文件 ≤450）。createModelPicker 返回同名单函数，
   // 经本层原样转发（index.mjs/wizard/slash-commands 消费面零变化）。
   const modelPicker = createModelPicker({

package/src/tui/provider-admin.mjs

@@ -0,0 +1,213 @@
+/**
+ * provider-admin.mjs — 渠道管理四流 + 级联清理出档（structure-split-2 · 2026-09-29）：自
+ * `model-picker.mjs` 迁出〔原 `:309-471`（probeChannelFlow ∥ addProviderFlow ∥ removeProviderFlow ∥
+ * setKeyFlow ∥ setProviderKey ∥ setContextFlow）+ `:476-499`（cascadeRemoveProvider）〕——
+ * 结构拆分零语义（面不变 ∕ 判据不变，只换宿主档）；切点 ∕ 缝单源 = 批档
+ * `docs/batches/2026-09-29-structure-split-2.md` §2.2-A。
+ *
+ * 装配 = `createProviderAdmin(ctx)`（ctx = `{ agent, showPicker, askQuestion, pushLine, persistRaw,
+ * maskKey, confirmDelete, C, fmtContextK, defaultModelLabel }`——后两名 = 主档纯 helper，ctx 注入
+ * 同 `maskKey` 先例）→ `{ addProviderFlow, removeProviderFlow, setKeyFlow, setProviderKey,
+ * setContextFlow }`；`cascadeRemoveProvider` 模块级导出（宿主 `model-picker.mjs` 尾同名再出口——
+ * 历史导出面零改）。零环：本档不 import 主档（宿主 → 本档单向）。
+ * 语义（迁出原文照录）：四流 = provider 级 config 写——M9 配置阶段准入探一次 `/models`（不阻断保存）
+ * ∥ F-4 (IKCDMR)：removeProviderFlow 级联清理悬挂引用（consultModels ∕ subagentModels ∕ advisor.provider）。
+ */
+import { PROVIDER_PRESETS as PRESETS, providerSpec } from "@thincoder/core/config.mjs"
+import { probeChannelModels } from "./model-catalog.mjs"
+
+/** createProviderAdmin(ctx) → { addProviderFlow, removeProviderFlow, setKeyFlow, setProviderKey, setContextFlow } */
+export function createProviderAdmin(ctx) {
+  const { agent, showPicker, askQuestion, pushLine, persistRaw, maskKey, confirmDelete, C, fmtContextK, defaultModelLabel } = ctx
+
+  // ═══ 渠道管理流（provider 级 config 写——语义不变——与 /model 会话选择分离）═══
+
+  /** M9 配置阶段准入探：探通 → 清标记；探不通 → 会话内存标「不可用」+ 明示原因（绝不落 config；
+   *  不阻断保存——条目已保存，仅标注）。 */
+  async function probeChannelFlow(cfg, label) {
+    const r = await probeChannelModels(cfg)
+    if (r.ok) {
+      delete cfg._unavailable
+      pushLine(`${label}: /models 可用（${r.list.length} 个模型可候选）`, C.tool)
+    } else {
+      cfg._unavailable = true
+      pushLine(`${label} 不可用 — ${r.message}`, C.error)
+    }
+    return r
+  }
+
+  async function addProviderFlow() {
+    const entries = [
+      { type: "header", text: "Select a preset provider" },
+      ...Object.entries(PRESETS).filter(([name]) => !agent.providers.some((p) => p.name === name))
+        .map(([name, p]) => ({ type: "item", text: `${name.padEnd(10)} ${p.desc ?? ""} (${p.model ?? ""})`, name, kind: "preset" })),
+      { type: "header", text: "Other" },
+      { type: "item", text: "Custom (manual config)", name: "__custom__", kind: "custom" },
+    ]
+    const se = await showPicker("Add Provider", entries)
+    if (!se) return // Esc → 返回上级（openModelPicker 循环会重开主菜单）
+    if (se.kind === "custom") {
+      const name = await askQuestion("Enter provider name:")
+      if (!name) return
+      if (agent.providers.some((p) => p.name === name)) return
+      const baseURL = (await askQuestion("Enter baseURL:")).replace(/\/+$/, "")
+      if (!baseURL) return
+      const model = await askQuestion("Enter model name:")
+      if (!model) return
+      const format = await showPicker("API format", [
+        { type: "item", text: "openai", name: "openai" },
+        { type: "item", text: "anthropic", name: "anthropic" },
+        { type: "item", text: "google", name: "google" },
+      ])
+      if (!format) return // Esc/取消 → 中止流程
+      const cfg = { name, baseURL, model }
+      if (format.name === "anthropic" || format.name === "google") cfg.format = format.name
+      else if (format.name !== "openai") return // 防御：未知格式（理论不可达——picker 枚举）
+      await persistRaw((raw) => { raw.providers ??= []; raw.providers.push(cfg) }) // D-F5a 先盘后存
+      agent.providers.push(cfg)
+      const key = await askQuestion(`Enter API key for ${name} (skip if none):`)
+      if (key) await setProviderKey(name, key, { probe: false }) // 探统一在流尾（M9——精确一次）
+      await probeChannelFlow(cfg, name) // M9 准入探（加渠道配置写入面；保存已落——不阻断）
+      return
+    }
+    const preset = PRESETS[se.name]
+    if (!preset || agent.providers.some((p) => p.name === se.name)) return
+    const cfg = { name: se.name, baseURL: preset.baseURL, model: preset.model }
+    if (preset.thinking) cfg.thinking = preset.thinking
+    if (preset.reasoningEffort) cfg.reasoningEffort = preset.reasoningEffort
+    if (preset.maxTokens) cfg.maxTokens = preset.maxTokens
+    if (preset.chatPath) cfg.chatPath = preset.chatPath
+    if (preset.format) cfg.format = preset.format
+    await persistRaw((raw) => { raw.providers ??= []; raw.providers.push(cfg) }) // D-F5a 先盘后存
+    agent.providers.push(cfg)
+    const key = await askQuestion(`Enter API key for ${se.name} (skip if none):`)
+    if (key) await setProviderKey(se.name, key, { probe: false }) // 探统一在流尾（M9——精确一次）
+    await probeChannelFlow(cfg, se.name) // M9 准入探（加渠道配置写入面；保存已落——不阻断）
+  }
+
+  async function removeProviderFlow() {
+    const candidates = agent.providers.filter((p) => p.name !== agent.activeProvider)
+    if (!candidates.length) return
+    const se = await showPicker("Remove Provider", [
+      { type: "header", text: "Select provider to remove" },
+      ...candidates.map((p) => ({ type: "item", text: `${p.name} (${defaultModelLabel(p)})`, name: p.name })),
+    ])
+    if (!se) return
+    if (!(await confirmDelete(`Remove provider ${se.name}?`))) return
+    await persistRaw((raw) => {
+      raw.providers ??= []
+      const idx = raw.providers.findIndex((p) => p?.name === se.name)
+      if (idx !== -1) raw.providers.splice(idx, 1)
+      // F-4 级联（IKCDMR——AC-4）：同盘清 consultModels/subagentModels/advisor.provider 悬挂引用
+      cascadeRemoveProvider(raw, se.name)
+    })
+    agent.providers.splice(agent.providers.findIndex((p) => p.name === se.name), 1)
+    // 会话内存镜像同清（agent.config = loadConfig 产物——consult/escalate 同会话读
+    // agent.config.agent.*；merged.advisor 为 agent.advisor 的提升拷贝——双处清理）
+    if (agent.config) {
+      cascadeRemoveProvider(agent.config, se.name)
+      if (agent.config.advisor?.provider === se.name) delete agent.config.advisor.provider
+    }
+  }
+
+  async function setKeyFlow() {
+    const se = await showPicker("Configure API Key", [
+      { type: "header", text: "Select provider" },
+      ...agent.providers.map((p) => ({ type: "item", text: `${p.name} ${p.apiKey ? `(has key: ${maskKey(p.apiKey)})` : "(no key)"}`, name: p.name })),
+    ])
+    if (!se) return
+    const key = await askQuestion(`Enter API key for ${se.name}:`)
+    if (key) await setProviderKey(se.name, key)
+  }
+
+  /** 设 API key（可以来自渠道管理流 / 加渠道流内的 key 步）：写盘 + 内存镜像；
+   *  M9：设 key 属配置写入面——默认探一次 `/models`（不阻断——key 已保存）；
+   *  加渠道流内调用传 `{ probe: false }`（探由该流尾部统一执行——精确一次）。 */
+  async function setProviderKey(name, key, { probe = true } = {}) {
+    const target = agent.providers.find((p) => p.name === name)
+    if (!target) return
+    await persistRaw((raw) => {
+      raw.providers ??= []
+      const t = raw.providers.find((p) => p?.name === name)
+      if (t) t.apiKey = key
+    })
+    target.apiKey = key
+    if (name === agent.activeProvider) agent.provider.apiKey = key
+    if (probe) await probeChannelFlow(target, name)
+  }
+
+  /** /model provider 管理：context 窗口字段（K 单位）——picker 选 provider + 表单输入。 */
+  async function setContextFlow() {
+    const se = await showPicker("Set Context Window", [
+      { type: "header", text: "Select provider" },
+      ...agent.providers.map((p) => ({
+        type: "item",
+        text: `${p.name} (ctx ${fmtContextK(providerSpec(p).context)})`,
+        name: p.name,
+      })),
+    ])
+    if (!se?.name) return // Esc
+    const target = agent.providers.find((p) => p.name === se.name)
+    if (!target) return
+    const current = Number.isInteger(target.context) && target.context > 0 ? target.context : null
+    const val = (await askQuestion(
+      `Context window for ${se.name} in K units (current: ${current ? `${current}K` : "spec default"} — e.g. 128 = 128K; empty to clear):`
+    ))?.trim() ?? ""
+    let newCtx // undefined = 清空（回 spec 值）
+    if (val !== "") {
+      const n = Number(val)
+      if (!Number.isInteger(n) || n <= 0) {
+        pushLine(`Invalid context: "${val}" — must be a positive integer in K units (e.g. 128 = 128K)`, C.error)
+        return
+      }
+      newCtx = n
+    }
+    await persistRaw((raw) => {
+      raw.providers ??= []
+      const t = raw.providers.find((p) => p?.name === se.name)
+      if (!t) return
+      if (newCtx === undefined) delete t.context
+      else t.context = newCtx
+    })
+    if (newCtx === undefined) delete target.context
+    else target.context = newCtx
+    if (se.name === agent.activeProvider) {
+      if (newCtx === undefined) delete agent.provider.context
+      else agent.provider.context = newCtx
+      if (agent.config?.agent?.compactThresholdAuto) {
+        const { resolveCompactThreshold } = await import("@thincoder/core/config.mjs")
+        agent.config.agent.compactThreshold = resolveCompactThreshold(null, agent.provider).value
+      }
+    }
+    pushLine(target.context !== undefined
+      ? `ctx = ${target.context}K (${target.context * 1024} tokens)`
+      : `context cleared — using model spec (${fmtContextK(providerSpec(target).context)})`, C.tool)
+  }
+
+  return { addProviderFlow, removeProviderFlow, setKeyFlow, setProviderKey, setContextFlow }
+}
+
+/** F-4 (IKCDMR) 级联清理（删渠道共享写点）：raw/merged config 移除 name 渠道后清悬挂引用——
+ *  agent.consultModels 条目 / agent.subagentModels 角色值（=== name 或 "name:…" 前缀——
+ *  角色值是 "provider:model" | 裸渠道名 | 裸模型名）/ agent.advisor.provider。
+ *  纯 mutate（removeProviderFlow persistRaw 的 D-F5 新鲜 raw 上调用；agent.config 内存镜像
+ *  子树与 raw.agent 同构可复用）。空数组/空对象键删除（规范形态）。 */
+export function cascadeRemoveProvider(raw, name) {
+  const a = raw?.agent
+  if (!a || typeof a !== "object" || Array.isArray(a)) return
+  if (Array.isArray(a.consultModels)) {
+    const keep = a.consultModels.filter((m) => m?.provider !== name)
+    if (keep.length) a.consultModels = keep
+    else delete a.consultModels
+  }
+  if (a.subagentModels && typeof a.subagentModels === "object" && !Array.isArray(a.subagentModels)) {
+    for (const role of Object.keys(a.subagentModels)) {
+      const v = a.subagentModels[role]
+      if (typeof v === "string" && (v === name || v.startsWith(`${name}:`))) delete a.subagentModels[role]
+    }
+    if (Object.keys(a.subagentModels).length === 0) delete a.subagentModels
+  }
+  if (a.advisor && typeof a.advisor === "object" && !Array.isArray(a.advisor) && a.advisor.provider === name) {
+    delete a.advisor.provider
+  }
+}

package/src/tui/queued-merge.mjs

@@ -1,68 +1,12 @@
 /**
  * queued-merge.mjs — busy 排队消息的合并消费纯函数族（R15 攒批恢复——queue-visible 批 2026-09-24）。
  *
- * 机制单源 = `docs/cli/design/TUI.md` §7.5「合并消费」+ `docs/cli/design/TUI-INPUT-BOX.md` §4.1
- * 「送达链路」（常量 / 形态文案 / 计划语义）。恢复依据 = 旧形态逐字（R15 攒批，2026-09-06 实现 →
- * 2026-09-09 随 INPUT-LOCK-ASYNC 废弃；废弃记录 = `thincoder-cli/docs/_archive/design/AGENT-LOOP.md`
- * §11.3；原实现 = git `3e1234b7` 树内 `src/tui/suspension-drive.mjs:21-68`）——常量名 / 值 /
- * 形态文案 / 批语义逐字一致。
- *
+ * 机制单源 = `docs/cli/design/TUI.md` §7.5「合并消费」+ `docs/cli/design/TUI-INPUT-BOX.md` §4.1「送达链路」。
+ * **核单源（转口）**：五名（常量 ∕ 形态 ∕ 计划）自 `@thincoder/core/queued.mjs` 转口（同一绑定——
+ * 对拍锁 = `docs/batches/2026-09-29-parity-b2-queued.test.mjs`（批次本地件））。
  * 取批四支共用同一事实源（`planQueuedInput`；队列容器仍归会话层 `state.pendingInput`——核只给缝）：
  *   ① 步边界 pickup（`queued-pickup.mjs`）· ② 回合尾兜底（`agent-turn.mjs`）
  *   · ③ driver 输入优先（`suspension-drive.mjs`）· ④ 中止残余转 queue（`suspension-drive.mjs`）。
  */
 
-// ── 合并常量（R15 逐字）：单批 ≤ MAX_MERGE_ITEMS 条且合并注入 ≤ MAX_MERGE_CHARS 字符
-// （双端逐字一致——VSC 对位 `thincoder-vscode/src/extension/queued-merge.mjs` 同值同名）；
-// 超限截批先行（余下留待下批——不丢不截断单条）；单条 > MAX_MERGE_CHARS 直发不进批；
-// /cmd 不进合并（逐条保序即时）。──
-export const MAX_MERGE_ITEMS = 8
-export const MAX_MERGE_CHARS = 2000
-
-/** 队容量（条）——**常量单源**（显示面 / 输入门禁同源 import；与合并批上限 `MAX_MERGE_ITEMS`（8）
- *  **同值不同名**：常规满队 ⇒ 恰一批一次消费）。判据面 = `docs/cli/design/TUI-INPUT-BOX.md` §4.1
- *  条件 5（第 9 条 = 拒 + 提示 + 文本保留）。 */
-export const QUEUED_MAX_ITEMS = 8
-
-/** 合并注入形态（编号逐条——模型一次处理全部——设计措辞锚；`docs/cli/design/TUI.md` §7.5 逐字）。 */
-export function formatMergedMessages(items) {
-  return `你排队了 ${items.length} 条消息：\n${items.map((m, i) => `${i + 1}. ${m}`).join("\n")}\n——一次处理`
-}
-
-/**
- * R15 攒批计划（纯函数——消费点共享同一事实源）：按队列顺序产出动作序列。
- * - { kind:"slash", text, count:1 }——/cmd 逐条即时执行（保序——不进合并缓冲）；
- * - { kind:"turn", text, count, merged }——文本批次：连续非 / 条目攒批（单批 ≤ MAX_MERGE_ITEMS 条；
- *   合并注入（格式化后）≤ MAX_MERGE_CHARS 字符；count ≥2 → merged 编号注入；count === 1 → 原文
- *   直发（含单条 > MAX_MERGE_CHARS——不进批）；超限截批先行——余下条目留待下批（不丢）。
- * 消费者每次取动作 [0] 并按 count 从源队列移除——下轮重新计划余项（边界幂等）。
- */
-export function planQueuedInput(items) {
-  const actions = []
-  const n = items.length
-  let i = 0
-  while (i < n) {
-    const cur = String(items[i])
-    if (cur.startsWith("/")) { actions.push({ kind: "slash", text: cur, count: 1 }); i++; continue }
-    let j = i
-    for (;;) {
-      if (j - i >= MAX_MERGE_ITEMS || j >= n) break
-      const it = String(items[j])
-      if (it.startsWith("/")) break
-      if (it.length > MAX_MERGE_CHARS) break // 单条超长——不进批（留作直发）
-      const cand = items.slice(i, j + 1)
-      if (cand.length > 1 && formatMergedMessages(cand).length > MAX_MERGE_CHARS) break // 批总长超限——截批
-      j++
-    }
-    // 超长条目堵头（内环一步未进）→ 该条直发（不进批——也不与前后合并）
-    if (j === i) { actions.push({ kind: "turn", text: String(items[i]), count: 1, merged: false }); i++; continue }
-    const taken = items.slice(i, j)
-    if (taken.length === 1) {
-      actions.push({ kind: "turn", text: String(taken[0]), count: 1, merged: false })
-    } else {
-      actions.push({ kind: "turn", text: formatMergedMessages(taken), count: taken.length, merged: true })
-    }
-    i = j
-  }
-  return actions
-}
+export { MAX_MERGE_ITEMS, MAX_MERGE_CHARS, QUEUED_MAX_ITEMS, formatMergedMessages, planQueuedInput } from "@thincoder/core/queued.mjs"

package/src/tui/queued-pickup.mjs

@@ -14,9 +14,9 @@ import { planQueuedInput } from "./queued-merge.mjs"
 /**
  * 步边界取批（核循环头回调——空队列 no-op，headless / 直连面零开销）。
  * 取数 = 计划首动作（`planQueuedInput`——2 条短消息 ⇒ 合并批一次消费）；`/cmd` 首动作 =
- * 入队门禁不可达的防御面（斜杠 busy 禁发——`TUI-INPUT-BOX.md` §4.1 条件 3）⇒ 不消费，
- * 留给既有消费点（回合尾 queue / driver）。呈现 = 回执行 + `❯ You:` + 本批文本（与
- * `agent-turn.mjs` 回合起点同形——下一步 LLM 请求即含该消息）。
+ * 不可达支（斜杠 busy 禁发——`key-handler-busy.mjs:24` ∕ `key-handler-edit.mjs:59` 双门禁；
+ * `TUI-INPUT-BOX.md` §4.1 条件 3）⇒ 不消费，留给既有消费点（回合尾 queue / driver）。呈现 =
+ * 回执行 + `❯ You:` + 本批文本（与 `agent-turn.mjs` 回合起点同形——下一步 LLM 请求即含该消息）。
  * @param {object} ctx TUI 上下文（agent / state / pushLine / pushLabel / render）
  */
 export function pickupQueuedAtStepBoundary(ctx) {