Lua用户数据对象管理

在Lua中，任何两个相同的userdata实例都保证是相等的。但是，当你像你现在这样封装一个C++类实例时，每个被封装的实例都会被放入一个新的userdatum中，这意味着它们不能直接进行比较。

所以你需要为你的对象定义一个__eq元方法。它可能看起来有点像这样：

int l_compare_things(lua_State* l)
{
    MyClass* a = reinterpret_cast<MyClass*>(lua_touserdata(L, 1));
    MyClass* b = reinterpret_cast<MyClass*>(lua_touserdata(L, 2));

    lua_pushboolean(L, (*a) == (*b));

    return 1;
}

这里假设MyClass有某种operator==重载。你可以将这个函数设置为与你的MyClass userdata项相关联的元表中的__eq元方法。你似乎已经涵盖了元表处理，所以我在这里不再多说。

下一个问题是：你正在封装整个类实例作为lua full userdata项。你可能不希望一次又一次地推送相同的东西，并使用了所有可用内存......如果你只推送指针，则这就不那么成问题，但你并没有这样做。因此，你将需要一些唯一的方式来标识你的C++类的每个实例。这里举个有字符串的例子：

class MyClass
{
private:
    std::string _id;
public:
    MyClass(const std::string& id) : _id(id) {}

    const std::string& get_id() { return _id; }

    // setters and operator= overrides not included.
};

void l_push_thing(lua_State* L, const MyClass& thing)
{
    // try to get our instance by ID from the registry table:
    lua_getfield(L, LUA_REGISTRYINDEX, thing.id());

    // if so, return, leaving it at the top of the stack.
    if (lua_isuserdata(L, -1))
        return;

    void *ud = lua_newuserdata(L, sizeof(MyClass));
    *reinterpret_cast<MyClass*>(ud) = thing;
    // set up the metatable, etc

    // duplicate the userdata reference:
    lua_pushvalue(L, -1);

    // push our new userdata into the registry. pops the duplicate from the stack
    lua_setfield(L, LUA_REGISTRYINDEX, thing.get_id());
}

（注意：我没有编译或测试过这个例子。可能有误！）

这将在堆栈顶部留下与某个特定MyClass实例相关联的userdatum。你需要采取自己的步骤来“取消注册”类实例；在这种情况下，每个实例的硬引用存在于注册表中，因此userdatum在你销毁该引用之前将_不会被垃圾回收_。你可能考虑在这里使用弱/短暂表。

这是弱表的工作方式吗？

void Push(const T &tObject)
{
    std::ostringstream o;
    o << tObject;
    std::string sIdentifier = o.str();
    const char *pszIdentifier = sIdentifier.c_str();

    lua_State *L = GetLuaState();
    luaL_getmetatable(L, "lua_userdata");
    if (!lua_istable(L, -1))
    {
        //创建新的弱表
        luaL_newmetatable(L, "lua_userdata");
        lua_pushstring(L, "v");
        lua_setfield(L, -2, "__mode");
    }

    lua_getfield(L, -1, pszIdentifier);
    if (lua_isuserdata(L, -1) == TRUE)
        return lua_remove(L, -2);

    lua_pop(L, 1); //不存在，需要弹出
    void *pUserData = lua_newuserdata(L, sizeof(UINT64));
    *reinterpret_cast<UINT64 *>(pUserData) = UINT64(tObject);

    lua_pushvalue(L, -1);
    lua_setfield(L, -3, pszIdentifier);
    lua_remove(L, -2);
}