Function DoCheckTableSize

engine/script/src/script_table.cpp:341–477

    }

    uint32_t DoCheckTableSize(lua_State* L, int index, int parent_offset, dmArray<const void*>& table_stack)
    {
        int top = lua_gettop(L);
        (void)top;

        luaL_checktype(L, index, LUA_TTABLE);

        const void* table_data = (const void*)lua_topointer(L, index);
        if (StackContains(table_stack, table_data))
        {
            table_stack.SetCapacity(0);
            return luaL_error(L, "Save table is recursive!");
        }
        StackPush(table_stack, table_data);

        lua_pushvalue(L, index);
        lua_pushnil(L);

        uint32_t size = 0;

        // count
        size += 4;
        while (lua_next(L, -2) != 0)
        {
            int key_type = lua_type(L, -2);
            int value_type = lua_type(L, -1);

            if (IsHash(L, -2))
            {
                key_type = LUA_THASH;
            }

            if (key_type != LUA_TSTRING && key_type != LUA_TNUMBER && key_type != LUA_THASH)
            {
                luaL_error(L, "keys in table must be of type number, string or hash (found %s)", lua_typename(L, key_type));
            }

            // key + value type
            size += 2;
            if (key_type == LUA_TSTRING)
            {
                size += sizeof(uint32_t) + lua_objlen(L, -2);
            }
            else if (key_type == LUA_TNUMBER)
            {
                size += 4;
            }
            else if (key_type == LUA_THASH)
            {
                size += sizeof(dmhash_t);
            }

            switch (value_type)
            {
                case LUA_TBOOLEAN:
                {
                    size += 1;
                }