1

当试图将函数的字节码转储到缓冲区时，我惊讶地发现 Lua 堆栈的大小发生了变化。 文档说 lua_dump 不应该推送或弹出堆栈。有些功能可以，有些不可以。

这样做：

function f() print "x" end

这不会：

function f() return "x" end

lua_dump 在这两种情况下都返回 0（没有错误）。

我认为它与print函数的使用有关，但我找不到任何描述正在发生的事情或用户数据中可能包含的内容的文档。..或者如果没有它，该字节码是否可以使用。

示例代码：

static int base64_write(lua_State* L, unsigned char* str, size_t len, 
        struct luaL_Buffer *buf)
{
    unsigned int idx;
    char code[5];
    for (idx=0; idx<len; idx++){
        sprintf(code, "\\%03d", (unsigned int) str[idx]);
        //printf(code);
        luaL_addlstring(buf, code, 4);
    }
    //printf("\n");
    return 0;
}

void dump_function(lua_State* L){
    int stack_sz;
    int res;
    luaL_Buffer buf;

    luaL_buffinit(L, &buf);

    // ** test 1 - works as expected
    lua_settop(L,0);
    luaL_dostring(L, "function f() return 'x' end");
    lua_getglobal(L, "f");
    printf("stack sz: %i\n", lua_gettop(L));
    res = lua_dump(L, (lua_Writer)base64_write, &buf);
    printf("stack sz: %i\n", lua_gettop(L));

    // ** test 2 - not as expected
    lua_settop(L,0);
    luaL_dostring(L, "function f() print 'x' end");
    lua_getglobal(L, "f");
    printf("stack sz: %i\n", lua_gettop(L));
    res = lua_dump(L, (lua_Writer)base64_write, &buf);
    printf("stack sz: %i\n", lua_gettop(L));  // why is this 2?
    printf("type:%s\n", lua_typename(L, lua_type(L, -1))); // why userdata?
}

/* ----- Registration array ----- */
static const luaL_Reg R[] = {
    {"test",    dump_function},
    {NULL,      NULL} /* sentinel */
};

/* ----- Registration function ----- */

LUALIB_API int register_lua_tserialize(lua_State *L)
{
    lua_newtable(L); 
    lua_setglobal(L, "test"); 
    lua_getglobal(L, "test"); 
    luaL_setfuncs(L, R, 0); 
    lua_settop(L, 0);
    return 1;
}
4

1 回答 1

4

这是因为缓冲区对象的使用。请参阅http://pgl.yoyo.org/luai/i/luaL_Buffer上的文档

您需要调用 luaL_pushresult 以摆脱中间缓冲区堆栈项。

于 2012-07-17T18:14:10.140 回答