fix conflicts and merge with master
[ardour.git] / libs / ardour / session_midi.cc
index f4aef76adc8889c848e191e088ae94b45b69cb8c..63cba68df1f1d6bc9bec8e06c6a6b3cb382b1d5c 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 "timecode/time.h"
 
-#include "ardour/configuration.h"
-#include "ardour/debug.h"
-#include "ardour/audioengine.h"
-#include "ardour/session.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/audio_diskstream.h"
+#include "ardour/session.h"
 #include "ardour/slave.h"
-#include "ardour/cycles.h"
+#include "ardour/ticker.h"
 
 #include "i18n.h"
 
@@ -91,23 +88,23 @@ Session::setup_midi_control ()
 }
 
 void
-Session::spp_start (Parser &, framepos_t /*timestamp*/)
+Session::spp_start ()
 {
-       if (Config->get_mmc_control() && (!config.get_external_sync() || config.get_sync_source() != JACK)) {
+       if (Config->get_mmc_control ()) {
                request_transport_speed (1.0);
        }
 }
 
 void
-Session::spp_continue (Parser& ignored, framepos_t timestamp)
+Session::spp_continue ()
 {
-       spp_start (ignored, timestamp);
+       spp_start ();
 }
 
 void
-Session::spp_stop (Parser&, framepos_t /*timestamp*/)
+Session::spp_stop ()
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                request_stop ();
        }
 }
@@ -115,7 +112,7 @@ Session::spp_stop (Parser&, framepos_t /*timestamp*/)
 void
 Session::mmc_deferred_play (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control() && (!config.get_external_sync() || (config.get_sync_source() != JACK))) {
+       if (Config->get_mmc_control ()) {
                request_transport_speed (1.0);
        }
 }
@@ -123,7 +120,7 @@ Session::mmc_deferred_play (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_record_pause (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                maybe_enable_record();
        }
 }
@@ -160,7 +157,7 @@ Session::mmc_record_strobe (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_record_exit (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                disable_record (false);
        }
 }
@@ -168,7 +165,7 @@ Session::mmc_record_exit (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_stop (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                request_stop ();
        }
 }
@@ -176,7 +173,7 @@ Session::mmc_stop (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_pause (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
 
                /* We support RECORD_PAUSE, so the spec says that
                   we must interpret PAUSE like RECORD_PAUSE if
@@ -196,7 +193,7 @@ static bool step_queued = false;
 void
 Session::mmc_step (MIDI::MachineControl &/*mmc*/, int steps)
 {
-       if (!Config->get_mmc_control()) {
+       if (!Config->get_mmc_control ()) {
                return;
        }
 
@@ -235,7 +232,7 @@ Session::mmc_step (MIDI::MachineControl &/*mmc*/, int steps)
             << endl;
 #endif
 
-       request_transport_speed (step_speed);
+       request_transport_speed_nonzero (step_speed);
        last_mmc_step = now;
 
        if (!step_queued) {
@@ -251,7 +248,7 @@ Session::mmc_step (MIDI::MachineControl &/*mmc*/, int steps)
 void
 Session::mmc_rewind (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                request_transport_speed(-8.0f);
        }
 }
@@ -259,7 +256,7 @@ Session::mmc_rewind (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_fast_forward (MIDI::MachineControl &/*mmc*/)
 {
-       if (Config->get_mmc_control()) {
+       if (Config->get_mmc_control ()) {
                request_transport_speed(8.0f);
        }
 }
@@ -267,7 +264,7 @@ Session::mmc_fast_forward (MIDI::MachineControl &/*mmc*/)
 void
 Session::mmc_locate (MIDI::MachineControl &/*mmc*/, const MIDI::byte* mmc_tc)
 {
-       if (!Config->get_mmc_control()) {
+       if (!Config->get_mmc_control ()) {
                return;
        }
 
@@ -308,7 +305,7 @@ Session::mmc_locate (MIDI::MachineControl &/*mmc*/, const MIDI::byte* mmc_tc)
 void
 Session::mmc_shuttle (MIDI::MachineControl &/*mmc*/, float speed, bool forw)
 {
-       if (!Config->get_mmc_control()) {
+       if (!Config->get_mmc_control ()) {
                return;
        }
 
@@ -317,28 +314,29 @@ Session::mmc_shuttle (MIDI::MachineControl &/*mmc*/, float speed, bool forw)
        }
 
        if (forw) {
-               request_transport_speed (speed);
+               request_transport_speed_nonzero (speed);
        } else {
-               request_transport_speed (-speed);
+               request_transport_speed_nonzero (-speed);
        }
 }
 
 void
 Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled)
 {
-       if (Config->get_mmc_control()) {
+       if (!Config->get_mmc_control ()) {
+               return;
+       }
 
-               RouteList::iterator i;
-               boost::shared_ptr<RouteList> r = routes.reader();
+       RouteList::iterator i;
+       boost::shared_ptr<RouteList> r = routes.reader();
 
-               for (i = r->begin(); i != r->end(); ++i) {
-                       AudioTrack *at;
+       for (i = r->begin(); i != r->end(); ++i) {
+               AudioTrack *at;
 
-                       if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
-                               if (trk == at->remote_control_id()) {
-                                       at->set_record_enabled (enabled, &mmc);
-                                       break;
-                               }
+               if ((at = dynamic_cast<AudioTrack*>((*i).get())) != 0) {
+                       if (trk == at->remote_control_id()) {
+                               at->set_record_enabled (enabled, &mmc);
+                               break;
                        }
                }
        }
@@ -350,7 +348,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, 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] */
@@ -360,25 +358,55 @@ Session::send_full_time_code (framepos_t const t)
 
        _send_timecode_update = false;
 
-       if (!Config->get_send_mtc() || _slave) {
+       if (_engine.freewheeling() || !Config->get_send_mtc()) {
+               return 0;
+       }
+       if (_slave && !_slave->locked()) {
                return 0;
        }
 
        // Get timecode time for the given time
        sample_to_timecode (t, timecode, true /* use_offset */, false /* no subframes */);
 
+       // sample-align outbound to rounded (no subframes) timecode
+       framepos_t mtc_tc;
+       timecode_to_sample(timecode, mtc_tc, true, false);
+       outbound_mtc_timecode_frame = mtc_tc;
+
        transmitting_timecode_time = timecode;
-       outbound_mtc_timecode_frame = t;
+
+       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;
+       }
+
+       DEBUG_TRACE (DEBUG::MTC, string_compose ("Full MTC TC %1\n", outbound_mtc_timecode_frame));
 
        // I don't understand this bit yet.. [DR]
+       // I do [rg]:
+       // according to MTC spec 24, 30 drop and 30 non-drop TC, the frame-number represented by 8 quarter frames must be even.
        if (((mtc_timecode_bits >> 5) != MIDI::MTC_25_FPS) && (transmitting_timecode_time.frames % 2)) {
                // start MTC quarter frame transmission on an even frame
                Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame());
                outbound_mtc_timecode_frame += _frames_per_timecode_frame;
        }
 
-       // Compensate for audio latency
-       outbound_mtc_timecode_frame += _worst_output_latency;
+#if 0 // compensate for audio latency  -- disabled [rg]
+       /* this needs more thought and work.
+        * the proper solution will be to just offset MTC by the MIDI port's latency.
+        *
+        * using worst_playback_latency() is wrong when the generated MTC is used to sync
+        * clients which send audio to Ardour for recording.
+        * worst_capture_latency() vs. worst_playback_latency()
+        *
+        * NB. similarly to session_ltc, the offset should be subtracted from the timecode to send,
+        * instead of being added to timestamp when to send the timecode.
+        * Otherwise the timestamp may not fall into the jack-cycle of the current _transport frame.
+        * and no MTC QF will be sent.
+        */
+       outbound_mtc_timecode_frame += worst_playback_latency();
+#endif
        next_quarter_frame_to_send = 0;
 
        // Sync slave to the same Timecode time as we are on
@@ -395,10 +423,9 @@ Session::send_full_time_code (framepos_t const t)
        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 (0, sizeof (msg), msg);
 
        _pframes_since_last_mtc = 0;
        return 0;
@@ -412,26 +439,41 @@ 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 (_slave || !_send_qf_mtc || transmitting_timecode_time.negative || (next_quarter_frame_to_send < 0)) {
+       if (_engine.freewheeling() || !_send_qf_mtc || transmitting_timecode_time.negative || (next_quarter_frame_to_send < 0)) {
                // cerr << "(MTC) Not sending MTC\n";
                return 0;
        }
+       if (_slave && !_slave->locked()) {
+               return 0;
+       }
+
+       /* MTC is max. 30 fps - assert() below will fail
+        * TODO actually limit it to 24,25,29df,30fps
+        * talk to oofus, first.
+        */
+       if (Timecode::timecode_to_frames_per_second(config.get_timecode_format()) > 30) {
+               return 0;
+       }
 
        assert (next_quarter_frame_to_send >= 0);
        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 NQ %3 FD %4\n", start_frame, outbound_mtc_timecode_frame,
-                                                next_quarter_frame_to_send, quarter_frame_duration));
+       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));
 
-       assert ((outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) >= _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));
 
@@ -462,17 +504,18 @@ 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);
 
                /* convert from session frames back to JACK frames using the transport speed */
-               pframes_t const out_stamp = (msg_time - start_frame) / _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)) {
+               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;
@@ -497,7 +540,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;
                }
        }
 
@@ -534,13 +577,22 @@ Session::mmc_step_timeout ()
 
        /* slow it down */
 
-       request_transport_speed (_transport_speed * 0.75);
+       request_transport_speed_nonzero (_transport_speed * 0.75);
        return true;
 }
 
-/*---------------------------------------------------------------------------
-  MIDI THREAD
-  ---------------------------------------------------------------------------*/
+/***********************************************************************
+ 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 ()
@@ -550,12 +602,45 @@ Session::start_midi_thread ()
        return 0;
 }
 
-void
-Session::terminate_midi_thread ()
+MIDI::Port* 
+Session::midi_input_port () const
 {
-       if (midi_control_ui) {
-               midi_control_ui->quit ();
-       }
+       return _midi_ports->midi_input_port ();
+}
+MIDI::Port* 
+Session::midi_output_port () const
+{
+       return _midi_ports->midi_output_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 ();
 }
 
+MIDI::Port*
+Session::mmc_output_port () const
+{
+       return _midi_ports->mmc_output_port ();
+}
 
+MIDI::Port*
+Session::mmc_input_port () const
+{
+       return _midi_ports->mmc_input_port ();
+}