Передача таблицы с подтаблицей в функцию Lua из C++

Question

Я пытаюсь передать таблицу с subtable в функцию Lua в качестве аргумента из C++.

Вот мой код, который не работает, но показывает, что я пытаюсь сделать.

    class DragInfo{
    public:
        std::vector <std::string> files;
        glm::vec2 position;
    };

    //a callback that passes DragInfo to a Lua function as a table which has 2 subtables
    void callDragged(DragInfo &info)
    {
        lua_getglobal(L, "dragged");
        if (!lua_isfunction(L, -1))
        {
            lua_pop(L, 1);
            return;
        }
        lua_newtable(L);
        for (size_t i = 0; i < info.files.size(); ++i)
        {
            lua_pushinteger(L, static_cast<lua_Integer>(i + 1));
            lua_pushstring(L, info.files[i].c_str());
            lua_settable(L, -3);
        }
        lua_pushnumber(L, static_cast<lua_Number>(info.position.x));
        lua_setfield(L, -2, "x");
        lua_pushnumber(L, static_cast<lua_Number>(info.position.y));
        lua_setfield(L, -2, "y");

        if (lua_pcall(L, 1, 0, 0))
            std::cout << "Error : " <<  lua_tostring(L, -1) << std::endl;
    }

А в Lua я хочу иметь возможность, например..

function dragged(info)
   for i=1, #info.files do
       print("dragged filename: " .. info.files[i])
   end
   print("dragged position: " .. info.position.x .. " " .. info.position.y)
end

И результат может быть что-то вроде

dragged filename: background.jpg
dragged filename: apple.png
dragged position: 425 32

Как мне исправить мою функцию C++, чтобы она работала правильно, как в примере?

Answer 1

Это довольно просто. Просто создайте подтаблицы и назначьте их полям во внешней таблице.

Я также рекомендую вам поднять ошибку, если dragged это не функция, а не делать ничего.

// a callback that passes DragInfo to a Lua function as a table which has 2
// subtables
void callDragged(DragInfo &info) {
    lua_getglobal(L, "dragged");
    if (!lua_isfunction(L, -1)) {
        lua_pop(L, 1);
        lua_pushstring(L, "argument is not a function");
        lua_error(L);
        return;
    }

    // outermost table
    lua_newtable(L);

    // subtable "files"
    lua_newtable(L);
    for (size_t i = 0; i < info.files.size(); ++i) {
        lua_pushinteger(L, i + 1);
        lua_pushstring(L, info.files[i].c_str());
        lua_settable(L, -3);
    }
    lua_setfield(L, -2, "files");

    // subtable "position"
    lua_newtable(L);
    lua_pushnumber(L, info.position.x);
    lua_setfield(L, -2, "x");
    lua_pushnumber(L, info.position.y);
    lua_setfield(L, -2, "y");
    lua_setfield(L, -2, "position");

    if (lua_pcall(L, 1, 0, 0) != 0) {
        std::cout << "Error : " << lua_tostring(L, -1) << '\n';
        lua_pop(L, 1);
    }
}