Lua教程(十九):C调用Lua(lua调用C函数,获取堆栈)干货分享

随心笔谈1年前 (2023)发布 admin
97 0



1. 基础:

    Lua的一项重要用途就是作为一种配置语言。现在从一个简单的示例开始吧。

 

复制代码 代码如下:

    –这里是用Lua代码定义的窗口大小的配置信息

    width=200

    height=300

 

    下面是读取配置信息的C/C++代码:  

复制代码 代码如下:

#include

#include

#include

#include

#include <lualib.h>

void load(lua_State* L, const char* fname, int* w, int* h) {

    if (luaL_loadfile(L,fname) || lua_pcall(L,0,0,0)) {

        printf(“Error Msg is %s.\n”,lua_tostring(L,-1));

        return;

    }

    lua_getglobal(L,”width”);

    lua_getglobal(L,”height”);

    if (!lua_isnumber(L,-2)) {

        printf(“‘width’ should be a number\n” );

        return;

    }

    if (!lua_isnumber(L,-1)) {

        printf(“‘height’ should be a number\n” );

        return;

    }

    *w=lua_tointeger(L,-2);

    *h=lua_tointeger(L,-1);

}

int main()

{

    lua_State* L=luaL_newstate();

    int w,h;

    load(L,”D:/test.lua”,&w,&h);

    printf(“width=%d, height=%d\n”,w,h);

    lua_close(L);

    return 0;

}

下面是针对新函数的解释:

    lua_getglobal是宏,其原型为:#define lua_getglobal(L,s)  lua_getfield(L, LUA_GLOBALSINDEX, (s))。

    每次调用这个宏的时候,都会将Lua代码中与之相应的全局变量值压入栈中,第一次调用时将全局变量”width”的值压入栈中,之后再次调用时再将”height”的值也压入栈中。

    2. table操作:

    我们可以在C语言的代码中操作Lua中的table数据,这是一个非常非常方便且实用的功能。这样不仅可以使Lua代码的结构更加清晰,也可以在C语言代码中定义等同的结构体与之对应,从而大大提高代码的可读性。见如下代码:

复制代码 代码如下:

#include

#include

#include

#include

#include <lualib.h>

void load(lua_State* L) {

    if (luaL_loadstring(L,”background={ r=0.30, g=0.10, b=0 }”)

        || lua_pcall(L,0,0,0)) {

        printf(“Error Msg is %s.\n”,lua_tostring(L,-1));

        return;

    }

    lua_getglobal(L,”background”);

    if (!lua_istable(L,-1)) {

        printf(“‘background’ is not a table.\n” );

        return;

    }

    lua_getfield(L,-1,”r”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int r=(int)(lua_tonumber(L,-1) * 255);

    lua_pop(L,1);

    lua_getfield(L,-1,”g”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int g=(int)(lua_tonumber(L,-1) * 255);

    lua_pop(L,1);

    lua_pushnumber(L,0.4);

    lua_setfield(L,-2,”b”);

    lua_getfield(L,-1,”b”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int b=(int)(lua_tonumber(L,-1) * 255);

    printf(“r=%d, g=%d, b=%d\n”,r,g,b);

    lua_pop(L,1);

    lua_pop(L,1);

    return;

}

int main()

{

    lua_State* L=luaL_newstate();

    load(L);

    lua_close(L);

    return 0;

}

void lua_getfield(lua_State *L, int idx, const char *k); 第二个参数是table变量在栈中的索引值,最后一个参数是table的键值,该函数执行成功后会将字段值压入栈中。

void lua_setfield(lua_State *L, int idx, const char *k); 第二个参数是table变量在栈中的索引值,最后一个参数是table的键名称,而字段值是通过上一条命令lua_pushnumber(L,0.4)压入到栈中的,该函数在执行成功后会将刚刚压入的字段值弹出栈。

下面的代码示例是在C语言代码中构造table对象,同时初始化table的字段值,最后再将table对象赋值给Lua中的一个全局变量。

复制代码 代码如下:

#include

#include

#include

#include

#include <lualib.h>

void load(lua_State* L)

{

    lua_newtable(L);

    lua_pushnumber(L,0.3);

    lua_setfield(L,-2,”r”);

    lua_pushnumber(L,0.1);

    lua_setfield(L,-2,”g”);

    lua_pushnumber(L,0.4);

    lua_setfield(L,-2,”b”);

    lua_setglobal(L,”background”);

    lua_getglobal(L,”background”);

    if (!lua_istable(L,-1)) {

        printf(“‘background’ is not a table.\n” );

        return;

    }

    lua_getfield(L,-1,”r”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int r=(int)(lua_tonumber(L,-1) * 255);

    lua_pop(L,1);

    lua_getfield(L,-1,”g”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int g=(int)(lua_tonumber(L,-1) * 255);

    lua_pop(L,1);

    lua_getfield(L,-1,”b”);

    if (!lua_isnumber(L,-1)) {

        printf(“Invalid component in background color.\n”);

        return;

    }

    int b=(int)(lua_tonumber(L,-1) * 255);

    printf(“r=%d, g=%d, b=%d\n”,r,g,b);

    lua_pop(L,1);

    lua_pop(L,1);

    return;

}

int main()

{

    lua_State* L=luaL_newstate();

    load(L);

    lua_close(L);

    return 0;

}

 上面的代码将输出和之前代码相同的结果。

    lua_newtable是宏,其原型为:#define lua_newtable(L) lua_createtable(L, 0, 0)。调用该宏后,Lua会生成一个新的table对象并将其压入栈中。

    lua_setglobal是宏,其原型为:#define lua_setglobal(L,s) lua_setfield(L,LUA_GLOBALSINDEX,(s))。调用该宏后,Lua会将当前栈顶的值赋值给第二个参数指定的全局变量名。该宏在执行成功后,会将刚刚赋值的值从栈顶弹出。

    3. 调用Lua函数:

    调用函数的API也很简单。首先将待调用函数压入栈,再压入函数的参数,然后使用lua_pcall进行实际的调用,最后将调用结果从栈中弹出。见如下代码:

 

复制代码 代码如下:

 #include

#include

#include

#include

#include <lualib.h>

const char* lua_function_code=”function add(x,y) return x + y end”;

void call_function(lua_State* L)

{

    //luaL_dostring 等同于luaL_loadstring() || lua_pcall()

    //注意:在能够调用Lua函数之前必须执行Lua脚本,否则在后面实际调用Lua函数时会报错,

    //错误信息为:”attempt to call a nil value.”

    if (luaL_dostring(L,lua_function_code)) {

        printf(“Failed to run lua code.\n”);

        return;

    }

    double x=1.0, y=2.3;

    lua_getglobal(L,”add”);

    lua_pushnumber(L,x);

    lua_pushnumber(L,y);

    //下面的第二个参数表示带调用的lua函数存在两个参数。

    //第三个参数表示即使带调用的函数存在多个返回值,那么也只有一个在执行后会被压入栈中。

    //lua_pcall调用后,虚拟栈中的函数参数和函数名均被弹出。

    if (lua_pcall(L,2,1,0)) {

        printf(“error is %s.\n”,lua_tostring(L,-1));

        return;

    }

    //此时结果已经被压入栈中。

    if (!lua_isnumber(L,-1)) {

        printf(“function ‘add’ must return a number.\n”);

        return;

    }

    double ret=lua_tonumber(L,-1);

    lua_pop(L,-1); //弹出返回值。

    printf(“The result of call function is %f.\n”,ret);

}

int main()

{

    lua_State* L=luaL_newstate();

    call_function(L);

    lua_close(L);

    return 0;

}

 

您可能感兴趣的文章:Lua教程(二十):Lua调用C函数Lua教程(四):在Lua中调用C语言、C++的函数Lua教程(三):C语言、C++中调用Lua的Table示例C++中调用Lua函数实例Lua中调用C++函数实例Lua调用自定义C模块Lua中调用C语言函数实例Lua编程示例(六): C语言调用Lua函数C语言中调用Lua函数实例C语言与Lua之间的相互调用详解

© 版权声明

相关文章