don't abuse ScalePoints idea
[ardour.git] / libs / ardour / session_midi.cc
index c03db04035d15fa2a77b8a8744b642045cbb7686..baff2c7bfec9b5140de01d5727977b26f40e5b32 100644 (file)
@@ -22,8 +22,6 @@
 #include <cerrno>
 #include <cassert>
 #include <unistd.h>
-#include <fcntl.h>
-#include <poll.h>
 
 #include <boost/shared_ptr.hpp>
 
 
 #include "midi++/mmc.h"
 #include "midi++/port.h"
-#include "midi++/manager.h"
 
 #include "pbd/error.h"
 #include "pbd/pthread_utils.h"
+#include "pbd/timersub.h"
+#include "pbd/stacktrace.h"
 
 #include "timecode/time.h"
 
 #include "ardour/audio_track.h"
 #include "ardour/audioengine.h"
 #include "ardour/debug.h"
+#include "ardour/midi_port.h"
 #include "ardour/midi_track.h"
 #include "ardour/midi_ui.h"
+#include "ardour/profile.h"
 #include "ardour/session.h"
 #include "ardour/slave.h"
+#include "ardour/ticker.h"
 
 #include "i18n.h"
 
@@ -128,6 +130,19 @@ Session::mmc_record_pause (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_record_strobe (MIDI::MachineControl &/*mmc*/)
 {
+       if (Profile->get_trx()) {
+
+               /* In Tracks Live, there is no concept of punch, so we just
+                  treat RecordStrobe like RecordPause. This violates the MMC
+                  specification.
+               */
+
+               if (Config->get_mmc_control()) {
+                       maybe_enable_record();
+               }
+               return;
+       }
+
        if (!Config->get_mmc_control() || (_step_editors > 0)) {
                return;
        }
@@ -335,7 +350,7 @@ Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled)
 
                if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
                        if (trk == at->remote_control_id()) {
-                               at->set_record_enabled (enabled, &mmc);
+                               at->set_record_enabled (enabled, Controllable::UseGroup);
                                break;
                        }
                }
@@ -348,7 +363,7 @@ Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled)
  * @param t time to send.
  */
 int
-Session::send_full_time_code (framepos_t const t)
+Session::send_full_time_code (framepos_t const t, MIDI::pframes_t nframes)
 {
        /* This function could easily send at a given frame offset, but would
         * that be useful?  Does ardour do sub-block accurate locating? [DR] */
@@ -369,12 +384,14 @@ Session::send_full_time_code (framepos_t const t)
        sample_to_timecode (t, timecode, true /* use_offset */, false /* no subframes */);
 
        // sample-align outbound to rounded (no subframes) timecode
-       timecode_to_sample(timecode, outbound_mtc_timecode_frame, true, false);
+       framepos_t mtc_tc;
+       timecode_to_sample(timecode, mtc_tc, true, false);
+       outbound_mtc_timecode_frame = mtc_tc;
 
        transmitting_timecode_time = timecode;
 
-       framecnt_t const quarter_frame_duration = ((framecnt_t) _frames_per_timecode_frame) >> 2;
-       if (ceil((t - outbound_mtc_timecode_frame) / quarter_frame_duration) > 0) {
+       double const quarter_frame_duration = ((framecnt_t) _frames_per_timecode_frame) / 4.0;
+       if (ceil((t - mtc_tc) / quarter_frame_duration) > 0) {
                Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame());
                outbound_mtc_timecode_frame += _frames_per_timecode_frame;
        }
@@ -415,16 +432,15 @@ Session::send_full_time_code (framepos_t const t)
        msg[4] = 0x1;
        msg[9] = 0xf7;
 
-       msg[5] = mtc_timecode_bits | timecode.hours;
+       msg[5] = mtc_timecode_bits | (timecode.hours % 24);
        msg[6] = timecode.minutes;
        msg[7] = timecode.seconds;
        msg[8] = timecode.frames;
 
        // Send message at offset 0, sent time is for the start of this cycle
-       if (MIDI::Manager::instance()->mtc_output_port()->midimsg (msg, sizeof (msg), 0)) {
-               error << _("Session: could not send full MIDI time code") << endmsg;
-               return -1;
-       }
+
+       MidiBuffer& mb (_midi_ports->mtc_output_port()->get_midi_buffer (nframes));
+       mb.push_back (Port::port_offset(), sizeof (msg), msg);
 
        _pframes_since_last_mtc = 0;
        return 0;
@@ -438,7 +454,7 @@ Session::send_full_time_code (framepos_t const t)
  * earlier already this cycle by send_full_time_code)
  */
 int
-Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_frame, pframes_t nframes)
+Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_frame, ARDOUR::pframes_t nframes)
 {
        if (_engine.freewheeling() || !_send_qf_mtc || transmitting_timecode_time.negative || (next_quarter_frame_to_send < 0)) {
                // cerr << "(MTC) Not sending MTC\n";
@@ -460,19 +476,19 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f
        assert (next_quarter_frame_to_send <= 7);
 
        /* Duration of one quarter frame */
-       framecnt_t const quarter_frame_duration = ((framecnt_t) _frames_per_timecode_frame) >> 2;
+       double const quarter_frame_duration = _frames_per_timecode_frame / 4.0;
 
        DEBUG_TRACE (DEBUG::MTC, string_compose ("TF %1 SF %2 MT %3 QF %4 QD %5\n",
                                _transport_frame, start_frame, outbound_mtc_timecode_frame,
                                next_quarter_frame_to_send, quarter_frame_duration));
 
-       if ((outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) < _transport_frame) {
-               send_full_time_code (_transport_frame);
+       if (rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) < _transport_frame) {
+               send_full_time_code (_transport_frame, nframes);
                return 0;
        }
 
        /* Send quarter frames for this cycle */
-       while (end_frame > (outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration))) {
+       while (end_frame > rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration))) {
 
                DEBUG_TRACE (DEBUG::MTC, string_compose ("next frame to send: %1\n", next_quarter_frame_to_send));
 
@@ -503,31 +519,32 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f
                                break;
                }
 
-               const framepos_t msg_time = outbound_mtc_timecode_frame + (quarter_frame_duration * next_quarter_frame_to_send);
+               const framepos_t msg_time = rint(outbound_mtc_timecode_frame    + (quarter_frame_duration * next_quarter_frame_to_send));
 
                // This message must fall within this block or something is broken
                assert (msg_time >= start_frame);
                assert (msg_time < end_frame);
 
-               if (msg_time >= start_frame) {
-                       /* convert from session frames back to JACK frames using the transport speed */
-                       pframes_t const out_stamp = (msg_time - start_frame) / _transport_speed;
-                       assert (out_stamp < nframes);
+               /* convert from session frames back to JACK frames using the transport speed */
+               ARDOUR::pframes_t const out_stamp = (msg_time - start_frame) / _transport_speed;
+               assert (out_stamp < nframes);
 
-                       if (MIDI::Manager::instance()->mtc_output_port()->midimsg (mtc_msg, 2, out_stamp)) {
-                               error << string_compose(_("Session: cannot send quarter-frame MTC message (%1)"), strerror (errno))
-                                                       << endmsg;
-                               return -1;
-                       }
+               MidiBuffer& mb (_midi_ports->mtc_output_port()->get_midi_buffer(nframes));
+               if (!mb.push_back (out_stamp, 2, mtc_msg)) {
+                       error << string_compose(_("Session: cannot send quarter-frame MTC message (%1)"), strerror (errno))
+                             << endmsg;
+                       return -1;
+               }
 
 #ifndef NDEBUG
+               if (DEBUG_ENABLED(DEBUG::MTC)) {
                        DEBUG_STR_DECL(foo)
                        DEBUG_STR_APPEND(foo,"sending ");
                        DEBUG_STR_APPEND(foo, transmitting_timecode_time);
                        DEBUG_TRACE (DEBUG::MTC, string_compose ("%1 qfm = %2, stamp = %3\n", DEBUG_STR(foo).str(), next_quarter_frame_to_send,
                                                                 out_stamp));
-#endif
                }
+#endif
 
                // Increment quarter frame counter
                next_quarter_frame_to_send++;
@@ -540,7 +557,7 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f
                        Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame());
                        // Re-calculate timing of first quarter frame
                        //timecode_to_sample( transmitting_timecode_time, outbound_mtc_timecode_frame, true /* use_offset */, false );
-                       outbound_mtc_timecode_frame += 8 * quarter_frame_duration;
+                       outbound_mtc_timecode_frame += 2.0 * _frames_per_timecode_frame;
                }
        }
 
@@ -551,6 +568,16 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f
  OUTBOUND MMC STUFF
 **********************************************************************/
 
+void
+Session::send_immediate_mmc (MachineControlCommand c)
+{
+       if (AudioEngine::instance()->in_process_thread()) {
+               _mmc->send (c, Port::port_offset());
+       } else {
+               _mmc->send (c, 0);
+       }
+
+}
 
 bool
 Session::mmc_step_timeout ()
@@ -581,11 +608,83 @@ Session::mmc_step_timeout ()
        return true;
 }
 
+/***********************************************************************
+ OUTBOUND SYSTEM COMMON STUFF
+**********************************************************************/
+
+
+void
+Session::send_song_position_pointer (framepos_t)
+{
+       if (midi_clock) {
+               /* Do nothing for the moment */
+       }
+}
+
 int
 Session::start_midi_thread ()
 {
+       if (midi_control_ui) { return 0; }
        midi_control_ui = new MidiControlUI (*this);
        midi_control_ui->run ();
        return 0;
 }
 
+boost::shared_ptr<ARDOUR::Port>
+Session::midi_input_port () const
+{
+       return _midi_ports->midi_input_port ();
+}
+
+boost::shared_ptr<ARDOUR::Port>
+Session::midi_output_port () const
+{
+       return _midi_ports->midi_output_port ();
+}
+
+boost::shared_ptr<ARDOUR::Port>
+Session::mmc_output_port () const
+{
+       return _midi_ports->mmc_output_port ();
+}
+
+boost::shared_ptr<ARDOUR::Port>
+Session::mmc_input_port () const
+{
+       return _midi_ports->mmc_input_port ();
+}
+
+boost::shared_ptr<ARDOUR::Port>
+Session::scene_output_port () const
+{
+       return _midi_ports->scene_output_port ();
+}
+
+boost::shared_ptr<ARDOUR::Port>
+Session::scene_input_port () const
+{
+       return _midi_ports->scene_input_port ();
+}
+
+boost::shared_ptr<MidiPort>
+Session::midi_clock_output_port () const
+{
+       return _midi_ports->midi_clock_output_port ();
+}
+
+boost::shared_ptr<MidiPort>
+Session::midi_clock_input_port () const
+{
+       return _midi_ports->midi_clock_input_port ();
+}
+boost::shared_ptr<MidiPort>
+Session::mtc_output_port () const
+{
+       return _midi_ports->mtc_output_port ();
+}
+boost::shared_ptr<MidiPort>
+Session::mtc_input_port () const
+{
+       return _midi_ports->mtc_input_port ();
+}
+