avoid crazy levels of work when MIDI Port Info preferences panel is not visible

[ardour.git] / scripts / mixer_settings_recall.lua

diff --git a/scripts/mixer_settings_recall.lua b/scripts/mixer_settings_recall.lua
index 363c7bcf3b22355d45f4e162360149cb0b3d193c..080ecaef3a8e9495c01f2a1e602961665684bfab 100644 (file)
--- a/scripts/mixer_settings_recall.lua
+++ b/scripts/mixer_settings_recall.lua
@@ -13,7 +13,11 @@ ardour {
        ]]
 }
 
-function factory () return function ()
+function factory () 
+       
+       local acoraida_monicas_last_used_recall_file
+
+       return function ()
 
        local user_cfg = ARDOUR.user_config_directory(-1)
        local local_path = ARDOUR.LuaAPI.build_filename(Session:path(), 'mixer_settings')
@@ -60,11 +64,9 @@ function factory () return function ()
                        until proc:isnil()
                end
 
-       function new_plugin(name)
-               for x = 0, 6 do
-                       local plugin = ARDOUR.LuaAPI.new_plugin(Session, name, x, "")
-                       if not(plugin:isnil()) then return plugin end
-               end
+       function new_plugin(name, type)
+               local plugin = ARDOUR.LuaAPI.new_plugin(Session, name, type, "")
+               if not(plugin:isnil()) then return plugin end
        end
 
        function group_by_id(id)
@@ -180,16 +182,18 @@ function factory () return function ()
                                if rt_group then rt_group:add(rt) end
 
                                well_known = {'PRE', 'Trim', 'EQ', 'Comp', 'Fader', 'POST'}
-
+                               protected_instrument = false
                                for k, v in pairs(order) do
                                        local proc = Session:processor_by_id(PBD.ID(1))
                                        if not(was_subbed) then
                                                proc = Session:processor_by_id(PBD.ID(v))
                                        end
                                        if proc:isnil() then
-                                               for id, name in pairs(cache) do
+                                               for id, sub_tbl in pairs(cache) do
+                                                       local name = sub_tbl[1]
+                                                       local type = sub_tbl[2]
                                                        if v == id then
-                                                               proc = new_plugin(name)
+                                                               proc = new_plugin(name, type)
                                                                for _, control in pairs(well_known) do
                                                                        if name == control then
                                                                                proc = get_processor_by_name(rt, control)
@@ -207,13 +211,21 @@ function factory () return function ()
                                        end
                                        ::nextproc::
                                        if proc and not(proc:isnil()) then old_order:push_back(proc) end
+                                       if not(old_order:empty()) and not(protected_instrument) then
+                                               if not(rt:to_track():to_midi_track():isnil()) then
+                                                       if not(rt:the_instrument():isnil()) then
+                                                               protected_instrument = true
+                                                               old_order:push_back(rt:the_instrument())
+                                                       end
+                                               end
+                                       end
                                end
                                rt:reorder_processors(old_order, nil)
                                if muted  then rt:mute_control():set_value(1, 1) else rt:mute_control():set_value(0, 1) end
                                if soloed then rt:solo_control():set_value(1, 1) else rt:solo_control():set_value(0, 1) end
                                rt:gain_control():set_value(gc, 1)
                                rt:trim_control():set_value(tc, 1)
-                               if pc ~= false then rt:pan_azimuth_control():set_value(pc, 1) end
+                               if pc ~= false and not(rt:is_master()) then rt:pan_azimuth_control():set_value(pc, 1) end
                        end
 
                        if plugin then
@@ -245,6 +257,7 @@ function factory () return function ()
                                        if string.find(label, "Assign") or string.find(label, "Enable") then --@ToDo: Check Plugin type == LADSPA or VST?
                                                enable[k] = v --queue any assignments/enables for after the initial parameter recalling to duck the 'in-on-change' feature
                                        end
+                                       print(string.format("%s (Port: %s) -> %s", label, k, v))
                                        ARDOUR.LuaAPI.set_processor_param(proc, k, v)
                                end
 
@@ -353,9 +366,9 @@ function factory () return function ()
                {
                        type = "radio", col=0, colspan=20, align="left", key = "recall-dir", title = "", values =
                        {
-                               ['Pick from Global Settings'] = 1, ['Pick from Local Settings'] = 2
+                               ['Pick from Global Settings'] = 1, ['Pick from Local Settings'] = 2, ['Last Used Recall File'] = 3,
                        },
-                       default = 'Pick from Local Settings'
+                       default = 'Last Used Recall File'
                },
                { type = "label", col=0, colspan=20, align="left", title = ""},
        }
@@ -381,6 +394,7 @@ function factory () return function ()
                                if not(rv) then return end
                                local dry_return = LuaDialog.Dialog("Recall Mixer Settings:", dry_run(false, rv['file'])):run()
                                if dry_return then
+                                       acoraida_monicas_last_used_recall_file = rv['file']
                                        recall(false, rv['file'], dry_return)
                                else
                                        return
@@ -402,6 +416,7 @@ function factory () return function ()
                                if not(rv) then return end
                                local dry_return = LuaDialog.Dialog("Recall Mixer Settings:", dry_run(false, rv['file'])):run()
                                if dry_return then
+                                       acoraida_monicas_last_used_recall_file = rv['file']
                                        recall(true, rv['file'], dry_return)
                                else
                                        return
@@ -412,6 +427,21 @@ function factory () return function ()
                                        LuaDialog.MessageType.Info, LuaDialog.ButtonType.Close):run()
                        end
                end
+
+               if gvld['recall-dir'] == 3 then
+                       if acoraida_monicas_last_used_recall_file then
+                               local dry_return = LuaDialog.Dialog("Recall Mixer Settings:", dry_run(false, acoraida_monicas_last_used_recall_file)):run()
+                               if dry_return then
+                                       recall(true, acoraida_monicas_last_used_recall_file, dry_return)
+                               else
+                                       return
+                               end
+                       else
+                               LuaDialog.Message ("Script has no record of last used file:",
+                                       'Please pick a recall file and then this option will be available',
+                                       LuaDialog.MessageType.Info, LuaDialog.ButtonType.Close):run()
+                       end
+               end
        end
 
 end end