因此,Lua似乎是在我的应用程序中实现安全的“用户脚本”的理想选择。
但是,大多数嵌入lua的示例似乎都包括加载所有标准库,包括“ io”和“ package”。
因此,我可以从解释器中排除这些库,但是即使是基础库也包含访问文件系统的函数“ dofile”和“ loadfile”。
我如何才能删除/阻止任何此类不安全的函数,而又不以没有“ ipairs”函数之类的基本东西的解释器结尾呢?
Answers:
这是Lua 5.2(包括在5.1中也可以使用的示例环境)的解决方案:
-- save a pointer to globals that would be unreachable in sandbox
local e=_ENV
-- sample sandbox environment
sandbox_env = {
ipairs = ipairs,
next = next,
pairs = pairs,
pcall = pcall,
tonumber = tonumber,
tostring = tostring,
type = type,
unpack = unpack,
coroutine = { create = coroutine.create, resume = coroutine.resume,
running = coroutine.running, status = coroutine.status,
wrap = coroutine.wrap },
string = { byte = string.byte, char = string.char, find = string.find,
format = string.format, gmatch = string.gmatch, gsub = string.gsub,
len = string.len, lower = string.lower, match = string.match,
rep = string.rep, reverse = string.reverse, sub = string.sub,
upper = string.upper },
table = { insert = table.insert, maxn = table.maxn, remove = table.remove,
sort = table.sort },
math = { abs = math.abs, acos = math.acos, asin = math.asin,
atan = math.atan, atan2 = math.atan2, ceil = math.ceil, cos = math.cos,
cosh = math.cosh, deg = math.deg, exp = math.exp, floor = math.floor,
fmod = math.fmod, frexp = math.frexp, huge = math.huge,
ldexp = math.ldexp, log = math.log, log10 = math.log10, max = math.max,
min = math.min, modf = math.modf, pi = math.pi, pow = math.pow,
rad = math.rad, random = math.random, sin = math.sin, sinh = math.sinh,
sqrt = math.sqrt, tan = math.tan, tanh = math.tanh },
os = { clock = os.clock, difftime = os.difftime, time = os.time },
}
function run_sandbox(sb_env, sb_func, ...)
local sb_orig_env=_ENV
if (not sb_func) then return nil end
_ENV=sb_env
local sb_ret={e.pcall(sb_func, ...)}
_ENV=sb_orig_env
return e.table.unpack(sb_ret)
end
然后使用它,您将my_func
像下面这样调用函数():
pcall_rc, result_or_err_msg = run_sandbox(sandbox_env, my_func, arg1, arg2)
setfenv
已从5.2中删除:lua.org/work/doc/manual.html#8.2
清除不良情况的最简单方法之一是首先加载您自己设计的Lua脚本,该脚本执行以下操作:
load = nil
loadfile = nil
dofile = nil
或者,您可以setfenv
用来创建一个受限的环境,可以在其中插入特定的安全功能。
完全安全的沙箱有点难。如果您从任何地方加载代码,请注意,预编译的代码可能会使Lua崩溃。如果没有关闭系统,甚至完全受限制的代码也可能陷入无限循环并无限期地阻塞。
如果您使用的是Lua 5.1,请尝试以下操作:
blockedThings = {'os', 'debug', 'loadstring', 'loadfile', 'setfenv', 'getfenv'}
scriptName = "user_script.lua"
function InList(list, val)
for i=1, #list do if list[i] == val then
return true
end
end
local f, msg = loadfile(scriptName)
local env = {}
local envMT = {}
local blockedStorageOverride = {}
envMT.__index = function(tab, key)
if InList(blockedThings, key) then return blockedStorageOverride[key] end
return rawget(tab, key) or getfenv(0)[key]
end
envMT.__newindex = function(tab, key, val)
if InList(blockedThings, key) then
blockedStorageOverride[key] = val
else
rawset(tab, key, val)
end
end
if not f then
print("ERROR: " .. msg)
else
setfenv(f, env)
local a, b = pcall(f)
if not a then print("ERROR: " .. b) end
end
您可以覆盖(禁用)所需的任何Lua函数,还可以使用元表进行更多控制。
local env = {ipairs=ipairs}
。而且,如果您要在交互式lua cli上运行此程序,请将整个程序包装成一个do ... end
循环,这样就不会丢失本地变量。