【入门夯实】密码策略：弱密码的检测与拦截写法

local function checkPwdBad(pwd)
    return #pwd >= 8
end
checkPwdBad("12345678")

local WEAK = { ["12345678"] = true, ["password"] = true,
    ["qwer1234"] = true, ["11111111"] = true, ["88888888"] = true }
local function checkPwd(pwd)
    if #pwd < 8 then
        return false, "密码至少 8 位"
    end
    local hasLetter, hasDigit = false, false
    for i = 1, #pwd do
        local b = string.byte(pwd, i)
        if (b >= 65 and b <= 90) or (b >= 97 and b <= 122) then
            hasLetter = true
        end
        if b >= 48 and b <= 57 then
            hasDigit = true
        end
    end
    if not (hasLetter and hasDigit) then
        return false, "密码须同时包含字母与数字"
    end
    if WEAK[string.lower(pwd)] then
        return false, "密码过于常见，请更换"
    end
    return true
end

local ok, why = checkPwd("qwer1234")
if not ok then
    sendmsg(nil, 1, "设置失败：" .. why)
end

local function hasSequence(pwd)
    for i = 1, #pwd - 2 do
        local d1 = string.byte(pwd, i + 1) - string.byte(pwd, i)
        local d2 = string.byte(pwd, i + 2) - string.byte(pwd, i + 1)
        if d1 == d2 and math.abs(d1) == 1 then
            return true
        end
    end
    return false
end