Lua1

lua and c each call

This project is maintained by wangfakang

lua和c之间的交互：

Lua 使用一个虚拟栈来和 C 传递值。栈上的的每个元素都是一个 Lua 值（nil，数字，字符串，等等）。

Lua可以调用C函数的能力将极大的提高Lua的可扩展性和可用性。对于有些和操作系统相关的功能， 或者是对效率要求较高的模块，我们完全可以通过C函数来实现，之后再通过Lua调用指定的C函数。 对于那些可被Lua调用的C函数而言，其接口必须遵循Lua要求的形式，即typedef int (lua_CFunction)(lua_State L)。 简单说明一下，该函数类型仅仅包含一个表示Lua环境的指针作为其唯一的参数，实现者可以通过该指针进一步获取Lua代码 中实际传入的参数。返回值是整型，表示该C函数将返回给Lua代码的返回值数量，如果没有返回值，则return 0即可。 需要说明的是，C函数无法直接将真正的返回值返回给Lua代码，而是通过虚拟栈来传递Lua代码和C函数之间的调用参数和返回值的 。这里我们将介绍两种Lua调用C函数的规则。

下面是lua调用c: 

#include <stdio.h>
#include <string.h>
#include <lua.hpp>
#include <lauxlib.h>
#include <lualib.h>

//待Lua调用的C注册函数。
static int add2(lua_State* L)
{
    //检查栈中的参数是否合法，1表示Lua调用时的第一个参数(从左到右)，依此类推。
    //如果Lua代码在调用时传递的参数不为number，该函数将报错并终止程序的执行。
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    //将函数的结果压入栈中。如果有多个返回值，可以在这里多次压入栈中。
    lua_pushnumber(L,op1 + op2);
    //返回值用于提示该C函数的返回值数量，即压入栈中的返回值数量。
    return 1;
}

//另一个待Lua调用的C注册函数。
static int sub2(lua_State* L)
{
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    lua_pushnumber(L,op1 - op2);
    return 1;
}

//此行相当于lua代码，下面函数luaL_dostring就是执行字符串的lua
const char* testfunc = "print(add2(1.0,2.0)) print(sub2(20.1,19))";

int main()
{
    lua_State* L = luaL_newstate();
    luaL_openlibs(L);
    //将指定的函数注册为Lua的全局函数变量，其中第一个字符串参数为Lua代码
    //在调用C函数时使用的全局函数名，第二个参数为实际C函数的指针。
    lua_register(L, "add2", add2);
    lua_register(L, "sub2", sub2);
    //在注册完所有的C函数之后，即可在Lua的代码块中使用这些已经注册的C函数了。
    if (luaL_dostring(L,testfunc))
        printf("Failed to invoke.\n");
    lua_close(L);
    return 0;
}

下面是c调用lua:

C程序掉用Lua函数例子：

void CCallLua()
{
    // Create a LUA VMachine
    lua_State *L;

    //L = luaL_newstate();
    L = lua_open();

    //Load Libraries
    luaL_openlibs(L);

     // 运行脚本 /
    luaL_dofile(L, "clua.lua");

    lua_getglobal(L,"Sum");

    lua_pushnumber(L,2);//第一个参数

    lua_pushnumber(L,3);//第二个参数

    lua_pushnumber(L,4);//第三个参数

    lua_pcall(L,3,2,0);//3表示参数个数　2表示返回值个数 0表示返回在栈顶的错误消息就和原始错误消息完全一致。

    double sum=0,ave=0;

    if(lua_isnumber(L,1))
    {
        sum=lua_tonumber(L,1);
    }

    if(lua_isnumber(L,2))
    {
        ave=lua_tonumber(L,2);
    }

    lua_pop(L,2);

    cout<<"Sum ="<<sum

        <<"/nAve ="<<ave<<endl;

    // 清除Lua
    lua_close(L);

    getchar();
}





Lua脚本Clua.lua：


function Sum(...)
  local s=0
  local num=0     
  for k,v in pairs{...} do
    s = s + v
       num = k
  end
  return s,s/num
end

欢迎一起交流学习

在使用中有任何问题，欢迎反馈给我，可以用以下联系方式跟我交流

Thx

Author