refactor(lua): 11 个适配器改用共享前导 —— 删掉约 20KB 逐字重复

按前导抽出三块共通实现（都是实测逐字节相同的）：

| 钩子 | 原本重复 | 各 2.2KB |
|---|---|---|
| transform_stream_chunk | github/groq/kimicode/mistral | 2210B × 4 |
| transform_response     | openai/groq/kimicode/mistral/github | 2206B × 5 |
| transform_error        | deepseek/github/groq/kimicode/openai/sensenova | 292B × 6 |

适配器总行数 2409（收工前 groq 单文件 146 行 → 46 行）。

★ 两个必须记下的教训（都在本提交里踩到并修好）：

1. **抽公共代码要抽最全的实现，不是最小的**。我先抽了 transform_error 的
   最小版（只认 {error:{message}}），打挂了 TestOpenAITransformErrorEnvelopes
   的 6 个子用例 —— 最小版丢掉了 HTML 错误页、裸文本、扁平 {code,message}、
   FastAPI {detail} 等形状。openai.lua 原有的 1580B 版本才是该进前导的那份。
   抽最小实现是**静默降级**：不报错，只是少认几种错误体。

2. **抽出共性时不能丢掉"非共性但重要"的细节**。openai_response 我漏了两处：
   reasoning_content 透传、以及 tool_calls 的 id 规整（safe_tool_id）。
   后者尤其危险 —— 本网关是扇出路由器，一个非法 id（"bash:0"）会被回放到
   每个 Claude 上游导致整条 AUTO 链失败；且**流式与非流式必须同规则**，
   否则同一请求两条路径产出不同 id（实测报错：
   流式 "bash_0_40248ca0" vs 非流式 "bash:0"）。现两条路径都走
   __prelude.tool_id。

判据：TestPreludeRefactorIsByteIdentical —— 固定输入下逐字节比对
（含"arguments 必须解码成表""usage-only chunk 必须是 done:false"
"arguments 不得留原样 JSON 字符串"等反向断言），并覆盖错误体 6 种形状
与"非 OpenAI 形状必须返回 ok=false"。

另修 channels_pool_test：断言改为**关系**（关一个模型源里少一个）而非写死
数量 —— 兜底目录会随对齐进度变化（minimax 3→4），写死数量会把正常的目录
扩充变成测试失败。

回归：internal/{lua,provider,core,gateway} 全绿。

internal/core/channels_pool_test.go

@@ -124,13 +124,18 @@ func TestChannelsAccountPoolBehavior(t *testing.T) {
 		if !ok {
 			t.Fatal("带凭据账号应已同步源")
 		}
-		if n := len(asArr(sm["models"])); n != 3 {
-			t.Fatalf("源应有3模型, 实得 %d", n)
+		// 不写死具体数量：兜底目录是照参考 *-product.ts 补的，会随对齐
+		// 进度变化（minimax 已从 3 项补到 4 项）。这里断言的是**关系**：
+		// 关掉一个模型，源里就少一个。
+		all := invoke(t, ps, "model_list", `{"platform":"minimax"}`)
+		total := len(asArr(all["models"]))
+		if n := len(asArr(sm["models"])); n != total {
+			t.Fatalf("源应含全部 %d 个模型, 实得 %d", total, n)
 		}
 		invoke(t, ps, "model_set_disabled", `{"platform":"minimax","model_id":"MiniMax-M3","disabled":true}`)
 		sm, _ = srcHasAccount(listSourcesViaKernel(t, c), aid)
-		if n := len(asArr(sm["models"])); n != 2 {
-			t.Fatalf("关1模型后源应2模型, 实得 %d", n)
+		if n := len(asArr(sm["models"])); n != total-1 {
+			t.Fatalf("关1模型后源应 %d 模型, 实得 %d", total-1, n)
 		}
 		invoke(t, ps, "model_set_all_disabled", `{"platform":"minimax","disabled":true}`)
 		m = invoke(t, ps, "provider_status", `{}`)