Lua：将上下文传递到加载字符串中？

Question

我试图将上下文传递到一个动态表达式中，我会评估 for 循环的每次迭代。我知道加载字符串仅在全局上下文中计算，这意味着局部变量不可访问。就我而言，为了字符串评估的目的，我通过将本地转换为全局来解决此限制。这就是我所拥有的：

require 'cosmo'

model = { { player = "Cliff", age = 35, gender = "male" }, { player = "Ally", age = 36, gender = "female" }, { player = "Jasmine", age = 13, gender = "female" }, { player = "Lauren", age = 6.5, gender = "female" } }

values = { eval = function(args)
    output = ''
    condition = assert(loadstring('return ' .. args.condition))
    for _, it in ipairs(model) do
        each = it
        if condition() then
            output = output .. each.player .. ' age: ' .. each.age .. ' ' .. '\n'
        end
    end
    return output
end }
template = "$eval{ condition = 'each.age < 30' }"

result = cosmo.fill(template, values)
print (result)

我的最终目标（除了掌握 Lua 之外）是构建一个类似 XSLT 的诱人引擎，我可以在其中执行以下操作：

apply_templates{ match = each.age > 30}[[<parent-player>$each.player</parent-player>]]

apply_templates{ match = each.age > 30}[[<child-player>$each.player</child-player>]]

...并生成不同的输出。目前，我仍坚持上述通过全球分享本地背景的鹰派方式。这里有人对我如何去做我想做的事情有更好的见解吗？

Answer 1

值得注意的是 setfenv 已从 Lua 5.2 中删除，并且 < code>loadstring 已弃用。 5.2 是相当新的，所以你暂时不必担心它，但可以编写一个适用于两个版本的加载例程：

local function load_code(code, environment)
    if setfenv and loadstring then
        local f = assert(loadstring(code))
        setfenv(f,environment)
        return f
    else
        return assert(load(code, nil,"t",environment))
    end
end

local context = {}
context.string = string
context.table = table
-- etc. add libraries/functions that are safe for your application.
-- see: http://lua-users.org/wiki/SandBoxes
local condition = load_code("return " .. args.condition, context)

版本 5.2 的 load 处理旧的 loadstring 行为并设置环境（上下文，在你的例子中）。 5.2 版本还改变了环境的概念，因此loadstring< /code> 可能是您最不用担心的。尽管如此，还是值得考虑一下，这样可能会为自己节省一些工作。

Answer 2

您可以使用 setfenv()。这基本上允许您将加载的函数沙箱到它自己的私有环境中。像下面这样的东西应该可以工作：

local context = {}
local condition = assert(loadstring('return ' .. args.condition))
setfenv(condition, context)
for _, it in ipairs(model) do
    context['each'] = it
    if condition() then
        -- ...

这也将防止条件值能够访问您不希望它访问的任何数据，或者更重要的是，修改您不希望它访问的任何数据。但请注意，您需要将任何顶级绑定公开到您希望 condition 能够访问的 context 表中（例如，如果您希望它有权访问 math 包，那么您需要将其粘贴到 context 中）。或者，如果您对具有全局访问权限的 condition 没有任何问题，并且您只是想处理不使本地成为全局的问题，则可以在 context 上使用元表让它将未知索引传递给 _G：

setmetatable(context, { __index = _G })