由于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_string
end