Function LoadTSTRING

engine/script/src/script_table.cpp:297–314

When loading/unpacking messages/save games, we use pascal strings, and the Lua binary string api

    // When loading/unpacking messages/save games, we use pascal strings, and the Lua binary string api
    static uint32_t LoadTSTRING(lua_State* L, const char* buffer, const char* buffer_end, uint32_t count, PushTableLogger& logger)
    {
        uint32_t len;
        memcpy(&len, buffer, sizeof(uint32_t));
        size_t value_len = (size_t)len;
        uint32_t total_size = value_len + sizeof(uint32_t);
        if (buffer_end - buffer < (intptr_t)total_size)
        {
            char log_str[PUSH_TABLE_LOGGER_STR_SIZE];
            PushTableLogPrint(logger, log_str);
            char str[512];
            dmSnPrintf(str, sizeof(str), "Reading outside of buffer at element #%d (string) [value_len=%lu]: wanted to read: %d bytes left: %d [BufStart: %p, BufSize: %lu]\n'%s'", count, value_len, total_size, (uint32_t)(buffer_end - buffer), logger.m_BufferStart, logger.m_BufferSize, log_str);
            luaL_error(L, "%s", str);
        }

        lua_pushlstring(L, buffer + sizeof(uint32_t), value_len);
        return total_size;
    }

    static void StackPush(dmArray<const void*>& table_stack, const void* p)
    {