C调用lua

来源：互联网发布：gephi数据分析编辑：程序博客网时间：2024/06/10 00:22

C调用lua

调用示例

    extern "C" {    #include "lua.h"    #include "lualib.h"    #include "lauxlib.h"    }    #include <iostream>    #include <string>    using namespace std;    int main()    {        //Lua示例代码        char *szLua_code =            "r = string.gsub(c_Str, c_Mode, c_Tag) --宿主给的变量 "            "u = string.upper(r)";        //Lua的字符串模式        char *szMode = "(%w+)%s*=%s*(%w+)";        //要处理的字符串        char *szStr = "key1 = value1 key2 = value2";        //目标字符串模式        char *szTag = "<%1>%2</%1>";        lua_State *L = luaL_newstate();        luaL_openlibs(L);        //把一个数据送给Lua        lua_pushstring(L, szMode);        lua_setglobal(L, "c_Mode");        lua_pushstring(L, szTag);        lua_setglobal(L, "c_Tag");        lua_pushstring(L, szStr);        lua_setglobal(L, "c_Str");        //执行        bool err = luaL_loadbuffer(L, szLua_code, strlen(szLua_code),                    "demo") || lua_pcall(L, 0, 0, 0);        if(err)        {            //如果错误，显示            cerr << lua_tostring(L, -1);            //弹出栈顶的这个错误信息            lua_pop(L, 1);        }        else        {            //Lua执行后取得全局变量的值            lua_getglobal(L, "r");            cout << "r = " << lua_tostring(L,-1) << endl;            lua_pop(L, 1);            lua_getglobal(L, "u");            cout << "u = " << lua_tostring(L,-1) << endl;                lua_pop(L, 1);        }        lua_close(L);        return 0;    }

lua_pushstring和lua_setglobal配合使用, 传入变量
lua_getglobal和lua_tostring获取变量
编译命令, 程序放在lua源代码src编译的上一级目录: g++ -o luacall luacall.c -Lsrc -llua -Isrc -ldl

C调用lua并操作lua中table表

    int main()    {        //Lua示例代码，使用table        char *szLua_code =            "x = {} --用于存放结果的table "            "x[1],x[2] = string.gsub(c.Str, c.Mode, c.Tag) --x[1]里是结果，x[2]里是替换次数 "            "x.u = string.upper(x[1])";        //Lua的字符串模式        char *szMode = "(%w+)%s*=%s*(%w+)";        //要处理的字符串        char *szStr = "key1 = value1 key2 = value2";        //目标字符串模式        char *szTag = "<%1>%2</%1>";        lua_State *L = luaL_newstate();        luaL_openlibs(L);        //把一个tabele送给Lua        lua_newtable(L);    //新建一个table并压入栈顶        lua_pushstring(L, "Mode");// key        lua_pushstring(L, szMode);// value        //设置newtable[Mode]=szMode        //由于上面两次压栈，现在table元素排在栈顶往下数第三的位置        lua_settable(L, -3);        //lua_settable会自己弹出上面压入的key和value        lua_pushstring(L, "Tag");// key        lua_pushstring(L, szTag);// value        lua_settable(L, -3);    //设置newtable[Tag]=szTag        lua_pushstring(L, "Str");// key        lua_pushstring(L, szStr);// value        lua_settable(L, -3);    //设置newtable[Str]=szStr        lua_setglobal(L,"c"); //将栈顶元素（newtable）置为Lua中的全局变量c        //执行        bool err = luaL_loadbuffer(L, szLua_code, strlen(szLua_code),                    "demo") || lua_pcall(L, 0, 0, 0);        if(err)        {            //如果错误，显示            cerr << lua_tostring(L, -1);            //弹出栈顶的这个错误信息            lua_pop(L, 1);        }        else        {            //Lua执行后取得全局变量的值            lua_getglobal(L, "x");            //这个x应该是个table            if(lua_istable(L,-1))            {                //取得x.u,即x["u"]                lua_pushstring(L,"u");    //key                //由于这次压栈，x处于栈顶第二位置                lua_gettable(L,-2);                //lua_gettable会弹出上面压入的key，然后把对应的value压入                //取得数据，然后从栈中弹出这个value                cout << "x.u = " << lua_tostring(L,-1) << endl;                lua_pop(L, 1);                //取得x[1]和x[2]                for(int i=1; i<=2; i++)                {                    //除了key是数字外，与上面的没什么区别                    lua_pushnumber(L,i);                    lua_gettable(L,-2);                    cout << "x[" << i <<"] = " << lua_tostring(L,-1) << endl;                    lua_pop(L, 1);                }            }            //弹出栈顶的x            lua_pop(L, 1);        }        lua_close(L);        return 0;    }

lua_newtable创建一个lua表
lua_pushstring两次，在lua_settable设置key,value对
lua_pushstring(L, “Mode”);// key
lua_pushstring(L, szMode);// value
//设置newtable[Mode]=szMode
//由于上面两次压栈，现在table元素排在栈顶往下数第三的位置
lua_settable(L, -3);
//lua_settable会自己弹出上面压入的key和value
最后lua_setglobal设置table变量名
lua_getglobal获取表
lua_pushstring, lua_gettable获取表key的取值

C调用并执行lua脚本

    #include "lua.h"    #include "lualib.h"    #include "lauxlib.h"    #include <string.h>    #include <math.h>    static int clib(lua_State *L)   // 给lua调用的c函数必须定义成static int XXX(lua_State *L)    {        char   path[64];        strcpy(path, "/home/zxuma/log");        lua_pushstring(L,path);        return 1;   // 为什么要返回1？这是有依据的，该函数把结果压入了栈，lua调用该函数将从栈中     }    int main()    {        lua_State *L = luaL_newstate();        //创建一个指向lua解释器的指针        L = luaL_newstate();        //加载lua标准库        luaL_openlibs(L);        //注册C++函数        lua_register(L,"clib",clib);        //加载脚本        luaL_dofile(L,"4.lua");        //调用函数        lua_getglobal(L,"run");        //运行函数并把结果压入栈        lua_pcall(L,0,1,0);        //关闭并释放资源        lua_close(L);        return 0;    }

    # 4.lua    function run()         print("call running from c")         print(clib())         return 2    end

编译命令: gcc -o luacall2 luacall2.c -Lsrc -llua -ldl -lm -Isrc

0 0