通常需要序列化一些数据，也就是将数据转换为一个字节流或字符流，然后就可以将其方便的持久化。文本序列化可选择的格式非常多：SOAP、Json甚至自定义xml等，不过lua脚本也是一个不错的选择方案。
本文在参考《Lua程序设计（第2版）》简体中文版 第12章 数据与持久化 12.2 和12.2.1 的基础上给出下面的实现。要注意的是该实现只能针对无环的table，并且不能对function、thread、userdata这三种类型进行序列化和反序列化。为了防止序列化后数据过大，也没有做精细的排版控制。
function serialize(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
lua = lua .. "[" .. serialize(k) .. "]=" .. serialize(v) .. ",\n"
end
local metatable = getmetatable(obj)
if metatable ~= nil and type(metatable.__index) == "table" then
for k, v in pairs(metatable.__index) do
lua = lua .. "[" .. serialize(k) .. "]=" .. serialize(v) .. ",\n"
end
end
lua = lua .. "}"
elseif t == "nil" then
return nil
else
error("can not serialize a " .. t .. " type.")
end
return lua
end
function unserialize(lua)
local t = type(lua)
if t == "nil" or lua == "" then
return nil
elseif t == "number" or t == "string" or t == "boolean" then
lua = tostring(lua)
else
error("can not unserialize a " .. t .. " type.")
end
lua = "return " .. lua local func = loadstring(lua)
if func == nil then return nil end
return func()
end
--data = {["a"] = "a", ["b"] = "b", [1] = 1, [2] = 2, ["t"] = {1, 2, 3}}
--print(serialize(unserialize(1)))
--print(serialize(unserialize(serialize(data))))
2009-04-10：
配合《lua readonly table》一文中提到的lua只读表格，添加对lua只读表格的序列化支持。暂时不支持只读表格的反序列化。
评论