Ограничение времени выполнения сценария Lua, вызываемого из API C
luaL_loadfile(mState, path.c_str());
lua_pcall(mState, 0, 0, 0);
есть ли способ ограничить время выполнения (скажем, 10-20 секунд) для этих двух операторов C++, которые загружают, а затем выполняют lua-файл?
поскольку файл Lua ненадежен, я не хочу, чтобы злонамеренный пользователь зависал программу бесконечно с бесконечным циклом в коде Lua.
пометка C, потому что Lua API-это C, пометка c++, потому что я использую c++
1 ответов
есть lua_sethook, который можно использовать, чтобы сказать интерпретатору вызвать крючок после выполнения каждой инструкции "count". Таким образом, вы можете отслеживать пользовательский скрипт и прекращать его, если он съедает свою квоту:
int lua_sethook (lua_State *L, lua_Hook f, int mask, int count);
Это также можно использовать из Lua:
debug.sethook(function() print("That's enough for today"); os.exit(0); end, "", 10000)
for i=1,10000 do end
если вы используете методы из http://lua-users.org/wiki/SandBoxes затем вы можете настроить безопасную среду выполнения с помощью sethook() и друзья полностью из Lua, а затем перейти к режим песочницы при выполнении пользовательского скрипта. Я пробовал это здесь, только для вас, чтобы начать:
-- set an execution quota
local function set_quota(secs)
local st=os.clock()
function check()
if os.clock()-st > secs then
debug.sethook() -- disable hooks
error("quota exceeded")
end
end
debug.sethook(check,"",100000);
end
-- these are the global objects, the user can use:
local env = {print=print}
-- The user code is allowed to run for 5 seconds.
set_quota(5)
-- run code under environment:
local function run(untrusted_code)
local untrusted_function, message = loadstring(untrusted_code)
if not untrusted_function then return nil, message end
setfenv(untrusted_function, env)
return pcall(untrusted_function)
end
-- here is the user code:
local userscript=[[
function fib(n)
if n<2 then return n
else return fib(n-2)+fib(n-1)
end
end
for n=1,42 do print(n,fib(n)) end
]]
-- call it:
local r,m=run(userscript)
print(r,m)
это должно печатать значения fib () в течение 5 секунд, а затем показывать ошибку.