1.前言
上次偶說到從C/C++中調(diào)用Lua的函數(shù), 然后就有朋友問從Lua中如何調(diào)用C/C++的
函數(shù), 所以偶們這次就來說說這個問題. 首先偶們會在C++中建立一個函數(shù), 然后
告知Lua有這個函數(shù), 最后再執(zhí)行它. 另外, 由于函數(shù)不是在Lua中定義的, 所以
無法確定函數(shù)的正確性, 可能在調(diào)用過程中會出錯, 因此偶們還會說說Lua出錯處
理的問題.
2.Lua中調(diào)用C函數(shù)
在lua中是以函數(shù)指針的形式調(diào)用函數(shù), 并且所有的函數(shù)指針都必須滿足如下此種
類型:
typedef int (*lua_CFunction) (lua_State *L);
也就是說, 偶們在C++中定義函數(shù)時必須以lua_State為參數(shù), 以int為返回值才能
被Lua所調(diào)用. 但是不要忘記了, 偶們的lua_State是支持棧的, 所以通過棧可以
傳遞無窮個參數(shù), 大小只受內(nèi)存大小限制. 而返回的int值也只是指返回值的個數(shù)
真正的返回值都存儲在lua_State的棧中. 偶們通常的做法是做一個wrapper, 把
所有需要調(diào)用的函數(shù)都wrap一下, 這樣就可以調(diào)用任意的函數(shù)了.
下面這個例子是一個C++的average()函數(shù), 它將展示如何用多個參數(shù)并返回多個值
例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開始編號的,
所以棧頂元素的序號也相當于棧中的元素個數(shù). 在這里, 棧中元素的個數(shù)就
是傳入的參數(shù)個數(shù).
* for循環(huán)計算所有傳入?yún)?shù)的總和. 這里用到了數(shù)值轉(zhuǎn)換lua_tonumber().
* 然后偶們用lua_pushnumber()把平均值和總和push到棧中.
* 最后, 偶們返回2, 表示有兩個返回值.
* 偶們雖然在C++中定義了average()函數(shù), 但偶們的Lua程序并不知道, 所以需
要在main函數(shù)中加入
? /* register our function */
lua_register(L, "average", average);
這兩行的作用就是告訴e15.lua有average()這樣一個函數(shù).
* 這個程序可以存成cpp也可以存成c, 如果以.c為擴展名就不需要加extern "C"
編譯的方法偶們上次說過了, 方法相同.
e15.lua執(zhí)行的方法只能用上例中的C++中執(zhí)行, 而不能用命令行方式執(zhí)行.
3.錯誤處理
在上例中, 偶們沒有對傳入的參數(shù)是否為數(shù)字進行檢測, 這樣做不好. 所以這里偶
們再加上錯誤處理的片斷.
把這段加在for循環(huán)之內(nèi):
if (!lua_isnumber(L, i)) {
lua_pushstring(L, "Incorrect argument to 'average'");
lua_error(L);
}
這段的作用就是檢測傳入的是否為數(shù)字.
加上這段之后, 偶們debug的時候就會簡單許多. 對于結(jié)合兩種語言的編程, 它們之
間傳遞數(shù)據(jù)的正確性檢測是非常重要的.
這里有別人寫好的例子:
VC的
http://tonyandpaige.com/tutorials/luaavg.zipLinux的
http://tonyandpaige.com/tutorials/luaavg.tar.gz至此, Lua與C的結(jié)合就基本講完了, 下次偶要開始說說Lua與面向?qū)ο?
但是偶自己還沒有學完, 所以大家可能要多等兩天了. Sorry!