lua学习(三)

对lua有了个初步的了解, 同事按捺不住在项目上面用了一下c api. 由于大家都不熟lua的 c api, 我也去学习一下. 这样大家可以讨论了.
5.1的 luaopen_io()不能用了, 用了一下直接挂掉. 查了一下官方的文档, 他没有说清楚.只是说不能直接调用. 不明白 
而且看了一下, lua_open()宏最好由 luaL_newstate()来代替.

首先试了一下对 全局变量的读取.
width = 100;
height = 200;

执行操作
1. 新建一个lua状态
2. open要用到的库, 可以看到栈上就多了几个表. 我open了base, string和math之后,栈上会压进四个表.猜猜有可能有一个math表, math表里面有sin,pi之类的函数或者变量.
3. 载入test.lua文件,用lua_pcall执行它.这时候width和height的值就全部确定了. 下一步是通过c来得到它们
4. lua_getglobal根据"width"名称取得width的值, 这个方法会把width的值也就是100压入栈中 :)
5. 用lua_isnumber判断得到的是否数字,如果是数字那用lua_tonumber来取得值

这个简单! 接下来是取表
BLUE = {r=100, g=0, b=1}
执行操作:
1. 新建一个lua状态
2. open要用到的库, 可以看到栈上就多了几个表. 我open了base, string和math之后,栈上会压进四个表.猜猜有可能有一个math表, math表里面有sin,pi之类的函数或者变量.
3. 载入test.lua文件,用lua_pcall执行它.
4. lua_getglobal根据"BLUE "名称取得BLUE 的值,同时把BLUE 的值,也就是一个BLUE的表压入栈中.
5. lua_pushstring把'r'压入栈中,此时栈顶元素为'r', 下面为BLUE表. 也就是'r '的index为-1,Blue表的index为-2
6. 所以用lua_gettable(L, -2);根据index值-2取得这个表, 再由栈顶的key值'r',取得BLUE表的r元素的值代替栈顶的值.这时候栈顶为100,下面就是BLUE表.
7.接下来就是取值了, 在栈顶取值,和以前的一样 :)  要注意的是, 栈顶的值要pop清掉 :)

再试试多层的表 :
DBServer =
{
    {
        Name    = "__odbc0",
        DSN     = "oracleDB",
        Login   = "onlinegame",
        Passwd  = "aol123"
    }
}

这个预料应该是push一个number取得子表,试验之后果然和猜想一样!

#include <stdio.h>
#include <stdlib.h>
#include <stdarg.h>

extern "C"
{
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
}

void error (lua_State *L, const char *fmt, ...)
{
 va_list argp;
 va_start(argp, fmt);
 vfprintf(stderr, fmt, argp);
 va_end(argp);
 lua_close(L);
 exit(EXIT_FAILURE);
}

int main (void)
{
 //int width;
 //int height;

 lua_State *L = lua_open();

 luaopen_base(L);
 luaopen_string(L);
 luaopen_math(L);

 if (luaL_loadfile(L, "test.lua") || lua_pcall(L, 0, 0, 0))
  error(L, "cannot run configuration file: %s", lua_tostring(L, -1));

 
 lua_getglobal(L, "DBServer");
 if (!lua_istable(L, -1))
  error(L, "'DBServer' is not a valid table");

 lua_pushnumber(L, 1);
 lua_gettable(L, -2);
 if (!lua_istable(L, -1))
  error(L, "this is not a valid  table");

 lua_pushstring(L, "Name");
 lua_gettable(L, -2);

 if (!lua_isstring(L, -1))
  error(L, "invalid string");

 printf("结果是: /t `%s' /n", lua_tostring(L, -1));
 
 lua_pop(L, 1);

 lua_close(L);

}