【运维发布】故障演练日：每季度的预设故障注入

-- 故障演练：注入清单
local player = class(actor)
local FAULTS = {"kill_main", "db_disconnect", "disk_full"}
local function injectFault(player, faultName)
    local allowed = false
    for _, f in ipairs(FAULTS) do
        if f == faultName then allowed = true end
    end
    if not allowed then
        sendmsg(player, 1, 0, "非预设故障，禁止注入。")
        return
    end
    setsysvarex("DrillFault", faultName, true)
    setsysvarex("DrillStart", os.time(), true)
    sendcentermsg(player, 255, 0, "演练注入：" .. faultName .. "，请按预案响应。", 0, 10)
end

-- 演练计时：分段归档
local player = class(actor)
local function recordDrill(player, fault, detectSec, reactSec, recoverSec)
    local total = detectSec + reactSec + recoverSec
    setsysvarex("DrillLog_" .. os.date("%Y%m%d"), fault .. "|" .. total, true)
    local verdict = "合格"
    if detectSec > 60 or reactSec > 300 or recoverSec > 600 then
        verdict = "不合格，需整改"
    end
    sendmsg(player, 1, 0, fault .. " 演练：" .. verdict ..
        "（发现 " .. detectSec .. "s / 响应 " .. reactSec .. "s / 恢复 " .. recoverSec .. "s）")
end