【数据存储】字符集统一：混用编码的乱码根治

-- 字符集：编码探测与转换
local player = class(actor)
local function looksUtf8(s)
    local i = 1
    while i <= #s do
        local b = string.byte(s, i)
        if b < 128 then i = i + 1
        elseif b >= 240 then i = i + 4
        elseif b >= 224 then i = i + 3
        elseif b >= 192 then i = i + 2
        else return false end
    end
    return true
end
local function normalize(player, field, value)
    if looksUtf8(value) then return value end
    local converted = callscript(player, "GbkToUtf8", value)
    sendmsg(player, 1, 0, "字段 " .. field .. " 编码已从 GBK 转为 UTF8。")
    return converted
end

-- 迁移校验：抽样与兼容
local player = class(actor)
local function verifyMigration(player, sampleKeys)
    local bad = 0
    for _, k in ipairs(sampleKeys) do
        local v = getplayvar(player, "HUMAN", k)
        if v and #v > 0 and not looksUtf8(v) then
            bad = bad + 1
        end
    end
    sendmsg(player, 1, 0, "抽样 " .. #sampleKeys .. " 条，非 UTF8 残留 " .. bad .. " 条。")
    return bad == 0
end