Lua 打印 table (支持双向引用的table)

网上搜了一下，挺多打印table的方案，基本思路都是一层一层递归遍历table。（我就是参考这种思路做的^_^）

但大部分都不支持双向引用的打印。我所指的双向引用，就是a引用b, b又直接或间接引用a。例如下面的双向链表：

local node1 = {}
local node2 = {}
local node3 = {}

node1.value =
node1.pre = nil
node1.next = node2

node2.value =
node2.pre = node1
node2.next = node3

node3.value =
node3.pre = node2
node3.next = nil

像这样一个双链表，网上的很多方法，处理这种情况时，递归无法结束。因为，node1 表里有个 node2, 遍历node2时，又发现有个node1，如此反复

那要怎么处理呢？我的方案是：把每个table的父级table用一个链表保存起来，当判断到当前要处理的table存在于父级链表里，就停止处理。

完整代码如下：

 ------ 把table转成string
 -- sign 打印在最前面的一个标记
 -- tab 待处理table
 -- showAddress 是否显示table的地址
 function TabToStr(sign, tab, showAddress)

     -- 缓存table地址，防止递归死循环
     local tabs = {};
     local check = function(cur_tab, key, parentKey, level)
         local tempP = tabs[(level-) .. parentKey]
         while tempP do
             if tempP.id == tostring(cur_tab) then
                 return false;
             end
             tempP = tempP.parent;
         end

         tabs[level .. key] = {};
         tabs[level .. key].id = tostring(cur_tab);
         tabs[level .. key].parent = tabs[(level-) .. parentKey];

         return true;
     end

     -- 处理直接传入table的情况
     if tab == nil then
         tab = sign;
         sign = "table:";
     end

     local targetType = type(tab);
     if targetType == "table" then
         local isHead = false;
         local function dump(t, tKey, space, level)
             local temp = {};
             if not isHead then
                 temp = {sign or "table:"};
                 isHead = true;
             end

             if tKey ~= "_fields" then
                 table.insert(temp, string.format("%s{", string.rep("    ", level)));
             end
             for k, v in pairs(t) do
                 local key = tostring(k);
                 -- 协议返回内容
                 if key == "_fields" then
                     local fields = {};
                     for fk, fv in pairs(v) do
                         fields[fk.name] = fv;
                     end
                     table.insert(temp, dump(fields, key, space, level))
                     -- 如果是table模拟的类，忽略。 以下划线开头的字段, 忽略
                 elseif key == "class" or string.sub(key, , string.len("_")) == "_" then
                     -- 这里忽略

                 elseif type(v) == "table" then
                     if check(v, key, tKey, level) then
                         if showAddress then
                             table.insert(temp, string.format("%s%s: %s\n%s", string.rep("    ", level+), key, tostring(v), dump(v, key, space, level + )));
                         else
                             table.insert(temp, string.format("%s%s: \n%s", string.rep("    ", level+), key, dump(v, key, space, level + )));
                         end
                     else
                         table.insert(temp, string.format("%s%s: %s (loop)", string.rep("    ", level+), key, tostring(v)));
                     end
                 else
                     table.insert(temp, string.format("%s%s: %s", string.rep("    ", level+), key, tostring(v)));
                 end
             end
             if tKey ~= "_fields" then
                 table.insert(temp, string.format("%s}", string.rep("    ", level)));
             end

             return table.concat(temp, string.format("%s\n", space));
         end
         return dump(tab, "", "", );
     else
         return tostring(tab);
     end
 end

核心方法说明：

check 方法， 检测父级table链表中是否存在当前table

dump 方法， 递归遍历table

上面代码在实际项目中测试可用,一般情况可以直接使用。但有些是根据项目情况填充的内容。想要理解或改写的话，看下面的精简dump方法

local function dump(t, tKey, space, level)
    local temp = {};
    table.insert(temp, string.format("%s{", string.rep("    ", level)));
    for k, v in pairs(t) do
        local key = tostring(k);
        if type(v) == "table" then
            if check(v, key, tKey, level) then
                table.insert(temp, string.format("%s%s: \n%s", string.rep("    ", level+), key, dump(v, key, space, level + )));
            else
                table.insert(temp, string.format("%s%s: %s (loop)", string.rep("    ", level+), key, tostring(v)));
            end
        else
            table.insert(temp, string.format("%s%s: %s", string.rep("    ", level+), key, tostring(v)));
        end
    end
    table.insert(temp, string.format("%s}", string.rep("    ", level)));
    return table.concat(temp, string.format("%s\n", space));
end

测试：

tab = {, , , , {, , , }}
-- 这里的node1就是上面贴出的双向链表
print (TabToStr("node1", node1, true))
print (TabToStr("node1", node1))
print (TabToStr(tab))

结果：