Cyrene_v2/internal/services/channelbridge/lane.go

package channelbridge

// 本文件承载入站的**回合车道**（M22 切片 LANEQUEUE）。
//
// 报障现场（主人 2026-10-24）：「群聊消息速率限制似乎会让消息一直排队，导致后面才回复
// 前面的话。」病灶不在模型侧，而在**入站入口把回合跑在了适配器的读循环里**：
// `onMessage` 曾在读循环里**同步**抢全局回合槽（`b.sem`，16 个），槽满的那一刻读循环
// 就停止读 socket —— 心跳不被回应、后续帧不被解析，等一轮跑完再按条重放，于是先回旧话、
// 而且回得晚。本文件把「投递」与「跑回合」拆开，并给每个会话一条自己的车道。
//
//   - **读与回水解耦**：适配器的读循环只投递、不跑回合（`enqueueInbound` 立刻返回），
//     心跳与其它帧因此永远不会被一轮模型调用堵住。全局回合槽（`b.sem`）搬到车道 worker
//     里取，仍然限制「最多 16 个回合同时跑」，但等待发生在线程池里而不是读循环里。
//   - **每会话一条回合车道**：同一会话（群 / 私聊各自键，见 `laneKey`）的回合**串行**且
//     **先来先跑**（车道是一条有界 FIFO + 一个 worker），不同会话可并行。
//   - **陈旧度闸**：轮到某条时它已超龄 ⇒ 丢弃不补答，并留下 WARN + 计数 + 审计。
//   - **背压有界且诚实**：每会话车道深度有界。群聊 / 陌生人满时**在门前拒收这一条**
//     （队列里已有的条目一条都不动）；**主人私聊永不拒收**，只排队（见 offer）。
//
// 本切片**不改「回什么」的语义**：该回的回、该静的仍然静，也没有新增任何「系统繁忙」
// 式回复 —— 丢弃只走审计轨（与 flowgate 的 rate_limited / review_pruned 同一条流水）。
// 静默窗口合并、回合中来了新消息就续跑一轮，属于下一片（M23），不在这里做。
//
// 四条不变量（每条都在 lane_test.go 里有一条断言）：
//
//	① 顺序：同一会话内的回复顺序与到达顺序一致（FIFO 车道 + 单 worker）。
//	② 一致性：一轮内上下文是快照，同一会话绝不会有两个回合同时跑（车道串行；
//	   主人私聊跨平台共用一条 `main` 车道，因为它们都路由进同一个 Web 主会话）。
//	③ 完整性：被丢的只有「超龄」与「背压」两类，两者都留 WARN + 计数 + 审计。
//	④ 最新性：回合上下文在**出队之后**才装配（processFrom 原样保留，见 runLaneItem），
//	   所以一条排队中的消息看到的是它开始那一刻的最新历史，而不是入队时的快照。

import (
	"context"
	"log/slog"
	"sync"
	"time"

	"git.yeij.top/AskaEth/Cyrene_v2/internal/channel/adapter"
	"git.yeij.top/AskaEth/Cyrene_v2/internal/logger"
	"git.yeij.top/AskaEth/Cyrene_v2/internal/runtime/history"
)

const (
	// laneLogSource 是车道的子功能日志来源（AGENTS §10：日志必须标来源）。
	laneLogSource = "services/channelbridge/lane"

	// defaultLaneDepth 是**每会话**车道能排的条目数。取值依据：
	//   - 够吸收一次「连着发几条」的群聊突发（微信/QQ 里 5-8 条连发是常态，
	//     尤其是几个人同时在说话而她正在答上一个问题）；
	//   - 又小到车道永远不会变成「按条补答」的长队伍：一轮 IM 回合（含工具循环）
	//     通常 3-20s，深 8 的车道在最坏情况下意味着约 2-3 分钟的滞后，那时排在后面的
	//     条目大多已过陈旧度闸，多留只会多丢；
	//   - 内存上界随之确定：条目数 ≤ 活跃会话数 × 8，绝不无界增长。
	defaultLaneDepth = 8

	// defaultLaneStaleAfter 是**陈旧度闸**的默认阈值（可经 Options.LaneStaleAfter 覆盖，
	// 见 channelbridge.go）。取值依据：
	//   - 一轮 IM 回合（含工具循环）实测多在 3-20s 这一档，30s ≈ 两倍上限；
	//   - 群聊里超过半分钟的「回答」在用户看来已经是「答上一句」，补它比不补更糟
	//     （正是报障里的「后面才回复前面的话」）；
	//   - 比它更短会误伤正常的「她正在打字」等待（一个人等她回答 10-20s 是正常的）。
	defaultLaneStaleAfter = 30 * time.Second

	// laneDropReasonStale / laneDropReasonOverflow 是两类**唯一**允许的丢弃原因，
	// 进 onRejected 审计轨时用的原因标记（与 flowgate 的 rate_limited /
	// review_pruned / capped 同一口径，面板与排障据此聚合）。
	laneDropReasonStale    = "lane_stale"
	laneDropReasonOverflow = "lane_overflow"

	// ownerLaneBacklogWarn 是主人私聊溢出区的告警水位：越过它就记一条 WARN，
	// 表明「她落后了这么多条主人私聊」—— 这是主人私聊车道的**唯一**可观测上界信号，
	// 它不丢任何一条（主人 2026-10-24 裁定：宁可晚回，不许不回）。
	ownerLaneBacklogWarn = 16
)

// laneItem 是车道上的一条待办：入站消息 + 它的账号适配器 + 已解析出的 actor。
//
// actor 在入口（onMessage）已经解析过一次（结构化判据，不读正文），这里带着走，
// 使陈旧度闸不必重解析，也不必为了判「主人私聊」而多一次会话查询。
type laneItem struct {
	msg       adapter.UnifiedMessage
	a         adapter.PlatformAdapter
	actor     adapter.Actor
	arrivedAt time.Time
}

// lane 是一个会话的回合通道：有界 FIFO + 一个 worker（串行 ⇒ 不变量 ①②）。
//
// neverDrop 只对**主人私聊**车道为真：它满了不拒收，条目改落 spill（溢出区，只排队）。
// spill 恒为空的车道因此不占额外内存。
type lane struct {
	key       string
	ch        chan laneItem
	neverDrop bool
	spill     []laneItem
}

// laneSet 是全部活跃车道的注册表。车道在**空闲时退休**（worker 见队列空即把自己摘掉），
// 因此表的大小只与「此刻有排队/在跑的会话数」相关。
type laneSet struct {
	depth      int
	staleAfter time.Duration
	log        *slog.Logger

	mu              sync.Mutex
	lanes           map[string]*lane
	droppedStale    int64
	droppedOverflow int64
}

// newLaneSet 构造车道注册表；depth / staleAfter 为 0 时取上面的默认值。
func newLaneSet(depth int, staleAfter time.Duration, log *slog.Logger) *laneSet {
	if depth <= 0 {
		depth = defaultLaneDepth
	}
	if staleAfter <= 0 {
		staleAfter = defaultLaneStaleAfter
	}
	if log == nil {
		log = logger.New(logger.Options{})
	}
	return &laneSet{
		depth:      depth,
		staleAfter: staleAfter,
		log:        logger.WithSource(log, laneLogSource),
		lanes:      make(map[string]*lane),
	}
}

// LaneStats 是车道的计数快照：**被丢弃的入站有多少、为什么**（不变量 ③ 的可审计面），
// 加上主人私聊溢出区的当前积压。
type LaneStats struct {
	// ActiveLanes 是此刻有排队或在跑的会话车道数。
	ActiveLanes int
	// DroppedStale 是因陈旧度闸被丢弃的条目累计数（超龄不补答）。
	DroppedStale int64
	// DroppedOverflow 是车道满时**在门前被拒收**的条目累计数。它只可能落在群聊 /
	// 陌生人私聊上：主人私聊车道永不拒收（见 offer 的 neverDrop）。
	DroppedOverflow int64
	// Backlog 是主人私聊溢出区里此刻还排着的条目数（其余车道恒为 0）。
	Backlog int
}

// LaneStats 返回车道计数的快照。它是「丢弃是诚实且有界」的唯一数字答案：
// 日志会滚走，计数不会。
func (b *Bridge) LaneStats() LaneStats {
	if b.lanes == nil {
		return LaneStats{}
	}
	b.lanes.mu.Lock()
	defer b.lanes.mu.Unlock()
	backlog := 0
	for _, l := range b.lanes.lanes {
		backlog += len(l.spill)
	}
	return LaneStats{
		ActiveLanes:     len(b.lanes.lanes),
		DroppedStale:    b.lanes.droppedStale,
		DroppedOverflow: b.lanes.droppedOverflow,
		Backlog:         backlog,
	}
}

// enqueueInbound 把一条**已过流控闸**的入站消息投进它所属会话的车道，并立刻返回 ——
// 这是「读与回水解耦」的全部：适配器的读循环调用它之后马上可以继续读 socket。
//
// 🔴 这就是留给下一片（M23 静默窗口合并）的**入队 seam**：入参是一条**已过闸门的
// prepared item**（Validate/ResolveActor/Admit 都已在本函数的调用方 onMessage 里做完，
// 连同解析结果 actor 一起带进来）。车窗车道头部（laneWorker）只做「等待 + 发车」，
// 绝不在这里做准入判断 —— M23 要把 processFrom 的闸门段再往前抽成 prepareInbound 时，
// 只需在调用方一侧重排，车道本身不用动。
//
// 三件事在这里一次性做完：
//   - 认领车道（没有就建一条并起 worker）；
//   - 入队（群聊/陌生人满则**在门前拒收这一条**并留痕；主人私聊**永不拒收**）；
//   - 与 Stop 的 `wg.Wait` 对齐：`b.wg.Add` 与 `closed` 的判定在同一把 `b.mu` 下，
//     因此 Stop 要么看见这个工作项、要么我们看见 closed 而不入队，二者必居其一。
//
// 锁顺序：全树只有这一处同时取两把锁，顺序恒为 `b.mu` → `lanes.mu`。
func (b *Bridge) enqueueInbound(ctx context.Context, msg adapter.UnifiedMessage, a adapter.PlatformAdapter, actor adapter.Actor) {
	if b.lanes == nil {
		return
	}
	item := laneItem{msg: msg, a: a, actor: actor, arrivedAt: b.now()}
	key := laneKey(msg, actor, a)
	// 主人私聊（私聊 + 主人在场，由 actor 元数据 + 白名单结构化判定）**永不丢弃**：
	// 队列满时落到溢出区只排队（主人 2026-10-24 裁定：「宁可晚回，不许不回」）。
	neverDrop := ownerPrivateLane(msg, actor)

	b.mu.Lock()
	if b.closed {
		b.mu.Unlock()
		b.lanes.log.Debug("bridge closed, inbound not queued",
			"platform", msg.Platform, "channel", msg.ChannelID)
		return
	}
	l, start, rejected := b.lanes.offer(key, item, neverDrop)
	if start {
		b.wg.Add(1)
	}
	b.mu.Unlock()

	if start {
		go b.laneWorker(ctx, l)
	}
	if rejected {
		b.dropInbound(item, laneDropReasonOverflow, "lane queue full")
	}
}

// offer 在**一个临界区**内完成「查/建车道 + 入队」，使 `retireLaneIfIdle` 不可能夹在
// 中间把刚查到、还没写入的车道摘掉（那样条目会落进一条没有 worker 的死车道）。
//
// 队列满时的策略分两档（都不是静默的）：
//   - **主人私聊**（neverDrop）：绝不拒收，落到溢出区 `spill` 里**只排队**，并按
//     ownerLaneBacklogWarn 留一条 WARN —— 一个白名单账号的积压只反映「她落后了」，
//     不构成第三方洪泛面；
//   - **群聊 / 陌生人**：**在门前拒收这一条**（而不是挤掉队列里已有的某条）。队列里
//     的条目因此一条都不会凭空消失 —— 下一片 M23 的 takeAll 依赖这一点；被拒收的那条
//     由调用方留痕（WARN + 计数 + 审计）。
func (s *laneSet) offer(key string, item laneItem, neverDrop bool) (l *lane, start bool, rejected bool) {
	s.mu.Lock()
	defer s.mu.Unlock()
	l = s.lanes[key]
	if l == nil {
		l = &lane{key: key, ch: make(chan laneItem, s.depth), neverDrop: neverDrop}
		s.lanes[key] = l
		start = true
	}
	select {
	case l.ch <- item:
		return l, start, false
	default:
	}
	if l.neverDrop {
		l.spill = append(l.spill, item)
		if len(l.spill) == ownerLaneBacklogWarn {
			s.log.Warn("owner private lane backlog is growing, still queueing",
				"backlog", len(l.spill), "lane", l.key,
				"platform", item.msg.Platform, "channel", item.msg.ChannelID)
		}
		return l, start, false
	}
	return l, start, true
}

// ownerPrivateLane 报告这条消息是否属于「主人私聊」车道 —— 也就是**永不丢弃**的那条。
// 判据与 laneKey 完全同源（私聊 + actor 元数据说他是主人），因此不会出现「键说是主人、
// 丢弃策略说不是」的两套口径。这里绝不读正文：身份只来自 actor 元数据 + 白名单。
func ownerPrivateLane(msg adapter.UnifiedMessage, actor adapter.Actor) bool {
	return !msg.IsGroup() && actor.IsOwner()
}

// nextLaneItem 按 FIFO 取下一条：先把缓冲区取完，再取主人私聊的溢出区（溢出区里的条目
// 一定晚于缓冲区里的，所以顺序仍然是到达顺序）。ok=false 表示此刻真的没有待办。
func (b *Bridge) nextLaneItem(l *lane) (laneItem, bool) {
	select {
	case item := <-l.ch:
		return item, true
	default:
	}
	b.lanes.mu.Lock()
	defer b.lanes.mu.Unlock()
	if len(l.spill) == 0 {
		return laneItem{}, false
	}
	item := l.spill[0]
	copy(l.spill, l.spill[1:])
	l.spill = l.spill[:len(l.spill)-1]
	return item, true
}

// laneWorker 是某会话车道的唯一执行者：串行跑完每一条，队列空了就把车道交还注册表
// （空闲车道不占内存，也不会把「这个人再说话」变慢）。
func (b *Bridge) laneWorker(ctx context.Context, l *lane) {
	defer b.wg.Done()
	for {
		if item, ok := b.nextLaneItem(l); ok {
			b.runLaneItem(ctx, item)
			continue
		}
		// 队列空了才谈退休：摘表与入队用同一把锁，因此「摘下」与「刚有人塞进来」不会
		// 交错成条目丢失（见 retireLaneIfIdle 的说明）。
		if b.retireLaneIfIdle(l) {
			return
		}
		select {
		case <-ctx.Done():
			// 桥停了：把车道摘掉，未处理的条目随进程取消一起作废（Stop 的语义）。
			b.retireLane(l)
			return
		case item := <-l.ch:
			b.runLaneItem(ctx, item)
		}
	}
}

// runLaneItem 跑车道上的一条：先取全局回合槽（**在线程池里等，不在读循环里等**），
// 再过陈旧度闸，最后交给原样的入站流水线。
//
// 陈旧度在**取到槽之后**才判：排队等槽的那段时间同样是「让它等」，必须计入年龄，
// 否则一道繁忙的全局上限会把「等了很久」洗成「刚到」。
func (b *Bridge) runLaneItem(ctx context.Context, item laneItem) {
	select {
	case b.sem <- struct{}{}:
	case <-ctx.Done():
		return
	}
	defer func() { <-b.sem }()

	waited := b.now().Sub(item.arrivedAt)
	if b.staleInbound(item, waited) {
		return
	}
	// 「这条等了多久才开跑」是「她为什么回得晚」在生产日志里最直接的那个答案；
	// 与它同时出现在日志里的 `msg="inbound frame"`（适配器的入站帧 DEBUG）则说明
	// 读循环在等的同时一直在读 —— 两行合起来就是「回合没有堵住心跳」的证据。
	b.lanes.log.Debug("lane turn started",
		"waited", waited.String(),
		"platform", item.msg.Platform, "channel", item.msg.ChannelID,
		"sender", item.msg.SenderID, "group", item.msg.GroupID)
	// 不变量 ④：上下文在这里（出队之后）才装配，因此一轮看到的是最新历史。
	b.processFrom(ctx, item.msg, item.a)
}

// staleInbound 实现陈旧度闸：轮到时已超龄 ⇒ 丢弃不补答，并留 WARN + 计数 + 审计。
// 返回 true 表示这条已被丢弃。waited 由调用方算好（含等全局回合槽的时间）。
func (b *Bridge) staleInbound(item laneItem, waited time.Duration) bool {
	if !laneStaleEligible(item) {
		return false
	}
	if waited <= b.lanes.staleAfter {
		return false
	}
	b.dropInbound(item, laneDropReasonStale, "waited past the staleness threshold")
	return true
}

// laneStaleEligible 报告某条入站是否受陈旧度闸约束。两类**豁免**各有硬理由：
//
//   - **非聊天事件**（notice / request / meta_event / 解析失败兜底，ContentType=action）：
//     它们不产生「回答旧话」这种失真，却是渠道事件留存（design/26 §5）与审计的唯一来源。
//     按年龄丢掉它们只会让留存出现空洞。
//   - **主人私聊**：「回主人私聊」不是对群聊话题的应答，迟到的回答仍然是回答；
//     丢它等于对主人静默，直接违反「该回的回」这条红线。
func laneStaleEligible(item laneItem) bool {
	if item.msg.ContentType == adapter.ContentAction {
		return false
	}
	if !item.msg.IsGroup() && item.actor.IsOwner() {
		return false
	}
	return true
}

// dropInbound 给「被丢弃的入站」留下**三样痕迹**，缺一不可：
//   - 一条带 source 的 WARN（谁、哪个平台/会话/发送者、等了多久、为什么）；
//   - 按原因的累计计数（LaneStats，日志会滚走、计数不会）；
//   - onRejected 审计轨（与 flowgate 的 rate_limited / review_pruned 同一条）。
//
// 它刻意**不**回一条「系统繁忙」：回什么属于回合语义，本切片不动它。
func (b *Bridge) dropInbound(item laneItem, reason, detail string) {
	b.lanes.noteDrop(reason)
	b.lanes.log.Warn("inbound dropped by session lane",
		"reason", reason, "detail", detail,
		"platform", item.msg.Platform, "channel", item.msg.ChannelID,
		"sender", item.msg.SenderID, "message_id", item.msg.MessageID,
		"waited", b.now().Sub(item.arrivedAt).String())
	if b.onRejected != nil {
		b.onRejected(item.msg, reason)
	}
}

// noteDrop 累加某一类丢弃的计数。
func (s *laneSet) noteDrop(reason string) {
	s.mu.Lock()
	defer s.mu.Unlock()
	switch reason {
	case laneDropReasonStale:
		s.droppedStale++
	case laneDropReasonOverflow:
		s.droppedOverflow++
	}
}

// retireLaneIfIdle 在车道已空时把它从注册表摘掉并报告 true（worker 随即退出）。
//
// 它必须与 `offer` 用同一把锁：两者交错的话会出现「offer 拿到车道 → worker 退休并删除 →
// offer 往一条没有 worker 的车道入队」的丢失。入队与「查空」在同一把锁下，就不存在这个窗口。
func (b *Bridge) retireLaneIfIdle(l *lane) bool {
	b.lanes.mu.Lock()
	defer b.lanes.mu.Unlock()
	if len(l.ch) > 0 || len(l.spill) > 0 || b.lanes.lanes[l.key] != l {
		return false
	}
	delete(b.lanes.lanes, l.key)
	return true
}

// retireLane 无条件把车道从注册表摘掉（桥停止时的清理；未处理的条目随取消作废）。
func (b *Bridge) retireLane(l *lane) {
	b.lanes.mu.Lock()
	defer b.lanes.mu.Unlock()
	if b.lanes.lanes[l.key] == l {
		delete(b.lanes.lanes, l.key)
	}
}

// laneKey 决定「哪些消息共用一条车道」，也就是「什么算同一个会话」。
//
//   - **主人私聊**：无论来自哪个平台，都被 inboundTargetFor 路由进同一个 Web 主会话
//     （history.MainSessionID），因此共用一条 `main` 车道 —— 否则两个平台的主人私聊会
//     并发打同一个会话，破坏不变量 ②（一轮内上下文是快照）。
//   - 其余：`<账号名>|<platform>|<channel>|<会话桶>`。账号名进键，使多账号同时收同一个群
//     的消息也各自串行；会话桶复用 adapter.ConversationKey（与流控闸同一口径：群按群号、
//     私聊按发送者），所以「限流认为是一个会话」与「车道认为是一个会话」永远一致。
func laneKey(msg adapter.UnifiedMessage, actor adapter.Actor, a adapter.PlatformAdapter) string {
	if ownerPrivateLane(msg, actor) {
		return "main|" + history.MainSessionID
	}
	name := ""
	if a != nil {
		name = a.Name()
	}
	return name + "|" + adapter.ConversationKey(msg)
}