lua學習：lua作設定檔

lua的一項重要用途就是作為一種配置語言（configuration language）。

主要是讀變數和table。

mycon.lua

--my config width = 300height = 400luat_Test1={a=123, b=456, c=789}luat_Test2={123, 456, 789}

main.cpp

#include<stdio.h>//如不用extern會出現串連錯誤，編譯成了C++檔案extern "C" {#include "lua.h"#include "lauxlib.h"#include "lualib.h"}#pragma comment(lib, "lua5.1.lib")void ReadVariable (lua_State *L,int *width,int *height){lua_getglobal(L,"width");   //獲得Lua中變數的值，將其放入棧中lua_getglobal(L,"height");if(!lua_isnumber(L,-2))     //棧頂為-1，然後依次減少luaL_error(L,"`width' should be a number\n");if(!lua_isnumber(L,-1))luaL_error(L,"`height' should be a number\n");*width = (int)lua_tonumber(L,-2);    //將棧頂元素轉化為數字*height = (int)lua_tonumber(L,-1);printf("width is %d ,height is %d\n\n",*width,*height);}static void ReadTableFromItem(lua_State *L, const char* lpszTableName, const char* lpszTableItem){lua_getglobal(L, lpszTableName);lua_pushstring(L, lpszTableItem);//首先把元素的名字壓入棧頂lua_gettable(L, -2);//值會放在棧頂，同時剛才壓入的元素名字被彈出printf("%s.%s=%d\n", lpszTableName, lpszTableItem, (int)lua_tonumber(L, -1));lua_pop(L, 2);}static void ReadTableFromIndex(lua_State *L, const char* lpszTableName, int index){lua_getglobal(L, lpszTableName);lua_rawgeti(L, -1, index);//獲得第一個元素printf("%s[%d]=%d\n", lpszTableName, index, (int)lua_tonumber(L, -1));lua_pop(L, 2);}static void EnumTableItem(lua_State *L, const char* lpszTableName){lua_getglobal(L, lpszTableName);int it = lua_gettop(L);lua_pushnil(L);printf("Enum %s:", lpszTableName);while(lua_next(L, it))//用lua_next可以遍曆這個數組{printf("  %d", (int)lua_tonumber(L, -1));lua_pop(L, 1);}printf("\n\n");lua_pop(L, 1);}int main(int argc, char* argv[]){if (argc != 2){printf("param error!\n");return 0;}char *filename = argv[1];lua_State *L = lua_open();luaL_openlibs(L);  //新版本庫添加的方法if(luaL_loadfile(L,filename) || lua_pcall(L,0,0,0)){luaL_error(L,"loadfile error! %s \n",lua_tostring(L,-1));}int w=1,h=2;ReadVariable(L,&w,&h);ReadTableFromItem(L, "luat_Test1", "a");  // 等價與lua代碼：print(luat_Test1.a)ReadTableFromItem(L, "luat_Test1", "b");ReadTableFromItem(L, "luat_Test1", "c");EnumTableItem(L, "luat_Test1");    // 枚舉TableReadTableFromIndex(L, "luat_Test2", 1);  // 等價與lua代碼：print(luat_Test1[1])ReadTableFromIndex(L, "luat_Test2", 2);ReadTableFromIndex(L, "luat_Test2", 3);EnumTableItem(L, "luat_Test2");lua_close(L);getchar();return 0;}