Lua table转string函数

来源:互联网 发布:北京大学域名 编辑:程序博客网 时间:2024/05/16 11:29

由于lua不能直接打印table类型,在调试信息或者输出到文件的时候会很麻烦。

在打印table的时候,有几个必须要考虑额问题:

1.  格式化

2. 防止重复打印table,难点在于怎么判断一个table是否已经被打印过了。

关于第一个问题:

其实就是如何缩进的问题,每打印一个table就缩进一层。

关于第二个问题:

使用一个table记录已经打印过的table,如果某一个table已经打印过了,则不再打印详细信息,只是显示这里有这个table即可。

下面是代码,Lua版本是5.3

function table_2_string(t)local printed_table_cache = {}local result_string = ""local CRLF = '\n'local function table_2_string_core(t, indent) if (printed_table_cache[tostring(t)]) then            result_string = result_string..indent.."*"..tostring(t)..CRLF        else            printed_table_cache[tostring(t)]=true            if (type(t)=="table") then                for pos,val in pairs(t) do                    if (type(val)=="table") then                        result_string = result_string..indent.."["..pos.."] => "..tostring(t).." {"..CRLF                        table_2_string_core(val,indent..string.rep(" ",string.len(pos)+8))                        result_string = result_string..indent..string.rep(" ",string.len(pos)+6).."}"..CRLF                    elseif (type(val)=="string") then                        result_string = result_string..indent.."["..pos..'] => "'..val..'"'..CRLF                    else                        result_string = result_string..indent.."["..pos.."] => "..tostring(val)..CRLF                    end                end            else                result_string = result_string..indent..tostring(t)..CRLF            end        end    end    if (type(t)=="table") then        result_string = result_string..tostring(t).." {"..CRLF        table_2_string_core(t,"  ")        result_string = result_string.."}"..CRLF    else        table_2_string_core(t,"  ")    end    result_string = result_string..CRLF    return result_stringend