c++ 与 lua 简单交互参数介绍

原文http://blog.csdn.net/johnice/article/details/5517431

一、第一个例子 Hello World !

[c-sharp]view plaincopy

  1. #include <stdio.h>
  2. #include <string.h>
  3. #include "lua.h"
  4. #include "lauxlib.h"
  5. #include "lualib.h"
  6. int main (void)
  7. {
  8. char buff[256];
  9. int error;
  10. lua_State *L = lua_open(); /* opens Lua */
  11. // 5.1.4 版本加载库 方法
  12. luaL_openlibs(L);
  13. // 5.1.4 版本之前 加载库 方式
  14. //luaopen_base(L); /* opens the basic library */
  15. //luaopen_table(L); /* opens the table library */
  16. //luaopen_io(L); /* opens the I/O library */
  17. //luaopen_string(L); /* opens the string lib. */
  18. //luaopen_math(L); /* opens the math lib. */
  19. while (fgets(buff, sizeof(buff), stdin) != NULL) {
  20. error = luaL_loadbuffer(L, buff, strlen(buff),
  21. "line") || lua_pcall(L, 0, 0, 0);
  22. if (error) {
  23. fprintf(stderr, "%s", lua_tostring(L, -1));
  24. lua_pop(L, 1);/* pop error message from the stack */
  25. }
  26. }
  27. lua_close(L);
  28. return 0;
  29. }

注意一下几点:

1.需要lua库的 .dll 和 .lib 文件

2.在include “lua.h lauxlib.h lualib.h” 时,注意区分是否需要将这些include用 extern "C" { ... } 包含起来

3.初始化lua虚拟机函数已改成 luaL_openlibs(L);

二、堆栈

2.1:压入元素

将每种可以用C 来描述的Lua 类型压栈

[c-sharp]view plaincopy

  1. void lua_pushnil (lua_State *L);
  2. void lua_pushboolean (lua_State *L, int bool);
  3. void lua_pushnumber (lua_State *L, double n);
  4. void lua_pushlstring (lua_State *L, const char *s, size_t length);
  5. void lua_pushstring (lua_State *L, const char *s);

将字符串压入串的正式函数是lua_pushlstring,它要求一个明确的长度作为参数。对于以零结束的字符串,你可以用lua_pushstring

2.2:查询元素

各个类型的这些函数都有同一个原型: int lua_is... (lua_State *L, int index);

这些函数中使用 lua_type, 并对结果(几种宏)进行判断,返回0 or 1

[c-sharp]view plaincopy

  1. #define LUA_TNIL 0
  2. #define LUA_TBOOLEAN 1
  3. #define LUA_TLIGHTUSERDATA 2
  4. #define LUA_TNUMBER 3
  5. #define LUA_TSTRING 4
  6. #define LUA_TTABLE 5
  7. #define LUA_TFUNCTION 6
  8. #define LUA_TUSERDATA 7
  9. #define LUA_TTHREAD 8

2.3:从栈中获取值,lua_to... ()函数:

[c-sharp]view plaincopy

  1. int lua_toboolean (lua_State *L, int index);
  2. double lua_tonumber (lua_State *L, int index);
  3. const char * lua_tostring (lua_State *L, int index);
  4. size_t lua_strlen (lua_State *L, int index);

即使给定的元素的类型不正确,调用上面这些函数也没有什么问题。在这种情况下,lua_toboolean、lua_tonumber 和lua_strlen 返回0,其他函数返回NULL。

lua 允许 string 中包含'/0',所以下面的语句总是有效的:

[c-sharp]view plaincopy

  1. const char *s = lua_tostring(L, -1); /* any Lua string */
  2. size_t l = lua_strlen(L, -1); /* its length */
  3. assert(s[l] == '/0');
  4. assert(strlen(s) <= l);

2.4:其他堆栈操作

[c-sharp]view plaincopy

  1. int lua_gettop (lua_State *L);
  2. void lua_settop (lua_State *L, int index);
  3. void lua_pushvalue (lua_State *L, int index);
  4. void lua_remove (lua_State *L, int index);
  5. void lua_insert (lua_State *L, int index);
  6. void lua_replace (lua_State *L, int index);

lua_gettop:返回堆栈中的元素个数,它也是栈顶元素的索引(注意一个负数索引-x 对应于正数索引gettop-x+1)

lua_settop:设置栈顶(也就是堆栈中的元素个数)为一个指定的值

如果开始的栈顶高于新的栈顶,顶部的值被丢弃。否则,为了得到指定的大小这个函数压入相应个数的空值(nil)到栈上

lua_settop(L,0); 清空堆栈

也可以用负数索引作为调用lua_settop 的参数,那将会设置栈顶到指定的索引。利用这种技巧,API 提供了下面这个宏,它从堆栈中弹出n 个元素:

#define lua_pop(L,n) lua_settop(L, -(n)-1)

lua_pushvalue:压入堆栈上指定索引的一个抟贝到栈顶

lua_remove:移除指定索引位置的元素,并将其上面所有的元素下移来填补这个位置的空白

lua_insert:移动栈顶元素到指定索引的位置,并将这个索引位置上面的元素全部上移至栈顶被移动留下的空隔;

lua_replace 从栈顶弹出元素值并将其设置到指定索引位置,没有任何移动操作。

2.5:表操作

lua_getglobal:其中一参数为变量名称,每调用一次就把相应的变量值压入栈顶

lua_gettable:他接受table在栈中的位置为参数,调用前需要先将要取的key(string)压入栈,并位于栈顶,

调用lua_gettable 后对应key 值出栈,返回与key 对应的value(栈顶)

lua_newtable:创建一个新的空table 然后将其入栈

lua_settable:以table 在栈中的索引作为参数(key先入栈,value后(顶)),并将栈中的key 和value出栈,用这两个值修改table的相应key值。

lua_setglobal:将栈顶元素出栈,并将其赋给一个全局变量名

[c-sharp]view plaincopy

  1. void setfield (const char *index, int value) {
  2. lua_pushstring(L, index);
  3. lua_pushnumber(L, (double)value/MAX_COLOR);
  4. lua_settable(L, -3);
  5. }
  6. void setcolor (struct ColorTable *ct) {
  7. lua_newtable(L); /* creates a table */
  8. setfield("r", ct->red); /* table.r = ct->r */
  9. setfield("g", ct->green); /* table.g = ct->g */
  10. setfield("b", ct->blue); /* table.b = ct->b */
  11. lua_setglobal(ct->name); /* 'name' = table */
  12. }