Avoid the use of dynamic_cast in TempoMap for performance improvement.

[ardour.git] / libs / ardour / luaproc.cc

diff --git a/libs/ardour/luaproc.cc b/libs/ardour/luaproc.cc
index 63b4e11299f5b1c2bd23d66c6eff6b16efbe4686..75d957779d8f6402ca8deff04326a80e890e70f0 100644 (file)
--- a/libs/ardour/luaproc.cc
+++ b/libs/ardour/luaproc.cc
@@ -46,12 +46,13 @@ LuaProc::LuaProc (AudioEngine& engine,
                   Session& session,
                   const std::string &script)
        : Plugin (engine, session)
-       , _mempool ("LuaProc", 1048576) // 1 MB is plenty. (64K would be enough)
+       , _mempool ("LuaProc", 2097152)
        , lua (lua_newstate (&PBD::ReallocPool::lalloc, &_mempool))
        , _lua_dsp (0)
        , _script (script)
        , _lua_does_channelmapping (false)
        , _lua_has_inline_display (false)
+       , _designated_bypass_port (UINT32_MAX)
        , _control_data (0)
        , _shadow_data (0)
        , _has_midi_input (false)
@@ -69,12 +70,13 @@ LuaProc::LuaProc (AudioEngine& engine,
 
 LuaProc::LuaProc (const LuaProc &other)
        : Plugin (other)
-       , _mempool ("LuaProc", 1048576) // 1 MB is plenty. (64K would be enough)
+       , _mempool ("LuaProc", 2097152)
        , lua (lua_newstate (&PBD::ReallocPool::lalloc, &_mempool))
        , _lua_dsp (0)
        , _script (other.script ())
        , _lua_does_channelmapping (false)
        , _lua_has_inline_display (false)
+       , _designated_bypass_port (UINT32_MAX)
        , _control_data (0)
        , _shadow_data (0)
        , _has_midi_input (false)
@@ -118,6 +120,7 @@ LuaProc::init ()
        _stats_avg[0] = _stats_avg[1] = _stats_max[0] = _stats_max[1] = _stats_cnt = 0;
 #endif
 
+       lua.tweak_rt_gc ();
        lua.Print.connect (sigc::mem_fun (*this, &LuaProc::lua_print));
        // register session object
        lua_State* L = lua.getState ();
@@ -130,6 +133,7 @@ LuaProc::init ()
                .beginClass <LuaProc> ("LuaProc")
                .addFunction ("queue_draw", &LuaProc::queue_draw)
                .addFunction ("shmem", &LuaProc::instance_shm)
+               .addFunction ("table", &LuaProc::instance_ref)
                .endClass ()
                .endNamespace ();
 
@@ -284,6 +288,10 @@ LuaProc::load_script ()
                                _param_desc[pn].sr_dependent = lr["ratemult"].isBoolean () && (lr["ratemult"]).cast<bool> ();
                                _param_desc[pn].enumeration  = lr["enum"].isBoolean () && (lr["enum"]).cast<bool> ();
 
+                               if (lr["bypass"].isBoolean () && (lr["bypass"]).cast<bool> ()) {
+                                       _designated_bypass_port = pn - 1; // lua table starts at 1.
+                               }
+
                                if (lr["unit"].isString ()) {
                                        std::string unit = lr["unit"].cast<std::string> ();
                                        if (unit == "dB")             { _param_desc[pn].unit = ParameterDescriptor::DB; }
@@ -589,27 +597,29 @@ LuaProc::can_support_io_configuration (const ChanCount& in, ChanCount& out, Chan
 bool
 LuaProc::configure_io (ChanCount in, ChanCount out)
 {
-       _configured_in = in;
-       _configured_out = out;
-
-       _configured_in.set (DataType::MIDI, _has_midi_input ? 1 : 0);
-       _configured_out.set (DataType::MIDI, _has_midi_output ? 1 : 0);
+       in.set (DataType::MIDI, _has_midi_input ? 1 : 0);
+       out.set (DataType::MIDI, _has_midi_output ? 1 : 0);
 
        // configure the DSP if needed
-       lua_State* L = lua.getState ();
-       luabridge::LuaRef lua_dsp_configure = luabridge::getGlobal (L, "dsp_configure");
-       if (lua_dsp_configure.type () == LUA_TFUNCTION) {
-               try {
-                       lua_dsp_configure (&in, &out);
-               } catch (luabridge::LuaException const& e) {
-                       PBD::error << "LuaException: " << e.what () << "\n";
+       if (in != _configured_in || out != _configured_out) {
+               lua_State* L = lua.getState ();
+               luabridge::LuaRef lua_dsp_configure = luabridge::getGlobal (L, "dsp_configure");
+               if (lua_dsp_configure.type () == LUA_TFUNCTION) {
+                       try {
+                               lua_dsp_configure (&in, &out);
+                       } catch (luabridge::LuaException const& e) {
+                               PBD::error << "LuaException: " << e.what () << "\n";
 #ifndef NDEBUG
-                       std::cerr << "LuaException: " << e.what () << "\n";
+                               std::cerr << "LuaException: " << e.what () << "\n";
 #endif
-                       return false;
+                               return false;
+                       }
                }
        }
 
+       _configured_in = in;
+       _configured_out = out;
+
        _info->n_inputs = _configured_in;
        _info->n_outputs = _configured_out;
        return true;
@@ -757,7 +767,8 @@ LuaProc::connect_and_run (BufferSet& bufs,
 #ifdef WITH_LUAPROC_STATS
        int64_t t1 = g_get_monotonic_time ();
 #endif
-       lua.collect_garbage (); // rt-safe, slight *regular* performance overhead
+
+       lua.collect_garbage_step ();
 #ifdef WITH_LUAPROC_STATS
        ++_stats_cnt;
        int64_t t2 = g_get_monotonic_time ();
@@ -1061,6 +1072,7 @@ LuaProc::setup_lua_inline_gui (LuaState *lua_gui)
                .beginNamespace ("Ardour")
                .beginClass <LuaProc> ("LuaProc")
                .addFunction ("shmem", &LuaProc::instance_shm)
+               .addFunction ("table", &LuaProc::instance_ref)
                .endClass ()
                .endNamespace ();