c语言怎么调用lua库函数,在C语言中调用lua实现的回调函数

在内嵌的lua代码中，想要实现以下功能：

function callback(n)

print("function callback " .. n);

end;

save_callback(callback, "aaa")

invoke_callback() -- 这里打印出function callback aaa

save_callback(function(n)

print("anonymous function callback " .. n);

end

, 1)

invoke_callback() -- 这里打印出anonymous function callback 1

即：save_callback函数传入回调函数对象和1个参数，然后在任意时刻使用保存的参数和函数对象进行回调。

以下是实现的C代码：

#include

#include

int callback_indicie;

int param_indicie;

/* by superarhow, 2014/03/04 */

int save_callback(lua_State* L)

{

param_indicie = lua_ref(L, 1);

callback_indicie = lua_ref(L, 1);

return 0;

}

int invoke_callback(lua_State* L)

{

lua_getref(L, callback_indicie);

lua_getref(L, param_indicie);

int ret = lua_pcall(L, 1, 0, 0);

if (ret != 0) {

lua_error(L);

}

return 0;

}

int main(int argc, char** argv)

{

lua_State* lua = lua_open();

luaL_openlibs(lua);

lua_register(lua, "save_callback", save_callback);

lua_register(lua, "invoke_callback", invoke_callback);

luaL_dofile(lua, "test.lua");

lua_close(lua);

return 0;

}

注意：

* 因为是例子程序所以用全局变量来保存回调函数和其参数的索引，实际应用中应与其对象关联。可以用C closure实现关联对象，也可以往lua_State中存入全局light userdata指针；

* 注意lua_ref这个函数：lua_ref(L, 1) -> 这里的1不是栈索引，而是指"是否加锁"，0为不加锁，非0为加锁。偶使用的版本还不支持不加锁。

另外，lua_ref是luaL_ref的简化版本，luaL_ref要求提供一个table指出ref之后的变量应该保存在哪个位置(否则的话你就再也找不到它了。什么？用栈索引？要知道lua为每次函数调用都新分配了一个栈的，因此在离开作用域之后，栈索引就失效了。)lua_ref使用全局table LUA_REGISTRYINDEX来存放ref。它假设你不会对LUA_REGISTRYINDEX这个table进行增删改的操作，因此返回的这个索引(指向在LUA_REGISTRYINDEX表中的array part部份的位置)是一直有效的。

既然没有提供栈索引，那么它是对哪个对象创建引用？它会对栈尾(最后一个入栈的)对象增加引用计数，保并且会pop掉它。会不会破坏栈平衡？前面已经说过lua会为每次函数调用分配一个新的栈，因此只要这个函数内没有后续操作就可以不用管它。

* 例子中没有调用lua_unref。实际使用时要在使用完毕后调用lua_unref释放掉这些引用。