X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fsession_midi.cc;h=87b9e5e8617c44755a8f46c089151199ec88f5e3;hb=fd832d9d1a7eb33ff9b8b206e1b8509aef100faf;hp=639ea399d317a9983c5b456b75f2de393ce1d19a;hpb=e5e12acc5698090f2c0c614385e457cc0b46fbb0;p=ardour.git diff --git a/libs/ardour/session_midi.cc b/libs/ardour/session_midi.cc index 639ea399d3..87b9e5e861 100644 --- a/libs/ardour/session_midi.cc +++ b/libs/ardour/session_midi.cc @@ -33,8 +33,9 @@ #include "pbd/error.h" #include "pbd/pthread_utils.h" #include "pbd/timersub.h" +#include "pbd/stacktrace.h" -#include "timecode/time.h" +#include "temporal/time.h" #include "ardour/audio_track.h" #include "ardour/audioengine.h" @@ -42,11 +43,12 @@ #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/transport_master.h" #include "ardour/ticker.h" -#include "i18n.h" +#include "pbd/i18n.h" using namespace std; using namespace ARDOUR; @@ -75,7 +77,7 @@ Session::setup_midi_control () outbound_mtc_timecode_frame = 0; next_quarter_frame_to_send = 0; - /* Set up the qtr frame message */ + /* Set up the qtr sample message */ mtc_msg[0] = 0xf1; mtc_msg[2] = 0xf1; @@ -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; } @@ -268,7 +283,7 @@ Session::mmc_locate (MIDI::MachineControl &/*mmc*/, const MIDI::byte* mmc_tc) return; } - framepos_t target_frame; + samplepos_t target_sample; Timecode::Time timecode; timecode.hours = mmc_tc[0] & 0xf; @@ -279,26 +294,26 @@ Session::mmc_locate (MIDI::MachineControl &/*mmc*/, const MIDI::byte* mmc_tc) timecode.drop = timecode_drop_frames(); // Also takes timecode offset into account: - timecode_to_sample( timecode, target_frame, true /* use_offset */, false /* use_subframes */ ); + timecode_to_sample( timecode, target_sample, true /* use_offset */, false /* use_subframes */ ); - if (target_frame > max_framepos) { - target_frame = max_framepos; + if (target_sample > max_samplepos) { + target_sample = max_samplepos; } - /* Some (all?) MTC/MMC devices do not send a full MTC frame + /* Some (all?) MTC/MMC devices do not send a full MTC sample at the end of a locate, instead sending only an MMC locate command. This causes the current position of an MTC slave to become out of date. Catch this. */ - MTC_Slave* mtcs = dynamic_cast (_slave); + boost::shared_ptr mtcs = boost::dynamic_pointer_cast (transport_master()); - if (mtcs != 0) { + if (mtcs) { // cerr << "Locate *with* MTC slave\n"; mtcs->handle_locate (mmc_tc); } else { // cerr << "Locate without MTC slave\n"; - request_locate (target_frame, false); + request_locate (target_sample, false); } } @@ -320,6 +335,36 @@ Session::mmc_shuttle (MIDI::MachineControl &/*mmc*/, float speed, bool forw) } } +boost::shared_ptr +Session::get_midi_nth_route_by_id (PresentationInfo::order_t n) const +{ + PresentationInfo::Flag f; + + /* These numbers are defined by the MMC specification. + */ + + if (n == 318) { + f = PresentationInfo::MasterOut; + } else if (n == 319) { + f = PresentationInfo::MonitorOut; + } else { + f = PresentationInfo::Route; + } + + boost::shared_ptr r = routes.reader (); + PresentationInfo::order_t match_cnt = 0; + + for (RouteList::iterator i = r->begin(); i != r->end(); ++i) { + if ((*i)->presentation_info().flag_match (f)) { + if (match_cnt++ == n) { + return *i; + } + } + } + + return boost::shared_ptr(); +} + void Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled) { @@ -327,17 +372,13 @@ Session::mmc_record_enable (MIDI::MachineControl &mmc, size_t trk, bool enabled) return; } - RouteList::iterator i; - boost::shared_ptr r = routes.reader(); + boost::shared_ptr r = get_midi_nth_route_by_id (trk); - for (i = r->begin(); i != r->end(); ++i) { - AudioTrack *at; + if (r) { + boost::shared_ptr at; - if ((at = dynamic_cast((*i).get())) != 0) { - if (trk == at->remote_control_id()) { - at->set_record_enabled (enabled, &mmc); - break; - } + if ((at = boost::dynamic_pointer_cast (r))) { + at->rec_enable_control()->set_value (enabled, Controllable::UseGroup); } } } @@ -348,9 +389,9 @@ 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, MIDI::pframes_t nframes) +Session::send_full_time_code (samplepos_t const t, MIDI::pframes_t nframes) { - /* This function could easily send at a given frame offset, but would + /* This function could easily send at a given sample offset, but would * that be useful? Does ardour do sub-block accurate locating? [DR] */ MIDI::byte msg[10]; @@ -361,7 +402,7 @@ Session::send_full_time_code (framepos_t const t, MIDI::pframes_t nframes) if (_engine.freewheeling() || !Config->get_send_mtc()) { return 0; } - if (_slave && !_slave->locked()) { + if (!transport_master()->locked()) { return 0; } @@ -369,44 +410,42 @@ Session::send_full_time_code (framepos_t const t, MIDI::pframes_t nframes) sample_to_timecode (t, timecode, true /* use_offset */, false /* no subframes */); // sample-align outbound to rounded (no subframes) timecode - framepos_t mtc_tc; + samplepos_t mtc_tc; timecode_to_sample(timecode, mtc_tc, true, false); outbound_mtc_timecode_frame = mtc_tc; - transmitting_timecode_time = timecode; - double const quarter_frame_duration = ((framecnt_t) _frames_per_timecode_frame) / 4.0; + LatencyRange mtc_out_latency = {0, 0}; // TODO cache this, update on engine().GraphReordered() + _midi_ports->mtc_output_port ()->get_connected_latency_range (ltc_out_latency, true); + sampleoffset_t mtc_offset = mtc_out_latency.max; + + // only if rolling.. ? + outbound_mtc_timecode_frame += mtc_offset; + + // outbound_mtc_timecode_frame needs to be >= _transport_sample + // or a new full timecode will be queued next cycle. + while (outbound_mtc_timecode_frame < t) { + Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame()); + outbound_mtc_timecode_frame += _samples_per_timecode_frame; + } + + double const quarter_frame_duration = ((samplecnt_t) _samples_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; + outbound_mtc_timecode_frame += _samples_per_timecode_frame; } - DEBUG_TRACE (DEBUG::MTC, string_compose ("Full MTC TC %1\n", outbound_mtc_timecode_frame)); + DEBUG_TRACE (DEBUG::MTC, string_compose ("Full MTC TC %1 (off %2)\n", outbound_mtc_timecode_frame, mtc_offset)); // 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. + // according to MTC spec 24, 30 drop and 30 non-drop TC, the sample-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 + // start MTC quarter frame transmission on an even sample Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame()); - outbound_mtc_timecode_frame += _frames_per_timecode_frame; - } - -#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 + outbound_mtc_timecode_frame += _samples_per_timecode_frame; + } + next_quarter_frame_to_send = 0; // Sync slave to the same Timecode time as we are on @@ -423,9 +462,9 @@ Session::send_full_time_code (framepos_t const t, MIDI::pframes_t nframes) msg[8] = timecode.frames; // Send message at offset 0, sent time is for the start of this cycle - + MidiBuffer& mb (_midi_ports->mtc_output_port()->get_midi_buffer (nframes)); - mb.push_back (0, sizeof (msg), msg); + mb.push_back (Port::port_offset(), sizeof (msg), msg); _pframes_since_last_mtc = 0; return 0; @@ -434,18 +473,25 @@ Session::send_full_time_code (framepos_t const t, MIDI::pframes_t nframes) /** Send MTC (quarter-frame) messages for this cycle. * Must be called exactly once per cycle from the process thread. Realtime safe. * This function assumes the state of full Timecode is sane, eg. the slave is - * expecting quarter frame messages and has the right frame of reference (any + * expecting quarter frame messages and has the right sample of reference (any * full MTC Timecode time messages that needed to be sent should have been sent * 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, ARDOUR::pframes_t nframes) +Session::send_midi_time_code_for_cycle (samplepos_t start_sample, samplepos_t end_sample, ARDOUR::pframes_t nframes) { + // start_sample == start_sample for normal cycles + // start_sample > _transport_sample for split cycles 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()) { + if (!transport_master()->locked()) { + return 0; + } + + if (_transport_speed < 0) { + // we don't support rolling backwards return 0; } @@ -461,21 +507,26 @@ 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 */ - double const quarter_frame_duration = _frames_per_timecode_frame / 4.0; + double const quarter_frame_duration = _samples_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, + _transport_sample, start_sample, outbound_mtc_timecode_frame, next_quarter_frame_to_send, quarter_frame_duration)); - if (rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) < _transport_frame) { - send_full_time_code (_transport_frame, nframes); + if (rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) < _transport_sample) { + // send full timecode and set outbound_mtc_timecode_frame, next_quarter_frame_to_send + send_full_time_code (_transport_sample, nframes); + } + + if (rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) < start_sample) { + // no QF for this cycle return 0; } /* Send quarter frames for this cycle */ - while (end_frame > rint(outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration))) { + while (end_sample > 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)); + DEBUG_TRACE (DEBUG::MTC, string_compose ("next sample to send: %1\n", next_quarter_frame_to_send)); switch (next_quarter_frame_to_send) { case 0: @@ -504,14 +555,14 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f break; } - const framepos_t msg_time = rint(outbound_mtc_timecode_frame + (quarter_frame_duration * next_quarter_frame_to_send)); + const samplepos_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); + assert (msg_time >= start_sample); + assert (msg_time < end_sample); - /* convert from session frames back to JACK frames using the transport speed */ - ARDOUR::pframes_t const out_stamp = (msg_time - start_frame) / _transport_speed; + /* convert from session samples back to JACK samples using the transport speed */ + ARDOUR::pframes_t const out_stamp = (msg_time - start_sample) / _transport_speed; assert (out_stamp < nframes); MidiBuffer& mb (_midi_ports->mtc_output_port()->get_midi_buffer(nframes)); @@ -522,11 +573,13 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f } #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 @@ -538,9 +591,8 @@ Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_f // Increment timecode time twice Timecode::increment (transmitting_timecode_time, config.get_subframes_per_frame()); 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 += 2.0 * _frames_per_timecode_frame; + // Increment timing of first quarter frame + outbound_mtc_timecode_frame += 2.0 * _samples_per_timecode_frame; } } @@ -551,6 +603,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 () @@ -587,7 +649,7 @@ Session::mmc_step_timeout () void -Session::send_song_position_pointer (framepos_t) +Session::send_song_position_pointer (samplepos_t) { if (midi_clock) { /* Do nothing for the moment */ @@ -597,74 +659,136 @@ Session::send_song_position_pointer (framepos_t) int Session::start_midi_thread () { + if (midi_control_ui) { return 0; } midi_control_ui = new MidiControlUI (*this); midi_control_ui->run (); return 0; } -MIDI::Port* +boost::shared_ptr Session::midi_input_port () const { return _midi_ports->midi_input_port (); } -MIDI::Port* + +boost::shared_ptr Session::midi_output_port () const { return _midi_ports->midi_output_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 (); -} -MIDI::Port* +boost::shared_ptr Session::mmc_output_port () const { return _midi_ports->mmc_output_port (); } -MIDI::Port* +boost::shared_ptr Session::mmc_input_port () const { return _midi_ports->mmc_input_port (); } -MIDI::Port* +boost::shared_ptr Session::scene_output_port () const { return _midi_ports->scene_output_port (); } -MIDI::Port* +boost::shared_ptr Session::scene_input_port () const { return _midi_ports->scene_input_port (); } boost::shared_ptr -Session::scene_in () const +Session::midi_clock_output_port () const { - return _midi_ports->scene_in (); + return _midi_ports->midi_clock_output_port (); } + boost::shared_ptr -Session::scene_out () const +Session::mtc_output_port () const +{ + return _midi_ports->mtc_output_port (); +} + +void +Session::midi_track_presentation_info_changed (PropertyChange const& what_changed, boost::weak_ptr mt) +{ + if (!Config->get_midi_input_follows_selection()) { + return; + } + + if (!what_changed.contains (Properties::selected)) { + return; + } + + boost::shared_ptr new_midi_target (mt.lock ()); + + if (new_midi_target->is_selected()) { + rewire_selected_midi (new_midi_target); + } +} + +void +Session::rewire_selected_midi (boost::shared_ptr new_midi_target) { - return _midi_ports->scene_out (); + if (!new_midi_target) { + return; + } + + boost::shared_ptr old_midi_target = current_midi_target.lock (); + + if (new_midi_target == old_midi_target) { + return; + } + + vector msp; + AudioEngine::instance()->get_midi_selection_ports (msp); + + if (!msp.empty()) { + + if (old_midi_target) { + old_midi_target->input()->disconnect (this); + } + + for (vector::const_iterator p = msp.begin(); p != msp.end(); ++p) { + /* disconnect the port from everything */ + AudioEngine::instance()->disconnect (*p); + /* connect it to the new target */ + new_midi_target->input()->connect (new_midi_target->input()->nth(0), (*p), this); + } + } + + current_midi_target = new_midi_target; +} + +void +Session::rewire_midi_selection_ports () +{ + if (!Config->get_midi_input_follows_selection()) { + return; + } + + boost::shared_ptr target = current_midi_target.lock(); + + if (!target) { + return; + } + + vector msp; + AudioEngine::instance()->get_midi_selection_ports (msp); + + if (msp.empty()) { + return; + } + + target->input()->disconnect (this); + + for (vector::const_iterator p = msp.begin(); p != msp.end(); ++p) { + AudioEngine::instance()->disconnect (*p); + target->input()->connect (target->input()->nth (0), (*p), this); + } }