[✔️]c++和lua相互调用

2023-05-25 139

版权

本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。

简介： [✔️]c++和lua相互调用

lua源码

lua官网下载lua源码，自己学习lua和c++相互调用的例子

以下2个文件不需要参与编译，原因是他们是bin文件的源代码，都有Main入口

lua.c

luac.c

加载lua文件

lua_State* L = luaL_newstate();
luaL_loadfile(L, "main.lua");
lua_pcall(L,0,0,0);
// luaL_dofile(L, "main.lua");
lua_close(L);

dofile和loadfile的区别：

#define luaL_dofile(L, fn)  (luaL_loadfile(L, fn) || lua_pcall(L, 0, LUA_MULTRET, 0))
#define luaL_loadfile(L,f)  luaL_loadfilex(L,f,NULL)

lua调用c++函数（注册全局函数）

注册函数类型：

typedef int (*lua_CFunction) (lua_State *L);

没有返回值的

print("cpp call me");

int print(lua_State* L){
    if (lua_isstring(L, -1))
    {
        cout << lua_tostring(L, -1) << endl;
    }
    return 0;
}
void main(){
    lua_State* L = luaL_newstate();
    lua_register(L, "print", print); 
    luaL_dofile(L, "test.lua");
    lua_close(L);
}

返回int,string基础类型

local sum, mul = add(100, 20);
print("sum: " .. sum);
print("mul:" .. mul)

int add(lua_State* L){
    // 参数是按照顺序依次压入栈里面
    double a = lua_tonumber(L, -1); 
    double b = lua_tonumber(L, -2);
    lua_pushnumber(L, a + b);
    lua_pushnumber(L, a * b);
    return 2;// 返回的参数个数
}
void main(){
    lua_State* L = luaL_newstate();
    lua_register(L, "add", add); 
    luaL_dofile(L, "test.lua");
    lua_close(L);
}

返回table类型

local t = returnTable();
for i, v in pairs(t) do
    print("key:" .. i .. ",value:" .. v)
end

void returnTable(){
    lua_newtable(L);// len1
    lua_pushstring(L, "age");// len2
    lua_pushstring(L, "120");// len3
    lua_rawset(L, -3);// len1
    return 1; // 此时堆栈里面就剩下newtable了
}
void main(){
    lua_State* L = luaL_newstate();
    luaopen_base(L); // 注册了一些内置的基础函数：ipairs、pairs、print
    lua_register(L, "returnTable", returnTable); 
    luaL_dofile(L, "test.lua");
    lua_close(L);
}

遇到的一个报错

attempt to call a nil value (global 'pairs')

很明显，提示找不到pairs=nil，难道pairs不是lua的关键字？

是的，这是lua的内置基础函数

cpp调用lua的变量

一般我们不需要调用lua的函数，大部分情况都是lua调用c++的实现

str="string"
int=100

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaVar.lua");
{
    // 读取全局变量，并将其放入栈顶
    lua_getglobal(L, "str");
    // 从栈顶取出字符串数据
    cout << "str=" << luaL_checkstring(L,-1)  << endl;
    lua_getglobal(L, "int");
    cout << "int=" << luaL_checkinteger(L, -1) << endl;
    cout << "len=" << lua_gettop(L) << endl; // 此时栈的大小为2
}
lua_close(L);

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaVar.lua");
{
    lua_getglobal(L, "str");
    lua_getglobal(L, "int");
    // 注意读取的顺序
    cout << "str=" << luaL_checkstring(L, 1) << endl;
    cout << "int=" << luaL_checkinteger(L, 2) << endl;
    cout << "len=" << lua_gettop(L) << endl; // 此时栈的大小为2
}
lua_close(L);

从以上2个例子中可以看出，lua_getglobal会依次将查找到的值放入栈顶，使用的时候需要栈的顺序

关于luaL_check*的api:

LUALIB_API lua_Integer luaL_checkinteger (lua_State *L, int arg) {
  int isnum;
  lua_Integer d = lua_tointegerx(L, arg, &isnum);
  if (l_unlikely(!isnum)) {
    interror(L, arg);
  }
  return d;
}
static void interror (lua_State *L, int arg) {
  if (lua_isnumber(L, arg))
    luaL_argerror(L, arg, "number has no integer representation");
  else
    tag_error(L, arg, LUA_TNUMBER);
}

lua_is*这类的函数可以判断栈中的数据类型，但是需要注意int->string的隐形转换。

cpp调用lua的table

tbl = {
    name = "lua",
    100,
    {
        id = 10,
    }
}

cpp通过key获取值

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaTable.lua");
lua_getglobal(L, "tbl"); // len=1
lua_getfield(L, -1, "name");// 此时tbl在栈顶，所以第二个参数是-1， len=2
cout << "tbl.name=" << luaL_checkstring(L, -1) << endl;
lua_close(L);

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaTable.lua");
lua_getglobal(L, "tbl"); // len=1
lua_pushstring(L, "11");// 这个是干扰项，len=2
lua_pushstring(L, "name");// len=3
// 从栈顶取出一个元素(name)并且返回把查找到的值压入栈顶
lua_gettable(L, 1); // len=3
cout << lua_tostring(L, -1);
lua_close(L);

cpp获取无序的值

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaTable.lua");
lua_getglobal(L, "tbl"); // len=1
// -1表示tbl在栈顶， 1表示取tbl[1]
lua_rawgeti(L, -1, 1);// len=2
// 将tbl[1]的值放在了栈顶，因为tbl[1]=100
cout << "tbl[1]=" << lua_tointeger(L, -1) << endl;
lua_pop(L,1); // 弹出tbl[1]的值，len=1
// 获取嵌套的table
lua_rawgeti(L,-1,2);// 此时栈顶是tbl，直接获取tbl[2]元素，len=2
lua_getfield(L,-1,"id");//将id的值放在栈顶，len=3
cout << lua_tointeger(L, -1);
lua_close(L);

cpp调用lua的函数

function add(a, b)
    return a + b;
end

lua_State* L = luaL_newstate();
luaL_dofile(L, "cppCallLuaFunction.lua");
lua_getglobal(L, "add");// len=1
lua_pushnumber(L, 10);// len=2
lua_pushnumber(L, 20);// len=3
// 2表示参数数量，1表示返回值个数，0表示错误处理函数在栈中的索引值，压入结果前会弹出函数和参数
// 弹出函数地址和所有参数，并将返回值压入栈顶
int ret = lua_pcall(L, 2, 1, 0); // len=1
cout << "add result is: " << luaL_checkinteger(L, -1) << endl;
lua_close(L);

lua栈

特点：先进后出

正数索引1永远表示栈底，负数索引-1永远表示栈顶**

lua_gettop(L); // 获取当前lua栈的大小
lua_pop(L, -1);// 弹出栈顶元素，-1弹出所有，>1弹出指定数量的元素

CPP栈操作

void test1(){
    lua_State* L = luaL_newstate();
    lua_pushstring(L, "i am string");
    lua_pushnumber(L, 100);
    if (lua_isstring(L, 1))
    {
        cout << lua_tostring(L, 1) << endl;
    }
    if (lua_isnumber(L, 2))
    {
        cout << lua_tonumber(L, 2) << endl;
    }
    lua_close(L);
}

堆栈情况如下：