標籤:style blog color 使用 os strong io cti
我們先來看一個簡單的例子:
lua_State* L = NULL;
// 內部調用lua函數double f(double x, double y){ double z; lua_getglobal(L, "f"); // 擷取lua函數f lua_pushnumber(L, x); // 壓入參數x和y lua_pushnumber(L, y); if(lua_pcall(L, 2, 1, 0) != 0) error(L, "error running function ‘f‘: %s", lua_tostring(L, -1)); if(!lua_isnumber(L, -1)) error(L, "function ‘f‘ must return a number"); z = lua_tonumber(L, -1); lua_pop(L, 1); return z;}int main(void){ L = lua_open(); luaL_openlibs(L); if(luaL_loadfile(L, "c:\\luatest\\functest.lua") || lua_pcall(L, 0, 0, 0)) error(L, "cannot run configuration file: %s", lua_tostring(L, -1)); printf("%f\n", f(1.0, 2.0)); return 0;}
functest.lua:
f = function(a, b) return a + bend
這其中最關鍵的是調用函數的使用,在C中調用Lua函數的API主要由以下幾個:
(1)void lua_call (lua_State *L, int nargs, int nresults);
函數調用,nargs表示參數的個數,nresults表示傳回值的個數
首先將lua函數壓棧,然後將參數依次壓棧,最後調用函數即可
函數調用時,參數和函數都會pop出棧,調用返回後,結果會push進棧
nresults==LUA_MULTRET,所有的傳回值都會push進棧
nresults!=LUA_MULTRET,傳回值個數根據nresults來調整
Lua語句:
a = f("how", t.x, 14)
在C中的實現:
lua_getglobal(L, "f"); // 函數入棧
lua_pushstring(L, "how"); // 參數1入棧
lua_getglobal(L, "t"); // 表t入棧
lua_getfield(L, -1, "x"); // 參數2入棧
lua_remove(L, -2); // 跳t出棧
lua_pushinteger(L, 14); // 參數3入棧
lua_call(L, 3, 1); // 調用函數,參數和函數都會出棧
lua_setglobal(L, "a"); // 給a賦值,棧頂出棧
上述代碼執行完畢後,堆棧狀態恢複原樣。
(2)int lua_pcall (lua_State *L, int nargs, int nresults, int msgh);
函數調用,在安全模式下,並且可以添加錯誤處理函數。
如果調用期間發生error,lua_pcall會捕獲之,然後push stack一個錯誤資訊(會先將函數和參數pop出棧),並且返回一個error code(非0的一個值)。
發生error時,如果指定了錯誤處理函數,會在error message入棧前調用錯誤處理函數,具體由msgh參數來決定:
(1)msgh==0,不指定錯誤處理函數,入棧資訊不變;
(2)msgh!=0,msgh表示錯誤處理函數的堆棧index,錯誤處理函數會以error message為參數,並將返回的新的error message入棧。主要用來給error message添加 更多的debug資訊,比如堆疊追蹤,因為這些資訊在pcall調用完之後是收集不到的。
函數傳回碼:
LUA_OK(0):調用成功
LUA_ERRRUN:runtime error
LUA_ERRMEM:記憶體配置錯誤,這種情況下不會調用錯誤處理函數
LUA_ERRERR:調用錯誤處理函數時出錯,當然,不會再進一步調用錯誤處理函數
LUA_ERRGCMM:調用metamethod.__gc時報錯,由gc引起,和函數本身沒關係
(3)int lua_pcallk (lua_State *L,
int nargs,
int nresults,
int errfunc,
int ctx,
lua_CFunction k);
函數調用,在安全模式下,並且允許函數yield。