修性能回归：把「已并入 / 子段」判据做成派生列（visits.is_merged）

昨天给「已并入 / 子段」做的收口写成每行去 entity_raw 判
`raw->>'ZMERGEDTO' IS NOT NULL OR raw->>'ZPARENT' IS NOT NULL`，而 entity_raw.raw 是
**TOAST 过的整行 Core Data JSON**：一次探针要取回并解析整行。地点库「每个地点 × 5 个子查询」
的量级下 —— 实测 /places 70.1 秒、首页 43.6 秒才出页面（而库里没有任何一条 SQL 超过 1 秒：
时间全花在成千上万次「取整行再解析」上，进程 CPU 只用了 3s/135s）。

这批「渲染若干页面」的布局用例因此从 20 秒涨到 226~309 秒，整套验收从 6 分钟变 20+ 分钟。

- schema.sql：加派生列 visits.is_merged + 回填 + 给回填用的部分索引
  （只索引确实带合并标记的那几十行，不用取回 raw）。
- stats.SoloVisitSQL 改成读这一列（判据仍然只此一份，读侧全部经由它）。
- 写入侧跟着刷：ingest 在 insertEntityRaw 之后、backup_merge 的 recountPlaces 里，
  共用 stats.RefreshMergedFlagsSQL。
- 直接改留档里的合并标记（工具脚本 / 用例）之后也要刷一次，schema.sql 与函数注释都写明了。

实测：/places 70084ms → 206ms，/ 43633ms → 698ms（比「关掉判据」的对照还快）。
新增 page_render_budget_test.go：给 7 个关键页卡 10 秒上限的灾难探测器
（功能全对、只是慢的那种退化，之前没有任何用例会红）。

internal/web/backup_merge.go

@@ -761,6 +761,10 @@ func (s *Server) applyDeletions(ctx context.Context, ex execer, dsID int64, plan
 // 到访数与停留按**访客口径**（不含已并入 / 子段，见 stats.SoloVisitSQL），与 stats.Filter 一致；
 // 首末到访与数据集计数保持全量（last_visit_at 会写进导出包，datasets.visit_count 是后台口径）。
 func (s *Server) recountPlaces(ctx context.Context, ex execer, dsID int64) error {
+	// 先把派生列刷新（合并刚插进来的行带着留档），下面的聚合读的就是它
+	if _, err := ex.ExecContext(ctx, stats.RefreshMergedFlagsSQL, dsID); err != nil {
+		return err
+	}
 	if _, err := ex.ExecContext(ctx, `UPDATE places SET visit_count=0, dwell_minutes=0,
 		first_visit_at=NULL, last_visit_at=NULL WHERE dataset_id=$1`, dsID); err != nil {
 		return err

internal/web/city_agg_test.go

@@ -4,6 +4,8 @@ import (
 	"encoding/json"
 	"net/http/httptest"
 	"testing"
+
+	"rond-with-you/internal/stats"
 )
 
 // 地图上的城市圈气泡（/api/cities）必须「先按地点聚合、再按城市汇总」。
@@ -144,6 +146,10 @@ func TestCityAggCountsOncePerPlace(t *testing.T) {
 		WHERE dataset_id=$1 AND entity='ZVISIT' AND src_pk=$2`, dsID, latestVisit, latestVisit); err != nil {
 		t.Fatal(err)
 	}
+	// 读侧取的是派生列 visits.is_merged，直接改留档之后要按生产路径刷一次
+	if _, err := pg.ExecContext(ctx, stats.RefreshMergedFlagsSQL, dsID); err != nil {
+		t.Fatal(err)
+	}
 	lastAfterWant = truthLast()
 	if lastAfterWant == lastBeforeWant {
 		t.Skipf("城市「%s」里最晚那次不是唯一的最晚记录，换一个再测", cityName)

internal/web/hidden_visit_test.go

@@ -93,12 +93,16 @@ func TestHiddenVisitStaysInExportButLeavesReads(t *testing.T) {
 		t.Fatalf("标记前 ZMERGEDTO 就不该有值，实际 %v", merged.Int64)
 	}
 
-	// 标记成「已并入 #target」
+	// 标记成「已并入 #target」。读侧判据取的是派生列 visits.is_merged，
+	// 所以直接改留档之后必须按生产路径刷一次（导入 / 合并也是这么刷的）。
 	if _, err := pg.ExecContext(ctx, `UPDATE entity_raw
 		SET raw = jsonb_set(raw, '{ZMERGEDTO}', to_jsonb($3::int), true)
 		WHERE dataset_id=$1 AND entity='ZVISIT' AND src_pk=$2`, dsID, victim, target); err != nil {
 		t.Fatalf("标记失败: %v", err)
 	}
+	if _, err := pg.ExecContext(ctx, stats.RefreshMergedFlagsSQL, dsID); err != nil {
+		t.Fatalf("刷新合并标记失败: %v", err)
+	}
 
 	// 1) 访客侧：时间线少了一条，且被标记的那条不再出现
 	rows, totalAfter, err := srv.q.Visits(ctx, flt, 5, 0, "desc")

internal/web/page_render_budget_test.go

@@ -0,0 +1,45 @@
+package web
+
+import (
+	"net/http"
+	"net/http/httptest"
+	"testing"
+	"time"
+)
+
+// TestKeyPagesRenderFast 是一道**灾难探测器**，不是基准测试。
+//
+// 2026-09-30 踩过一次：给「已并入 / 子段」做的收口写成每行去 entity_raw 取回**整行 Core Data JSON**
+// 再解析 raw->>'ZMERGEDTO'，而 raw 是 TOAST 过的整行——/places 要 70 秒、首页 44 秒才出页面，
+// 而那批「渲染若干页面」的布局用例因此从 20 秒涨到 300 秒，整套验收从 6 分钟变 20+ 分钟。
+// 当时没有任何用例会红：功能全对，只是慢。
+//
+// 所以这里给每个关键页面卡一个**很松**的上限（修好后实测 0.04~1.6 秒，这里卡 10 秒）：
+// 只拦「数量级」的退化，不拦正常的机器抖动。真要做性能基准另说。
+func TestKeyPagesRenderFast(t *testing.T) {
+	f := newMovementFixture(t)
+	const budget = 10 * time.Second
+	for _, tg := range []struct {
+		name string
+		url  string
+		h    http.HandlerFunc
+	}{
+		{"主页", "/", f.srv.home},
+		{"统计", "/stats", f.srv.statsPage},
+		{"地点库", "/places", f.srv.placesPage},
+		{"报告", "/report", f.srv.reportPage},
+		{"时间线", "/timeline", f.srv.timelinePage},
+		{"后台首页", "/admin", f.srv.adminHome},
+		{"数据编辑", "/admin/edit", f.srv.editPage},
+	} {
+		start := time.Now()
+		rec := httptest.NewRecorder()
+		tg.h(rec, httptest.NewRequest("GET", tg.url, nil).WithContext(f.ctx))
+		el := time.Since(start)
+		t.Logf("%-8s %8dms  %d bytes", tg.name, el.Milliseconds(), rec.Body.Len())
+		if el > budget {
+			t.Errorf("%s 渲染用了 %s（上限 %s）——多半又出现了「每行去读整行留档」这类退化",
+				tg.name, el.Round(time.Millisecond), budget)
+		}
+	}
+}