1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
--!A cross-platform build utility based on Lua
--
-- Licensed under the Apache License, Version 2.0 (the "License");
-- you may not use this file except in compliance with the License.
-- You may obtain a copy of the License at
--
-- http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.
--
-- Copyright (C) 2015 - 2019, TBOOX Open Source Group.
--
-- @author OpportunityLiu
-- @file dump.lua
--
-- define module
local dump = dump or {}
-- load modules
local colors = require("base/colors")
local table = require("base/table")
-- print string
function dump._print_string(str, as_key)
local quote = (not as_key) or (not str:match("^[a-zA-Z_][a-zA-Z0-9_]*$"))
if quote then
io.write(colors.translate("${reset}${color.dump.string_quote}\"${reset}${color.dump.string}", { patch_reset = false }))
else
io.write(colors.translate("${reset}${color.dump.string}", { patch_reset = false }))
end
io.write(str)
if quote then
io.write(colors.translate("${reset}${color.dump.string_quote}\"${reset}", { patch_reset = false }))
else
io.write(colors.translate("${reset}", { patch_reset = false }))
end
end
-- print keyword
function dump._print_keyword(keyword)
io.write(colors.translate("${color.dump.keyword}" .. tostring(keyword)))
end
-- print number
function dump._print_number(num)
io.write(colors.translate("${color.dump.number}" .. tostring(num)))
end
-- print function
function dump._print_function(func, as_key)
if as_key then
return dump._print_default(func)
end
local funcinfo = debug.getinfo(func)
local srcinfo = funcinfo.short_src
if funcinfo.linedefined >= 0 then
srcinfo = srcinfo .. ":" .. funcinfo.linedefined
end
io.write(colors.translate("${color.dump.function}function ${bright}" .. (funcinfo.name or "") .. "${reset}${dim}" .. srcinfo))
end
-- print value with default format
function dump._print_default(value)
io.write(colors.translate("${color.dump.default}", { patch_reset = false }))
local fmt = colors.theme():get("text.dump.default_format") or "%s"
io.write(string.format(fmt, value))
io.write(colors.translate("${reset}", { patch_reset = false }))
end
-- print scalar value
function dump._print_scalar(value, as_key)
if type(value) == "nil" then
dump._print_keyword("nil")
elseif type(value) == "boolean" then
dump._print_keyword(value)
elseif type(value) == "number" then
dump._print_number(value)
elseif type(value) == "string" then
dump._print_string(value, as_key)
elseif type(value) == "function" then
dump._print_function(value, as_key)
else
dump._print_default(value)
end
end
-- print table
function dump._print_table(value, first_indent, remain_indent)
io.write(first_indent .. colors.translate("${dim}{"))
local inner_indent = remain_indent .. " "
local is_arr = table.is_array(value)
local first_value = true
for k, v in pairs(value) do
if first_value then
io.write("\n")
first_value = false
else
io.write(",\n")
end
io.write(inner_indent)
if not is_arr or type(k) ~= "number" then
dump._print_scalar(k, true)
io.write(colors.translate("${dim} = "))
end
if type(v) == "table" then
dump._print_table(v, "", inner_indent)
else
dump._print_scalar(v)
end
end
if first_value then
io.write(colors.translate(" ${dim}}"))
else
io.write("\n" .. remain_indent .. colors.translate("${dim}}"))
end
end
-- print value
function dump._print(value, indent)
indent = indent or ""
if type(value) == "table" then
dump._print_table(value, indent, indent:gsub(".", " "))
else
io.write(indent)
dump._print_scalar(value)
end
end
return dump._print
|
