OSC: Fix forward detection to include >0 and <1
[ardour.git] / libs / surfaces / osc / osc_global_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/dB.h"
24 #include "ardour/meter.h"
25
26 #include "osc.h"
27 #include "osc_global_observer.h"
28
29 #include "pbd/i18n.h"
30
31 using namespace std;
32 using namespace PBD;
33 using namespace ARDOUR;
34 using namespace ArdourSurface;
35
36 OSCGlobalObserver::OSCGlobalObserver (Session& s, lo_address a, uint32_t gm, std::bitset<32> fb)
37         : gainmode (gm)
38         ,feedback (fb)
39 {
40         if (feedback[4]) {
41                 addr = lo_address_new (lo_address_get_hostname(a) , lo_address_get_port(a));
42                 session = &s;
43                 _last_frame = -1;
44
45                 // connect to all the things we want to send feed back from
46
47                 /*
48                 *       Master (todo)
49                 *               Pan width
50                 */
51
52                 // Master channel first
53                 boost::shared_ptr<Stripable> strip = session->master_out();
54
55                 boost::shared_ptr<Controllable> mute_controllable = boost::dynamic_pointer_cast<Controllable>(strip->mute_control());
56                 mute_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_change_message, this, X_("/master/mute"), strip->mute_control()), OSC::instance());
57                 send_change_message ("/master/mute", strip->mute_control());
58
59                 boost::shared_ptr<Controllable> trim_controllable = boost::dynamic_pointer_cast<Controllable>(strip->trim_control());
60                 trim_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_trim_message, this, X_("/master/trimdB"), strip->trim_control()), OSC::instance());
61                 send_trim_message ("/master/trimdB", strip->trim_control());
62
63                 boost::shared_ptr<Controllable> pan_controllable = boost::dynamic_pointer_cast<Controllable>(strip->pan_azimuth_control());
64                 if (pan_controllable) {
65                         pan_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_change_message, this, X_("/master/pan_stereo_position"), strip->pan_azimuth_control()), OSC::instance());
66                         send_change_message ("/master/pan_stereo_position", strip->pan_azimuth_control());
67                 }
68
69                 boost::shared_ptr<Controllable> gain_controllable = boost::dynamic_pointer_cast<Controllable>(strip->gain_control());
70                 if (gainmode) {
71                         gain_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_gain_message, this, X_("/master/fader"), strip->gain_control()), OSC::instance());
72                         send_gain_message ("/master/fader", strip->gain_control());
73                 } else {
74                         gain_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_gain_message, this, X_("/master/gain"), strip->gain_control()), OSC::instance());
75                         send_gain_message ("/master/gain", strip->gain_control());
76                 }
77
78                 // monitor stuff next
79                 /*
80                 *       Monitor (todo)
81                 *               Mute
82                 *               Dim
83                 *               Mono
84                 *               Rude Solo
85                 *               etc.
86                 */
87                 strip = session->monitor_out();
88                 if (strip) {
89
90                         // Hmm, it seems the monitor mute is not at route->mute_control()
91                         /*boost::shared_ptr<Controllable> mute_controllable2 = boost::dynamic_pointer_cast<Controllable>(strip->mute_control());
92                         //mute_controllable = boost::dynamic_pointer_cast<Controllable>(r2->mute_control());
93                         mute_controllable2->Changed.connect (monitor_mute_connection, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_change_message, this, X_("/monitor/mute"), strip->mute_control()), OSC::instance());
94                         send_change_message ("/monitor/mute", strip->mute_control());
95                         */
96                         gain_controllable = boost::dynamic_pointer_cast<Controllable>(strip->gain_control());
97                         if (gainmode) {
98                                 gain_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_gain_message, this, X_("/monitor/fader"), strip->gain_control()), OSC::instance());
99                                 send_gain_message ("/monitor/fader", strip->gain_control());
100                         } else {
101                                 gain_controllable->Changed.connect (strip_connections, MISSING_INVALIDATOR, bind (&OSCGlobalObserver::send_gain_message, this, X_("/monitor/gain"), strip->gain_control()), OSC::instance());
102                                 send_gain_message ("/monitor/gain", strip->gain_control());
103                         }
104                 }
105
106                 /*
107                 *       Transport (todo)
108                 *               punchin/out
109                 */
110                 //Transport feedback
111                 session->TransportStateChange.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSCGlobalObserver::send_transport_state_changed, this), OSC::instance());
112                 send_transport_state_changed ();
113                 session->TransportLooped.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSCGlobalObserver::send_transport_state_changed, this), OSC::instance());
114                 session->RecordStateChanged.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSCGlobalObserver::send_record_state_changed, this), OSC::instance());
115                 send_record_state_changed ();
116
117                 // session feedback
118                 session->StateSaved.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSCGlobalObserver::send_session_saved, this, _1), OSC::instance());
119                 send_session_saved (session->snap_name());
120                 session->SoloActive.connect(session_connections, MISSING_INVALIDATOR, boost::bind (&OSCGlobalObserver::solo_active, this, _1), OSC::instance());
121                 solo_active (session->soloing() || session->listening());
122
123                 /*
124                 *       Maybe (many) more
125                 */
126         }
127 }
128
129 OSCGlobalObserver::~OSCGlobalObserver ()
130 {
131
132         strip_connections.drop_connections ();
133         session_connections.drop_connections ();
134
135         lo_address_free (addr);
136 }
137
138 void
139 OSCGlobalObserver::tick ()
140 {
141         framepos_t now_frame = session->transport_frame();
142         if (now_frame != _last_frame) {
143                 if (feedback[6]) { // timecode enabled
144                         Timecode::Time timecode;
145                         session->timecode_time (now_frame, timecode);
146
147                         // Timecode mode: Hours/Minutes/Seconds/Frames
148                         ostringstream os;
149                         os << setw(2) << setfill('0') << timecode.hours;
150                         os << ':';
151                         os << setw(2) << setfill('0') << timecode.minutes;
152                         os << ':';
153                         os << setw(2) << setfill('0') << timecode.seconds;
154                         os << ':';
155                         os << setw(2) << setfill('0') << timecode.frames;
156
157                         lo_message msg = lo_message_new ();
158                         lo_message_add_string (msg, os.str().c_str());
159                         lo_send_message (addr, "/position/smpte", msg);
160                         lo_message_free (msg);
161                 }
162                 if (feedback[5]) { // Bar beat enabled
163                         Timecode::BBT_Time bbt_time;
164
165                         session->bbt_time (now_frame, bbt_time);
166
167                         // semantics:  BBB/bb/tttt
168                         ostringstream os;
169
170                         os << setw(3) << setfill('0') << bbt_time.bars;
171                         os << '|';
172                         os << setw(2) << setfill('0') << bbt_time.beats;
173                         os << '|';
174                         os << setw(4) << setfill('0') << bbt_time.ticks;
175
176                         lo_message msg = lo_message_new ();
177                         lo_message_add_string (msg, os.str().c_str());
178                         lo_send_message (addr, "/position/bbt", msg);
179                         lo_message_free (msg);
180                 }
181                 if (feedback[11]) { // minutes/seconds enabled
182                         framepos_t left = now_frame;
183                         int hrs = (int) floor (left / (session->frame_rate() * 60.0f * 60.0f));
184                         left -= (framecnt_t) floor (hrs * session->frame_rate() * 60.0f * 60.0f);
185                         int mins = (int) floor (left / (session->frame_rate() * 60.0f));
186                         left -= (framecnt_t) floor (mins * session->frame_rate() * 60.0f);
187                         int secs = (int) floor (left / (float) session->frame_rate());
188                         left -= (framecnt_t) floor ((double)(secs * session->frame_rate()));
189                         int millisecs = floor (left * 1000.0 / (float) session->frame_rate());
190
191                         // Min/sec mode: Hours/Minutes/Seconds/msec
192                         ostringstream os;
193                         os << setw(2) << setfill('0') << hrs;
194                         os << ':';
195                         os << setw(2) << setfill('0') << mins;
196                         os << ':';
197                         os << setw(2) << setfill('0') << secs;
198                         os << '.';
199                         os << setw(3) << setfill('0') << millisecs;
200
201                         lo_message msg = lo_message_new ();
202                         lo_message_add_string (msg, os.str().c_str());
203                         lo_send_message (addr, "/position/time", msg);
204                         lo_message_free (msg);
205                 }
206                 if (feedback[10]) { // samples
207                         ostringstream os;
208                         os << now_frame;
209                         lo_message msg = lo_message_new ();
210                         lo_message_add_string (msg, os.str().c_str());
211                         lo_send_message (addr, "/position/samples", msg);
212                         lo_message_free (msg);
213                 }
214                 _last_frame = now_frame;
215         }
216         if (feedback[3]) { //heart beat enabled
217                 if (_heartbeat == 10) {
218                         lo_message msg = lo_message_new ();
219                         lo_message_add_float (msg, 1.0);
220                         lo_send_message (addr, "/heartbeat", msg);
221                         lo_message_free (msg);
222                 }
223                 if (!_heartbeat) {
224                         lo_message msg = lo_message_new ();
225                         lo_message_add_float (msg, 0.0);
226                         lo_send_message (addr, "/heartbeat", msg);
227                         lo_message_free (msg);
228                 }
229                 _heartbeat++;
230                 if (_heartbeat > 20) _heartbeat = 0;
231         }
232         if (feedback[7] || feedback[8] || feedback[9]) { // meters enabled
233                 // the only meter here is master
234                 float now_meter = session->master_out()->peak_meter()->meter_level(0, MeterMCP);
235                 if (now_meter < -120) now_meter = -193;
236                 if (_last_meter != now_meter) {
237                         if (feedback[7] || feedback[8]) {
238                                 lo_message msg = lo_message_new ();
239                                 if (gainmode && feedback[7]) {
240                                         uint32_t lev1023 = (uint32_t)((now_meter + 54) * 17.05);
241                                         lo_message_add_int32 (msg, lev1023);
242                                         lo_send_message (addr, "/master/meter", msg);
243                                 } else if ((!gainmode) && feedback[7]) {
244                                         lo_message_add_float (msg, now_meter);
245                                         lo_send_message (addr, "/master/meter", msg);
246                                 } else if (feedback[8]) {
247                                         uint32_t ledlvl = (uint32_t)(((now_meter + 54) / 3.75)-1);
248                                         uint32_t ledbits = ~(0xfff<<ledlvl);
249                                         lo_message_add_int32 (msg, ledbits);
250                                         lo_send_message (addr, "/master/meter", msg);
251                                 }
252                                 lo_message_free (msg);
253                         }
254                         if (feedback[9]) {
255                                 lo_message msg = lo_message_new ();
256                                 float signal;
257                                 if (now_meter < -40) {
258                                         signal = 0;
259                                 } else {
260                                         signal = 1;
261                                 }
262                                 lo_message_add_float (msg, signal);
263                                 lo_send_message (addr, "/master/signal", msg);
264                                 lo_message_free (msg);
265                         }
266                 }
267                 _last_meter = now_meter;
268
269         }
270 }
271
272 void
273 OSCGlobalObserver::send_change_message (string path, boost::shared_ptr<Controllable> controllable)
274 {
275         lo_message msg = lo_message_new ();
276
277         lo_message_add_float (msg, (float) controllable->get_value());
278
279
280         lo_send_message (addr, path.c_str(), msg);
281         lo_message_free (msg);
282 }
283
284 void
285 OSCGlobalObserver::send_gain_message (string path, boost::shared_ptr<Controllable> controllable)
286 {
287         lo_message msg = lo_message_new ();
288
289         if (gainmode) {
290                 if (controllable->get_value() == 1) {
291                         lo_message_add_int32 (msg, 800);
292                 } else {
293                         lo_message_add_int32 (msg, gain_to_slider_position (controllable->get_value()) * 1023);
294                 }
295         } else {
296                 if (controllable->get_value() < 1e-15) {
297                         lo_message_add_float (msg, -200);
298                 } else {
299                         lo_message_add_float (msg, accurate_coefficient_to_dB (controllable->get_value()));
300                 }
301         }
302
303         lo_send_message (addr, path.c_str(), msg);
304         lo_message_free (msg);
305 }
306
307 void
308 OSCGlobalObserver::send_trim_message (string path, boost::shared_ptr<Controllable> controllable)
309 {
310         lo_message msg = lo_message_new ();
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
319 void
320 OSCGlobalObserver::send_transport_state_changed()
321 {
322
323         lo_message msg = lo_message_new ();
324         lo_message_add_int32 (msg, session->get_play_loop());
325         lo_send_message (addr, "/loop_toggle", msg);
326         lo_message_free (msg);
327
328         msg = lo_message_new ();
329         lo_message_add_int32 (msg, session->transport_speed() == 1.0);
330         lo_send_message (addr, "/transport_play", msg);
331         lo_message_free (msg);
332
333         msg = lo_message_new ();
334         lo_message_add_int32 (msg, session->transport_stopped ());
335         lo_send_message (addr, "/transport_stop", msg);
336         lo_message_free (msg);
337
338         msg = lo_message_new ();
339         lo_message_add_int32 (msg, session->transport_speed() < 0.0);
340         lo_send_message (addr, "/rewind", msg);
341         lo_message_free (msg);
342
343         msg = lo_message_new ();
344         lo_message_add_int32 (msg, (session->transport_speed() != 1.0 && session->transport_speed() > 0.0));
345         lo_send_message (addr, "/ffwd", msg);
346         lo_message_free (msg);
347
348 }
349
350 void
351 OSCGlobalObserver::send_record_state_changed ()
352 {
353         lo_message msg = lo_message_new ();
354         lo_message_add_int32 (msg, (int)session->get_record_enabled ());
355         lo_send_message (addr, "/rec_enable_toggle", msg);
356         lo_message_free (msg);
357
358         msg = lo_message_new ();
359         if (session->have_rec_enabled_track ()) {
360                 lo_message_add_int32 (msg, 1);
361         } else {
362                 lo_message_add_int32 (msg, 0);
363         }
364         lo_send_message (addr, "/record_tally", msg);
365         lo_message_free (msg);
366
367 }
368
369 void
370 OSCGlobalObserver::send_session_saved (std::string name)
371 {
372         lo_message msg = lo_message_new ();
373         lo_message_add_string (msg, name.c_str());
374         lo_send_message (addr, "/session_name", msg);
375         lo_message_free (msg);
376
377 }
378
379 void
380 OSCGlobalObserver::solo_active (bool active)
381 {
382         lo_message msg = lo_message_new ();
383         lo_message_add_float (msg, (float) active);
384         lo_send_message (addr, "/cancel_all_solos", msg);
385         lo_message_free (msg);
386 }