写个 lua 打印 table 表函数

今天本来是在看lua 的debug库,看到

--[[ debug.getregistry()
     函数返回Lua的注册表信息"registry"。]]

然后比较好奇这个注册表的内容是什么,就自己写了个打印lua table表的函数。

一开始没考虑table表循环的问题,写了个测试,在没有循环的情况下还行,但debug.getregistry()返回的表是有循环的。
然后在网上找来写资料,看有没哟能用的,发现都不满足自己的想法,所以还是自己写个把。用lua5写的,不一定符合所有人的需求,仅当做个记录。最终的方案如下:

-- 将值转换成字符串
function Val2Str(value)
    local value_cach = {}   -- 防止闭环
    local tinsert = table.insert
    local tconcat = table.concat
    local sformat = string.format
    local sgsub = string.gsub
    function _Val2Str(value, prefix)
        local str = ""
        local tbList = {}
        local oldprefix = prefix or ""
        prefix = oldprefix.."   "
        local value_type = type(value)
        if value_type == "table" then
            local value_name = tostring(value)
            if value_cach[value] then
                -- 循环打印,直接用table的地址,并给个提示
                return sformat("\"%s\" , -- loop table", value_name)
            end

            value_cach[value] = 1
            tinsert(tbList, sformat("%s--%s", '{', value_name))
            for k, v in pairs(value) do 
                local temp = _Val2Str(v, prefix)
                local key
                if type(k) == "number" then
                    key = sformat("[%s]", k)
                else
                    key = sformat("[\"%s\"]", tostring(k))
                end
                local line = sformat("%s%s = %s,", prefix, key, temp)
                tinsert(tbList, line)
            end
            tinsert(tbList, oldprefix..'}')
        elseif value_type == "number" then
            tinsert(tbList, tostring(value))
        elseif value_type == "string" then
            local temp = tostring(value)
            temp = sgsub(temp, "\\", "\\\\")
            temp = sgsub(temp, "\n", "\n"..prefix.."    ")
            local temp = sformat("[==[%s]==]", temp)
            tinsert(tbList, temp)
        else
            -- 非数字和字符串的,直接调用tosgring获取显示值
            local temp = sformat("\"%s\"", tostring(value))
            tinsert(tbList, temp)
        end

        str = tconcat(tbList, "\n")
        return str
    end
    local str = _Val2Str(value)
    print(str)
    return str
end

-- 进行转换
local t_registry = debug.getregistry()
local s_registry = Val2Str(t_registry)

打印出来的内容有点多,就不贴出来了。

  • 1
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值