Method load

ogsr_engine/xrGame/script_vars_storage.cpp:94–164

}

int CScriptVarsTable::load(IReader& memory_stream)
{
    clear();
    u32 var_count = memory_stream.r_u32();
    is_array = true;
    int loaded = 0;
    // while (var_count-- > 0 && )
    for (u32 n_var = 0; n_var < var_count && memory_stream.elapsed() >= 4; n_var++)
    {
        loaded++;
        u32 pos = memory_stream.tell();
        if (-1 == memory_stream.r_s32())
        {
            Msg("!#ERROR: script vars table %s loaded vars %d from %d, and found EOT flag ", name(), n_var, var_count);
            // return;
        }
        else
            memory_stream.seek(pos);

        shared_str var_name;
        SCRIPT_VAR sv;
        memory_stream.r_stringZ(var_name);
        sv.type = (int)memory_stream.r_u32();
        sv.size = memory_stream.r_u32();
        // MsgV ("3SCRIPT_VARS", "#DBG: CScriptVarsTable::load n_var = %3d type = 0x%08x   size = %5d  name =  %s.%s   ", n_var, sv.type, sv.size, name(), *var_name);
        if (LUA_TTABLE == sv.eff_type())
        {
            memory_stream.seek(memory_stream.tell() - 4);
            sv.T = xr_new<CScriptVarsTable>();
            sv.T->add_ref();
            sv.T->is_array = (sv.type & SVT_ARRAY_TABLE) > 0;
            sv.T->zero_key = (sv.type & SVT_ARRAY_ZEROK) > 0;
            sv.T->m_name.sprintf("%s.%s", name(), *var_name);
            loaded += sv.T->load(memory_stream);
            m_map[var_name] = sv;
            continue;
        }

        if (LUA_TNETPACKET == sv.eff_type())
        {
            sv.P = xr_new<NET_Packet>();
            sv.P->B.count = sv.size;
            sv.P->r_seek(memory_stream.r_u32());
            memory_stream.r(sv.P->B.data, sv.size);
            m_map[var_name] = sv;
            continue;
        }

        { // default var type
            if (sv.size > sizeof(sv.s_value))
            {
                sv.data = xr_malloc(sv.size);
                memory_stream.r(sv.data, sv.size);

                if (LUA_TSTRING == sv.eff_type() && -1 == *(int*)sv.data) // явный выход за пределы чтения
                    Msg("!#WARN: probably string load failed = %s ", (LPCSTR)sv.data);
            }
            else