blob: 5437b6325b638d375cea96ae0f53ad011d13bdcf (
plain)
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
|
local guide = require 'parser.guide'
local files = require 'files'
local timer = require 'timer'
local setmetatable = setmetatable
local log = log
local xpcall = xpcall
local mathHuge = math.huge
local weakMT = { __mode = 'kv' }
_ENV = nil
---@class vm
local m = {}
m.ID_SPLITE = '\x1F'
function m.getSpecial(source)
if not source then
return nil
end
return source.special
end
---@return string?
function m.getKeyName(source)
if not source then
return nil
end
if source.type == 'call' then
local special = m.getSpecial(source.node)
if special == 'rawset'
or special == 'rawget' then
return guide.getKeyNameOfLiteral(source.args[2])
end
end
return guide.getKeyName(source)
end
function m.getKeyType(source)
if not source then
return nil
end
if source.type == 'call' then
local special = m.getSpecial(source.node)
if special == 'rawset'
or special == 'rawget' then
return guide.getKeyTypeOfLiteral(source.args[2])
end
end
return guide.getKeyType(source)
end
---@param source parser.object
---@return parser.object?
function m.getObjectValue(source)
if source.value then
return source.value
end
if source.special == 'rawset' then
return source.args and source.args[3]
end
return nil
end
---@param source parser.object
---@return parser.object?
function m.getObjectFunctionValue(source)
local value = m.getObjectValue(source)
if value == nil then return end
if value.type == 'function' or value.type == 'doc.type.function' then
return value
end
if value.type == 'getlocal' then
return m.getObjectFunctionValue(value.node)
end
return value
end
m.cacheTracker = setmetatable({}, weakMT)
function m.flushCache()
if m.cache then
m.cache.dead = true
end
m.cacheVersion = files.globalVersion
m.cache = {}
m.cacheActiveTime = mathHuge
m.locked = setmetatable({}, weakMT)
m.cacheTracker[m.cache] = true
end
function m.getCache(name, weak)
if m.cacheVersion ~= files.globalVersion then
m.flushCache()
end
m.cacheActiveTime = timer.clock()
if not m.cache[name] then
m.cache[name] = weak and setmetatable({}, weakMT) or {}
end
return m.cache[name]
end
local function init()
m.flushCache()
-- 可以在一段时间不活动后清空缓存，不过目前看起来没有必要
--timer.loop(1, function ()
-- if timer.clock() - m.cacheActiveTime > 10.0 then
-- log.info('Flush cache: Inactive')
-- m.flushCache()
-- collectgarbage()
-- end
--end)
end
xpcall(init, log.error)
return m
|
