You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
67 lines
1.4 KiB
67 lines
1.4 KiB
|
|
local function sortpairs(t)
|
|
local sort = {}
|
|
for k, v in pairs(t) do
|
|
sort[#sort+1] = {k, v}
|
|
end
|
|
table.sort(sort, function (a, b)
|
|
return a[1] < b[1]
|
|
end)
|
|
local n = 1
|
|
return function()
|
|
local v = sort[n]
|
|
if not v then
|
|
return
|
|
end
|
|
n = n + 1
|
|
return v[1], v[2]
|
|
end
|
|
end
|
|
|
|
local function format_value(value)
|
|
local tp = type(value)
|
|
if tp == 'boolean' then
|
|
return tostring(value)
|
|
end
|
|
if tp == 'number' then
|
|
return tostring(value)
|
|
end
|
|
if tp == 'string' then
|
|
return ('%q'):format(value)
|
|
end
|
|
end
|
|
|
|
local function maxindex(t)
|
|
local i = 0
|
|
for k in pairs(t) do
|
|
i = math.max(i, k)
|
|
end
|
|
return i
|
|
end
|
|
|
|
local function write_data(f, k, v)
|
|
if k:find '[^%w_]' then
|
|
k = ('%q'):format(k)
|
|
end
|
|
if type(v) == 'table' then
|
|
local l = {}
|
|
for i = 1, maxindex(v) do
|
|
l[i] = format_value(v[i]) or 'nil'
|
|
end
|
|
f[#f+1] = ('%s={%s}'):format(k, table.concat(l, ','))
|
|
else
|
|
f[#f+1] = ('%s=%s'):format(k, format_value(v))
|
|
end
|
|
end
|
|
|
|
return function (t)
|
|
local f = {}
|
|
for i, o in sortpairs(t) do
|
|
f[#f+1] = ('[%s]'):format(i)
|
|
for k, v in sortpairs(o) do
|
|
write_data(f, k, v)
|
|
end
|
|
f[#f+1] = ''
|
|
end
|
|
return table.concat(f, '\r\n')
|
|
end
|
|
|