2 Copyright (C) 1998-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., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "pbd/error.h"
26 #include "pbd/compose.h"
27 #include "pbd/stacktrace.h"
28 #include "pbd/types_convert.h"
29 #include "pbd/xml++.h"
31 #include "midi++/types.h" // Added by JE - 06-01-2009. All instances of 'byte' changed to 'MIDI::byte' (for clarification)
32 #include "midi++/port.h"
33 #include "midi++/channel.h"
35 #include "ardour/async_midi_port.h"
36 #include "ardour/automation_control.h"
37 #include "ardour/midi_ui.h"
38 #include "ardour/debug.h"
40 #include "midicontrollable.h"
41 #include "generic_midi_control_protocol.h"
46 using namespace ARDOUR;
48 MIDIControllable::MIDIControllable (GenericMidiControlProtocol* s, MIDI::Parser& p, bool m)
54 _learned = false; /* from URI */
55 _ctltype = Ctl_Momentary;
58 last_value = 0; // got a better idea ?
59 last_incoming = 256; // any out of band value
60 last_controllable_value = 0.0f;
64 _control_description = "MIDI Control: none";
65 control_additional = (MIDI::byte) -1;
68 MIDIControllable::MIDIControllable (GenericMidiControlProtocol* s, MIDI::Parser& p, Controllable& c, bool m)
73 set_controllable (&c);
75 _learned = true; /* from controllable */
76 _ctltype = Ctl_Momentary;
79 last_value = 0; // got a better idea ?
80 last_controllable_value = 0.0f;
84 _control_description = "MIDI Control: none";
85 control_additional = (MIDI::byte) -1;
88 MIDIControllable::~MIDIControllable ()
90 drop_external_control ();
94 MIDIControllable::init (const std::string& s)
101 MIDIControllable::midi_forget ()
103 /* stop listening for incoming messages, but retain
104 our existing event + type information.
107 midi_sense_connection[0].disconnect ();
108 midi_sense_connection[1].disconnect ();
109 midi_learn_connection.disconnect ();
113 MIDIControllable::drop_external_control ()
119 control_additional = (MIDI::byte) -1;
123 MIDIControllable::set_controllable (Controllable* c)
125 if (c == controllable) {
129 controllable_death_connection.disconnect ();
134 last_controllable_value = controllable->get_value();
136 last_controllable_value = 0.0f; // is there a better value?
142 controllable->Destroyed.connect (controllable_death_connection, MISSING_INVALIDATOR,
143 boost::bind (&MIDIControllable::drop_controllable, this, _1),
144 MidiControlUI::instance());
149 MIDIControllable::midi_rebind (channel_t c)
152 bind_midi (c, control_type, control_additional);
159 MIDIControllable::learn_about_external_control ()
161 drop_external_control ();
162 _parser.any.connect_same_thread (midi_learn_connection, boost::bind (&MIDIControllable::midi_receiver, this, _1, _2, _3));
166 MIDIControllable::stop_learning ()
168 midi_learn_connection.disconnect ();
172 MIDIControllable::control_to_midi (float val)
174 if (controllable->is_gain_like()) {
175 return controllable->internal_to_interface (val) * max_value_for_type ();
178 float control_min = controllable->lower ();
179 float control_max = controllable->upper ();
180 float control_range = control_max - control_min;
182 if (controllable->is_toggle()) {
183 if (val >= (control_min + (control_range/2.0f))) {
184 return max_value_for_type();
189 AutomationControl *actl = dynamic_cast<AutomationControl*> (controllable);
191 control_min = actl->internal_to_interface(control_min);
192 control_max = actl->internal_to_interface(control_max);
193 control_range = control_max - control_min;
194 val = actl->internal_to_interface(val);
197 // fiddle value of max so value doesn't jump from 125 to 127 for 1.0
198 // otherwise decrement won't work.
199 return (val - control_min) / control_range * (max_value_for_type () - 1);
203 MIDIControllable::midi_to_control (int val)
205 /* fiddle with MIDI value so that we get an odd number of integer steps
206 and can thus represent "middle" precisely as 0.5. this maps to
207 the range 0..+1.0 (0 to 126)
210 float fv = (val == 0 ? 0 : float (val - 1) / (max_value_for_type() - 1));
212 if (controllable->is_gain_like()) {
213 return controllable->interface_to_internal (fv);
215 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Raw value %1 float %2\n", val, fv));
217 float control_min = controllable->lower ();
218 float control_max = controllable->upper ();
219 float control_range = control_max - control_min;
220 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Min %1 Max %2 Range %3\n", control_min, control_max, control_range));
222 AutomationControl *actl = dynamic_cast<AutomationControl*> (controllable);
224 if (fv == 0.f) return control_min;
225 if (fv == 1.f) return control_max;
226 control_min = actl->internal_to_interface(control_min);
227 control_max = actl->internal_to_interface(control_max);
228 control_range = control_max - control_min;
229 return actl->interface_to_internal((fv * control_range) + control_min);
231 return (fv * control_range) + control_min;
235 MIDIControllable::midi_sense_note_on (Parser &p, EventTwoBytes *tb)
237 midi_sense_note (p, tb, true);
241 MIDIControllable::midi_sense_note_off (Parser &p, EventTwoBytes *tb)
243 midi_sense_note (p, tb, false);
247 MIDIControllable::lookup_controllable()
249 if (_current_uri.empty()) {
253 boost::shared_ptr<Controllable> c = _surface->lookup_controllable (_current_uri);
259 set_controllable (c.get ());
265 MIDIControllable::drop_controllable (Controllable* c)
267 if (c == controllable) {
268 set_controllable (0);
273 MIDIControllable::midi_sense_note (Parser &, EventTwoBytes *msg, bool /*is_on*/)
276 if (lookup_controllable()) {
281 _surface->maybe_start_touch (controllable);
283 if (!controllable->is_toggle()) {
284 if (control_additional == msg->note_number) {
285 controllable->set_value (midi_to_control (msg->velocity), Controllable::UseGroup);
286 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Note %1 value %2 %3\n", (int) msg->note_number, (float) midi_to_control (msg->velocity), current_uri() ));
289 if (control_additional == msg->note_number) {
290 float new_value = controllable->get_value() > 0.5f ? 0.0f : 1.0f;
291 controllable->set_value (new_value, Controllable::UseGroup);
292 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Note %1 Value %2 %3\n", (int) msg->note_number, (float) new_value, current_uri()));
296 last_value = (MIDI::byte) (controllable->get_value() * 127.0); // to prevent feedback fights
300 MIDIControllable::midi_sense_controller (Parser &, EventTwoBytes *msg)
303 if (lookup_controllable ()) {
308 assert (controllable);
310 _surface->maybe_start_touch (controllable);
312 if (control_additional == msg->controller_number) {
314 if (!controllable->is_toggle()) {
315 if (get_encoder() == No_enc) {
316 float new_value = msg->value;
317 float max_value = max(last_controllable_value, new_value);
318 float min_value = min(last_controllable_value, new_value);
319 float range = max_value - min_value;
320 float threshold = (float) _surface->threshold ();
322 bool const in_sync = (
324 controllable->get_value() <= midi_to_control(max_value) &&
325 controllable->get_value() >= midi_to_control(min_value)
328 /* If the surface is not motorised, we try to prevent jumps when
329 the MIDI controller and controllable are out of sync.
330 There might be a better way of doing this.
333 if (in_sync || _surface->motorised ()) {
334 controllable->set_value (midi_to_control (new_value), Controllable::UseGroup);
336 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI CC %1 value %2 %3\n", (int) msg->controller_number, (float) midi_to_control(new_value), current_uri() ));
338 last_controllable_value = new_value;
340 int offset = (msg->value & 0x3f);
341 switch (get_encoder()) {
343 if (msg->value > 0x40) {
344 controllable->set_value (midi_to_control (last_value - offset + 1), Controllable::UseGroup);
346 controllable->set_value (midi_to_control (last_value + offset + 1), Controllable::UseGroup);
350 if (msg->value > 0x40) {
351 controllable->set_value (midi_to_control (last_value + offset + 1), Controllable::UseGroup);
353 controllable->set_value (midi_to_control (last_value - offset + 1), Controllable::UseGroup);
357 if (msg->value > 0x40) {
358 controllable->set_value (midi_to_control (last_value - (0x7f - msg->value) + 1), Controllable::UseGroup);
360 controllable->set_value (midi_to_control (last_value + offset + 1), Controllable::UseGroup);
364 if (msg->value > 0x40) {
365 controllable->set_value (midi_to_control (last_value + offset + 1), Controllable::UseGroup);
367 controllable->set_value (midi_to_control (last_value - (0x40 - offset)), Controllable::UseGroup);
373 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI CC %1 value %2 %3\n", (int) msg->controller_number, (int) last_value, current_uri() ));
378 switch (get_ctltype()) {
380 /* toggle value whenever direction of knob motion changes */
381 if (last_incoming > 127) {
382 /* relax ... first incoming message */
384 if (msg->value > last_incoming) {
385 controllable->set_value (1.0, Controllable::UseGroup);
387 controllable->set_value (0.0, Controllable::UseGroup);
389 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("dial Midi CC %1 value 1 %2\n", (int) msg->controller_number, current_uri()));
391 last_incoming = msg->value;
394 /* toggle it if over 64, otherwise leave it alone. This behaviour that works with buttons which send a value > 64 each
395 * time they are pressed.
397 if (msg->value >= 0x40) {
398 controllable->set_value (controllable->get_value() >= 0.5 ? 0.0 : 1.0, Controllable::UseGroup);
399 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("toggle Midi CC %1 value 1 %2\n", (int) msg->controller_number, current_uri()));
403 /* toggle if value is over 64, otherwise turn it off. This is behaviour designed for buttons which send a value > 64 when pressed,
404 maintain state (i.e. they know they were pressed) and then send zero the next time.
406 if (msg->value >= 0x40) {
407 controllable->set_value (controllable->get_value() >= 0.5 ? 0.0 : 1.0, Controllable::UseGroup);
409 controllable->set_value (0.0, Controllable::NoGroup);
410 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Midi CC %1 value 0 %2\n", (int) msg->controller_number, current_uri()));
416 last_value = (MIDI::byte) (control_to_midi(controllable->get_value())); // to prevent feedback fights
421 MIDIControllable::midi_sense_program_change (Parser &, MIDI::byte msg)
424 if (lookup_controllable ()) {
429 _surface->maybe_start_touch (controllable);
431 if (msg == control_additional) {
433 if (!controllable->is_toggle()) {
434 controllable->set_value (1.0, Controllable::UseGroup);
435 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI program %1 value 1.0 %3\n", (int) msg, current_uri() ));
437 float new_value = controllable->get_value() > 0.5f ? 0.0f : 1.0f;
438 controllable->set_value (new_value, Controllable::UseGroup);
439 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI program %1 value %2 %3\n", (int) msg, (float) new_value, current_uri()));
443 last_value = (MIDI::byte) (controllable->get_value() * 127.0); // to prevent feedback fights
447 MIDIControllable::midi_sense_pitchbend (Parser &, pitchbend_t pb)
450 if (lookup_controllable ()) {
455 _surface->maybe_start_touch (controllable);
457 if (!controllable->is_toggle()) {
458 controllable->set_value (midi_to_control (pb), Controllable::UseGroup);
459 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI pitchbend %1 value %2 %3\n", (int) control_channel, (float) midi_to_control (pb), current_uri() ));
462 controllable->set_value (1, Controllable::UseGroup);
463 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Midi pitchbend %1 value 1 %2\n", (int) control_channel, current_uri()));
465 controllable->set_value (0, Controllable::UseGroup);
466 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Midi pitchbend %1 value 0 %2\n", (int) control_channel, current_uri()));
470 last_value = control_to_midi (controllable->get_value ());
474 MIDIControllable::midi_receiver (Parser &, MIDI::byte *msg, size_t /*len*/)
476 /* we only respond to channel messages */
478 if ((msg[0] & 0xF0) < 0x80 || (msg[0] & 0xF0) > 0xE0) {
482 _surface->check_used_event(msg[0], msg[1]);
483 bind_midi ((channel_t) (msg[0] & 0xf), eventType (msg[0] & 0xF0), msg[1]);
486 controllable->LearningFinished ();
491 MIDIControllable::rpn_value_change (Parser&, uint16_t rpn, float val)
493 if (control_rpn == rpn) {
495 controllable->set_value (val, Controllable::UseGroup);
501 MIDIControllable::nrpn_value_change (Parser&, uint16_t nrpn, float val)
503 if (control_nrpn == nrpn) {
505 controllable->set_value (val, Controllable::UseGroup);
511 MIDIControllable::rpn_change (Parser&, uint16_t rpn, int dir)
513 if (control_rpn == rpn) {
515 /* XXX how to increment/decrement ? */
516 // controllable->set_value (val);
522 MIDIControllable::nrpn_change (Parser&, uint16_t nrpn, int dir)
524 if (control_nrpn == nrpn) {
526 /* XXX how to increment/decrement ? */
527 // controllable->set_value (val);
533 MIDIControllable::bind_rpn_value (channel_t chn, uint16_t rpn)
536 drop_external_control ();
538 control_channel = chn;
539 _parser.channel_rpn[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::rpn_value_change, this, _1, _2, _3));
543 MIDIControllable::bind_nrpn_value (channel_t chn, uint16_t nrpn)
546 drop_external_control ();
548 control_channel = chn;
549 _parser.channel_nrpn[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::rpn_value_change, this, _1, _2, _3));
553 MIDIControllable::bind_nrpn_change (channel_t chn, uint16_t nrpn)
556 drop_external_control ();
558 control_channel = chn;
559 _parser.channel_nrpn_change[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::rpn_change, this, _1, _2, _3));
563 MIDIControllable::bind_rpn_change (channel_t chn, uint16_t rpn)
566 drop_external_control ();
568 control_channel = chn;
569 _parser.channel_rpn_change[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::nrpn_change, this, _1, _2, _3));
573 MIDIControllable::bind_midi (channel_t chn, eventType ev, MIDI::byte additional)
577 drop_external_control ();
580 control_channel = chn;
581 control_additional = additional;
586 _parser.channel_note_off[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::midi_sense_note_off, this, _1, _2));
588 /* if this is a togglee, connect to noteOn as well,
589 and we'll toggle back and forth between the two.
593 _parser.channel_note_on[chn_i].connect_same_thread (midi_sense_connection[1], boost::bind (&MIDIControllable::midi_sense_note_on, this, _1, _2));
596 _control_description = "MIDI control: NoteOff";
600 _parser.channel_note_on[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::midi_sense_note_on, this, _1, _2));
602 _parser.channel_note_off[chn_i].connect_same_thread (midi_sense_connection[1], boost::bind (&MIDIControllable::midi_sense_note_off, this, _1, _2));
604 _control_description = "MIDI control: NoteOn";
607 case MIDI::controller:
608 _parser.channel_controller[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::midi_sense_controller, this, _1, _2));
609 snprintf (buf, sizeof (buf), "MIDI control: Controller %d", control_additional);
610 _control_description = buf;
614 _parser.channel_program_change[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::midi_sense_program_change, this, _1, _2));
615 _control_description = "MIDI control: ProgramChange";
618 case MIDI::pitchbend:
619 _parser.channel_pitchbend[chn_i].connect_same_thread (midi_sense_connection[0], boost::bind (&MIDIControllable::midi_sense_pitchbend, this, _1, _2));
620 _control_description = "MIDI control: Pitchbend";
626 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Controlable: bind_midi: %1 on Channel %2 value %3 \n", _control_description, chn_i + 1, (int) additional));
630 MIDIControllable::write_feedback (MIDI::byte* buf, int32_t& bufsize, bool /*force*/)
632 if (!controllable || !_surface->get_feedback ()) {
636 float val = controllable->get_value ();
638 /* Note that when sending RPN/NPRN we do two things:
640 * always send MSB first, then LSB
641 * null/reset the parameter ID after sending.
643 * this follows recommendations found online, eg. http://www.philrees.co.uk/nrpnq.htm
646 if (control_rpn >= 0) {
650 int rpn_val = (int) lrintf (val * 16384.0);
651 if (last_value == rpn_val) {
654 *buf++ = (0xb0) | control_channel;
656 *buf++ = (int) ((control_rpn) >> 7);
658 *buf++ = (int) (control_rpn & 0x7f);
660 *buf++ = (int) (rpn_val >> 7);
662 *buf++ = (int) (rpn_val & 0x7f);
668 last_value = rpn_val;
669 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI out: RPN %1 Channel %2 Value %3\n", control_rpn, (int) control_channel, val));
673 if (control_nrpn >= 0) {
674 int rpn_val = (int) lrintf (val * 16384.0);
675 if (last_value == rpn_val) {
678 *buf++ = (0xb0) | control_channel;
680 *buf++ = (int) ((control_rpn) >> 7);
682 *buf++ = (int) (control_rpn & 0x7f);
684 *buf++ = (int) (rpn_val >> 7);
686 *buf++ = (int) (rpn_val & 0x7f);
691 last_value = rpn_val;
693 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI out: NRPN %1 Channel %2 Value %3\n", control_nrpn, (int) control_channel, val));
697 if (control_type == none || bufsize <= 2) {
701 int const gm = control_to_midi (val);
703 if (gm == last_value) {
707 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("Feedback: %1 %2\n", control_description(), current_uri()));
709 *buf++ = (0xF0 & control_type) | (0xF & control_channel);
711 switch (control_type) {
712 case MIDI::pitchbend:
713 *buf++ = int (gm) & 127;
714 *buf++ = (int (gm) >> 7) & 127;
717 *buf++ = control_additional; /* program number */
721 *buf++ = control_additional; /* controller number */
725 DEBUG_TRACE (DEBUG::GenericMidi, string_compose ("MIDI out: Type %1 Channel %2 Bytes %3 %4\n", (int) control_type, (int) control_channel , (int) *(buf - 2), (int) *(buf - 1)));
734 MIDIControllable::set_state (const XMLNode& node, int /*version*/)
739 if (node.get_property ("event", str)) {
740 sscanf (str.c_str(), "0x%x", &xx);
741 control_type = (MIDI::eventType) xx;
746 if (node.get_property ("channel", xx)) {
747 control_channel = xx;
752 if (node.get_property ("additional", str)) {
753 sscanf (str.c_str(), "0x%x", &xx);
754 control_additional = (MIDI::byte) xx;
759 bind_midi (control_channel, control_type, control_additional);
765 MIDIControllable::get_state ()
769 XMLNode* node = new XMLNode ("MIDIControllable");
771 if (_current_uri.empty()) {
772 node->set_property ("id", controllable->id ());
774 node->set_property ("uri", _current_uri);
778 snprintf (buf, sizeof(buf), "0x%x", (int) control_type);
779 node->set_property ("event", (const char *)buf);
780 node->set_property ("channel", (int16_t)control_channel);
781 snprintf (buf, sizeof(buf), "0x%x", (int) control_additional);
782 node->set_property ("additional", (const char *)buf);
788 /** @return the maximum value for a control value transmitted
789 * using a given MIDI::eventType.
792 MIDIControllable::max_value_for_type () const
794 /* XXX: this is not complete */
796 if (control_type == MIDI::pitchbend) {