Lua接口学习
今天在程序里面使用lua_call,导致程序没有任何错误提示直接退出，找了好久原因，才知道lua_call不是一个受保护的方法，如果其中发生错误，会导致宿主程序直接退出
直到看到
这篇文章才恍然大悟：最后查看
官方文档，更换使用了lua_pcall。
没有错误的问题真心可怕啊。。。
为何使用lua_atpanic
当调用无保护的lua_call后，如果调用栈发生错误(lua_error)，那么默认行为是直接退出宿主程序。（可以参考这篇文章)
要避免这样的情况，一种方法是定义自己的panic函数，并作为参数调用lua_atpanic；此外为了避免退出宿主程序，自定义的panic函数应该永不返回（通常是做一个长跳转，令其跳转至lua_call调用点，不过这种做法几乎与lua_pcall无异)
lua_atpanic 1. lua_atpanic设置新panic函数并返回旧的panic函数。
2. 当在无保护环境下发生错误，lua调用当前的panic函数并呼叫exit(EXIT_FAILURE)退出宿主程序。
3. 我们可以提供自己的panic函数以避免退出宿主程序。（一种方法是做一个长跳转(long jump)）
4. panic函数可以访问位于栈顶的错误讯息。
示例
#include <lua.h>
#include <lauxlib.h>
#include <lualib.h>
#include <stdio.h>
#include <setjmp.h> static jmp_buf jbuf; int
panichandler(lua_State *L)
printf("%s\n", lua_tostring(L, 1));
lua_pop(L, 1);
longjmp(&jbuf, 1);
}
int main(int argc, char *argv[])
lua_State *L;
int ret = 0;
if ((L = lua_open()) == NULL) {
printf("lua_open() failed!\n");
return 1;
} luaL_openlibs(L);
lua_atpanic(L, panichandler);
if (luaL_loadfile(L, "main.lua") == 0) {
if (setjmp(&jbuf) == 0) /* first jmp */
lua_call(L, 0, 0);
else /* second jmp, error */
ret = 1; else
ret = 1; lua_close(L);
return ret;
}
luaL_checkxxx和luaL_argcheck内部调用luaL_error，luaL_error内部调用lua_error,在调用lua_error前会格式化错误信息压入栈顶，最后调用lua_error，lua_error不会返回，而是做一个长跳转。所以在C函数中使用return luaL_error也不会返回，而是跳转到调用lua_pcall点 即lua_pcall返回。
C库函数的例子
int dir(lua_State *L)
{
HANDLE h;
WIN32_FIND_DATAA fd;
const char *dirpath;
dirpath = luaL_checkstring(L, 1); /* 一旦出错立刻压入错误，并从lua_pcall返回,luaL_error也一样 */
if ((h = FindFirstFileA(dirpath, &fd)) == INVALID_HANDLE_VALUE)
return luaL_error(L, "failed to find '%s', win32 error code %d", dirpath, GetLastError());
return 0;
}
lua_error在内部调用luaD_throw函数：
void luaD_throw (lua_State *L, int errcode) {
if (L->errorJmp) {
L->errorJmp->status = errcode;
LUAI_THROW(L, L->errorJmp);
}
else {
L->status = cast_byte(errcode);
if (G(L)->panic) {
resetstack(L, errcode);
lua_unlock(L);
G(L)->panic(L);
}
exit(EXIT_FAILURE);
}
}
1. 当一个跳转点存在时，lua_error将做一个长跳转
2. 否则调用一个panic函数(如果存在)，并退出宿主程序。
现在的问题是跳转点何时会存在,位于何处?
答案：LUA库函数中运行于保护模式的函数会设置跳转点，这包括lua_pcall, lua_cpcall, 以及由此函数衍生的一系列宏（如lua_dofile, luaL_dostring等)
观察lua_pcall的源码，该函数调用luaD_rawrunprotected
int luaD_rawrunprotected (lua_State *L, Pfunc f, void *ud) {
struct lua_longjmp lj;
lj.status = 0;
lj.previous = L->errorJmp; /* chain new error handler */
L->errorJmp = &lj;
LUAI_TRY(L, &lj,
(*f)(L, ud);
);
L->errorJmp = lj.previous; /* restore old error handler */
return lj.status;
}
这段代码显示了设置跳转点的过程。相比之下无保护的lua_call就没有类似的代码。
1.调用lua_pcall后，如果调用栈上发生任何错误(即lua_error被调用)，lua_error将直接跳转至lua_pcall的调用点，并从lua_pcall返回。
2.调用lua_call后发生错误，lua_error将直接调用panic函数并退出宿主程序；除非通过设置自定义panic函数永不返回（通常是做长跳转以避免退出）。
当使用lua_call时，用lua_atpanic为其设置panic函数
为何使用lua_atpanic
当调用无保护的lua_call后，如果调用栈发生错误(lua_error)，那么默认行为是直接退出宿主程序。要避免这样的情况，一种方法是定义自己的panic函数，并作为参数调用lua_atpanic；此外为了避免退出宿主程序，自定义的panic函数应该永不返回（通常是做一个长跳转，令其跳转至lua_call调用点，不过这种做法几乎与lua_pcall无异)
1. lua_atpanic设置新panic函数并返回旧的panic函数。
2. 当在无保护环境下发生错误，lua调用当前的panic函数并呼叫exit(EXIT_FAILURE)退出宿主程序。
3. 我们可以提供自己的panic函数以避免退出宿主程序。（一种方法是做一个长跳转(long jump)）
4. panic函数可以访问位于栈顶的错误讯息。
示例
#include <lua.h>
#include <lauxlib.h>
#include <lualib.h>
#include <stdio.h>
#include <setjmp.h>
static jmp_buf jbuf;
int
panichandler(lua_State *L)
{
printf("%s\n", lua_tostring(L, 1));
lua_pop(L, 1);
longjmp(&jbuf, 1);
}
int main(int argc, char *argv[])
{
lua_State *L;
int ret = 0;
if ((L = lua_open()) == NULL)
｛
printf("lua_open() failed!\n");
return 1;
}
luaL_openlibs(L);
lua_atpanic(L, panichandler);
if (luaL_loadfile(L, "main.lua") == 0)
{
if (setjmp(&jbuf) == 0) /* first jmp */
lua_call(L, 0, 0);
else /* second jmp, error */
ret = 1;
}
else
ret = 1;
lua_close(L);
return ret;
}
