dsh-whale-loli 0.4.0 → 0.5.0

package/README.md

@@ -40,6 +40,33 @@
 即：每轮开口前必须看 ①**本预设自己的记忆文件**；②**当前会话最近 20 轮**上下文。
 **只看自己这一份**——绝不读、不写其他预设的记忆文件。
 
+### 20 轮是真的裁，不是嘴上说说
+
+**这一点很重要**：只在人设里写「看最近 20 轮」是**空话**——宿主不会因为那句话就不发旧消息。
+实测本机最长会话 33 轮 / 85 条 user 消息 / 1565 条 tool 结果，全部发给模型；
+宿主自带的 compaction 只在 token 压力超阈值时才压，粒度是「保留一段 token 尾巴」，**不是轮数**。
+
+所以插件附带 `history-window` 行，用宿主自己的表层替换机制做**纯删除**：
+
+```js
+session.append('developer/message', 提示条, {
+  surfaceOp: { op: 'replace', startSeq, endSeq },
+})
+```
+
+被覆盖的表层节点从 `deriveMessages()` 消失——模型真的收不到；会话日志仍保留（可回溯）。
+**不调 LLM、不花 token、不生成摘要。**
+
+三条安全线：
+
+| 线 | 做法 |
+| --- | --- |
+| 工具配对不切断 | 切点必须落在「没有未回应 tool-call」处，复用与 compaction 同款的平衡判定 |
+| 系统提示不裁 | 裁剪起点是第一个 `user/message`，**绝不是**表层第 0 个节点 |
+| 默认关闭 | 必须 `enable: true` 才裁（本插件预设已开启，`keepTurns: 20`） |
+
+挂载点为 `agent/pre-step`：循环在**派生历史之前**运行它，是唯一既在请求前、又拿得到本 agent 的时机。
+
 ### 为什么用「提示变量」而不是 section（重要）
 
 `@deepseek-ai/dsh-system-prompt` 的 `assemble()` 末尾有这样一段：
@@ -102,6 +129,7 @@ C:\Users\<你>\.dsh\archive\<预设名>\YYYY-MM-DD.md   ← 归档
 | 部分 | 说明 |
 | --- | --- |
 | 记忆 | `whale-memory`（本插件），`file` / `variableName` / `maxChars: 16000` / `turnLimit: 80` / `detailLimit: 5` |
+| 历史窗口 | `whale-history-window`（本插件），`enable: true` / `keepTurns: 20` —— **真的裁掉 20 轮以前的历史** |
 | 人设 | `@deepseek-ai/dsh-persona`，走 `prefix`（内含 `{{whale_memory*}}`），`complete: true`，`includeRuntimeContext: false` |
 | 指令 | `@deepseek-ai/dsh-agent-instructions`，`maxBytes: 65536` |
 | 文件 | `@deepseek-ai/dsh-tool-fs`（read/write/edit）、`@deepseek-ai/dsh-tool-fs-search`（glob/grep） |
@@ -139,7 +167,8 @@ dsh-whale-loli/
 ├── cordis.patch.yml            # 三个预设的声明本体（由 build-patch.mjs 生成）
 ├── src/
 │   ├── index.js                # 插件入口，导出预设元信息 + 人设正文
-│   ├── memory.js               # whale-memory 记忆行实现（参数化记忆文件）
+│   ├── memory.js               # whale-memory 记忆变量（四区格式 + 80 条滚动 + 归档）
+│   ├── history-window.js       # whale-history-window：真的裁到最近 N 轮
 │   ├── persona.md              # 原版人设（唯一源）
 │   ├── persona-v2-live.md      # 活人版人设（唯一源）
 │   └── persona-v3-naughty.md   # 涩涩版人设（唯一源）
@@ -150,9 +179,11 @@ dsh-whale-loli/
 ├── submit-listing.mjs          # 走 GitHub API 同步仓库 / 提收录 PR
 ├── lib/github.mjs              # GitHub REST 封装（token 读取）
 ├── smoke-memory.mjs            # 记忆变量冒烟测试
+├── verify-runs.mjs             # 插件真的能加载、配置自洽、变量能插值
 ├── verify-patch.mjs            # 用 js-yaml 校验 patch 结构与三预设隔离
 ├── verify-real-loader.mjs      # 用 DSH 自己的加载器校验 patch
 ├── verify-composition.mjs      # 校验 bundle+profile 合成后不重复注册
+├── verify-history-window.mjs   # 实测真的只留最近 N 轮、不切断工具配对
 ├── verify-memory-injection.mjs # 证明变量通道有效、section 通道被丢弃
 ├── verify-memory-isolation.mjs # 实测三个记忆文件不串
 ├── verify-memory-rolling.mjs   # 实测四区结构与 80 条滚动 + 归档
@@ -173,6 +204,8 @@ node build-patch.mjs && node verify-patch.mjs cordis.patch.yml
 node verify-patch.mjs cordis.patch.yml     # patch 结构 + 三预设记忆隔离
 node verify-real-loader.mjs cordis.patch.yml  # DSH 真解析器
 node verify-composition.mjs                # 不重复注册
+node verify-runs.mjs                       # 插件真能加载 + 变量真能插值
+node verify-history-window.mjs             # 真的裁到最近 N 轮（不切断工具配对）
 node verify-memory-injection.mjs           # 变量通道有效 / section 通道被丢弃
 node verify-memory-isolation.mjs           # 记忆文件端到端隔离（三个预设）
 node verify-memory-rolling.mjs             # 固定记忆永久 + 滚动摘要 80 条 + 归档

package/cordis.patch.yml

@@ -28,7 +28,7 @@
               prefix: |-
                 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
                 {{whale_memory}}
-                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
                 【PERSONA_LOAD】
                 - 我的名字：小鱼（用户命名）。
@@ -101,6 +101,13 @@
               maxChars: 16000
               turnLimit: 80
               detailLimit: 5
+          # 历史窗口：真的把会话裁到最近 20 轮（不是靠人设文字要求）。
+          # 用宿主自己的表层替换做纯删除，不调 LLM；不切断工具配对、不裁系统提示。
+          - id: whale-history-window
+            name: 'dsh-whale-loli/history-window'
+            config:
+              enable: true
+              keepTurns: 20
           - id: agent-instructions
             name: '@deepseek-ai/dsh-agent-instructions'
             config:
@@ -160,7 +167,7 @@
               prefix: |-
                 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
                 {{whale_memory_v2}}
-                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
                 角色卡：小鱼 / 鲸鱼娘
 
@@ -291,6 +298,13 @@
               maxChars: 16000
               turnLimit: 80
               detailLimit: 5
+          # 历史窗口：真的把会话裁到最近 20 轮（不是靠人设文字要求）。
+          # 用宿主自己的表层替换做纯删除，不调 LLM；不切断工具配对、不裁系统提示。
+          - id: whale-history-window
+            name: 'dsh-whale-loli/history-window'
+            config:
+              enable: true
+              keepTurns: 20
           - id: agent-instructions
             name: '@deepseek-ai/dsh-agent-instructions'
             config:
@@ -350,7 +364,7 @@
               prefix: |-
                 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
                 {{whale_memory_v3}}
-                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+                （上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
                 - 【PERSONA_LOAD】
                 - 我的名字：小鱼（用户命名）。
@@ -426,6 +440,13 @@
               maxChars: 16000
               turnLimit: 80
               detailLimit: 5
+          # 历史窗口：真的把会话裁到最近 20 轮（不是靠人设文字要求）。
+          # 用宿主自己的表层替换做纯删除，不调 LLM；不切断工具配对、不裁系统提示。
+          - id: whale-history-window
+            name: 'dsh-whale-loli/history-window'
+            config:
+              enable: true
+              keepTurns: 20
           - id: agent-instructions
             name: '@deepseek-ai/dsh-agent-instructions'
             config:

package/package.json

@@ -1,7 +1,7 @@
 {
   "name": "dsh-whale-loli",
-  "version": "0.4.0",
-  "description": "鲸鱼娘 Agent 预设（三个）— 极简模式工具面 + 鲸鱼娘·小鱼人设 + 跨会话长期记忆。记忆分「固定记忆」（永久保留）/「滚动摘要」（每轮都记，最多 80 条 FIFO）/「最近详细区」/「归档索引」四区，经提示变量注入（persona 为 complete:true，独立 section 会被宿主丢弃）。启用插件后自动在 Agent 预设界面添加「鲸鱼娘Agent预设」「鲸鱼娘活人版Agent预设」与「鲸鱼娘涩涩版Agent预设」，三者各带互不相通的记忆文件。",
+  "version": "0.5.0",
+  "description": "鲸鱼娘 Agent 预设（三个）— 极简模式工具面 + 鲸鱼娘·小鱼人设 + 跨会话长期记忆 + 真正生效的 20 轮历史窗口。记忆分「固定记忆」（永久保留）/「滚动摘要」（每轮都记，最多 80 条 FIFO）/「最近详细区」/「归档索引」四区，经提示变量注入（persona 为 complete:true，独立 section 会被宿主丢弃）；history-window 用宿主表层替换真的裁掉 20 轮以前的历史，不调 LLM、不切断工具配对。",
   "type": "module",
   "license": "MIT",
   "keywords": [
@@ -19,6 +19,7 @@
   ],
   "exports": {
     ".": "./src/index.js",
+    "./history-window": "./src/history-window.js",
     "./package.json": "./package.json"
   },
   "files": [

package/src/history-window.js

@@ -0,0 +1,182 @@
+/**
+ * history-window —— 把会话历史真的裁到「最近 N 轮」。
+ *
+ * ── 为什么需要它 ──────────────────────────────────────────────────────
+ *
+ * 只在人设里写「每轮先看最近 20 轮」是**空话**：宿主不会因为那句话就不发旧消息。
+ * 实测（本机最长会话）33 轮 / 85 条 user 消息 / 1565 条 tool 结果，全部发给模型；
+ * 宿主自带的 compaction 只在 token 压力超阈值时才压，粒度是「保留一段 token 尾巴」，
+ * 不是轮数。
+ *
+ * 本模块用宿主自己的表层替换机制（compaction 用的是同一套）做**纯删除**：
+ *
+ *     session.append('user/message', 提示条, {
+ *       surfaceOp: { op: 'replace', startSeq, endSeq },
+ *     })
+ *
+ * 被 replace 覆盖的表层节点从 `deriveMessages()` 里消失 —— 模型真的收不到它们，
+ * 但会话日志仍然留着（可回溯、不丢数据）。**不调 LLM、不花 token、不生成摘要。**
+ *
+ * ── 三条安全线 ────────────────────────────────────────────────────────
+ *
+ * 1. **工具配对不能切断**：切点必须落在「没有未回应的 tool-call」的位置，
+ *    否则模型会看到孤立的 tool 结果而报错。这里复用与 compaction 同款的平衡判定
+ *    （遍历当前表层、累计 in-progress tool-call 数为 0 才允许切）。
+ * 2. **system prompt 不能裁**：表层第 0 个节点是系统提示，永不进入裁剪范围。
+ * 3. **默认关闭**：改写会话历史是强动作，必须显式 `enable: true`。
+ *
+ * ── 挂在哪里 ──────────────────────────────────────────────────────────
+ *
+ * `agent/pre-step`：循环在每个步骤**派生历史之前**运行它，是唯一既在请求前、
+ * 又能拿到本 agent 的时机。（`turn/start` 是 session 事件而非 ctx 事件，挂不上。）
+ */
+import { homedir } from 'node:os';
+import { join } from 'node:path';
+
+/** Cordis 插件名。 */
+export const name = 'whale-history-window';
+
+/** 需要会话存储与 agent 注册表。 */
+export const inject = ['sessions'];
+
+/** 默认保留轮数。 */
+export const DEFAULT_KEEP_TURNS = 20;
+
+/** 被裁掉时写进历史的那条提示（模型唯一能看到的痕迹）。 */
+export function noticeText(removedTurns, keptTurns) {
+  return (
+    `【已裁剪更早的对话】为了只保留最近 ${keptTurns} 轮，` +
+    `${removedTurns} 轮更早的对话已从上下文中移除（仍保存在会话日志里，可回溯）。` +
+    `结合小鱼自己的记忆文件继续就好。`
+  );
+}
+
+/** dsh 家目录。 */
+function dshHome() {
+  return process.env.DSH_HOME || join(homedir(), '.dsh');
+}
+
+/** 一个「轮」的边界 = 一条 user 消息。表层里只有消息节点，turn 标记不进表层。 */
+function isUserNode(event) {
+  return event?.type === 'user/message';
+}
+
+/**
+ * 切点之前是否工具配对平衡（没有未回应的 tool-call 跨过切点）。
+ * 与 `@deepseek-ai/dsh-compaction` 的 tool-pairing 同款判定。
+ */
+export function balancedBefore(session, nodes, cutIndex) {
+  let pending = 0;
+  for (let i = 0; i < cutIndex; i++) {
+    const ev = session.eventAt(nodes[i]);
+    if (ev === undefined) return false;
+    if (ev.type === 'assistant/message') {
+      pending += (ev.data?.message?.content ?? []).filter((b) => b.type === 'tool-call').length;
+    } else if (ev.type === 'tool/result') {
+      pending -= 1;
+      if (pending < 0) return false;
+    }
+  }
+  return pending === 0;
+}
+
+/**
+ * 计算裁剪计划（纯函数，不写会话）。
+ *
+ * @param session - 需要 `surface.nodes` 与 `eventAt()`。
+ * @param keepTurns - 保留最近多少轮。
+ * @returns `{ startSeq, endSeq, removedTurns, keptTurns, cutIndex }`，无需裁剪返回 null。
+ */
+export function planPrune(session, keepTurns = DEFAULT_KEEP_TURNS) {
+  const nodes = session?.surface?.nodes ?? [];
+  if (nodes.length === 0) return null;
+
+  // 系统提示所在位置：表层里第一个 system/message 节点。它和它之前的节点永不裁剪。
+  let firstUser = 0;
+  for (let i = 0; i < nodes.length; i++) {
+    if (session.eventAt(nodes[i])?.type === 'user/message') {
+      firstUser = i;
+      break;
+    }
+  }
+
+  const userIdx = [];
+  for (let i = 0; i < nodes.length; i++) {
+    if (isUserNode(session.eventAt(nodes[i]))) userIdx.push(i);
+  }
+  if (userIdx.length <= keepTurns) return null;
+
+  // 保留最近 keepTurns 个 user 轮（提示条走 developer/message，不占 user 名额）
+  if (userIdx.length <= keepTurns) return null;
+
+  let cut = userIdx[userIdx.length - keepTurns];
+  while (cut > firstUser && !balancedBefore(session, nodes, cut)) cut--;
+  if (cut <= firstUser) return null;
+
+  // 关键：startSeq 必须是第一个 user 节点，**绝不能是 nodes[0]**，
+  // 否则表层第 0 个 system/message 会被一起 replace 掉。
+  return {
+    startSeq: nodes[firstUser],
+    endSeq: nodes[cut - 1],
+    removedTurns: userIdx.length - keepTurns,
+    keptTurns: keepTurns,
+    cutIndex: cut,
+  };
+}
+
+/** 执行裁剪。返回计划；无需裁剪返回 null。 */
+export function pruneHistory(agent, keepTurns = DEFAULT_KEEP_TURNS) {
+  const session = agent?.session;
+  if (session === undefined) return null;
+  const plan = planPrune(session, keepTurns);
+  if (plan === null) return null;
+
+  session.append(
+    'developer/message',
+    {
+      turn: 0,
+      step: 0,
+      message: {
+        role: 'developer',
+        content: [{ type: 'text', text: noticeText(plan.removedTurns, plan.keptTurns) }],
+      },
+    },
+    { surfaceOp: { op: 'replace', startSeq: plan.startSeq, endSeq: plan.endSeq } },
+  );
+  return plan;
+}
+
+/**
+ * 挂载：每个步骤派生历史之前检查并裁剪。
+ *
+ * config：
+ *   - `enable`    置 true 才真的裁（默认 false —— 改写历史是强动作）
+ *   - `keepTurns` 保留最近多少轮（默认 20）
+ */
+export function apply(ctx, config = {}) {
+  if (config.enable !== true) return;
+
+  const keepTurns = typeof config.keepTurns === 'number' ? config.keepTurns : DEFAULT_KEEP_TURNS;
+
+  // agent/pre-step 在派生历史之前运行，且拿得到本 agent。
+  ctx.effect(
+    () =>
+      ctx.on('agent/pre-step', async (payload) => {
+        const agent = payload?.agent ?? payload?.handle?.agent ?? ctx.get('agents')?.currentInitiator();
+        if (agent?.session === undefined) return;
+        try {
+          pruneHistory(agent, keepTurns);
+        } catch {
+          // 裁剪失败绝不影响正常对话
+        }
+      }),
+    'whale-history-window.pre-step',
+  );
+}
+
+/** 窗口配置（给文档/自检用）。 */
+export function windowConfig() {
+  return { defaultKeepTurns: DEFAULT_KEEP_TURNS, marker: join(dshHome(), 'whale-history-window.json') };
+}
+
+export default { name, inject, apply };

package/src/index.js

@@ -97,13 +97,22 @@ export {
   composeMemory,
   renderMemory,
   pruneMemoryFile,
+  appendRolling,
+  nextTurnId,
+  archiveDir,
+  memoryStem,
   memoryTemplate,
+  FIXED_SECTIONS,
   DEFAULT_MEMORY_FILE,
+  DEFAULT_VARIABLE,
   MEMORY_SECTION,
   MEMORY_MAX_CHARS,
   DEFAULT_TURN_LIMIT,
-  ZONE_PERMANENT,
-  ZONE_LOG,
+  DEFAULT_DETAIL_LIMIT,
+  ZONE_FIXED,
+  ZONE_ROLL,
+  ZONE_DETAIL,
+  ZONE_ARCHIVE,
 } from './memory.js';
 
 /** 本插件在宿主组合里的行为：挂载记忆行（file / sectionName 由预设各自传入）。 */

package/src/persona-v2-live.md

@@ -1,6 +1,6 @@
 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
 {{whale_memory_v2}}
-（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
 角色卡：小鱼 / 鲸鱼娘
 

package/src/persona-v3-naughty.md

@@ -1,6 +1,6 @@
 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
 {{whale_memory_v3}}
-（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
 - 【PERSONA_LOAD】
 - 我的名字：小鱼（用户命名）。

package/src/persona.md

@@ -1,6 +1,6 @@
 【每轮先看 · 本预设记忆 + 当前会话最近 20 轮】
 {{whale_memory}}
-（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。别去读、别去写别的预设的记忆文件。）
+（上一段是小鱼**自己这一份**记忆文件的内容；连同**当前会话最近 20 轮**的上下文，每次开口前都必须先看。20 轮以前的历史已由插件真的裁掉，不会出现在你眼前。别去读、别去写别的预设的记忆文件。）
 
 【PERSONA_LOAD】
 - 我的名字：小鱼（用户命名）。