我正在尝试在 Lua 中加载以下 C 库:
#include <stdio.h>
#include <stdlib.h>
#include <lua.h>
#include <lualib.h>
#include <lauxlib.h>
void stackDump(lua_State* lua)
{
int i, t;
int top = lua_gettop(lua);
printf("Stack dump: ");
for (i = 1; i <= top; i++)
{
t = lua_type(lua, i);
switch (t)
{
case LUA_TSTRING:
printf("\"%s\"", lua_tostring(lua, i));
break;
case LUA_TBOOLEAN:
printf(lua_toboolean(lua, i) ? "true" : "false");
case LUA_TNUMBER:
printf("%g", lua_tonumber(lua, i));
break;
default:
printf("%s", lua_typename(lua, t));
break;
}
if (i < top)
printf(", ");
}
printf("\n");
}
int myPrint(lua_State* lua)
{
stackDump(lua);
const char* str = luaL_checkstring(lua, 1);
printf("myPrint: %s\n", str);
lua_newtable(lua);
lua_pushinteger(lua, 1);
lua_pushstring(lua, "myPrint");
lua_settable(lua, -3);
lua_pushinteger(lua, 2);
lua_pushstring(lua, str);
lua_settable(lua, -3);
return 2;
}
static const struct luaL_Reg myScrewedLib[] = {
{"myPrint", myPrint},
{NULL, NULL}
};
int luaopen_myScrewedLib(lua_State* lua)
{
luaL_newlib(lua, myScrewedLib);
printf("SCREW IT\n");
return 1;
}
我正在编译这个文件:
gcc -Wall -fpic -llua -shared -o myScrewedLib.so tut1.c
在解释器中运行时,我看到以下内容:
$ lua
Lua 5.2.2 Copyright (C) 1994-2013 Lua.org, PUC-Rio
> local m = require("myScrewedLib")
SCREW IT
> for k, v in pairs(m) do print(k, v) end
stdin:1: bad argument #1 to 'pairs' (table expected, got nil)
stack traceback:
[C]: in function 'pairs'
stdin:1: in main chunk
[C]: in ?
>
我没想到m
会在nil
这里。这本书提到了使用lua_pushcfunction()
但仅当它是一种“快速而肮脏的方式”[1] 从解释器运行函数时。使用此 C 文件中的方法的其他示例不使用lua_pushcfunction()
,因为它们暗示luaL_Reg
结构是 Lua 知道可以调用什么的方式[2]。
[1] Lua 第 3 版中的编程,第 274 页
[2] Lua 第 3 版中的编程,第 279 页