X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fsession_midi.cc;h=baff2c7bfec9b5140de01d5727977b26f40e5b32;hb=18713b7d1fc4a1fcec0a60f2c80a327b50b9c529;hp=2ce3310f47340ebf7ef2db4d20fdbdf97c962396;hpb=c685724c8067fc9308c5f66f1b91d445509159e9;p=ardour.git diff --git a/libs/ardour/session_midi.cc b/libs/ardour/session_midi.cc index 2ce3310f47..baff2c7bfe 100644 --- a/libs/ardour/session_midi.cc +++ b/libs/ardour/session_midi.cc @@ -1,4 +1,3 @@ - /* Copyright (C) 1999-2002 Paul Davis @@ -23,8 +22,6 @@ #include #include #include -#include -#include #include @@ -32,21 +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/timecode.h" +#include "ardour/ticker.h" #include "i18n.h" @@ -90,23 +90,23 @@ Session::setup_midi_control () } void -Session::spp_start (Parser &, nframes_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, nframes_t timestamp) +Session::spp_continue () { - spp_start (ignored, timestamp); + spp_start (); } void -Session::spp_stop (Parser&, nframes_t /*timestamp*/) +Session::spp_stop () { - if (Config->get_mmc_control()) { + if (Config->get_mmc_control ()) { request_stop (); } } @@ -114,7 +114,7 @@ Session::spp_stop (Parser&, nframes_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); } } @@ -122,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(); } } @@ -130,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; } @@ -159,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); } } @@ -167,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 (); } } @@ -175,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 @@ -195,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; } @@ -234,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) { @@ -250,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); } } @@ -258,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); } } @@ -266,11 +279,11 @@ 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; } - nframes_t target_frame; + framepos_t target_frame; Timecode::Time timecode; timecode.hours = mmc_tc[0] & 0xf; @@ -283,8 +296,8 @@ Session::mmc_locate (MIDI::MachineControl &/*mmc*/, const MIDI::byte* mmc_tc) // Also takes timecode offset into account: timecode_to_sample( timecode, target_frame, true /* use_offset */, false /* use_subframes */ ); - if (target_frame > max_frames) { - target_frame = max_frames; + if (target_frame > max_framepos) { + target_frame = max_framepos; } /* Some (all?) MTC/MMC devices do not send a full MTC frame @@ -307,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; } @@ -316,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; } } } @@ -349,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 (nframes64_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] */ @@ -359,25 +373,55 @@ Session::send_full_time_code (nframes64_t const t) _send_timecode_update = false; - if (!session_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 += (nframes_t) _frames_per_timecode_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 @@ -388,103 +432,118 @@ Session::send_full_time_code (nframes64_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; } /** Send MTC (quarter-frame) messages for this cycle. - * Must be called exactly once per cycle from the audio thread. Realtime safe. + * 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 * 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(nframes_t nframes) +Session::send_midi_time_code_for_cycle (framepos_t start_frame, framepos_t end_frame, ARDOUR::pframes_t nframes) { - if (_slave || !session_send_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 */ - nframes_t quarter_frame_duration = ((nframes_t) _frames_per_timecode_frame) >> 2; - - DEBUG_TRACE (DEBUG::MTC, string_compose ("TF %1 SF %2 NQ %3 FD %4\n", _transport_frame, outbound_mtc_timecode_frame, - next_quarter_frame_to_send, quarter_frame_duration)); + double const quarter_frame_duration = _frames_per_timecode_frame / 4.0; - assert((outbound_mtc_timecode_frame + (next_quarter_frame_to_send * quarter_frame_duration)) - >= _transport_frame); + 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 (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 (_transport_frame + nframes > (outbound_mtc_timecode_frame + - (next_quarter_frame_to_send * quarter_frame_duration))) { + /* Send quarter frames for this cycle */ + 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)); switch (next_quarter_frame_to_send) { case 0: - mtc_msg[1] = 0x00 | (transmitting_timecode_time.frames & 0xf); + mtc_msg[1] = 0x00 | (transmitting_timecode_time.frames & 0xf); break; case 1: - mtc_msg[1] = 0x10 | ((transmitting_timecode_time.frames & 0xf0) >> 4); + mtc_msg[1] = 0x10 | ((transmitting_timecode_time.frames & 0xf0) >> 4); break; case 2: - mtc_msg[1] = 0x20 | (transmitting_timecode_time.seconds & 0xf); + mtc_msg[1] = 0x20 | (transmitting_timecode_time.seconds & 0xf); break; case 3: - mtc_msg[1] = 0x30 | ((transmitting_timecode_time.seconds & 0xf0) >> 4); + mtc_msg[1] = 0x30 | ((transmitting_timecode_time.seconds & 0xf0) >> 4); break; case 4: - mtc_msg[1] = 0x40 | (transmitting_timecode_time.minutes & 0xf); + mtc_msg[1] = 0x40 | (transmitting_timecode_time.minutes & 0xf); break; case 5: mtc_msg[1] = 0x50 | ((transmitting_timecode_time.minutes & 0xf0) >> 4); break; case 6: - mtc_msg[1] = 0x60 | ((mtc_timecode_bits|transmitting_timecode_time.hours) & 0xf); + mtc_msg[1] = 0x60 | ((mtc_timecode_bits | transmitting_timecode_time.hours) & 0xf); break; case 7: - mtc_msg[1] = 0x70 | (((mtc_timecode_bits|transmitting_timecode_time.hours) & 0xf0) >> 4); + mtc_msg[1] = 0x70 | (((mtc_timecode_bits | transmitting_timecode_time.hours) & 0xf0) >> 4); break; } - const nframes_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 >= _transport_frame); - assert(msg_time < _transport_frame + nframes); + assert (msg_time >= start_frame); + assert (msg_time < end_frame); - nframes_t out_stamp = msg_time - _transport_frame; - 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)) { + 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 @@ -494,11 +553,11 @@ Session::send_midi_time_code_for_cycle(nframes_t nframes) // Wrap quarter frame counter next_quarter_frame_to_send = 0; // Increment timecode time twice - Timecode::increment( transmitting_timecode_time, config.get_subframes_per_frame() ); - Timecode::increment( transmitting_timecode_time, config.get_subframes_per_frame() ); + 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 += 8 * quarter_frame_duration; + outbound_mtc_timecode_frame += 2.0 * _frames_per_timecode_frame; } } @@ -509,6 +568,16 @@ Session::send_midi_time_code_for_cycle(nframes_t nframes) 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 () @@ -535,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 (); +}