## 配额重构:废除 Agent 终身额度
原实现在 agents 上放一个 max_rounds/used_rounds 计数器,used_rounds 单调递增、
永不重置 —— 跑满就要管理员手工重置才能再干活。那是把一次性资源模型套在长期
在线的服务上,且并行任务互相抢额度。
改为:
- 唯一被强制的预算是【会话】的往返预算(sessions.max_rounds/used_rounds),
写信时给、对话页里随时改 —— 配额的语义是「这件事值得多少个来回」,
那是任务的属性而不是 Agent 的属性
- agents.default_rounds 只作为「派给这个 Agent 的新任务」的默认值(默认 20)
- agents.used_rounds 降级为纯统计
- 新建会话速率限制(1h/20 条)堵住用 .new 开一串新会话绕过预算;
人类不受限(agentLimiterKey 返回空串即不计量)
## 窄屏适配(用户反馈「窄屏基本不可用」)
原先只有三栏并排:60(导航)+320(列表)+详情,375px 屏上详情被挤到 0。
第一版做成「一次只显示一栏」,用户纠正应当是新页面覆盖老页面并带动画,
于是重做为覆盖式:
- NarrowStack:底层列表始终挂载,详情绝对定位盖在上面。两个好处 ——
列表滚动位置与选中态天然保留;退出动画有东西可播(直接卸载再渲染另一个
组件的话,没有任何一帧能让旧页面往右滑出去)
- 因此必须区分「逻辑上是否打开」与「是否还在 DOM 里」:关闭时先播 200ms
滑出,动画结束才卸载
- 入场用双层 requestAnimationFrame:必须让浏览器至少绘制一帧「在右侧之外」
的状态,否则挂载与 translate-x-0 在同一帧内完成,transition 不触发
- 窄屏专属控件用 useIsNarrow() 条件渲染而非 md:hidden —— 后者只是视觉隐藏,
宽屏用户按 Tab 会聚焦到看不见的返回按钮
- 底部导航 + 抽屉侧栏 + env(safe-area-inset-bottom)
## 工作列表卡片视图(Phase 7.1 最后一项)
中间栏可切列表/卡片。列表答「跟谁在聊」,卡片答「在聊什么、进展如何」:
主题 + 最新一封的发件人与摘要 + 往返预算徽标。
- 两种视图共用同一份数据与同一套动作;归档确认框也共用 —— 归档是破坏性操作,
换个视图就换套确认 UI 只会让人对「自己点了什么」更没底
- 预算徽标在「不限」时不显示(对每张卡片都成立的「0/0」是纯噪声)
- 数据一次取回,不让卡片为每条会话再打一次库
## 修掉的缺陷
- GET /me/sessions 一直 500:ListSessionsFor 的 SELECT 加了预算两列却没加进
Scan,列数不匹配。联系人栏一条数据都拉不到,而错误只是「Failed to list sessions」
- GET /sessions/{id} 忘了填充附件:前端会话视图走的是这个端点,于是 Agent
回信里的附件在 UI 上完全不存在(另一个端点填了但没人调用)
- 插件曾完全没在加载:为了可测在 index.js 里 export 了辅助函数与一个 Map,
而 opencode 把入口模块的每一个导出都当成插件工厂逐个检查,多导出一个 Map
就 "Plugin export is not a function",插件静默失效、邮件全投不进去。
逻辑挪到 lib/relay-dedup.js,并加断言钉住「入口只有 default 导出」
- 同一件事发两封邮件:模型带附件主动回信后,session.idle 又把它最后那段话
自动转了一遍(生产实测 311 与 342 字节各一封)。explicitSends 记录本轮
主动发信,自动转发据此让位;relay_key 幂等管不了这个 —— 那个键保证的是
「同一条消息不转两次」
- SQLite 时间戳只有秒精度:同秒插入的多封邮件排序不确定(实测同秒插 5 封,
顺序由随机 UUID 决定)。「会话里最早那封」(决定联系人身份)与「最后那封」
(决定最新进展)都会取错。NOW() 升到微秒 + mails 的 INSERT 显式传它
(改 schema 默认值只对新库生效,SQLite 没有 ALTER COLUMN)+ 所有
ORDER BY created_at 补 mail_id 兜底
- fillAttachments 从逐封查询改成一次 IN(...):原来是 N+1,200 封的会话打开
要打 200 次库
- repo 层 5 处 rows.Next() 循环补 rows.Err():没有它,读到一半连接断掉会
静默返回部分结果,UI 上表现为「邮件凭空少了几封」
- go:embed 占位页改名 placeholder.html:叫 index.html 会被 Vite 产物覆盖并
提交进去,而它引用的 assets/ 是被忽略的 —— 新克隆打开是白屏
## 回复/转发栏
- 两处都加抄送(可折叠);原邮件带抄送时多一个「回复全部」,回填用
cc_list[].raw 而非重拼 name@path(后者会丢掉会话段)
- 会话视图每张卡片加转发入口:转发之前只存在于单封邮件视图,而人多数时间
待在会话视图里,等于功能在 UI 上找不到
- ReplyBar 的错误从 console.error 改为显示出来:预算耗尽、地址不存在、
速率限制都走这条路,之前点发送毫无反应
## 测试
- repo: 列顺序(三个 SQL 分支)、卡片字段、previewRunes 边界、时间戳亚秒精度、
批量附件查询、速率限制(80 goroutine 断言恰好 20 条通过)
- web: 窄屏布局 16 条结构性断言(覆盖而非分栏、延迟卸载、双层 rAF、
条件渲染而非 md:hidden)
- 插件: 自动转发去重 17 条(含「入口只有 default 导出」不变量)
- install.sh 把插件测试也纳入部署前门禁
206 lines
6.7 KiB
Go
206 lines
6.7 KiB
Go
// Package db 提供数据库连接与方言适配。
|
||
//
|
||
// AgentMail 默认用 SQLite(零依赖、单文件,配合 go:embed 的前端就是「一个二进制 + 一个 .db」),
|
||
// 用户显式给出 DATABASE_URL 时切换到外部 PostgreSQL。
|
||
//
|
||
// 两种方言的差异集中在本包处理,repo 层只写一份 SQL:
|
||
// - 占位符:SQLite 也支持 $1/$2,无需改写
|
||
// - NOW() / gen_random_uuid():SQLite 侧注册同名函数补齐
|
||
// - JSONB 包含判断:走 CCHas/CCArg 辅助函数(唯一必须分支的查询)
|
||
// - 唯一约束冲突:IsUniqueViolation 统一识别
|
||
package db
|
||
|
||
import (
|
||
"context"
|
||
"database/sql"
|
||
"database/sql/driver"
|
||
"errors"
|
||
"fmt"
|
||
"os"
|
||
"path/filepath"
|
||
"strings"
|
||
"time"
|
||
|
||
"github.com/google/uuid"
|
||
"github.com/jackc/pgx/v5/pgconn"
|
||
_ "github.com/jackc/pgx/v5/stdlib" // database/sql 驱动:pgx
|
||
sqlite "modernc.org/sqlite"
|
||
)
|
||
|
||
type Dialect string
|
||
|
||
const (
|
||
Postgres Dialect = "postgres"
|
||
SQLite Dialect = "sqlite"
|
||
)
|
||
|
||
var (
|
||
DB *sql.DB
|
||
// D 是当前生效的方言,repo 层据此选择 SQL 片段
|
||
D Dialect
|
||
)
|
||
|
||
func init() {
|
||
// SQLite 没有 NOW() 与 gen_random_uuid(),注册同名函数使 repo 层 SQL 与 PG 保持一致。
|
||
// 函数名在 SQLite 中大小写不敏感,注册小写即可匹配 SQL 里的 NOW()。
|
||
sqlite.MustRegisterDeterministicScalarFunction("gen_random_uuid", 0,
|
||
func(*sqlite.FunctionContext, []driver.Value) (driver.Value, error) {
|
||
return uuid.NewString(), nil
|
||
})
|
||
|
||
// NOW() 必须非确定性:同一语句内多次调用要各自取当前时刻。
|
||
//
|
||
// 精度到微秒而不是秒:SQLite 的 CURRENT_TIMESTAMP 只有秒,
|
||
// 同一秒内插入的多封邮件排序就不确定 —— 「会话里最早那封」(决定联系人身份)
|
||
// 与「最后那封」(决定最新进展)都会取错行。实测同秒插 5 封,
|
||
// 按 created_at 排出来的顺序是乱的(由随机 UUID 决定)。
|
||
//
|
||
// 毫秒还不够:一次插入只要几十到几百微秒,循环里连插几封会落在同一毫秒。
|
||
// 微秒是实测确认驱动能原样扫回 time.Time 的精度(纳秒也行,但没必要)。
|
||
//
|
||
// 格式仍是 SQLite 认得的 "YYYY-MM-DD HH:MM:SS.ffffff",因此:
|
||
// - 驱动能扫进 time.Time(列声明为 DATETIME 时)
|
||
// - 与老数据(秒精度)的文本比较依然正确:前缀相同时短的排前面,
|
||
// 而 ":31" 确实早于 ":31.767000"
|
||
sqlite.MustRegisterScalarFunction("now", 0,
|
||
func(*sqlite.FunctionContext, []driver.Value) (driver.Value, error) {
|
||
return time.Now().UTC().Format("2006-01-02 15:04:05.000000"), nil
|
||
})
|
||
}
|
||
|
||
// Connect 依据 DATABASE_URL 建立连接。空值时落到 SQLite。
|
||
func Connect(ctx context.Context, dsn string) error {
|
||
driverName, connStr, dialect, err := resolve(dsn)
|
||
if err != nil {
|
||
return err
|
||
}
|
||
|
||
pool, err := sql.Open(driverName, connStr)
|
||
if err != nil {
|
||
return fmt.Errorf("open %s: %w", dialect, err)
|
||
}
|
||
|
||
switch dialect {
|
||
case Postgres:
|
||
pool.SetMaxOpenConns(20)
|
||
pool.SetMaxIdleConns(4)
|
||
pool.SetConnMaxLifetime(30 * time.Minute)
|
||
pool.SetConnMaxIdleTime(5 * time.Minute)
|
||
case SQLite:
|
||
// SQLite 单写者:并发写靠 WAL + busy_timeout 排队,连接数放大只会加剧锁竞争。
|
||
pool.SetMaxOpenConns(1)
|
||
pool.SetMaxIdleConns(1)
|
||
pool.SetConnMaxLifetime(0)
|
||
}
|
||
|
||
if err := pool.PingContext(ctx); err != nil {
|
||
pool.Close()
|
||
return fmt.Errorf("ping %s: %w", dialect, err)
|
||
}
|
||
|
||
DB = pool
|
||
D = dialect
|
||
return nil
|
||
}
|
||
|
||
// resolve 把 DATABASE_URL 解析为 (驱动名, 连接串, 方言)。
|
||
func resolve(dsn string) (string, string, Dialect, error) {
|
||
dsn = strings.TrimSpace(dsn)
|
||
|
||
if dsn == "" {
|
||
return "sqlite", sqliteDSN(defaultDBPath()), SQLite, nil
|
||
}
|
||
|
||
switch {
|
||
case strings.HasPrefix(dsn, "postgres://"), strings.HasPrefix(dsn, "postgresql://"):
|
||
return "pgx", dsn, Postgres, nil
|
||
|
||
case strings.HasPrefix(dsn, "sqlite://"):
|
||
return "sqlite", sqliteDSN(strings.TrimPrefix(dsn, "sqlite://")), SQLite, nil
|
||
|
||
case strings.HasPrefix(dsn, "sqlite:"):
|
||
return "sqlite", sqliteDSN(strings.TrimPrefix(dsn, "sqlite:")), SQLite, nil
|
||
|
||
case strings.HasPrefix(dsn, "file:"):
|
||
// 已是 SQLite URI,原样透传(调用方自带 pragma)
|
||
return "sqlite", dsn, SQLite, nil
|
||
|
||
case strings.HasSuffix(dsn, ".db"), strings.HasSuffix(dsn, ".sqlite"), strings.HasSuffix(dsn, ".sqlite3"):
|
||
return "sqlite", sqliteDSN(dsn), SQLite, nil
|
||
}
|
||
|
||
return "", "", "", fmt.Errorf("无法识别的 DATABASE_URL %q:期望 postgres://…、sqlite:///path/x.db 或 /path/x.db", dsn)
|
||
}
|
||
|
||
// defaultDBPath 返回默认 SQLite 文件位置(AGENTMAIL_DATA_DIR 可覆盖)。
|
||
func defaultDBPath() string {
|
||
dir := os.Getenv("AGENTMAIL_DATA_DIR")
|
||
if dir == "" {
|
||
dir = "data"
|
||
}
|
||
return filepath.Join(dir, "agentmail.db")
|
||
}
|
||
|
||
// sqliteDSN 把文件路径包装为带 pragma 的 SQLite URI,并确保父目录存在。
|
||
//
|
||
// - journal_mode=WAL:读写不互斥,SSE 长连接查询不会被写入阻塞
|
||
// - busy_timeout=5000:并发写时排队 5s 而不是立刻 SQLITE_BUSY
|
||
// - foreign_keys=1:SQLite 默认不校验外键,必须显式打开
|
||
func sqliteDSN(path string) string {
|
||
if dir := filepath.Dir(path); dir != "" && dir != "." {
|
||
os.MkdirAll(dir, 0o755)
|
||
}
|
||
return "file:" + path +
|
||
"?_pragma=journal_mode(WAL)" +
|
||
"&_pragma=busy_timeout(5000)" +
|
||
"&_pragma=foreign_keys(1)"
|
||
}
|
||
|
||
func Close() {
|
||
if DB != nil {
|
||
DB.Close()
|
||
}
|
||
}
|
||
|
||
// ---------- 方言差异 ----------
|
||
|
||
// CCHas 返回「cc_list 是否抄送了某人」的 SQL 片段,argN 是该人名对应的占位符序号。
|
||
//
|
||
// 两个方言的实参都是【纯人名字符串】,不是 JSON 探针——因为多处查询把同一个
|
||
// 占位符同时用于 from_name/to_name 比较和抄送判断,两种实参约定必然出错。
|
||
// PG 侧在 SQL 里用 jsonb_build_* 现场构造探针;SQLite 侧用 json_each 展开逐项比对。
|
||
func CCHas(col string, argN int) string {
|
||
if D == Postgres {
|
||
return fmt.Sprintf("%s @> jsonb_build_array(jsonb_build_object('name', $%d::text))", col, argN)
|
||
}
|
||
return fmt.Sprintf(
|
||
"EXISTS (SELECT 1 FROM json_each(%s) WHERE json_extract(value, '$.name') = $%d)",
|
||
col, argN)
|
||
}
|
||
|
||
// JSONCast 返回把占位符转成 JSONB 的后缀(PG 需要 ::jsonb,SQLite 存 TEXT 无需转换)。
|
||
func JSONCast() string {
|
||
if D == Postgres {
|
||
return "::jsonb"
|
||
}
|
||
return ""
|
||
}
|
||
|
||
// IsUniqueViolation 判断错误是否为唯一约束冲突(用于别名撞名重试)。
|
||
func IsUniqueViolation(err error) bool {
|
||
if err == nil {
|
||
return false
|
||
}
|
||
var pgErr *pgconn.PgError
|
||
if errors.As(err, &pgErr) {
|
||
return pgErr.Code == "23505"
|
||
}
|
||
var liteErr *sqlite.Error
|
||
if errors.As(err, &liteErr) {
|
||
// SQLITE_CONSTRAINT_UNIQUE = 2067、SQLITE_CONSTRAINT_PRIMARYKEY = 1555
|
||
code := liteErr.Code()
|
||
return code == 2067 || code == 1555
|
||
}
|
||
return false
|
||
}
|