标签:lua c++ 调用 lual_dofile
前两篇文章中,已经介绍了使用vs2010编译lua5.1源码生成lua.lib 和 vs项目中使用c++调用lua,可以保证demo在vs上运行起来了。这里再详细介绍下c++和lua之间的相互调用以及原理。
c++与lua直接的调用,实际上通过一个栈结构来传递数据,该栈结构栈顶的索引值为-1,向栈底方向索引值依次为-1 ,-2......栈顶索引为1.栈结构里可以放函数,表,字符串,整形等各种lua的基本数据。
print("hello world from lua file") table1 = {} table1["dinner"] = "rice" table1["hahha"] = "ri123ce" gScreenW = 1280; function getIntegerSumFuncs(a ,b) <span style="white-space:pre"> </span>return a + b end avg ,sum = average(10 ,20 ,30 ,40 ,50)
int luaL_dofile (lua_State *L, const char *filename);//运行lua文件,L是当前已经创建的栈结构。返回0,运行文件正常;返回1,代表出现异常。
void lua_setglobal (lua_State *L, const char *name);//从堆栈上弹出一个值,并将其设到全局变量 name 中
void lua_getglobal (lua_State *L, const char *name);//把全局变量 name 里的值压入堆栈,栈顶值为-1。
const char *lua_tostring (lua_State *L, int index);//在栈L的索引值为index处取值并转化成C字符串(lua_tointeger等类似)
void lua_settop (lua_State *L, int index);//参数允许传入任何可接受的索引以及 0。它将把堆栈的栈顶设为这个索引。 如果新的栈顶比原来的大,超出部分的新元素将被填为 nil 。 如果 index 为 0 ,把栈上所有元素移除。
int lua_gettop (lua_State *L);//返回堆栈上的元素个数(返回 0 表示堆栈为空)
int lua_next (lua_State *L, int index);从栈上弹出一个 key(键), 然后把索引指定的表中 key-value(健值)对压入堆栈 (指定 key 后面的下一 (next) 对)。 如果表中以无更多元素, 那么 lua_next 将返回 0 (什么也不压入堆栈)。
void lua_pushinteger (lua_State *L, lua_Integer n);//把 n 作为一个数字压栈。
void lua_close (lua_State *L);//销毁指定 Lua 状态机中的所有对象
如果需要查询其他函数,推荐到Lua 5.1 参考手册,很详细也比较准确。
//获取lua全局string const char* getLuaGlobalString(char *fileName ,char *varName) { lua_State *L = lua_open(); luaL_openlibs(L); //加载并运行test.lua文件 int isOpen = luaL_dofile(L ,fileName); if (isOpen == 0) { printf("error loading lua"); } //将栈顶的索引设置为该index,如果index传0,移除栈上所有元素 lua_settop(L ,0); //把全局变量 allGlobalChar 里的值压入堆栈。 char *allGlobalChar = varName; lua_getglobal(L ,allGlobalChar); int stateCode = lua_isstring(L ,1); if (stateCode != 1) { printf("open lua error code:%d" ,stateCode); return NULL; } const char* s = lua_tostring(L ,1); printf("get global screenW is:%s \n" ,s); lua_pop(L ,1); lua_close(L); return s; }调用代码:
getLuaGlobalString("test.lua" ,"gScreenW");
const char* getLuaVarOfTable(const char *fileName,const char *tableName ,const char *keyName) { lua_State *L = lua_open(); luaL_openlibs(L); int isOpen = luaL_dofile(L ,fileName); if (isOpen != 0) { printf("error open lua file"); return NULL; } lua_settop(L ,0);//清空栈 lua_getglobal(L ,tableName); int stateCode = lua_istable(L ,-1);//取栈顶 if (stateCode != 1) { printf("get table failed code:%d" ,stateCode); return NULL; } lua_pushstring(L ,keyName); lua_gettable(L ,-2); //取栈顶下一个元素 const char* valueStr = lua_tostring(L ,-1); //取栈顶 printf("get lua table key-value %s-%s" ,keyName ,valueStr); lua_pop(L ,-1); return valueStr; }调用代码:
getLuaVarOfTable("test.lua" ,"table1" ,"dinner");
<pre name="code" class="java">string getLuaVarTable(const char* fileName ,const char *tableName ,char *result) { lua_State *L = lua_open(); luaL_openlibs(L); int isOpen = luaL_dofile(L ,fileName); if (isOpen != 0) { printf("error open lua file"); return NULL; } lua_getglobal(L ,tableName); int size = lua_gettop(L); lua_pushnil(L); int index = 0; while(lua_next(L ,size)) { const char* key = lua_tostring(L ,-2);//取栈顶下一个元素 const char* value = lua_tostring(L , -1); //取栈顶 //使用memcpy ,index记录地址游标 memcpy(&result[index] ,key ,strlen(key)); index += strlen(key); //因为sizeof取字符串,最后会有"/0"占一个字节,所以应该减去1 memcpy(&result[index] ,"-" ,sizeof("-") - 1); index += 1; memcpy(&result[index] ,value ,strlen(value)); index += strlen(value); lua_pop(L ,1); } result[index] = 0; cout <<"result is " << result << endl; //free(result); //printf("---%s" ,result.c_str); lua_pop(L ,1); return result; }调用代码:
char* reslut = (char*)malloc(100 * sizeof(char)); getLuaVarTable("test.lua" ,"table1" ,reslut); free(reslut);
//要调用一个函数请遵循以下协议: 首先,要调用的函数应该被压入堆栈; // 接着,把需要传递给这个函数的参数按正序压栈; 这是指第一个参数首先压栈。 // 最后调用一下 lua_call; nargs 是你压入堆栈的参数个数。 // 当函数调用完毕后,所有的参数以及函数本身都会出栈。 而函数的返回值这时则被压入堆栈。 // 返回值的个数将被调整为 nresults 个, 除非 nresults 被设置成 LUA_MULTRET。 // 在这种情况下,所有的返回值都被压入堆栈中。 Lua 会保证返回值都放入栈空间中。 // 函数返回值将按正序压栈(第一个返回值首先压栈), 因此在调用结束后,最后一个返回值将被放在栈顶。 const char* callLuaFunc(const char* fileName ,const char* functionName) { lua_State *L = lua_open(); luaL_openlibs(L); int isOpen = luaL_dofile(L ,fileName); if (isOpen != 0) { printf("error open lua file %s" ,fileName); return NULL; } lua_getglobal(L ,functionName);//如果表和函数重名,会怎么样 lua_pushinteger(L ,12); lua_pushinteger(L ,3); //第一个参数:函数的个数 第二个参数:函数的返回值个数 lua_call(L ,2 ,1); int result = lua_tointeger(L ,-1); printf("call lua func result : %d" ,result); return NULL; }调用代码:
callLuaFunc("test.lua" ,"getIntegerSumFuncs");
//cpp计算平均值的函数 int average(lua_State* L) { int n = lua_gettop(L); double sum = 0; int i; for (i = 1; i <= n; i ++) { if (!lua_isnumber(L ,i)) { lua_pushstring(L ,"incorrect argument to avg"); lua_error(L); } sum += lua_tonumber(L ,i); } lua_pushnumber(L ,sum / n); lua_pushnumber(L ,sum); //这里一定要返回元素个数,若返回0则找不到结果 return 2; } //lua调用cpp计算平均值,调用入口 int averageMain() { lua_State* L = lua_open(); luaL_openlibs(L); //注册lua函数,实际上是将average push到栈结构,然后set average函数为global函数 lua_register(L ,"average" ,average); //运行脚本 luaL_dofile(L ,"test.lua"); //把全局变量 avg 里的值压入堆栈 lua_getglobal(L ,"avg"); // 栈顶是-1,栈底是1 cout << "cpp show: avg is " << lua_tointeger(L ,-1) <<endl; //从栈中弹出一个元素 //lua_pop(L ,1); //把全局变量 sum 里的值压入堆栈 lua_getglobal(L ,"sum"); cout << "cpp show: sum is " << lua_tointeger(L ,-1) <<endl; //清除栈结构 lua_close(L); return 0; }代码调用:
averageMain();
这里附上工程实例下载地址: http://download.csdn.net/detail/wangbin_jxust/7809743
如果需要运行该工程,需要按照使用vs2010编译lua5.1源码生成lua.lib 配置一遍,然再运行。
标签:lua c++ 调用 lual_dofile
原文地址:http://blog.csdn.net/wangbin_jxust/article/details/38794111