1. 基礎:
Lua的一項重要用途就是作為一種配置語言。現在從一個簡單的示例開始吧。
--這里是用Lua代碼定義的窗口大小的配置信息
width = 200
height = 300
下面是讀取配置信息的C/C++代碼:
1 #include <stdio.h>
2 #include <string.h>
3 #include <lua.hpp>
4 #include <lauxlib.h>
5 #include <lualib.h>
6
7 void load(lua_State* L, const char* fname, int* w, int* h) {
8 if (luaL_loadfile(L,fname) || lua_pcall(L,0,0,0)) {
9 printf("Error Msg is %s.\n",lua_tostring(L,-1));
10 return;
11 }
12 lua_getglobal(L,"width");
13 lua_getglobal(L,"height");
14 if (!lua_isnumber(L,-2)) {
15 printf("'width' should be a number\n" );
16 return;
17 }
18 if (!lua_isnumber(L,-1)) {
19 printf("'height' should be a number\n" );
20 return;
21 }
22 *w = lua_tointeger(L,-2);
23 *h = lua_tointeger(L,-1);
24 }
25
26
27 int main()
28 {
29 lua_State* L = luaL_newstate();
30 int w,h;
31 load(L,"D:/test.lua",&w,&h);
32 printf("width = %d, height = %d\n",w,h);
33 lua_close(L);
34 return 0;
35 }
下面是針對新函數的解釋:
lua_getglobal是宏,其原型為:#define lua_getglobal(L,s) lua_getfield(L, LUA_GLOBALSINDEX, (s))。
每次調用這個宏的時候,都會將Lua代碼中與之相應的全局變量值壓入棧中,第一次調用時將全局變量"width"的值壓入棧中,之后再次調用時再將"height"的值也壓入棧中。
2. table操作:
我們可以在C語言的代碼中操作Lua中的table數據,這是一個非常非常方便且實用的功能。這樣不僅可以使Lua代碼的結構更加清晰,也可以在C語言代碼中定義等同的結構體與之對應,從而大大提高代碼的可讀性。見如下代碼:

1 #include <stdio.h>
2 #include <string.h>
3 #include <lua.hpp>
4 #include <lauxlib.h>
5 #include <lualib.h>
6
7 void load(lua_State* L) {
8
9 if (luaL_loadstring(L,"background = { r = 0.30, g = 0.10, b = 0 }")
10 || lua_pcall(L,0,0,0)) {
11 printf("Error Msg is %s.\n",lua_tostring(L,-1));
12 return;
13 }
14 lua_getglobal(L,"background");
15 if (!lua_istable(L,-1)) {
16 printf("'background' is not a table.\n" );
17 return;
18 }
19 lua_getfield(L,-1,"r");
20 if (!lua_isnumber(L,-1)) {
21 printf("Invalid component in background color.\n");
22 return;
23 }
24 int r = (int)(lua_tonumber(L,-1) * 255);
25 lua_pop(L,1);
26 lua_getfield(L,-1,"g");
27 if (!lua_isnumber(L,-1)) {
28 printf("Invalid component in background color.\n");
29 return;
30 }
31 int g = (int)(lua_tonumber(L,-1) * 255);
32 lua_pop(L,1);
33
34 lua_pushnumber(L,0.4);
35 lua_setfield(L,-2,"b");
36
37 lua_getfield(L,-1,"b");
38 if (!lua_isnumber(L,-1)) {
39 printf("Invalid component in background color.\n");
40 return;
41 }
42 int b = (int)(lua_tonumber(L,-1) * 255);
43 printf("r = %d, g = %d, b = %d\n",r,g,b);
44 lua_pop(L,1);
45 lua_pop(L,1);
46 return;
47 }
48
49 int main()
50 {
51 lua_State* L = luaL_newstate();
52 load(L);
53 lua_close(L);
54 return 0;
55 }

void lua_getfield(lua_State *L, int idx, const char *k); 第二個參數是table變量在棧中的索引值,最后一個參數是table的鍵值,該函數執行成功后會將字段值壓入棧中。
void lua_setfield(lua_State *L, int idx, const char *k); 第二個參數是table變量在棧中的索引值,最后一個參數是table的鍵名稱,而字段值是通過上一條命令lua_pushnumber(L,0.4)壓入到棧中的,該函數在執行成功后會將剛剛壓入的字段值彈出棧。
下面的代碼示例是在C語言代碼中構造table對象,同時初始化table的字段值,最后再將table對象賦值給Lua中的一個全局變量。

1 #include <stdio.h>
2 #include <string.h>
3 #include <lua.hpp>
4 #include <lauxlib.h>
5 #include <lualib.h>
6
7 void load(lua_State* L)
8 {
9 lua_newtable(L);
10 lua_pushnumber(L,0.3);
11 lua_setfield(L,-2,"r");
12
13 lua_pushnumber(L,0.1);
14 lua_setfield(L,-2,"g");
15
16 lua_pushnumber(L,0.4);
17 lua_setfield(L,-2,"b");
18 lua_setglobal(L,"background");
19
20 lua_getglobal(L,"background");
21 if (!lua_istable(L,-1)) {
22 printf("'background' is not a table.\n" );
23 return;
24 }
25 lua_getfield(L,-1,"r");
26 if (!lua_isnumber(L,-1)) {
27 printf("Invalid component in background color.\n");
28 return;
29 }
30 int r = (int)(lua_tonumber(L,-1) * 255);
31 lua_pop(L,1);
32 lua_getfield(L,-1,"g");
33 if (!lua_isnumber(L,-1)) {
34 printf("Invalid component in background color.\n");
35 return;
36 }
37 int g = (int)(lua_tonumber(L,-1) * 255);
38 lua_pop(L,1);
39
40 lua_getfield(L,-1,"b");
41 if (!lua_isnumber(L,-1)) {
42 printf("Invalid component in background color.\n");
43 return;
44 }
45 int b = (int)(lua_tonumber(L,-1) * 255);
46 printf("r = %d, g = %d, b = %d\n",r,g,b);
47 lua_pop(L,1);
48 lua_pop(L,1);
49 return;
50 }
51
52 int main()
53 {
54 lua_State* L = luaL_newstate();
55 load(L);
56 lua_close(L);
57 return 0;
58 }

上面的代碼將輸出和之前代碼相同的結果。
lua_newtable是宏,其原型為:#define lua_newtable(L) lua_createtable(L, 0, 0)。調用該宏后,Lua會生成一個新的table對象并將其壓入棧中。
lua_setglobal是宏,其原型為:#define lua_setglobal(L,s) lua_setfield(L,LUA_GLOBALSINDEX,(s))。調用該宏后,Lua會將當前棧頂的值賦值給第二個參數指定的全局變量名。該宏在執行成功后,會將剛剛賦值的值從棧頂彈出。
3. 調用Lua函數:
調用函數的API也很簡單。首先將待調用函數壓入棧,再壓入函數的參數,然后使用lua_pcall進行實際的調用,最后將調用結果從棧中彈出。見如下代碼:

1 #include <stdio.h>
2 #include <string.h>
3 #include <lua.hpp>
4 #include <lauxlib.h>
5 #include <lualib.h>
6
7 const char* lua_function_code = "function add(x,y) return x + y end";
8
9 void call_function(lua_State* L)
10 {
11 //luaL_dostring 等同于luaL_loadstring() || lua_pcall()
12 //注意:在能夠調用Lua函數之前必須執行Lua腳本,否則在后面實際調用Lua函數時會報錯,
13 //錯誤信息為:"attempt to call a nil value."
14 if (luaL_dostring(L,lua_function_code)) {
15 printf("Failed to run lua code.\n");
16 return;
17 }
18 double x = 1.0, y = 2.3;
19 lua_getglobal(L,"add");
20 lua_pushnumber(L,x);
21 lua_pushnumber(L,y);
22 //下面的第二個參數表示帶調用的lua函數存在兩個參數。
23 //第三個參數表示即使帶調用的函數存在多個返回值,那么也只有一個在執行后會被壓入棧中。
24 //lua_pcall調用后,虛擬棧中的函數參數和函數名均被彈出。
25 if (lua_pcall(L,2,1,0)) {
26 printf("error is %s.\n",lua_tostring(L,-1));
27 return;
28 }
29 //此時結果已經被壓入棧中。
30 if (!lua_isnumber(L,-1)) {
31 printf("function 'add' must return a number.\n");
32 return;
33 }
34 double ret = lua_tonumber(L,-1);
35 lua_pop(L,-1); //彈出返回值。
36 printf("The result of call function is %f.\n",ret);
37 }
38
39 int main()
40 {
41 lua_State* L = luaL_newstate();
42 call_function(L);
43 lua_close(L);
44 return 0;
45 }
