安全Lua调用C++注册函数

Question

嘿，大家好！我有一个嵌入Lua脚本的C++应用程序。非程序员编辑Lua脚本，然后C++应用程序调用Lua脚本，Lua脚本也调用C++注册函数。

我使用Luaplus来完成上述工作。我的问题是：当脚本编辑器出错时，如错误的参数，C++应用程序崩溃！我能做些什么来防止这种情况发生？谢谢

Answer 1

看看lua_cpcall和lua_pcall。它们都允许c中的lua的保护函数调用。如果他们返回一个非负数，那么调用失败，并且lua堆栈只包含错误字符串。在cpcalls情况下，堆栈是未修改的。对于pcall，您需要查看lua_pushcclosure来安全地调用cfunction。

你要做的是：你创建一个c函数，包含所有你想要的lua_ *调用，比如loadfile和dofile。您可以使用lua_cpcall或lua_pushcclosure amd lua_pcall调用此函数。这允许您检测您传递给cpcall的函数是否发生了错误。

实例：

function hello() { 
    string hello_ = "Hello Lua!"; 
    struct C { 
    static int call(lua_State* L) { 
     C *p = static_cast<C*>(lua_touserdata(L,-1)); 
     lua_pushstring(L, p->str.c_str()); 
     lua_getglobal(L, "print"); 
     lua_call(L, 1, 0); //ok 
     lua_pushstring(L, p->str.c_str()); 
     lua_getglobal(L, "notprint"); 
     lua_call(L, 1, 0); //error -> longjmps 
     return 0; //Number of values on stack to 'return' to lua 
    } 
    const string& str; 
    } p = { hello_ }; 
    //protected call of C::call() above 
    //with &p as 1st/only element on Lua stack 
    //any errors encountered will trigger a longjmp out of lua and 
    //return a non-0 error code and a string on the stack 
    //A return of 0 indicates success and the stack is unmodified 
    //to invoke LUA functions safely use the lua_pcall function 
    int res = lua_cpcall(L, &C::call, &p); 
    if(res) { 
    string err = lua_tostring(L, -1); 
    lua_pop(L, 1); 
    //Error hanlder here 
    } 
    //load a .lua file 
    if((res=luaL_loadfile(L, "myLuaFile.lua"))) { 
    string err = lua_tostring(L, -1); 
    lua_pop(L, 1); 
    //res is one of 
    //LUA_ERRSYNTAX - Lua syntax error 
    //LUA_ERRMEM - Out of memory error 
    //LUE_ERRFILE - File not found/accessible error 
    } 
    //execute it 
    if((res=lua_pcall(L,0,0,0))) { 
    string err = lua_tostring(L, -1); 
    lua_pop(L, 1); 
    // res is one of 
    // LUA_ERRRUN: a runtime error. 
    // LUA_ERRMEM: memory allocation error. 
    // LUA_ERRERR: error while running the error handler function (NULL in this case). 
    } 
    // try to call [a_int,b_str] = Foo(1,2,"3") 
    lua_getglobal(L,"Foo"); 
    if(lua_isfunction(L,lua_gettop(L))) { //Foo exists 
    lua_pushnumber(L,1); 
    lua_pushnumber(L,2); 
    lua_pushstring(L,"3"); 
    lua_pushvalue(L, -4); //copy of foo() 

    if((res = lua_pcall(L, 3, 2, 0/*default error func*/))) { 
     string err = lua_tostring(L, -1); 
     lua_pop(L, 1); 
     //error: see above 
    } 
    int a_int = (int)lua_tointeger(L,-2); 
    string b_str = lua_tostring(L,-1); 
    lua_pop(L,2+1); //2 returns, + extra copy of Foo() 
    } 
}