1.前言
上次偶說到從C/C++中調用Lua的函數, 然后就有朋友問從Lua中如何調用C/C++的
函數, 所以偶們這次就來說說這個問題. 首先偶們會在C++中建立一個函數, 然后
告知Lua有這個函數, 最后再執行它. 另外, 由于函數不是在Lua中定義的, 所以
無法確定函數的正確性, 可能在調用過程中會出錯, 因此偶們還會說說Lua出錯處
理的問題.
2.Lua中調用C函數
在lua中是以函數指針的形式調用函數, 并且所有的函數指針都必須滿足如下此種
類型:
typedef int (*lua_CFunction) (lua_State *L);
也就是說, 偶們在C++中定義函數時必須以lua_State為參數, 以int為返回值才能
被Lua所調用. 但是不要忘記了, 偶們的lua_State是支持棧的, 所以通過棧可以
傳遞無窮個參數, 大小只受內存大小限制. 而返回的int值也只是指返回值的個數
真正的返回值都存儲在lua_State的棧中. 偶們通常的做法是做一個wrapper, 把
所有需要調用的函數都wrap一下, 這樣就可以調用任意的函數了.
下面這個例子是一個C++的average()函數, 它將展示如何用多個參數并返回多個值
例e14.cpp
#include <stdio.h>
extern "C" {
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
}
/* the Lua interpreter */
lua_State* L;
static int average(lua_State *L)
{
/* get number of arguments */
int n = lua_gettop(L);
double sum = 0;
int i;
/* loop through each argument */
for (i = 1; i <= n; i++)
{
/* total the arguments */
sum += lua_tonumber(L, i);
}
/* push the average */
lua_pushnumber(L, sum / n);
/* push the sum */
lua_pushnumber(L, sum);
/* return the number of results */
return 2;
}
int main ( int argc, char *argv[] )
{
/* initialize Lua */
L = lua_open();
/* load Lua base libraries */
lua_baselibopen(L);
/* register our function */
lua_register(L, "average", average);
/* run the script */
lua_dofile(L, "e15.lua");
/* cleanup Lua */
lua_close(L);
return 0;
}
例e15.lua
-- call a C++ function
avg, sum = average(10, 20, 30, 40, 50)
print("The average is ", avg)
print("The sum is ", sum)
程序說明:
* lua_gettop()的作用是返回棧頂元素的序號. 由于Lua的棧是從1開始編號的,
所以棧頂元素的序號也相當于棧中的元素個數. 在這里, 棧中元素的個數就
是傳入的參數個數.
* for循環計算所有傳入參數的總和. 這里用到了數值轉換lua_tonumber().
* 然后偶們用lua_pushnumber()把平均值和總和push到棧中.
* 最后, 偶們返回2, 表示有兩個返回值.
* 偶們雖然在C++中定義了average()函數, 但偶們的Lua程序并不知道, 所以需
要在main函數中加入
? /* register our function */
lua_register(L, "average", average);
這兩行的作用就是告訴e15.lua有average()這樣一個函數.
* 這個程序可以存成cpp也可以存成c, 如果以.c為擴展名就不需要加extern "C"
編譯的方法偶們上次說過了, 方法相同.
e15.lua執行的方法只能用上例中的C++中執行, 而不能用命令行方式執行.
3.錯誤處理
在上例中, 偶們沒有對傳入的參數是否為數字進行檢測, 這樣做不好. 所以這里偶
們再加上錯誤處理的片斷.
把這段加在for循環之內:
if (!lua_isnumber(L, i)) {
lua_pushstring(L, "Incorrect argument to 'average'");
lua_error(L);
}
這段的作用就是檢測傳入的是否為數字.
加上這段之后, 偶們debug的時候就會簡單許多. 對于結合兩種語言的編程, 它們之
間傳遞數據的正確性檢測是非常重要的.
這里有別人寫好的例子:
VC的
http://tonyandpaige.com/tutorials/luaavg.zipLinux的
http://tonyandpaige.com/tutorials/luaavg.tar.gz至此, Lua與C的結合就基本講完了, 下次偶要開始說說Lua與面向對象.
但是偶自己還沒有學完, 所以大家可能要多等兩天了. Sorry!