Lua和C程序通過一個堆棧交換數據

數據交換介紹  
Lua和C程序通過一個堆棧交換數據: struct lua_State
堆棧的序號可以從棧頂和棧底計數,從棧底計數,則棧底是1,向棧頂方向遞增。從棧頂計數,則棧頂是-1,向棧底方向遞減。一般都用從棧頂計數的方式。堆棧的默認大小是20,可以用lua_checkstack修改.用lua_gettop則可以獲得棧裏的元素數目。並不是說在棧頂有一個整形元素。而是計算了一下棧頂元素在棧裏的正index,相當於元素數目。
Lua 調用C函數用的堆棧是臨時的,調用結束之後就被銷燬了。
如何從堆棧中獲取從Lua腳本中的參數
如果知道Lua腳本中某個全局變量的名字,可以用void lua_getglobal (lua_State *L, const char *name) 。這個函數會將name所指Lua變量的值放在棧頂.
如果是在C 函數中要獲取Lua調用函數使用的參數:
首先用lua_gettop檢查參數數量
用lua_is...類函數檢測參數的類型,做好錯誤處理
用lua_to...類函數將參數轉換爲number或者string.(對Lua來說,只有這兩種簡單類型)
lua_tonumber返回的是double
lua_tostring返回的是char*
用lua_remove從棧中刪除掉元素
繼續獲取下一個元素. 因爲每次都調用lua_remove,所以每次調用lua_tonumber,使用的index都將固定是-1,即棧頂。
如果lua_istable成立,那麼說明棧頂是一個table.注意table是不能取出來的,只能把table裏的元素一個個取出來。
首先把元素的名字壓入棧頂: lua_pushstring(L,"i");然後就可以用lua_gettable調用,值會放在棧頂。同時剛纔壓入的元素名字被彈出。用上面的辦法,可以把這個值取出來。記得也應該lua_remove。 如果table的某一個元素也是table,重複即可。當table的所有元素都取完了,記住這個table本身還在堆棧裏,要用lua_remove把它刪除。
如果要獲取的是一個數組(所謂數組,其實就是key是從1開始的數字序列的table,並且值類型相同),用lua_next可以遍歷這個數組:
首先lua_pushnil,壓入一個空值,然後
while (lua_next(L, -2) != 0){ if(lua_isnumber(L,-1)) //判斷元素類型,也可能是string { arrf.add((float)lua_tonumber(L, -1));//獲取元素的值 lua_remove(L,-1); }}lua_remove(L,-1);//刪除NIL
如何從C返回數據給Lua腳本
用lua_push...類函數壓入數據到堆棧中,並用return n;來告訴Lua返回了幾個返回值。 Lua是天生支持多個返回值的,如 x,y = Test()。 Lua會根據n從棧裏取相應的數據。
如果要返回一個table:
lua_newtable(L);//創建一個表格,放在棧頂 lua_pushstring(L, "mydata");//壓入key lua_pushnumber(L,66);//壓入value lua_settable(L,-3);//彈出key,value,並設置到table裏面去 lua_pushstring(L, "subdata");//壓入key lua_newtable(L);//壓入value,也是一個table lua_pushstring(L, "mydata");//壓入subtable的key lua_pushnumber(L,53);//value lua_settable(L,-3);//彈出key,value,並設置到subtable lua_settable(L,-3);//這時候父table的位置還是-3,彈出key,value(subtable),並設置到table裏去 lua_pushstring(L, "mydata2");//同上 lua_pushnumber(L,77); lua_settable(L,-3); return 1;//堆棧裏現在就一個table.其他都被彈掉了。如果要返回一個數組,用如下代碼:(注意那個關於trick的註釋,我在等官方的解釋。經過驗證,這個問題只在windows版本調用dll中方法的時候出現。WinCE正常)
lua_pushstring(L,"arri"); lua_newtable(L); { //a trick:otherwise the lua engine will crash. This element is invisible in Lua script lua_pushnumber(L,-1); lua_rawseti(L,-2,0); for(int i = 0; i < arri.size();i++) { lua_pushnumber(L,arri); lua_rawseti(L,-2,i+1); } } lua_settable(L,-3);這樣產生的數組可以在Lua中如下遍歷:


for i,v in ipairs(data.arri) do 
print(v) 
end或者是


for i=1,table.getn(data.arri) do
print(data.arri) 
end只有數組才能這樣,name,value構成的Record不行,table.getn也只對數組有效。


由於上述代碼的高度相似性,所以很容易實現自動生成這些代碼。比如,根據C的一個struct定義:
typedef enum { BR_9600, BR_4800,} BaudRate;typedef struct flag{ int onoff; int j; long l; double d; char* name; BaudRate rate;}flag;可以自動產生如下代碼:
bool DataToLua(flag data,lua_State *L){ lua_newtable(L); lua_pushstring(L,"onoff"); lua_pushnumber(L,(double)data.onoff); lua_settable(L,-3); lua_pushstring(L,"j"); lua_pushnumber(L,(double)data.j); lua_settable(L,-3); lua_pushstring(L,"l"); lua_pushnumber(L,(double)data.l); lua_settable(L,-3); lua_pushstring(L,"d"); lua_pushnumber(L,(double)data.d); lua_settable(L,-3); lua_pushstring(L,"name"); lua_pushstring(L,data. name.c_str()); lua_settable(L,-3); lua_pushstring(L,"rate"); lua_pushnumber(L,(double)(int)data.rate); lua_settable(L,-3); return true;}LuaToData也是類似的。
如果使用面向對象的方式封裝起flag來,把DataToLua變成flag類的一個方法,就更加方便了。
發佈了9 篇原創文章 · 獲贊 4 · 訪問量 2萬+
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章