@furongjun1999/dsh-memory 0.5.1 → 0.6.1

package/md_cg/test_tenant_env_override_warn.py

@@ -1,15 +1,17 @@
 # -*- coding: utf-8 -*-
-"""租户绑定 env 覆盖告警守卫（v8 N62 / v9 / 第15轮三次成立，止血验收）。
+"""租户绑定 env 覆盖守卫（v8 N62 止血告警 → 本轮 N62 第 5 轮 fail-closed）。
 
 攻击面：控制 MCP 进程 env 的部署面（宿主配置 / 启动器 / 同机多会话）——
 tenantA 签发的 designer(secret, can_admin) 令牌在 MDCG_TENANT=tenantB 下经
-mcp_server._build_principal → verify_token(tok, tenant=env) 静默以 tenantB
-身份运行（tenant=tenant or rec.get("tenant") 形参优先），全程零告警。
+mcp_server._build_principal → verify_token(tok, tenant=env) 以 tenantB 身份
+运行（tenant=tenant or rec.get("tenant") 形参优先）。
 
-止血口径（本轮）：仅加 stderr 告警，零闸变——冲突时 Principal 判定结果与
-修复前完全一致（形参/env 值仍优先），但必须开口。对照 MDCG_CLEARANCE 先例
-（mcp_server._build_principal 密级冲突告警）。clearance_cap 夹紧接线与租户
-绑定强校验不在本项范围（另行 deferred）。
+契约演进（N62 五轮留档）：
+  v8/v9/第15轮：仅 stderr 告警零闸变（止血口径——先开口，强校验 deferred）；
+  本轮（2026-09-27 第 5 次，medium 维持）：告警改 fail-closed 拒绝
+  （tokens.verify_token 抛 TokenError，消息含两侧租户与校正指引），并接线
+  登记租户 clearance_cap 夹紧（MDCG_TENANT_REGISTRY，与 mcp_server.
+  _resolve_root 同源；未登记租户零闸变）。
 
 运行：python -m md_cg.test_tenant_env_override_warn
 """
@@ -26,7 +28,7 @@ from . import tokens
 
 PASS = FAIL = 0
 FAILS = []
-MARK = "租户绑定被入参覆盖"          # 告警稳定锚点（tokens.verify_token）
+MARK = "租户绑定被入参覆盖"          # fail-closed 拒绝消息稳定锚点
 
 
 def check(name, cond, detail=""):
@@ -41,82 +43,89 @@ def check(name, cond, detail=""):
 
 
 def _verify_capture(token, tenant, path):
-    """verify_token 并捕获 stderr，返回 (principal, stderr_text)。"""
+    """verify_token 捕获异常与 stderr，返回 (principal|None, stderr_text, exc|None)。"""
     buf = io.StringIO()
-    with contextlib.redirect_stderr(buf):
-        p = tokens.verify_token(token, tenant=tenant, path=path)
-    return p, buf.getvalue()
+    p = exc = None
+    try:
+        with contextlib.redirect_stderr(buf):
+            p = tokens.verify_token(token, tenant=tenant, path=path)
+    except tokens.TokenError as e:
+        exc = e
+    return p, buf.getvalue(), exc
 
 
 def main():
     sys.stdout.reconfigure(encoding="utf-8", errors="replace")
     root = tempfile.mkdtemp(prefix="mdcg_tenant_warn_")
     tf = os.path.join(root, "_tokens.json")
+    # 登记表钉在临时不存在路径：守卫全程不触真实 ~/.mdcg/_tenants.json，
+    # 且「未登记 → 零夹紧」确定性（冲突拒绝发生在登记表访问之前）。
+    reg_path = os.path.join(root, "_tenants_absent.json")
+    old_reg = os.environ.get("MDCG_TENANT_REGISTRY")
+    os.environ["MDCG_TENANT_REGISTRY"] = reg_path
     try:
-        # ---------------- ① 攻击复现（单元级） ----------------
-        print("\n[1] 攻击复现：tenantA 令牌被 tenantB 形参覆盖必须告警")
+        # ---------------- ① 攻击复现（单元级，fail-closed） ----------------
+        print("\n[1] 攻击复现：tenantA 令牌被 tenantB 形参覆盖 → 拒绝")
         d = tokens.issue("designer", actor="dummy-designer", tenant="tenantA",
                          path=tf)
-        p, err = _verify_capture(d["token"], "tenantB", tf)
-        check("冲突覆盖发 stderr 告警", MARK in err,
-              (err.strip().splitlines() or ["（零 stderr 输出——静默覆盖成立）"])[-1][:90])
-        check("告警含两侧租户名", "tenantA" in err and "tenantB" in err,
-              err.strip()[:100])
-
-        # ---------------- ② 零闸变（止血不改判定） ----------------
-        print("\n[2] 零闸变（判停结果与修复前一致，只加告警）")
-        check("形参/env 租户仍优先生效", p.tenant == "tenantB",
-              f"principal.tenant={p.tenant}")
-        check("权限面不受影响（designer/can_admin 原样）",
-              p.role == "designer" and p.can_admin is True,
-              f"role={p.role} admin={p.can_admin}")
+        p, err, exc = _verify_capture(d["token"], "tenantB", tf)
+        check("冲突覆盖被拒（TokenError 且含锚点）",
+              p is None and exc is not None and MARK in str(exc),
+              f"p={p} exc={type(exc).__name__}: {str(exc)[:80]}")
+        check("拒绝消息含两侧租户与校正指引",
+              exc is not None and "tenantA" in str(exc) and "tenantB" in str(exc)
+              and "MDCG_TENANT" in str(exc), str(exc)[:100])
+
+        # ---------------- ② fail-closed（覆盖零放行） ----------------
+        print("\n[2] fail-closed（冲突路径零 Principal 放行）")
+        check("冲突路径不返回 Principal", p is None, f"p={p}")
 
         # ---------------- ③ 无冲突路径零误伤 ----------------
         print("\n[3] 无冲突路径零误伤")
-        p0, err0 = _verify_capture(d["token"], None, tf)
-        check("tenant=None：零告警且回退令牌租户",
-              MARK not in err0 and p0.tenant == "tenantA",
-              f"tenant={p0.tenant}")
-        p1, err1 = _verify_capture(d["token"], "", tf)
-        check("tenant=''（env 未设/空串）：零告警且回退令牌租户",
-              MARK not in err1 and p1.tenant == "tenantA",
-              f"tenant={p1.tenant}")
-        p2, err2 = _verify_capture(d["token"], "tenantA", tf)
-        check("tenant 同值：零告警", MARK not in err2 and p2.tenant == "tenantA",
-              f"tenant={p2.tenant}")
+        p0, err0, exc0 = _verify_capture(d["token"], None, tf)
+        check("tenant=None：零异常且回退令牌租户",
+              exc0 is None and MARK not in err0 and p0.tenant == "tenantA",
+              f"tenant={p0.tenant} err={exc0}")
+        p1, err1, exc1 = _verify_capture(d["token"], "", tf)
+        check("tenant=''（env 未设/空串）：零异常且回退令牌租户",
+              exc1 is None and MARK not in err1 and p1.tenant == "tenantA",
+              f"tenant={p1.tenant} err={exc1}")
+        p2, err2, exc2 = _verify_capture(d["token"], "tenantA", tf)
+        check("tenant 同值：零异常零告警",
+              exc2 is None and MARK not in err2 and p2.tenant == "tenantA",
+              f"tenant={p2.tenant} err={exc2}")
 
         # ---------------- ④ MCP 进程级入口（_build_principal 直调先例 b26） ----------------
         print("\n[4] MCP 进程级：MDCG_TOKEN(tenantA) + MDCG_TENANT=tenantB")
         from .mcp_server import _build_principal
         saved = {k: os.environ.get(k) for k in
                  ("MDCG_TOKEN", "MDCG_TENANT", "MDCG_TOKEN_FILE", "MDCG_ROOT",
-                  "MDCG_LEGACY_ENV_AUTH", "MDCG_CAN_ADMIN", "MDCG_CAN_WRITE",
+                  "MDCG_TENANT_REGISTRY", "MDCG_LEGACY_ENV_AUTH",
+                  "MDCG_LEGACY_ENV_ADMIN", "MDCG_CAN_ADMIN", "MDCG_CAN_WRITE",
                   "MDCG_CLEARANCE", "MDCG_ACTOR")}
         try:
             os.environ["MDCG_TOKEN"] = d["token"]
             os.environ["MDCG_TOKEN_FILE"] = tf
             os.environ["MDCG_ROOT"] = os.path.join(root, "mcp")
+            os.environ["MDCG_TENANT_REGISTRY"] = reg_path
             os.environ["MDCG_TENANT"] = "tenantB"
-            for k in ("MDCG_LEGACY_ENV_AUTH", "MDCG_CAN_ADMIN",
-                      "MDCG_CAN_WRITE", "MDCG_CLEARANCE", "MDCG_ACTOR"):
+            for k in ("MDCG_LEGACY_ENV_AUTH", "MDCG_LEGACY_ENV_ADMIN",
+                      "MDCG_CAN_ADMIN", "MDCG_CAN_WRITE", "MDCG_CLEARANCE",
+                      "MDCG_ACTOR"):
                 os.environ.pop(k, None)
             buf = io.StringIO()
             with contextlib.redirect_stderr(buf):
                 mp, merr = _build_principal()
             mout = buf.getvalue()
-            check("MCP 入口构建成功（攻击原样可达）", merr is None and mp is not None,
-                  f"err={merr}")
-            check("MCP 入口租户被覆盖为 tenantB（攻击面成立）",
-                  getattr(mp, "tenant", None) == "tenantB",
-                  f"tenant={getattr(mp, 'tenant', None)}")
-            check("MCP 入口 stderr 含覆盖告警", MARK in mout,
-                  (mout.strip().splitlines() or ["（零 stderr）"])[-1][:90])
-            # 无冲突对照：MDCG_TENANT 与令牌租户一致 → 零告警
+            check("MCP 入口覆盖被拒（err 含锚点，principal=None）",
+                  mp is None and merr is not None and MARK in merr,
+                  f"err={str(merr)[:90]}")
+            # 无冲突对照：MDCG_TENANT 与令牌租户一致 → 零异常正常通过
             os.environ["MDCG_TENANT"] = "tenantA"
             buf2 = io.StringIO()
             with contextlib.redirect_stderr(buf2):
                 mp2, merr2 = _build_principal()
-            check("MDCG_TENANT 同值：零告警",
+            check("MDCG_TENANT 同值：零异常零告警",
                   merr2 is None and MARK not in buf2.getvalue()
                   and getattr(mp2, "tenant", None) == "tenantA",
                   buf2.getvalue().strip()[:90])
@@ -127,6 +136,10 @@ def main():
                 else:
                     os.environ[k] = v
     finally:
+        if old_reg is None:
+            os.environ.pop("MDCG_TENANT_REGISTRY", None)
+        else:
+            os.environ["MDCG_TENANT_REGISTRY"] = old_reg
         shutil.rmtree(root, ignore_errors=True)
 
     print(f"\n通过 {PASS} / 失败 {FAIL}")

package/md_cg/test_token_lowercase_form.py

@@ -0,0 +1,315 @@
+# -*- coding: utf-8 -*-
+"""令牌形态「只认小写」的守卫（批次79，2026-09-28 使用者裁定）。
+
+运行：python -X utf8 -m md_cg.test_token_lowercase_form              # 正常跑
+      python -X utf8 -m md_cg.test_token_lowercase_form --head-baseline  # 判别力自证
+
+裁定原文：「不认大写。统一只认小写。」落点＝**受理面单点** `tokens.parse_token`
+（`verify_token` 的唯一入口）。改动前该函数返回 `role.lower()`、且对 token_id 不做
+任何形态检查——即受理面比识别面**更宽**：`md_cg` 自己的检测表
+（`data/policy.json` forbidden #9 `\\btk_[0-9a-f]{8,}\\b`、`src/hooks.ts`
+SENSITIVE_PATTERNS 的同形规则）**有意**不含 `A-F`，而受理面却会接受一个含大写的
+token_id——检测面漏过的形态照样能通过校验，两面的松紧就倒挂了。
+
+本套断言分七组：
+  G1 放行面（真令牌通过；secret 含大写仍通过——base64url 必含大写，不得误伤）
+  G2 token_id 含大写 → 拒（`TK_` 前缀、全大写 hex、混合大小写 id 三种）
+  G3 role 含大写 → 拒（改动前 role.lower() 会**静默接受**）
+  G4 前缀含大写 → 拒（既有判据，钉住它别被后续重构放松）
+  G5 端到端（真临时令牌库：合法令牌过闸；同 secret 的大写变形令牌抛 TokenError，
+     而不是落到「令牌不存在」这类下游软失败上——形态问题必须在形态层拒掉）
+  G6 生成面自证（**推论前提**：`issue` 只产小写 role/token_id ⇒ 大写形态没有合法来源）
+  G7 口径面（识别面**仍然**宽：禁表两条原样存在、hooks.ts 的 role 段仍 `[A-Za-z]+`；
+     受理面已窄。二者关系＝「识别面宽、受理面窄」，不是「两面都收紧」）
+  G8 三面口径（2026-09-28 使用者补裁「大写也转小写识别，以后写统一小写，现有的大写
+     内容就不动了」）：入参面宽容（role_spec/as_unit 的大写照旧归一，收窄只减不增）、
+     令牌面从严（同为大写 role 的令牌字符串仍被拒——两面**有意**不同）、
+     存量不迁移（test_p46 C2 那条存量断言必须还在）、写面统一小写（issue 产出恒小写）
+
+**红基线自证（--head-baseline）**：把 `parse_token` 临时换回改动前的实现
+（`return role.lower(), token_id, secret`），G2/G3/G5/G8d 必须转红（实测 11 红）。若红
+基线不红，说明这几条断言没有判别力（删掉新分支也照样全绿）。
+"""
+from __future__ import annotations
+
+import contextlib
+import io
+import json
+import os
+import re
+import secrets
+import shutil
+import sys
+import tempfile
+
+from . import tokens
+from .tokens import ROLE_SPECS, TokenError
+
+_PASS = []
+_FAIL = []
+
+
+def ok(cond, msg, extra=""):
+    (_PASS if cond else _FAIL).append(msg)
+    print(("  PASS " if cond else "  FAIL ") + msg + (("  ← " + str(extra)) if (extra and not cond) else ""))
+
+
+def _rejects(token: str, want: str = "") -> tuple:
+    """调 parse_token 判拒：返回 (是否被拒, 错误文本)。"""
+    try:
+        tokens.parse_token(token)
+        return False, ""
+    except TokenError as e:
+        t = str(e)
+        return (want in t), t
+    except Exception as e:                                    # noqa: BLE001
+        return False, "%s: %s" % (type(e).__name__, e)
+
+
+# ---------------------------------------------------------------- 旧实现（红基线用）
+def _old_parse_token(token: str):
+    """改动前的实现原文——仅用于 --head-baseline 的判别力自证，不参与生产。"""
+    parts = (token or "").strip().split(".")
+    if len(parts) != 4 or parts[0] != tokens.PREFIX:
+        raise TokenError("令牌格式非法（应为 mdcg1.<role>.<token_id>.<secret>）")
+    _, role, token_id, secret = parts
+    if not role or not token_id or not secret:
+        raise TokenError("令牌字段缺失")
+    return role.lower(), token_id, secret
+
+
+# 合成件：secret 刻意含大写（与 token_urlsafe 的真实产物同分布），用来把「只认小写」
+# 的适用面钉在 role/token_id 两段上，而不是顺手把 secret 也收紧。值里带 `dummy`/`fake`
+# 标记是**发版门禁的既有约定**（scripts/check_publish_artifact.py::FAKE_TOKEN_MARKERS）：
+# 测试里的合成凭据必须一眼可辨为假值，否则 R1 凭据面会把本文件判成真实泄露（本批次首跑
+# 实测命中 APIKEY_LITERAL + TOKEN_MDCG 两条，即按该约定改正而成现在这样）。
+DUMMY_SECRET_UC = "Fake-Dummy-aB3xY9zQ7wV1uT5sR2pN8mL4kJ6"
+HEX_ID = "9f3a2b8c7d4e"                                        # token_hex(6) 形态
+
+
+def _tok(role: str, tid: str, secret: str = None) -> str:
+    """拼一条令牌：经 make_token 而非字面量——测试源码里不留「像真凭据」的整串。"""
+    return tokens.make_token(role, tid, secret or DUMMY_SECRET_UC)
+
+
+def g1_allow():
+    print("\n[G1] 放行面：合法令牌与含大写 secret 的令牌都通过")
+    good = _tok("designer", "tk_" + HEX_ID)
+    role, token_id, secret = tokens.parse_token(good)
+    ok(role == "designer" and token_id == "tk_" + HEX_ID and secret == DUMMY_SECRET_UC,
+       "G1a 合法令牌原样通过（role/token_id/secret 都不改写）")
+    ok(secret == DUMMY_SECRET_UC and any(c.isupper() for c in secret),
+       "G1b secret 含大写仍然通过（base64url 必含大写，不得误伤）",
+       "样例 secret 大写字母数=%d" % sum(1 for c in secret if c.isupper()))
+    ok(tokens.parse_token(_tok("guest", "tk_" + "0123456789ab"))[0] == "guest",
+       "G1c 另一角色同样通过（避免只对 designer 生效的伪断言）")
+
+
+def g2_id_uppercase():
+    print("\n[G2] token_id 含大写 → 拒（受理面比识别面宽的那个洞）")
+    for label, tid in (("TK_ 前缀大写", "TK_" + HEX_ID),
+                       ("全大写 hex", "tk_" + HEX_ID.upper()),
+                       ("混合大小写", "tk_9f3a2B8c7d4e")):
+        hit, err = _rejects(_tok("designer", tid), want="小写")
+        ok(hit, "G2 token_id %s → 拒且文案点明「小写」" % label, err)
+    ok(tokens.parse_token(_tok("designer", "tk_" + HEX_ID))[1] == "tk_" + HEX_ID,
+       "G2 正对照：同一形态换成小写即通过（拒的是大小写，不是 tk_ 前缀）")
+
+
+def g3_role_uppercase():
+    print("\n[G3] role 含大写 → 拒（改动前 role.lower() 静默接受）")
+    for label, role in (("全大写", "DESIGNER"), ("首字母大写", "Designer"),
+                        ("别名大写", "VERIFIER")):
+        hit, err = _rejects(_tok(role, "tk_" + HEX_ID), want="小写")
+        ok(hit, "G3 role %s → 拒且文案点明「小写」" % label, err)
+    ok(tokens.parse_token(_tok("designer", "tk_" + HEX_ID))[0] == "designer",
+       "G3 正对照：全小写 role 通过且不被改写")
+
+
+def g4_prefix():
+    print("\n[G4] 前缀含大写 → 拒（既有判据，钉住别被后续重构放松）")
+    hit, err = _rejects(_tok("designer", "tk_" + HEX_ID).replace("mdcg1", "MDCG1", 1), want="格式非法")
+    ok(hit, "G4a 前缀 MDCG1 → 拒", err)
+    hit2, err2 = _rejects(_tok("designer", "tk_" + HEX_ID).replace("mdcg1", "Mdcg1", 1), want="格式非法")
+    ok(hit2, "G4b 前缀 Mdcg1 → 拒", err2)
+    ok(tokens.PREFIX == tokens.PREFIX.lower() and tokens.PREFIX == "mdcg1",
+       "G4c PREFIX 常量本身即小写（前缀大小写敏感的前提）", tokens.PREFIX)
+
+
+def g5_end_to_end():
+    print("\n[G5] 端到端：真令牌库上，合法令牌过闸、大写变形令牌在形态层即拒")
+    root = tempfile.mkdtemp(prefix="mdcg_toklower_")
+    tf = os.path.join(root, "_tokens.json")
+    try:
+        rec = tokens.issue("designer", path=tf)
+        tok = rec["token"]
+        p = tokens.verify_token(tok, path=tf)
+        ok(p.role == "designer", "G5a 合法令牌 verify_token 通过（role=%s）" % p.role)
+        role, tid, sec = tokens.parse_token(tok)
+        up_id = tokens.make_token(role, tid.upper(), sec)
+        try:
+            tokens.verify_token(up_id, path=tf)
+            ok(False, "G5b 大写 token_id 的变形令牌必须被拒", "竟然通过了")
+        except TokenError as e:
+            ok("小写" in str(e), "G5b 大写 token_id 变形 → TokenError 且文案指向形态（非下游软失败）", str(e))
+        up_role = tokens.make_token(role.upper(), tid, sec)
+        try:
+            tokens.verify_token(up_role, path=tf)
+            ok(False, "G5c 大写 role 的变形令牌必须被拒", "竟然通过了")
+        except TokenError as e:
+            ok("小写" in str(e), "G5c 大写 role 变形 → TokenError 同上", str(e))
+        msg = _reject_text(up_id)
+        ok("小写" in msg and "不存在" not in msg and "不匹配" not in msg,
+           "G5d 拒因是形态层（不含「令牌不存在/密钥不匹配」这类下游软失败文案）", msg)
+    finally:
+        shutil.rmtree(root, ignore_errors=True)
+
+
+def _reject_text(token: str) -> str:
+    """取原始错误文本（不做 must-contain 判据），供 G5d 反向核对。"""
+    try:
+        tokens.parse_token(token)
+        return "(未被拒)"
+    except TokenError as e:
+        return str(e)
+
+
+def g6_issuer():
+    print("\n[G6] 生成面自证：大写形态没有合法来源（推论的**前提**）")
+    hexes = [secrets.token_hex(6) for _ in range(64)]
+    ok(all(re.fullmatch(r"[0-9a-f]{12}", h) for h in hexes),
+       "G6a secrets.token_hex(6) 只产小写 hex（64 次采样零违例）",
+       [h for h in hexes if not re.fullmatch(r"[0-9a-f]{12}", h)][:3])
+    ok(all(k == k.lower() for k in ROLE_SPECS),
+       "G6b ROLE_SPECS 全部键为小写（签发面 role 取值域即小写）", sorted(ROLE_SPECS))
+    # 签发面另有一层归一：issue 经 normalize_role 把小写化做在「我方自己发」这一侧。
+    # 这不算「认大写」——产出物恒为小写；受理面收的是外部来的串，没有这层信任。
+    # 结构断言（不写整串字面量：测试源码里不留「像真凭据」的串，见 DUMMY_SECRET_UC 处注释）
+    ok(tokens.make_token("designer", "tk_" + HEX_ID, DUMMY_SECRET_UC).split(".") ==
+       [tokens.PREFIX, "designer", "tk_" + HEX_ID, DUMMY_SECRET_UC],
+       "G6c make_token 是纯拼接（四段原样，不在拼接层做大小写变换）")
+    root = tempfile.mkdtemp(prefix="mdcg_toklower_iss_")
+    try:
+        tok = tokens.issue("DESIGNER", path=os.path.join(root, "_tokens.json"))["token"]
+        ok(tok.startswith("mdcg1.designer."),
+           "G6d 即便调用方传大写 role，issue 产出仍是小写（签发面归一生效处）", tok[:24])
+    finally:
+        shutil.rmtree(root, ignore_errors=True)
+
+
+def _hooks_rules() -> list:
+    """从 src/hooks.ts 源码里取出现行的 `/…/g` 字面（JS 与 Python 在这些构造上同义）。"""
+    repo = os.path.dirname(os.path.dirname(os.path.abspath(__file__)))
+    src = io.open(os.path.join(repo, "src", "hooks.ts"), encoding="utf-8").read().splitlines()
+    out = []
+    for i, line in enumerate(src, 1):
+        m = re.search(r"re:\s*/(.+)/[a-z]*\s*,", line)
+        if m:
+            out.append((i, m.group(1), line))
+    return out
+
+
+def g7_detection_face():
+    print("\n[G7] 口径面：识别面**仍然**宽、受理面已窄（不是两面都收紧）")
+    repo = os.path.dirname(os.path.dirname(os.path.abspath(__file__)))
+    pol = json.loads(io.open(os.path.join(repo, "data", "policy.json"), encoding="utf-8").read())
+    forb = pol["forbidden"]
+    vals = list(forb.values()) if isinstance(forb, dict) else list(forb)
+    ok(any(v.strip() == r"\btk_[0-9a-f]{8,}\b" for v in vals),
+       "G7a 禁表 id 规则原样保留（未顺手加 A-F / re.I——那会把「只认小写」变成误报源）")
+    ok(any("mdcg1" in v for v in vals),
+       "G7b 禁表全形态令牌规则原样保留")
+    ok(all("(?i)" not in v for v in vals if "tk_" in v),
+       "G7c 令牌相关禁用规则不带 (?i)（大小写敏感是刻意的）")
+    rules = _hooks_rules()
+    full = [(ln, p) for ln, p, _ in rules if "mdcg1" in p]
+    bare = [(ln, p) for ln, p, _ in rules if "tk_" in p and "mdcg1" not in p]
+    ok(len(full) == 1 and len(bare) == 1,
+       "G7d hooks.ts 恰好各有一条全形态/裸 id 令牌规则（行号=%s）"
+       % ([ln for ln, _ in full] + [ln for ln, _ in bare]))
+    if not full or not bare:
+        return
+    up_tok = _tok("DESIGNER", ("tk_" + HEX_ID).upper(), DUMMY_SECRET_UC.upper())
+    lo_tok = _tok("designer", "tk_" + HEX_ID)
+    ok(re.search(full[0][1], up_tok) is not None and re.search(full[0][1], lo_tok) is not None,
+       "G7e 插件全形态规则**行为上宽**：含大写的令牌也整条命中（拦得住）",
+       full[0][1])
+    ok(re.search(bare[0][1], "tk_" + HEX_ID) is not None,
+       "G7f 插件裸 id 规则匹配小写 hex id", bare[0][1])
+    ok(re.search(bare[0][1], "tk_" + HEX_ID.upper()) is None,
+       "G7g 插件裸 id 规则**有意**不匹配大写 hex id（识别面固有缺口＝本批次修的另一半）",
+       bare[0][1])
+    # 缺口闭合：识别面漏掉的大写形态，受理面必须拒 ⇒ 两面组合后无缝隙。
+    # 反过来说，若受理面像改动前那样认大写，G7g 的形态就是一条真的凭据通道。
+    hit, _ = _rejects(_tok("designer", "tk_" + HEX_ID.upper()))
+    ok(hit, "G7h 识别面漏（大写 hex）⇔ 受理面拒：不存在「检测漏 + 受理收」的缝隙")
+
+
+def g8_three_faces():
+    """三面口径（2026-09-28 使用者补裁）：入参面宽容、令牌面从严、写面统一小写。
+
+    裁定原文：「已有测试把大写归一当预期行为。大写也转小写识别，以后写统一小写，
+    现有的大写内容就不动了。」故本组**同时**钉住三件事——G8a/G8b 是「不要顺手收紧入参面」
+    （收紧会打断存量语义与 `test_p46_unit_scope.py` 的 C2），G8c 是「令牌面照旧拒」
+    （批次79 的裁定不被本组软化），G8e 是「存量断言不许被删」。
+    """
+    print("\n[G8] 三面口径：入参面宽容 / 令牌面从严 / 写面统一小写")
+    spec = tokens.role_spec("RECORD")                      # 大写 role 名照常解析
+    ok(spec.get("clearance_cap") is not None or isinstance(spec, dict),
+       "G8a 入参面宽容：role_spec('RECORD') 照常解析（大写经 strip+lower+别名归一）")
+    ok(tokens.normalize_role("RECORD") == "record"
+       and tokens.normalize_role(" ReCorder ") == "record",
+       "G8b 入参面宽容：'RECORD' / ' ReCorder ' 均归一为 record（别名 + 空白一并归一）")
+    from .security import Principal as _P
+    owner = _P(role="designer", actor="t", can_write=True, can_admin=True, clearance="secret")
+    narrowed = tokens.narrowed_principal(owner, "RECORD")
+    ok(narrowed.unit == "record" and narrowed.can_admin is False and owner.can_admin is True,
+       "G8c 大写 as_unit 只减不增：unit=record、can_admin 恒 False（无提权面）")
+    hit, err = _rejects(_tok("RECORD", "tk_" + HEX_ID), want="小写")
+    ok(hit, "G8d 令牌面从严（对照）：同为大写 role 的**令牌字符串**被拒——两面有意不同",
+       err)
+    src = io.open(os.path.join(os.path.dirname(os.path.dirname(os.path.abspath(__file__))),
+                               "md_cg", "test_p46_unit_scope.py"), encoding="utf-8").read()
+    ok("大小写归一（RECORD -> record）" in src,
+       "G8e 存量不迁移：test_p46_unit_scope.py 的 C2 存量断言仍在（口径的既有凭据未被改掉）")
+    tok = tokens.issue("designer", path=os.path.join(tempfile.mkdtemp(prefix="mdcg_cap_"),
+                                                     "_tokens.json"))["token"]
+    parts = tok.split(".")
+    ok(parts[1] == parts[1].lower() and parts[2] == parts[2].lower(),
+       "G8f 写面统一小写：issue 新签发的 role/token_id 段恒小写（以后写一律小写）")
+
+
+def _run_groups() -> int:
+    _PASS.clear(); _FAIL.clear()
+    for g in (g1_allow, g2_id_uppercase, g3_role_uppercase, g4_prefix, g5_end_to_end,
+              g6_issuer, g7_detection_face, g8_three_faces):
+        g()
+    return len(_FAIL)
+
+
+def main() -> int:
+    if sys.stdout.encoding and sys.stdout.encoding.lower().startswith("cp"):
+        sys.stdout.reconfigure(encoding="utf-8", errors="replace")
+    base = "--head-baseline" in sys.argv
+    if base:
+        print("!! 红基线模式：parse_token 临时替换回改动前实现（role.lower()、不查 token_id 形态）")
+        print("   期望 G2/G3/G5/G8d 转红\n")
+        tokens.parse_token = _old_parse_token
+        globals()["tokens"] = tokens
+    groups = (g1_allow, g2_id_uppercase, g3_role_uppercase, g4_prefix, g5_end_to_end,
+              g6_issuer, g7_detection_face, g8_three_faces)
+    for g in groups:
+        g()
+    if base:
+        print("\n== 红基线判定：应有失败 ==")
+        print("红基线失败数 = %d（>0 才算断言有判别力）" % len(_FAIL))
+        for f in _FAIL:
+            print("   红:", f)
+        return 0 if _FAIL else 1
+    print("\n令牌形态（只认小写）守卫：%d 通过，%d 失败" % (len(_PASS), len(_FAIL)))
+    return 0 if not _FAIL else 1
+
+
+if __name__ == "__main__":
+    with contextlib.redirect_stdout(sys.stdout):
+        sys.exit(main())