脚本尝试创建全局变量。

2013-11-15 19:0:1
收藏：0
阅读：104
评论：1

我想将一个脚本加载到 Redis 中，以便它可以导出函数，供未来执行的脚本所依赖，但是尝试定义全局函数会失败，全局变量同样如此：

redis 127.0.0.1:6379> EVAL "function alex() return 3.1415 end" 0
(error) ERR Error running script (call to f_f24a5a054d91ccc74c2629e113f8f639bbedbfa2): user_script:1: Script attempted to create global variable 'alex'

我应该如何定义全局函数和变量？

点赞
用户70405
用户70405

查看文件 scripting.c 的源代码

/* 此函数将 metamethods 安装到全局表 _G 中，防止意外创建全局变量。
*
* 应在脚本引擎初始化可归用序列中的最后一个被调用，
* 因为它会与全局变量的创建交互。
*/
void scriptingEnableGlobalsProtection(lua_State *lua) {
    char *s[32];
    sds code = sdsempty();
    int j = 0;

    /* strict.lua来自：http://metalua.luaforge.net/
     * 参考库/strict.lua.html。
     * 修改以适应Redis。*/
    s[j++]="local mt = {}\n";
    s[j++]="setmetatable(_G, mt)\n";
    s[j++]="mt.__newindex = function (t, n, v)\n";
    s[j++]="  if debug.getinfo(2) then\n";
    s[j++]="    local w = debug.getinfo(2, \"S\").what\n";
    s[j++]="    if w ~= \"main\" and w ~= \"C\" then\n";
    s[j++]="      error(\"脚本试图创建全局变量 '\"..tostring(n)..\"'\", 2)\n";
    s[j++]="    end\n";
    s[j++]="  end\n";
    s[j++]="  rawset(t, n, v)\n";
    s[j++]="end\n";
    s[j++]="mt.__index = function (t, n)\n";
    s[j++]="  if debug.getinfo(2) and debug.getinfo(2, \"S\").what ~= \"C\" then\n";
    s[j++]="    error(\"脚本试图访问一个不存在的全局变量委托 '\"..tostring(n)..\"'\", 2)\n";
    s[j++]="  end\n";
    s[j++]="  return rawget(t, n)\n";
    s[j++]="end\n";
    s[j++]=NULL;

    for (j = 0; s[j] != NULL; j++) code = sdscatlen(code,s[j],strlen(s[j]));
    luaL_loadbuffer(lua,code,sdslen(code),"@enable_strict_lua");
    lua_pcall(lua,0,0,0);
    sdsfree(code);
}

scriptingEnableGlobalsProtection的文档字符串表明它的目的是通知脚本作者一个常见的错误（未使用local）。

这似乎不是安全功能，因此我们有两种解决方案：

可以删除此保护：

 local mt = setmetatable(_G, nil)
-- define global functions / variables
function alex() return 3.1415 end
-- return globals protection mechanizm
setmetatable(_G, mt)

或者使用 rawset：

local function alex() return 3.1415 end
rawset(_G, "alex", alex)
2013-11-15 10:19:09

作者:

用户70405

用户70405
推荐文章