表格和字符串互转

meinvwudi

-- 将表转换为字符串
local function t2str(obj)
    local lua = ""
    local t = type(obj)
    if t == "number" then
        lua = lua .. obj
    elseif t == "boolean" then
        lua = lua .. tostring(obj)
    elseif t == "string" then
        lua = lua .. string.format("%q", obj)
    elseif t == "table" then
        lua = lua .. "{\n"
        for k, v in pairs(obj) do
            local str = t2str(v)
            if str then
                lua = lua .. "[" .. t2str(k) .. "]=" .. str .. ",\n"
            end
        end
        lua = lua .. "}"
    elseif t == "nil" then
        return nil
    else
        return nil
    end
    return lua
end

meinvwudi

-- 将字符串转换为表
local e = {}
local function str2t(str)
    local t = type(str)
    if t == "nil" or str == "" then
        return nil
    elseif t == "number" or t == "string" or t == "boolean" then
        str = tostring(str)
    else
        log:ferror("unt serialize error:%s type ", t)
    end
    str = "return " .. str
    local f = loadstring(str, str)
    if f == nil then
        return nil
    end
    setfenv(f, e)
    return f()
end

meinvwudi

-- 将字符串分割成字符数组
function splitStr2table(str)
    local chars = {}
    local pos = 1
    while pos <= #str do
        local firstByte = string.byte(str, pos)
        if firstByte >= 0x81 and firstByte <= 0xFE then
            -- 处理多字节字符（如中文）
            table.insert(chars, string.sub(str, pos, pos + 1))
            pos = pos + 2
        else
            -- 处理单字节字符
            table.insert(chars, string.sub(str, pos, pos))
            pos = pos + 1
        end
    end
    return chars
end

meinvwudi

-- 计算字符串中的中文字符数量
function alg:countChinaStr(str)
    local chars = self:splitStr2table(str)
    local count = 0
    for _, char in ipairs(chars) do
        local firstByte = string.byte(char, 1)
        local secondByte = string.byte(char, 2)
        if firstByte >= 0x81 and firstByte <= 0xFE and secondByte >= 0x40 and secondByte <= 0xFE then
            count = count + 1
        end
    end
    return count
end

meinvwudi

-- 将字符串按分隔符分割成数组
local guideArrMap = {}
function alg:str2arr(str, delimiter)
    local have = guideArrMap[str]
    if have then
        return have
    end
    local arr = string.split(str, delimiter)
    guideArrMap[str] = arr
    return arr
end