X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fsurfaces%2Fosc%2Fosc.cc;h=7e7adb819a4275e96607387f41002fa1821dcdcf;hb=559344d99d237ee5f9c8995919956446d32daade;hp=4c56a239c6c456415a817f0173f25f622075b75a;hpb=77c91067691974d469fd0a9ba713863903e62a33;p=ardour.git diff --git a/libs/surfaces/osc/osc.cc b/libs/surfaces/osc/osc.cc index 4c56a239c6..80d45b0bc7 100644 --- a/libs/surfaces/osc/osc.cc +++ b/libs/surfaces/osc/osc.cc @@ -28,6 +28,7 @@ #include "pbd/gstdio_compat.h" #include +#include "pbd/control_math.h" #include #include #include @@ -38,6 +39,7 @@ #include "ardour/route.h" #include "ardour/audio_track.h" #include "ardour/midi_track.h" +#include "ardour/vca.h" #include "ardour/monitor_control.h" #include "ardour/dB.h" #include "ardour/filesystem_paths.h" @@ -45,7 +47,9 @@ #include "ardour/plugin.h" #include "ardour/plugin_insert.h" #include "ardour/presentation_info.h" +#include "ardour/profile.h" #include "ardour/send.h" +#include "ardour/internal_send.h" #include "ardour/phase_control.h" #include "ardour/solo_isolate_control.h" #include "ardour/solo_safe_control.h" @@ -56,6 +60,7 @@ #include "osc_controllable.h" #include "osc_route_observer.h" #include "osc_global_observer.h" +#include "osc_cue_observer.h" #include "pbd/i18n.h" using namespace ARDOUR; @@ -89,16 +94,19 @@ OSC::OSC (Session& s, uint32_t port) , _shutdown (false) , _osc_server (0) , _osc_unix_server (0) - , _send_route_changes (true) , _debugmode (Off) - , address_only (false) + , address_only (true) , remote_port ("8000") , default_banksize (0) - , default_strip (31) + , default_strip (159) , default_feedback (0) , default_gainmode (0) + , default_send_size (0) + , default_plugin_size (0) , tick (true) , bank_dirty (false) + , observer_busy (true) + , scrub_speed (0) , gui (0) { _instance = this; @@ -108,7 +116,9 @@ OSC::OSC (Session& s, uint32_t port) OSC::~OSC() { + tick = false; stop (); + tear_down_gui (); _instance = 0; } @@ -162,19 +172,6 @@ OSC::get_active () const return _osc_server != 0; } -int -OSC::set_feedback (bool yn) -{ - _send_route_changes = yn; - return 0; -} - -bool -OSC::get_feedback () const -{ - return _send_route_changes; -} - int OSC::start () { @@ -239,6 +236,7 @@ OSC::start () } } + observer_busy = false; register_callbacks(); session_loaded (*session); @@ -255,9 +253,6 @@ OSC::start () periodic_connection = periodic_timeout->connect (sigc::mem_fun (*this, &OSC::periodic)); periodic_timeout->attach (main_loop()->get_context()); - // catch changes to selection for GUI_select mode - StripableSelectionChanged.connect (session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::gui_selection_changed, this), this); - // catch track reordering // receive routes added session->RouteAdded.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::notify_routes_added, this, _1), this); @@ -266,7 +261,10 @@ OSC::start () // order changed PresentationInfo::Change.connect (session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); - _select = boost::shared_ptr(); + _select = ControlProtocol::first_selected_stripable(); + if(!_select) { + _select = session->master_out (); + } return 0; } @@ -304,8 +302,18 @@ OSC::thread_init () int OSC::stop () { - /* stop main loop */ + periodic_connection.disconnect (); + session_connections.drop_connections (); + + // clear surfaces + observer_busy = true; + for (uint32_t it = 0; it < _surface.size (); ++it) { + OSCSurface* sur = &_surface[it]; + surface_destroy (sur); + } + _surface.clear(); + /* stop main loop */ if (local_server) { g_source_destroy (local_server); g_source_unref (local_server); @@ -338,44 +346,48 @@ OSC::stop () ::g_unlink (_osc_url_file.c_str() ); } - periodic_connection.disconnect (); - session_connections.drop_connections (); - // Delete any active route observers - for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) { - - OSCRouteObserver* rc; + return 0; +} - if ((rc = dynamic_cast(*x)) != 0) { - delete *x; - x = route_observers.erase (x); - } else { - ++x; - } +void +OSC::surface_destroy (OSCSurface* sur) +{ + OSCSelectObserver* so; + if ((so = dynamic_cast(sur->sel_obs)) != 0) { + so->clear_observer (); + delete so; + sur->sel_obs = 0; + PBD::ScopedConnection pc = sur->proc_connection; + pc.disconnect (); } -// Should maybe do global_observers too - for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end();) { - OSCGlobalObserver* gc; + OSCCueObserver* co; + if ((co = dynamic_cast(sur->cue_obs)) != 0) { + delete co; + sur->cue_obs = 0; + sur->sends.clear (); + } - if ((gc = dynamic_cast(*x)) != 0) { - delete *x; - x = global_observers.erase (x); - } else { - ++x; - } + OSCGlobalObserver* go; + if ((go = dynamic_cast(sur->global_obs)) != 0) { + go->clear_observer (); + delete go; + sur->global_obs = 0; } -// delete select observers - for (uint32_t it = 0; it < _surface.size(); ++it) { - OSCSurface* sur = &_surface[it]; - OSCSelectObserver* so; - if ((so = dynamic_cast(sur->sel_obs)) != 0) { - delete so; + uint32_t st_end = sur->observers.size (); + + for (uint32_t i = 0; i < st_end; i++) { + OSCRouteObserver* ro; + if ((ro = dynamic_cast(sur->observers[i])) != 0) { + ro->clear_strip (); + delete ro; + ro = 0; } } - - return 0; + sur->observers.clear(); } + void OSC::register_callbacks() { @@ -399,14 +411,15 @@ OSC::register_callbacks() // Some controls have optional "f" for feedback or touchosc // http://hexler.net/docs/touchosc-controls-reference - REGISTER_CALLBACK (serv, "/set_surface", "iiii", set_surface); - REGISTER_CALLBACK (serv, "/set_surface/feedback", "i", set_surface_feedback); - REGISTER_CALLBACK (serv, "/set_surface/bank_size", "i", set_surface_bank_size); - REGISTER_CALLBACK (serv, "/set_surface/gainmode", "i", set_surface_gainmode); - REGISTER_CALLBACK (serv, "/set_surface/strip_types", "i", set_surface_strip_types); REGISTER_CALLBACK (serv, "/refresh", "", refresh_surface); REGISTER_CALLBACK (serv, "/refresh", "f", refresh_surface); REGISTER_CALLBACK (serv, "/strip/list", "", routes_list); + REGISTER_CALLBACK (serv, "/strip/list", "f", routes_list); + REGISTER_CALLBACK (serv, "/strip/custom/enable", "f", custom_enable); + REGISTER_CALLBACK (serv, "/strip/custom/clear", "f", custom_clear); + REGISTER_CALLBACK (serv, "/strip/custom/clear", "", custom_clear); + REGISTER_CALLBACK (serv, "/surface/list", "", surface_list); + REGISTER_CALLBACK (serv, "/surface/list", "f", surface_list); REGISTER_CALLBACK (serv, "/add_marker", "", add_marker); REGISTER_CALLBACK (serv, "/add_marker", "f", add_marker); REGISTER_CALLBACK (serv, "/access_action", "s", access_action); @@ -417,6 +430,9 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/goto_start", "f", goto_start); REGISTER_CALLBACK (serv, "/goto_end", "", goto_end); REGISTER_CALLBACK (serv, "/goto_end", "f", goto_end); + REGISTER_CALLBACK (serv, "/scrub", "f", scrub); + REGISTER_CALLBACK (serv, "/jog", "f", jog); + REGISTER_CALLBACK (serv, "/jog/mode", "f", jog_mode); REGISTER_CALLBACK (serv, "/rewind", "", rewind); REGISTER_CALLBACK (serv, "/rewind", "f", rewind); REGISTER_CALLBACK (serv, "/ffwd", "", ffwd); @@ -425,7 +441,7 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/transport_stop", "f", transport_stop); REGISTER_CALLBACK (serv, "/transport_play", "", transport_play); REGISTER_CALLBACK (serv, "/transport_play", "f", transport_play); - REGISTER_CALLBACK (serv, "/transport_frame", "", transport_frame); + REGISTER_CALLBACK (serv, "/transport_frame", "", transport_sample); REGISTER_CALLBACK (serv, "/transport_speed", "", transport_speed); REGISTER_CALLBACK (serv, "/record_enabled", "", record_enabled); REGISTER_CALLBACK (serv, "/set_transport_speed", "f", set_transport_speed); @@ -462,6 +478,7 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/mark_out", "f", mark_out); REGISTER_CALLBACK (serv, "/toggle_click", "", toggle_click); REGISTER_CALLBACK (serv, "/toggle_click", "f", toggle_click); + REGISTER_CALLBACK (serv, "/click/level", "f", click_level); REGISTER_CALLBACK (serv, "/midi_panic", "", midi_panic); REGISTER_CALLBACK (serv, "/midi_panic", "f", midi_panic); REGISTER_CALLBACK (serv, "/toggle_roll", "", toggle_roll); @@ -474,7 +491,6 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/set_loop_range", "f", set_loop_range); REGISTER_CALLBACK (serv, "/set_session_range", "", set_session_range); REGISTER_CALLBACK (serv, "/set_session_range", "f", set_session_range); - // /toggle_monitor_* not working (comented out) REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "", toggle_monitor_mute); REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "f", toggle_monitor_mute); REGISTER_CALLBACK (serv, "/toggle_monitor_dim", "", toggle_monitor_dim); @@ -526,18 +542,25 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "f", scroll_dn_1_page); REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "", scroll_dn_1_page); REGISTER_CALLBACK (serv, "/bank_up", "", bank_up); - REGISTER_CALLBACK (serv, "/bank_up", "f", bank_up); + REGISTER_CALLBACK (serv, "/bank_up", "f", bank_delta); REGISTER_CALLBACK (serv, "/bank_down", "", bank_down); REGISTER_CALLBACK (serv, "/bank_down", "f", bank_down); + REGISTER_CALLBACK (serv, "/use_group", "f", use_group); // controls for "special" strips REGISTER_CALLBACK (serv, "/master/gain", "f", master_set_gain); REGISTER_CALLBACK (serv, "/master/fader", "f", master_set_fader); + REGISTER_CALLBACK (serv, "/master/db_delta", "f", master_delta_gain); REGISTER_CALLBACK (serv, "/master/mute", "i", master_set_mute); REGISTER_CALLBACK (serv, "/master/trimdB", "f", master_set_trim); REGISTER_CALLBACK (serv, "/master/pan_stereo_position", "f", master_set_pan_stereo_position); + REGISTER_CALLBACK (serv, "/master/select", "f", master_select); REGISTER_CALLBACK (serv, "/monitor/gain", "f", monitor_set_gain); REGISTER_CALLBACK (serv, "/monitor/fader", "f", monitor_set_fader); + REGISTER_CALLBACK (serv, "/monitor/db_delta", "f", monitor_delta_gain); + REGISTER_CALLBACK (serv, "/monitor/mute", "i", monitor_set_mute); + REGISTER_CALLBACK (serv, "/monitor/dim", "i", monitor_set_dim); + REGISTER_CALLBACK (serv, "/monitor/mono", "i", monitor_set_mono); // Controls for the Selected strip REGISTER_CALLBACK (serv, "/select/recenable", "i", sel_recenable); @@ -551,12 +574,18 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/select/polarity", "i", sel_phase); REGISTER_CALLBACK (serv, "/select/gain", "f", sel_gain); REGISTER_CALLBACK (serv, "/select/fader", "f", sel_fader); + REGISTER_CALLBACK (serv, "/select/db_delta", "f", sel_dB_delta); REGISTER_CALLBACK (serv, "/select/trimdB", "f", sel_trim); REGISTER_CALLBACK (serv, "/select/pan_stereo_position", "f", sel_pan_position); REGISTER_CALLBACK (serv, "/select/pan_stereo_width", "f", sel_pan_width); REGISTER_CALLBACK (serv, "/select/send_gain", "if", sel_sendgain); REGISTER_CALLBACK (serv, "/select/send_fader", "if", sel_sendfader); REGISTER_CALLBACK (serv, "/select/send_enable", "if", sel_sendenable); + REGISTER_CALLBACK (serv, "/select/master_send_enable", "i", sel_master_send_enable); + REGISTER_CALLBACK (serv, "/select/send_page", "f", sel_send_page); + REGISTER_CALLBACK (serv, "/select/plug_page", "f", sel_plug_page); + REGISTER_CALLBACK (serv, "/select/plugin", "f", sel_plugin); + REGISTER_CALLBACK (serv, "/select/plugin/activate", "f", sel_plugin_activate); REGISTER_CALLBACK (serv, "/select/expand", "i", sel_expand); REGISTER_CALLBACK (serv, "/select/pan_elevation_position", "f", sel_pan_elevation); REGISTER_CALLBACK (serv, "/select/pan_frontback_position", "f", sel_pan_frontback); @@ -567,13 +596,18 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/select/comp_mode", "f", sel_comp_mode); REGISTER_CALLBACK (serv, "/select/comp_makeup", "f", sel_comp_makeup); REGISTER_CALLBACK (serv, "/select/eq_enable", "f", sel_eq_enable); - REGISTER_CALLBACK (serv, "/select/eq_hpf", "f", sel_eq_hpf); + REGISTER_CALLBACK (serv, "/select/eq_hpf/freq", "f", sel_eq_hpf_freq); + REGISTER_CALLBACK (serv, "/select/eq_hpf/enable", "f", sel_eq_hpf_enable); + REGISTER_CALLBACK (serv, "/select/eq_hpf/slope", "f", sel_eq_hpf_slope); + REGISTER_CALLBACK (serv, "/select/eq_lpf/freq", "f", sel_eq_lpf_freq); + REGISTER_CALLBACK (serv, "/select/eq_lpf/enable", "f", sel_eq_lpf_enable); + REGISTER_CALLBACK (serv, "/select/eq_lpf/slope", "f", sel_eq_lpf_slope); REGISTER_CALLBACK (serv, "/select/eq_gain", "if", sel_eq_gain); REGISTER_CALLBACK (serv, "/select/eq_freq", "if", sel_eq_freq); REGISTER_CALLBACK (serv, "/select/eq_q", "if", sel_eq_q); REGISTER_CALLBACK (serv, "/select/eq_shape", "if", sel_eq_shape); - /* These commands require the route index in addition to the arg; TouchOSC (et al) can't use these */ + /* These commands require the route index in addition to the arg; TouchOSC (et al) can't use these */ REGISTER_CALLBACK (serv, "/strip/mute", "ii", route_mute); REGISTER_CALLBACK (serv, "/strip/solo", "ii", route_solo); REGISTER_CALLBACK (serv, "/strip/solo_iso", "ii", route_solo_iso); @@ -598,6 +632,12 @@ OSC::register_callbacks() REGISTER_CALLBACK (serv, "/strip/send/gain", "iif", route_set_send_gain_dB); REGISTER_CALLBACK (serv, "/strip/send/fader", "iif", route_set_send_fader); REGISTER_CALLBACK (serv, "/strip/send/enable", "iif", route_set_send_enable); + REGISTER_CALLBACK(serv, "/strip/name", "is", route_rename); + REGISTER_CALLBACK(serv, "/strip/sends", "i", route_get_sends); + REGISTER_CALLBACK(serv, "/strip/receives", "i", route_get_receives); + REGISTER_CALLBACK(serv, "/strip/plugin/list", "i", route_plugin_list); + REGISTER_CALLBACK(serv, "/strip/plugin/descriptor", "ii", route_plugin_descriptor); + REGISTER_CALLBACK(serv, "/strip/plugin/reset", "ii", route_plugin_reset); /* still not-really-standardized query interface */ //REGISTER_CALLBACK (serv, "/ardour/*/#current_value", "", current_value); @@ -611,7 +651,7 @@ OSC::register_callbacks() /* this is a special catchall handler, * register at the end so this is only called if no - * other handler matches (used for debug) */ + * other handler matches (also used for debug) */ lo_server_add_method (serv, 0, 0, _catchall, this); } } @@ -661,96 +701,9 @@ OSC::get_unix_server_url() } void -OSC::listen_to_route (boost::shared_ptr strip, lo_address addr) -{ - if (!strip) { - return; - } - /* avoid duplicate listens */ - - for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); ++x) { - - OSCRouteObserver* ro; - - if ((ro = dynamic_cast(*x)) != 0) { - - int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr)); - - if (ro->strip() == strip && res == 0) { - return; - } - } - } - - OSCSurface *s = get_surface(addr); - uint32_t ssid = get_sid (strip, addr); - OSCRouteObserver* o = new OSCRouteObserver (strip, addr, ssid, s->gainmode, s->feedback); - route_observers.push_back (o); - - strip->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::route_lost, this, boost::weak_ptr (strip)), this); -} - -void -OSC::route_lost (boost::weak_ptr wr) -{ - tick = false; - drop_route (wr); - bank_dirty = true; -} - -void -OSC::drop_route (boost::weak_ptr wr) -{ - boost::shared_ptr r = wr.lock (); - - if (!r) { - return; - } - - for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) { - - OSCRouteObserver* rc; - - if ((rc = dynamic_cast(*x)) != 0) { - - if (rc->strip() == r) { - delete *x; - x = route_observers.erase (x); - } else { - ++x; - } - } else { - ++x; - } - } -} - -void -OSC::end_listen (boost::shared_ptr r, lo_address addr) +OSC::gui_changed () { - RouteObservers::iterator x; - - // Remove the route observers - for (x = route_observers.begin(); x != route_observers.end();) { - - OSCRouteObserver* ro; - - if ((ro = dynamic_cast(*x)) != 0) { - - int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr)); - - if (ro->strip() == r && res == 0) { - delete *x; - x = route_observers.erase (x); - } - else { - ++x; - } - } - else { - ++x; - } - } + session->set_dirty(); } void @@ -816,8 +769,13 @@ OSC::send_current_value (const char* path, lo_arg** argv, int argc, lo_message m } } } + OSCSurface *sur = get_surface(get_address (msg)); - lo_send_message (get_address (msg), "#reply", reply); + if (sur->feedback[14]) { + lo_send_message (get_address (msg), "/reply", reply); + } else { + lo_send_message (get_address (msg), "#reply", reply); + } lo_message_free (reply); } @@ -839,7 +797,16 @@ OSC::catchall (const char *path, const char* types, lo_arg **argv, int argc, lo_ /* 15 for /#current_value plus 2 for / */ len = strlen (path); + OSCSurface *sur = get_surface(get_address (msg), true); + + if (strstr (path, "/automation")) { + ret = set_automation (path, types, argv, argc, msg); + + } else + if (strstr (path, "/touch")) { + ret = touch_detect (path, types, argv, argc, msg); + } else if (len >= 17 && !strcmp (&path[len-15], "/#current_value")) { current_value_query (path, len, argv, argc, msg); ret = 0; @@ -847,155 +814,179 @@ OSC::catchall (const char *path, const char* types, lo_arg **argv, int argc, lo_ } else if (!strncmp (path, "/cue/", 5)) { - //cue_parse (path, types, argv, argc, msg) + ret = cue_parse (path, types, argv, argc, msg); - ret = 0; } else - if (strcmp (path, "/strip/listen") == 0) { + if (!strncmp (path, "/select/plugin/parameter", 24)) { - cerr << "set up listener\n"; + ret = select_plugin_parameter (path, types, argv, argc, msg); - lo_message reply = lo_message_new (); + } else + if (!strncmp (path, "/access_action/", 15)) { + check_surface (msg); + if (!(argc && !argv[0]->i)) { + std::string action_path = path; + + access_action (action_path.substr(15)); + } + ret = 0; + } else + if (strcmp (path, "/strip/listen") == 0) { if (argc <= 0) { - lo_message_add_string (reply, "syntax error"); + PBD::warning << "OSC: Wrong number of parameters." << endmsg; + } else if (sur->custom_enable) { + PBD::warning << "OSC: Can't add strips with custom enabled." << endmsg; } else { for (int n = 0; n < argc; ++n) { - boost::shared_ptr r = session->get_remote_nth_route (argv[n]->i); - - if (!r) { - lo_message_add_string (reply, "not found"); - cerr << "no such route\n"; - break; - } else { - cerr << "add listener\n"; - listen_to_route (r, get_address (msg)); - lo_message_add_int32 (reply, argv[n]->i); + boost::shared_ptr s = get_strip (argv[n]->i, get_address (msg)); + if (s) { + sur->custom_strips.push_back (s); } } } - - lo_send_message (get_address (msg), "#reply", reply); - lo_message_free (reply); - ret = 0; - } else if (strcmp (path, "/strip/ignore") == 0) { - - for (int n = 0; n < argc; ++n) { - - boost::shared_ptr r = session->get_remote_nth_route (argv[n]->i); - - if (r) { - end_listen (r, get_address (msg)); + if (argc <= 0) { + PBD::warning << "OSC: Wrong number of parameters." << endmsg; + } else if (!sur->custom_enable) { + PBD::warning << "OSC: Can't remove strips without custom enabled." << endmsg; + } else { + for (int n = 0; n < argc; ++n) { + if ((uint32_t) argv[n]->i <= sur->custom_strips.size ()) { + sur->custom_strips[argv[n]->i - 1] = boost::shared_ptr(); + } } + ret = set_bank (sur->bank, msg); } ret = 0; } else + if (strstr (path, "/strip") && (argc != 1)) { + // All of the strip commands below require 1 parameter + PBD::warning << "OSC: Wrong number of parameters." << endmsg; + } else if (!strncmp (path, "/strip/gain/", 12) && strlen (path) > 12) { // in dB int ssid = atoi (&path[12]); - route_set_gain_dB (ssid, argv[0]->f, msg); - ret = 0; + ret = route_set_gain_dB (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/strip/fader/", 13) && strlen (path) > 13) { // in fader position int ssid = atoi (&path[13]); - route_set_gain_fader (ssid, argv[0]->f, msg); - ret = 0; + ret = route_set_gain_fader (ssid, argv[0]->f, msg); + } + else if (!strncmp (path, "/strip/db_delta", 15)) { + // in db delta + int ssid; + int ar_off = 0; + float delta; + if (strlen (path) > 15 && argc == 1) { + ssid = atoi (&path[16]); + } else if (argc == 2) { + if (types[0] == 'f') { + ssid = (int) argv[0]->f; + } else { + ssid = argv[0]->i; + } + ar_off = 1; + } else { + return -1; + } + if (types[ar_off] == 'f') { + delta = argv[ar_off]->f; + } else { + delta = (float) argv[ar_off]->i; + } + ret = strip_db_delta (ssid, delta, msg); } else if (!strncmp (path, "/strip/trimdB/", 14) && strlen (path) > 14) { int ssid = atoi (&path[14]); - route_set_trim_dB (ssid, argv[0]->f, msg); - ret = 0; + ret = route_set_trim_dB (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/strip/pan_stereo_position/", 27) && strlen (path) > 27) { int ssid = atoi (&path[27]); - route_set_pan_stereo_position (ssid, argv[0]->f, msg); - ret = 0; + ret = route_set_pan_stereo_position (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/strip/mute/", 12) && strlen (path) > 12) { int ssid = atoi (&path[12]); - route_mute (ssid, argv[0]->i, msg); - ret = 0; + ret = route_mute (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/solo/", 12) && strlen (path) > 12) { int ssid = atoi (&path[12]); - route_solo (ssid, argv[0]->i, msg); - ret = 0; + ret = route_solo (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/monitor_input/", 21) && strlen (path) > 21) { int ssid = atoi (&path[21]); - route_monitor_input (ssid, argv[0]->i, msg); - ret = 0; + ret = route_monitor_input (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/monitor_disk/", 20) && strlen (path) > 20) { int ssid = atoi (&path[20]); - route_monitor_disk (ssid, argv[0]->i, msg); - ret = 0; + ret = route_monitor_disk (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/recenable/", 17) && strlen (path) > 17) { int ssid = atoi (&path[17]); - route_recenable (ssid, argv[0]->i, msg); - ret = 0; + ret = route_recenable (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/record_safe/", 19) && strlen (path) > 19) { int ssid = atoi (&path[19]); - route_recsafe (ssid, argv[0]->i, msg); - ret = 0; + ret = route_recsafe (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/expand/", 14) && strlen (path) > 14) { int ssid = atoi (&path[14]); - strip_expand (ssid, argv[0]->i, msg); - ret = 0; + ret = strip_expand (ssid, argv[0]->i, msg); } else if (!strncmp (path, "/strip/select/", 14) && strlen (path) > 14) { int ssid = atoi (&path[14]); - strip_gui_select (ssid, argv[0]->i, msg); - ret = 0; + ret = strip_gui_select (ssid, argv[0]->i, msg); + } else + if (strstr (path, "/select") && (argc != 1)) { + // All of the select commands below require 1 parameter + PBD::warning << "OSC: Wrong number of parameters." << endmsg; } else if (!strncmp (path, "/select/send_gain/", 18) && strlen (path) > 18) { int ssid = atoi (&path[18]); - sel_sendgain (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_sendgain (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/select/send_fader/", 19) && strlen (path) > 19) { int ssid = atoi (&path[19]); - sel_sendfader (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_sendfader (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/select/send_enable/", 20) && strlen (path) > 20) { int ssid = atoi (&path[20]); - sel_sendenable (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_sendenable (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/select/eq_gain/", 16) && strlen (path) > 16) { int ssid = atoi (&path[16]); - sel_eq_gain (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_eq_gain (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/select/eq_freq/", 16) && strlen (path) > 16) { int ssid = atoi (&path[16]); - sel_eq_freq (ssid, argv[0]->f , msg); - ret = 0; + ret = sel_eq_freq (ssid, argv[0]->f , msg); } else if (!strncmp (path, "/select/eq_q/", 13) && strlen (path) > 13) { int ssid = atoi (&path[13]); - sel_eq_q (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_eq_q (ssid, argv[0]->f, msg); } else if (!strncmp (path, "/select/eq_shape/", 17) && strlen (path) > 17) { int ssid = atoi (&path[17]); - sel_eq_shape (ssid, argv[0]->f, msg); - ret = 0; + ret = sel_eq_shape (ssid, argv[0]->f, msg); + } + else if (!strncmp (path, "/set_surface", 12)) { + ret = surface_parse (path, types, argv, argc, msg); + } + else if (strstr (path, "/link")) { + ret = parse_link (path, types, argv, argc, msg); + } + if (ret) { + check_surface (msg); } - if ((ret && _debugmode == Unhandled)) { + if ((ret && _debugmode != Off)) { debugmsg (_("Unhandled OSC message"), path, types, argv, argc); - } else if ((!ret && _debugmode == All)) { + } else if (!ret && _debugmode == All) { debugmsg (_("OSC"), path, types, argv, argc); } @@ -1060,12 +1051,6 @@ OSC::debugmsg (const char *prefix, const char *path, const char* types, lo_arg * PBD::info << prefix << ": " << path << ss.str() << endmsg; } -void -OSC::update_clock () -{ - -} - // "Application Hook" Handlers // void OSC::session_loaded (Session& s) @@ -1105,37 +1090,37 @@ OSC::current_value (const char */*path*/, const char */*types*/, lo_arg **/*argv if (strcmp (argv[0]->s, "transport_frame") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else if (strcmp (argv[0]->s, "transport_speed") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else if (strcmp (argv[0]->s, "transport_locked") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else if (strcmp (argv[0]->s, "punch_in") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else if (strcmp (argv[0]->s, "punch_out") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else if (strcmp (argv[0]->s, "rec_enable") == 0) { if (session) { - lo_send (addr, retpath, "i", session->transport_frame()); + lo_send (addr, retpath, "i", session->transport_sample()); } } else { @@ -1152,43 +1137,72 @@ OSC::routes_list (lo_message msg) if (!session) { return; } - for (int n = 0; n < (int) session->nroutes(); ++n) { + OSCSurface *sur = get_surface(get_address (msg), true); - boost::shared_ptr r = session->get_remote_nth_route (n); + for (int n = 0; n < (int) sur->nstrips; ++n) { - if (r) { + boost::shared_ptr s = get_strip (n + 1, get_address (msg)); + + if (s) { + // some things need the route + boost::shared_ptr r = boost::dynamic_pointer_cast (s); lo_message reply = lo_message_new (); - if (boost::dynamic_pointer_cast(r)) { + if (boost::dynamic_pointer_cast(s)) { lo_message_add_string (reply, "AT"); - } else if (boost::dynamic_pointer_cast(r)) { + } else if (boost::dynamic_pointer_cast(s)) { lo_message_add_string (reply, "MT"); - } else { - lo_message_add_string (reply, "B"); + } else if (boost::dynamic_pointer_cast(s)) { + lo_message_add_string (reply, "V"); + } else if (s->is_master()) { + lo_message_add_string (reply, "MA"); + } else if (s->is_monitor()) { + lo_message_add_string (reply, "MO"); + } else if (boost::dynamic_pointer_cast(s) && !boost::dynamic_pointer_cast(s)) { + if (!(s->presentation_info().flags() & PresentationInfo::MidiBus)) { + // r->feeds (session->master_out()) may make more sense + if (r->direct_feeds_according_to_reality (session->master_out())) { + // this is a bus + lo_message_add_string (reply, "B"); + } else { + // this is an Aux out + lo_message_add_string (reply, "AX"); + } + } else { + lo_message_add_string (reply, "MB"); + } } - lo_message_add_string (reply, r->name().c_str()); - lo_message_add_int32 (reply, r->n_inputs().n_audio()); - lo_message_add_int32 (reply, r->n_outputs().n_audio()); - lo_message_add_int32 (reply, r->muted()); - lo_message_add_int32 (reply, r->soloed()); - /* XXX Can only use order at this point */ - //lo_message_add_int32 (reply, r->presentation_info().order()); - // try this instead. - lo_message_add_int32 (reply, get_sid (r, get_address (msg))); - - if (boost::dynamic_pointer_cast(r) - || boost::dynamic_pointer_cast(r)) { - - boost::shared_ptr t = boost::dynamic_pointer_cast(r); - lo_message_add_int32 (reply, (int32_t) t->rec_enable_control()->get_value()); + lo_message_add_string (reply, s->name().c_str()); + if (r) { + // routes have inputs and outputs + lo_message_add_int32 (reply, r->n_inputs().n_audio()); + lo_message_add_int32 (reply, r->n_outputs().n_audio()); + } else { + // non-routes like VCAs don't + lo_message_add_int32 (reply, 0); + lo_message_add_int32 (reply, 0); + } + if (s->mute_control()) { + lo_message_add_int32 (reply, s->mute_control()->get_value()); + } else { + lo_message_add_int32 (reply, 0); + } + if (s->solo_control()) { + lo_message_add_int32 (reply, s->solo_control()->get_value()); + } else { + lo_message_add_int32 (reply, 0); + } + lo_message_add_int32 (reply, n + 1); + if (s->rec_enable_control()) { + lo_message_add_int32 (reply, s->rec_enable_control()->get_value()); + } + if (sur->feedback[14]) { + lo_send_message (get_address (msg), "/reply", reply); + } else { + lo_send_message (get_address (msg), "#reply", reply); } - - //Automatically listen to routes listed - listen_to_route(r, get_address (msg)); - - lo_send_message (get_address (msg), "#reply", reply); lo_message_free (reply); } } @@ -1197,12 +1211,117 @@ OSC::routes_list (lo_message msg) lo_message reply = lo_message_new (); lo_message_add_string (reply, "end_route_list"); - lo_message_add_int64 (reply, session->frame_rate()); - lo_message_add_int64 (reply, session->current_end_frame()); + lo_message_add_int64 (reply, session->sample_rate()); + lo_message_add_int64 (reply, session->current_end_sample()); + if (session->monitor_out()) { + // this session has a monitor section + lo_message_add_int32 (reply, 1); + } else { + lo_message_add_int32 (reply, 0); + } - lo_send_message (get_address (msg), "#reply", reply); + if (sur->feedback[14]) { + lo_send_message (get_address (msg), "/reply", reply); + } else { + lo_send_message (get_address (msg), "#reply", reply); + } lo_message_free (reply); + // send feedback for newly created control surface + strip_feedback (sur, true); + global_feedback (sur); + _strip_select (boost::shared_ptr(), get_address (msg)); + +} + +void +OSC::surface_list (lo_message msg) +{ + /* this function is for debugging and prints lots of + * information about what surfaces Ardour knows about and their + * internal parameters. It is best accessed by sending: + * /surface/list from oscsend. This command does not create + * a surface entry. + */ + + cerr << "List of known Surfaces: " << _surface.size() << "\n\n"; + + Glib::Threads::Mutex::Lock lm (surfaces_lock); + for (uint32_t it = 0; it < _surface.size(); it++) { + OSCSurface* sur = &_surface[it]; + cerr << string_compose (" Surface: %1 URL: %2\n", it, sur->remote_url); + cerr << string_compose (" Number of strips: %1 Bank size: %2 Current Bank %3\n", sur->nstrips, sur->bank_size, sur->bank); + cerr << string_compose (" Use Custom: %1 Custom Strips: %2\n", sur->custom_enable, sur->custom_strips.size ()); + bool ug = false; + if (sur->usegroup == PBD::Controllable::UseGroup) { + ug = true; + } + cerr << string_compose (" Strip Types: %1 Feedback: %2 no_clear: %3 gain mode: %4 use groups? %5\n", \ + sur->strip_types.to_ulong(), sur->feedback.to_ulong(), sur->no_clear, sur->gainmode, ug); + cerr << string_compose (" using plugin: %1 of %2 plugins, with %3 params. page size: %4 page: %5\n", \ + sur->plugin_id, sur->plugins.size(), sur->plug_params.size(), sur->plug_page_size, sur->plug_page); + cerr << string_compose (" send page size: %1 page: %2\n", sur->send_page_size, sur->send_page); + cerr << string_compose (" expanded? %1 track: %2 jogmode: %3\n", sur->expand_enable, sur->expand, sur->jogmode); + cerr << string_compose (" personal monitor? %1, Aux master: %2, number of sends: %3\n", sur->cue, sur->aux, sur->sends.size()); + cerr << string_compose (" Linkset: %1 Device Id: %2\n", sur->linkset, sur->linkid); + } + cerr << "\nList of LinkSets " << link_sets.size() << "\n\n"; + std::map::iterator it; + for (it = link_sets.begin(); it != link_sets.end(); it++) { + if (!(*it).first) { + continue; + } + uint32_t devices = 0; + LinkSet* set = &(*it).second; + if (set->urls.size()) { + devices = set->urls.size() - 1; + } + cerr << string_compose (" Linkset %1 has %2 devices and sees %3 strips\n", (*it).first, devices, set->strips.size()); + cerr << string_compose (" Bank size: %1 Current bank: %2 Strip Types: %3\n", set->banksize, set->bank, set->strip_types.to_ulong()); + cerr << string_compose (" auto bank sizing: %1 linkset not ready: %2\n", set->autobank, set->not_ready); + } + cerr << "\n"; +} + +int +OSC::custom_clear (lo_message msg) +{ + if (!session) { + return 0; + } + OSCSurface *sur = get_surface(get_address (msg), true); + sur->custom_enable = false; + sur->custom_strips.clear (); + sur->strips = get_sorted_stripables(sur->strip_types, sur->cue, false, sur->custom_strips); + sur->nstrips = sur->strips.size(); + return set_bank (1, msg); +} + +int +OSC::custom_enable (float state, lo_message msg) +{ + if (!session) { + return 0; + } + OSCSurface *sur = get_surface(get_address (msg), true); + if (state > 0){ + if (sur->custom_strips.size () == 0) { + PBD::warning << "No custom strips set to enable" << endmsg; + sur->custom_enable = false; + return -1; + } else { + sur->custom_enable = true; + sur->strips = get_sorted_stripables(sur->strip_types, sur->cue, true, sur->custom_strips); + sur->nstrips = sur->custom_strips.size(); + return set_bank (1, msg); + } + } else { + sur->custom_enable = false; + sur->strips = get_sorted_stripables(sur->strip_types, sur->cue, false, sur->custom_strips); + sur->nstrips = sur->strips.size(); + return set_bank (1, msg); + } + return -1; } int @@ -1228,90 +1347,532 @@ OSC::get_address (lo_message msg) int OSC::refresh_surface (lo_message msg) { - if (address_only) { - // get rid of all surfaces and observers. - clear_devices(); - } - OSCSurface *s = get_surface(get_address (msg)); + OSCSurface *s = get_surface(get_address (msg), true); + uint32_t bs = s->bank_size; + uint32_t st = (uint32_t) s->strip_types.to_ulong(); + uint32_t fb = (uint32_t) s->feedback.to_ulong(); + uint32_t gm = (uint32_t) s->gainmode; + uint32_t sp = s->send_page_size; + uint32_t pp = s->plug_page_size; + + surface_destroy (s); // restart all observers - set_surface (s->bank_size, (uint32_t) s->strip_types.to_ulong(), (uint32_t) s->feedback.to_ulong(), (uint32_t) s->gainmode, msg); + set_surface (bs, st, fb, gm, sp, pp, msg); return 0; } void OSC::clear_devices () { - for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) { + tick = false; + observer_busy = true; + session_connections.drop_connections (); + // clear out surfaces + for (uint32_t it = 0; it < _surface.size(); ++it) { + OSCSurface* sur = &_surface[it]; + surface_destroy (sur); + } + _surface.clear(); + link_sets.clear (); + + PresentationInfo::Change.connect (session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); - OSCRouteObserver* rc; + observer_busy = false; + tick = true; +} - if ((rc = dynamic_cast(*x)) != 0) { - delete *x; - x = route_observers.erase (x); +int +OSC::parse_link (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) +{ + int ret = 1; /* unhandled */ + int set = 0; + if (!argc) { + PBD::warning << "OSC: /link/* needs at least one parameter" << endmsg; + return ret; + } + float data = 0; + if (types[argc - 1] == 'f') { + data = argv[argc - 1]->f; + } else { + data = argv[argc - 1]->i; + } + if (isdigit(strrchr (path, '/')[1])) { + set = atoi (&(strrchr (path, '/')[1])); + } else if (argc == 2) { + if (types[0] == 'f') { + set = (int) argv[0]->f; } else { - ++x; + set = argv[0]->i; } - // slow devices need time to clear buffers - usleep ((uint32_t) 10); + } else { + PBD::warning << "OSC: wrong number of parameters." << endmsg; + return ret; } - // Should maybe do global_observers too - for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end();) { - - OSCGlobalObserver* gc; + LinkSet *ls = get_linkset (set, get_address (msg)); - if ((gc = dynamic_cast(*x)) != 0) { - delete *x; - x = global_observers.erase (x); + if (!set) { + return 0; + } + if (!strncmp (path, "/link/bank_size", 15)) { + ls->banksize = (uint32_t) data; + ls->autobank = false; + ls->not_ready = link_check (set); + if (ls->not_ready) { + ls->bank = 1; + surface_link_state (ls); } else { - ++x; + _set_bank (ls->bank, get_address (msg)); } + ret = 0; + + } else if (!strncmp (path, "/link/set", 9)) { + ret = set_link (set, (uint32_t) data, get_address (msg)); } - // delete select observers - for (uint32_t it = 0; it < _surface.size(); ++it) { - OSCSurface* sur = &_surface[it]; - OSCSelectObserver* so; - if ((so = dynamic_cast(sur->sel_obs)) != 0) { - delete so; - } + + return ret; +} + +OSC::LinkSet * +OSC::get_linkset (uint32_t set, lo_address addr) +{ + OSCSurface *sur = get_surface(addr); + LinkSet *ls = 0; + + if (set) { + // need to check if set is wanted + std::map::iterator it; + it = link_sets.find(set); + if (it == link_sets.end()) { + // no such linkset make it + LinkSet new_ls; + new_ls.banksize = 0; + new_ls.bank = 1; + new_ls.autobank = true; + new_ls.not_ready = true; + new_ls.strip_types = sur->strip_types; + new_ls.strips = sur->strips; + new_ls.urls.resize (2); + link_sets[set] = new_ls; + } + ls = &link_sets[set]; + + } else { + // User expects this surface to be removed from any sets + uint32_t oldset = sur->linkset; + if (oldset) { + uint32_t oldid = sur->linkid; + sur->linkid = 1; + sur->linkset = 0; + LinkSet *ols = &link_sets[oldset]; + if (ols) { + ols->not_ready = oldid; + ols->urls[oldid] = ""; + surface_link_state (ols); + } + } } - // clear out surfaces - _surface.clear(); + return ls; } int -OSC::set_surface (uint32_t b_size, uint32_t strips, uint32_t fb, uint32_t gm, lo_message msg) +OSC::set_link (uint32_t set, uint32_t id, lo_address addr) +{ + OSCSurface *sur = get_surface(addr, true); + sur->linkset = set; + sur->linkid = id; + LinkSet *ls = get_linkset (set, addr); + if (ls->urls.size() <= (uint32_t) id) { + ls->urls.resize ((int) id + 1); + } + ls->urls[(uint32_t) id] = sur->remote_url; + ls->not_ready = link_check (set); + if (ls->not_ready) { + surface_link_state (ls); + } else { + _set_bank (1, addr); + } + return 0; +} + +void +OSC::link_strip_types (uint32_t linkset, uint32_t striptypes) { - OSCSurface *s = get_surface(get_address (msg)); + LinkSet *ls = 0; + + if (!linkset) { + return; + } + std::map::iterator it; + it = link_sets.find(linkset); + if (it == link_sets.end()) { + // this should never happen... but + return; + } + ls = &link_sets[linkset]; + ls->strip_types = striptypes; + for (uint32_t dv = 1; dv < ls->urls.size(); dv++) { + OSCSurface *su; + + if (ls->urls[dv] != "") { + string url = ls->urls[dv]; + su = get_surface (lo_address_new_from_url (url.c_str()), true); + if (su->linkset == linkset) { + su->strip_types = striptypes; + if (su->strip_types[10]) { + su->usegroup = PBD::Controllable::UseGroup; + } else { + su->usegroup = PBD::Controllable::NoGroup; + } + } else { + ls->urls[dv] = ""; + } + } + } +} + +void +OSC::surface_link_state (LinkSet * set) +{ + for (uint32_t dv = 1; dv < set->urls.size(); dv++) { + + if (set->urls[dv] != "") { + string url = set->urls[dv]; + OSCSurface *sur = get_surface (lo_address_new_from_url (url.c_str()), true); + for (uint32_t i = 0; i < sur->observers.size(); i++) { + sur->observers[i]->set_link_ready (set->not_ready); + } + } + } +} + +int +OSC::link_check (uint32_t set) +{ + LinkSet *ls = 0; + + if (!set) { + return 1; + } + std::map::iterator it; + it = link_sets.find(set); + if (it == link_sets.end()) { + // this should never happen... but + return 1; + } + ls = &link_sets[set]; + uint32_t bank_total = 0; + for (uint32_t dv = 1; dv < ls->urls.size(); dv++) { + OSCSurface *su; + + if (ls->urls[dv] != "") { + string url = ls->urls[dv]; + su = get_surface (lo_address_new_from_url (url.c_str()), true); + } else { + return dv; + } + if (su->linkset == set) { + bank_total = bank_total + su->bank_size; + } else { + ls->urls[dv] = ""; + return dv; + } + if (ls->autobank) { + ls->banksize = bank_total; + } else { + if (bank_total != ls->banksize) { + return ls->urls.size(); + } + } + } + return 0; +} + +int +OSC::surface_parse (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) +{ + int ret = 1; /* unhandled */ + OSCSurface *sur = get_surface(get_address (msg), true); + int pi_page = sur->plug_page_size; + int se_page = sur->send_page_size; + int fadermode = sur->gainmode; + int feedback = sur->feedback.to_ulong(); + int strip_types = sur->strip_types.to_ulong(); + int bank_size = sur->bank_size; + int linkset = sur->linkset; + int linkid = sur->linkid; + + + if (argc == 1 && !strncmp (path, "/set_surface/feedback", 21)) { + if (types[0] == 'f') { + ret = set_surface_feedback ((int)argv[0]->f, msg); + } else { + ret = set_surface_feedback (argv[0]->i, msg); + } + } + else if (argc == 1 && !strncmp (path, "/set_surface/bank_size", 22)) { + if (types[0] == 'f') { + ret = set_surface_bank_size ((int)argv[0]->f, msg); + } else { + ret = set_surface_bank_size (argv[0]->i, msg); + } + } + else if (argc == 1 && !strncmp (path, "/set_surface/gainmode", 21)) { + if (types[0] == 'f') { + ret = set_surface_gainmode ((int)argv[0]->f, msg); + } else { + ret = set_surface_gainmode (argv[0]->i, msg); + } + } + else if (argc == 1 && !strncmp (path, "/set_surface/strip_types", 24)) { + if (types[0] == 'f') { + ret = set_surface_strip_types ((int)argv[0]->f, msg); + } else { + ret = set_surface_strip_types (argv[0]->i, msg); + } + } + else if (argc == 1 && !strncmp (path, "/set_surface/send_page_size", 27)) { + if (types[0] == 'f') { + ret = sel_send_pagesize ((int)argv[0]->f, msg); + } else { + ret = sel_send_pagesize (argv[0]->i, msg); + } + } + else if (argc == 1 && !strncmp (path, "/set_surface/plugin_page_size", 29)) { + if (types[0] == 'f') { + ret = sel_plug_pagesize ((int)argv[0]->f, msg); + } else { + ret = sel_plug_pagesize (argv[0]->i, msg); + } + } else if (strlen(path) == 12) { + + // command is in /set_surface iii form + switch (argc) { + case 8: + if (types[7] == 'f') { + linkid = (int) argv[7]->f; + } else { + linkid = argv[7]->i; + } + case 7: + if (types[6] == 'f') { + linkset = (int) argv[6]->f; + } else { + linkset = argv[6]->i; + } + case 6: + if (types[5] == 'f') { + pi_page = (int) argv[5]->f; + } else { + pi_page = argv[5]->i; + } + case 5: + if (types[4] == 'f') { + se_page = (int) argv[4]->f; + } else { + se_page = argv[4]->i; + } + case 4: + if (types[3] == 'f') { + fadermode = (int) argv[3]->f; + } else { + fadermode = argv[3]->i; + } + case 3: + if (types[2] == 'f') { + feedback = (int) argv[2]->f; + } else { + feedback = argv[2]->i; + } + case 2: + if (types[1] == 'f') { + strip_types = (int) argv[1]->f; + } else { + strip_types = argv[1]->i; + } + case 1: + if (types[0] == 'f') { + bank_size = (int) argv[0]->f; + } else { + bank_size = argv[0]->i; + } + ret = set_surface (bank_size, strip_types, feedback, fadermode, se_page, pi_page, msg); + if ((uint32_t) linkset != sur->linkset) { + set_link (linkset, linkid, get_address (msg)); + } + break; + case 0: + // send current setup + { + lo_message reply = lo_message_new (); + lo_message_add_int32 (reply, bank_size); + lo_message_add_int32 (reply, strip_types); + lo_message_add_int32 (reply, feedback); + lo_message_add_int32 (reply, fadermode); + lo_message_add_int32 (reply, se_page); + lo_message_add_int32 (reply, pi_page); + lo_message_add_int32 (reply, (int) linkset); + lo_message_add_int32 (reply, (int) linkid); + lo_send_message (get_address (msg), "/set_surface", reply); + lo_message_free (reply); + return 0; + } + break; + + default: + PBD::warning << "OSC: Too many parameters." << endmsg; + return 1; + break; + } + } else if (isdigit(path[13])) { + // some of our parameters must be "in-lined" + bank_size = atoi (&path[13]); + const char * par = strstr (&path[13], "/"); + if (par) { + strip_types = atoi (&par[1]); + const char * fb = strstr (&par[1], "/"); + if (fb) { + feedback = atoi (&fb[1]); + const char * fm = strstr (&fb[1], "/"); + if (fm) { + fadermode = atoi (&fm[1]); + const char * sp = strstr (&fm[1], "/"); + if (sp) { + se_page = atoi (&sp[1]); + const char * pp = strstr (&sp[1], "/"); + if (pp) { + pi_page = atoi (&pp[1]); + const char * ls = strstr (&pp[1], "/"); + if (ls) { + linkset = atoi (&ls[1]); + const char * li = strstr (&ls[1], "/"); + if (li) { + linkid = atoi (&li[1]); + } else { + if (types[0] == 'f') { + linkid = (int) argv[0]->f; + } else if (types[0] == 'i') { + linkid = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + linkset = (int) argv[0]->f; + } else if (types[0] == 'i') { + linkset = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + pi_page = (int) argv[0]->f; + } else if (types[0] == 'i') { + pi_page = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + se_page = (int) argv[0]->f; + } else if (types[0] == 'i') { + se_page = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + fadermode = (int) argv[0]->f; + } else if (types[0] == 'i') { + fadermode = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + feedback = (int) argv[0]->f; + } else if (types[0] == 'i') { + feedback = argv[0]->i; + } + } + } else { + if (types[0] == 'f') { + strip_types = (int) argv[0]->f; + } else if (types[0] == 'i') { + strip_types = argv[0]->i; + } + } + ret = set_surface (bank_size, strip_types, feedback, fadermode, se_page, pi_page, msg); + if ((uint32_t) linkset != sur->linkset) { + set_link (linkset, linkid, get_address (msg)); + } + } + return ret; +} + +int +OSC::set_surface (uint32_t b_size, uint32_t strips, uint32_t fb, uint32_t gm, uint32_t se_size, uint32_t pi_size, lo_message msg) +{ + if (observer_busy) { + return -1; + } + OSCSurface *s = get_surface(get_address (msg), true); s->bank_size = b_size; s->strip_types = strips; s->feedback = fb; s->gainmode = gm; - // set bank and strip feedback - set_bank(s->bank, msg); + if (s->strip_types[10]) { + s->usegroup = PBD::Controllable::UseGroup; + } else { + s->usegroup = PBD::Controllable::NoGroup; + } + s->send_page_size = se_size; + s->plug_page_size = pi_size; + if (s->linkset) { + set_link (s->linkset, s->linkid, get_address (msg)); + link_strip_types (s->linkset, s->strip_types.to_ulong()); + } else { + // set bank and strip feedback + strip_feedback(s, true); + _set_bank (1, get_address (msg)); + } - global_feedback (s->feedback, get_address (msg), s->gainmode); + global_feedback (s); + sel_send_pagesize (se_size, msg); + sel_plug_pagesize (pi_size, msg); return 0; } int OSC::set_surface_bank_size (uint32_t bs, lo_message msg) { - OSCSurface *s = get_surface(get_address (msg)); + if (observer_busy) { + return -1; + } + OSCSurface *s = get_surface(get_address (msg), true); s->bank_size = bs; - - // set bank and strip feedback - set_bank(s->bank, msg); + if (s->linkset) { + set_link (s->linkset, s->linkid, get_address (msg)); + } else { + // set bank and strip feedback + _set_bank (1, get_address (msg)); + } return 0; } int OSC::set_surface_strip_types (uint32_t st, lo_message msg) { - OSCSurface *s = get_surface(get_address (msg)); + if (observer_busy) { + return -1; + } + OSCSurface *s = get_surface(get_address (msg), true); s->strip_types = st; + if (s->strip_types[10]) { + s->usegroup = PBD::Controllable::UseGroup; + } else { + s->usegroup = PBD::Controllable::NoGroup; + } + if (s->linkset) { + link_strip_types (s->linkset, st); + } // set bank and strip feedback - set_bank(s->bank, msg); + _set_bank (1, get_address (msg)); return 0; } @@ -1319,100 +1880,161 @@ OSC::set_surface_strip_types (uint32_t st, lo_message msg) int OSC::set_surface_feedback (uint32_t fb, lo_message msg) { - OSCSurface *s = get_surface(get_address (msg)); + if (observer_busy) { + return -1; + } + OSCSurface *s = get_surface(get_address (msg), true); s->feedback = fb; - // set bank and strip feedback - set_bank(s->bank, msg); - - // Set global/master feedback - global_feedback (s->feedback, get_address (msg), s->gainmode); + strip_feedback (s, true); + global_feedback (s); + _strip_select (boost::shared_ptr(), get_address (msg)); return 0; } - int OSC::set_surface_gainmode (uint32_t gm, lo_message msg) { - OSCSurface *s = get_surface(get_address (msg)); + if (observer_busy) { + return -1; + } + OSCSurface *s = get_surface(get_address (msg), true); s->gainmode = gm; - // set bank and strip feedback - set_bank(s->bank, msg); + strip_feedback (s, true); + global_feedback (s); + _strip_select (boost::shared_ptr(), get_address (msg)); + return 0; +} - // Set global/master feedback - global_feedback (s->feedback, get_address (msg), s->gainmode); +int +OSC::check_surface (lo_message msg) +{ + if (!session) { + return -1; + } + get_surface(get_address (msg)); return 0; } OSC::OSCSurface * -OSC::get_surface (lo_address addr) +OSC::get_surface (lo_address addr , bool quiet) { string r_url; char * rurl; + if (address_only) { + string host = lo_address_get_hostname (addr); + int protocol = lo_address_get_protocol (addr); + addr = lo_address_new_with_proto (protocol, host.c_str(), remote_port.c_str()); + } + rurl = lo_address_get_url (addr); r_url = rurl; free (rurl); - for (uint32_t it = 0; it < _surface.size(); ++it) { - //find setup for this server - if (!_surface[it].remote_url.find(r_url)){ - return &_surface[it]; + { + for (uint32_t it = 0; it < _surface.size(); ++it) { + //find setup for this surface + if (!_surface[it].remote_url.find(r_url)){ + return &_surface[it]; + } } } - // if we do this when OSC is started we get the wrong stripable - // we don't need this until we actually have a surface to deal with - if (!_select || (_select != ControlProtocol::first_selected_stripable())) { - gui_selection_changed(); - } // No surface create one with default values OSCSurface s; s.remote_url = r_url; + s.no_clear = false; + s.jogmode = JOG; s.bank = 1; - s.bank_size = default_banksize; // need to find out how many strips there are - s.strip_types = default_strip; // 31 is tracks, busses, and VCAs (no master/monitor) + s.bank_size = default_banksize; + s.observers.clear(); + s.sel_obs = 0; + s.global_obs = 0; + s.strip_types = default_strip; s.feedback = default_feedback; s.gainmode = default_gainmode; + s.usegroup = PBD::Controllable::NoGroup; + s.custom_strips.clear (); + s.custom_enable = false; s.sel_obs = 0; s.expand = 0; s.expand_enable = false; - s.strips = get_sorted_stripables(s.strip_types); + s.cue = false; + s.aux = 0; + s.cue_obs = 0; + s.strips = get_sorted_stripables(s.strip_types, s.cue, false, s.custom_strips); + s.send_page = 1; + s.send_page_size = default_send_size; + s.plug_page = 1; + s.plug_page_size = default_plugin_size; + s.plugin_id = 1; + s.linkset = 0; + s.linkid = 1; s.nstrips = s.strips.size(); - _surface.push_back (s); + { + _surface.push_back (s); + } + + if (!quiet) { + strip_feedback (&s, true); + global_feedback (&s); + _strip_select (boost::shared_ptr(), addr); + } return &_surface[_surface.size() - 1]; } // setup global feedback for a surface void -OSC::global_feedback (bitset<32> feedback, lo_address addr, uint32_t gainmode) +OSC::global_feedback (OSCSurface* sur) { - // first destroy global observer for this surface - GlobalObservers::iterator x; - for (x = global_observers.begin(); x != global_observers.end();) { + if (sur->feedback[4] || sur->feedback[3] || sur->feedback[5] || sur->feedback[6]) { - OSCGlobalObserver* ro; + // create a new Global Observer for this surface + OSCGlobalObserver* o = new OSCGlobalObserver (*this, *session, sur); + sur->global_obs = o; + } +} - if ((ro = dynamic_cast(*x)) != 0) { +void +OSC::strip_feedback (OSCSurface* sur, bool new_bank_size) +{ + if (sur->custom_strips.size () == 0) { + sur->custom_enable = false; + } + sur->strips = get_sorted_stripables(sur->strip_types, sur->cue, sur->custom_enable, sur->custom_strips); + sur->nstrips = sur->strips.size(); + if (new_bank_size || (!sur->feedback[0] && !sur->feedback[1])) { + // delete old observers + for (uint32_t i = 0; i < sur->observers.size(); i++) { + if (!sur->bank_size) { + sur->observers[i]->clear_strip (); + } + delete sur->observers[i]; + } + sur->observers.clear(); - int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr)); + uint32_t bank_size = sur->bank_size; + if (!bank_size) { + bank_size = sur->nstrips; + } - if (res == 0) { - delete *x; - x = global_observers.erase (x); - } else { - ++x; + if (sur->feedback[0] || sur->feedback[1]) { + for (uint32_t i = 0; i < bank_size; i++) { + OSCRouteObserver* o = new OSCRouteObserver (*this, i + 1, sur); + sur->observers.push_back (o); + } + } + } else { + if (sur->feedback[0] || sur->feedback[1]) { + for (uint32_t i = 0; i < sur->observers.size(); i++) { + boost::shared_ptr str = get_strip (i + 1, lo_address_new_from_url (sur->remote_url.c_str())); + sur->observers[i]->refresh_strip(str, true); } - } else { - ++x; } } - if (feedback[4] || feedback[3] || feedback[5] || feedback[6]) { - // create a new Global Observer for this surface - OSCGlobalObserver* o = new OSCGlobalObserver (*session, addr, gainmode, /*s->*/feedback); - global_observers.push_back (o); - } + bank_leds (sur); } void @@ -1439,29 +2061,43 @@ OSC::recalcbanks () void OSC::_recalcbanks () { - if (!_select || (_select != ControlProtocol::first_selected_stripable())) { - _select = ControlProtocol::first_selected_stripable(); + if (observer_busy) { + return; } - - // do a set_bank for each surface we know about. + /* + * We have two different ways of working here: + * 1) banked: The controller has a bank of strips and only can deal + * with banksize strips. We start banksize observers which run until + * either banksize is changed or Ardour exits. + * + * 2) banksize is 0 or unlimited and so is the same size as the number + * of strips. For a recalc, We want to tear down all strips but not send + * a reset value for any of the controls and then rebuild all observers. + * this is easier than detecting change in "bank" size and deleting or + * adding just a few. + */ + + // refresh each surface we know about. for (uint32_t it = 0; it < _surface.size(); ++it) { OSCSurface* sur = &_surface[it]; // find lo_address lo_address addr = lo_address_new_from_url (sur->remote_url.c_str()); - _set_bank (sur->bank, addr); + if (sur->cue) { + _cue_set (sur->aux, addr); + } else if (!sur->bank_size) { + strip_feedback (sur, true); + // This surface uses /strip/list tell it routes have changed + lo_message reply; + reply = lo_message_new (); + lo_send_message (addr, "/strip/list", reply); + lo_message_free (reply); + } else { + strip_feedback (sur, false); + } + _strip_select (boost::shared_ptr(), addr); } } -/* - * This gets called not only when bank changes but also: - * - bank size change - * - feedback change - * - strip types changes - * - fadermode changes - * - stripable creation/deletion/flag - * - to refresh what is "displayed" - * Basically any time the bank needs to be rebuilt - */ int OSC::set_bank (uint32_t bank_start, lo_message msg) { @@ -1475,73 +2111,122 @@ OSC::_set_bank (uint32_t bank_start, lo_address addr) if (!session) { return -1; } - // no nstripables yet if (!session->nroutes()) { return -1; } - OSCSurface *s = get_surface (addr); + OSCSurface *s = get_surface (addr, true); - // revert any expand to select - s->expand = 0; - s->expand_enable = false; - _strip_select (ControlProtocol::first_selected_stripable(), addr); + Sorted striplist = s->strips; + uint32_t nstrips = s->nstrips; - // undo all listeners for this url - StripableList stripables; - session->get_stripables (stripables); - for (StripableList::iterator it = stripables.begin(); it != stripables.end(); ++it) { + LinkSet *set; + uint32_t ls = s->linkset; - boost::shared_ptr stp = *it; - if (stp) { - end_listen (stp, addr); + if (ls) { + //we have a linkset... deal with each surface + set = &(link_sets[ls]); + if (set->not_ready) { + return 1; + } + uint32_t d_count = set->urls.size(); + set->strips = striplist; + bank_start = bank_limits_check (bank_start, set->banksize, nstrips); + set->bank = bank_start; + uint32_t not_ready = 0; + for (uint32_t dv = 1; dv < d_count; dv++) { + OSCSurface *sur; + if (set->urls[dv] != "") { + string url = set->urls[dv]; + sur = get_surface (lo_address_new_from_url (url.c_str())); + } else { + not_ready = dv; + } + if (sur->linkset != ls) { + set->urls[dv] = ""; + not_ready = dv; + } + if (not_ready) { + if (!set->not_ready) { + set->not_ready = not_ready; + } + set->bank = 1; + break; + } + lo_address sur_addr = lo_address_new_from_url (sur->remote_url.c_str()); + + sur->bank = bank_start; + bank_start = bank_start + sur->bank_size; + strip_feedback (sur, false); + _strip_select (boost::shared_ptr(), sur_addr); + bank_leds (sur); + lo_address_free (sur_addr); } - // slow devices need time to clear buffers - usleep ((uint32_t) 10); + if (not_ready) { + surface_link_state (set); + } + + } else { + + s->bank = bank_limits_check (bank_start, s->bank_size, nstrips); + strip_feedback (s, true); + _strip_select (boost::shared_ptr(), addr); + bank_leds (s); } - s->strips = get_sorted_stripables(s->strip_types); - s->nstrips = s->strips.size(); + bank_dirty = false; + tick = true; + return 0; +} + +uint32_t +OSC::bank_limits_check (uint32_t bank, uint32_t size, uint32_t total) +{ uint32_t b_size; - if (!s->bank_size) { + if (!size) { // no banking - bank includes all stripables - b_size = s->nstrips; + b_size = total; } else { - b_size = s->bank_size; + b_size = size; } - // Do limits checking - if (bank_start < 1) bank_start = 1; - if (b_size >= s->nstrips) { - bank_start = 1; - } else if (bank_start > ((s->nstrips - b_size) + 1)) { + if (bank < 1) bank = 1; + if (b_size >= total) { + bank = 1; + } else if (bank > ((total - b_size) + 1)) { // top bank is always filled if there are enough strips for at least one bank - bank_start = (uint32_t)((s->nstrips - b_size) + 1); + bank = (uint32_t)((total - b_size) + 1); } - //save bank in case we have had to change it - s->bank = bank_start; - - if (s->feedback[0] || s->feedback[1]) { - - for (uint32_t n = bank_start; n < (min ((b_size + bank_start), s->nstrips + 1)); ++n) { - if (n <= s->strips.size()) { - boost::shared_ptr stp = s->strips[n - 1]; + return bank; +} - if (stp) { - listen_to_route(stp, addr); - } - } - // slow devices need time to clear buffers - usleep ((uint32_t) 10); +void +OSC::bank_leds (OSCSurface* s) +{ + uint32_t bank = 0; + uint32_t size = 0; + uint32_t total = 0; + // light bankup or bankdown buttons if it is possible to bank in that direction + lo_address addr = lo_address_new_from_url (s->remote_url.c_str()); + if (s->linkset) { + LinkSet *set; + set = &(link_sets[s->linkset]); + bank = set->bank; + size = set->banksize; + total = s->nstrips; + if (set->not_ready) { + total = 1; } + } else { + bank = s->bank; + size = s->bank_size; + total = s->nstrips; } - // light bankup or bankdown buttons if it is possible to bank in that direction - if (s->feedback[4]) { - // these two messages could be bundled + if (size && (s->feedback[0] || s->feedback[1] || s->feedback[4])) { lo_message reply; reply = lo_message_new (); - if ((s->bank > (s->nstrips - s->bank_size)) || (s->nstrips < s->bank_size)) { + if ((total <= size) || (bank > (total - size))) { lo_message_add_int32 (reply, 0); } else { lo_message_add_int32 (reply, 1); @@ -1549,7 +2234,7 @@ OSC::_set_bank (uint32_t bank_start, lo_address addr) lo_send_message (addr, "/bank_up", reply); lo_message_free (reply); reply = lo_message_new (); - if (s->bank > 1) { + if (bank > 1) { lo_message_add_int32 (reply, 1); } else { lo_message_add_int32 (reply, 0); @@ -1557,33 +2242,70 @@ OSC::_set_bank (uint32_t bank_start, lo_address addr) lo_send_message (addr, "/bank_down", reply); lo_message_free (reply); } - bank_dirty = false; - tick = true; - return 0; } int OSC::bank_up (lo_message msg) +{ + return bank_delta (1.0, msg); +} + +int +OSC::bank_delta (float delta, lo_message msg) { if (!session) { return -1; } + // only do deltas of -1 0 or 1 + if (delta > 0) { + delta = 1; + } else if (delta < 0) { + delta = -1; + } else { + // 0 key release ignore + return 0; + } OSCSurface *s = get_surface(get_address (msg)); - set_bank (s->bank + s->bank_size, msg); + if (!s->bank_size) { + // bank size of 0 means use all strips no banking + return 0; + } + uint32_t old_bank = 0; + uint32_t bank_size = 0; + if (s->linkset) { + old_bank = link_sets[s->linkset].bank; + bank_size = link_sets[s->linkset].banksize; + } else { + old_bank = s->bank; + bank_size = s->bank_size; + } + uint32_t new_bank = old_bank + (bank_size * (int) delta); + if ((int)new_bank < 1) { + new_bank = 1; + } + if (new_bank != old_bank) { + set_bank (new_bank, msg); + } return 0; } int OSC::bank_down (lo_message msg) +{ + return bank_delta (-1.0, msg); +} + +int +OSC::use_group (float value, lo_message msg) { if (!session) { return -1; } OSCSurface *s = get_surface(get_address (msg)); - if (s->bank < s->bank_size) { - set_bank (1, msg); + if (value) { + s->usegroup = PBD::Controllable::UseGroup; } else { - set_bank (s->bank - s->bank_size, msg); + s->usegroup = PBD::Controllable::NoGroup; } return 0; } @@ -1627,13 +2349,178 @@ OSC::get_strip (uint32_t ssid, lo_address addr) return boost::shared_ptr(); } -void -OSC::transport_frame (lo_message msg) +// send and plugin paging commands +int +OSC::sel_send_pagesize (uint32_t size, lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg)); + if (size != s->send_page_size) { + s->send_page_size = size; + s->sel_obs->set_send_size(size); + } + return 0; +} + +int +OSC::sel_send_page (int page, lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg)); + uint32_t send_size = s->send_page_size; + if (!send_size) { + send_size = s->nsends; + } + uint32_t max_page = (uint32_t)(s->nsends / send_size) + 1; + s->send_page = s->send_page + page; + if (s->send_page < 1) { + s->send_page = 1; + } else if ((uint32_t)s->send_page > max_page) { + s->send_page = max_page; + } + s->sel_obs->set_send_page (s->send_page); + return 0; +} + +int +OSC::sel_plug_pagesize (uint32_t size, lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg)); + if (size != s->plug_page_size) { + s->plug_page_size = size; + s->sel_obs->set_plugin_size(size); + } + return 0; +} + +int +OSC::sel_plug_page (int page, lo_message msg) +{ + if (!page) { + return 0; + } + int new_page = 0; + OSCSurface *s = get_surface(get_address (msg)); + if (page > 0) { + new_page = s->plug_page + s->plug_page_size; + if ((uint32_t) new_page > s->plug_params.size ()) { + new_page = s->plug_page; + } + } else { + new_page = s->plug_page - s->plug_page_size; + if (new_page < 1) { + new_page = 1; + } + } + if (new_page != s->plug_page) { + s->plug_page = new_page; + s->sel_obs->set_plugin_page(s->plug_page); + } + return 0; +} + +int +OSC::sel_plugin (int delta, lo_message msg) +{ + if (!delta) { + return 0; + } + OSCSurface *sur = get_surface(get_address (msg)); + return _sel_plugin (sur->plugin_id + delta, get_address (msg)); +} + +int +OSC::_sel_plugin (int id, lo_address addr) +{ + OSCSurface *sur = get_surface(addr); + boost::shared_ptr s = sur->select; + if (s) { + boost::shared_ptr r = boost::dynamic_pointer_cast(s); + if (!r) { + return 1; + } + + // find out how many plugins we have + bool plugs; + int nplugs = 0; + sur->plugins.clear(); + do { + plugs = false; + if (r->nth_plugin (nplugs)) { + if (r->nth_plugin(nplugs)->display_to_user()) { +#ifdef MIXBUS + // need to check for mixbus channel strips (and exclude them) + boost::shared_ptr proc = r->nth_plugin (nplugs); + boost::shared_ptr pi; + if ((pi = boost::dynamic_pointer_cast(proc))) { + + if (!pi->is_channelstrip()) { +#endif + sur->plugins.push_back (nplugs); + nplugs++; +#ifdef MIXBUS + } + } +#endif + } + plugs = true; + } + } while (plugs); + + // limit plugin_id to actual plugins + if (sur->plugins.size() < 1) { + sur->plugin_id = 0; + sur->plug_page = 1; + if (sur->sel_obs) { + sur->sel_obs->set_plugin_id(-1, 1); + } + return 0; + } else if (id < 1) { + sur->plugin_id = 1; + } else if (sur->plugins.size() < (uint32_t) id) { + sur->plugin_id = sur->plugins.size(); + } else { + sur->plugin_id = id; + } + + // we have a plugin number now get the processor + boost::shared_ptr proc = r->nth_plugin (sur->plugins[sur->plugin_id - 1]); + boost::shared_ptr pi; + if (!(pi = boost::dynamic_pointer_cast(proc))) { + PBD::warning << "OSC: Plugin: " << sur->plugin_id << " does not seem to be a plugin" << endmsg; + return 1; + } + boost::shared_ptr pip = pi->plugin(); + bool ok = false; + // put only input controls into a vector + sur->plug_params.clear (); + uint32_t nplug_params = pip->parameter_count(); + for ( uint32_t ppi = 0; ppi < nplug_params; ++ppi) { + uint32_t controlid = pip->nth_parameter(ppi, ok); + if (!ok) { + continue; + } + if (pip->parameter_is_input(controlid)) { + sur->plug_params.push_back (ppi); + } + } + + sur->plug_page = 1; + + if (sur->sel_obs) { + sur->sel_obs->set_plugin_id(sur->plugins[sur->plugin_id - 1], sur->plug_page); + } + return 0; + } + return 1; +} + +void +OSC::transport_sample (lo_message msg) { if (!session) { return; } - framepos_t pos = session->transport_frame (); + check_surface (msg); + samplepos_t pos = session->transport_sample (); lo_message reply = lo_message_new (); lo_message_add_int64 (reply, pos); @@ -1649,6 +2536,7 @@ OSC::transport_speed (lo_message msg) if (!session) { return; } + check_surface (msg); double ts = session->transport_speed (); lo_message reply = lo_message_new (); @@ -1665,6 +2553,7 @@ OSC::record_enabled (lo_message msg) if (!session) { return; } + check_surface (msg); int re = (int)session->get_record_enabled (); lo_message reply = lo_message_new (); @@ -1675,6 +2564,197 @@ OSC::record_enabled (lo_message msg) lo_message_free (reply); } +int +OSC::scrub (float delta, lo_message msg) +{ + if (!session) return -1; + check_surface (msg); + + scrub_place = session->transport_sample (); + + float speed; + + int64_t now = ARDOUR::get_microseconds (); + int64_t diff = now - scrub_time; + if (diff > 35000) { + // speed 1 (or 0 if jog wheel supports touch) + speed = delta; + } else if ((diff > 20000) && (fabs(scrub_speed) == 1)) { + // add some hysteresis to stop excess speed jumps + speed = delta; + } else { + speed = (int)(delta * 2); + } + scrub_time = now; + if (scrub_speed == speed) { + // Already at that speed no change + return 0; + } + scrub_speed = speed; + + if (speed > 0) { + if (speed == 1) { + session->request_transport_speed (.5); + } else { + session->request_transport_speed (9.9); + } + } else if (speed < 0) { + if (speed == -1) { + session->request_transport_speed (-.5); + } else { + session->request_transport_speed (-1); + } + } else { + session->request_transport_speed (0); + } + + return 0; +} + +int +OSC::jog (float delta, lo_message msg) +{ + if (!session) return -1; + + OSCSurface *s = get_surface(get_address (msg)); + + string path = "/jog/mode/name"; + switch(s->jogmode) + { + case JOG : + text_message (path, "Jog", get_address (msg)); + if (delta) { + jump_by_seconds (delta / 5); + } + break; + case SCRUB: + text_message (path, "Scrub", get_address (msg)); + scrub (delta, msg); + break; + case SHUTTLE: + text_message (path, "Shuttle", get_address (msg)); + if (delta) { + double speed = get_transport_speed (); + set_transport_speed (speed + (delta / 8.1)); + } else { + set_transport_speed (0); + } + break; + case SCROLL: + text_message (path, "Scroll", get_address (msg)); + if (delta > 0) { + access_action ("Editor/scroll-forward"); + } else if (delta < 0) { + access_action ("Editor/scroll-backward"); + } + break; + case TRACK: + text_message (path, "Track", get_address (msg)); + if (delta > 0) { + set_bank (s->bank + 1, msg); + } else if (delta < 0) { + set_bank (s->bank - 1, msg); + } + break; + case BANK: + text_message (path, "Bank", get_address (msg)); + if (delta > 0) { + bank_up (msg); + } else if (delta < 0) { + bank_down (msg); + } + break; + case NUDGE: + text_message (path, "Nudge", get_address (msg)); + if (delta > 0) { + access_action ("Common/nudge-playhead-forward"); + } else if (delta < 0) { + access_action ("Common/nudge-playhead-backward"); + } + break; + case MARKER: + text_message (path, "Marker", get_address (msg)); + if (delta > 0) { + next_marker (); + } else if (delta < 0) { + prev_marker (); + } + break; + default: + break; + + } + return 0; + +} + +int +OSC::jog_mode (float mode, lo_message msg) +{ + if (!session) return -1; + + OSCSurface *s = get_surface(get_address (msg)); + if (get_transport_speed () != 1.0) { + set_transport_speed (0); + } + + switch((uint32_t)mode) + { + case JOG : + text_message ("/jog/mode/name", "Jog", get_address (msg)); + s->jogmode = JOG; + break; + case SCRUB: + text_message ("/jog/mode/name", "Scrub", get_address (msg)); + s->jogmode = SCRUB; + break; + case SHUTTLE: + text_message ("/jog/mode/name", "Shuttle", get_address (msg)); + s->jogmode = SHUTTLE; + break; + case SCROLL: + text_message ("/jog/mode/name", "Scroll", get_address (msg)); + s->jogmode = SCROLL; + break; + case TRACK: + text_message ("/jog/mode/name", "Track", get_address (msg)); + s->jogmode = TRACK; + break; + case BANK: + text_message ("/jog/mode/name", "Bank", get_address (msg)); + s->jogmode = BANK; + break; + case NUDGE: + text_message ("/jog/mode/name", "Nudge", get_address (msg)); + s->jogmode = NUDGE; + break; + case MARKER: + text_message ("/jog/mode/name", "Marker", get_address (msg)); + s->jogmode = MARKER; + break; + default: + PBD::warning << "Jog Mode: " << mode << " is not valid." << endmsg; + break; + lo_message reply = lo_message_new (); + lo_message_add_int32 (reply, s->jogmode); + lo_send_message (get_address(msg), "/jog/mode", reply); + lo_message_free (reply); + + } + return 0; + +} + +int +OSC::click_level (float position) +{ + if (!session) return -1; + if (session->click_gain()->gain_control()) { + session->click_gain()->gain_control()->set_value (session->click_gain()->gain_control()->interface_to_internal (position), PBD::Controllable::NoGroup); + } + return 0; +} + // master and monitor calls int OSC::master_set_gain (float dB) @@ -1685,7 +2765,33 @@ OSC::master_set_gain (float dB) if (dB < -192) { s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup); } else { - s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup); + float abs = dB_to_coefficient (dB); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); + } + } + return 0; +} + +int +OSC::master_delta_gain (float delta) +{ + if (!session) return -1; + boost::shared_ptr s = session->master_out(); + if (s) { + float dB = accurate_coefficient_to_dB (s->gain_control()->get_value()) + delta; + if (dB < -192) { + s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup); + } else { + float abs = dB_to_coefficient (dB); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); } } return 0; @@ -1697,7 +2803,7 @@ OSC::master_set_fader (float position) if (!session) return -1; boost::shared_ptr s = session->master_out(); if (s) { - s->gain_control()->set_value (slider_position_to_gain_with_max (position, 2.0), PBD::Controllable::NoGroup); + s->gain_control()->set_value (s->gain_control()->interface_to_internal (position), PBD::Controllable::NoGroup); } return 0; } @@ -1719,6 +2825,7 @@ int OSC::master_set_pan_stereo_position (float position, lo_message msg) { if (!session) return -1; + OSCSurface *sur = get_surface(get_address (msg)); float endposition = .5; boost::shared_ptr s = session->master_out(); @@ -1729,7 +2836,6 @@ OSC::master_set_pan_stereo_position (float position, lo_message msg) endposition = s->pan_azimuth_control()->internal_to_interface (s->pan_azimuth_control()->get_value ()); } } - OSCSurface *sur = get_surface(get_address (msg)); if (sur->feedback[4]) { lo_message reply = lo_message_new (); @@ -1756,6 +2862,22 @@ OSC::master_set_mute (uint32_t state) return 0; } +int +OSC::master_select (lo_message msg) +{ + if (!session) { + return -1; + } + OSCSurface *sur = get_surface(get_address (msg)); + sur->expand_enable = false; + boost::shared_ptr s = session->master_out(); + if (s) { + SetStripableSelection (s); + } + + return 0; +} + int OSC::monitor_set_gain (float dB) { @@ -1766,109 +2888,397 @@ OSC::monitor_set_gain (float dB) if (dB < -192) { s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup); } else { - s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup); + float abs = dB_to_coefficient (dB); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); } } return 0; } int -OSC::monitor_set_fader (float position) +OSC::monitor_delta_gain (float delta) { if (!session) return -1; boost::shared_ptr s = session->monitor_out(); if (s) { - s->gain_control()->set_value (slider_position_to_gain_with_max (position, 2.0), PBD::Controllable::NoGroup); + float dB = accurate_coefficient_to_dB (s->gain_control()->get_value()) + delta; + if (dB < -192) { + s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup); + } else { + float abs = dB_to_coefficient (dB); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); + } } return 0; } -// strip calls int -OSC::route_mute (int ssid, int yn, lo_message msg) +OSC::monitor_set_fader (float position) { if (!session) return -1; - boost::shared_ptr s = get_strip (ssid, get_address (msg)); - - if (s) { - if (s->mute_control()) { - s->mute_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; - } - } - - return route_send_fail ("mute", ssid, 0, get_address (msg)); -} - -int -OSC::sel_mute (uint32_t yn, lo_message msg) -{ - OSCSurface *sur = get_surface(get_address (msg)); - boost::shared_ptr s; - if (sur->expand_enable) { - s = get_strip (sur->expand, get_address (msg)); - } else { - s = _select; - } + boost::shared_ptr s = session->monitor_out(); if (s) { - if (s->mute_control()) { - s->mute_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; - } + s->gain_control()->set_value (s->gain_control()->interface_to_internal (position), PBD::Controllable::NoGroup); } - return sel_fail ("mute", 0, get_address (msg)); + return 0; } int -OSC::route_solo (int ssid, int yn, lo_message msg) +OSC::monitor_set_mute (uint32_t state) { if (!session) return -1; - boost::shared_ptr s = get_strip (ssid, get_address (msg)); - if (s) { - if (s->solo_control()) { - s->solo_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; - } + if (session->monitor_out()) { + boost::shared_ptr mon = session->monitor_out()->monitor_control(); + mon->set_cut_all (state); } - - return route_send_fail ("solo", ssid, 0, get_address (msg)); + return 0; } int -OSC::route_solo_iso (int ssid, int yn, lo_message msg) +OSC::monitor_set_dim (uint32_t state) { if (!session) return -1; - boost::shared_ptr s = get_strip (ssid, get_address (msg)); - if (s) { - if (s->solo_isolate_control()) { - s->solo_isolate_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; - } + if (session->monitor_out()) { + boost::shared_ptr mon = session->monitor_out()->monitor_control(); + mon->set_dim_all (state); } - - return route_send_fail ("solo_iso", ssid, 0, get_address (msg)); + return 0; } int -OSC::route_solo_safe (int ssid, int yn, lo_message msg) +OSC::monitor_set_mono (uint32_t state) { if (!session) return -1; - boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); - if (s) { - if (s->solo_safe_control()) { - s->solo_safe_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; - } + if (session->monitor_out()) { + boost::shared_ptr mon = session->monitor_out()->monitor_control(); + mon->set_mono (state); } - - return route_send_fail ("solo_safe", ssid, 0, get_address (msg)); + return 0; } int -OSC::sel_solo (uint32_t yn, lo_message msg) +OSC::route_get_sends(lo_message msg) { + if (!session) { + return -1; + } + + lo_arg **argv = lo_message_get_argv(msg); + + int rid = argv[0]->i; + + boost::shared_ptr strip = get_strip(rid, get_address(msg)); + if (!strip) { + return -1; + } + + boost::shared_ptr r = boost::dynamic_pointer_cast (strip); + if (!r) { + return -1; + } + + lo_message reply = lo_message_new(); + lo_message_add_int32(reply, rid); + + int i = 0; + for (;;) { + boost::shared_ptr p = r->nth_send(i++); + + if (!p) { + break; + } + + boost::shared_ptr isend = boost::dynamic_pointer_cast (p); + if (isend) { + lo_message_add_int32(reply, get_sid(isend->target_route(), get_address(msg))); + lo_message_add_string(reply, isend->name().c_str()); + lo_message_add_int32(reply, i); + boost::shared_ptr a = isend->amp(); + lo_message_add_float(reply, a->gain_control()->internal_to_interface (a->gain_control()->get_value())); + lo_message_add_int32(reply, p->active() ? 1 : 0); + } + } + // if used dedicated message path to identify this reply in async operation. + // Naming it #reply wont help the client to identify the content. + lo_send_message(get_address (msg), "/strip/sends", reply); + + lo_message_free(reply); + + return 0; +} + +int +OSC::route_get_receives(lo_message msg) { + if (!session) { + return -1; + } + + lo_arg **argv = lo_message_get_argv(msg); + + uint32_t rid = argv[0]->i; + + + boost::shared_ptr strip = get_strip(rid, get_address(msg)); + if (!strip) { + return -1; + } + + boost::shared_ptr r = boost::dynamic_pointer_cast (strip); + if (!r) { + return -1; + } + + boost::shared_ptr route_list = session->get_routes(); + + lo_message reply = lo_message_new(); + lo_message_add_int32(reply, rid); + + for (RouteList::iterator i = route_list->begin(); i != route_list->end(); ++i) { + boost::shared_ptr tr = boost::dynamic_pointer_cast (*i); + if (!tr) { + continue; + } + int j = 0; + + for (;;) { + boost::shared_ptr p = tr->nth_send(j++); + + if (!p) { + break; + } + + boost::shared_ptr isend = boost::dynamic_pointer_cast (p); + if (isend) { + if( isend->target_route()->id() == r->id()){ + boost::shared_ptr a = isend->amp(); + + lo_message_add_int32(reply, get_sid(tr, get_address(msg))); + lo_message_add_string(reply, tr->name().c_str()); + lo_message_add_int32(reply, j); + lo_message_add_float(reply, a->gain_control()->internal_to_interface (a->gain_control()->get_value())); + lo_message_add_int32(reply, p->active() ? 1 : 0); + } + } + } + } + + // I have used a dedicated message path to identify this reply in async operation. + // Naming it #reply wont help the client to identify the content. + lo_send_message(get_address (msg), "/strip/receives", reply); + lo_message_free(reply); + return 0; +} + +// strip calls + +int +OSC::set_automation (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) +{ + if (!session) return -1; + + int ret = 1; + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr strp = boost::shared_ptr(); + uint32_t ctr = 0; + uint32_t aut = 0; + uint32_t ssid; + + if (argc) { + if (types[argc - 1] == 'f') { + aut = (int)argv[argc - 1]->f; + } else { + aut = argv[argc - 1]->i; + } + } + + //parse path first to find stripable + if (!strncmp (path, "/strip/", 7)) { + // find ssid and stripable + if (argc > 1) { + if (types[1] == 'f') { + ssid = (uint32_t)argv[0]->f; + } else { + ssid = argv[0]->i; + } + strp = get_strip (ssid, get_address (msg)); + } else { + ssid = atoi (&(strrchr (path, '/' ))[1]); + strp = get_strip (ssid, get_address (msg)); + } + ctr = 7; + } else if (!strncmp (path, "/select/", 8)) { + if (sur->expand_enable && sur->expand) { + strp = get_strip (sur->expand, get_address (msg)); + } else { + strp = _select; + } + ctr = 8; + } else { + return ret; + } + if (strp) { + boost::shared_ptr control = boost::shared_ptr(); + // other automatable controls can be added by repeating the next 6.5 lines + if ((!strncmp (&path[ctr], "fader", 5)) || (!strncmp (&path[ctr], "gain", 4))) { + if (strp->gain_control ()) { + control = strp->gain_control (); + } else { + PBD::warning << "No fader for this strip" << endmsg; + } + } else { + PBD::warning << "Automation not available for " << path << endmsg; + } + + if (control) { + + switch (aut) { + case 0: + control->set_automation_state (ARDOUR::Off); + ret = 0; + break; + case 1: + control->set_automation_state (ARDOUR::Play); + ret = 0; + break; + case 2: + control->set_automation_state (ARDOUR::Write); + ret = 0; + break; + case 3: + control->set_automation_state (ARDOUR::Touch); + ret = 0; + break; + default: + break; + } + } + } + + return ret; +} + +int +OSC::touch_detect (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) +{ + if (!session) return -1; + + int ret = 1; + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr strp = boost::shared_ptr(); + uint32_t ctr = 0; + uint32_t touch = 0; + uint32_t ssid; + + if (argc) { + if (types[argc - 1] == 'f') { + touch = (int)argv[argc - 1]->f; + } else { + touch = argv[argc - 1]->i; + } + } + + //parse path first to find stripable + if (!strncmp (path, "/strip/", 7)) { + // find ssid and stripable + if (argc > 1) { + if (types[0] == 'f') { + ssid = (uint32_t)argv[0]->f; + } else { + ssid = argv[0]->i; + } + strp = get_strip (ssid, get_address (msg)); + } else { + ssid = atoi (&(strrchr (path, '/' ))[1]); + strp = get_strip (ssid, get_address (msg)); + } + ctr = 7; + } else if (!strncmp (path, "/select/", 8)) { + if (sur->expand_enable && sur->expand) { + strp = get_strip (sur->expand, get_address (msg)); + } else { + strp = _select; + } + ctr = 8; + } else { + return ret; + } + if (strp) { + boost::shared_ptr control = boost::shared_ptr(); + // other automatable controls can be added by repeating the next 6.5 lines + if ((!strncmp (&path[ctr], "fader", 5)) || (!strncmp (&path[ctr], "gain", 4))) { + if (strp->gain_control ()) { + control = strp->gain_control (); + } else { + PBD::warning << "No fader for this strip" << endmsg; + } + } else { + PBD::warning << "Automation not available for " << path << endmsg; + } + + if (control) { + if (touch) { + //start touch + control->start_touch (control->session().transport_sample()); + ret = 0; + } else { + // end touch + control->stop_touch (control->session().transport_sample()); + ret = 0; + } + // just in case some crazy surface starts sending control values before touch + FakeTouchMap::iterator x = _touch_timeout.find(control); + if (x != _touch_timeout.end()) { + _touch_timeout.erase (x); + } + } + } + + return ret; +} + +int +OSC::fake_touch (boost::shared_ptr ctrl) +{ + if (ctrl) { + //start touch + if (ctrl->automation_state() == Touch && !ctrl->touching ()) { + ctrl->start_touch (ctrl->session().transport_sample()); + _touch_timeout[ctrl] = 10; + } + } + + return 0; +} + +int +OSC::route_mute (int ssid, int yn, lo_message msg) +{ + if (!session) return -1; + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + + if (s) { + if (s->mute_control()) { + s->mute_control()->set_value (yn ? 1.0 : 0.0, sur->usegroup); + return 0; + } + } + + return float_message_with_id ("/strip/mute", ssid, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::sel_mute (uint32_t yn, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -1877,13 +3287,81 @@ OSC::sel_solo (uint32_t yn, lo_message msg) } else { s = _select; } + if (s) { + if (s->mute_control()) { + s->mute_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + return 0; + } + } + return float_message("/select/mute", 0, get_address (msg)); +} + +int +OSC::route_solo (int ssid, int yn, lo_message msg) +{ + if (!session) return -1; + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + if (s) { if (s->solo_control()) { - s->solo_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + s->solo_control()->set_value (yn ? 1.0 : 0.0, sur->usegroup); + } + } + + return float_message_with_id ("/strip/solo", ssid, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::route_solo_iso (int ssid, int yn, lo_message msg) +{ + if (!session) return -1; + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + + if (s) { + if (s->solo_isolate_control()) { + s->solo_isolate_control()->set_value (yn ? 1.0 : 0.0, sur->usegroup); + return 0; + } + } + + return float_message_with_id ("/strip/solo_iso", ssid, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::route_solo_safe (int ssid, int yn, lo_message msg) +{ + if (!session) return -1; + boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + + if (s) { + if (s->solo_safe_control()) { + s->solo_safe_control()->set_value (yn ? 1.0 : 0.0, sur->usegroup); return 0; } } - return sel_fail ("solo", 0, get_address (msg)); + + return float_message_with_id ("/strip/solo_safe", ssid, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::sel_solo (uint32_t yn, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (s->solo_control()) { + session->set_control (s->solo_control(), yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + } + } + return float_message("/select/solo", 0, get_address (msg)); } int @@ -1902,7 +3380,7 @@ OSC::sel_solo_iso (uint32_t yn, lo_message msg) return 0; } } - return sel_fail ("solo_iso", 0, get_address (msg)); + return float_message("/select/solo_iso", 0, get_address (msg)); } int @@ -1921,7 +3399,7 @@ OSC::sel_solo_safe (uint32_t yn, lo_message msg) return 0; } } - return sel_fail ("solo_safe", 0, get_address (msg)); + return float_message("/select/solo_safe", 0, get_address (msg)); } int @@ -1937,10 +3415,12 @@ OSC::sel_recenable (uint32_t yn, lo_message msg) if (s) { if (s->rec_enable_control()) { s->rec_enable_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; + if (s->rec_enable_control()->get_value()) { + return 0; + } } } - return sel_fail ("recenable", 0, get_address (msg)); + return float_message("/select/recenable", 0, get_address (msg)); } int @@ -1948,16 +3428,32 @@ OSC::route_recenable (int ssid, int yn, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->rec_enable_control()) { - s->rec_enable_control()->set_value (yn, PBD::Controllable::UseGroup); + s->rec_enable_control()->set_value (yn, sur->usegroup); if (s->rec_enable_control()->get_value()) { return 0; } } } - return route_send_fail ("recenable", ssid, 0, get_address (msg)); + return float_message_with_id ("/strip/recenable", ssid, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::route_rename(int ssid, char *newname, lo_message msg) { + if (!session) { + return -1; + } + + boost::shared_ptr s = get_strip(ssid, get_address(msg)); + + if (s) { + s->set_name(std::string(newname)); + } + + return 0; } int @@ -1973,10 +3469,12 @@ OSC::sel_recsafe (uint32_t yn, lo_message msg) if (s) { if (s->rec_safe_control()) { s->rec_safe_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); - return 0; + if (s->rec_safe_control()->get_value()) { + return 0; + } } } - return sel_fail ("record_safe", 0, get_address (msg)); + return float_message("/select/record_safe", 0, get_address (msg)); } int @@ -1984,15 +3482,16 @@ OSC::route_recsafe (int ssid, int yn, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->rec_safe_control()) { - s->rec_safe_control()->set_value (yn, PBD::Controllable::UseGroup); + s->rec_safe_control()->set_value (yn, sur->usegroup); if (s->rec_safe_control()->get_value()) { return 0; } } } - return route_send_fail ("record_safe", ssid, 0,get_address (msg)); + return float_message_with_id ("/strip/record_safe", ssid, 0, sur->feedback[2], get_address (msg)); } int @@ -2000,18 +3499,21 @@ OSC::route_monitor_input (int ssid, int yn, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { boost::shared_ptr track = boost::dynamic_pointer_cast (s); if (track) { if (track->monitoring_control()) { - track->monitoring_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + std::bitset<32> value = track->monitoring_control()->get_value (); + value[0] = yn ? 1 : 0; + track->monitoring_control()->set_value (value.to_ulong(), sur->usegroup); return 0; } } } - return route_send_fail ("monitor_input", ssid, 0, get_address (msg)); + return float_message_with_id ("/strip/monitor_input", ssid, 0, sur->feedback[2], get_address (msg)); } int @@ -2028,12 +3530,14 @@ OSC::sel_monitor_input (uint32_t yn, lo_message msg) boost::shared_ptr track = boost::dynamic_pointer_cast (s); if (track) { if (track->monitoring_control()) { - track->monitoring_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + std::bitset<32> value = track->monitoring_control()->get_value (); + value[0] = yn ? 1 : 0; + track->monitoring_control()->set_value (value.to_ulong(), sur->usegroup); return 0; } } } - return sel_fail ("monitor_input", 0, get_address (msg)); + return float_message("/select/monitor_input", 0, get_address (msg)); } int @@ -2041,18 +3545,21 @@ OSC::route_monitor_disk (int ssid, int yn, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { boost::shared_ptr track = boost::dynamic_pointer_cast (s); if (track) { if (track->monitoring_control()) { - track->monitoring_control()->set_value (yn ? 2.0 : 0.0, PBD::Controllable::NoGroup); + std::bitset<32> value = track->monitoring_control()->get_value (); + value[1] = yn ? 1 : 0; + track->monitoring_control()->set_value (value.to_ulong(), sur->usegroup); return 0; } } } - return route_send_fail ("monitor_disk", ssid, 0, get_address (msg)); + return float_message_with_id ("/strip/monitor_disk", ssid, 0, sur->feedback[2], get_address (msg)); } int @@ -2069,12 +3576,14 @@ OSC::sel_monitor_disk (uint32_t yn, lo_message msg) boost::shared_ptr track = boost::dynamic_pointer_cast (s); if (track) { if (track->monitoring_control()) { - track->monitoring_control()->set_value (yn ? 2.0 : 0.0, PBD::Controllable::NoGroup); + std::bitset<32> value = track->monitoring_control()->get_value (); + value[1] = yn ? 1 : 0; + track->monitoring_control()->set_value (value.to_ulong(), sur->usegroup); return 0; } } } - return sel_fail ("monitor_disk", 0, get_address (msg)); + return float_message("/select/monitor_disk", 0, get_address (msg)); } @@ -2083,15 +3592,16 @@ OSC::strip_phase (int ssid, int yn, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->phase_control()) { - s->phase_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup); + s->phase_control()->set_value (yn ? 1.0 : 0.0, sur->usegroup); return 0; } } - return route_send_fail ("polarity", ssid, 0, get_address (msg)); + return float_message_with_id ("/strip/polarity", ssid, 0, sur->feedback[2], get_address (msg)); } int @@ -2110,7 +3620,7 @@ OSC::sel_phase (uint32_t yn, lo_message msg) return 0; } } - return sel_fail ("polarity", 0, get_address (msg)); + return float_message("/select/polarity", 0, get_address (msg)); } int @@ -2123,7 +3633,7 @@ OSC::strip_expand (int ssid, int yn, lo_message msg) if (yn) { s = get_strip (ssid, get_address (msg)); } else { - s = ControlProtocol::first_selected_stripable(); + s = _select; } return _strip_select (s, get_address (msg)); @@ -2135,71 +3645,76 @@ OSC::_strip_select (boost::shared_ptr s, lo_address addr) if (!session) { return -1; } - OSCSurface *sur = get_surface(addr); - if (sur->sel_obs) { - delete sur->sel_obs; - sur->sel_obs = 0; - } - if (s) { - OSCSelectObserver* sel_fb = new OSCSelectObserver (s, addr, sur->gainmode, sur->feedback); - s->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); - sur->sel_obs = sel_fb; - } else if (sur->expand_enable) { + OSCSurface *sur = get_surface(addr, true); + if (!s) { + // expand doesn't point to a stripable, turn it off and use select sur->expand = 0; sur->expand_enable = false; - if (_select) { - OSCSelectObserver* sel_fb = new OSCSelectObserver (_select, addr, sur->gainmode, sur->feedback); - _select->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); + if (ControlProtocol::first_selected_stripable()) { + s = ControlProtocol::first_selected_stripable(); + } else { + s = session->master_out (); + } + _select = s; + } + sur->select = s; + bool sends; + uint32_t nsends = 0; + do { + sends = false; + if (s->send_level_controllable (nsends)) { + sends = true; + nsends++; + } + } while (sends); + sur->nsends = nsends; + + s->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); + + OSCSelectObserver* so = dynamic_cast(sur->sel_obs); + if (sur->feedback[13]) { + if (so != 0) { + so->refresh_strip (s, nsends, true); + } else { + OSCSelectObserver* sel_fb = new OSCSelectObserver (*this, sur); sur->sel_obs = sel_fb; } + sur->sel_obs->set_expand (sur->expand_enable); + uint32_t obs_expand = 0; + if (sur->expand_enable) { + obs_expand = sur->expand; + } else { + obs_expand = 0; + } + for (uint32_t i = 0; i < sur->observers.size(); i++) { + sur->observers[i]->set_expand (obs_expand); + } } else { - route_send_fail ("select", sur->expand, 0 , addr); + if (so != 0) { + delete so; + sur->sel_obs = 0; + } } - //update buttons on surface - int b_s = sur->bank_size; - if (!b_s) { // bank size 0 means we need to know how many strips there are. - b_s = sur->nstrips; + + // need to set monitor for processor changed signal (for paging) + boost::shared_ptr r = boost::dynamic_pointer_cast(s); + if (r) { + r->processors_changed.connect (sur->proc_connection, MISSING_INVALIDATOR, boost::bind (&OSC::processor_changed, this, addr), this); + _sel_plugin (sur->plugin_id, addr); } - for (int i = 1; i <= b_s; i++) { - string path = "expand"; - if ((i == (int) sur->expand) && sur->expand_enable) { - lo_message reply = lo_message_new (); - if (sur->feedback[2]) { - ostringstream os; - os << "/strip/" << path << "/" << i; - path = os.str(); - } else { - ostringstream os; - os << "/strip/" << path; - path = os.str(); - lo_message_add_int32 (reply, i); - } - lo_message_add_float (reply, (float) 1); + return 0; +} - lo_send_message (addr, path.c_str(), reply); - lo_message_free (reply); - reply = lo_message_new (); - lo_message_add_float (reply, 1.0); - lo_send_message (addr, "/select/expand", reply); - lo_message_free (reply); - - } else { - lo_message reply = lo_message_new (); - lo_message_add_int32 (reply, i); - lo_message_add_float (reply, 0.0); - lo_send_message (addr, "/strip/expand", reply); - lo_message_free (reply); - } - } - if (!sur->expand_enable) { - lo_message reply = lo_message_new (); - lo_message_add_float (reply, 0.0); - lo_send_message (addr, "/select/expand", reply); - lo_message_free (reply); +void +OSC::processor_changed (lo_address addr) +{ + OSCSurface *sur = get_surface (addr); + _sel_plugin (sur->plugin_id, addr); + if (sur->sel_obs) { + sur->sel_obs->renew_sends (); + sur->sel_obs->eq_restart (-1); } - - return 0; } int @@ -2209,7 +3724,6 @@ OSC::strip_gui_select (int ssid, int yn, lo_message msg) if (!yn) return 0; if (!session) { - route_send_fail ("select", ssid, 0, get_address (msg)); return -1; } OSCSurface *sur = get_surface(get_address (msg)); @@ -2218,7 +3732,9 @@ OSC::strip_gui_select (int ssid, int yn, lo_message msg) if (s) { SetStripableSelection (s); } else { - route_send_fail ("select", ssid, 0, get_address (msg)); + if ((int) (sur->feedback.to_ulong())) { + float_message_with_id ("/strip/select", ssid, 0, sur->feedback[2], get_address (msg)); + } } return 0; @@ -2229,11 +3745,12 @@ OSC::sel_expand (uint32_t state, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; - sur->expand_enable = (bool) state; if (state && sur->expand) { + sur->expand_enable = (bool) state; s = get_strip (sur->expand, get_address (msg)); } else { - s = ControlProtocol::first_selected_stripable(); + sur->expand_enable = false; + s = _select; } return _strip_select (s, get_address (msg)); @@ -2244,10 +3761,12 @@ OSC::route_set_gain_abs (int ssid, float level, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->gain_control()) { - s->gain_control()->set_value (level, PBD::Controllable::NoGroup); + fake_touch (s->gain_control()); + s->gain_control()->set_value (level, sur->usegroup); } else { return 1; } @@ -2262,9 +3781,9 @@ int OSC::route_set_gain_dB (int ssid, float dB, lo_message msg) { if (!session) { - route_send_fail ("gain", ssid, -193, get_address (msg)); return -1; } + OSCSurface *sur = get_surface(get_address (msg)); int ret; if (dB < -192) { ret = route_set_gain_abs (ssid, 0.0, msg); @@ -2272,7 +3791,7 @@ OSC::route_set_gain_dB (int ssid, float dB, lo_message msg) ret = route_set_gain_abs (ssid, dB_to_coefficient (dB), msg); } if (ret != 0) { - return route_send_fail ("gain", ssid, -193, get_address (msg)); + return float_message_with_id ("/strip/gain", ssid, -193, sur->feedback[2], get_address (msg)); } return 0; } @@ -2289,34 +3808,101 @@ OSC::sel_gain (float val, lo_message msg) } if (s) { float abs; - if (val < -192) { - abs = 0; - } else { - abs = dB_to_coefficient (val); + if (s->gain_control()) { + if (val < -192) { + abs = 0; + } else { + abs = dB_to_coefficient (val); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + } + fake_touch (s->gain_control()); + s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); + return 0; } + } + return float_message("/select/gain", -193, get_address (msg)); +} + +int +OSC::sel_dB_delta (float delta, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { if (s->gain_control()) { + float dB = accurate_coefficient_to_dB (s->gain_control()->get_value()) + delta; + float abs; + if (dB < -192) { + abs = 0; + } else { + abs = dB_to_coefficient (dB); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + } + fake_touch (s->gain_control()); s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); return 0; } } - return sel_fail ("gain", -193, get_address (msg)); + return float_message("/select/gain", -193, get_address (msg)); } int OSC::route_set_gain_fader (int ssid, float pos, lo_message msg) { if (!session) { - route_send_fail ("fader", ssid, 0, get_address (msg)); return -1; } - int ret; - ret = route_set_gain_abs (ssid, slider_position_to_gain_with_max (pos, 2.0), msg); - if (ret != 0) { - return route_send_fail ("fader", ssid, 0, get_address (msg)); + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + + if (s) { + if (s->gain_control()) { + fake_touch (s->gain_control()); + s->gain_control()->set_value (s->gain_control()->interface_to_internal (pos), sur->usegroup); + } else { + return float_message_with_id ("/strip/fader", ssid, 0, sur->feedback[2], get_address (msg)); + } + } else { + return float_message_with_id ("/strip/fader", ssid, 0, sur->feedback[2], get_address (msg)); } return 0; } +int +OSC::strip_db_delta (int ssid, float delta, lo_message msg) +{ + if (!session) return -1; + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + if (s) { + float db = accurate_coefficient_to_dB (s->gain_control()->get_value()) + delta; + float abs; + if (db < -192) { + abs = 0; + } else { + abs = dB_to_coefficient (db); + float top = s->gain_control()->upper(); + if (abs > top) { + abs = top; + } + } + s->gain_control()->set_value (abs, sur->usegroup); + return 0; + } + return -1; +} + int OSC::sel_fader (float val, lo_message msg) { @@ -2328,14 +3914,13 @@ OSC::sel_fader (float val, lo_message msg) s = _select; } if (s) { - float abs; - abs = slider_position_to_gain_with_max (val, 2.0); if (s->gain_control()) { - s->gain_control()->set_value (abs, PBD::Controllable::NoGroup); + fake_touch (s->gain_control()); + s->gain_control()->set_value (s->gain_control()->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_fail ("fader", 0, get_address (msg)); + return float_message("/select/fader", 0, get_address (msg)); } int @@ -2343,10 +3928,11 @@ OSC::route_set_trim_abs (int ssid, float level, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->trim_control()) { - s->trim_control()->set_value (level, PBD::Controllable::NoGroup); + s->trim_control()->set_value (level, sur->usegroup); return 0; } @@ -2358,10 +3944,11 @@ OSC::route_set_trim_abs (int ssid, float level, lo_message msg) int OSC::route_set_trim_dB (int ssid, float dB, lo_message msg) { + OSCSurface *sur = get_surface(get_address (msg)); int ret; ret = route_set_trim_abs(ssid, dB_to_coefficient (dB), msg); if (ret != 0) { - return route_send_fail ("trimdB", ssid, 0, get_address (msg)); + return float_message_with_id ("/strip/trimdB", ssid, 0, sur->feedback[2], get_address (msg)); } return 0; @@ -2383,7 +3970,7 @@ OSC::sel_trim (float val, lo_message msg) return 0; } } - return sel_fail ("trimdB", 0, get_address (msg)); + return float_message("/select/trimdB", 0, get_address (msg)); } int @@ -2399,11 +3986,10 @@ OSC::sel_pan_position (float val, lo_message msg) if (s) { if(s->pan_azimuth_control()) { s->pan_azimuth_control()->set_value (s->pan_azimuth_control()->interface_to_internal (val), PBD::Controllable::NoGroup); - return sel_fail ("pan_stereo_position", s->pan_azimuth_control()->internal_to_interface (s->pan_azimuth_control()->get_value ()), get_address (msg)); return 0; } } - return sel_fail ("pan_stereo_position", 0.5, get_address (msg)); + return float_message("/select/pan_stereo_position", 0.5, get_address (msg)); } int @@ -2422,7 +4008,7 @@ OSC::sel_pan_width (float val, lo_message msg) return 0; } } - return sel_fail ("pan_stereo_width", 1, get_address (msg)); + return float_message("/select/pan_stereo_width", 1, get_address (msg)); } int @@ -2430,15 +4016,16 @@ OSC::route_set_pan_stereo_position (int ssid, float pos, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if(s->pan_azimuth_control()) { - s->pan_azimuth_control()->set_value (s->pan_azimuth_control()->interface_to_internal (pos), PBD::Controllable::NoGroup); - return route_send_fail ("pan_stereo_position", ssid, s->pan_azimuth_control()->internal_to_interface (s->pan_azimuth_control()->get_value ()), get_address (msg)); + s->pan_azimuth_control()->set_value (s->pan_azimuth_control()->interface_to_internal (pos), sur->usegroup); + return 0; } } - return route_send_fail ("pan_stereo_position", ssid, 0.5, get_address (msg)); + return float_message_with_id ("/strip/pan_stereo_position", ssid, 0.5, sur->feedback[2], get_address (msg)); } int @@ -2446,15 +4033,16 @@ OSC::route_set_pan_stereo_width (int ssid, float pos, lo_message msg) { if (!session) return -1; boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { if (s->pan_width_control()) { - s->pan_width_control()->set_value (pos, PBD::Controllable::NoGroup); + s->pan_width_control()->set_value (pos, sur->usegroup); return 0; } } - return route_send_fail ("pan_stereo_width", ssid, 1, get_address (msg)); + return float_message_with_id ("/strip/pan_stereo_width", ssid, 1, sur->feedback[2], get_address (msg)); } int @@ -2464,6 +4052,7 @@ OSC::route_set_send_gain_dB (int ssid, int id, float val, lo_message msg) return -1; } boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); float abs; if (s) { if (id > 0) { @@ -2479,7 +4068,7 @@ OSC::route_set_send_gain_dB (int ssid, int id, float val, lo_message msg) } #endif if (s->send_level_controllable (id)) { - s->send_level_controllable (id)->set_value (abs, PBD::Controllable::NoGroup); + s->send_level_controllable (id)->set_value (abs, sur->usegroup); return 0; } } @@ -2493,6 +4082,7 @@ OSC::route_set_send_fader (int ssid, int id, float val, lo_message msg) return -1; } boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); float abs; if (s) { @@ -2501,12 +4091,8 @@ OSC::route_set_send_fader (int ssid, int id, float val, lo_message msg) } if (s->send_level_controllable (id)) { -#ifdef MIXBUS abs = s->send_level_controllable(id)->interface_to_internal (val); -#else - abs = slider_position_to_gain_with_max (val, 2.0); -#endif - s->send_level_controllable (id)->set_value (abs, PBD::Controllable::NoGroup); + s->send_level_controllable (id)->set_value (abs, sur->usegroup); return 0; } } @@ -2517,6 +4103,9 @@ int OSC::sel_sendgain (int id, float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); + if (sur->send_page_size && (id > (int)sur->send_page_size)) { + return float_message_with_id ("/select/send_gain", id, -193, sur->feedback[2], get_address (msg)); + } boost::shared_ptr s; if (sur->expand_enable) { s = get_strip (sur->expand, get_address (msg)); @@ -2524,9 +4113,10 @@ OSC::sel_sendgain (int id, float val, lo_message msg) s = _select; } float abs; + int send_id = 0; if (s) { if (id > 0) { - --id; + send_id = id - 1; } #ifdef MIXBUS abs = val; @@ -2537,18 +4127,24 @@ OSC::sel_sendgain (int id, float val, lo_message msg) abs = dB_to_coefficient (val); } #endif - if (s->send_level_controllable (id)) { - s->send_level_controllable (id)->set_value (abs, PBD::Controllable::NoGroup); + if (sur->send_page_size) { + send_id = send_id + ((sur->send_page - 1) * sur->send_page_size); + } + if (s->send_level_controllable (send_id)) { + s->send_level_controllable (send_id)->set_value (abs, PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("send_gain", id + 1, -193, get_address (msg)); + return float_message_with_id ("/select/send_gain", id, -193, sur->feedback[2], get_address (msg)); } int OSC::sel_sendfader (int id, float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); + if (sur->send_page_size && (id > (int)sur->send_page_size)) { + return float_message_with_id ("/select/send_fader", id, 0, sur->feedback[2], get_address (msg)); + } boost::shared_ptr s; if (sur->expand_enable) { s = get_strip (sur->expand, get_address (msg)); @@ -2556,23 +4152,23 @@ OSC::sel_sendfader (int id, float val, lo_message msg) s = _select; } float abs; + int send_id = 0; if (s) { if (id > 0) { - --id; + send_id = id - 1; + } + if (sur->send_page_size) { + send_id = send_id + ((sur->send_page - 1) * sur->send_page_size); } - if (s->send_level_controllable (id)) { -#ifdef MIXBUS - abs = s->send_level_controllable(id)->interface_to_internal (val); -#else - abs = slider_position_to_gain_with_max (val, 2.0); -#endif - s->send_level_controllable (id)->set_value (abs, PBD::Controllable::NoGroup); + if (s->send_level_controllable (send_id)) { + abs = s->send_level_controllable(send_id)->interface_to_internal (val); + s->send_level_controllable (send_id)->set_value (abs, PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("send_fader", id, 0, get_address (msg)); + return float_message_with_id ("/select/send_fader", id, 0, sur->feedback[2], get_address (msg)); } int @@ -2582,6 +4178,7 @@ OSC::route_set_send_enable (int ssid, int sid, float val, lo_message msg) return -1; } boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); if (s) { @@ -2592,11 +4189,23 @@ OSC::route_set_send_enable (int ssid, int sid, float val, lo_message msg) } if (s->send_enable_controllable (sid)) { - s->send_enable_controllable (sid)->set_value (val, PBD::Controllable::NoGroup); + s->send_enable_controllable (sid)->set_value (val, sur->usegroup); return 0; } if (s->send_level_controllable (sid)) { + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + if (!r) { + return 0; + } + boost::shared_ptr snd = boost::dynamic_pointer_cast (r->nth_send(sid)); + if (snd) { + if (val) { + snd->activate(); + } else { + snd->deactivate(); + } + } return 0; } @@ -2609,151 +4218,256 @@ int OSC::sel_sendenable (int id, float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); + if (sur->send_page_size && (id > (int)sur->send_page_size)) { + return float_message_with_id ("/select/send_enable", id, 0, sur->feedback[2], get_address (msg)); + } boost::shared_ptr s; if (sur->expand_enable) { s = get_strip (sur->expand, get_address (msg)); } else { s = _select; } + int send_id = 0; if (s) { if (id > 0) { - --id; + send_id = id - 1; + } + if (sur->send_page_size) { + send_id = send_id + ((sur->send_page - 1) * sur->send_page_size); } - if (s->send_enable_controllable (id)) { - s->send_enable_controllable (id)->set_value (val, PBD::Controllable::NoGroup); + if (s->send_enable_controllable (send_id)) { + s->send_enable_controllable (send_id)->set_value (val, PBD::Controllable::NoGroup); return 0; } - if (s->send_level_controllable (id)) { - return sel_send_fail ("send_enable", id + 1, 1, get_address (msg)); + if (s->send_level_controllable (send_id)) { + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + if (!r) { + // should never get here + return float_message_with_id ("/select/send_enable", id, 0, sur->feedback[2], get_address (msg)); + } + boost::shared_ptr snd = boost::dynamic_pointer_cast (r->nth_send(send_id)); + if (snd) { + if (val) { + snd->activate(); + } else { + snd->deactivate(); + } + } + return 0; } } - return sel_send_fail ("send_enable", id + 1, 0, get_address (msg)); + return float_message_with_id ("/select/send_enable", id, 0, sur->feedback[2], get_address (msg)); } int -OSC::route_plugin_parameter (int ssid, int piid, int par, float val, lo_message msg) +OSC::sel_master_send_enable (int state, lo_message msg) { - if (!session) - return -1; - boost::shared_ptr s = get_strip (ssid, get_address (msg)); - - boost::shared_ptr r = boost::dynamic_pointer_cast (s); - - if (!r) { - PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; - return -1; + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; } + if (s) { + if (s->master_send_enable_controllable ()) { + s->master_send_enable_controllable()->set_value (state, PBD::Controllable::NoGroup); + return 0; + } + } + return float_message ("/select/master_send_enable", 0, get_address(msg)); +} - boost::shared_ptr redi=r->nth_plugin (piid); - - if (!redi) { - PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; +int +OSC::select_plugin_parameter (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) { + OSCSurface *sur = get_surface(get_address (msg)); + int paid; + uint32_t piid = sur->plugin_id; + float value = 0; + if (argc > 1) { + // no inline args + if (argc == 2) { + // change parameter in already selected plugin + if (types[0] == 'f') { + paid = (int) argv[0]->f; + } else { + paid = argv[0]->i; + } + value = argv[1]->f; + } else if (argc == 3) { + if (types[0] == 'f') { + piid = (int) argv[0]->f; + } else { + piid = argv[0]->i; + } + _sel_plugin (piid, get_address (msg)); + if (types[1] == 'f') { + paid = (int) argv[1]->f; + } else { + paid = argv[1]->i; + } + value = argv[2]->f; + } else if (argc > 3) { + PBD::warning << "OSC: Too many parameters: " << argc << endmsg; + return -1; + } + } else if (argc) { + const char * par = strstr (&path[25], "/"); + if (par) { + piid = atoi (&path[25]); + _sel_plugin (piid, msg); + paid = atoi (&par[1]); + value = argv[0]->f; + // we have plugin id too + } else { + // just parameter + paid = atoi (&path[25]); + value = argv[0]->f; + } + } else { + PBD::warning << "OSC: Must have parameters." << endmsg; return -1; } + if (!piid || piid > sur->plugins.size ()) { + return float_message_with_id ("/select/plugin/parameter", paid, 0, sur->feedback[2], get_address (msg)); + } + if (sur->plug_page_size && (paid > (int)sur->plug_page_size)) { + return float_message_with_id ("/select/plugin/parameter", paid, 0, sur->feedback[2], get_address (msg)); + } + boost::shared_ptr s = sur->select; + boost::shared_ptr r = boost::dynamic_pointer_cast(s); + if (!r) { + return 1; + } + boost::shared_ptr proc = r->nth_plugin (sur->plugins[sur->plugin_id - 1]); boost::shared_ptr pi; - - if (!(pi = boost::dynamic_pointer_cast(redi))) { - PBD::error << "OSC: given processor # " << piid << " on RID '" << ssid << "' is not a Plugin." << endmsg; - return -1; + if (!(pi = boost::dynamic_pointer_cast(proc))) { + return 1; } - boost::shared_ptr pip = pi->plugin(); - bool ok=false; - - uint32_t controlid = pip->nth_parameter (par,ok); - - if (!ok) { - PBD::error << "OSC: Cannot find parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "'" << endmsg; - return -1; + // paid is paged parameter convert to absolute + int parid = paid + (int)sur->plug_page - 1; + if (parid > (int) sur->plug_params.size ()) { + if (sur->feedback[13]) { + float_message_with_id ("/select/plugin/parameter", paid, 0, sur->feedback[2], get_address (msg)); + } + return 0; } - if (!pip->parameter_is_input(controlid)) { - PBD::error << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "' is not a control input" << endmsg; - return -1; + bool ok = false; + uint32_t controlid = pip->nth_parameter(sur->plug_params[parid - 1], ok); + if (!ok) { + return 1; } - ParameterDescriptor pd; - pi->plugin()->get_parameter_descriptor (controlid,pd); - - if (val >= pd.lower && val <= pd.upper) { - - boost::shared_ptr c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid)); - // cerr << "parameter:" << redi->describe_parameter(controlid) << " val:" << val << "\n"; - c->set_value (val, PBD::Controllable::NoGroup); - } else { - PBD::warning << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "' is out of range" << endmsg; - PBD::info << "OSC: Valid range min=" << pd.lower << " max=" << pd.upper << endmsg; + pip->get_parameter_descriptor(controlid, pd); + if ( pip->parameter_is_input(controlid) || pip->parameter_is_control(controlid) ) { + boost::shared_ptr c = pi->automation_control(Evoral::Parameter(PluginAutomation, 0, controlid)); + if (c) { + if (pd.integer_step && pd.upper == 1) { + if (c->get_value () && value < 1.0) { + c->set_value (0, PBD::Controllable::NoGroup); + } else if (!c->get_value () && value) { + c->set_value (1, PBD::Controllable::NoGroup); + } + } else { + c->set_value (c->interface_to_internal (value), PBD::Controllable::NoGroup); + } + return 0; + } } - - return 0; + return 1; } -//prints to cerr only int -OSC::route_plugin_parameter_print (int ssid, int piid, int par, lo_message msg) +OSC::sel_plugin_activate (float state, lo_message msg) { if (!session) { return -1; } - boost::shared_ptr s = get_strip (ssid, get_address (msg)); + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s = sur->select; boost::shared_ptr r = boost::dynamic_pointer_cast (s); - if (!r) { - return -1; + if (r) { + boost::shared_ptr redi=r->nth_plugin (sur->plugins[sur->plugin_id -1]); + if (redi) { + boost::shared_ptr pi; + if ((pi = boost::dynamic_pointer_cast(redi))) { + if(state > 0) { + pi->activate(); + } else { + pi->deactivate(); + } + return 0; + } + } } + float_message ("/select/plugin/activate", 0, get_address (msg)); + PBD::warning << "OSC: Select has no Plugin." << endmsg; + return 0; +} - boost::shared_ptr redi=r->nth_processor (piid); - - if (!redi) { +int +OSC::route_plugin_list (int ssid, lo_message msg) { + if (!session) { return -1; } - boost::shared_ptr pi; + boost::shared_ptr r = boost::dynamic_pointer_cast(get_strip (ssid, get_address (msg))); - if (!(pi = boost::dynamic_pointer_cast(redi))) { + if (!r) { + PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; return -1; } + int piid = 0; - boost::shared_ptr pip = pi->plugin(); - bool ok=false; + lo_message reply = lo_message_new (); + lo_message_add_int32 (reply, ssid); - uint32_t controlid = pip->nth_parameter (par,ok); - if (!ok) { - return -1; - } + for (;;) { + boost::shared_ptr redi = r->nth_plugin(piid); + if ( !redi ) { + break; + } - ParameterDescriptor pd; + boost::shared_ptr pi; - if (pi->plugin()->get_parameter_descriptor (controlid, pd) == 0) { - boost::shared_ptr c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid)); + if (!(pi = boost::dynamic_pointer_cast(redi))) { + PBD::error << "OSC: given processor # " << piid << " on RID '" << ssid << "' is not a Plugin." << endmsg; + continue; + } + lo_message_add_int32 (reply, piid + 1); - cerr << "parameter: " << redi->describe_parameter(controlid) << "\n"; - cerr << "current value: " << c->get_value (); - cerr << "lower value: " << pd.lower << "\n"; - cerr << "upper value: " << pd.upper << "\n"; + boost::shared_ptr pip = pi->plugin(); + lo_message_add_string (reply, pip->name()); + lo_message_add_int32(reply, redi->enabled() ? 1 : 0); + + piid++; } + lo_send_message (get_address (msg), "/strip/plugin/list", reply); + lo_message_free (reply); return 0; } int -OSC::route_plugin_activate (int ssid, int piid, lo_message msg) -{ - if (!session) +OSC::route_plugin_descriptor (int ssid, int piid, lo_message msg) { + if (!session) { return -1; - boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); + } - boost::shared_ptr r = boost::dynamic_pointer_cast (s); + boost::shared_ptr r = boost::dynamic_pointer_cast(get_strip (ssid, get_address (msg))); if (!r) { PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; return -1; } - boost::shared_ptr redi=r->nth_plugin (piid); + boost::shared_ptr redi = r->nth_plugin(piid - 1); if (!redi) { PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; @@ -2768,30 +4482,304 @@ OSC::route_plugin_activate (int ssid, int piid, lo_message msg) } boost::shared_ptr pip = pi->plugin(); - pi->activate(); - - return 0; -} - -int -OSC::route_plugin_deactivate (int ssid, int piid, lo_message msg) -{ - if (!session) - return -1; - boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); - - boost::shared_ptr r = boost::dynamic_pointer_cast (s); + bool ok = false; - if (!r) { - PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; - return -1; - } + for ( uint32_t ppi = 0; ppi < pip->parameter_count(); ppi++) { - boost::shared_ptr redi=r->nth_plugin (piid); - - if (!redi) { - PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; - return -1; + uint32_t controlid = pip->nth_parameter(ppi, ok); + if (!ok) { + continue; + } + boost::shared_ptr c = pi->automation_control(Evoral::Parameter(PluginAutomation, 0, controlid)); + + lo_message reply = lo_message_new(); + lo_message_add_int32 (reply, ssid); + lo_message_add_int32 (reply, piid); + + lo_message_add_int32 (reply, ppi + 1); + ParameterDescriptor pd; + pi->plugin()->get_parameter_descriptor(controlid, pd); + lo_message_add_string (reply, pd.label.c_str()); + + // I've combined those binary descriptor parts in a bit-field to reduce lilo message elements + int flags = 0; + flags |= pd.enumeration ? 1 : 0; + flags |= pd.integer_step ? 2 : 0; + flags |= pd.logarithmic ? 4 : 0; + flags |= pd.sr_dependent ? 32 : 0; + flags |= pd.toggled ? 64 : 0; + flags |= pip->parameter_is_input(controlid) ? 0x80 : 0; + + std::string param_desc = pi->plugin()->describe_parameter(Evoral::Parameter(PluginAutomation, 0, controlid)); + flags |= (param_desc == X_("hidden")) ? 0x100 : 0; + lo_message_add_int32 (reply, flags); + + switch(pd.datatype) { + case ARDOUR::Variant::BEATS: + lo_message_add_string(reply, _("BEATS")); + break; + case ARDOUR::Variant::BOOL: + lo_message_add_string(reply, _("BOOL")); + break; + case ARDOUR::Variant::DOUBLE: + lo_message_add_string(reply, _("DOUBLE")); + break; + case ARDOUR::Variant::FLOAT: + lo_message_add_string(reply, _("FLOAT")); + break; + case ARDOUR::Variant::INT: + lo_message_add_string(reply, _("INT")); + break; + case ARDOUR::Variant::LONG: + lo_message_add_string(reply, _("LONG")); + break; + case ARDOUR::Variant::NOTHING: + lo_message_add_string(reply, _("NOTHING")); + break; + case ARDOUR::Variant::PATH: + lo_message_add_string(reply, _("PATH")); + break; + case ARDOUR::Variant::STRING: + lo_message_add_string(reply, _("STRING")); + break; + case ARDOUR::Variant::URI: + lo_message_add_string(reply, _("URI")); + break; + default: + lo_message_add_string(reply, _("UNKNOWN")); + break; + } + lo_message_add_float (reply, pd.lower); + lo_message_add_float (reply, pd.upper); + lo_message_add_string (reply, pd.print_fmt.c_str()); + if ( pd.scale_points ) { + lo_message_add_int32 (reply, pd.scale_points->size()); + for ( ARDOUR::ScalePoints::const_iterator i = pd.scale_points->begin(); i != pd.scale_points->end(); ++i) { + lo_message_add_float (reply, i->second); + lo_message_add_string (reply, ((std::string)i->first).c_str()); + } + } + else { + lo_message_add_int32 (reply, 0); + } + if ( c ) { + lo_message_add_double (reply, c->get_value()); + } + else { + lo_message_add_double (reply, 0); + } + + lo_send_message (get_address (msg), "/strip/plugin/descriptor", reply); + lo_message_free (reply); + } + + lo_message reply = lo_message_new (); + lo_message_add_int32 (reply, ssid); + lo_message_add_int32 (reply, piid); + lo_send_message (get_address (msg), "/strip/plugin/descriptor_end", reply); + lo_message_free (reply); + + return 0; +} + +int +OSC::route_plugin_reset (int ssid, int piid, lo_message msg) { + if (!session) { + return -1; + } + + boost::shared_ptr r = boost::dynamic_pointer_cast(get_strip (ssid, get_address (msg))); + + if (!r) { + PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr redi = r->nth_plugin(piid - 1); + + if (!redi) { + PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr pi; + + if (!(pi = boost::dynamic_pointer_cast(redi))) { + PBD::error << "OSC: given processor # " << piid << " on RID '" << ssid << "' is not a Plugin." << endmsg; + return -1; + } + + pi->reset_parameters_to_default (); + + return 0; +} + +int +OSC::route_plugin_parameter (int ssid, int piid, int par, float val, lo_message msg) +{ + if (!session) + return -1; + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + + if (!r) { + PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr redi=r->nth_plugin (piid - 1); + + if (!redi) { + PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr pi; + + if (!(pi = boost::dynamic_pointer_cast(redi))) { + PBD::error << "OSC: given processor # " << piid << " on RID '" << ssid << "' is not a Plugin." << endmsg; + return -1; + } + + boost::shared_ptr pip = pi->plugin(); + bool ok=false; + + uint32_t controlid = pip->nth_parameter (par - 1,ok); + + if (!ok) { + PBD::error << "OSC: Cannot find parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "'" << endmsg; + return -1; + } + + if (!pip->parameter_is_input(controlid)) { + PBD::error << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "' is not a control input" << endmsg; + return -1; + } + + ParameterDescriptor pd; + pi->plugin()->get_parameter_descriptor (controlid,pd); + + if (val >= pd.lower && val <= pd.upper) { + + boost::shared_ptr c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid)); + // cerr << "parameter:" << redi->describe_parameter(controlid) << " val:" << val << "\n"; + c->set_value (val, PBD::Controllable::NoGroup); + } else { + PBD::warning << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << ssid << "' is out of range" << endmsg; + PBD::info << "OSC: Valid range min=" << pd.lower << " max=" << pd.upper << endmsg; + } + + return 0; +} + +//prints to cerr only +int +OSC::route_plugin_parameter_print (int ssid, int piid, int par, lo_message msg) +{ + if (!session) { + return -1; + } + boost::shared_ptr s = get_strip (ssid, get_address (msg)); + + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + + if (!r) { + return -1; + } + + boost::shared_ptr redi=r->nth_plugin (piid - 1); + + if (!redi) { + return -1; + } + + boost::shared_ptr pi; + + if (!(pi = boost::dynamic_pointer_cast(redi))) { + return -1; + } + + boost::shared_ptr pip = pi->plugin(); + bool ok=false; + + uint32_t controlid = pip->nth_parameter (par - 1,ok); + + if (!ok) { + return -1; + } + + ParameterDescriptor pd; + + if (pi->plugin()->get_parameter_descriptor (controlid, pd) == 0) { + boost::shared_ptr c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid)); + + cerr << "parameter: " << pd.label << "\n"; + if (c) { + cerr << "current value: " << c->get_value () << "\n"; + } else { + cerr << "current value not available, control does not exist\n"; + } + cerr << "lower value: " << pd.lower << "\n"; + cerr << "upper value: " << pd.upper << "\n"; + } + + return 0; +} + +int +OSC::route_plugin_activate (int ssid, int piid, lo_message msg) +{ + if (!session) + return -1; + boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); + + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + + if (!r) { + PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr redi=r->nth_plugin (piid - 1); + + if (!redi) { + PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr pi; + + if (!(pi = boost::dynamic_pointer_cast(redi))) { + PBD::error << "OSC: given processor # " << piid << " on RID '" << ssid << "' is not a Plugin." << endmsg; + return -1; + } + + boost::shared_ptr pip = pi->plugin(); + pi->activate(); + + return 0; +} + +int +OSC::route_plugin_deactivate (int ssid, int piid, lo_message msg) +{ + if (!session) + return -1; + boost::shared_ptr s = get_strip (ssid, lo_message_get_source (msg)); + + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + + if (!r) { + PBD::error << "OSC: Invalid Remote Control ID '" << ssid << "'" << endmsg; + return -1; + } + + boost::shared_ptr redi=r->nth_plugin (piid - 1); + + if (!redi) { + PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << ssid << "'" << endmsg; + return -1; } boost::shared_ptr pi; @@ -2825,7 +4813,7 @@ OSC::sel_pan_elevation (float val, lo_message msg) return 0; } } - return sel_fail ("pan_elevation_position", 0, get_address (msg)); + return float_message("/select/pan_elevation_position", 0, get_address (msg)); } int @@ -2844,7 +4832,7 @@ OSC::sel_pan_frontback (float val, lo_message msg) return 0; } } - return sel_fail ("pan_frontback_position", 0.5, get_address (msg)); + return float_message("/select/pan_frontback_position", 0.5, get_address (msg)); } int @@ -2863,7 +4851,7 @@ OSC::sel_pan_lfe (float val, lo_message msg) return 0; } } - return sel_fail ("pan_lfe_control", 0, get_address (msg)); + return float_message("/select/pan_lfe_control", 0, get_address (msg)); } // compressor control @@ -2883,7 +4871,7 @@ OSC::sel_comp_enable (float val, lo_message msg) return 0; } } - return sel_fail ("comp_enable", 0, get_address (msg)); + return float_message("/select/comp_enable", 0, get_address (msg)); } int @@ -2902,7 +4890,7 @@ OSC::sel_comp_threshold (float val, lo_message msg) return 0; } } - return sel_fail ("comp_threshold", 0, get_address (msg)); + return float_message("/select/comp_threshold", 0, get_address (msg)); } int @@ -2921,7 +4909,7 @@ OSC::sel_comp_speed (float val, lo_message msg) return 0; } } - return sel_fail ("comp_speed", 0, get_address (msg)); + return float_message("/select/comp_speed", 0, get_address (msg)); } int @@ -2940,7 +4928,7 @@ OSC::sel_comp_mode (float val, lo_message msg) return 0; } } - return sel_fail ("comp_mode", 0, get_address (msg)); + return float_message("/select/comp_mode", 0, get_address (msg)); } int @@ -2959,7 +4947,7 @@ OSC::sel_comp_makeup (float val, lo_message msg) return 0; } } - return sel_fail ("comp_makeup", 0, get_address (msg)); + return float_message("/select/comp_makeup", 0, get_address (msg)); } // EQ control @@ -2980,11 +4968,11 @@ OSC::sel_eq_enable (float val, lo_message msg) return 0; } } - return sel_fail ("eq_enable", 0, get_address (msg)); + return float_message("/select/eq_enable", 0, get_address (msg)); } int -OSC::sel_eq_hpf (float val, lo_message msg) +OSC::sel_eq_hpf_freq (float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -2994,16 +4982,16 @@ OSC::sel_eq_hpf (float val, lo_message msg) s = _select; } if (s) { - if (s->eq_hpf_controllable()) { - s->eq_hpf_controllable()->set_value (s->eq_hpf_controllable()->interface_to_internal (val), PBD::Controllable::NoGroup); + if (s->filter_freq_controllable(true)) { + s->filter_freq_controllable(true)->set_value (s->filter_freq_controllable(true)->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_fail ("eq_hpf", 0, get_address (msg)); + return float_message("/select/eq_hpf/freq", 0, get_address (msg)); } int -OSC::sel_eq_gain (int id, float val, lo_message msg) +OSC::sel_eq_lpf_freq (float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -3013,19 +5001,16 @@ OSC::sel_eq_gain (int id, float val, lo_message msg) s = _select; } if (s) { - if (id > 0) { - --id; - } - if (s->eq_gain_controllable (id)) { - s->eq_gain_controllable (id)->set_value (s->eq_gain_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + if (s->filter_freq_controllable(false)) { + s->filter_freq_controllable(false)->set_value (s->filter_freq_controllable(false)->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("eq_gain", id + 1, 0, get_address (msg)); + return float_message("/select/eq_lpf/freq", 0, get_address (msg)); } int -OSC::sel_eq_freq (int id, float val, lo_message msg) +OSC::sel_eq_hpf_enable (float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -3035,19 +5020,16 @@ OSC::sel_eq_freq (int id, float val, lo_message msg) s = _select; } if (s) { - if (id > 0) { - --id; - } - if (s->eq_freq_controllable (id)) { - s->eq_freq_controllable (id)->set_value (s->eq_freq_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + if (s->filter_enable_controllable(true)) { + s->filter_enable_controllable(true)->set_value (s->filter_enable_controllable(true)->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("eq_freq", id + 1, 0, get_address (msg)); + return float_message("/select/eq_hpf/enable", 0, get_address (msg)); } int -OSC::sel_eq_q (int id, float val, lo_message msg) +OSC::sel_eq_lpf_enable (float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -3057,19 +5039,16 @@ OSC::sel_eq_q (int id, float val, lo_message msg) s = _select; } if (s) { - if (id > 0) { - --id; - } - if (s->eq_q_controllable (id)) { - s->eq_q_controllable (id)->set_value (s->eq_q_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + if (s->filter_enable_controllable(false)) { + s->filter_enable_controllable(false)->set_value (s->filter_enable_controllable(false)->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("eq_q", id + 1, 0, get_address (msg)); + return float_message("/select/eq_lpf/enable", 0, get_address (msg)); } int -OSC::sel_eq_shape (int id, float val, lo_message msg) +OSC::sel_eq_hpf_slope (float val, lo_message msg) { OSCSurface *sur = get_surface(get_address (msg)); boost::shared_ptr s; @@ -3079,45 +5058,134 @@ OSC::sel_eq_shape (int id, float val, lo_message msg) s = _select; } if (s) { - if (id > 0) { - --id; - } - if (s->eq_shape_controllable (id)) { - s->eq_shape_controllable (id)->set_value (s->eq_shape_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + if (s->filter_slope_controllable(true)) { + s->filter_slope_controllable(true)->set_value (s->filter_slope_controllable(true)->interface_to_internal (val), PBD::Controllable::NoGroup); return 0; } } - return sel_send_fail ("eq_shape", id + 1, 0, get_address (msg)); + return float_message("/select/eq_hpf/slope", 0, get_address (msg)); } -void -OSC::gui_selection_changed () +int +OSC::sel_eq_lpf_slope (float val, lo_message msg) { - boost::shared_ptr strip = ControlProtocol::first_selected_stripable(); - - if (strip) { - _select = strip; - for (uint32_t it = 0; it < _surface.size(); ++it) { - OSCSurface* sur = &_surface[it]; - if(!sur->expand_enable) { - lo_address addr = lo_address_new_from_url (sur->remote_url.c_str()); - _strip_select (strip, addr); - } + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (s->filter_slope_controllable(false)) { + s->filter_slope_controllable(false)->set_value (s->filter_slope_controllable(false)->interface_to_internal (val), PBD::Controllable::NoGroup); + return 0; } } + return float_message("/select/eq_lpf/slope", 0, get_address (msg)); } -// timer callbacks +int +OSC::sel_eq_gain (int id, float val, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (id > 0) { + --id; + } + if (s->eq_gain_controllable (id)) { + s->eq_gain_controllable (id)->set_value (s->eq_gain_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + return 0; + } + } + return float_message_with_id ("/select/eq_gain", id + 1, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::sel_eq_freq (int id, float val, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (id > 0) { + --id; + } + if (s->eq_freq_controllable (id)) { + s->eq_freq_controllable (id)->set_value (s->eq_freq_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + return 0; + } + } + return float_message_with_id ("/select/eq_freq", id + 1, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::sel_eq_q (int id, float val, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (id > 0) { + --id; + } + if (s->eq_q_controllable (id)) { + s->eq_q_controllable (id)->set_value (s->eq_q_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + return 0; + } + } + return float_message_with_id ("/select/eq_q", id + 1, 0, sur->feedback[2], get_address (msg)); +} + +int +OSC::sel_eq_shape (int id, float val, lo_message msg) +{ + OSCSurface *sur = get_surface(get_address (msg)); + boost::shared_ptr s; + if (sur->expand_enable) { + s = get_strip (sur->expand, get_address (msg)); + } else { + s = _select; + } + if (s) { + if (id > 0) { + --id; + } + if (s->eq_shape_controllable (id)) { + s->eq_shape_controllable (id)->set_value (s->eq_shape_controllable(id)->interface_to_internal (val), PBD::Controllable::NoGroup); + return 0; + } + } + return float_message_with_id ("/select/eq_shape", id + 1, 0, sur->feedback[2], get_address (msg)); +} + +// timer callbacks bool OSC::periodic (void) { + if (observer_busy) { + return true; + } if (!tick) { Glib::usleep(100); // let flurry of signals subside if (global_init) { for (uint32_t it = 0; it < _surface.size(); it++) { OSCSurface* sur = &_surface[it]; - lo_address addr = lo_address_new_from_url (sur->remote_url.c_str()); - global_feedback (sur->feedback, addr, sur->gainmode); + global_feedback (sur); } global_init = false; tick = true; @@ -3127,131 +5195,69 @@ OSC::periodic (void) bank_dirty = false; tick = true; } - } - - for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end(); x++) { - - OSCGlobalObserver* go; - - if ((go = dynamic_cast(*x)) != 0) { - go->tick(); - } - } - for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); x++) { - - OSCRouteObserver* ro; - - if ((ro = dynamic_cast(*x)) != 0) { - ro->tick(); + return true; + } + + if (scrub_speed != 0) { + // for those jog wheels that don't have 0 on release (touch), time out. + int64_t now = ARDOUR::get_microseconds (); + int64_t diff = now - scrub_time; + if (diff > 120000) { + scrub_speed = 0; + session->request_transport_speed (0); + // locate to the place PH was at last tick + session->request_locate (scrub_place, false); } } for (uint32_t it = 0; it < _surface.size(); it++) { OSCSurface* sur = &_surface[it]; OSCSelectObserver* so; if ((so = dynamic_cast(sur->sel_obs)) != 0) { - so->tick(); + so->tick (); } - } - return true; -} - -int -OSC::route_send_fail (string path, uint32_t ssid, float val, lo_address addr) -{ - OSCSurface *sur = get_surface(addr); - - ostringstream os; - lo_message reply; - if (ssid) { - reply = lo_message_new (); - if (sur->feedback[2]) { - os << "/strip/" << path << "/" << ssid; - } else { - os << "/strip/" << path; - lo_message_add_int32 (reply, ssid); + OSCCueObserver* co; + if ((co = dynamic_cast(sur->cue_obs)) != 0) { + co->tick (); + } + OSCGlobalObserver* go; + if ((go = dynamic_cast(sur->global_obs)) != 0) { + go->tick (); + } + for (uint32_t i = 0; i < sur->observers.size(); i++) { + OSCRouteObserver* ro; + if ((ro = dynamic_cast(sur->observers[i])) != 0) { + ro->tick (); + } } - string str_pth = os.str(); - lo_message_add_float (reply, (float) val); - lo_send_message (addr, str_pth.c_str(), reply); - lo_message_free (reply); } - if ((_select == get_strip (ssid, addr)) || ((sur->expand == ssid) && (sur->expand_enable))) { - os.str(""); - os << "/select/" << path; - string sel_pth = os.str(); - reply = lo_message_new (); - lo_message_add_float (reply, (float) val); - lo_send_message (addr, sel_pth.c_str(), reply); - lo_message_free (reply); - } - - return 0; -} - -int -OSC::sel_fail (string path, float val, lo_address addr) -{ - ostringstream os; - os.str(""); - os << "/select/" << path; - string sel_pth = os.str(); - lo_message reply = lo_message_new (); - lo_message_add_float (reply, (float) val); - lo_send_message (addr, sel_pth.c_str(), reply); - lo_message_free (reply); - - return 0; -} - -int -OSC::sel_send_fail (string path, uint32_t id, float val, lo_address addr) -{ - OSCSurface *sur = get_surface(addr); - - ostringstream os; - lo_message reply; - reply = lo_message_new (); - if (sur->feedback[2]) { - os << "/select/" << path << "/" << id; - } else { - os << "/select/" << path; - lo_message_add_int32 (reply, id); + for (FakeTouchMap::iterator x = _touch_timeout.begin(); x != _touch_timeout.end();) { + _touch_timeout[(*x).first] = (*x).second - 1; + if (!(*x).second) { + boost::shared_ptr ctrl = (*x).first; + // turn touch off + ctrl->stop_touch (ctrl->session().transport_sample()); + _touch_timeout.erase (x++); + } else { + x++; + } } - string str_pth = os.str(); - lo_message_add_float (reply, (float) val); - - lo_send_message (addr, str_pth.c_str(), reply); - lo_message_free (reply); - - return 0; + return true; } XMLNode& OSC::get_state () { XMLNode& node (ControlProtocol::get_state()); - node.add_property("debugmode", (int) _debugmode); // TODO: enum2str - node.add_property ("address-only", address_only); - node.add_property ("remote-port", remote_port); - node.add_property ("banksize", default_banksize); - node.add_property ("striptypes", default_strip); - node.add_property ("feedback", default_feedback); - node.add_property ("gainmode", default_gainmode); - if (_surface.size()) { - XMLNode* config = new XMLNode (X_("Configurations")); - for (uint32_t it = 0; it < _surface.size(); ++it) { - OSCSurface* sur = &_surface[it]; - XMLNode* devnode = new XMLNode (X_("Configuration")); - devnode->add_property (X_("url"), sur->remote_url); - devnode->add_property (X_("bank-size"), sur->bank_size); - devnode->add_property (X_("strip-types"), sur->strip_types.to_ulong()); - devnode->add_property (X_("feedback"), sur->feedback.to_ulong()); - devnode->add_property (X_("gainmode"), sur->gainmode); - config->add_child_nocopy (*devnode); - } - node.add_child_nocopy (*config); - } + node.set_property ("debugmode", (int32_t) _debugmode); // TODO: enum2str + node.set_property ("address-only", address_only); + node.set_property ("remote-port", remote_port); + node.set_property ("banksize", default_banksize); + node.set_property ("striptypes", default_strip); + node.set_property ("feedback", default_feedback); + node.set_property ("gainmode", default_gainmode); + node.set_property ("send-page-size", default_send_size); + node.set_property ("plug-page-size", default_plugin_size); return node; } @@ -3261,70 +5267,20 @@ OSC::set_state (const XMLNode& node, int version) if (ControlProtocol::set_state (node, version)) { return -1; } - XMLProperty const * p = node.property (X_("debugmode")); - if (p) { - _debugmode = OSCDebugMode (PBD::atoi(p->value ())); - } - p = node.property (X_("address-only")); - if (p) { - address_only = OSCDebugMode (PBD::atoi(p->value ())); - } - p = node.property (X_("remote-port")); - if (p) { - remote_port = p->value (); - } - p = node.property (X_("banksize")); - if (p) { - default_banksize = OSCDebugMode (PBD::atoi(p->value ())); - } - p = node.property (X_("striptypes")); - if (p) { - default_strip = OSCDebugMode (PBD::atoi(p->value ())); - } - p = node.property (X_("feedback")); - if (p) { - default_feedback = OSCDebugMode (PBD::atoi(p->value ())); - } - p = node.property (X_("gainmode")); - if (p) { - default_gainmode = OSCDebugMode (PBD::atoi(p->value ())); - } - XMLNode* cnode = node.child (X_("Configurations")); - - if (cnode) { - XMLNodeList const& devices = cnode->children(); - for (XMLNodeList::const_iterator d = devices.begin(); d != devices.end(); ++d) { - XMLProperty const * prop = (*d)->property (X_("url")); - if (prop) { - OSCSurface s; - bank_dirty = true; - s.remote_url = prop->value(); - prop = (*d)->property (X_("bank-size")); - if (prop) { - s.bank_size = atoi (prop->value().c_str()); - } - prop = (*d)->property (X_("strip-types")); - if (prop) { - s.strip_types = atoi (prop->value().c_str()); - } - prop = (*d)->property (X_("feedback")); - if (prop) { - s.feedback = atoi (prop->value().c_str()); - } - prop = (*d)->property (X_("gainmode")); - if (prop) { - s.gainmode = atoi (prop->value().c_str()); - } - s.bank = 1; - s.sel_obs = 0; - s.expand = 0; - s.expand_enable = false; - s.strips = get_sorted_stripables(s.strip_types); - s.nstrips = s.strips.size(); - _surface.push_back (s); - } - } + int32_t debugmode; + if (node.get_property (X_("debugmode"), debugmode)) { + _debugmode = OSCDebugMode (debugmode); } + + node.get_property (X_("address-only"), address_only); + node.get_property (X_("remote-port"), remote_port); + node.get_property (X_("banksize"), default_banksize); + node.get_property (X_("striptypes"), default_strip); + node.get_property (X_("feedback"), default_feedback); + node.get_property (X_("gainmode"), default_gainmode); + node.get_property (X_("send-page-size"), default_send_size); + node.get_property (X_("plugin-page-size"), default_plugin_size); + global_init = true; tick = false; @@ -3351,57 +5307,81 @@ struct StripableByPresentationOrder }; OSC::Sorted -OSC::get_sorted_stripables(std::bitset<32> types) +OSC::get_sorted_stripables(std::bitset<32> types, bool cue, bool custom, Sorted my_list) { Sorted sorted; - - // fetch all stripables StripableList stripables; + // fetch all stripables session->get_stripables (stripables); + if (custom) { + uint32_t nstps = my_list.size (); + boost::shared_ptr s; + for (uint32_t i = 0; i < nstps; i++) { + bool exists = false; + s = my_list[i]; + for (StripableList::iterator it = stripables.begin(); it != stripables.end(); ++it) { + boost::shared_ptr sl = *it; + if (s == sl) { + exists = true; + break; + } + } + if(!exists) { + my_list[i] = boost::shared_ptr(); + } + } + return my_list; + } // Look for stripables that match bit in sur->strip_types for (StripableList::iterator it = stripables.begin(); it != stripables.end(); ++it) { boost::shared_ptr s = *it; - if ((!types[9]) && (s->presentation_info().flags() & PresentationInfo::Hidden)) { + if ((!cue) && (!types[9]) && (s->presentation_info().flags() & PresentationInfo::Hidden)) { // do nothing... skip it + } else if (types[8] && (s->is_selected())) { + sorted.push_back (s); + } else if (types[9] && (s->presentation_info().flags() & PresentationInfo::Hidden)) { + sorted.push_back (s); + } else if (s->is_master() || s->is_monitor() || s->is_auditioner()) { + // do nothing for these either (we add them later) } else { - - if (types[0] && (s->presentation_info().flags() & PresentationInfo::AudioTrack)) { + if (types[0] && boost::dynamic_pointer_cast(s)) { sorted.push_back (s); - } else - if (types[1] && (s->presentation_info().flags() & PresentationInfo::MidiTrack)) { + } else if (types[1] && boost::dynamic_pointer_cast(s)) { sorted.push_back (s); - } else -/* if (types[2] && (s->presentation_info().flags() & PresentationInfo::AudioBus)) { - sorted.push_back (s); */ - if ((s->presentation_info().flags() & PresentationInfo::AudioBus)) { - boost::shared_ptr r = boost::dynamic_pointer_cast (s); - // r->feeds (session->master_out()) may make more sense - if (r->direct_feeds_according_to_reality (session->master_out())) { - // this is a bus - if (types[2]) { - sorted.push_back (s); - } - } else { - // this is an Aux out - if (types[7]) { - sorted.push_back (s); - } - } - } else - if (types[3] && (s->presentation_info().flags() & PresentationInfo::MidiBus)) { + } else if (types[4] && boost::dynamic_pointer_cast(s)) { sorted.push_back (s); } else - if (types[4] && (s->presentation_info().flags() & PresentationInfo::VCA)) { +#ifdef MIXBUS + if (types[2] && Profile->get_mixbus() && s->mixbus()) { sorted.push_back (s); } else - if (types[8] && (s->presentation_info().flags() & PresentationInfo::Selected)) { - sorted.push_back (s); + if (types[7] && boost::dynamic_pointer_cast(s) && !boost::dynamic_pointer_cast(s)) { + if (Profile->get_mixbus() && !s->mixbus()) { + sorted.push_back (s); + } } else - if (types[9] && (s->presentation_info().flags() & PresentationInfo::Hidden)) { - sorted.push_back (s); +#endif + if ((types[2] || types[3] || types[7]) && boost::dynamic_pointer_cast(s) && !boost::dynamic_pointer_cast(s)) { + boost::shared_ptr r = boost::dynamic_pointer_cast(s); + if (!(s->presentation_info().flags() & PresentationInfo::MidiBus)) { + // note some older sessions will show midibuses as busses + if (r->direct_feeds_according_to_reality (session->master_out())) { + // this is a bus + if (types[2]) { + sorted.push_back (s); + } + } else { + // this is an Aux out + if (types[7]) { + sorted.push_back (s); + } + } + } else if (types[3]) { + sorted.push_back (s); + } } } } @@ -3411,8 +5391,375 @@ OSC::get_sorted_stripables(std::bitset<32> types) sorted.push_back (session->master_out()); } if (types[6]) { - sorted.push_back (session->monitor_out()); + if (session->monitor_out()) { + sorted.push_back (session->monitor_out()); + } + } + return sorted; +} + +int +OSC::cue_parse (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg), true); + s->bank_size = 0; + float value = 0; + if (argc == 1) { + if (types[0] == 'f') { + value = argv[0]->f; + } else if (types[0] == 'i') { + value = (float) argv[0]->i; + } } + int ret = 1; /* unhandled */ + if (!strncmp (path, "/cue/aux", 8)) { + // set our Aux bus + if (argc) { + if (value) { + ret = cue_set ((uint32_t) value, msg); + } else { + ret = 0; + } + } + } + else if (!strncmp (path, "/cue/connect", 12)) { + // Connect to default Aux bus + if ((!argc) || argv[0]->f || argv[0]->i) { + ret = cue_set (1, msg); + } else { + ret = 0; + } + } + else if (!strncmp (path, "/cue/next_aux", 13)) { + // switch to next Aux bus + if ((!argc) || argv[0]->f || argv[0]->i) { + ret = cue_next (msg); + } else { + ret = 0; + } + } + else if (!strncmp (path, "/cue/previous_aux", 17)) { + // switch to previous Aux bus + if ((!argc) || argv[0]->f || argv[0]->i) { + ret = cue_previous (msg); + } else { + ret = 0; + } + } + else if (!strncmp (path, "/cue/send/fader/", 16) && strlen (path) > 16) { + if (argc == 1) { + int id = atoi (&path[16]); + ret = cue_send_fader (id, value, msg); + } + } + else if (!strncmp (path, "/cue/send/enable/", 17) && strlen (path) > 17) { + if (argc == 1) { + int id = atoi (&path[17]); + ret = cue_send_enable (id, value, msg); + } + } + else if (!strncmp (path, "/cue/fader", 10)) { + if (argc == 1) { + ret = cue_aux_fader (value, msg); + } + } + else if (!strncmp (path, "/cue/mute", 9)) { + if (argc == 1) { + ret = cue_aux_mute (value, msg); + } + } + + return ret; +} + +int +OSC::cue_set (uint32_t aux, lo_message msg) +{ + + return _cue_set (aux, get_address (msg)); +} + +int +OSC::_cue_set (uint32_t aux, lo_address addr) +{ + int ret = 1; + OSCSurface *s = get_surface(addr, true); + s->bank_size = 0; + s->strip_types = 128; + s->feedback = 0; + s->gainmode = 1; + s->cue = true; + s->strips = get_sorted_stripables(s->strip_types, s->cue, false, s->custom_strips); + + s->nstrips = s->strips.size(); + + if (aux < 1) { + aux = 1; + } else if (aux > s->nstrips) { + aux = s->nstrips; + } + s->aux = aux; + // get a list of Auxes + for (uint32_t n = 0; n < s->nstrips; ++n) { + boost::shared_ptr stp = s->strips[n]; + if (stp) { + text_message (string_compose ("/cue/name/%1", n+1), stp->name(), addr); + if (aux == n+1) { + // aux must be at least one + + stp->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::_cue_set, this, aux, addr), this); + // make a list of stripables with sends that go to this bus + s->sends = cue_get_sorted_stripables(stp, aux, addr); + if (s->cue_obs) { + s->cue_obs->refresh_strip (stp, s->sends, true); + } else { + // start cue observer + OSCCueObserver* co = new OSCCueObserver (*this, s); + s->cue_obs = co; + } + ret = 0; + } + + } + } + + return ret; +} + +int +OSC::cue_next (lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg), true); + int ret = 1; + + if (!s->cue) { + ret = cue_set (1, msg); + } + if (s->aux < s->nstrips) { + ret = cue_set (s->aux + 1, msg); + } else { + ret = cue_set (s->nstrips, msg); + } + return ret; +} + +int +OSC::cue_previous (lo_message msg) +{ + OSCSurface *s = get_surface(get_address (msg), true); + int ret = 1; + if (!s->cue) { + ret = cue_set (1, msg); + } + if (s->aux > 1) { + ret = cue_set (s->aux - 1, msg); + } else { + ret = cue_set (1, msg); + } + return ret; +} + +boost::shared_ptr +OSC::cue_get_send (uint32_t id, lo_address addr) +{ + OSCSurface *s = get_surface(addr, true); + if (id && s->aux > 0 && id <= s->sends.size()) { + boost::shared_ptr r = boost::dynamic_pointer_cast (s->sends[id - 1]); + boost::shared_ptr aux = get_strip (s->aux, addr); + if (r && aux) { + return r->internal_send_for (boost::dynamic_pointer_cast (aux)); + } + } + return boost::shared_ptr(); + +} + +int +OSC::cue_aux_fader (float position, lo_message msg) +{ + if (!session) return -1; + + OSCSurface *sur = get_surface(get_address (msg), true); + if (sur->cue) { + if (sur->aux) { + boost::shared_ptr s = get_strip (sur->aux, get_address (msg)); + + if (s) { + if (s->gain_control()) { + s->gain_control()->set_value (s->gain_control()->interface_to_internal (position), PBD::Controllable::NoGroup); + return 0; + } + } + } + } + float_message ("/cue/fader", 0, get_address (msg)); + return -1; +} + +int +OSC::cue_aux_mute (float state, lo_message msg) +{ + if (!session) return -1; + + OSCSurface *sur = get_surface(get_address (msg), true); + if (sur->cue) { + if (sur->aux) { + boost::shared_ptr s = get_strip (sur->aux, get_address (msg)); + if (s) { + if (s->mute_control()) { + s->mute_control()->set_value (state ? 1.0 : 0.0, PBD::Controllable::NoGroup); + return 0; + } + } + } + } + float_message ("/cue/mute", 0, get_address (msg)); + return -1; +} + +int +OSC::cue_send_fader (uint32_t id, float val, lo_message msg) +{ + if (!session) { + return -1; + } + boost::shared_ptr s = cue_get_send (id, get_address (msg)); + if (s) { + if (s->gain_control()) { + s->gain_control()->set_value (s->gain_control()->interface_to_internal(val), PBD::Controllable::NoGroup); + return 0; + } + } + float_message (string_compose ("/cue/send/fader/%1", id), 0, get_address (msg)); + return -1; +} + +int +OSC::cue_send_enable (uint32_t id, float state, lo_message msg) +{ + if (!session) + return -1; + boost::shared_ptr s = cue_get_send (id, get_address (msg)); + if (s) { + if (state) { + s->activate (); + } else { + s->deactivate (); + } + return 0; + } + float_message (string_compose ("/cue/send/enable/%1", id), 0, get_address (msg)); + return -1; +} + +// generic send message +int +OSC::float_message (string path, float val, lo_address addr) +{ + + lo_message reply; + reply = lo_message_new (); + lo_message_add_float (reply, (float) val); + + lo_send_message (addr, path.c_str(), reply); + lo_message_free (reply); + + return 0; +} + +int +OSC::float_message_with_id (std::string path, uint32_t ssid, float value, bool in_line, lo_address addr) +{ + lo_message msg = lo_message_new (); + if (in_line) { + path = string_compose ("%1/%2", path, ssid); + } else { + lo_message_add_int32 (msg, ssid); + } + lo_message_add_float (msg, value); + + lo_send_message (addr, path.c_str(), msg); + lo_message_free (msg); + return 0; +} + +int +OSC::int_message_with_id (std::string path, uint32_t ssid, int value, bool in_line, lo_address addr) +{ + lo_message msg = lo_message_new (); + if (in_line) { + path = string_compose ("%1/%2", path, ssid); + } else { + lo_message_add_int32 (msg, ssid); + } + lo_message_add_int32 (msg, value); + + lo_send_message (addr, path.c_str(), msg); + lo_message_free (msg); + return 0; +} + +int +OSC::text_message (string path, string val, lo_address addr) +{ + + lo_message reply; + reply = lo_message_new (); + lo_message_add_string (reply, val.c_str()); + + lo_send_message (addr, path.c_str(), reply); + lo_message_free (reply); + + return 0; +} + +int +OSC::text_message_with_id (std::string path, uint32_t ssid, std::string val, bool in_line, lo_address addr) +{ + lo_message msg = lo_message_new (); + if (in_line) { + path = string_compose ("%1/%2", path, ssid); + } else { + lo_message_add_int32 (msg, ssid); + } + + lo_message_add_string (msg, val.c_str()); + + lo_send_message (addr, path.c_str(), msg); + lo_message_free (msg); + return 0; +} + +// we have to have a sorted list of stripables that have sends pointed at our aux +// we can use the one in osc.cc to get an aux list +OSC::Sorted +OSC::cue_get_sorted_stripables(boost::shared_ptr aux, uint32_t id, lo_message msg) +{ + Sorted sorted; + // fetch all stripables + StripableList stripables; + + session->get_stripables (stripables); + + // Look for stripables that have a send to aux + for (StripableList::iterator it = stripables.begin(); it != stripables.end(); ++it) { + + boost::shared_ptr s = *it; + // we only want routes + boost::shared_ptr r = boost::dynamic_pointer_cast (s); + if (r) { + r->processors_changed.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this); + boost::shared_ptr snd = r->internal_send_for (boost::dynamic_pointer_cast (aux)); + if (snd) { // test for send to aux + sorted.push_back (s); + s->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::cue_set, this, id, msg), this); + } + } + + + } + sort (sorted.begin(), sorted.end(), StripableByPresentationOrder()); + return sorted; }