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
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
|
local lni = require 'lni'
local fs = require 'bee.filesystem'
local function mergeEnum(lib, locale)
if not lib or not locale then
return
end
local pack = {}
for _, enum in ipairs(lib) do
if enum.enum then
pack[enum.enum] = enum
end
end
for _, enum in ipairs(locale) do
if pack[enum.enum] then
pack[enum.enum].description = enum.description
end
end
end
local function mergeField(lib, locale)
if not lib or not locale then
return
end
local pack = {}
for _, field in ipairs(lib) do
if field.field then
pack[field.field] = field
end
end
for _, field in ipairs(locale) do
if pack[field.field] then
pack[field.field].description = field.description
end
end
end
local function mergeLocale(libs, locale)
if not libs or not locale then
return
end
for name in pairs(locale) do
if libs[name] then
libs[name].description = locale[name].description
mergeEnum(libs[name].enums, locale[name].enums)
mergeField(libs[name].fields, locale[name].fields)
end
end
end
local function mergeSource(alllibs, name, lib)
if not lib.source then
alllibs.global[name] = { lib = lib, child = {} }
return
end
for _, source in ipairs(lib.source) do
local sourceName = source.name or name
if source.type == 'global' then
alllibs.global[sourceName] = { lib = lib, child = {} }
elseif source.type == 'library' then
alllibs.library[sourceName] = { lib = lib, child = {} }
elseif source.type == 'object' then
alllibs.object[sourceName] = { lib = lib, child = {} }
end
end
end
local function insert(tbl, name, key, value)
if not name or not key then
return
end
if not tbl[name] then
tbl[name] = {}
end
if not tbl[name].child then
tbl[name].child = {}
end
tbl[name].child[key] = value
end
local function mergeParent(alllibs, name, lib)
for _, parent in ipairs(lib.parent) do
if parent.type == 'global' then
insert(alllibs.global, parent.name, name, lib)
elseif parent.type == 'library' then
insert(alllibs.library, parent.name, name, lib)
elseif parent.type == 'object' then
insert(alllibs.object, parent.name, name, lib)
end
end
end
local function mergeLibs(alllibs, libs)
if not libs then
return
end
for name, lib in pairs(libs) do
if lib.parent then
mergeParent(alllibs, name, lib)
else
mergeSource(alllibs, name, lib)
end
end
end
local function loadLocale(language, relative)
local localePath = ROOT / 'locale' / language / relative
local localeBuf = io.load(localePath)
if localeBuf then
local locale = table.container()
xpcall(lni.classics, log.error, localeBuf, localePath:string(), {locale})
return locale
end
return nil
end
local function init()
local language = require 'language'
local alllibs = {
global = table.container(),
library = table.container(),
object = table.container(),
}
for path in io.scan(ROOT / 'libs') do
local libs
local buf = io.load(path)
if buf then
libs = table.container()
xpcall(lni.classics, log.error, buf, path:string(), {libs})
end
local relative = fs.relative(path, ROOT)
local locale = loadLocale('en-US', relative)
mergeLocale(libs, locale)
if language ~= 'en-US' then
locale = loadLocale(language, relative)
mergeLocale(libs, locale)
end
mergeLibs(alllibs, libs)
end
function alllibs:get(type, parent, child)
local info = self[type] and self[type][parent]
if not info then
return nil
end
if child then
return info.child[child]
else
return info.lib
end
end
return alllibs
end
return init()
|
