Update tomsloop script for A6 - Thanks to Tom Brand
[ardour.git] / scripts / mixer_settings_recall.lua
index e2db3b816be0462d1e9dac91607b8eebd45ef87e..080ecaef3a8e9495c01f2a1e602961665684bfab 100644 (file)
@@ -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)
@@ -107,16 +109,14 @@ function factory () return function ()
                for l in file:lines() do
                        --print(i, l)
 
-                       local exec_line = dry_run["dothis-"..i]
+                       local create_groups = dry_run["create_groups"]
                        local skip_line = false
-                       if not(exec_line == nil) and not(exec_line) then
-                               skip_line = true
-                       end
 
                        local plugin, route, group = false, false, false
                        local f = load(l)
 
                        if debug then
+                               --print('create_groups ' .. tostring(create_groups))
                                print(i, string.sub(l, 0, 29), f)
                        end
 
@@ -127,25 +127,25 @@ function factory () return function ()
                        if instance["group_id"]  then group = true end
 
                        if group then
-                               if skip_line then goto nextline end
-
                                local g_id   = instance["group_id"]
                                local routes = instance["routes"]
                                local name   = instance["name"]
                                local group  = group_by_id(g_id)
                                if not(group) then
-                                       local group = Session:new_route_group(name)
-                                       for _, v in pairs(routes) do
-                                               local rt = Session:route_by_id(PBD.ID(v))
-                                               if rt:isnil() then rt = Session:route_by_name(name) end
-                                               if not(rt:isnil()) then group:add(rt) end
+                                       if create_groups then
+                                               local group = Session:new_route_group(name)
+                                               for _, v in pairs(routes) do
+                                                       local rt = Session:route_by_id(PBD.ID(v))
+                                                       if rt:isnil() then rt = Session:route_by_name(name) end
+                                                       if not(rt:isnil()) then group:add(rt) end
+                                               end
                                        end
                                end
                        end
 
                        if route then
                                local substitution = tonumber(dry_run["destination-"..i])
-                               if skip_line or (substitution == 0) then
+                               if substitution == 0 then
                                        bypass_routes[#bypass_routes + 1] = instance["route_id"]
                                        goto nextline
                                end
@@ -182,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)
@@ -209,18 +211,24 @@ 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
-                               if skip_line then goto nextline end
-
                                --if the plugin is owned by a route
                                --we decided not to use, skip it
                                for _, v in pairs(bypass_routes) do
@@ -249,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
 
@@ -275,13 +284,12 @@ function factory () return function ()
 
                local i = 0
                local dry_table = {
-                       {type = "label", align="right", key="col-0-title", col=0, colspan=1, title = 'Settings:'},
-                       {type = "label", align="right", key="col-1-title", col=1, colspan=1, title = 'Source:'},
-                       {type = "label", align="left", key="col-2-title", col=2, colspan=1, title = 'Destination:'},
+                       {type = "label", align="right", key="col-1-title", col=0, colspan=1, title = 'Source:'},
+                       {type = "label", align="left", key="col-2-title", col=1, colspan=1, title = 'Destination:'},
                }
                local file = io.open(path, "r")
                assert(file, "File not found!")
-
+               pad = 0
                for l in file:lines() do
                        local do_plugin, do_route, do_group = false, false, false
                        local f = load(l)
@@ -304,19 +312,16 @@ function factory () return function ()
                                local group_ptr  = group_by_id(group_id)
 
                                if not(group_ptr) then
-                                       new_group = Session:new_route_group(group_name)
-                                       dlg_title = string.format("%s.", group_name, new_group:name())
+                                       dlg_title = string.format("(Group) %s.", group_name)
                                        --action_title = "will create and use settings"
                                else
-                                       dlg_title = string.format("%s.", group_ptr:name())
+                                       dlg_title = string.format("(Group) %s.", group_ptr:name())
                                        --action_title = "will use group settings"
                                end
                                table.insert(dry_table, {
-                                       type = "label", align="right", key =  "type-"..i , col = 0, colspan = 1, title = "(Group)"
-                               })
-                               table.insert(dry_table, {
-                                       type = "label", align="right", key =  "group-"..i , col = 1, colspan = 1, title = dlg_title
+                                       order=pad, type = "label", align="right", key =  "group-"..i , col = 0, colspan = 1, title = dlg_title
                                })
+                               pad = pad + 1
                        end
 
                        if do_route then
@@ -340,18 +345,19 @@ function factory () return function ()
                                        --action_title = "will use route settings"
                                end
                                if route_ptr:isnil() then name = route_name else name = route_ptr:name() end
+
                                table.insert(dry_table, {
-                                       type = "label",    align="right", key = "type-"..i , col = 0, colspan = 1, title = "(Strip)"
-                               })
-                               table.insert(dry_table, {
-                                       type = "label",    align="right", key = "route-"..i , col = 1, colspan = 1, title = dlg_title
+                                       order=instance['pi_order']+pad, type = "label",    align="right", key = "route-"..i , col = 0, colspan = 1, title = dlg_title
                                })
                                table.insert(dry_table, {
-                                       type = "dropdown", align="left", key = "destination-"..i, col = 2, colspan = 1, title = "", values = route_values, default = name or "----"
+                                       type = "dropdown", align="left", key = "destination-"..i, col = 1, colspan = 1, title = "", values = route_values, default = name or "----"
                                })
                        end
                        i = i + 1
                end
+               table.insert(dry_table, {
+                       type = "checkbox", col=0, colspan=2, align="left",  key = "create_groups", default = true, title = "Create Groups if necessary?"
+               })
                return dry_table
        end
 
@@ -360,16 +366,16 @@ 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 = ""},
        }
 
        local recall_options = {
                { type = "label", col=0, colspan=10, align="left", title = "" },
-               { type = "file",  col=0, colspan=15, align="left", key = "file", title = "Select a Settings File:",  path = ARDOUR.LuaAPI.build_filename(Session:path(), "export", "params.lua") },
+               { type = "file",  col=0, colspan=15, align="left", key = "file", title = "Select a Settings File",  path = ARDOUR.LuaAPI.build_filename(Session:path(), "export", "params.lua") },
                { type = "label", col=0, colspan=10, align="left", title = "" },
        }
 
@@ -386,8 +392,9 @@ function factory () return function ()
                                recall_options[2]['path'] = global_default_path
                                local rv = LuaDialog.Dialog("Recall Mixer Settings:", recall_options):run()
                                if not(rv) then return end
-                               local dry_return = LuaDialog.Dialog("Mixer Store:", dry_run(false, rv['file'])):run()
+                               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
@@ -401,15 +408,16 @@ function factory () return function ()
 
                if gvld['recall-dir'] == 2 then
                        local local_ok = isdir(local_path)
-                       local local_default_path = ARDOUR.LuaAPI.build_filename(local_path, 'stub')
+                       local local_default_path = ARDOUR.LuaAPI.build_filename(local_path, 'asdf')
                        print(local_default_path)
                        if local_ok then
-                               recall_options[2]['path'] = local_path
+                               recall_options[2]['path'] = local_default_path
                                local rv = LuaDialog.Dialog("Recall Mixer Settings:", recall_options):run()
                                if not(rv) then return end
-                               local dry_return = LuaDialog.Dialog("Mixer Store:", dry_run(false, rv['file'])):run()
+                               local dry_return = LuaDialog.Dialog("Recall Mixer Settings:", dry_run(false, rv['file'])):run()
                                if dry_return then
-                                       recall(false, rv['file'], dry_return)
+                                       acoraida_monicas_last_used_recall_file = rv['file']
+                                       recall(true, rv['file'], dry_return)
                                else
                                        return
                                end
@@ -419,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