X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fsession_midi.cc;h=baff2c7bfec9b5140de01d5727977b26f40e5b32;hb=18713b7d1fc4a1fcec0a60f2c80a327b50b9c529;hp=f4aef76adc8889c848e191e088ae94b45b69cb8c;hpb=4273093d4021f7de8b8a5c769200091ba03240b4;p=ardour.git diff --git a/libs/ardour/session_midi.cc b/libs/ardour/session_midi.cc index f4aef76adc..baff2c7bfe 100644 --- a/libs/ardour/session_midi.cc +++ b/libs/ardour/session_midi.cc @@ -22,8 +22,6 @@ #include #include #include -#include -#include #include @@ -31,23 +29,24 @@ #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/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/profile.h" +#include "ardour/session.h" #include "ardour/slave.h" -#include "ardour/cycles.h" +#include "ardour/ticker.h" #include "i18n.h" @@ -91,23 +90,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 +114,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 +122,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(); } } @@ -131,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; } @@ -160,7 +172,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 +180,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 +188,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 +208,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 +247,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 +263,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 +271,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 +279,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 +320,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 +329,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 r = routes.reader(); + RouteList::iterator i; + boost::shared_ptr 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((*i).get())) != 0) { - if (trk == at->remote_control_id()) { - at->set_record_enabled (enabled, &mmc); - break; - } + if ((at = dynamic_cast((*i).get())) != 0) { + if (trk == at->remote_control_id()) { + at->set_record_enabled (enabled, Controllable::UseGroup); + break; } } } @@ -350,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] */ @@ -360,25 +373,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 @@ -389,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; @@ -412,26 +454,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,28 +519,31 @@ 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; } #ifndef NDEBUG - 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)); + 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 // Increment quarter frame counter @@ -497,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; } } @@ -508,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 () @@ -534,28 +604,87 @@ 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 () { + if (midi_control_ui) { return 0; } midi_control_ui = new MidiControlUI (*this); midi_control_ui->run (); return 0; } -void -Session::terminate_midi_thread () +boost::shared_ptr +Session::midi_input_port () const { - if (midi_control_ui) { - midi_control_ui->quit (); - } + return _midi_ports->midi_input_port (); +} + +boost::shared_ptr +Session::midi_output_port () const +{ + return _midi_ports->midi_output_port (); +} + +boost::shared_ptr +Session::mmc_output_port () const +{ + return _midi_ports->mmc_output_port (); } +boost::shared_ptr +Session::mmc_input_port () const +{ + return _midi_ports->mmc_input_port (); +} + +boost::shared_ptr +Session::scene_output_port () const +{ + return _midi_ports->scene_output_port (); +} + +boost::shared_ptr +Session::scene_input_port () const +{ + return _midi_ports->scene_input_port (); +} + +boost::shared_ptr +Session::midi_clock_output_port () const +{ + return _midi_ports->midi_clock_output_port (); +} + +boost::shared_ptr +Session::midi_clock_input_port () const +{ + return _midi_ports->midi_clock_input_port (); +} +boost::shared_ptr +Session::mtc_output_port () const +{ + return _midi_ports->mtc_output_port (); +} +boost::shared_ptr +Session::mtc_input_port () const +{ + return _midi_ports->mtc_input_port (); +}