Lua 脚本语言 与 C的互相调用

Lua访问C++：

将C的函数包装成Lua环境认可的函数
将包装好的函数注册到Lua环境中
Lua调用C函数时，
C函数从栈中获取参数，并将计算结果压入栈，并返回压入栈的结果的数量

从Lua脚本中调用C++函数，函数必须定义Lua_CFunction类型。格式如下:
     Int  (lua_Cfunction*)(lua_state*)

例子：

将C函数包装成Lua可使用的函数类型      lua_Cfunction
注册包装好的函数到Lua的表中
像使用普通的Lua函数那样使用注册函数

void  PrintHelloWorld(){
    printf(“hello,world”);
}

Int   AddSum( int a, int b ){
   return a + b;
}

包装成Lua可访问的函数类型
(从普通的C函数 包装成Lua可访问的Int  (lua_Cfunction*)(lua_state*)型函数)
Static int l_PrintHelloWorld(lua_state* L){
     PrintHelloWorld();
}
Static int l_AddSum(lua_state* L){
    int b = lua_tonumber(L,-1);
    int a = lua_tonumber(L,-2);
    int sum = a +b;
    lua_pushnumber(L,sum);--将返回值压入堆栈
    return 1; --有返回值，要告诉解释器，函数向堆栈压入了几个返回值
}

   将包装函数注册到Lua中（ lua中定义的变量和函数存放在一个全局table中）
lua_pushcfunction(L, l_PrintHelloWorld);
Lua_setglobal(L,”PrintHelloWorld”);//global[“PrintHelloWorld”] = l_PrintHelloWorld
Lua_pushcfunction(L, l_AddSum);
Lua_setglobal(L,”AddSum”);//global[“AddSum”] = l_AddSum

Test.lua中使用
   PrintHelloWorld();
   AddSum(3,5);

C++访问Lua:

请求LUA函数入栈。
将函数需要的参数入栈，入栈顺序按照参数被声明的顺序。
告知LUA虚拟机入栈参数的个数、函数返回值的个数，并调用此LUA函数。
从栈定获得返回值，先返回的先入栈，然后将返回值显式出栈。

例子：

func.lua
--变量定义width=1 ;

height=2 ;

--lua函数定义，实现加法

function sum(a,b)   

return a+b ;

end

--lua函数定义，实现字符串相加

function mystrcat(a,b)   

return a..b ;

end

--lua函数定义，通过调用c代码中的csum函数实现加法

function mysum(a,b)   

return csum(a,b) ;

end 

int main(int argc,char** argv)
{
   lua_State * l = luaL_newstate() ;        //创建lua运行环境
   int ret  = luaL_loadfile(l,"func.lua") ;      //加载lua脚本文件
   if ( ret != 0 ) err_return(-1,"luaL_loadfile failed") ;
   ret = lua_pcall(l,0,0,0) ;
   if ( ret != 0 ) err_return(-1,"lua_pcall failed:%s",lua_tostring(l,-1)) ;

   lua_getglobal(l,"width");              //获取lua中定义的变量
   lua_getglobal(l,"height");
   printf("height:%ld width:%ld\n",lua_tointeger(l,-1),lua_tointeger(l,-2)) ;
   lua_pop(l,2) ;                        //恢复lua的栈

   int a = 11 ;
   int b = 12 ;
   lua_getglobal(l,"sum");               //调用lua中的函数sum
   lua_pushinteger(l,a) ;
   lua_pushinteger(l,b) ;
   ret = lua_pcall(l, 2,1,0) ;
   if ( ret != 0 ) err_return(-1,"lua_pcall failed:%s",lua_tostring(l,-1)) ;
   printf("sum:%d + %d = %ld\n",a,b,lua_tointeger(l,-1)) ;
   lua_pop(l,1) ;

   const char str1[] = "hello" ;
   const char str2[] = "world" ;
   lua_getglobal(l,"mystrcat");          //调用lua中的函数mystrcat
   lua_pushstring(l,str1) ;
   lua_pushstring(l,str2) ;
   ret = lua_pcall(l,2,1,0) ;
    printf("mystrcat:%s%s = %s\n",str1,str2,lua_tostring(l,-1)) ;
   lua_pop(l,1) ;

   lua_close(l) ;                     //释放lua运行环境

   return 0 ;

   }