2 * Copyright (C) 2006 Paul Davis
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
28 #include "pbd/gstdio_compat.h"
29 #include <glibmm/miscutils.h>
31 #include <pbd/convert.h>
32 #include <pbd/pthread_utils.h>
33 #include <pbd/file_utils.h>
34 #include <pbd/failed_constructor.h>
36 #include "ardour/amp.h"
37 #include "ardour/session.h"
38 #include "ardour/route.h"
39 #include "ardour/audio_track.h"
40 #include "ardour/midi_track.h"
41 #include "ardour/monitor_control.h"
42 #include "ardour/dB.h"
43 #include "ardour/filesystem_paths.h"
44 #include "ardour/panner.h"
45 #include "ardour/plugin.h"
46 #include "ardour/plugin_insert.h"
47 #include "ardour/presentation_info.h"
48 #include "ardour/send.h"
49 #include "ardour/phase_control.h"
50 #include "ardour/solo_isolate_control.h"
51 #include "ardour/solo_safe_control.h"
53 #include "osc_select_observer.h"
55 #include "osc_controllable.h"
56 #include "osc_route_observer.h"
57 #include "osc_global_observer.h"
60 using namespace ARDOUR;
63 using namespace ArdourSurface;
65 #include "pbd/abstract_ui.cc" // instantiate template
67 OSC* OSC::_instance = 0;
70 static void error_callback(int num, const char *m, const char *path)
72 fprintf(stderr, "liblo server error %d in path %s: %s\n", num, path, m);
75 static void error_callback(int, const char *, const char *)
81 OSC::OSC (Session& s, uint32_t port)
82 : ControlProtocol (s, X_("Open Sound Control (OSC)"))
83 , AbstractUI<OSCUIRequest> (name())
90 , _osc_unix_server (0)
91 , _send_route_changes (true)
97 session->Exported.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::session_exported, this, _1, _2), this);
107 OSC::request_factory (uint32_t num_requests)
109 /* AbstractUI<T>::request_buffer_factory() is a template method only
110 instantiated in this source module. To provide something visible for
111 use in the interface/descriptor, we have this static method that is
114 return request_buffer_factory (num_requests);
118 OSC::do_request (OSCUIRequest* req)
120 if (req->type == CallSlot) {
122 call_slot (MISSING_INVALIDATOR, req->the_slot);
124 } else if (req->type == Quit) {
131 OSC::set_active (bool yn)
133 if (yn != active()) {
147 return ControlProtocol::set_active (yn);
151 OSC::get_active () const
153 return _osc_server != 0;
157 OSC::set_feedback (bool yn)
159 _send_route_changes = yn;
164 OSC::get_feedback () const
166 return _send_route_changes;
175 /* already started */
179 for (int j=0; j < 20; ++j) {
180 snprintf(tmpstr, sizeof(tmpstr), "%d", _port);
182 //if ((_osc_server = lo_server_new_with_proto (tmpstr, LO_TCP, error_callback))) {
186 if ((_osc_server = lo_server_new (tmpstr, error_callback))) {
191 cerr << "can't get osc at port: " << _port << endl;
201 #ifdef ARDOUR_OSC_UNIX_SERVER
203 // APPEARS sluggish for now
205 // attempt to create unix socket server too
207 snprintf(tmpstr, sizeof(tmpstr), "/tmp/sooperlooper_XXXXXX");
208 int fd = mkstemp(tmpstr);
214 _osc_unix_server = lo_server_new (tmpstr, error_callback);
216 if (_osc_unix_server) {
217 _osc_unix_socket_path = tmpstr;
222 PBD::info << "OSC @ " << get_server_url () << endmsg;
224 std::string url_file;
226 if (find_file (ardour_config_search_path(), "osc_url", url_file)) {
227 _osc_url_file = url_file;
228 if (g_file_set_contents (_osc_url_file.c_str(), get_server_url().c_str(), -1, NULL)) {
229 cerr << "Couldn't write '" << _osc_url_file << "'" <<endl;
233 register_callbacks();
235 session_loaded (*session);
237 // lo_server_thread_add_method(_sthread, NULL, NULL, OSC::_dummy_handler, this);
239 /* startup the event loop thread */
243 // start timers for metering, timecode and heartbeat.
244 // timecode and metering run at 100
245 Glib::RefPtr<Glib::TimeoutSource> periodic_timeout = Glib::TimeoutSource::create (100); // milliseconds
246 periodic_connection = periodic_timeout->connect (sigc::mem_fun (*this, &OSC::periodic));
247 periodic_timeout->attach (main_loop()->get_context());
249 StripableSelectionChanged.connect (session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::gui_selection_changed, this, _1), this);
257 pthread_set_name (event_loop_name().c_str());
259 if (_osc_unix_server) {
260 Glib::RefPtr<IOSource> src = IOSource::create (lo_server_get_socket_fd (_osc_unix_server), IO_IN|IO_HUP|IO_ERR);
261 src->connect (sigc::bind (sigc::mem_fun (*this, &OSC::osc_input_handler), _osc_unix_server));
262 src->attach (_main_loop->get_context());
263 local_server = src->gobj();
264 g_source_ref (local_server);
268 #ifdef PLATFORM_WINDOWS
269 Glib::RefPtr<IOChannel> chan = Glib::IOChannel::create_from_win32_socket (lo_server_get_socket_fd (_osc_server));
270 Glib::RefPtr<IOSource> src = IOSource::create (chan, IO_IN|IO_HUP|IO_ERR);
272 Glib::RefPtr<IOSource> src = IOSource::create (lo_server_get_socket_fd (_osc_server), IO_IN|IO_HUP|IO_ERR);
274 src->connect (sigc::bind (sigc::mem_fun (*this, &OSC::osc_input_handler), _osc_server));
275 src->attach (_main_loop->get_context());
276 remote_server = src->gobj();
277 g_source_ref (remote_server);
280 PBD::notify_event_loops_about_thread_creation (pthread_self(), event_loop_name(), 2048);
281 SessionEvent::create_per_thread_pool (event_loop_name(), 128);
290 g_source_destroy (local_server);
291 g_source_unref (local_server);
296 g_source_destroy (remote_server);
297 g_source_unref (remote_server);
304 lo_server_free (_osc_server);
308 if (_osc_unix_server) {
309 lo_server_free (_osc_unix_server);
310 _osc_unix_server = 0;
313 if (!_osc_unix_socket_path.empty()) {
314 ::g_unlink (_osc_unix_socket_path.c_str());
317 if (!_osc_url_file.empty() ) {
318 ::g_unlink (_osc_url_file.c_str() );
321 periodic_connection.disconnect ();
322 session_connections.drop_connections ();
323 // Delete any active route observers
324 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) {
326 OSCRouteObserver* rc;
328 if ((rc = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
330 x = route_observers.erase (x);
335 // Should maybe do global_observers too
336 for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end();) {
338 OSCGlobalObserver* gc;
340 if ((gc = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
342 x = global_observers.erase (x);
347 // delete select observers
348 for (uint32_t it = 0; it < _surface.size(); ++it) {
349 OSCSurface* sur = &_surface[it];
350 OSCSelectObserver* so;
351 if ((so = dynamic_cast<OSCSelectObserver*>(sur->sel_obs)) != 0) {
360 OSC::register_callbacks()
365 srvs[0] = _osc_server;
366 srvs[1] = _osc_unix_server;
368 for (size_t i = 0; i < 2; ++i) {
377 #define REGISTER_CALLBACK(serv,path,types, function) lo_server_add_method (serv, path, types, OSC::_ ## function, this)
379 // Some controls have optional "f" for feedback or touchosc
380 // http://hexler.net/docs/touchosc-controls-reference
382 REGISTER_CALLBACK (serv, "/set_surface", "iiii", set_surface);
383 REGISTER_CALLBACK (serv, "/set_surface/feedback", "i", set_surface_feedback);
384 REGISTER_CALLBACK (serv, "/set_surface/bank_size", "i", set_surface_bank_size);
385 REGISTER_CALLBACK (serv, "/set_surface/gainmode", "i", set_surface_gainmode);
386 REGISTER_CALLBACK (serv, "/set_surface/strip_types", "i", set_surface_strip_types);
387 REGISTER_CALLBACK (serv, "/strip/list", "", routes_list);
388 REGISTER_CALLBACK (serv, "/add_marker", "", add_marker);
389 REGISTER_CALLBACK (serv, "/add_marker", "f", add_marker);
390 REGISTER_CALLBACK (serv, "/access_action", "s", access_action);
391 REGISTER_CALLBACK (serv, "/loop_toggle", "", loop_toggle);
392 REGISTER_CALLBACK (serv, "/loop_toggle", "f", loop_toggle);
393 REGISTER_CALLBACK (serv, "/loop_location", "ii", loop_location);
394 REGISTER_CALLBACK (serv, "/goto_start", "", goto_start);
395 REGISTER_CALLBACK (serv, "/goto_start", "f", goto_start);
396 REGISTER_CALLBACK (serv, "/goto_end", "", goto_end);
397 REGISTER_CALLBACK (serv, "/goto_end", "f", goto_end);
398 REGISTER_CALLBACK (serv, "/rewind", "", rewind);
399 REGISTER_CALLBACK (serv, "/rewind", "f", rewind);
400 REGISTER_CALLBACK (serv, "/ffwd", "", ffwd);
401 REGISTER_CALLBACK (serv, "/ffwd", "f", ffwd);
402 REGISTER_CALLBACK (serv, "/transport_stop", "", transport_stop);
403 REGISTER_CALLBACK (serv, "/transport_stop", "f", transport_stop);
404 REGISTER_CALLBACK (serv, "/transport_play", "", transport_play);
405 REGISTER_CALLBACK (serv, "/transport_play", "f", transport_play);
406 REGISTER_CALLBACK (serv, "/transport_frame", "", transport_frame);
407 REGISTER_CALLBACK (serv, "/transport_speed", "", transport_speed);
408 REGISTER_CALLBACK (serv, "/record_enabled", "", record_enabled);
409 REGISTER_CALLBACK (serv, "/set_transport_speed", "f", set_transport_speed);
410 // locate ii is position and bool roll
411 REGISTER_CALLBACK (serv, "/locate", "ii", locate);
412 REGISTER_CALLBACK (serv, "/save_state", "", save_state);
413 REGISTER_CALLBACK (serv, "/save_state", "f", save_state);
414 REGISTER_CALLBACK (serv, "/prev_marker", "", prev_marker);
415 REGISTER_CALLBACK (serv, "/prev_marker", "f", prev_marker);
416 REGISTER_CALLBACK (serv, "/next_marker", "", next_marker);
417 REGISTER_CALLBACK (serv, "/next_marker", "f", next_marker);
418 REGISTER_CALLBACK (serv, "/undo", "", undo);
419 REGISTER_CALLBACK (serv, "/undo", "f", undo);
420 REGISTER_CALLBACK (serv, "/redo", "", redo);
421 REGISTER_CALLBACK (serv, "/redo", "f", redo);
422 REGISTER_CALLBACK (serv, "/toggle_punch_in", "", toggle_punch_in);
423 REGISTER_CALLBACK (serv, "/toggle_punch_in", "f", toggle_punch_in);
424 REGISTER_CALLBACK (serv, "/toggle_punch_out", "", toggle_punch_out);
425 REGISTER_CALLBACK (serv, "/toggle_punch_out", "f", toggle_punch_out);
426 REGISTER_CALLBACK (serv, "/rec_enable_toggle", "", rec_enable_toggle);
427 REGISTER_CALLBACK (serv, "/rec_enable_toggle", "f", rec_enable_toggle);
428 REGISTER_CALLBACK (serv, "/toggle_all_rec_enables", "", toggle_all_rec_enables);
429 REGISTER_CALLBACK (serv, "/toggle_all_rec_enables", "f", toggle_all_rec_enables);
430 REGISTER_CALLBACK (serv, "/all_tracks_rec_in", "f", all_tracks_rec_in);
431 REGISTER_CALLBACK (serv, "/all_tracks_rec_out", "f", all_tracks_rec_out);
432 REGISTER_CALLBACK (serv, "/remove_marker", "", remove_marker_at_playhead);
433 REGISTER_CALLBACK (serv, "/remove_marker", "f", remove_marker_at_playhead);
434 REGISTER_CALLBACK (serv, "/jump_bars", "f", jump_by_bars);
435 REGISTER_CALLBACK (serv, "/jump_seconds", "f", jump_by_seconds);
436 REGISTER_CALLBACK (serv, "/mark_in", "", mark_in);
437 REGISTER_CALLBACK (serv, "/mark_in", "f", mark_in);
438 REGISTER_CALLBACK (serv, "/mark_out", "", mark_out);
439 REGISTER_CALLBACK (serv, "/mark_out", "f", mark_out);
440 REGISTER_CALLBACK (serv, "/toggle_click", "", toggle_click);
441 REGISTER_CALLBACK (serv, "/toggle_click", "f", toggle_click);
442 REGISTER_CALLBACK (serv, "/midi_panic", "", midi_panic);
443 REGISTER_CALLBACK (serv, "/midi_panic", "f", midi_panic);
444 REGISTER_CALLBACK (serv, "/toggle_roll", "", toggle_roll);
445 REGISTER_CALLBACK (serv, "/toggle_roll", "f", toggle_roll);
446 REGISTER_CALLBACK (serv, "/stop_forget", "", stop_forget);
447 REGISTER_CALLBACK (serv, "/stop_forget", "f", stop_forget);
448 REGISTER_CALLBACK (serv, "/set_punch_range", "", set_punch_range);
449 REGISTER_CALLBACK (serv, "/set_punch_range", "f", set_punch_range);
450 REGISTER_CALLBACK (serv, "/set_loop_range", "", set_loop_range);
451 REGISTER_CALLBACK (serv, "/set_loop_range", "f", set_loop_range);
452 REGISTER_CALLBACK (serv, "/set_session_range", "", set_session_range);
453 REGISTER_CALLBACK (serv, "/set_session_range", "f", set_session_range);
454 // /toggle_monitor_* not working (comented out)
455 REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "", toggle_monitor_mute);
456 REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "f", toggle_monitor_mute);
457 REGISTER_CALLBACK (serv, "/toggle_monitor_dim", "", toggle_monitor_dim);
458 REGISTER_CALLBACK (serv, "/toggle_monitor_dim", "f", toggle_monitor_dim);
459 REGISTER_CALLBACK (serv, "/toggle_monitor_mono", "", toggle_monitor_mono);
460 REGISTER_CALLBACK (serv, "/toggle_monitor_mono", "f", toggle_monitor_mono);
461 REGISTER_CALLBACK (serv, "/quick_snapshot_switch", "", quick_snapshot_switch);
462 REGISTER_CALLBACK (serv, "/quick_snapshot_switch", "f", quick_snapshot_switch);
463 REGISTER_CALLBACK (serv, "/quick_snapshot_stay", "", quick_snapshot_stay);
464 REGISTER_CALLBACK (serv, "/quick_snapshot_stay", "f", quick_snapshot_stay);
465 REGISTER_CALLBACK (serv, "/fit_1_track", "", fit_1_track);
466 REGISTER_CALLBACK (serv, "/fit_1_track", "f", fit_1_track);
467 REGISTER_CALLBACK (serv, "/fit_2_tracks", "", fit_2_tracks);
468 REGISTER_CALLBACK (serv, "/fit_2_tracks", "f", fit_2_tracks);
469 REGISTER_CALLBACK (serv, "/fit_4_tracks", "", fit_4_tracks);
470 REGISTER_CALLBACK (serv, "/fit_4_tracks", "f", fit_4_tracks);
471 REGISTER_CALLBACK (serv, "/fit_8_tracks", "", fit_8_tracks);
472 REGISTER_CALLBACK (serv, "/fit_8_tracks", "f", fit_8_tracks);
473 REGISTER_CALLBACK (serv, "/fit_16_tracks", "", fit_16_tracks);
474 REGISTER_CALLBACK (serv, "/fit_16_tracks", "f", fit_16_tracks);
475 REGISTER_CALLBACK (serv, "/fit_32_tracks", "", fit_32_tracks);
476 REGISTER_CALLBACK (serv, "/fit_32_tracks", "f", fit_32_tracks);
477 REGISTER_CALLBACK (serv, "/fit_all_tracks", "", fit_all_tracks);
478 REGISTER_CALLBACK (serv, "/fit_all_tracks", "f", fit_all_tracks);
479 REGISTER_CALLBACK (serv, "/zoom_100_ms", "", zoom_100_ms);
480 REGISTER_CALLBACK (serv, "/zoom_100_ms", "f", zoom_100_ms);
481 REGISTER_CALLBACK (serv, "/zoom_1_sec", "", zoom_1_sec);
482 REGISTER_CALLBACK (serv, "/zoom_1_sec", "f", zoom_1_sec);
483 REGISTER_CALLBACK (serv, "/zoom_10_sec", "", zoom_10_sec);
484 REGISTER_CALLBACK (serv, "/zoom_10_sec", "f", zoom_10_sec);
485 REGISTER_CALLBACK (serv, "/zoom_1_min", "", zoom_1_min);
486 REGISTER_CALLBACK (serv, "/zoom_1_min", "f", zoom_1_min);
487 REGISTER_CALLBACK (serv, "/zoom_5_min", "", zoom_5_min);
488 REGISTER_CALLBACK (serv, "/zoom_5_min", "f", zoom_5_min);
489 REGISTER_CALLBACK (serv, "/zoom_10_min", "", zoom_10_min);
490 REGISTER_CALLBACK (serv, "/zoom_10_min", "f", zoom_10_min);
491 REGISTER_CALLBACK (serv, "/zoom_to_session", "", zoom_to_session);
492 REGISTER_CALLBACK (serv, "/zoom_to_session", "f", zoom_to_session);
493 REGISTER_CALLBACK (serv, "/temporal_zoom_in", "f", temporal_zoom_in);
494 REGISTER_CALLBACK (serv, "/temporal_zoom_in", "", temporal_zoom_in);
495 REGISTER_CALLBACK (serv, "/temporal_zoom_out", "", temporal_zoom_out);
496 REGISTER_CALLBACK (serv, "/temporal_zoom_out", "f", temporal_zoom_out);
497 REGISTER_CALLBACK (serv, "/scroll_up_1_track", "f", scroll_up_1_track);
498 REGISTER_CALLBACK (serv, "/scroll_up_1_track", "", scroll_up_1_track);
499 REGISTER_CALLBACK (serv, "/scroll_dn_1_track", "f", scroll_dn_1_track);
500 REGISTER_CALLBACK (serv, "/scroll_dn_1_track", "", scroll_dn_1_track);
501 REGISTER_CALLBACK (serv, "/scroll_up_1_page", "f", scroll_up_1_page);
502 REGISTER_CALLBACK (serv, "/scroll_up_1_page", "", scroll_up_1_page);
503 REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "f", scroll_dn_1_page);
504 REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "", scroll_dn_1_page);
505 REGISTER_CALLBACK (serv, "/bank_up", "", bank_up);
506 REGISTER_CALLBACK (serv, "/bank_up", "f", bank_up);
507 REGISTER_CALLBACK (serv, "/bank_down", "", bank_down);
508 REGISTER_CALLBACK (serv, "/bank_down", "f", bank_down);
510 // controls for "special" strips
511 REGISTER_CALLBACK (serv, "/master/gain", "f", master_set_gain);
512 REGISTER_CALLBACK (serv, "/master/fader", "i", master_set_fader);
513 REGISTER_CALLBACK (serv, "/master/mute", "i", master_set_mute);
514 REGISTER_CALLBACK (serv, "/master/trimdB", "f", master_set_trim);
515 REGISTER_CALLBACK (serv, "/master/pan_stereo_position", "f", master_set_pan_stereo_position);
516 REGISTER_CALLBACK (serv, "/monitor/gain", "f", monitor_set_gain);
517 REGISTER_CALLBACK (serv, "/monitor/fader", "i", monitor_set_fader);
519 // Controls for the Selected strip
520 REGISTER_CALLBACK (serv, "/select/recenable", "i", sel_recenable);
521 REGISTER_CALLBACK (serv, "/select/record_safe", "i", sel_recsafe);
522 REGISTER_CALLBACK (serv, "/select/mute", "i", sel_mute);
523 REGISTER_CALLBACK (serv, "/select/solo", "i", sel_solo);
524 REGISTER_CALLBACK (serv, "/select/solo_iso", "i", sel_solo_iso);
525 REGISTER_CALLBACK (serv, "/select/solo_safe", "i", sel_solo_safe);
526 REGISTER_CALLBACK (serv, "/select/monitor_input", "i", sel_monitor_input);
527 REGISTER_CALLBACK (serv, "/select/monitor_disk", "i", sel_monitor_disk);
528 REGISTER_CALLBACK (serv, "/select/polarity", "i", sel_phase);
529 REGISTER_CALLBACK (serv, "/select/gain", "f", sel_gain);
530 REGISTER_CALLBACK (serv, "/select/fader", "f", sel_fader);
531 REGISTER_CALLBACK (serv, "/select/trimdB", "f", sel_trim);
532 REGISTER_CALLBACK (serv, "/select/pan_stereo_position", "f", sel_pan_position);
533 REGISTER_CALLBACK (serv, "/select/pan_stereo_width", "f", sel_pan_width);
534 REGISTER_CALLBACK (serv, "/select/send_gain", "if", sel_sendgain);
535 REGISTER_CALLBACK (serv, "/select/send_fader", "if", sel_sendfader);
537 /* These commands require the route index in addition to the arg; TouchOSC (et al) can't use these */
538 REGISTER_CALLBACK (serv, "/strip/mute", "ii", route_mute);
539 REGISTER_CALLBACK (serv, "/strip/solo", "ii", route_solo);
540 REGISTER_CALLBACK (serv, "/strip/solo_iso", "ii", route_solo_iso);
541 REGISTER_CALLBACK (serv, "/strip/solo_safe", "ii", route_solo_safe);
542 REGISTER_CALLBACK (serv, "/strip/recenable", "ii", route_recenable);
543 REGISTER_CALLBACK (serv, "/strip/record_safe", "ii", route_recsafe);
544 REGISTER_CALLBACK (serv, "/strip/monitor_input", "ii", route_monitor_input);
545 REGISTER_CALLBACK (serv, "/strip/monitor_disk", "ii", route_monitor_disk);
546 REGISTER_CALLBACK (serv, "/strip/select", "ii", strip_select);
547 REGISTER_CALLBACK (serv, "/strip/gui_select", "ii", strip_gui_select);
548 REGISTER_CALLBACK (serv, "/strip/polarity", "ii", strip_phase);
549 REGISTER_CALLBACK (serv, "/strip/gain", "if", route_set_gain_dB);
550 REGISTER_CALLBACK (serv, "/strip/fader", "if", route_set_gain_fader);
551 REGISTER_CALLBACK (serv, "/strip/trimdB", "if", route_set_trim_dB);
552 REGISTER_CALLBACK (serv, "/strip/pan_stereo_position", "if", route_set_pan_stereo_position);
553 REGISTER_CALLBACK (serv, "/strip/pan_stereo_width", "if", route_set_pan_stereo_width);
554 REGISTER_CALLBACK (serv, "/strip/plugin/parameter", "iiif", route_plugin_parameter);
555 // prints to cerr only
556 REGISTER_CALLBACK (serv, "/strip/plugin/parameter/print", "iii", route_plugin_parameter_print);
557 REGISTER_CALLBACK (serv, "/strip/send/gainabs", "iif", route_set_send_gain_abs);
558 REGISTER_CALLBACK (serv, "/strip/send/gain", "iif", route_set_send_gain_dB);
559 REGISTER_CALLBACK (serv, "/strip/send/fader", "iif", route_set_send_fader);
561 /* still not-really-standardized query interface */
562 //REGISTER_CALLBACK (serv, "/ardour/*/#current_value", "", current_value);
563 //REGISTER_CALLBACK (serv, "/ardour/set", "", set);
565 // un/register_update args= s:ctrl s:returl s:retpath
566 //lo_server_add_method(serv, "/register_update", "sss", OSC::global_register_update_handler, this);
567 //lo_server_add_method(serv, "/unregister_update", "sss", OSC::global_unregister_update_handler, this);
568 //lo_server_add_method(serv, "/register_auto_update", "siss", OSC::global_register_auto_update_handler, this);
569 //lo_server_add_method(serv, "/unregister_auto_update", "sss", OSC::_global_unregister_auto_update_handler, this);
571 /* this is a special catchall handler,
572 * register at the end so this is only called if no
573 * other handler matches (used for debug) */
574 lo_server_add_method (serv, 0, 0, _catchall, this);
579 OSC::osc_input_handler (IOCondition ioc, lo_server srv)
586 lo_server_recv (srv);
593 OSC::get_server_url()
599 urlstr = lo_server_get_url (_osc_server);
608 OSC::get_unix_server_url()
613 if (_osc_unix_server) {
614 urlstr = lo_server_get_url (_osc_unix_server);
623 OSC::listen_to_route (boost::shared_ptr<Stripable> strip, lo_address addr)
625 /* avoid duplicate listens */
627 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); ++x) {
629 OSCRouteObserver* ro;
631 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
633 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr));
635 if (ro->strip() == strip && res == 0) {
641 OSCSurface *s = get_surface(addr);
642 uint32_t sid = get_sid (strip->presentation_info().order() + 1, addr);
643 // above is zero based add 1
644 OSCRouteObserver* o = new OSCRouteObserver (strip, addr, sid, s->gainmode, s->feedback);
645 route_observers.push_back (o);
647 strip->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::drop_route, this, boost::weak_ptr<Stripable> (strip)), this);
651 OSC::drop_route (boost::weak_ptr<Stripable> wr)
653 boost::shared_ptr<Stripable> r = wr.lock ();
659 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) {
661 OSCRouteObserver* rc;
663 if ((rc = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
665 if (rc->strip() == r) {
667 x = route_observers.erase (x);
678 OSC::end_listen (boost::shared_ptr<Stripable> r, lo_address addr)
680 RouteObservers::iterator x;
682 // Remove the route observers
683 for (x = route_observers.begin(); x != route_observers.end();) {
685 OSCRouteObserver* ro;
687 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
689 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr));
691 if (ro->strip() == r && res == 0) {
693 x = route_observers.erase (x);
706 OSC::current_value_query (const char* path, size_t len, lo_arg **argv, int argc, lo_message msg)
710 subpath = (char*) malloc (len-15+1);
711 memcpy (subpath, path, len-15);
712 subpath[len-15] = '\0';
714 send_current_value (subpath, argv, argc, msg);
720 OSC::send_current_value (const char* path, lo_arg** argv, int argc, lo_message msg)
726 lo_message reply = lo_message_new ();
727 boost::shared_ptr<Route> r;
730 lo_message_add_string (reply, path);
733 lo_message_add_string (reply, "bad syntax");
736 r = session->get_remote_nth_route (id);
739 lo_message_add_string (reply, "not found");
742 if (strcmp (path, "/strip/state") == 0) {
744 if (boost::dynamic_pointer_cast<AudioTrack>(r)) {
745 lo_message_add_string (reply, "AT");
746 } else if (boost::dynamic_pointer_cast<MidiTrack>(r)) {
747 lo_message_add_string (reply, "MT");
749 lo_message_add_string (reply, "B");
752 lo_message_add_string (reply, r->name().c_str());
753 lo_message_add_int32 (reply, r->n_inputs().n_audio());
754 lo_message_add_int32 (reply, r->n_outputs().n_audio());
755 lo_message_add_int32 (reply, r->muted());
756 lo_message_add_int32 (reply, r->soloed());
758 } else if (strcmp (path, "/strip/mute") == 0) {
760 lo_message_add_int32 (reply, (float) r->muted());
762 } else if (strcmp (path, "/strip/solo") == 0) {
764 lo_message_add_int32 (reply, r->soloed());
769 lo_send_message (lo_message_get_source (msg), "#reply", reply);
770 lo_message_free (reply);
774 OSC::_catchall (const char *path, const char *types, lo_arg **argv, int argc, void *data, void *user_data)
776 return ((OSC*)user_data)->catchall (path, types, argv, argc, data);
780 OSC::catchall (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg)
783 int ret = 1; /* unhandled */
785 //cerr << "Received a message, path = " << path << " types = \""
786 // << (types ? types : "NULL") << '"' << endl;
788 /* 15 for /#current_value plus 2 for /<path> */
792 if (len >= 17 && !strcmp (&path[len-15], "/#current_value")) {
793 current_value_query (path, len, argv, argc, msg);
796 } else if (strcmp (path, "/strip/listen") == 0) {
798 cerr << "set up listener\n";
800 lo_message reply = lo_message_new ();
803 lo_message_add_string (reply, "syntax error");
805 for (int n = 0; n < argc; ++n) {
807 boost::shared_ptr<Route> r = session->get_remote_nth_route (argv[n]->i);
810 lo_message_add_string (reply, "not found");
811 cerr << "no such route\n";
814 cerr << "add listener\n";
815 listen_to_route (r, lo_message_get_source (msg));
816 lo_message_add_int32 (reply, argv[n]->i);
821 lo_send_message (lo_message_get_source (msg), "#reply", reply);
822 lo_message_free (reply);
826 } else if (strcmp (path, "/strip/ignore") == 0) {
828 for (int n = 0; n < argc; ++n) {
830 boost::shared_ptr<Route> r = session->get_remote_nth_route (argv[n]->i);
833 end_listen (r, lo_message_get_source (msg));
838 } else if (argc == 1 && types[0] == 'f') { // single float -- probably TouchOSC
839 if (!strncmp (path, "/strip/gain/", 12) && strlen (path) > 12) {
841 int ssid = atoi (&path[12]);
842 route_set_gain_dB (ssid, argv[0]->f, msg);
845 else if (!strncmp (path, "/strip/fader/", 13) && strlen (path) > 13) {
847 int ssid = atoi (&path[13]);
848 route_set_gain_fader (ssid, argv[0]->f, msg);
851 else if (!strncmp (path, "/strip/trimdB/", 14) && strlen (path) > 14) {
852 int ssid = atoi (&path[14]);
853 route_set_trim_dB (ssid, argv[0]->f, msg);
856 else if (!strncmp (path, "/strip/mute/", 12) && strlen (path) > 12) {
857 int ssid = atoi (&path[12]);
858 route_mute (ssid, argv[0]->f == 1.0, msg);
861 else if (!strncmp (path, "/strip/solo/", 12) && strlen (path) > 12) {
862 int ssid = atoi (&path[12]);
863 route_solo (ssid, argv[0]->f == 1.0, msg);
866 else if (!strncmp (path, "/strip/monitor_input/", 21) && strlen (path) > 21) {
867 int ssid = atoi (&path[21]);
868 route_monitor_input (ssid, argv[0]->f == 1.0, msg);
871 else if (!strncmp (path, "/strip/monitor_disk/", 20) && strlen (path) > 20) {
872 int ssid = atoi (&path[20]);
873 route_monitor_disk (ssid, argv[0]->f == 1.0, msg);
876 else if (!strncmp (path, "/strip/recenable/", 17) && strlen (path) > 17) {
877 int ssid = atoi (&path[17]);
878 route_recenable (ssid, argv[0]->f == 1.0, msg);
881 else if (!strncmp (path, "/strip/record_safe/", 19) && strlen (path) > 19) {
882 int ssid = atoi (&path[19]);
883 route_recsafe (ssid, argv[0]->f == 1.0, msg);
886 else if (!strncmp (path, "/strip/select/", 14) && strlen (path) > 14) {
887 int ssid = atoi (&path[14]);
888 strip_select (ssid, argv[0]->f == 1.0, msg);
891 else if (!strncmp (path, "/strip/gui_select/", 18) && strlen (path) > 18) {
892 int ssid = atoi (&path[18]);
893 strip_gui_select (ssid, argv[0]->f == 1.0, msg);
896 else if (!strncmp (path, "/select/send_gain/", 18) && strlen (path) > 18) {
897 int ssid = atoi (&path[18]);
898 route_mute (ssid, argv[0]->f == 1.0, msg);
901 else if (!strncmp (path, "/select/send_fader/", 19) && strlen (path) > 19) {
902 int ssid = atoi (&path[19]);
903 route_solo (ssid, argv[0]->f == 1.0, msg);
908 if ((ret && _debugmode == Unhandled)) {
909 debugmsg (_("Unhandled OSC message"), path, types, argv, argc);
916 OSC::debugmsg (const char *prefix, const char *path, const char* types, lo_arg **argv, int argc)
918 std::stringstream ss;
919 for (int i = 0; i < argc; ++i) {
920 lo_type type = (lo_type)types[i];
924 ss << "i:" << argv[i]->i;
927 ss << "f:" << argv[i]->f;
930 ss << "d:" << argv[i]->d;
933 ss << "s:" << &argv[i]->s;
936 ss << "h:" << argv[i]->h;
939 ss << "c:" << argv[i]->s;
970 PBD::info << prefix << ": " << path << ss.str() << endmsg;
979 // "Application Hook" Handlers //
981 OSC::session_loaded (Session& s)
983 // lo_address listener = lo_address_new (NULL, "7770");
984 // lo_send (listener, "/session/loaded", "ss", s.path().c_str(), s.name().c_str());
988 OSC::session_exported (std::string path, std::string name)
990 lo_address listener = lo_address_new (NULL, "7770");
991 lo_send (listener, "/session/exported", "ss", path.c_str(), name.c_str());
992 lo_address_free (listener);
995 // end "Application Hook" Handlers //
1000 OSC::current_value (const char */*path*/, const char */*types*/, lo_arg **/*argv*/, int /*argc*/, void */*data*/, void* /*user_data*/)
1005 if (argc < 3 || types == 0 || strlen (types) < 3 || types[0] != 's' || types[1] != 's' || types[2] != s) {
1009 const char *returl = argv[1]->s;
1010 lo_address addr = find_or_cache_addr (returl);
1012 const char *retpath = argv[2]->s;
1015 if (strcmp (argv[0]->s, "transport_frame") == 0) {
1018 lo_send (addr, retpath, "i", session->transport_frame());
1021 } else if (strcmp (argv[0]->s, "transport_speed") == 0) {
1024 lo_send (addr, retpath, "i", session->transport_frame());
1027 } else if (strcmp (argv[0]->s, "transport_locked") == 0) {
1030 lo_send (addr, retpath, "i", session->transport_frame());
1033 } else if (strcmp (argv[0]->s, "punch_in") == 0) {
1036 lo_send (addr, retpath, "i", session->transport_frame());
1039 } else if (strcmp (argv[0]->s, "punch_out") == 0) {
1042 lo_send (addr, retpath, "i", session->transport_frame());
1045 } else if (strcmp (argv[0]->s, "rec_enable") == 0) {
1048 lo_send (addr, retpath, "i", session->transport_frame());
1060 OSC::routes_list (lo_message msg)
1065 for (int n = 0; n < (int) session->nroutes(); ++n) {
1067 boost::shared_ptr<Route> r = session->get_remote_nth_route (n);
1071 lo_message reply = lo_message_new ();
1073 if (boost::dynamic_pointer_cast<AudioTrack>(r)) {
1074 lo_message_add_string (reply, "AT");
1075 } else if (boost::dynamic_pointer_cast<MidiTrack>(r)) {
1076 lo_message_add_string (reply, "MT");
1078 lo_message_add_string (reply, "B");
1081 lo_message_add_string (reply, r->name().c_str());
1082 lo_message_add_int32 (reply, r->n_inputs().n_audio());
1083 lo_message_add_int32 (reply, r->n_outputs().n_audio());
1084 lo_message_add_int32 (reply, r->muted());
1085 lo_message_add_int32 (reply, r->soloed());
1086 /* XXX Can only use order at this point */
1087 lo_message_add_int32 (reply, r->presentation_info().order());
1089 if (boost::dynamic_pointer_cast<AudioTrack>(r)
1090 || boost::dynamic_pointer_cast<MidiTrack>(r)) {
1092 boost::shared_ptr<Track> t = boost::dynamic_pointer_cast<Track>(r);
1093 lo_message_add_int32 (reply, (int32_t) t->rec_enable_control()->get_value());
1096 //Automatically listen to routes listed
1097 listen_to_route(r, lo_message_get_source (msg));
1099 lo_send_message (lo_message_get_source (msg), "#reply", reply);
1100 lo_message_free (reply);
1104 // Send end of listing message
1105 lo_message reply = lo_message_new ();
1107 lo_message_add_string (reply, "end_route_list");
1108 lo_message_add_int64 (reply, session->frame_rate());
1109 lo_message_add_int64 (reply, session->current_end_frame());
1111 lo_send_message (lo_message_get_source (msg), "#reply", reply);
1113 lo_message_free (reply);
1117 OSC::set_surface (uint32_t b_size, uint32_t strips, uint32_t fb, uint32_t gm, lo_message msg)
1119 OSCSurface *s = get_surface(lo_message_get_source (msg));
1120 s->bank_size = b_size;
1121 s->strip_types = strips;
1122 //next line could be a call that finds out how many strips there are
1123 s->nstrips = session->nroutes(); // need to do this for strips
1126 // set bank and strip feedback
1127 set_bank(s->bank, msg);
1129 global_feedback (s->feedback, msg, s->gainmode);
1134 OSC::set_surface_bank_size (uint32_t bs, lo_message msg)
1136 OSCSurface *s = get_surface(lo_message_get_source (msg));
1139 // set bank and strip feedback
1140 set_bank(s->bank, msg);
1146 OSC::set_surface_strip_types (uint32_t st, lo_message msg)
1148 OSCSurface *s = get_surface(lo_message_get_source (msg));
1149 s->strip_types = st;
1150 //next line could be a call that finds out how many strips there are
1151 s->nstrips = session->nroutes(); // need to do this for strips
1153 // set bank and strip feedback
1154 set_bank(s->bank, msg);
1160 OSC::set_surface_feedback (uint32_t fb, lo_message msg)
1162 OSCSurface *s = get_surface(lo_message_get_source (msg));
1165 // set bank and strip feedback
1166 set_bank(s->bank, msg);
1168 // Set global/master feedback
1169 global_feedback (s->feedback, msg, s->gainmode);
1175 OSC::set_surface_gainmode (uint32_t gm, lo_message msg)
1177 OSCSurface *s = get_surface(lo_message_get_source (msg));
1180 // set bank and strip feedback
1181 set_bank(s->bank, msg);
1183 // Set global/master feedback
1184 global_feedback (s->feedback, msg, s->gainmode);
1189 OSC::get_surface (lo_address addr)
1193 rurl = lo_address_get_url (addr);
1196 for (uint32_t it = 0; it < _surface.size(); ++it) {
1197 //find setup for this server
1198 if (!_surface[it].remote_url.find(r_url)){
1199 return &_surface[it];
1202 // No surface create one with default values
1204 s.remote_url = r_url;
1206 s.bank_size = 0; // need to find out how many strips there are
1207 s.nstrips = session->nroutes(); // may need to do this after MARK below
1208 s.strip_types = 31; // 31 is tracks, busses, and VCAs (no master/monitor)
1213 //get sorted should go here
1214 _surface.push_back (s);
1216 return &_surface[_surface.size() - 1];
1219 // setup global feedback for a surface
1221 OSC::global_feedback (bitset<32> feedback, lo_address msg, uint32_t gainmode)
1223 // first destroy global observer for this surface
1224 GlobalObservers::iterator x;
1226 for (x = global_observers.begin(); x != global_observers.end();) {
1228 OSCGlobalObserver* ro;
1230 if ((ro = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
1232 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(lo_message_get_source (msg)));
1236 x = global_observers.erase (x);
1244 if (feedback[4] || feedback[3] || feedback[5] || feedback[6]) {
1245 // create a new Global Observer for this surface
1246 //OSCSurface *s = get_surface (lo_message_get_source (msg));
1247 OSCGlobalObserver* o = new OSCGlobalObserver (*session, lo_message_get_source (msg), gainmode, /*s->*/feedback);
1248 global_observers.push_back (o);
1253 * This gets called not only when bank changes but also:
1254 * - bank size change
1256 * - strip types changes
1257 * - fadermode changes
1258 * - stripable creation/deletion/flag
1259 * - to refresh what is "displayed"
1260 * Basically any time the bank needs to be rebuilt
1263 OSC::set_bank (uint32_t bank_start, lo_message msg)
1268 //StripableList strips;
1269 //session->get_stripables (strips);
1270 // no nstripables yet
1271 if (!session->nroutes()) {
1274 // don't include monitor or master in count for now
1276 if (session->monitor_out ()) {
1277 nstrips = session->nroutes() - 2;
1279 nstrips = session->nroutes() - 1;
1281 // reset local select
1282 _strip_select (0, lo_message_get_source (msg));
1283 // undo all listeners for this url
1284 for (int n = 0; n <= (int) nstrips; ++n) {
1286 boost::shared_ptr<Stripable> stp = session->get_remote_nth_stripable (n, PresentationInfo::Route);
1289 end_listen (stp, lo_message_get_source (msg));
1293 OSCSurface *s = get_surface (lo_message_get_source (msg));
1296 if (!s->bank_size) {
1300 b_size = s->bank_size;
1303 // Do limits checking - high end still not quite right
1304 if (bank_start < 1) bank_start = 1;
1305 if (b_size >= nstrips) {
1307 } else if ((bank_start > nstrips)) {
1308 bank_start = (uint32_t)((nstrips - b_size) + 1);
1310 //save bank in case we have had to change it
1311 s->bank = bank_start;
1313 if (s->feedback[0] || s->feedback[1]) {
1314 for (int n = bank_start; n < (int) (b_size + bank_start); ++n) {
1315 // this next will eventually include strip types
1316 boost::shared_ptr<Stripable> stp = session->get_remote_nth_stripable (n - 1, PresentationInfo::Route);
1319 listen_to_route(stp, lo_message_get_source (msg));
1320 if (!s->feedback[10]) {
1321 if (stp->is_selected()) {
1322 _strip_select (n, lo_message_get_source (msg));
1332 OSC::bank_up (lo_message msg)
1337 OSCSurface *s = get_surface(lo_message_get_source (msg));
1338 set_bank (s->bank + s->bank_size, msg);
1343 OSC::bank_down (lo_message msg)
1348 OSCSurface *s = get_surface(lo_message_get_source (msg));
1349 if (s->bank < s->bank_size) {
1352 set_bank (s->bank - s->bank_size, msg);
1358 OSC::get_sid (uint32_t rid, lo_address addr)
1360 OSCSurface *s = get_surface(addr);
1361 return rid - s->bank + 1;
1365 OSC::get_rid (uint32_t ssid, lo_address addr)
1367 OSCSurface *s = get_surface(addr);
1368 return ssid + s->bank - 2;
1372 OSC::transport_frame (lo_message msg)
1377 framepos_t pos = session->transport_frame ();
1379 lo_message reply = lo_message_new ();
1380 lo_message_add_int64 (reply, pos);
1382 lo_send_message (lo_message_get_source (msg), "/transport_frame", reply);
1384 lo_message_free (reply);
1388 OSC::transport_speed (lo_message msg)
1393 double ts = session->transport_speed ();
1395 lo_message reply = lo_message_new ();
1396 lo_message_add_double (reply, ts);
1398 lo_send_message (lo_message_get_source (msg), "/transport_speed", reply);
1400 lo_message_free (reply);
1404 OSC::record_enabled (lo_message msg)
1409 int re = (int)session->get_record_enabled ();
1411 lo_message reply = lo_message_new ();
1412 lo_message_add_int32 (reply, re);
1414 lo_send_message (lo_message_get_source (msg), "/record_enabled", reply);
1416 lo_message_free (reply);
1419 // master and monitor calls
1421 OSC::master_set_gain (float dB)
1423 if (!session) return -1;
1424 boost::shared_ptr<Stripable> s = session->master_out();
1427 s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup);
1429 s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1436 OSC::master_set_fader (uint32_t position)
1438 if (!session) return -1;
1439 boost::shared_ptr<Stripable> s = session->master_out();
1441 if ((position > 799.5) && (position < 800.5)) {
1442 s->gain_control()->set_value (1.0, PBD::Controllable::NoGroup);
1444 s->gain_control()->set_value (slider_position_to_gain_with_max (((float)position/1023), 2.0), PBD::Controllable::NoGroup);
1451 OSC::master_set_trim (float dB)
1453 if (!session) return -1;
1454 boost::shared_ptr<Stripable> s = session->master_out();
1457 s->trim_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1464 OSC::master_set_pan_stereo_position (float position, lo_message msg)
1466 if (!session) return -1;
1468 float endposition = .5;
1469 boost::shared_ptr<Stripable> s = session->master_out();
1472 if (s->pan_azimuth_control()) {
1473 s->pan_azimuth_control()->set_value (position, PBD::Controllable::NoGroup);
1474 endposition = s->pan_azimuth_control()->get_value ();
1477 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1479 if (sur->feedback[4]) {
1480 lo_message reply = lo_message_new ();
1481 lo_message_add_float (reply, endposition);
1483 lo_send_message (lo_message_get_source (msg), "/master/pan_stereo_position", reply);
1484 lo_message_free (reply);
1491 OSC::master_set_mute (uint32_t state)
1493 if (!session) return -1;
1495 boost::shared_ptr<Stripable> s = session->master_out();
1498 s->mute_control()->set_value (state, PBD::Controllable::NoGroup);
1505 OSC::monitor_set_gain (float dB)
1507 if (!session) return -1;
1508 boost::shared_ptr<Stripable> s = session->monitor_out();
1512 s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup);
1514 s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1521 OSC::monitor_set_fader (uint32_t position)
1523 if (!session) return -1;
1524 boost::shared_ptr<Stripable> s = session->monitor_out();
1526 if ((position > 799.5) && (position < 800.5)) {
1527 s->gain_control()->set_value (1.0, PBD::Controllable::NoGroup);
1529 s->gain_control()->set_value (slider_position_to_gain_with_max (((float)position/1023), 2.0), PBD::Controllable::NoGroup);
1537 OSC::route_mute (int ssid, int yn, lo_message msg)
1539 if (!session) return -1;
1540 int rid = get_rid (ssid, lo_message_get_source (msg));
1542 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1545 if (s->mute_control()) {
1546 s->mute_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1551 return route_send_fail ("mute", ssid, 0, lo_message_get_source (msg));
1555 OSC::sel_mute (uint32_t yn, lo_message msg)
1557 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1558 if (sur->surface_sel) {
1559 return route_mute(sur->surface_sel, yn, msg);
1561 return route_send_fail ("mute", 0, 0, lo_message_get_source (msg));
1566 OSC::route_solo (int ssid, int yn, lo_message msg)
1568 if (!session) return -1;
1569 int rid = get_rid (ssid, lo_message_get_source (msg));
1571 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1574 if (s->solo_control()) {
1575 s->solo_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1580 return route_send_fail ("solo", ssid, 0, lo_message_get_source (msg));
1584 OSC::route_solo_iso (int ssid, int yn, lo_message msg)
1586 if (!session) return -1;
1587 int rid = get_rid (ssid, lo_message_get_source (msg));
1589 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1592 if (s->solo_isolate_control()) {
1593 s->solo_isolate_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1598 return route_send_fail ("solo_iso", ssid, 0, lo_message_get_source (msg));
1602 OSC::route_solo_safe (int ssid, int yn, lo_message msg)
1604 if (!session) return -1;
1605 int rid = get_rid (ssid, lo_message_get_source (msg));
1607 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1610 if (s->solo_safe_control()) {
1611 s->solo_safe_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1616 return route_send_fail ("solo_safe", ssid, 0, lo_message_get_source (msg));
1620 OSC::sel_solo (uint32_t yn, lo_message msg)
1622 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1623 if (sur->surface_sel) {
1624 return route_solo(sur->surface_sel, yn, msg);
1626 return route_send_fail ("solo", 0, 0, lo_message_get_source (msg));
1631 OSC::sel_solo_iso (uint32_t yn, lo_message msg)
1633 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1634 if (sur->surface_sel) {
1635 return route_solo_iso(sur->surface_sel, yn, msg);
1637 return route_send_fail ("solo_iso", 0, 0, lo_message_get_source (msg));
1642 OSC::sel_solo_safe (uint32_t yn, lo_message msg)
1644 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1645 if (sur->surface_sel) {
1646 return route_solo_safe(sur->surface_sel, yn, msg);
1648 return route_send_fail ("solo_safe", 0, 0, lo_message_get_source (msg));
1653 OSC::sel_recenable (uint32_t yn, lo_message msg)
1655 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1656 if (sur->surface_sel) {
1657 return route_recenable(sur->surface_sel, yn, msg);
1659 return route_send_fail ("recenable", 0, 0, lo_message_get_source (msg));
1664 OSC::route_recenable (int ssid, int yn, lo_message msg)
1666 if (!session) return -1;
1667 int rid = get_rid (ssid, lo_message_get_source (msg));
1669 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1672 if (s->rec_enable_control()) {
1673 s->rec_enable_control()->set_value (yn, PBD::Controllable::UseGroup);
1674 if (s->rec_enable_control()->get_value()) {
1679 return route_send_fail ("recenable", ssid, 0, lo_message_get_source (msg));
1683 OSC::sel_recsafe (uint32_t yn, lo_message msg)
1685 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1686 if (sur->surface_sel) {
1687 return route_recsafe(sur->surface_sel, yn, msg);
1689 return route_send_fail ("record_safe", 0, 0, lo_message_get_source (msg));
1694 OSC::route_recsafe (int ssid, int yn, lo_message msg)
1696 if (!session) return -1;
1697 int rid = get_rid (ssid, lo_message_get_source (msg));
1699 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1701 if (s->rec_safe_control()) {
1702 s->rec_safe_control()->set_value (yn, PBD::Controllable::UseGroup);
1703 if (s->rec_safe_control()->get_value()) {
1708 return route_send_fail ("record_safe", ssid, 0,lo_message_get_source (msg));
1712 OSC::route_monitor_input (int ssid, int yn, lo_message msg)
1714 if (!session) return -1;
1715 int rid = get_rid (ssid, lo_message_get_source (msg));
1717 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1720 boost::shared_ptr<Track> track = boost::dynamic_pointer_cast<Track> (s);
1722 if (track->monitoring_control()) {
1723 track->monitoring_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1729 return route_send_fail ("monitor_input", ssid, 0, lo_message_get_source (msg));
1733 OSC::sel_monitor_input (uint32_t yn, lo_message msg)
1735 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1736 if (sur->surface_sel) {
1737 return route_monitor_input(sur->surface_sel, yn, msg);
1739 return route_send_fail ("monitor_input", 0, 0, lo_message_get_source (msg));
1744 OSC::route_monitor_disk (int ssid, int yn, lo_message msg)
1746 if (!session) return -1;
1747 int rid = get_rid (ssid, lo_message_get_source (msg));
1749 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1752 boost::shared_ptr<Track> track = boost::dynamic_pointer_cast<Track> (s);
1754 if (track->monitoring_control()) {
1755 track->monitoring_control()->set_value (yn ? 2.0 : 0.0, PBD::Controllable::NoGroup);
1761 return route_send_fail ("monitor_disk", ssid, 0, lo_message_get_source (msg));
1765 OSC::sel_monitor_disk (uint32_t yn, lo_message msg)
1767 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1768 if (sur->surface_sel) {
1769 return route_monitor_disk(sur->surface_sel, yn, msg);
1771 return route_send_fail ("monitor_disk", 0, 0, lo_message_get_source (msg));
1777 OSC::strip_phase (int ssid, int yn, lo_message msg)
1779 if (!session) return -1;
1780 int rid = get_rid (ssid, lo_message_get_source (msg));
1782 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1785 if (s->phase_control()) {
1786 s->phase_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1791 return route_send_fail ("polarity", ssid, 0, lo_message_get_source (msg));
1795 OSC::sel_phase (uint32_t yn, lo_message msg)
1797 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1798 if (sur->surface_sel) {
1799 return strip_phase(sur->surface_sel, yn, msg);
1801 return route_send_fail ("polarity", 0, 0, lo_message_get_source (msg));
1806 OSC::strip_select (int ssid, int yn, lo_message msg)
1808 //ignore button release
1811 return _strip_select ( ssid, lo_message_get_source (msg));
1815 OSC::_strip_select (int ssid, lo_address addr)
1818 route_send_fail ("select", ssid, 0, addr);
1821 int rid = get_rid (ssid, addr);
1822 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1823 OSCSurface *sur = get_surface(addr);
1825 delete sur->sel_obs;
1828 sur->surface_sel = 0;
1831 sur->surface_sel = ssid;
1832 OSCSelectObserver* sel_fb = new OSCSelectObserver (s, addr, ssid, sur->gainmode, sur->feedback);
1833 sur->sel_obs = sel_fb;
1835 route_send_fail ("select", ssid, 0 , addr);
1837 int b_s = sur->bank_size;
1838 if (!b_s) { // bank size 0 means we need to know how many strips there are.
1841 for (int i = 1; i <= b_s; i++) {
1842 string path = "select";
1843 if (!sur->feedback[10]) {
1844 path = "gui_select";
1846 if (i==(int)sur->surface_sel) {
1847 lo_message reply = lo_message_new ();
1848 if (sur->feedback[2]) {
1850 os << "/strip/" << path << "/" << ssid;
1854 os << "/strip/" << path;
1856 lo_message_add_int32 (reply, ssid);
1858 lo_message_add_float (reply, (float) 1);
1860 lo_send_message (addr, path.c_str(), reply);
1861 lo_message_free (reply);
1863 route_send_fail (path, i, 0, addr);
1871 OSC::strip_gui_select (int ssid, int yn, lo_message msg)
1873 //ignore button release
1877 route_send_fail ("gui_select", ssid, 0, lo_message_get_source (msg));
1881 int rid = get_rid (ssid, lo_message_get_source (msg));
1882 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1884 //SetStripableSelection ((*s)->presentation_info().order());
1885 SetStripableSelection (rid); //alt above may end up being better
1887 route_send_fail ("gui_select", ssid, 0, lo_message_get_source (msg));
1894 OSC::route_set_gain_abs (int rid, float level, lo_message msg)
1896 if (!session) return -1;
1897 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1900 if (s->gain_control()) {
1901 s->gain_control()->set_value (level, PBD::Controllable::NoGroup);
1913 OSC::route_set_gain_dB (int ssid, float dB, lo_message msg)
1916 route_send_fail ("gain", ssid, -193, lo_message_get_source (msg));
1920 int rid = get_rid (ssid, lo_message_get_source (msg));
1922 ret = route_set_gain_abs (rid, 0.0, msg);
1924 ret = route_set_gain_abs (rid, dB_to_coefficient (dB), msg);
1927 return route_send_fail ("gain", ssid, -193, lo_message_get_source (msg));
1933 OSC::sel_gain (float val, lo_message msg)
1935 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1936 if (sur->surface_sel) {
1937 return route_set_gain_dB(sur->surface_sel, val, msg);
1939 return route_send_fail ("gain", 0, -193, lo_message_get_source (msg));
1944 OSC::route_set_gain_fader (int ssid, float pos, lo_message msg)
1947 route_send_fail ("fader", ssid, 0, lo_message_get_source (msg));
1951 int rid = get_rid (ssid, lo_message_get_source (msg));
1952 if ((pos > 799.5) && (pos < 800.5)) {
1953 ret = route_set_gain_abs (rid, 1.0, msg);
1955 ret = route_set_gain_abs (rid, slider_position_to_gain_with_max ((pos/1023), 2.0), msg);
1958 return route_send_fail ("fader", ssid, 0, lo_message_get_source (msg));
1964 OSC::sel_fader (float val, lo_message msg)
1966 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1967 if (sur->surface_sel) {
1968 return route_set_gain_fader(sur->surface_sel, val, msg);
1970 return route_send_fail ("fader", 0, 0, lo_message_get_source (msg));
1975 OSC::route_set_trim_abs (int ssid, float level, lo_message msg)
1977 if (!session) return -1;
1978 int rid = get_rid (ssid, lo_message_get_source (msg));
1980 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1983 if (s->trim_control()) {
1984 s->trim_control()->set_value (level, PBD::Controllable::NoGroup);
1994 OSC::route_set_trim_dB (int ssid, float dB, lo_message msg)
1997 ret = route_set_trim_abs(ssid, dB_to_coefficient (dB), msg);
1999 return route_send_fail ("trimdB", ssid, 0, lo_message_get_source (msg));
2006 OSC::sel_trim (float val, lo_message msg)
2008 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2009 if (sur->surface_sel) {
2010 return route_set_trim_dB (sur->surface_sel, val, msg);
2012 return route_send_fail ("trimdB", 0, 0, lo_message_get_source (msg));
2017 OSC::sel_pan_position (float val, lo_message msg)
2019 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2020 if (sur->surface_sel) {
2021 return route_set_pan_stereo_position (sur->surface_sel, val, msg);
2023 return route_send_fail ("pan_stereo_position", 0, 0.5, lo_message_get_source (msg));
2028 OSC::sel_pan_width (float val, lo_message msg)
2030 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2031 if (sur->surface_sel) {
2032 return route_set_pan_stereo_width (sur->surface_sel, val, msg);
2034 return route_send_fail ("pan_stereo_width", 0, 1, lo_message_get_source (msg));
2039 OSC::route_set_pan_stereo_position (int ssid, float pos, lo_message msg)
2041 if (!session) return -1;
2042 int rid = get_rid (ssid, lo_message_get_source (msg));
2044 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2047 if(s->pan_azimuth_control()) {
2048 s->pan_azimuth_control()->set_value (pos, PBD::Controllable::NoGroup);
2049 return route_send_fail ("pan_stereo_position", ssid, s->pan_azimuth_control()->get_value (), lo_message_get_source (msg));
2053 return route_send_fail ("pan_stereo_position", ssid, 0.5, lo_message_get_source (msg));
2057 OSC::route_set_pan_stereo_width (int ssid, float pos, lo_message msg)
2059 if (!session) return -1;
2060 int rid = get_rid (ssid, lo_message_get_source (msg));
2062 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2065 if (s->pan_width_control()) {
2066 s->pan_width_control()->set_value (pos, PBD::Controllable::NoGroup);
2071 return route_send_fail ("pan_stereo_width", ssid, 1, lo_message_get_source (msg));
2075 OSC::route_set_send_gain_abs (int ssid, int sid, float val, lo_message msg)
2080 int rid = get_rid (ssid, lo_message_get_source (msg));
2082 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2088 /* revert to zero-based counting */
2094 if (s->send_level_controllable (sid)) {
2095 s->send_level_controllable (sid)->set_value (val, PBD::Controllable::NoGroup);
2103 OSC::route_set_send_gain_dB (int ssid, int sid, float val, lo_message msg)
2106 ret = route_set_send_gain_abs (ssid, sid, dB_to_coefficient (val), msg);
2108 return route_send_fail ("send/gain", ssid, -193, lo_message_get_source (msg));
2115 OSC::route_set_send_fader (int ssid, int sid, float pos, lo_message msg)
2121 if ((pos > 799.5) && (pos < 800.5)) {
2122 ret = route_set_send_gain_abs (ssid, sid, 1.0, msg);
2124 ret = route_set_send_gain_abs (ssid, sid, slider_position_to_gain_with_max ((pos/1023), 2.0), msg);
2127 return route_send_fail ("send/fader", ssid, -193, lo_message_get_source (msg));
2134 OSC::sel_sendgain (int id, float val, lo_message msg)
2136 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2137 if (sur->surface_sel) {
2138 return route_set_send_gain_dB(sur->surface_sel, id, val, msg);
2140 return route_send_fail ("send_gain", 0, -193, lo_message_get_source (msg));
2145 OSC::sel_sendfader (int id, float val, lo_message msg)
2147 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2148 if (sur->surface_sel) {
2149 return route_set_send_fader(sur->surface_sel, id, val, msg);
2151 return route_send_fail ("send_gain", 0, -193, lo_message_get_source (msg));
2156 OSC::route_plugin_parameter (int ssid, int piid, int par, float val, lo_message msg)
2160 int rid = get_rid (ssid, lo_message_get_source (msg));
2162 boost::shared_ptr<Route> r = session->get_remote_nth_route (rid);
2165 PBD::error << "OSC: Invalid Remote Control ID '" << rid << "'" << endmsg;
2169 boost::shared_ptr<Processor> redi=r->nth_plugin (piid);
2172 PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << rid << "'" << endmsg;
2176 boost::shared_ptr<PluginInsert> pi;
2178 if (!(pi = boost::dynamic_pointer_cast<PluginInsert>(redi))) {
2179 PBD::error << "OSC: given processor # " << piid << " on RID '" << rid << "' is not a Plugin." << endmsg;
2183 boost::shared_ptr<ARDOUR::Plugin> pip = pi->plugin();
2186 uint32_t controlid = pip->nth_parameter (par,ok);
2189 PBD::error << "OSC: Cannot find parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "'" << endmsg;
2193 if (!pip->parameter_is_input(controlid)) {
2194 PBD::error << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "' is not a control input" << endmsg;
2198 ParameterDescriptor pd;
2199 pi->plugin()->get_parameter_descriptor (controlid,pd);
2201 if (val >= pd.lower && val <= pd.upper) {
2203 boost::shared_ptr<AutomationControl> c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid));
2204 // cerr << "parameter:" << redi->describe_parameter(controlid) << " val:" << val << "\n";
2205 c->set_value (val, PBD::Controllable::NoGroup);
2207 PBD::warning << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "' is out of range" << endmsg;
2208 PBD::info << "OSC: Valid range min=" << pd.lower << " max=" << pd.upper << endmsg;
2214 //prints to cerr only
2216 OSC::route_plugin_parameter_print (int ssid, int piid, int par, lo_message msg)
2221 int rid = get_rid (ssid, lo_message_get_source (msg));
2223 boost::shared_ptr<Route> r = session->get_remote_nth_route (rid);
2229 boost::shared_ptr<Processor> redi=r->nth_processor (piid);
2235 boost::shared_ptr<PluginInsert> pi;
2237 if (!(pi = boost::dynamic_pointer_cast<PluginInsert>(redi))) {
2241 boost::shared_ptr<ARDOUR::Plugin> pip = pi->plugin();
2244 uint32_t controlid = pip->nth_parameter (par,ok);
2250 ParameterDescriptor pd;
2252 if (pi->plugin()->get_parameter_descriptor (controlid, pd) == 0) {
2253 boost::shared_ptr<AutomationControl> c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid));
2255 cerr << "parameter: " << redi->describe_parameter(controlid) << "\n";
2256 cerr << "current value: " << c->get_value ();
2257 cerr << "lower value: " << pd.lower << "\n";
2258 cerr << "upper value: " << pd.upper << "\n";
2265 OSC::gui_selection_changed (StripableNotificationListPtr stripables)
2267 boost::shared_ptr<Stripable> strip;
2269 if (!stripables->empty()) {
2270 strip = stripables->front().lock();
2273 for (uint32_t it = 0; it < _surface.size(); ++it) {
2274 OSCSurface* sur = &_surface[it];
2275 if(!sur->feedback[10]) {
2276 uint32_t sel_strip = strip->presentation_info().order() + 1;
2277 if (!(sel_strip < sur->bank) && !(sel_strip >= (sur->bank + sur->bank_size))) {
2278 lo_address addr = lo_address_new_from_url (sur->remote_url.c_str());
2279 _strip_select ((sel_strip - sur->bank + 1), addr);
2289 OSC::periodic (void)
2291 for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end(); x++) {
2293 OSCGlobalObserver* go;
2295 if ((go = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
2299 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); x++) {
2301 OSCRouteObserver* ro;
2303 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
2307 for (uint32_t it = 0; it < _surface.size(); ++it) {
2308 OSCSurface* sur = &_surface[it];
2309 OSCSelectObserver* so;
2310 if ((so = dynamic_cast<OSCSelectObserver*>(sur->sel_obs)) != 0) {
2318 OSC::route_send_fail (string path, uint32_t ssid, float val, lo_address addr)
2320 OSCSurface *sur = get_surface(addr);
2325 reply = lo_message_new ();
2326 if (sur->feedback[2]) {
2327 os << "/strip/" << path << "/" << ssid;
2329 os << "/strip/" << path;
2330 lo_message_add_int32 (reply, ssid);
2332 string str_pth = os.str();
2333 lo_message_add_float (reply, (float) val);
2335 lo_send_message (addr, str_pth.c_str(), reply);
2336 lo_message_free (reply);
2338 if (sur->surface_sel == ssid) {
2340 os << "/select/" << path;
2341 string sel_pth = os.str();
2342 reply = lo_message_new ();
2343 lo_message_add_float (reply, (float) val);
2344 lo_send_message (addr, sel_pth.c_str(), reply);
2345 lo_message_free (reply);
2354 XMLNode& node (ControlProtocol::get_state());
2355 node.add_property("debugmode", (int) _debugmode); // TODO: enum2str
2360 OSC::set_state (const XMLNode& node, int version)
2362 if (ControlProtocol::set_state (node, version)) {
2365 XMLProperty const * p = node.property (X_("debugmode"));
2367 _debugmode = OSCDebugMode (PBD::atoi(p->value ()));