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
|
function send(text)
local text = tostring(text)
local len = #output
if len < 1 then
output = { text }
else
output[len] = output[len] .. text
end
end
function sendln(text)
send(text)
table.insert(output, "")
end
local env = { print = send,
println = sendln,
args = args,
input = input,
user = user,
channel = channel,
request = download,
pairs = pairs,
table = table,
string = string,
tostring = tostring,
tonumber = tonumber,
math = math }
local f, e = load(factoid, nil, nil, env)
-- Check if the factoid timed out
function checktime(event, line)
if os.time() - time >= timeout then
error("Timed out after " .. timeout .. " seconds", 0)
else
-- Limit the cpu usage of factoids
sleep(1)
end
end
-- Add timeout hook
time = os.time()
timeout = 30
debug.sethook(checktime, "l")
if f then
f()
else
error(e)
end
|