Function RunScript

engine/render/src/render/render_script.cpp:3422–3501

    }

    RenderScriptResult RunScript(HRenderScriptInstance script_instance, RenderScriptFunction script_function, void* args)
    {
        DM_PROFILE("RenderScript");

        RenderScriptResult result = RENDER_SCRIPT_RESULT_OK;
        HRenderScript script = script_instance->m_RenderScript;
        if (script->m_FunctionReferences[script_function] != LUA_NOREF)
        {
            lua_State* L = script_instance->m_RenderContext->m_RenderScriptContext.m_LuaState;
            int top = lua_gettop(L);
            (void) top;

            lua_rawgeti(L, LUA_REGISTRYINDEX, script_instance->m_InstanceReference);
            dmScript::SetInstance(L);

            lua_rawgeti(L, LUA_REGISTRYINDEX, script->m_FunctionReferences[script_function]);
            lua_rawgeti(L, LUA_REGISTRYINDEX, script_instance->m_InstanceReference);

            int arg_count = 1;

            const char* message_name = 0;
            if (script_function == RENDER_SCRIPT_FUNCTION_ONMESSAGE)
            {
                arg_count = 4;

                dmMessage::Message* message = (dmMessage::Message*)args;
                dmScript::PushHash(L, message->m_Id);
                if (message->m_Descriptor != 0)
                {
                    dmDDF::Descriptor* descriptor = (dmDDF::Descriptor*)message->m_Descriptor;
                    // TODO: setjmp/longjmp here... how to handle?!!! We are not running "from lua" here
                    // lua_cpcall?
                    message_name = descriptor->m_Name;
                    dmScript::PushDDF(L, descriptor, (const char*)message->m_Data, true);
                }
                else
                {
                    if (ProfileIsInitialized())
                    {
                        // Try to find the message name via id and reverse hash
                        message_name = (const char*)dmHashReverse64(message->m_Id, 0);
                    }
                    if (message->m_DataSize > 0)
                    {
                        dmScript::PushTable(L, (const char*)message->m_Data, message->m_DataSize);
                    }
                    else
                    {
                        lua_newtable(L);
                    }
                }
                dmScript::PushURL(L, message->m_Sender);
            }
            else if (script_function == RENDER_SCRIPT_FUNCTION_UPDATE)
            {
                float* dt = (float*)args;
                lua_pushnumber(L, (lua_Number) *dt);
                arg_count += 1;