OSC: Make pan controls work properly with MB too.
[ardour.git] / libs / surfaces / osc / osc_route_observer.cc
1 /*
2     Copyright (C) 2009 Paul Davis
3
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.
8
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.
13
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., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18 */
19
20 #include "boost/lambda/lambda.hpp"
21
22 #include "ardour/session.h"
23 #include "ardour/track.h"
24 #include "ardour/monitor_control.h"
25 #include "ardour/dB.h"
26 #include "ardour/meter.h"
27
28 #include "osc.h"
29 #include "osc_route_observer.h"
30
31 #include "pbd/i18n.h"
32
33 using namespace std;
34 using namespace PBD;
35 using namespace ARDOUR;
36 using namespace ArdourSurface;
37
38 OSCRouteObserver::OSCRouteObserver (boost::shared_ptr<Stripable> s, lo_address a, uint32_t ss, uint32_t gm, std::bitset<32> fb)
39         : _strip (s)
40         ,ssid (ss)
41         ,gainmode (gm)
42         ,feedback (fb)
43 {
44         addr = lo_address_new (lo_address_get_hostname(a) , lo_address_get_port(a));
45
46         if (feedback[0]) { // buttons are separate feedback
47                 _strip->PropertyChanged.connect (strip_connections, MISSING_INVALIDATOR, boost::bind (&OSCRouteObserver::name_changed, this, boost::lambda::_1), OSC::instance());
48                 name_changed (ARDOUR::Properties::name);
49
50                 _strip->mute_control()->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_change_message, this, X_("/strip/mute"), _strip->mute_control()), OSC::instance());
51                 send_change_message ("/strip/mute", _strip->mute_control());
52
53                 _strip->solo_control()->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_change_message, this, X_("/strip/solo"), _strip->solo_control()), OSC::instance());
54                 send_change_message ("/strip/solo", _strip->solo_control());
55
56                 boost::shared_ptr<Track> track = boost::dynamic_pointer_cast<Track> (_strip);
57                 if (track) {
58                         track->monitoring_control()->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_monitor_status, this, track->monitoring_control()), OSC::instance());
59                         send_monitor_status (track->monitoring_control());
60                 }
61
62                 boost::shared_ptr<AutomationControl> rec_controllable = _strip->rec_enable_control ();
63                 if (rec_controllable) {
64                         rec_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_change_message, this, X_("/strip/recenable"), _strip->rec_enable_control()), OSC::instance());
65                         send_change_message ("/strip/recenable", _strip->rec_enable_control());
66                 }
67                 boost::shared_ptr<AutomationControl> recsafe_controllable = _strip->rec_safe_control ();
68                 if (rec_controllable) {
69                         recsafe_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_change_message, this, X_("/strip/record_safe"), _strip->rec_safe_control()), OSC::instance());
70                         send_change_message ("/strip/record_safe", _strip->rec_safe_control());
71                 }
72                 _strip->presentation_info().PropertyChanged.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_select_status, this, _1), OSC::instance());
73                 send_select_status (ARDOUR::Properties::selected);
74         }
75
76         if (feedback[1]) { // level controls
77                 if (gainmode) {
78                         _strip->gain_control()->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_gain_message, this, X_("/strip/fader"), _strip->gain_control()), OSC::instance());
79                         send_gain_message ("/strip/fader", _strip->gain_control());
80                 } else {
81                         _strip->gain_control()->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_gain_message, this, X_("/strip/gain"), _strip->gain_control()), OSC::instance());
82                         send_gain_message ("/strip/gain", _strip->gain_control());
83                 }
84
85                 boost::shared_ptr<Controllable> trim_controllable = boost::dynamic_pointer_cast<Controllable>(_strip->trim_control());
86                 if (trim_controllable) {
87                         trim_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_trim_message, this, X_("/strip/trimdB"), _strip->trim_control()), OSC::instance());
88                         send_trim_message ("/strip/trimdB", _strip->trim_control());
89                 }
90
91                 boost::shared_ptr<Controllable> pan_controllable = boost::dynamic_pointer_cast<Controllable>(_strip->pan_azimuth_control());
92                 if (pan_controllable) {
93                         pan_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCRouteObserver::send_change_message, this, X_("/strip/pan_stereo_position"), _strip->pan_azimuth_control()), OSC::instance());
94                         send_change_message ("/strip/pan_stereo_position", _strip->pan_azimuth_control());
95                 }
96         }
97         tick();
98 }
99
100 OSCRouteObserver::~OSCRouteObserver ()
101 {
102
103         strip_connections.drop_connections ();
104         // all strip buttons should be off and faders 0 and etc.
105         clear_strip ("/strip/expand", 0);
106         if (feedback[0]) { // buttons are separate feedback
107                 lo_message msg = lo_message_new ();
108                 // name is a string do it first
109                 string path = "/strip/name";
110                 if (feedback[2]) {
111                         path = set_path (path);
112                 } else {
113                         lo_message_add_int32 (msg, ssid);
114                 }
115                 lo_message_add_string (msg, " ");
116
117                 lo_send_message (addr, path.c_str(), msg);
118                 lo_message_free (msg);
119                 clear_strip ("/strip/mute", 0);
120                 clear_strip ("/strip/solo", 0);
121                 clear_strip ("/strip/recenable", 0);
122                 clear_strip ("/strip/record_safe", 0);
123                 clear_strip ("/strip/monitor_input", 0);
124                 clear_strip ("/strip/monitor_disk", 0);
125                 clear_strip ("/strip/gui_select", 0);
126                 clear_strip ("/strip/select", 0);
127         }
128         if (feedback[1]) { // level controls
129                 if (gainmode) {
130                         clear_strip ("/strip/fader", 0);
131                 } else {
132                         clear_strip ("/strip/gain", -193);
133                 }
134                 clear_strip ("/strip/trimdB", 0);
135                 clear_strip ("/strip/pan_stereo_position", 0.5);
136         }
137         if (feedback[9]) {
138                 clear_strip ("/strip/signal", 0);
139         }
140         if (feedback[7]) {
141                 if (gainmode) {
142                         clear_strip ("/strip/meter", 0);
143                 } else {
144                         clear_strip ("/strip/meter", -193);
145                 }
146         }else if (feedback[8]) {
147                 clear_strip ("/strip/meter", 0);
148         }
149
150         lo_address_free (addr);
151 }
152
153 void
154 OSCRouteObserver::tick ()
155 {
156         if (feedback[7] || feedback[8] || feedback[9]) { // meters enabled
157                 // the only meter here is master
158                 float now_meter;
159                 if (_strip->peak_meter()) {
160                         now_meter = _strip->peak_meter()->meter_level(0, MeterMCP);
161                 } else {
162                         now_meter = -193;
163                 }
164                 if (now_meter < -144) now_meter = -193;
165                 if (_last_meter != now_meter) {
166                         if (feedback[7] || feedback[8]) {
167                                 string path = "/strip/meter";
168                                 lo_message msg = lo_message_new ();
169                                 if (feedback[2]) {
170                                         path = set_path (path);
171                                 } else {
172                                         lo_message_add_int32 (msg, ssid);
173                                 }
174                                 if (gainmode && feedback[7]) {
175                                         uint32_t lev1023 = (uint32_t)((now_meter + 54) * 17.05);
176                                         lo_message_add_int32 (msg, lev1023);
177                                         lo_send_message (addr, path.c_str(), msg);
178                                 } else if ((!gainmode) && feedback[7]) {
179                                         lo_message_add_float (msg, now_meter);
180                                         lo_send_message (addr, path.c_str(), msg);
181                                 } else if (feedback[8]) {
182                                         uint32_t ledlvl = (uint32_t)(((now_meter + 54) / 3.75)-1);
183                                         uint16_t ledbits = ~(0xfff<<ledlvl);
184                                         lo_message_add_int32 (msg, ledbits);
185                                         lo_send_message (addr, path.c_str(), msg);
186                                 }
187                                 lo_message_free (msg);
188                         }
189                         if (feedback[9]) {
190                                 string path = "/strip/signal";
191                                 lo_message msg = lo_message_new ();
192                                 if (feedback[2]) {
193                                         path = set_path (path);
194                                 } else {
195                                         lo_message_add_int32 (msg, ssid);
196                                 }
197                                 float signal;
198                                 if (now_meter < -40) {
199                                         signal = 0;
200                                 } else {
201                                         signal = 1;
202                                 }
203                                 lo_message_add_float (msg, signal);
204                                 lo_send_message (addr, path.c_str(), msg);
205                                 lo_message_free (msg);
206                         }
207                 }
208                 _last_meter = now_meter;
209
210         }
211
212 }
213
214 void
215 OSCRouteObserver::name_changed (const PBD::PropertyChange& what_changed)
216 {
217         if (!what_changed.contains (ARDOUR::Properties::name)) {
218             return;
219         }
220
221         if (!_strip) {
222                 return;
223         }
224
225         lo_message msg = lo_message_new ();
226
227         // ssid is the strip on the surface this observer refers to
228         // not part of the internal ordering.
229         string path = "/strip/name";
230         if (feedback[2]) {
231                 path = set_path (path);
232         } else {
233                 lo_message_add_int32 (msg, ssid);
234         }
235         lo_message_add_string (msg, _strip->name().c_str());
236
237         lo_send_message (addr, path.c_str(), msg);
238         lo_message_free (msg);
239 }
240
241 void
242 OSCRouteObserver::send_change_message (string path, boost::shared_ptr<Controllable> controllable)
243 {
244         lo_message msg = lo_message_new ();
245
246         if (feedback[2]) {
247                 path = set_path (path);
248         } else {
249                 lo_message_add_int32 (msg, ssid);
250         }
251         float val = controllable->get_value();
252         lo_message_add_float (msg, (float) controllable->internal_to_interface (val));
253
254         lo_send_message (addr, path.c_str(), msg);
255         lo_message_free (msg);
256 }
257
258 void
259 OSCRouteObserver::send_monitor_status (boost::shared_ptr<Controllable> controllable)
260 {
261         int disk, input;
262         float val = controllable->get_value();
263         switch ((int) val) {
264                 case 1:
265                         disk = 0;
266                         input = 1;
267                         break;
268                 case 2:
269                         disk = 1;
270                         input = 0;
271                         break;
272                 default:
273                         disk = 0;
274                         input = 0;
275         }
276
277         lo_message msg = lo_message_new ();
278         string path = "/strip/monitor_input";
279         if (feedback[2]) {
280                 path = set_path (path);
281         } else {
282                 lo_message_add_int32 (msg, ssid);
283         }
284         lo_message_add_int32 (msg, (float) input);
285         lo_send_message (addr, path.c_str(), msg);
286         lo_message_free (msg);
287
288         msg = lo_message_new ();
289         path = "/strip/monitor_disk";
290         if (feedback[2]) {
291                 path = set_path (path);
292         } else {
293                 lo_message_add_int32 (msg, ssid);
294         }
295         lo_message_add_int32 (msg, (float) disk);
296         lo_send_message (addr, path.c_str(), msg);
297         lo_message_free (msg);
298
299 }
300
301 void
302 OSCRouteObserver::send_trim_message (string path, boost::shared_ptr<Controllable> controllable)
303 {
304         lo_message msg = lo_message_new ();
305
306         if (feedback[2]) {
307                 path = set_path (path);
308         } else {
309                 lo_message_add_int32 (msg, ssid);
310         }
311
312         lo_message_add_float (msg, (float) accurate_coefficient_to_dB (controllable->get_value()));
313
314         lo_send_message (addr, path.c_str(), msg);
315         lo_message_free (msg);
316 }
317
318 void
319 OSCRouteObserver::send_gain_message (string path, boost::shared_ptr<Controllable> controllable)
320 {
321         lo_message msg = lo_message_new ();
322
323         if (feedback[2]) {
324                 path = set_path (path);
325         } else {
326                 lo_message_add_int32 (msg, ssid);
327         }
328
329         if (gainmode) {
330                 if (controllable->get_value() == 1) {
331                         lo_message_add_int32 (msg, 800);
332                 } else {
333                         lo_message_add_int32 (msg, gain_to_slider_position (controllable->get_value()) * 1023);
334                 }
335         } else {
336                 if (controllable->get_value() < 1e-15) {
337                         lo_message_add_float (msg, -200);
338                 } else {
339                         lo_message_add_float (msg, accurate_coefficient_to_dB (controllable->get_value()));
340                 }
341         }
342
343         lo_send_message (addr, path.c_str(), msg);
344         lo_message_free (msg);
345 }
346
347 string
348 OSCRouteObserver::set_path (string path)
349 {
350         if (feedback[2]) {
351   ostringstream os;
352   os << path << "/" << ssid;
353   path = os.str();
354         }
355         return path;
356 }
357
358 void
359 OSCRouteObserver::clear_strip (string path, float val)
360 {
361         lo_message msg = lo_message_new ();
362         if (feedback[2]) {
363                 path = set_path (path);
364         } else {
365                 lo_message_add_int32 (msg, ssid);
366         }
367         lo_message_add_float (msg, val);
368
369         lo_send_message (addr, path.c_str(), msg);
370         lo_message_free (msg);
371
372 }
373
374 void
375 OSCRouteObserver::send_select_status (const PropertyChange& what)
376 {
377         if (what == PropertyChange(ARDOUR::Properties::selected)) {
378                 if (_strip) {
379                         string path = "/strip/select";
380
381                         lo_message msg = lo_message_new ();
382                         if (feedback[2]) {
383                                 path = set_path (path);
384                         } else {
385                                 lo_message_add_int32 (msg, ssid);
386                         }
387                         lo_message_add_float (msg, _strip->is_selected());
388                         lo_send_message (addr, path.c_str(), msg);
389                         lo_message_free (msg);
390                 }
391         }
392 }