C中调用Lua函数
我们先来看一个简单的例子：
lua_State* L = NULL;// 内部调用lua函数
double f(double x, double y)
{
double z;
lua_getglobal(L, "f"); // 获取lua函数f
lua_pushnumber(L, x); // 压入参数x和y
lua_pushnumber(L, y);
if(lua_pcall(L, 2, 1, 0) != 0)
error(L, "error running function 'f': %s", lua_tostring(L, -1));
if(!lua_isnumber(L, -1))
error(L, "function 'f' must return a number");
z = lua_tonumber(L, -1);
lua_pop(L, 1);
return z;
}
int main(void)
{
L = lua_open();
luaL_openlibs(L);
if(luaL_loadfile(L, "c:\\luatest\\functest.lua") || lua_pcall(L, 0, 0, 0))
error(L, "cannot run configuration file: %s", lua_tostring(L, -1));
printf("%f\n", f(1.0, 2.0));
return 0;
}
functest.lua：
f =function(a, b)
returna + b
end
这其中最关键的是调用函数的使用，在C中调用Lua函数的API主要由以下几个：
（1）void lua_call (lua_State *L, int nargs, int nresults);
函数调用，nargs表示参数的个数，nresults表示返回值的个数
首先将lua函数压栈，然后将参数依次压栈，最后调用函数即可
函数调用时，参数和函数都会pop出栈，调用返回后，结果会push进栈
nresults==LUA_MULTRET，所有的返回值都会push进栈
nresults!=LUA_MULTRET，返回值个数根据nresults来调整
Lua语句：
a = f("how", t.x,14)
在C中的实现：
lua_getglobal(L, "f"); // 函数入栈
lua_pushstring(L, "how"); // 参数1入栈
lua_getglobal(L, "t"); // 表t入栈
lua_getfield(L, -1, "x"); // 参数2入栈
lua_remove(L, -2); // 跳t出栈
lua_pushinteger(L, 14); // 参数3入栈
lua_call(L, 3, 1); // 调用函数，参数和函数都会出栈
lua_setglobal(L, "a"); // 给a赋值，栈顶出栈
上述代码执行完毕后，堆栈状态恢复原样。
（2）int lua_pcall (lua_State *L, int nargs, int nresults, int msgh);
函数调用，在安全模式下，并且可以添加错误处理函数。
如果调用期间发生error，lua_pcall会捕获之，然后push stack一个错误信息(会先将函数和参数pop出栈)，并且返回一个error code（非0的一个值）。
发生error时，如果指定了错误处理函数，会在error message入栈前调用错误处理函数，具体由msgh参数来决定：
（1）msgh==0，不指定错误处理函数，入栈信息不变；
（2）msgh!=0，msgh表示错误处理函数的堆栈index，错误处理函数会以error message为参数，并将返回的新的error message入栈。主要用来给error message添加 更多的debug信息，比如堆栈跟踪，因为这些信息在pcall调用完之后是收集不到的。
函数返回代码：
LUA_OK(0)：调用成功
LUA_ERRRUN：runtime error
LUA_ERRMEM：内存分配错误，这种情况下不会调用错误处理函数
LUA_ERRERR：调用错误处理函数时出错，当然，不会再进一步调用错误处理函数
LUA_ERRGCMM：调用metamethod.__gc时报错，由gc引起，和函数本身没关系
（3）int lua_pcallk (lua_State *L, int nargs, int nresults, int errfunc, int ctx, lua_CFunction k);
函数调用，在安全模式下，并且允许函数yield。
