[Lua]c解析lua 嵌套table

最新推荐文章于 2024-09-03 06:08:14 发布

weixin_30532973

最新推荐文章于 2024-09-03 06:08:14 发布

阅读量546

点赞数 1

CC 4.0 BY-SA版权

文章标签： lua

原文链接：http://www.cnblogs.com/dazhu/archive/2013/02/04/2891750.html

本文介绍了一个用C语言编写的Lua表格解析函数ParseLuaTable，该函数可以递归地遍历Lua中的table，并打印出table中所有键值对的类型及数值。通过一个测试函数展示了如何加载Lua脚本文件并调用此解析函数。

void ParseLuaTable(lua_State *L)
{
    if (!lua_istable(L, -1))
    {
        return;
    }

    lua_pushnil(L);
    while (lua_next(L, -2))
    {
        fprintf(stdout, "%s : %s    ", luaL_typename(L,-2), luaL_typename(L,-1));
        int nKeyType = lua_type(L, -2);
        int nValueType = lua_type(L, -1);

        if (nKeyType == LUA_TNUMBER)
        {
            fprintf(stdout, "%g,", lua_tonumber(L, -2));
        }
        else if (nKeyType == LUA_TSTRING)
        {
            fprintf(stdout, "\"%s\",", lua_tostring(L, -2));
        }
        fprintf(stdout, "   ");  
        if (nValueType == LUA_TNUMBER)
        {
            fprintf(stdout, "%g", lua_tonumber(L, -1));
        }
        else if (nValueType == LUA_TSTRING)
        {
            fprintf(stdout, "\"%s\"", lua_tostring(L, -1));
        }
        else if (nValueType == LUA_TTABLE)
        {
            fprintf(stdout, "\n");
            ParseLuaTable(L);
        }   

        lua_pop(L, 1);
        fprintf(stdout, "\n");   
    }
}

int test()
{
    lua_State *L = luaL_newstate();
    luaL_openlibs(L);
    int error = 0;

    // test.lua 
    //s = {
    //g = "g",
    //b = "b",
    //r = 2,
    //t = {
    //    width = 100,
    //    height = 200,
    //    path = "path",
    //    te = { a = 1, b = 2}
    //},
    //
    //3,
    //4,
    //5,
    //"test"
    //}
    //
    
    luaL_loadfile(L, "test.lua");
    error = lua_pcall(L, 0, 0, 0);
    if (error) {
        fprintf(stderr, "%s", lua_tostring(L, -1));
        lua_pop(L, 1);/* pop error message from the stack */
    }
    
    lua_getglobal(L, "s");
    ParseLuaTable(L);

    if (error) {
        fprintf(stderr, "%s", lua_tostring(L, -1));
        lua_pop(L, 1);/* pop error message from the stack */
    }

    return 0;
}