lua 按拉分析与合成

-- 将数值分解成bytes_table
local function decompose_byte(data)
    if not data then
        return data
    end

    local tb = {}

    if data ==  then
        table.insert(tb, )
        return tb
    end

    local idx =
    while data >  do
        table.insert(tb, math.mod(data, ))
        data = math.floor(data/)
    end

    return tb;
end

-- 按位合成一个数值
local function synthesize_byte(bytes_table)
    local data = ;
    for i,v in ipairs(bytes_table) do
        data = data + math.pow(, i - ) * bytes_table[i]
    end

    return data
end

-- 使用方法
local function show_bytes(t)
    local str = ""
    for i,v in ipairs(t) do
        str = tostring(v) .. str;
    end
    print(str)
end

local tb = decompose_byte()
show_bytes(tb);
print(synthesize_byte(tb))

local str = string.format("%c%c", , )
print(str, #str)

tb = decompose_byte(string.byte(str, ))
show_bytes(tb)
print(synthesize_byte(tb))

tb = decompose_byte(string.byte(str, ))
show_bytes(tb)
print(synthesize_byte(tb))