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"
52 #include "ardour/vca_manager.h"
54 #include "osc_select_observer.h"
56 #include "osc_controllable.h"
57 #include "osc_route_observer.h"
58 #include "osc_global_observer.h"
61 using namespace ARDOUR;
64 using namespace ArdourSurface;
66 #include "pbd/abstract_ui.cc" // instantiate template
68 OSC* OSC::_instance = 0;
71 static void error_callback(int num, const char *m, const char *path)
73 fprintf(stderr, "liblo server error %d in path %s: %s\n", num, path, m);
76 static void error_callback(int, const char *, const char *)
82 OSC::OSC (Session& s, uint32_t port)
83 : ControlProtocol (s, X_("Open Sound Control (OSC)"))
84 , AbstractUI<OSCUIRequest> (name())
91 , _osc_unix_server (0)
92 , _send_route_changes (true)
100 session->Exported.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::session_exported, this, _1, _2), this);
110 OSC::request_factory (uint32_t num_requests)
112 /* AbstractUI<T>::request_buffer_factory() is a template method only
113 instantiated in this source module. To provide something visible for
114 use in the interface/descriptor, we have this static method that is
117 return request_buffer_factory (num_requests);
121 OSC::do_request (OSCUIRequest* req)
123 if (req->type == CallSlot) {
125 call_slot (MISSING_INVALIDATOR, req->the_slot);
127 } else if (req->type == Quit) {
134 OSC::set_active (bool yn)
136 if (yn != active()) {
150 return ControlProtocol::set_active (yn);
154 OSC::get_active () const
156 return _osc_server != 0;
160 OSC::set_feedback (bool yn)
162 _send_route_changes = yn;
167 OSC::get_feedback () const
169 return _send_route_changes;
178 /* already started */
182 for (int j=0; j < 20; ++j) {
183 snprintf(tmpstr, sizeof(tmpstr), "%d", _port);
185 //if ((_osc_server = lo_server_new_with_proto (tmpstr, LO_TCP, error_callback))) {
189 if ((_osc_server = lo_server_new (tmpstr, error_callback))) {
194 cerr << "can't get osc at port: " << _port << endl;
204 #ifdef ARDOUR_OSC_UNIX_SERVER
206 // APPEARS sluggish for now
208 // attempt to create unix socket server too
210 snprintf(tmpstr, sizeof(tmpstr), "/tmp/sooperlooper_XXXXXX");
211 int fd = mkstemp(tmpstr);
217 _osc_unix_server = lo_server_new (tmpstr, error_callback);
219 if (_osc_unix_server) {
220 _osc_unix_socket_path = tmpstr;
225 PBD::info << "OSC @ " << get_server_url () << endmsg;
227 std::string url_file;
229 if (find_file (ardour_config_search_path(), "osc_url", url_file)) {
230 _osc_url_file = url_file;
231 if (g_file_set_contents (_osc_url_file.c_str(), get_server_url().c_str(), -1, NULL)) {
232 cerr << "Couldn't write '" << _osc_url_file << "'" <<endl;
236 register_callbacks();
238 session_loaded (*session);
240 // lo_server_thread_add_method(_sthread, NULL, NULL, OSC::_dummy_handler, this);
242 /* startup the event loop thread */
246 // start timers for metering, timecode and heartbeat.
247 // timecode and metering run at 100
248 Glib::RefPtr<Glib::TimeoutSource> periodic_timeout = Glib::TimeoutSource::create (100); // milliseconds
249 periodic_connection = periodic_timeout->connect (sigc::mem_fun (*this, &OSC::periodic));
250 periodic_timeout->attach (main_loop()->get_context());
252 // catch GUI select changes for GUI_select mode
253 StripableSelectionChanged.connect (session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::gui_selection_changed, this, _1), this);
255 // catch track reordering
256 // receive routes added
257 session->RouteAdded.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::notify_routes_added, this, _1), this);
258 // receive VCAs added
259 session->vca_manager().VCAAdded.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSC::notify_vca_added, this, _1), this);
267 pthread_set_name (event_loop_name().c_str());
269 if (_osc_unix_server) {
270 Glib::RefPtr<IOSource> src = IOSource::create (lo_server_get_socket_fd (_osc_unix_server), IO_IN|IO_HUP|IO_ERR);
271 src->connect (sigc::bind (sigc::mem_fun (*this, &OSC::osc_input_handler), _osc_unix_server));
272 src->attach (_main_loop->get_context());
273 local_server = src->gobj();
274 g_source_ref (local_server);
278 #ifdef PLATFORM_WINDOWS
279 Glib::RefPtr<IOChannel> chan = Glib::IOChannel::create_from_win32_socket (lo_server_get_socket_fd (_osc_server));
280 Glib::RefPtr<IOSource> src = IOSource::create (chan, IO_IN|IO_HUP|IO_ERR);
282 Glib::RefPtr<IOSource> src = IOSource::create (lo_server_get_socket_fd (_osc_server), IO_IN|IO_HUP|IO_ERR);
284 src->connect (sigc::bind (sigc::mem_fun (*this, &OSC::osc_input_handler), _osc_server));
285 src->attach (_main_loop->get_context());
286 remote_server = src->gobj();
287 g_source_ref (remote_server);
290 PBD::notify_event_loops_about_thread_creation (pthread_self(), event_loop_name(), 2048);
291 SessionEvent::create_per_thread_pool (event_loop_name(), 128);
300 g_source_destroy (local_server);
301 g_source_unref (local_server);
306 g_source_destroy (remote_server);
307 g_source_unref (remote_server);
314 lo_server_free (_osc_server);
318 if (_osc_unix_server) {
319 lo_server_free (_osc_unix_server);
320 _osc_unix_server = 0;
323 if (!_osc_unix_socket_path.empty()) {
324 ::g_unlink (_osc_unix_socket_path.c_str());
327 if (!_osc_url_file.empty() ) {
328 ::g_unlink (_osc_url_file.c_str() );
331 periodic_connection.disconnect ();
332 session_connections.drop_connections ();
333 // Delete any active route observers
334 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) {
336 OSCRouteObserver* rc;
338 if ((rc = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
340 x = route_observers.erase (x);
345 // Should maybe do global_observers too
346 for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end();) {
348 OSCGlobalObserver* gc;
350 if ((gc = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
352 x = global_observers.erase (x);
357 // delete select observers
358 for (uint32_t it = 0; it < _surface.size(); ++it) {
359 OSCSurface* sur = &_surface[it];
360 OSCSelectObserver* so;
361 if ((so = dynamic_cast<OSCSelectObserver*>(sur->sel_obs)) != 0) {
370 OSC::register_callbacks()
375 srvs[0] = _osc_server;
376 srvs[1] = _osc_unix_server;
378 for (size_t i = 0; i < 2; ++i) {
387 #define REGISTER_CALLBACK(serv,path,types, function) lo_server_add_method (serv, path, types, OSC::_ ## function, this)
389 // Some controls have optional "f" for feedback or touchosc
390 // http://hexler.net/docs/touchosc-controls-reference
392 REGISTER_CALLBACK (serv, "/set_surface", "iiii", set_surface);
393 REGISTER_CALLBACK (serv, "/set_surface/feedback", "i", set_surface_feedback);
394 REGISTER_CALLBACK (serv, "/set_surface/bank_size", "i", set_surface_bank_size);
395 REGISTER_CALLBACK (serv, "/set_surface/gainmode", "i", set_surface_gainmode);
396 REGISTER_CALLBACK (serv, "/set_surface/strip_types", "i", set_surface_strip_types);
397 REGISTER_CALLBACK (serv, "/strip/list", "", routes_list);
398 REGISTER_CALLBACK (serv, "/add_marker", "", add_marker);
399 REGISTER_CALLBACK (serv, "/add_marker", "f", add_marker);
400 REGISTER_CALLBACK (serv, "/access_action", "s", access_action);
401 REGISTER_CALLBACK (serv, "/loop_toggle", "", loop_toggle);
402 REGISTER_CALLBACK (serv, "/loop_toggle", "f", loop_toggle);
403 REGISTER_CALLBACK (serv, "/loop_location", "ii", loop_location);
404 REGISTER_CALLBACK (serv, "/goto_start", "", goto_start);
405 REGISTER_CALLBACK (serv, "/goto_start", "f", goto_start);
406 REGISTER_CALLBACK (serv, "/goto_end", "", goto_end);
407 REGISTER_CALLBACK (serv, "/goto_end", "f", goto_end);
408 REGISTER_CALLBACK (serv, "/rewind", "", rewind);
409 REGISTER_CALLBACK (serv, "/rewind", "f", rewind);
410 REGISTER_CALLBACK (serv, "/ffwd", "", ffwd);
411 REGISTER_CALLBACK (serv, "/ffwd", "f", ffwd);
412 REGISTER_CALLBACK (serv, "/transport_stop", "", transport_stop);
413 REGISTER_CALLBACK (serv, "/transport_stop", "f", transport_stop);
414 REGISTER_CALLBACK (serv, "/transport_play", "", transport_play);
415 REGISTER_CALLBACK (serv, "/transport_play", "f", transport_play);
416 REGISTER_CALLBACK (serv, "/transport_frame", "", transport_frame);
417 REGISTER_CALLBACK (serv, "/transport_speed", "", transport_speed);
418 REGISTER_CALLBACK (serv, "/record_enabled", "", record_enabled);
419 REGISTER_CALLBACK (serv, "/set_transport_speed", "f", set_transport_speed);
420 // locate ii is position and bool roll
421 REGISTER_CALLBACK (serv, "/locate", "ii", locate);
422 REGISTER_CALLBACK (serv, "/save_state", "", save_state);
423 REGISTER_CALLBACK (serv, "/save_state", "f", save_state);
424 REGISTER_CALLBACK (serv, "/prev_marker", "", prev_marker);
425 REGISTER_CALLBACK (serv, "/prev_marker", "f", prev_marker);
426 REGISTER_CALLBACK (serv, "/next_marker", "", next_marker);
427 REGISTER_CALLBACK (serv, "/next_marker", "f", next_marker);
428 REGISTER_CALLBACK (serv, "/undo", "", undo);
429 REGISTER_CALLBACK (serv, "/undo", "f", undo);
430 REGISTER_CALLBACK (serv, "/redo", "", redo);
431 REGISTER_CALLBACK (serv, "/redo", "f", redo);
432 REGISTER_CALLBACK (serv, "/toggle_punch_in", "", toggle_punch_in);
433 REGISTER_CALLBACK (serv, "/toggle_punch_in", "f", toggle_punch_in);
434 REGISTER_CALLBACK (serv, "/toggle_punch_out", "", toggle_punch_out);
435 REGISTER_CALLBACK (serv, "/toggle_punch_out", "f", toggle_punch_out);
436 REGISTER_CALLBACK (serv, "/rec_enable_toggle", "", rec_enable_toggle);
437 REGISTER_CALLBACK (serv, "/rec_enable_toggle", "f", rec_enable_toggle);
438 REGISTER_CALLBACK (serv, "/toggle_all_rec_enables", "", toggle_all_rec_enables);
439 REGISTER_CALLBACK (serv, "/toggle_all_rec_enables", "f", toggle_all_rec_enables);
440 REGISTER_CALLBACK (serv, "/all_tracks_rec_in", "f", all_tracks_rec_in);
441 REGISTER_CALLBACK (serv, "/all_tracks_rec_out", "f", all_tracks_rec_out);
442 REGISTER_CALLBACK (serv, "/remove_marker", "", remove_marker_at_playhead);
443 REGISTER_CALLBACK (serv, "/remove_marker", "f", remove_marker_at_playhead);
444 REGISTER_CALLBACK (serv, "/jump_bars", "f", jump_by_bars);
445 REGISTER_CALLBACK (serv, "/jump_seconds", "f", jump_by_seconds);
446 REGISTER_CALLBACK (serv, "/mark_in", "", mark_in);
447 REGISTER_CALLBACK (serv, "/mark_in", "f", mark_in);
448 REGISTER_CALLBACK (serv, "/mark_out", "", mark_out);
449 REGISTER_CALLBACK (serv, "/mark_out", "f", mark_out);
450 REGISTER_CALLBACK (serv, "/toggle_click", "", toggle_click);
451 REGISTER_CALLBACK (serv, "/toggle_click", "f", toggle_click);
452 REGISTER_CALLBACK (serv, "/midi_panic", "", midi_panic);
453 REGISTER_CALLBACK (serv, "/midi_panic", "f", midi_panic);
454 REGISTER_CALLBACK (serv, "/toggle_roll", "", toggle_roll);
455 REGISTER_CALLBACK (serv, "/toggle_roll", "f", toggle_roll);
456 REGISTER_CALLBACK (serv, "/stop_forget", "", stop_forget);
457 REGISTER_CALLBACK (serv, "/stop_forget", "f", stop_forget);
458 REGISTER_CALLBACK (serv, "/set_punch_range", "", set_punch_range);
459 REGISTER_CALLBACK (serv, "/set_punch_range", "f", set_punch_range);
460 REGISTER_CALLBACK (serv, "/set_loop_range", "", set_loop_range);
461 REGISTER_CALLBACK (serv, "/set_loop_range", "f", set_loop_range);
462 REGISTER_CALLBACK (serv, "/set_session_range", "", set_session_range);
463 REGISTER_CALLBACK (serv, "/set_session_range", "f", set_session_range);
464 // /toggle_monitor_* not working (comented out)
465 REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "", toggle_monitor_mute);
466 REGISTER_CALLBACK (serv, "/toggle_monitor_mute", "f", toggle_monitor_mute);
467 REGISTER_CALLBACK (serv, "/toggle_monitor_dim", "", toggle_monitor_dim);
468 REGISTER_CALLBACK (serv, "/toggle_monitor_dim", "f", toggle_monitor_dim);
469 REGISTER_CALLBACK (serv, "/toggle_monitor_mono", "", toggle_monitor_mono);
470 REGISTER_CALLBACK (serv, "/toggle_monitor_mono", "f", toggle_monitor_mono);
471 REGISTER_CALLBACK (serv, "/quick_snapshot_switch", "", quick_snapshot_switch);
472 REGISTER_CALLBACK (serv, "/quick_snapshot_switch", "f", quick_snapshot_switch);
473 REGISTER_CALLBACK (serv, "/quick_snapshot_stay", "", quick_snapshot_stay);
474 REGISTER_CALLBACK (serv, "/quick_snapshot_stay", "f", quick_snapshot_stay);
475 REGISTER_CALLBACK (serv, "/fit_1_track", "", fit_1_track);
476 REGISTER_CALLBACK (serv, "/fit_1_track", "f", fit_1_track);
477 REGISTER_CALLBACK (serv, "/fit_2_tracks", "", fit_2_tracks);
478 REGISTER_CALLBACK (serv, "/fit_2_tracks", "f", fit_2_tracks);
479 REGISTER_CALLBACK (serv, "/fit_4_tracks", "", fit_4_tracks);
480 REGISTER_CALLBACK (serv, "/fit_4_tracks", "f", fit_4_tracks);
481 REGISTER_CALLBACK (serv, "/fit_8_tracks", "", fit_8_tracks);
482 REGISTER_CALLBACK (serv, "/fit_8_tracks", "f", fit_8_tracks);
483 REGISTER_CALLBACK (serv, "/fit_16_tracks", "", fit_16_tracks);
484 REGISTER_CALLBACK (serv, "/fit_16_tracks", "f", fit_16_tracks);
485 REGISTER_CALLBACK (serv, "/fit_32_tracks", "", fit_32_tracks);
486 REGISTER_CALLBACK (serv, "/fit_32_tracks", "f", fit_32_tracks);
487 REGISTER_CALLBACK (serv, "/fit_all_tracks", "", fit_all_tracks);
488 REGISTER_CALLBACK (serv, "/fit_all_tracks", "f", fit_all_tracks);
489 REGISTER_CALLBACK (serv, "/zoom_100_ms", "", zoom_100_ms);
490 REGISTER_CALLBACK (serv, "/zoom_100_ms", "f", zoom_100_ms);
491 REGISTER_CALLBACK (serv, "/zoom_1_sec", "", zoom_1_sec);
492 REGISTER_CALLBACK (serv, "/zoom_1_sec", "f", zoom_1_sec);
493 REGISTER_CALLBACK (serv, "/zoom_10_sec", "", zoom_10_sec);
494 REGISTER_CALLBACK (serv, "/zoom_10_sec", "f", zoom_10_sec);
495 REGISTER_CALLBACK (serv, "/zoom_1_min", "", zoom_1_min);
496 REGISTER_CALLBACK (serv, "/zoom_1_min", "f", zoom_1_min);
497 REGISTER_CALLBACK (serv, "/zoom_5_min", "", zoom_5_min);
498 REGISTER_CALLBACK (serv, "/zoom_5_min", "f", zoom_5_min);
499 REGISTER_CALLBACK (serv, "/zoom_10_min", "", zoom_10_min);
500 REGISTER_CALLBACK (serv, "/zoom_10_min", "f", zoom_10_min);
501 REGISTER_CALLBACK (serv, "/zoom_to_session", "", zoom_to_session);
502 REGISTER_CALLBACK (serv, "/zoom_to_session", "f", zoom_to_session);
503 REGISTER_CALLBACK (serv, "/temporal_zoom_in", "f", temporal_zoom_in);
504 REGISTER_CALLBACK (serv, "/temporal_zoom_in", "", temporal_zoom_in);
505 REGISTER_CALLBACK (serv, "/temporal_zoom_out", "", temporal_zoom_out);
506 REGISTER_CALLBACK (serv, "/temporal_zoom_out", "f", temporal_zoom_out);
507 REGISTER_CALLBACK (serv, "/scroll_up_1_track", "f", scroll_up_1_track);
508 REGISTER_CALLBACK (serv, "/scroll_up_1_track", "", scroll_up_1_track);
509 REGISTER_CALLBACK (serv, "/scroll_dn_1_track", "f", scroll_dn_1_track);
510 REGISTER_CALLBACK (serv, "/scroll_dn_1_track", "", scroll_dn_1_track);
511 REGISTER_CALLBACK (serv, "/scroll_up_1_page", "f", scroll_up_1_page);
512 REGISTER_CALLBACK (serv, "/scroll_up_1_page", "", scroll_up_1_page);
513 REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "f", scroll_dn_1_page);
514 REGISTER_CALLBACK (serv, "/scroll_dn_1_page", "", scroll_dn_1_page);
515 REGISTER_CALLBACK (serv, "/bank_up", "", bank_up);
516 REGISTER_CALLBACK (serv, "/bank_up", "f", bank_up);
517 REGISTER_CALLBACK (serv, "/bank_down", "", bank_down);
518 REGISTER_CALLBACK (serv, "/bank_down", "f", bank_down);
520 // controls for "special" strips
521 REGISTER_CALLBACK (serv, "/master/gain", "f", master_set_gain);
522 REGISTER_CALLBACK (serv, "/master/fader", "i", master_set_fader);
523 REGISTER_CALLBACK (serv, "/master/mute", "i", master_set_mute);
524 REGISTER_CALLBACK (serv, "/master/trimdB", "f", master_set_trim);
525 REGISTER_CALLBACK (serv, "/master/pan_stereo_position", "f", master_set_pan_stereo_position);
526 REGISTER_CALLBACK (serv, "/monitor/gain", "f", monitor_set_gain);
527 REGISTER_CALLBACK (serv, "/monitor/fader", "i", monitor_set_fader);
529 // Controls for the Selected strip
530 REGISTER_CALLBACK (serv, "/select/recenable", "i", sel_recenable);
531 REGISTER_CALLBACK (serv, "/select/record_safe", "i", sel_recsafe);
532 REGISTER_CALLBACK (serv, "/select/mute", "i", sel_mute);
533 REGISTER_CALLBACK (serv, "/select/solo", "i", sel_solo);
534 REGISTER_CALLBACK (serv, "/select/solo_iso", "i", sel_solo_iso);
535 REGISTER_CALLBACK (serv, "/select/solo_safe", "i", sel_solo_safe);
536 REGISTER_CALLBACK (serv, "/select/monitor_input", "i", sel_monitor_input);
537 REGISTER_CALLBACK (serv, "/select/monitor_disk", "i", sel_monitor_disk);
538 REGISTER_CALLBACK (serv, "/select/polarity", "i", sel_phase);
539 REGISTER_CALLBACK (serv, "/select/gain", "f", sel_gain);
540 REGISTER_CALLBACK (serv, "/select/fader", "f", sel_fader);
541 REGISTER_CALLBACK (serv, "/select/trimdB", "f", sel_trim);
542 REGISTER_CALLBACK (serv, "/select/pan_stereo_position", "f", sel_pan_position);
543 REGISTER_CALLBACK (serv, "/select/pan_stereo_width", "f", sel_pan_width);
544 REGISTER_CALLBACK (serv, "/select/send_gain", "if", sel_sendgain);
545 REGISTER_CALLBACK (serv, "/select/send_fader", "if", sel_sendfader);
546 REGISTER_CALLBACK (serv, "/select/send_enable", "if", sel_sendenable);
548 /* These commands require the route index in addition to the arg; TouchOSC (et al) can't use these */
549 REGISTER_CALLBACK (serv, "/strip/mute", "ii", route_mute);
550 REGISTER_CALLBACK (serv, "/strip/solo", "ii", route_solo);
551 REGISTER_CALLBACK (serv, "/strip/solo_iso", "ii", route_solo_iso);
552 REGISTER_CALLBACK (serv, "/strip/solo_safe", "ii", route_solo_safe);
553 REGISTER_CALLBACK (serv, "/strip/recenable", "ii", route_recenable);
554 REGISTER_CALLBACK (serv, "/strip/record_safe", "ii", route_recsafe);
555 REGISTER_CALLBACK (serv, "/strip/monitor_input", "ii", route_monitor_input);
556 REGISTER_CALLBACK (serv, "/strip/monitor_disk", "ii", route_monitor_disk);
557 REGISTER_CALLBACK (serv, "/strip/select", "ii", strip_select);
558 REGISTER_CALLBACK (serv, "/strip/gui_select", "ii", strip_gui_select);
559 REGISTER_CALLBACK (serv, "/strip/polarity", "ii", strip_phase);
560 REGISTER_CALLBACK (serv, "/strip/gain", "if", route_set_gain_dB);
561 REGISTER_CALLBACK (serv, "/strip/fader", "if", route_set_gain_fader);
562 REGISTER_CALLBACK (serv, "/strip/trimdB", "if", route_set_trim_dB);
563 REGISTER_CALLBACK (serv, "/strip/pan_stereo_position", "if", route_set_pan_stereo_position);
564 REGISTER_CALLBACK (serv, "/strip/pan_stereo_width", "if", route_set_pan_stereo_width);
565 REGISTER_CALLBACK (serv, "/strip/plugin/parameter", "iiif", route_plugin_parameter);
566 // prints to cerr only
567 REGISTER_CALLBACK (serv, "/strip/plugin/parameter/print", "iii", route_plugin_parameter_print);
568 REGISTER_CALLBACK (serv, "/strip/send/gainabs", "iif", route_set_send_gain_abs);
569 REGISTER_CALLBACK (serv, "/strip/send/gain", "iif", route_set_send_gain_dB);
570 REGISTER_CALLBACK (serv, "/strip/send/fader", "iif", route_set_send_fader);
571 REGISTER_CALLBACK (serv, "/strip/send/enable", "iif", route_set_send_enable);
573 /* still not-really-standardized query interface */
574 //REGISTER_CALLBACK (serv, "/ardour/*/#current_value", "", current_value);
575 //REGISTER_CALLBACK (serv, "/ardour/set", "", set);
577 // un/register_update args= s:ctrl s:returl s:retpath
578 //lo_server_add_method(serv, "/register_update", "sss", OSC::global_register_update_handler, this);
579 //lo_server_add_method(serv, "/unregister_update", "sss", OSC::global_unregister_update_handler, this);
580 //lo_server_add_method(serv, "/register_auto_update", "siss", OSC::global_register_auto_update_handler, this);
581 //lo_server_add_method(serv, "/unregister_auto_update", "sss", OSC::_global_unregister_auto_update_handler, this);
583 /* this is a special catchall handler,
584 * register at the end so this is only called if no
585 * other handler matches (used for debug) */
586 lo_server_add_method (serv, 0, 0, _catchall, this);
591 OSC::osc_input_handler (IOCondition ioc, lo_server srv)
598 lo_server_recv (srv);
605 OSC::get_server_url()
611 urlstr = lo_server_get_url (_osc_server);
620 OSC::get_unix_server_url()
625 if (_osc_unix_server) {
626 urlstr = lo_server_get_url (_osc_unix_server);
635 OSC::listen_to_route (boost::shared_ptr<Stripable> strip, lo_address addr)
637 /* avoid duplicate listens */
639 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); ++x) {
641 OSCRouteObserver* ro;
643 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
645 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr));
647 if (ro->strip() == strip && res == 0) {
653 OSCSurface *s = get_surface(addr);
654 uint32_t sid = get_sid (strip->presentation_info().order() + 1, addr);
655 // above is zero based add 1
656 OSCRouteObserver* o = new OSCRouteObserver (strip, addr, sid, s->gainmode, s->feedback);
657 route_observers.push_back (o);
659 strip->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::route_lost, this, boost::weak_ptr<Stripable> (strip)), this);
663 OSC::route_lost (boost::weak_ptr<Stripable> wr)
671 OSC::drop_route (boost::weak_ptr<Stripable> wr)
673 boost::shared_ptr<Stripable> r = wr.lock ();
679 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end();) {
681 OSCRouteObserver* rc;
683 if ((rc = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
685 if (rc->strip() == r) {
687 x = route_observers.erase (x);
698 OSC::end_listen (boost::shared_ptr<Stripable> r, lo_address addr)
700 RouteObservers::iterator x;
702 // Remove the route observers
703 for (x = route_observers.begin(); x != route_observers.end();) {
705 OSCRouteObserver* ro;
707 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
709 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(addr));
711 if (ro->strip() == r && res == 0) {
713 x = route_observers.erase (x);
726 OSC::current_value_query (const char* path, size_t len, lo_arg **argv, int argc, lo_message msg)
730 subpath = (char*) malloc (len-15+1);
731 memcpy (subpath, path, len-15);
732 subpath[len-15] = '\0';
734 send_current_value (subpath, argv, argc, msg);
740 OSC::send_current_value (const char* path, lo_arg** argv, int argc, lo_message msg)
746 lo_message reply = lo_message_new ();
747 boost::shared_ptr<Route> r;
750 lo_message_add_string (reply, path);
753 lo_message_add_string (reply, "bad syntax");
756 r = session->get_remote_nth_route (id);
759 lo_message_add_string (reply, "not found");
762 if (strcmp (path, "/strip/state") == 0) {
764 if (boost::dynamic_pointer_cast<AudioTrack>(r)) {
765 lo_message_add_string (reply, "AT");
766 } else if (boost::dynamic_pointer_cast<MidiTrack>(r)) {
767 lo_message_add_string (reply, "MT");
769 lo_message_add_string (reply, "B");
772 lo_message_add_string (reply, r->name().c_str());
773 lo_message_add_int32 (reply, r->n_inputs().n_audio());
774 lo_message_add_int32 (reply, r->n_outputs().n_audio());
775 lo_message_add_int32 (reply, r->muted());
776 lo_message_add_int32 (reply, r->soloed());
778 } else if (strcmp (path, "/strip/mute") == 0) {
780 lo_message_add_int32 (reply, (float) r->muted());
782 } else if (strcmp (path, "/strip/solo") == 0) {
784 lo_message_add_int32 (reply, r->soloed());
789 lo_send_message (lo_message_get_source (msg), "#reply", reply);
790 lo_message_free (reply);
794 OSC::_catchall (const char *path, const char *types, lo_arg **argv, int argc, void *data, void *user_data)
796 return ((OSC*)user_data)->catchall (path, types, argv, argc, data);
800 OSC::catchall (const char *path, const char* types, lo_arg **argv, int argc, lo_message msg)
803 int ret = 1; /* unhandled */
805 //cerr << "Received a message, path = " << path << " types = \""
806 // << (types ? types : "NULL") << '"' << endl;
808 /* 15 for /#current_value plus 2 for /<path> */
812 if (len >= 17 && !strcmp (&path[len-15], "/#current_value")) {
813 current_value_query (path, len, argv, argc, msg);
816 } else if (strcmp (path, "/strip/listen") == 0) {
818 cerr << "set up listener\n";
820 lo_message reply = lo_message_new ();
823 lo_message_add_string (reply, "syntax error");
825 for (int n = 0; n < argc; ++n) {
827 boost::shared_ptr<Route> r = session->get_remote_nth_route (argv[n]->i);
830 lo_message_add_string (reply, "not found");
831 cerr << "no such route\n";
834 cerr << "add listener\n";
835 listen_to_route (r, lo_message_get_source (msg));
836 lo_message_add_int32 (reply, argv[n]->i);
841 lo_send_message (lo_message_get_source (msg), "#reply", reply);
842 lo_message_free (reply);
846 } else if (strcmp (path, "/strip/ignore") == 0) {
848 for (int n = 0; n < argc; ++n) {
850 boost::shared_ptr<Route> r = session->get_remote_nth_route (argv[n]->i);
853 end_listen (r, lo_message_get_source (msg));
858 } else if (argc == 1 && types[0] == 'f') { // single float -- probably TouchOSC
859 if (!strncmp (path, "/strip/gain/", 12) && strlen (path) > 12) {
861 int ssid = atoi (&path[12]);
862 route_set_gain_dB (ssid, argv[0]->f, msg);
865 else if (!strncmp (path, "/strip/fader/", 13) && strlen (path) > 13) {
867 int ssid = atoi (&path[13]);
868 route_set_gain_fader (ssid, argv[0]->f, msg);
871 else if (!strncmp (path, "/strip/trimdB/", 14) && strlen (path) > 14) {
872 int ssid = atoi (&path[14]);
873 route_set_trim_dB (ssid, argv[0]->f, msg);
876 else if (!strncmp (path, "/strip/mute/", 12) && strlen (path) > 12) {
877 int ssid = atoi (&path[12]);
878 route_mute (ssid, argv[0]->f == 1.0, msg);
881 else if (!strncmp (path, "/strip/solo/", 12) && strlen (path) > 12) {
882 int ssid = atoi (&path[12]);
883 route_solo (ssid, argv[0]->f == 1.0, msg);
886 else if (!strncmp (path, "/strip/monitor_input/", 21) && strlen (path) > 21) {
887 int ssid = atoi (&path[21]);
888 route_monitor_input (ssid, argv[0]->f == 1.0, msg);
891 else if (!strncmp (path, "/strip/monitor_disk/", 20) && strlen (path) > 20) {
892 int ssid = atoi (&path[20]);
893 route_monitor_disk (ssid, argv[0]->f == 1.0, msg);
896 else if (!strncmp (path, "/strip/recenable/", 17) && strlen (path) > 17) {
897 int ssid = atoi (&path[17]);
898 route_recenable (ssid, argv[0]->f == 1.0, msg);
901 else if (!strncmp (path, "/strip/record_safe/", 19) && strlen (path) > 19) {
902 int ssid = atoi (&path[19]);
903 route_recsafe (ssid, argv[0]->f == 1.0, msg);
906 else if (!strncmp (path, "/strip/select/", 14) && strlen (path) > 14) {
907 int ssid = atoi (&path[14]);
908 strip_select (ssid, argv[0]->f == 1.0, msg);
911 else if (!strncmp (path, "/strip/gui_select/", 18) && strlen (path) > 18) {
912 int ssid = atoi (&path[18]);
913 strip_gui_select (ssid, argv[0]->f == 1.0, msg);
916 else if (!strncmp (path, "/select/send_gain/", 18) && strlen (path) > 18) {
917 int ssid = atoi (&path[18]);
918 route_mute (ssid, argv[0]->f == 1.0, msg);
921 else if (!strncmp (path, "/select/send_fader/", 19) && strlen (path) > 19) {
922 int ssid = atoi (&path[19]);
923 route_solo (ssid, argv[0]->f == 1.0, msg);
928 if ((ret && _debugmode == Unhandled)) {
929 debugmsg (_("Unhandled OSC message"), path, types, argv, argc);
936 OSC::debugmsg (const char *prefix, const char *path, const char* types, lo_arg **argv, int argc)
938 std::stringstream ss;
939 for (int i = 0; i < argc; ++i) {
940 lo_type type = (lo_type)types[i];
944 ss << "i:" << argv[i]->i;
947 ss << "f:" << argv[i]->f;
950 ss << "d:" << argv[i]->d;
953 ss << "s:" << &argv[i]->s;
956 ss << "h:" << argv[i]->h;
959 ss << "c:" << argv[i]->s;
990 PBD::info << prefix << ": " << path << ss.str() << endmsg;
999 // "Application Hook" Handlers //
1001 OSC::session_loaded (Session& s)
1003 // lo_address listener = lo_address_new (NULL, "7770");
1004 // lo_send (listener, "/session/loaded", "ss", s.path().c_str(), s.name().c_str());
1008 OSC::session_exported (std::string path, std::string name)
1010 lo_address listener = lo_address_new (NULL, "7770");
1011 lo_send (listener, "/session/exported", "ss", path.c_str(), name.c_str());
1012 lo_address_free (listener);
1015 // end "Application Hook" Handlers //
1017 /* path callbacks */
1020 OSC::current_value (const char */*path*/, const char */*types*/, lo_arg **/*argv*/, int /*argc*/, void */*data*/, void* /*user_data*/)
1025 if (argc < 3 || types == 0 || strlen (types) < 3 || types[0] != 's' || types[1] != 's' || types[2] != s) {
1029 const char *returl = argv[1]->s;
1030 lo_address addr = find_or_cache_addr (returl);
1032 const char *retpath = argv[2]->s;
1035 if (strcmp (argv[0]->s, "transport_frame") == 0) {
1038 lo_send (addr, retpath, "i", session->transport_frame());
1041 } else if (strcmp (argv[0]->s, "transport_speed") == 0) {
1044 lo_send (addr, retpath, "i", session->transport_frame());
1047 } else if (strcmp (argv[0]->s, "transport_locked") == 0) {
1050 lo_send (addr, retpath, "i", session->transport_frame());
1053 } else if (strcmp (argv[0]->s, "punch_in") == 0) {
1056 lo_send (addr, retpath, "i", session->transport_frame());
1059 } else if (strcmp (argv[0]->s, "punch_out") == 0) {
1062 lo_send (addr, retpath, "i", session->transport_frame());
1065 } else if (strcmp (argv[0]->s, "rec_enable") == 0) {
1068 lo_send (addr, retpath, "i", session->transport_frame());
1080 OSC::routes_list (lo_message msg)
1085 for (int n = 0; n < (int) session->nroutes(); ++n) {
1087 boost::shared_ptr<Route> r = session->get_remote_nth_route (n);
1091 lo_message reply = lo_message_new ();
1093 if (boost::dynamic_pointer_cast<AudioTrack>(r)) {
1094 lo_message_add_string (reply, "AT");
1095 } else if (boost::dynamic_pointer_cast<MidiTrack>(r)) {
1096 lo_message_add_string (reply, "MT");
1098 lo_message_add_string (reply, "B");
1101 lo_message_add_string (reply, r->name().c_str());
1102 lo_message_add_int32 (reply, r->n_inputs().n_audio());
1103 lo_message_add_int32 (reply, r->n_outputs().n_audio());
1104 lo_message_add_int32 (reply, r->muted());
1105 lo_message_add_int32 (reply, r->soloed());
1106 /* XXX Can only use order at this point */
1107 lo_message_add_int32 (reply, r->presentation_info().order());
1109 if (boost::dynamic_pointer_cast<AudioTrack>(r)
1110 || boost::dynamic_pointer_cast<MidiTrack>(r)) {
1112 boost::shared_ptr<Track> t = boost::dynamic_pointer_cast<Track>(r);
1113 lo_message_add_int32 (reply, (int32_t) t->rec_enable_control()->get_value());
1116 //Automatically listen to routes listed
1117 listen_to_route(r, lo_message_get_source (msg));
1119 lo_send_message (lo_message_get_source (msg), "#reply", reply);
1120 lo_message_free (reply);
1124 // Send end of listing message
1125 lo_message reply = lo_message_new ();
1127 lo_message_add_string (reply, "end_route_list");
1128 lo_message_add_int64 (reply, session->frame_rate());
1129 lo_message_add_int64 (reply, session->current_end_frame());
1131 lo_send_message (lo_message_get_source (msg), "#reply", reply);
1133 lo_message_free (reply);
1137 OSC::set_surface (uint32_t b_size, uint32_t strips, uint32_t fb, uint32_t gm, lo_message msg)
1139 OSCSurface *s = get_surface(lo_message_get_source (msg));
1140 s->bank_size = b_size;
1141 s->strip_types = strips;
1142 //next line could be a call that finds out how many strips there are
1143 s->nstrips = session->nroutes(); // need to do this for strips
1146 // set bank and strip feedback
1147 set_bank(s->bank, msg);
1149 global_feedback (s->feedback, msg, s->gainmode);
1154 OSC::set_surface_bank_size (uint32_t bs, lo_message msg)
1156 OSCSurface *s = get_surface(lo_message_get_source (msg));
1159 // set bank and strip feedback
1160 set_bank(s->bank, msg);
1166 OSC::set_surface_strip_types (uint32_t st, lo_message msg)
1168 OSCSurface *s = get_surface(lo_message_get_source (msg));
1169 s->strip_types = st;
1170 //next line could be a call that finds out how many strips there are
1171 s->nstrips = session->nroutes(); // need to do this for strips
1173 // set bank and strip feedback
1174 set_bank(s->bank, msg);
1180 OSC::set_surface_feedback (uint32_t fb, lo_message msg)
1182 OSCSurface *s = get_surface(lo_message_get_source (msg));
1185 // set bank and strip feedback
1186 set_bank(s->bank, msg);
1188 // Set global/master feedback
1189 global_feedback (s->feedback, msg, s->gainmode);
1195 OSC::set_surface_gainmode (uint32_t gm, lo_message msg)
1197 OSCSurface *s = get_surface(lo_message_get_source (msg));
1200 // set bank and strip feedback
1201 set_bank(s->bank, msg);
1203 // Set global/master feedback
1204 global_feedback (s->feedback, msg, s->gainmode);
1209 OSC::get_surface (lo_address addr)
1213 rurl = lo_address_get_url (addr);
1216 for (uint32_t it = 0; it < _surface.size(); ++it) {
1217 //find setup for this server
1218 if (!_surface[it].remote_url.find(r_url)){
1219 return &_surface[it];
1222 // No surface create one with default values
1224 s.remote_url = r_url;
1226 s.bank_size = 0; // need to find out how many strips there are
1227 s.nstrips = session->nroutes(); // may need to do this after MARK below
1228 s.strip_types = 31; // 31 is tracks, busses, and VCAs (no master/monitor)
1233 //get sorted should go here
1234 _surface.push_back (s);
1236 return &_surface[_surface.size() - 1];
1239 // setup global feedback for a surface
1241 OSC::global_feedback (bitset<32> feedback, lo_address msg, uint32_t gainmode)
1243 // first destroy global observer for this surface
1244 GlobalObservers::iterator x;
1246 for (x = global_observers.begin(); x != global_observers.end();) {
1248 OSCGlobalObserver* ro;
1250 if ((ro = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
1252 int res = strcmp(lo_address_get_url(ro->address()), lo_address_get_url(lo_message_get_source (msg)));
1256 x = global_observers.erase (x);
1264 if (feedback[4] || feedback[3] || feedback[5] || feedback[6]) {
1265 // create a new Global Observer for this surface
1266 //OSCSurface *s = get_surface (lo_message_get_source (msg));
1267 OSCGlobalObserver* o = new OSCGlobalObserver (*session, lo_message_get_source (msg), gainmode, /*s->*/feedback);
1268 global_observers.push_back (o);
1273 OSC::notify_routes_added (ARDOUR::RouteList &)
1279 OSC::notify_vca_added (ARDOUR::VCAList &)
1287 for (uint32_t it = 0; it < _surface.size(); ++it) {
1288 OSCSurface* sur = &_surface[it];
1290 lo_address addr = lo_address_new_from_url (sur->remote_url.c_str());
1291 _set_bank (sur->bank, addr);
1296 * This gets called not only when bank changes but also:
1297 * - bank size change
1299 * - strip types changes
1300 * - fadermode changes
1301 * - stripable creation/deletion/flag
1302 * - to refresh what is "displayed"
1303 * Basically any time the bank needs to be rebuilt
1306 OSC::set_bank (uint32_t bank_start, lo_message msg)
1308 return _set_bank (bank_start, lo_message_get_source (msg));
1312 OSC::_set_bank (uint32_t bank_start, lo_address addr)
1317 //StripableList strips;
1318 //session->get_stripables (strips);
1319 // no nstripables yet
1320 if (!session->nroutes()) {
1323 // don't include monitor or master in count for now
1325 if (session->monitor_out ()) {
1326 nstrips = session->nroutes() - 2;
1328 nstrips = session->nroutes() - 1;
1330 // reset local select
1331 _strip_select (0, addr);
1332 // undo all listeners for this url
1333 for (int n = 0; n <= (int) nstrips; ++n) {
1335 boost::shared_ptr<Stripable> stp = session->get_remote_nth_stripable (n, PresentationInfo::Route);
1338 end_listen (stp, addr);
1342 OSCSurface *s = get_surface (addr);
1345 if (!s->bank_size) {
1349 b_size = s->bank_size;
1352 // Do limits checking - high end still not quite right
1353 if (bank_start < 1) bank_start = 1;
1354 if (b_size >= nstrips) {
1356 } else if ((bank_start > nstrips)) {
1357 bank_start = (uint32_t)((nstrips - b_size) + 1);
1359 //save bank in case we have had to change it
1360 s->bank = bank_start;
1362 if (s->feedback[0] || s->feedback[1]) {
1363 for (int n = bank_start; n < (int) (b_size + bank_start); ++n) {
1364 // this next will eventually include strip types
1365 boost::shared_ptr<Stripable> stp = session->get_remote_nth_stripable (n - 1, PresentationInfo::Route);
1368 listen_to_route(stp, addr);
1369 if (!s->feedback[10]) {
1370 if (stp->is_selected()) {
1371 _strip_select (n, addr);
1383 OSC::bank_up (lo_message msg)
1388 OSCSurface *s = get_surface(lo_message_get_source (msg));
1389 set_bank (s->bank + s->bank_size, msg);
1394 OSC::bank_down (lo_message msg)
1399 OSCSurface *s = get_surface(lo_message_get_source (msg));
1400 if (s->bank < s->bank_size) {
1403 set_bank (s->bank - s->bank_size, msg);
1409 OSC::get_sid (uint32_t rid, lo_address addr)
1411 OSCSurface *s = get_surface(addr);
1412 return rid - s->bank + 1;
1416 OSC::get_rid (uint32_t ssid, lo_address addr)
1418 OSCSurface *s = get_surface(addr);
1419 return ssid + s->bank - 2;
1423 OSC::transport_frame (lo_message msg)
1428 framepos_t pos = session->transport_frame ();
1430 lo_message reply = lo_message_new ();
1431 lo_message_add_int64 (reply, pos);
1433 lo_send_message (lo_message_get_source (msg), "/transport_frame", reply);
1435 lo_message_free (reply);
1439 OSC::transport_speed (lo_message msg)
1444 double ts = session->transport_speed ();
1446 lo_message reply = lo_message_new ();
1447 lo_message_add_double (reply, ts);
1449 lo_send_message (lo_message_get_source (msg), "/transport_speed", reply);
1451 lo_message_free (reply);
1455 OSC::record_enabled (lo_message msg)
1460 int re = (int)session->get_record_enabled ();
1462 lo_message reply = lo_message_new ();
1463 lo_message_add_int32 (reply, re);
1465 lo_send_message (lo_message_get_source (msg), "/record_enabled", reply);
1467 lo_message_free (reply);
1470 // master and monitor calls
1472 OSC::master_set_gain (float dB)
1474 if (!session) return -1;
1475 boost::shared_ptr<Stripable> s = session->master_out();
1478 s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup);
1480 s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1487 OSC::master_set_fader (uint32_t position)
1489 if (!session) return -1;
1490 boost::shared_ptr<Stripable> s = session->master_out();
1492 if ((position > 799.5) && (position < 800.5)) {
1493 s->gain_control()->set_value (1.0, PBD::Controllable::NoGroup);
1495 s->gain_control()->set_value (slider_position_to_gain_with_max (((float)position/1023), 2.0), PBD::Controllable::NoGroup);
1502 OSC::master_set_trim (float dB)
1504 if (!session) return -1;
1505 boost::shared_ptr<Stripable> s = session->master_out();
1508 s->trim_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1515 OSC::master_set_pan_stereo_position (float position, lo_message msg)
1517 if (!session) return -1;
1519 float endposition = .5;
1520 boost::shared_ptr<Stripable> s = session->master_out();
1523 if (s->pan_azimuth_control()) {
1524 s->pan_azimuth_control()->set_value (position, PBD::Controllable::NoGroup);
1525 endposition = s->pan_azimuth_control()->get_value ();
1528 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1530 if (sur->feedback[4]) {
1531 lo_message reply = lo_message_new ();
1532 lo_message_add_float (reply, endposition);
1534 lo_send_message (lo_message_get_source (msg), "/master/pan_stereo_position", reply);
1535 lo_message_free (reply);
1542 OSC::master_set_mute (uint32_t state)
1544 if (!session) return -1;
1546 boost::shared_ptr<Stripable> s = session->master_out();
1549 s->mute_control()->set_value (state, PBD::Controllable::NoGroup);
1556 OSC::monitor_set_gain (float dB)
1558 if (!session) return -1;
1559 boost::shared_ptr<Stripable> s = session->monitor_out();
1563 s->gain_control()->set_value (0.0, PBD::Controllable::NoGroup);
1565 s->gain_control()->set_value (dB_to_coefficient (dB), PBD::Controllable::NoGroup);
1572 OSC::monitor_set_fader (uint32_t position)
1574 if (!session) return -1;
1575 boost::shared_ptr<Stripable> s = session->monitor_out();
1577 if ((position > 799.5) && (position < 800.5)) {
1578 s->gain_control()->set_value (1.0, PBD::Controllable::NoGroup);
1580 s->gain_control()->set_value (slider_position_to_gain_with_max (((float)position/1023), 2.0), PBD::Controllable::NoGroup);
1588 OSC::route_mute (int ssid, int yn, lo_message msg)
1590 if (!session) return -1;
1591 int rid = get_rid (ssid, lo_message_get_source (msg));
1593 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1596 if (s->mute_control()) {
1597 s->mute_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1602 return route_send_fail ("mute", ssid, 0, lo_message_get_source (msg));
1606 OSC::sel_mute (uint32_t yn, lo_message msg)
1608 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1609 if (sur->surface_sel) {
1610 return route_mute(sur->surface_sel, yn, msg);
1612 return route_send_fail ("mute", 0, 0, lo_message_get_source (msg));
1617 OSC::route_solo (int ssid, int yn, lo_message msg)
1619 if (!session) return -1;
1620 int rid = get_rid (ssid, lo_message_get_source (msg));
1622 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1625 if (s->solo_control()) {
1626 s->solo_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1631 return route_send_fail ("solo", ssid, 0, lo_message_get_source (msg));
1635 OSC::route_solo_iso (int ssid, int yn, lo_message msg)
1637 if (!session) return -1;
1638 int rid = get_rid (ssid, lo_message_get_source (msg));
1640 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1643 if (s->solo_isolate_control()) {
1644 s->solo_isolate_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1649 return route_send_fail ("solo_iso", ssid, 0, lo_message_get_source (msg));
1653 OSC::route_solo_safe (int ssid, int yn, lo_message msg)
1655 if (!session) return -1;
1656 int rid = get_rid (ssid, lo_message_get_source (msg));
1658 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1661 if (s->solo_safe_control()) {
1662 s->solo_safe_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1667 return route_send_fail ("solo_safe", ssid, 0, lo_message_get_source (msg));
1671 OSC::sel_solo (uint32_t yn, lo_message msg)
1673 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1674 if (sur->surface_sel) {
1675 return route_solo(sur->surface_sel, yn, msg);
1677 return route_send_fail ("solo", 0, 0, lo_message_get_source (msg));
1682 OSC::sel_solo_iso (uint32_t yn, lo_message msg)
1684 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1685 if (sur->surface_sel) {
1686 return route_solo_iso(sur->surface_sel, yn, msg);
1688 return route_send_fail ("solo_iso", 0, 0, lo_message_get_source (msg));
1693 OSC::sel_solo_safe (uint32_t yn, lo_message msg)
1695 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1696 if (sur->surface_sel) {
1697 return route_solo_safe(sur->surface_sel, yn, msg);
1699 return route_send_fail ("solo_safe", 0, 0, lo_message_get_source (msg));
1704 OSC::sel_recenable (uint32_t yn, lo_message msg)
1706 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1707 if (sur->surface_sel) {
1708 return route_recenable(sur->surface_sel, yn, msg);
1710 return route_send_fail ("recenable", 0, 0, lo_message_get_source (msg));
1715 OSC::route_recenable (int ssid, int yn, lo_message msg)
1717 if (!session) return -1;
1718 int rid = get_rid (ssid, lo_message_get_source (msg));
1720 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1723 if (s->rec_enable_control()) {
1724 s->rec_enable_control()->set_value (yn, PBD::Controllable::UseGroup);
1725 if (s->rec_enable_control()->get_value()) {
1730 return route_send_fail ("recenable", ssid, 0, lo_message_get_source (msg));
1734 OSC::sel_recsafe (uint32_t yn, lo_message msg)
1736 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1737 if (sur->surface_sel) {
1738 return route_recsafe(sur->surface_sel, yn, msg);
1740 return route_send_fail ("record_safe", 0, 0, lo_message_get_source (msg));
1745 OSC::route_recsafe (int ssid, int yn, lo_message msg)
1747 if (!session) return -1;
1748 int rid = get_rid (ssid, lo_message_get_source (msg));
1750 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1752 if (s->rec_safe_control()) {
1753 s->rec_safe_control()->set_value (yn, PBD::Controllable::UseGroup);
1754 if (s->rec_safe_control()->get_value()) {
1759 return route_send_fail ("record_safe", ssid, 0,lo_message_get_source (msg));
1763 OSC::route_monitor_input (int ssid, int yn, lo_message msg)
1765 if (!session) return -1;
1766 int rid = get_rid (ssid, lo_message_get_source (msg));
1768 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1771 boost::shared_ptr<Track> track = boost::dynamic_pointer_cast<Track> (s);
1773 if (track->monitoring_control()) {
1774 track->monitoring_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1780 return route_send_fail ("monitor_input", ssid, 0, lo_message_get_source (msg));
1784 OSC::sel_monitor_input (uint32_t yn, lo_message msg)
1786 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1787 if (sur->surface_sel) {
1788 return route_monitor_input(sur->surface_sel, yn, msg);
1790 return route_send_fail ("monitor_input", 0, 0, lo_message_get_source (msg));
1795 OSC::route_monitor_disk (int ssid, int yn, lo_message msg)
1797 if (!session) return -1;
1798 int rid = get_rid (ssid, lo_message_get_source (msg));
1800 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1803 boost::shared_ptr<Track> track = boost::dynamic_pointer_cast<Track> (s);
1805 if (track->monitoring_control()) {
1806 track->monitoring_control()->set_value (yn ? 2.0 : 0.0, PBD::Controllable::NoGroup);
1812 return route_send_fail ("monitor_disk", ssid, 0, lo_message_get_source (msg));
1816 OSC::sel_monitor_disk (uint32_t yn, lo_message msg)
1818 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1819 if (sur->surface_sel) {
1820 return route_monitor_disk(sur->surface_sel, yn, msg);
1822 return route_send_fail ("monitor_disk", 0, 0, lo_message_get_source (msg));
1828 OSC::strip_phase (int ssid, int yn, lo_message msg)
1830 if (!session) return -1;
1831 int rid = get_rid (ssid, lo_message_get_source (msg));
1833 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1836 if (s->phase_control()) {
1837 s->phase_control()->set_value (yn ? 1.0 : 0.0, PBD::Controllable::NoGroup);
1842 return route_send_fail ("polarity", ssid, 0, lo_message_get_source (msg));
1846 OSC::sel_phase (uint32_t yn, lo_message msg)
1848 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1849 if (sur->surface_sel) {
1850 return strip_phase(sur->surface_sel, yn, msg);
1852 return route_send_fail ("polarity", 0, 0, lo_message_get_source (msg));
1857 OSC::strip_select (int ssid, int yn, lo_message msg)
1859 //ignore button release
1862 return _strip_select ( ssid, lo_message_get_source (msg));
1866 OSC::_strip_select (int ssid, lo_address addr)
1869 route_send_fail ("select", ssid, 0, addr);
1872 int rid = get_rid (ssid, addr);
1873 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1874 OSCSurface *sur = get_surface(addr);
1876 delete sur->sel_obs;
1879 sur->surface_sel = 0;
1882 sur->surface_sel = ssid;
1883 OSCSelectObserver* sel_fb = new OSCSelectObserver (s, addr, ssid, sur->gainmode, sur->feedback);
1884 s->DropReferences.connect (*this, MISSING_INVALIDATOR, boost::bind (&OSC::recalcbanks, this), this);
1885 sur->sel_obs = sel_fb;
1887 route_send_fail ("select", ssid, 0 , addr);
1889 int b_s = sur->bank_size;
1890 if (!b_s) { // bank size 0 means we need to know how many strips there are.
1893 for (int i = 1; i <= b_s; i++) {
1894 string path = "select";
1895 if (!sur->feedback[10]) {
1896 path = "gui_select";
1898 if (i==(int)sur->surface_sel) {
1899 lo_message reply = lo_message_new ();
1900 if (sur->feedback[2]) {
1902 os << "/strip/" << path << "/" << ssid;
1906 os << "/strip/" << path;
1908 lo_message_add_int32 (reply, ssid);
1910 lo_message_add_float (reply, (float) 1);
1912 lo_send_message (addr, path.c_str(), reply);
1913 lo_message_free (reply);
1915 route_send_fail (path, i, 0, addr);
1923 OSC::strip_gui_select (int ssid, int yn, lo_message msg)
1925 //ignore button release
1929 route_send_fail ("gui_select", ssid, 0, lo_message_get_source (msg));
1933 int rid = get_rid (ssid, lo_message_get_source (msg));
1934 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1936 SetStripableSelection (rid);
1938 route_send_fail ("gui_select", ssid, 0, lo_message_get_source (msg));
1945 OSC::route_set_gain_abs (int rid, float level, lo_message msg)
1947 if (!session) return -1;
1948 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
1951 if (s->gain_control()) {
1952 s->gain_control()->set_value (level, PBD::Controllable::NoGroup);
1964 OSC::route_set_gain_dB (int ssid, float dB, lo_message msg)
1967 route_send_fail ("gain", ssid, -193, lo_message_get_source (msg));
1971 int rid = get_rid (ssid, lo_message_get_source (msg));
1973 ret = route_set_gain_abs (rid, 0.0, msg);
1975 ret = route_set_gain_abs (rid, dB_to_coefficient (dB), msg);
1978 return route_send_fail ("gain", ssid, -193, lo_message_get_source (msg));
1984 OSC::sel_gain (float val, lo_message msg)
1986 OSCSurface *sur = get_surface(lo_message_get_source (msg));
1987 if (sur->surface_sel) {
1988 return route_set_gain_dB(sur->surface_sel, val, msg);
1990 return route_send_fail ("gain", 0, -193, lo_message_get_source (msg));
1995 OSC::route_set_gain_fader (int ssid, float pos, lo_message msg)
1998 route_send_fail ("fader", ssid, 0, lo_message_get_source (msg));
2002 int rid = get_rid (ssid, lo_message_get_source (msg));
2003 if ((pos > 799.5) && (pos < 800.5)) {
2004 ret = route_set_gain_abs (rid, 1.0, msg);
2006 ret = route_set_gain_abs (rid, slider_position_to_gain_with_max ((pos/1023), 2.0), msg);
2009 return route_send_fail ("fader", ssid, 0, lo_message_get_source (msg));
2015 OSC::sel_fader (float val, lo_message msg)
2017 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2018 if (sur->surface_sel) {
2019 return route_set_gain_fader(sur->surface_sel, val, msg);
2021 return route_send_fail ("fader", 0, 0, lo_message_get_source (msg));
2026 OSC::route_set_trim_abs (int ssid, float level, lo_message msg)
2028 if (!session) return -1;
2029 int rid = get_rid (ssid, lo_message_get_source (msg));
2031 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2034 if (s->trim_control()) {
2035 s->trim_control()->set_value (level, PBD::Controllable::NoGroup);
2045 OSC::route_set_trim_dB (int ssid, float dB, lo_message msg)
2048 ret = route_set_trim_abs(ssid, dB_to_coefficient (dB), msg);
2050 return route_send_fail ("trimdB", ssid, 0, lo_message_get_source (msg));
2057 OSC::sel_trim (float val, lo_message msg)
2059 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2060 if (sur->surface_sel) {
2061 return route_set_trim_dB (sur->surface_sel, val, msg);
2063 return route_send_fail ("trimdB", 0, 0, lo_message_get_source (msg));
2068 OSC::sel_pan_position (float val, lo_message msg)
2070 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2071 if (sur->surface_sel) {
2072 return route_set_pan_stereo_position (sur->surface_sel, val, msg);
2074 return route_send_fail ("pan_stereo_position", 0, 0.5, lo_message_get_source (msg));
2079 OSC::sel_pan_width (float val, lo_message msg)
2081 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2082 if (sur->surface_sel) {
2083 return route_set_pan_stereo_width (sur->surface_sel, val, msg);
2085 return route_send_fail ("pan_stereo_width", 0, 1, lo_message_get_source (msg));
2090 OSC::route_set_pan_stereo_position (int ssid, float pos, lo_message msg)
2092 if (!session) return -1;
2093 int rid = get_rid (ssid, lo_message_get_source (msg));
2095 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2098 if(s->pan_azimuth_control()) {
2099 s->pan_azimuth_control()->set_value (pos, PBD::Controllable::NoGroup);
2100 return route_send_fail ("pan_stereo_position", ssid, s->pan_azimuth_control()->get_value (), lo_message_get_source (msg));
2104 return route_send_fail ("pan_stereo_position", ssid, 0.5, lo_message_get_source (msg));
2108 OSC::route_set_pan_stereo_width (int ssid, float pos, lo_message msg)
2110 if (!session) return -1;
2111 int rid = get_rid (ssid, lo_message_get_source (msg));
2113 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2116 if (s->pan_width_control()) {
2117 s->pan_width_control()->set_value (pos, PBD::Controllable::NoGroup);
2122 return route_send_fail ("pan_stereo_width", ssid, 1, lo_message_get_source (msg));
2126 OSC::route_set_send_gain_abs (int ssid, int sid, float val, lo_message msg)
2131 int rid = get_rid (ssid, lo_message_get_source (msg));
2133 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2139 /* revert to zero-based counting */
2145 if (s->send_level_controllable (sid)) {
2146 s->send_level_controllable (sid)->set_value (val, PBD::Controllable::NoGroup);
2154 OSC::route_set_send_gain_dB (int ssid, int sid, float val, lo_message msg)
2156 return route_set_send_gain_abs (ssid, sid, dB_to_coefficient (val), msg);
2160 OSC::route_set_send_fader (int ssid, int sid, float pos, lo_message msg)
2165 if ((pos > 799.5) && (pos < 800.5)) {
2166 return route_set_send_gain_abs (ssid, sid, 1.0, msg);
2168 return route_set_send_gain_abs (ssid, sid, slider_position_to_gain_with_max ((pos/1023), 2.0), msg);
2173 OSC::sel_sendgain (int id, float val, lo_message msg)
2175 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2177 if (sur->surface_sel) {
2178 ret = route_set_send_gain_dB(sur->surface_sel, id, val, msg);
2183 return sel_send_fail ("send_gain", id, -193, lo_message_get_source (msg));
2187 OSC::sel_sendfader (int id, float val, lo_message msg)
2189 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2191 if (sur->surface_sel) {
2192 ret = route_set_send_fader(sur->surface_sel, id, val, msg);
2197 return sel_send_fail ("send_gain", id, 0, lo_message_get_source (msg));
2202 OSC::route_set_send_enable (int ssid, int sid, float val, lo_message msg)
2207 int rid = get_rid (ssid, lo_message_get_source (msg));
2209 boost::shared_ptr<Stripable> s = session->get_remote_nth_stripable (rid, PresentationInfo::Route);
2213 /* revert to zero-based counting */
2219 if (s->send_enable_controllable (sid)) {
2220 s->send_enable_controllable (sid)->set_value (val, PBD::Controllable::NoGroup);
2224 if (s->send_level_controllable (sid)) {
2234 OSC::sel_sendenable (int id, float val, lo_message msg)
2236 OSCSurface *sur = get_surface(lo_message_get_source (msg));
2238 if (sur->surface_sel) {
2239 ret = route_set_send_enable(sur->surface_sel, id, val, msg);
2245 return sel_send_fail ("send_enable", id, 1, lo_message_get_source (msg));
2247 sel_send_fail ("send_enable", id, 0, lo_message_get_source (msg));
2256 OSC::route_plugin_parameter (int ssid, int piid, int par, float val, lo_message msg)
2260 int rid = get_rid (ssid, lo_message_get_source (msg));
2262 boost::shared_ptr<Route> r = session->get_remote_nth_route (rid);
2265 PBD::error << "OSC: Invalid Remote Control ID '" << rid << "'" << endmsg;
2269 boost::shared_ptr<Processor> redi=r->nth_plugin (piid);
2272 PBD::error << "OSC: cannot find plugin # " << piid << " for RID '" << rid << "'" << endmsg;
2276 boost::shared_ptr<PluginInsert> pi;
2278 if (!(pi = boost::dynamic_pointer_cast<PluginInsert>(redi))) {
2279 PBD::error << "OSC: given processor # " << piid << " on RID '" << rid << "' is not a Plugin." << endmsg;
2283 boost::shared_ptr<ARDOUR::Plugin> pip = pi->plugin();
2286 uint32_t controlid = pip->nth_parameter (par,ok);
2289 PBD::error << "OSC: Cannot find parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "'" << endmsg;
2293 if (!pip->parameter_is_input(controlid)) {
2294 PBD::error << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "' is not a control input" << endmsg;
2298 ParameterDescriptor pd;
2299 pi->plugin()->get_parameter_descriptor (controlid,pd);
2301 if (val >= pd.lower && val <= pd.upper) {
2303 boost::shared_ptr<AutomationControl> c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid));
2304 // cerr << "parameter:" << redi->describe_parameter(controlid) << " val:" << val << "\n";
2305 c->set_value (val, PBD::Controllable::NoGroup);
2307 PBD::warning << "OSC: Parameter # " << par << " for plugin # " << piid << " on RID '" << rid << "' is out of range" << endmsg;
2308 PBD::info << "OSC: Valid range min=" << pd.lower << " max=" << pd.upper << endmsg;
2314 //prints to cerr only
2316 OSC::route_plugin_parameter_print (int ssid, int piid, int par, lo_message msg)
2321 int rid = get_rid (ssid, lo_message_get_source (msg));
2323 boost::shared_ptr<Route> r = session->get_remote_nth_route (rid);
2329 boost::shared_ptr<Processor> redi=r->nth_processor (piid);
2335 boost::shared_ptr<PluginInsert> pi;
2337 if (!(pi = boost::dynamic_pointer_cast<PluginInsert>(redi))) {
2341 boost::shared_ptr<ARDOUR::Plugin> pip = pi->plugin();
2344 uint32_t controlid = pip->nth_parameter (par,ok);
2350 ParameterDescriptor pd;
2352 if (pi->plugin()->get_parameter_descriptor (controlid, pd) == 0) {
2353 boost::shared_ptr<AutomationControl> c = pi->automation_control (Evoral::Parameter(PluginAutomation, 0, controlid));
2355 cerr << "parameter: " << redi->describe_parameter(controlid) << "\n";
2356 cerr << "current value: " << c->get_value ();
2357 cerr << "lower value: " << pd.lower << "\n";
2358 cerr << "upper value: " << pd.upper << "\n";
2365 OSC::gui_selection_changed (StripableNotificationListPtr stripables)
2367 boost::shared_ptr<Stripable> strip;
2369 if (!stripables->empty()) {
2370 strip = stripables->front().lock();
2373 for (uint32_t it = 0; it < _surface.size(); ++it) {
2374 OSCSurface* sur = &_surface[it];
2375 if(!sur->feedback[10]) {
2376 uint32_t sel_strip = strip->presentation_info().order() + 1;
2377 if (!(sel_strip < sur->bank) && !(sel_strip >= (sur->bank + sur->bank_size))) {
2378 lo_address addr = lo_address_new_from_url (sur->remote_url.c_str());
2379 _strip_select ((sel_strip - sur->bank + 1), addr);
2389 OSC::periodic (void)
2397 for (GlobalObservers::iterator x = global_observers.begin(); x != global_observers.end(); x++) {
2399 OSCGlobalObserver* go;
2401 if ((go = dynamic_cast<OSCGlobalObserver*>(*x)) != 0) {
2405 for (RouteObservers::iterator x = route_observers.begin(); x != route_observers.end(); x++) {
2407 OSCRouteObserver* ro;
2409 if ((ro = dynamic_cast<OSCRouteObserver*>(*x)) != 0) {
2413 for (uint32_t it = 0; it < _surface.size(); it++) {
2414 OSCSurface* sur = &_surface[it];
2415 OSCSelectObserver* so;
2416 if ((so = dynamic_cast<OSCSelectObserver*>(sur->sel_obs)) != 0) {
2424 OSC::route_send_fail (string path, uint32_t ssid, float val, lo_address addr)
2426 OSCSurface *sur = get_surface(addr);
2431 reply = lo_message_new ();
2432 if (sur->feedback[2]) {
2433 os << "/strip/" << path << "/" << ssid;
2435 os << "/strip/" << path;
2436 lo_message_add_int32 (reply, ssid);
2438 string str_pth = os.str();
2439 lo_message_add_float (reply, (float) val);
2441 lo_send_message (addr, str_pth.c_str(), reply);
2442 lo_message_free (reply);
2444 if (sur->surface_sel == ssid) {
2446 os << "/select/" << path;
2447 string sel_pth = os.str();
2448 reply = lo_message_new ();
2449 lo_message_add_float (reply, (float) val);
2450 lo_send_message (addr, sel_pth.c_str(), reply);
2451 lo_message_free (reply);
2458 OSC::sel_send_fail (string path, uint32_t id, float val, lo_address addr)
2460 OSCSurface *sur = get_surface(addr);
2464 reply = lo_message_new ();
2465 if (sur->feedback[2]) {
2466 os << "/select/" << path << "/" << id;
2468 os << "/select/" << path;
2469 lo_message_add_int32 (reply, id);
2471 string str_pth = os.str();
2472 lo_message_add_float (reply, (float) val);
2474 lo_send_message (addr, str_pth.c_str(), reply);
2475 lo_message_free (reply);
2483 XMLNode& node (ControlProtocol::get_state());
2484 node.add_property("debugmode", (int) _debugmode); // TODO: enum2str
2489 OSC::set_state (const XMLNode& node, int version)
2491 if (ControlProtocol::set_state (node, version)) {
2494 XMLProperty const * p = node.property (X_("debugmode"));
2496 _debugmode = OSCDebugMode (PBD::atoi(p->value ()));