master-skill 0.12.2 → 0.12.4

package/prebuilt/master-xuyun/references/teaching.md

@@ -14,31 +14,31 @@
 
 参禅之法，在于起疑情。话头者，一念未生之际也。参"念佛是谁"，将此疑情抱定不放，不可用意识思量卜度，只管疑去。疑到山穷水尽处，自有桶底脱落之时。
 
-> 出处：【《虚云老和尚开示录》】→ https://fojin.app/texts/65
+> 出处：【《虚云老和尚开示录》】
 
 ### 2. 老实修行，不求奇特
 
 修行无别巧，只要老老实实，脚踏实地。不可贪求神通感应，不可妄想一朝顿悟。古人修行数十年方有消息，今人坐三日便要开悟，此大病也。
 
-> 出处：【《虚云和尚法汇》】→ https://fojin.app/texts/58
+> 出处：【《虚云和尚法汇》】
 
 ### 3. 禅净双修
 
 参禅与念佛，本非对立。参禅者直究心源，念佛者亦须一心不乱。禅净双修，互不妨碍，末法时期尤为契机。参禅念佛，殊途同归，皆归一心。
 
-> 出处：【《虚云老和尚开示录》】→ https://fojin.app/texts/65
+> 出处：【《虚云老和尚开示录》】
 
 ### 4. 持戒为本
 
 修行第一要紧持戒。戒为无上菩提之本。若不持戒而修禅定，犹如煮沙成饭，纵经尘劫，终不能成。出家人以戒为师，在家人亦当守五戒十善。
 
-> 出处：【《虚云和尚法汇》】→ https://fojin.app/texts/65
+> 出处：【《虚云和尚法汇》】
 
 ### 5. 发长远心
 
 修行须发长远心，不可急于求成。古德云："修行如钻木取火，未热先止则前功尽弃。"今人之病，在于心浮气躁，坐不住、忍不下。须知道业未成，生死不了，当生惭愧，发精进心，尽形寿不退转。
 
-> 出处：【《虚云老和尚年谱》】→ https://fojin.app/texts/58
+> 出处：【《虚云老和尚年谱》】
 
 ## 精通经典
 

package/prebuilt/master-xuyun/sources/lengyanjing-excerpts.md

@@ -7,7 +7,7 @@
 
 原典（节选）：
 
-> 阿难，汝今欲知奢摩他路，愿出生死，今复问汝：即时如来举金色臂，屈五轮指，语阿难言，汝今见不？阿难言见。佛言，汝何所见？阿难言，我见如来举臂屈指为光明拳，耀我心目。佛言，汝将谁见？
+> 阿难，汝今欲知奢摩他路，愿出生死，今复问汝：即时如来举金色臂，屈五轮指，语阿难言，汝今见不？阿难言见。佛言，汝何所见？阿难言，我见如来举臂屈指为光明拳，曜我心目。佛言，汝将谁见？
 
 **引用格式：**【《大佛頂首楞嚴經》卷一，T19n0945】→ https://fojin.app/texts/65
 

package/prebuilt/master-zhiyi/meta.json

@@ -135,7 +135,7 @@
     },
     {
       "keys": ["一心三观", "三谛", "空假中"],
-      "content": "一空一切空，无假无中而不空，总空观也；一假一切假，无空无中而不假，总假观也；一中一切中，无空无假而不中，总中观也。即中论所说不可思议一心三观。於一念心同时观空假中三谛，非次第而修。",
+      "content": "一空一切空，无假中而不空，总空观也。一假一切假，无空中而不假，总假观也。一中一切中，无空假而不中，总中观也。即《中论》所说不可思议一心三观。——於一念心同时观空假中三谛，非次第而修。",
       "source_ref": "T46n1911#卷五上"
     }
   ],

package/prebuilt/master-zhiyi/references/teaching.md

@@ -20,13 +20,13 @@
 
 空、假、中三谛非前后次第，非一非异，三谛互具互融。一空一切空，假中皆空；一假一切假，空中皆假；一中一切中，空假皆中。三谛圆融无碍，即是实相。此为天台教观的理论基石。
 
-> 出处：【《法华玄义》卷二下】→ https://fojin.app/texts/52
+> 出处：【《法华玄义》卷二下】→ https://fojin.app/texts/7889
 
 ### 3. 五时八教判教体系
 
 五时：华严时、阿含时、方等时、般若时、法华涅槃时。八教分化仪四教（顿、渐、秘密、不定）与化法四教（藏、通、别、圆）。以此体系统摄佛陀一代时教，判定诸经深浅先后，法华为纯圆独妙，会三归一。
 
-> 出处：【《法华玄义》卷一上】→ https://fojin.app/texts/52
+> 出处：【《法华玄义》卷一上】→ https://fojin.app/texts/7889
 
 ### 4. 止观双修（一心三观）
 
@@ -46,7 +46,7 @@
 |------|------|------|
 | 《妙法莲华经》 | 天台宗根本经典，开权显实，会三归一 | [阅读原文](https://fojin.app/texts/6513) |
 | 《摩诃止观》 | 天台三大部之一，圆顿止观之集大成 | [阅读原文](https://fojin.app/texts/53) |
-| 《妙法莲华经玄义》 | 天台三大部之一，法华经深义之系统阐发 | [阅读原文](https://fojin.app/texts/52) |
+| 《妙法莲华经玄义》 | 天台三大部之一，法华经深义之系统阐发 | [阅读原文](https://fojin.app/texts/7889) |
 | 《妙法莲华经文句》 | 天台三大部之一，法华经逐句注释 | [阅读原文](https://fojin.app/texts/52) |
 | 《修习止观坐禅法要》（小止观） | 止观入门之作，初学必读 | [阅读原文](https://fojin.app/texts/8085) |
 | 《观音玄义》 | 天台五小部之一，性具善恶之重要出处 | [阅读原文](https://fojin.app/texts/7898) |

package/prebuilt/master-zhiyi/references/voice.md

@@ -92,5 +92,5 @@
 
 - "建议阅读《修习止观坐禅法要》（小止观）作为入门 → [FoJin 原文](https://fojin.app/texts/8085)"
 - "可参考《摩诃止观》深入圆顿止观之理 → [FoJin 原文](https://fojin.app/texts/53)"
-- "关于法华经义理，可详阅《法华玄义》 → [FoJin 原文](https://fojin.app/texts/52)"
+- "关于法华经义理，可详阅《法华玄义》 → [FoJin 原文](https://fojin.app/texts/7889)"
 - "可在 FoJin 词典中查阅相关佛学术语的详解"

package/prebuilt/master-zhiyi/sources/INDEX.md

@@ -7,7 +7,7 @@
 | 文件 | 来源经典 | CBETA | FoJin | 覆盖主题 |
 |---|---|---|---|---|
 | `mohezhiguan-excerpts.md` | 《摩訶止觀》 | T1911 | [53](https://fojin.app/texts/53) | 一念三千、一心三观、二十五方便、十境十乘、六即佛、圆顿止观 |
-| `fahua-xuanyi-excerpts.md` | 《妙法蓮華經玄義》 | T1716 | [52](https://fojin.app/texts/52) | 五重玄义、五时判教、八教、三谛圆融、开权显实、火宅三车 |
+| `fahua-xuanyi-excerpts.md` | 《妙法蓮華經玄義》 | T1716 | [7889](https://fojin.app/texts/7889) | 五重玄义、五时判教、八教、三谛圆融、开权显实、火宅三车 |
 
 ## 引用规范
 

package/prebuilt/master-zhiyi/sources/fahua-xuanyi-excerpts.md

@@ -1,13 +1,13 @@
 # 《妙法蓮華經玄義》关键片段
 
-> 智顗大师说，弟子灌顶记。CBETA ID: T1716。FoJin: https://fojin.app/texts/52
+> 智顗大师说，弟子灌顶记。CBETA ID: T1716。FoJin: https://fojin.app/texts/7889
 > 本文件为教学引用用，节选自 CBETA 公开资料。完整经文请访问 FoJin 或 CBETA。
 
 ## 五重玄义（卷一上）
 
 解经总纲——**释名、辨体、明宗、论用、判教相**。
 
-**引用格式：**【《法華玄義》卷一上，T1716】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷一上，T1716】→ https://fojin.app/texts/7889
 
 **教义要点：**
 - 释名：解经题
@@ -20,11 +20,13 @@
 
 ## 五时判教（卷十上）
 
-原典要义：
+要义（整理，非原文）：
 
-> 佛一代時教，判為五時：華嚴時、阿含時（鹿苑）、方等時、般若時、法華涅槃時。如乳、酪、生酥、熟酥、醍醐五味次第。
+五时：华严时、阿含时（鹿苑）、方等时、般若时、法华涅槃时，配乳、酪、生酥、熟酥、醍醐五味。
 
-**引用格式：**【《法華玄義》卷十上，T1716】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷十上，T1716】→ https://fojin.app/texts/7889
+
+注：上面一句是整理，不是《法华玄义》原文，不可加引号作引文。玄义卷十以五味讨论判教；下列年数是后世天台家的通说。
 
 **教义要点：**
 - **华严时**（21日）：顿说大法，如日出先照高山
@@ -41,7 +43,7 @@
 **化仪四教**（佛说法的方式）：顿、渐、秘密、不定
 **化法四教**（所说内容的深浅）：藏、通、别、圆
 
-**引用格式：**【《法華玄義》卷十上，T1716】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷十上，T1716】→ https://fojin.app/texts/7889
 
 **教义要点：**
 - 化仪如药方（怎么说）
@@ -53,28 +55,29 @@
 
 ---
 
-## 三谛圆融（卷二下）
+## 三谛圆融（卷二）
 
 原典（节选）：
 
-> 即空即假即中，一空一切空，無假無中而不空；一假一切假，無空無中而不假；一中一切中，無空無假而不中。三諦圓融，不縱不橫。
+> 圓三諦者，非但中道具足佛法，真、俗亦然。三諦圓融，一三、三一，如《止觀》中說云云。
 
-**引用格式：**【《法華玄義》卷二下，T1716】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷二，T1716】→ https://fojin.app/texts/7889
 
 **教义要点：**
 - 空、假、中三谛非前后次第
-- 三谛互具互融、一即一切、一切即一
+- 三谛互具互融，一三、三一
+- 玄义此处指向《摩诃止观》详说；「一空一切空……」一段见 `mohezhiguan-excerpts.md` §一心三观
 - 为天台教观的理论基石
 
 ---
 
-## 开权显实（卷一上）
+## 开权显实（卷一）
 
-原典要义：
+原典（节选）：
 
-> 《法華》為眾經之王，開權顯實，會三歸一。
+> 九、開權顯實者，一切諸法莫不皆妙，一色一香無非中道，眾生情隔於妙耳。大悲順物，不與世諍，是故明諸權、實不同。
 
-**引用格式：**【《法華玄義》卷一上，T1716】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷一，T1716】→ https://fojin.app/texts/7889
 
 **教义要点：**
 - "权"：方便权教（三乘、诸经权说）
@@ -87,7 +90,7 @@
 
 ## 火宅三车（引法华经譬喻品）
 
-**引用格式：**【《法華玄義》卷八下引《法華經》卷二，T1716/T0262】→ https://fojin.app/texts/52
+**引用格式：**【《法華玄義》卷八下引《法華經》卷二，T1716/T0262】→ https://fojin.app/texts/7889
 
 **教义要点：**
 - 长者以羊车（声闻）、鹿车（缘觉）、牛车（菩萨）诱子出火宅

package/prebuilt/master-zhiyi/sources/mohezhiguan-excerpts.md

@@ -23,7 +23,7 @@
 
 原典（节选）：
 
-> 一空一切空，无假无中而不空，总空观也；一假一切假，无空无中而不假，总假观也；一中一切中，无空无假而不中，总中观也。即中论所说不可思议一心三观。
+> 一空一切空，无假中而不空，总空观也。一假一切假，无空中而不假，总假观也。一中一切中，无空假而不中，总中观也。即《中论》所说不可思议一心三观。
 
 **引用格式：**【《摩訶止觀》卷五上，T1911】→ https://fojin.app/texts/53
 
@@ -99,10 +99,14 @@
 
 原典（节选）：
 
-> 止觀明靜，前代未聞。智者大師，承南岳之教，在瓦官寺說圓頓止觀。功在漸次，證在圓融。
+> 止观明静，前代未闻。智者，大隋开皇十四年四月二十六日，于荆州玉泉寺，一夏敷扬、二时慈霔……
+>
+> 「圆顿」者，初缘实相，造境即中，无不真实。系缘法界，一念法界，一色一香无非中道。己界及佛界、众生界亦然。……法性寂然名「止」，寂而常照名「观」。虽言初后，无二无别，是名「圆顿止观」。
 
 **引用格式：**【《摩訶止觀》卷一上，T1911】→ https://fojin.app/texts/53
 
+注：第一段是灌顶序，记智者大师于隋开皇十四年（594）在荆州玉泉寺讲出本书。
+
 **教义要点：**
 - "圆顿"区别于渐次、不定三种止观
 - 不历次第，初心即观实相

package/tools/verify_sources.py

@@ -505,6 +505,301 @@ def classify_frontmatter_fojin_ids(
     return mismatched, sorted(unknown)
 
 
+_DOC_CITATION = re.compile(r"【([^】]*)】")
+_DOC_FOJIN_LINK = re.compile(r"https://fojin\.app/texts/([0-9]+)")
+_DOC_CBETA_ID = re.compile(r"(?<![0-9A-Za-z])([TXJ])(?:[0-9]{1,3}n)?(B?[0-9]{3,5})[a-z]?(?![0-9A-Za-z])")
+_DOC_TEMPLATE = re.compile(r"\{|卷N|[A-Za-z][xX]{3,}")
+
+
+def _cbeta_work(cid: str) -> tuple[str, str] | None:
+    """`T33n1716` / `T1716` → ("T", "1716")，经号去零；不是 CBETA 号 → None。"""
+    m = _DOC_CBETA_ID.fullmatch(cid.strip())
+    if not m:
+        return None
+    number = m.group(2)
+    return m.group(1), ("B" + str(int(number[1:]))) if number.startswith("B") else str(int(number))
+
+
+def collect_doc_citation_links() -> list[tuple[str, str, list[str], str | None]]:
+    """(位置, text_id, 引文里的 CBETA 号, 引文书名)：人设文档里每个后面同一行跟着
+    FoJin 数字链接的引文块。
+
+    只认同一行、且在下一个引文块之前的链接。第一次核查用 120 字符窗口，把
+    master-yinguang 一条没有链接的引文和两行之后表格里《佛說阿彌陀經》的链接
+    配成了一对。格式模板（`{title}`、`卷N`、`Wxxxxx`）不是引文，跳过。
+    """
+    pairs: list[tuple[str, str, list[str], str | None]] = []
+    base = Path(PREBUILT_DIR)
+    files = sorted(base.glob("*/SKILL.md")) + sorted(base.glob("*/references/*.md")) + sorted(base.glob("*/sources/*.md"))
+    for path in files:
+        where = path.relative_to(base).as_posix()
+        for number, line in enumerate(path.read_text(encoding="utf-8").splitlines(), 1):
+            for block in _DOC_CITATION.finditer(line):
+                if _DOC_TEMPLATE.search(block.group(1)):
+                    continue
+                rest = line[block.end():]
+                following = _DOC_CITATION.search(rest)
+                link = _DOC_FOJIN_LINK.search(rest[: following.start()] if following else rest)
+                if not link:
+                    continue
+                ids = [m.group(0) for m in _DOC_CBETA_ID.finditer(block.group(1))]
+                title = re.search(r"《([^》]+)》", block.group(1))
+                pairs.append((f"{where}:{number}", link.group(1), ids, title.group(1) if title else None))
+    return pairs
+
+
+def classify_doc_citation_links(
+    pairs: list[tuple[str, str, list[str], str | None]], records: dict[str, dict | None]
+) -> tuple[list[tuple[str, str, str]], list[str]]:
+    """哪些文档链接打开的不是引文所说的那部书；FoJin 没给出记录的记为未知。
+
+    比两样：链接文本的经号是否是引文里的某个号，书名（截掉「·品名」）是否与
+    `title_zh` 读音对得上（`titles_agree`）。
+    """
+    mismatched: list[tuple[str, str, str]] = []
+    unknown: list[str] = []
+    for where, tid, ids, title in pairs:
+        record = records.get(tid)
+        if not record:
+            unknown.append(where)
+            continue
+        problems = []
+        linked = record.get("cbeta_id")
+        wanted = {_cbeta_work(c) for c in ids} - {None}
+        if wanted and linked and _cbeta_work(str(linked)) not in wanted:
+            problems.append(f"texts/{tid} 是 {linked}，不是 {'/'.join(ids)}")
+        linked_title = record.get("title_zh")
+        if title and linked_title:
+            book = re.split(r"[·・‧〈<]", title, maxsplit=1)[0].strip()
+            if book and titles_agree(book, str(linked_title)) is False:
+                problems.append(f"《{title}》对不上 texts/{tid} 的《{linked_title}》")
+        if problems:
+            mismatched.append((where, tid, "；".join(problems)))
+    return mismatched, unknown
+
+
+# Step 3f：摘录里的「原典」引文是不是所引那一卷的原文。
+#
+# 前面几步核经号、卷号、题名和链接，都看不见引文本身。2026-09-15 逐句比对
+# `sources/*-excerpts.md` 与 lore_triggers：63 段里 19 段有分句不在所引的那一卷，
+# 其中「宁起有见如须弥山」挂在《大智度论》名下、四法界挂在《五教章》名下、
+# 《摩诃止观》序文写错了讲经的寺名，而人设把这些当原文引给用户。
+
+CBETA_JUANS_URL = "https://cbdata.dila.edu.tw/stable/juans"
+# 引文没标卷次时，卷数不超过此数的书整部读；更长的记为未知，请补卷次。
+EXCERPT_WHOLE_WORK_MAX_JUANS = 30
+# 短于此数的分句（「第七」「华严经」）哪里都可能出现，不拿来判对错。
+EXCERPT_MIN_CLAUSE = 4
+
+_HAN = re.compile(r"[㐀-鿿豈-﫿]")
+_HAN_RUN = re.compile(r"[㐀-鿿豈-﫿]+")
+_CN_DIGITS = {"〇": 0, "零": 0, "一": 1, "二": 2, "三": 3, "四": 4, "五": 5, "六": 6, "七": 7, "八": 8, "九": 9}
+_READINGS: dict[str, frozenset[str]] = {}
+
+
+def _chinese_number(text: str) -> int | None:
+    """「五」「二十一」「一百零八」「一一二」「31」→ 整数；认不出 → None。"""
+    if text.isdigit():
+        return int(text)
+    if text and all(ch in _CN_DIGITS for ch in text):
+        return int("".join(str(_CN_DIGITS[ch]) for ch in text))
+    total, digit = 0, 0
+    for ch in text:
+        if ch in _CN_DIGITS:
+            digit = _CN_DIGITS[ch]
+        elif ch in "十百":
+            total += (digit or 1) * (10 if ch == "十" else 100)
+            digit = 0
+        else:
+            return None
+    return total + digit or None
+
+
+def cited_juan(detail: str) -> int | None:
+    """引文里「卷五上」「卷31」「卷5·易行品」的卷次；没写或是区间（卷五至卷十、卷3-4）→ None。"""
+    match = re.search(r"卷([〇零一二三四五六七八九十百0-9]+)", detail)
+    if not match or re.match(r"[上中下]?\s*(?:至|[-–~～、])", detail[match.end():]):
+        return None
+    return _chinese_number(match.group(1))
+
+
+def _cbeta_api_work(cid: str) -> str | None:
+    """CBETA API 的 work 参数：`T46n1911` / `T1911` → `T1911`，`J36nB348` → `JB348`。"""
+    parts = _cbeta_work(cid)
+    if not parts:
+        return None
+    canon, number = parts
+    return canon + (number if number.startswith("B") else number.zfill(4))
+
+
+def collect_excerpt_quotes() -> list[tuple[str, str, str, int | None]]:
+    """(位置, 引文, CBETA 号, 卷次)：摘录文件里每个「原典」块，与每条 source_ref
+    是 CBETA 号的 lore_triggers。
+
+    块的形状是一行以「原典」开头的标签、若干 `>` 行、再一行带【《书名》卷N，经号】
+    的「引用格式」。标成「要义」之类的整理文字不是引文，不收。lore 条目只取「——」
+    之前的部分：CONTRIBUTING §6 允许在原文后用「——」接一句浅释。
+    """
+    base = Path(PREBUILT_DIR)
+    quotes: list[tuple[str, str, str, int | None]] = []
+    for path in sorted(base.glob("*/sources/*-excerpts.md")):
+        where = path.relative_to(base).as_posix()
+        label_line, lines = 0, []
+        for number, line in enumerate(path.read_text(encoding="utf-8").splitlines(), 1):
+            if line.startswith("原典"):
+                label_line, lines = number, []
+            elif not label_line:
+                continue
+            elif line.startswith(">"):
+                lines.append(line[1:].strip())
+            elif line.startswith("#"):
+                label_line, lines = 0, []
+            elif "引用格式" in line:
+                citation = _DOC_CITATION.search(line)
+                cid = _DOC_CBETA_ID.search(citation.group(1)) if citation else None
+                if cid and any(lines):
+                    quotes.append((f"{where}:{label_line}", "\n".join(lines), cid.group(0), cited_juan(citation.group(1))))
+                label_line, lines = 0, []
+    for path in sorted(base.glob("*/meta.json")):
+        where = path.relative_to(base).as_posix()
+        entries = json.loads(path.read_text(encoding="utf-8")).get("lore_triggers") or []
+        for index, entry in enumerate(entries):
+            cid, _, anchor = str(entry.get("source_ref") or "").partition("#")
+            if _cbeta_api_work(cid):
+                quote = str(entry.get("content") or "").split("——", 1)[0]
+                quotes.append((f"{where}:lore_triggers[{index}]", quote, cid, cited_juan(anchor)))
+    return quotes
+
+
+def cbeta_juan_plain_text(html: str) -> str:
+    """`/stable/juans` 返回的 HTML → 正文。
+
+    校勘注在末尾的 footnote 区，先切掉：注里的异读（如「含【甲】」）不是这一卷
+    的正文，不能让一段改写的引文靠它对上。
+    """
+    body = re.split(r"<div[^>]*class=['\"][^'\"]*footnote", html, maxsplit=1)[0]
+    return re.sub(r"<[^>]+>", "", body)
+
+
+def fetch_cbeta_juan_count(work: str) -> int | None:
+    """CBETA 记这部书有几卷；问不到记 None（未知，不是不符）。"""
+    import urllib.error
+    import urllib.parse
+    import urllib.request
+
+    url = f"{CBETA_WORKS_URL}?{urllib.parse.urlencode({'work': work})}"
+    try:
+        with urllib.request.urlopen(url, timeout=CBETA_TIMEOUT) as resp:
+            results = json.loads(resp.read().decode("utf-8")).get("results") or []
+        return int(results[0]["juan"]) if results else None
+    except (urllib.error.URLError, OSError, ValueError, KeyError, TypeError, AttributeError):
+        return None
+
+
+def fetch_cbeta_juan_text(work: str, juan: int) -> str | None:
+    """CBETA 某部某卷的正文；问不到记 None（未知，不是不符）。"""
+    import urllib.error
+    import urllib.parse
+    import urllib.request
+
+    url = f"{CBETA_JUANS_URL}?{urllib.parse.urlencode({'work': work, 'juan': juan})}"
+    try:
+        with urllib.request.urlopen(url, timeout=CBETA_TIMEOUT) as resp:
+            results = json.loads(resp.read().decode("utf-8")).get("results") or []
+    except (urllib.error.URLError, OSError, ValueError, AttributeError):
+        return None
+    html = "".join(r for r in results if isinstance(r, str))
+    return cbeta_juan_plain_text(html) if html else None
+
+
+def quote_clauses(quote: str) -> list[str]:
+    """按标点、省略号切成分句；不足 EXCERPT_MIN_CLAUSE 个汉字的不收。"""
+    return [run for run in _HAN_RUN.findall(quote) if len(run) >= EXCERPT_MIN_CLAUSE]
+
+
+def _readings(text: str) -> list[frozenset[str]]:
+    """逐个汉字的全部读音，不看上下文：繁简同音即对得上，与 titles_agree 同理。"""
+    from pypinyin import Style, pinyin
+
+    out: list[frozenset[str]] = []
+    for ch in _HAN.findall(text):
+        if ch not in _READINGS:
+            _READINGS[ch] = frozenset(pinyin(ch, style=Style.NORMAL, heteronym=True)[0])
+        out.append(_READINGS[ch])
+    return out
+
+
+def _reading_index(text: str) -> tuple[list[frozenset[str]], dict[str, list[int]]]:
+    sequence = _readings(text)
+    positions: dict[str, list[int]] = {}
+    for i, readings in enumerate(sequence):
+        for reading in readings:
+            positions.setdefault(reading, []).append(i)
+    return sequence, positions
+
+
+def _clause_found(clause: str, index: tuple[list[frozenset[str]], dict[str, list[int]]]) -> bool:
+    wanted = _readings(clause)
+    sequence, positions = index
+    starts: set[int] = set()
+    for reading in wanted[0]:
+        starts.update(positions.get(reading, ()))
+    return any(
+        i + len(wanted) <= len(sequence) and all(w & sequence[i + k] for k, w in enumerate(wanted))
+        for i in starts
+    )
+
+
+def excerpt_fascicles(juan: int | None, total: int | None) -> list[int] | None:
+    """该读哪几卷。标了卷读那一卷；没标而书不长读整部；否则 None（没法核）。
+
+    标的卷超出全书卷数时返回 []：那是卷次写错了，不是没法核。
+    """
+    if not total:
+        return None
+    if juan is not None:
+        return [juan] if 1 <= juan <= total else []
+    return list(range(1, total + 1)) if total <= EXCERPT_WHOLE_WORK_MAX_JUANS else None
+
+
+def classify_excerpt_quotes(
+    quotes: list[tuple[str, str, str, int | None]],
+    juan_counts: dict[str, int | None],
+    juan_texts: dict[tuple[str, int], str | None],
+) -> tuple[list[tuple[str, str, list[str]]], list[tuple[str, str]]]:
+    """哪些引文有分句不在所引的卷里；没法核的记为未知，不算错。
+
+    逐分句找，不要求整段连续：《金师子章》本文在 T45n1880 里与净源注文逐句交错，
+    照抄本文整段是找不到的。按读音比，繁简同音即对得上。已知边界：同音字替换
+    看不出来（「不妄不愚」对得上「不忘不愚」）；这道检查抓的是改写、增字、换序
+    与张冠李戴，不是错别字。
+    """
+    mismatched: list[tuple[str, str, list[str]]] = []
+    unknown: list[tuple[str, str]] = []
+    indexes: dict[tuple[str, tuple[int, ...]], tuple[list[frozenset[str]], dict[str, list[int]]]] = {}
+    for where, quote, cid, juan in quotes:
+        work = _cbeta_api_work(cid)
+        total = juan_counts.get(work) if work else None
+        fascicles = excerpt_fascicles(juan, total)
+        if fascicles is None:
+            unknown.append((where, f"没标卷次，{work} 共 {total} 卷" if total else f"CBETA 没有返回 {cid} 的卷数"))
+            continue
+        if not fascicles:
+            mismatched.append((where, f"{work} 只有 {total} 卷，引文标的是卷{juan}", []))
+            continue
+        texts = [juan_texts.get((work, j)) for j in fascicles]
+        if any(text is None for text in texts):
+            unknown.append((where, f"CBETA 没有返回 {work} 的卷文"))
+            continue
+        key = (work, tuple(fascicles))
+        if key not in indexes:
+            indexes[key] = _reading_index("\n".join(texts))
+        missing = [clause for clause in quote_clauses(quote) if not _clause_found(clause, indexes[key])]
+        if missing:
+            mismatched.append((where, f"{work} 卷{juan}" if juan is not None else work, missing))
+    return mismatched, unknown
+
+
 def verify_ids(bridge, cbeta_map: dict[str, list[str]], titles: dict[str, str]) -> dict[str, dict]:
     """Verify all CBETA IDs and return {full_cbeta_id: {text_id, short_id, title, ...}}.
 
@@ -768,6 +1063,48 @@ def _run_legacy_link_verification(*, fix: bool) -> int:
     if not fm_mismatched and not fm_unknown:
         print("  Every frontmatter fojin_text_id matches what FoJin resolves")
 
+    # Step 3e: 人设文档里引文后面的 FoJin 链接打开的是不是那部书（见 collect_doc_citation_links）。
+    print("\n[3e/4] Checking FoJin links after citations in persona docs...")
+    doc_pairs = collect_doc_citation_links()
+    doc_records: dict[str, dict | None] = {}
+    for tid in sorted({tid for _, tid, _, _ in doc_pairs}, key=int):
+        try:
+            record = bridge.get_text(tid)
+        except Exception:  # noqa: BLE001 — 查不到是「未知」，不是「不符」
+            record = None
+        doc_records[tid] = record if isinstance(record, dict) and record else None
+    doc_mismatched, doc_unknown = classify_doc_citation_links(doc_pairs, doc_records)
+    for where, tid, problem in doc_mismatched:
+        print(f"    [WRONG] {where}: {problem}")
+    if doc_unknown:
+        print(f"  FoJin returned nothing for {len(doc_unknown)} doc link(s) — "
+              "unknown, not wrong: " + ", ".join(doc_unknown))
+    if not doc_mismatched and not doc_unknown:
+        print(f"  All {len(doc_pairs)} citation links in persona docs open the cited work")
+
+    # Step 3f: 摘录里的「原典」引文是否真在所引那一卷（见 classify_excerpt_quotes）。
+    print("\n[3f/4] Checking excerpt quotations against the cited CBETA fascicle...")
+    quotes = collect_excerpt_quotes()
+    quote_works = sorted({work for work in (_cbeta_api_work(cid) for _, _, cid, _ in quotes) if work})
+    juan_counts = {work: fetch_cbeta_juan_count(work) for work in quote_works}
+    wanted_juans = sorted({
+        (work, fascicle)
+        for _, _, cid, juan in quotes
+        for work in [_cbeta_api_work(cid)]
+        if work
+        for fascicle in (excerpt_fascicles(juan, juan_counts.get(work)) or [])
+    })
+    juan_texts = {key: fetch_cbeta_juan_text(*key) for key in wanted_juans}
+    quote_mismatched, quote_unknown = classify_excerpt_quotes(quotes, juan_counts, juan_texts)
+    for where, cited, missing in quote_mismatched:
+        print(f"    [WRONG] {where}: {cited}" + (f" has no 「{'」「'.join(missing)}」" if missing else ""))
+    if quote_unknown:
+        print(f"  Could not check {len(quote_unknown)} quotation(s) — unknown, not wrong:")
+        for where, reason in quote_unknown:
+            print(f"    {where}: {reason}")
+    if not quote_mismatched and not quote_unknown:
+        print(f"  All {len(quotes)} quotations appear clause by clause in the cited fascicle")
+
     # Step 4: Update URLs
     # Build replacement map: full_cbeta_id -> str(internal_text_id)
     id_replacement_map: dict[str, str] = {}
@@ -812,6 +1149,8 @@ def _run_legacy_link_verification(*, fix: bool) -> int:
     print(f"  CBETA id mismatches:       {len(mismatched)}")
     print(f"  CBETA title mismatches:    {len(title_mismatched)}")
     print(f"  Frontmatter FoJin id mismatches: {len(fm_mismatched)}")
+    print(f"  Doc citation links to another work: {len(doc_mismatched)}")
+    print(f"  Excerpt quotes not in the cited text: {len(quote_mismatched)}")
     if unknown_to_cbeta:
         print(f"  CBETA unreachable for:     {len(unknown_to_cbeta)} (not counted as wrong)")
     if dry_run and all_changes: