我正在尝试遍历 Lua 中的表并输出:
- 每个表的键。
- 每个表中每个条目的键/值对。
这是代码:
void print_table(lua_State *L)
{
lua_pushnil(L);
while(lua_next(L, -2) != 0) {
const char *key = lua_tostring(L, -2);
if(lua_isstring(L, -1))
printf("%s = %s", key, lua_tostring(L, -1));
else if(lua_isnumber(L, -1))
printf("%s = %d", key, lua_tonumber(L, -1));
else if(lua_istable(L, -1)) {
printf("%s", key);
PrintTable(L);
}
lua_pop(L, 1);
}
}
}
这是我要输出的表之一的示例:
s = {
p = {
n = "D",
g = "1",
},
d = {
l = "N",
p = "N",
u = "O",
po = 100,
},
e = {
{
n = "B",
l = "P",
p = "P",
u = "P",
po = "P",
pa = {
v = "4",
a = "U",
f = {
{ name = "U", type = "U" },
{ name = "A", type = "I" },
{ name = "A", type = "I" },
{ name = "P", type = "U" },
{ name = "P", type = "U" },
{ name = "P", type = "I" },
{ name = "T", type = "U" },
{ name = "D", type = "U" },
{ name = "D", type = "I" },
{ name = "S", type = "I" },
{ name = "C", type = "U" },
{ name = "G", type = "U" },
{ name = "C", type = "F" },
{ name = "C", type = "U" },
},
},
c = {
v = "1",
a = "",
f = {
{ name = "B", type = "U" },
{ name = "E", type = "F" },
},
},
},
},
}
该函数在该行中崩溃:
while(lua_next(L, -2) != 0)
由于索引无效。导致崩溃的脚本行是:
{ name = "B", type = "U" },
我不得不承认我对 Lua 中的堆栈并不十分熟悉,我尝试过寻找类似的答案,但找不到任何答案。有人知道我在做什么错吗?
谢谢!
如果有人感兴趣,添加了工作版本:
void print_table(lua_State *L)
{
if ((lua_type(L, -2) == LUA_TSTRING))
printf("%s", lua_tostring(L, -2));
lua_pushnil(L);
while(lua_next(L, -2) != 0) {
if(lua_isstring(L, -1))
printf("%s = %s", lua_tostring(L, -2), lua_tostring(L, -1));
else if(lua_isnumber(L, -1))
printf("%s = %d", lua_tostring(L, -2), lua_tonumber(L, -1));
else if(lua_istable(L, -1)) {
print_table(L);
}
lua_pop(L, 1);
}
}