fix: 枚举入参校验(500→400)、5xx 错误串不再外泄、健康检查探库、限流键清理

服务端一批「会误导现场」的缺陷，全部补了测试：

- 枚举型入参（events 的 event_type/result_mode/result_type/compare/status、
  scoring_profiles 的 tie_mode/record_bonus_mode、entries.status、results.status）
  过去完全没有校验，非法值一路落到 SQLite 的 CHECK 约束，被统一错误处理当成
  服务端异常报成 500；现在统一在 enums.go 拦成 400 VALIDATION_FAILED，
  message 带字段名与合法取值、detail 带原始输入值。空值仍走原来的默认值。
- 5xx 响应体不再回显内部错误原文：新增 apiError.logDetail，SQLite / 引擎的
  原始错误串只进 ERROR 日志的 detail 字段。此前正好是反的——前端拿得到原文，
  日志里只有「服务端异常」。同时校准 newAPIError / internalMsg 的 skip 层数，
  拦截点不再退化成 response.go 里的构造函数。
- /api/health 新增 db / dbError：用 SELECT 1 探库（Ping 探不到「文件在、库读不动」），
  超时 5s 与 busy_timeout 同量级。状态码仍恒 200 —— Console 拿状态码当存活信号，
  数据库故障时回 5xx 只会变成重启循环，两个事实分两个字段表达。
- 修改密码时原密码错误由 401 改为 400 AUTH_FAILED（新增 wrongCredential）：
  401 的语义是「本请求没有有效会话」，而这里会话是好的。
- 限流 hits map 在键数超过阈值时清理窗口内已无记录的键（窗口内活跃的键不动，
  否则堆键数就能冲掉别人的计数）。
- createEntry / updateEntry 拒绝「A 小项的报名挂在 B 小项的组别上」。
  数据库层仍无 (event_id, category_id) 复合外键（重建 entries 会牵动 results /
  score_ledger 的级联，风险高不做），这一层先兜住。
- 补测试：枚举字段逐项正反例、CSRF 反向用例、写限流 429、健康探库（含库故障）、
  5xx 不外泄原文、限流键清理不误删。

server/internal/httpapi/repo_results.go

@@ -201,10 +201,14 @@ func (s *server) upsertDraft(ctx context.Context, eventID int64, userID int64, i
 		if entryEvent != eventID {
 			return nil, badRequest("entryId 不属于该小项", it.EntryID)
 		}
+		status, err := normalizeResultStatus(it.Status)
+		if err != nil {
+			return nil, err
+		}
 		// 已发布成绩不能被「存草稿」就地改写：ON CONFLICT 不改 state，
 		// 若放行会把 rank 清空但流水不动，大屏奖牌与积分立刻对不上。
 		var state string
-		err := tx.QueryRowContext(ctx, `SELECT state FROM results WHERE entry_id = ?`, it.EntryID).Scan(&state)
+		err = tx.QueryRowContext(ctx, `SELECT state FROM results WHERE entry_id = ?`, it.EntryID).Scan(&state)
 		switch {
 		case errors.Is(err, sql.ErrNoRows):
 			// 尚无成绩，正常新建草稿。
@@ -230,7 +234,7 @@ func (s *server) upsertDraft(ctx context.Context, eventID int64, userID int64, i
 			        recorded_at = excluded.recorded_at,
 			        updated_at = datetime('now')`,
 			eventID, it.EntryID, nullInt(it.Rank), nullStr(it.ResultText), nullF64(it.ResultValue),
-			nullStr(it.Unit), it.IsTie, nullF64(it.PointsOverride), orDefault(it.Status, "ok"),
+			nullStr(it.Unit), it.IsTie, nullF64(it.PointsOverride), status,
 			nullID(userID), nullStr(it.Note)); err != nil {
 			return nil, internal(err)
 		}