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

Question

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

我使用Luaplus来完成上述工作。 我的问题是：当脚本编辑器犯了诸如错误拼写参数之类的错误时，C ++应用程序将崩溃！ 我该怎么做才能防止这种情况发生？ 谢谢

Answer 1

查看lua_cpcall和lua_pcall。 它们都允许在c中调用lua的受保护函数。 如果它们返回一个非负数，则调用失败，并且lua堆栈仅包含错误字符串。 在cpcalls情况下，否则堆栈将保持不变。 对于pcall，您需要查看lua_pushcclosure以安全地调用cfunction。

您要做的是：使用所需的所有lua_ *调用创建ac函数，例如loadfile和dofile。 您可以使用lua_cpcall或lua_pushcclosure和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()
  }
}