C调用lua

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;
    }

1. lua_pushstring和lua_setglobal配合使用, 传入变量
2. lua_getglobal和lua_tostring获取变量
3. 编译命令, 程序放在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;
    } 

1. lua_newtable创建一个lua表
2. 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

3. 最后lua_setglobal设置table变量名

4. lua_getglobal获取表

5. 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

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