2 Copyright (C) 1999-2003 Paul Davis
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 #include "libardour-config.h"
29 #include "pbd/error.h"
30 #include "pbd/enumwriter.h"
31 #include "pbd/pthread_utils.h"
32 #include "pbd/memento_command.h"
33 #include "pbd/stacktrace.h"
35 #include "midi++/mmc.h"
36 #include "midi++/port.h"
38 #include "ardour/audioengine.h"
39 #include "ardour/auditioner.h"
40 #include "ardour/automation_watch.h"
41 #include "ardour/butler.h"
42 #include "ardour/click.h"
43 #include "ardour/debug.h"
44 #include "ardour/disk_reader.h"
45 #include "ardour/location.h"
46 #include "ardour/profile.h"
47 #include "ardour/scene_changer.h"
48 #include "ardour/session.h"
49 #include "ardour/slave.h"
50 #include "ardour/tempo.h"
51 #include "ardour/operations.h"
52 #include "ardour/vca.h"
53 #include "ardour/vca_manager.h"
58 using namespace ARDOUR;
62 Session::add_post_transport_work (PostTransportWork ptw)
64 PostTransportWork oldval;
65 PostTransportWork newval;
69 oldval = (PostTransportWork) g_atomic_int_get (&_post_transport_work);
70 newval = PostTransportWork (oldval | ptw);
71 if (g_atomic_int_compare_and_exchange (&_post_transport_work, oldval, newval)) {
77 error << "Could not set post transport work! Crazy thread madness, call the programmers" << endmsg;
81 Session::request_sync_source (Slave* new_slave)
83 SessionEvent* ev = new SessionEvent (SessionEvent::SetSyncSource, SessionEvent::Add, SessionEvent::Immediate, 0, 0.0);
86 seamless = Config->get_seamless_loop ();
88 if (dynamic_cast<Engine_Slave*>(new_slave)) {
89 /* JACK cannot support seamless looping at present */
90 Config->set_seamless_loop (false);
92 /* reset to whatever the value was before we last switched slaves */
93 Config->set_seamless_loop (_was_seamless);
96 /* save value of seamless from before the switch */
97 _was_seamless = seamless;
99 ev->slave = new_slave;
100 DEBUG_TRACE (DEBUG::Slave, "sent request for new slave\n");
105 Session::request_transport_speed (double speed, bool as_default)
107 SessionEvent* ev = new SessionEvent (SessionEvent::SetTransportSpeed, SessionEvent::Add, SessionEvent::Immediate, 0, speed);
108 ev->third_yes_or_no = as_default; // as_default
109 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request transport speed = %1 as default = %2\n", speed, as_default));
113 /** Request a new transport speed, but if the speed parameter is exactly zero then use
114 * a very small +ve value to prevent the transport actually stopping. This method should
115 * be used by callers who are varying transport speed but don't ever want to stop it.
118 Session::request_transport_speed_nonzero (double speed, bool as_default)
124 request_transport_speed (speed, as_default);
128 Session::request_stop (bool abort, bool clear_state)
130 SessionEvent* ev = new SessionEvent (SessionEvent::SetTransportSpeed, SessionEvent::Add, SessionEvent::Immediate, audible_sample(), 0.0, abort, clear_state);
131 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request transport stop, audible %3 transport %4 abort = %1, clear state = %2\n", abort, clear_state, audible_sample(), _transport_sample));
136 Session::request_locate (samplepos_t target_sample, bool with_roll)
138 SessionEvent *ev = new SessionEvent (with_roll ? SessionEvent::LocateRoll : SessionEvent::Locate, SessionEvent::Add, SessionEvent::Immediate, target_sample, 0, false);
139 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request locate to %1\n", target_sample));
144 Session::force_locate (samplepos_t target_sample, bool with_roll)
146 SessionEvent *ev = new SessionEvent (with_roll ? SessionEvent::LocateRoll : SessionEvent::Locate, SessionEvent::Add, SessionEvent::Immediate, target_sample, 0, true);
147 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request forced locate to %1\n", target_sample));
152 Session::unset_preroll_record_trim ()
154 _preroll_record_trim_len = 0;
158 Session::request_preroll_record_trim (samplepos_t rec_in, samplecnt_t preroll)
160 if (actively_recording ()) {
163 unset_preroll_record_trim ();
165 config.set_punch_in (false);
166 config.set_punch_out (false);
168 samplepos_t pos = std::max ((samplepos_t)0, rec_in - preroll);
169 _preroll_record_trim_len = preroll;
170 maybe_enable_record ();
171 request_locate (pos, true);
172 set_requested_return_sample (rec_in);
176 Session::request_count_in_record ()
178 if (actively_recording ()) {
181 if (transport_rolling()) {
184 maybe_enable_record ();
185 _count_in_once = true;
186 request_transport_speed (1.0, true);
190 Session::request_play_loop (bool yn, bool change_transport_roll)
193 // don't attempt to loop when not using Internal Transport
194 // see also gtk2_ardour/ardour_ui_options.cc parameter_changed()
199 Location *location = _locations->auto_loop_location();
202 if (location == 0 && yn) {
203 error << _("Cannot loop - no loop range defined")
208 if (change_transport_roll) {
209 if (transport_rolling()) {
210 /* start looping at current speed */
211 target_speed = transport_speed ();
213 /* currently stopped */
215 /* start looping at normal speed */
222 /* leave the speed alone */
223 target_speed = transport_speed ();
226 ev = new SessionEvent (SessionEvent::SetLoop, SessionEvent::Add, SessionEvent::Immediate, 0, target_speed, yn);
227 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request set loop = %1, change roll state ? %2\n", yn, change_transport_roll));
231 if (!change_transport_roll) {
232 if (!transport_rolling()) {
233 /* we're not changing transport state, but we do want
234 to set up position for the new loop. Don't
235 do this if we're rolling already.
237 request_locate (location->start(), false);
241 if (!change_transport_roll && Config->get_seamless_loop() && transport_rolling()) {
242 // request an immediate locate to refresh the tracks
243 // after disabling looping
244 request_locate (_transport_sample-1, false);
250 Session::request_play_range (list<AudioRange>* range, bool leave_rolling)
252 SessionEvent* ev = new SessionEvent (SessionEvent::SetPlayAudioRange, SessionEvent::Add, SessionEvent::Immediate, 0, (leave_rolling ? 1.0 : 0.0));
254 ev->audio_range = *range;
256 ev->audio_range.clear ();
258 DEBUG_TRACE (DEBUG::Transport, string_compose ("Request play range, leave rolling ? %1\n", leave_rolling));
263 Session::request_cancel_play_range ()
265 SessionEvent* ev = new SessionEvent (SessionEvent::CancelPlayAudioRange, SessionEvent::Add, SessionEvent::Immediate, 0, 0);
271 Session::realtime_stop (bool abort, bool clear_state)
273 DEBUG_TRACE (DEBUG::Transport, string_compose ("realtime stop @ %1\n", _transport_sample));
274 PostTransportWork todo = PostTransportWork (0);
276 /* assume that when we start, we'll be moving forwards */
278 if (_transport_speed < 0.0f) {
279 todo = (PostTransportWork (todo | PostTransportStop | PostTransportReverse));
280 _default_transport_speed = 1.0;
282 todo = PostTransportWork (todo | PostTransportStop);
287 boost::shared_ptr<RouteList> r = routes.reader ();
289 for (RouteList::iterator i = r->begin (); i != r->end(); ++i) {
290 (*i)->realtime_handle_transport_stopped ();
293 DEBUG_TRACE (DEBUG::Transport, string_compose ("stop complete, auto-return scheduled for return to %1\n", _requested_return_sample));
295 /* the duration change is not guaranteed to have happened, but is likely */
297 todo = PostTransportWork (todo | PostTransportDuration);
300 todo = PostTransportWork (todo | PostTransportAbort);
304 todo = PostTransportWork (todo | PostTransportClearSubstate);
308 add_post_transport_work (todo);
311 _clear_event_type (SessionEvent::StopOnce);
312 _clear_event_type (SessionEvent::RangeStop);
313 _clear_event_type (SessionEvent::RangeLocate);
315 /* if we're going to clear loop state, then force disabling record BUT only if we're not doing latched rec-enable */
316 disable_record (true, (!Config->get_latched_record_enable() && clear_state));
318 if (clear_state && !Config->get_loop_is_mode()) {
322 reset_slave_state ();
324 _transport_speed = 0;
325 _target_transport_speed = 0;
328 g_atomic_int_set (&_playback_load, 100);
329 g_atomic_int_set (&_capture_load, 100);
331 if (config.get_use_video_sync()) {
332 waiting_for_sync_offset = true;
335 transport_sub_state = 0;
339 Session::realtime_locate ()
341 boost::shared_ptr<RouteList> r = routes.reader ();
342 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
343 (*i)->realtime_locate ();
348 Session::butler_transport_work ()
350 /* Note: this function executes in the butler thread context */
354 PostTransportWork ptw;
355 boost::shared_ptr<RouteList> r = routes.reader ();
358 int on_entry = g_atomic_int_get (&_butler->should_do_transport_work);
360 ptw = post_transport_work();
362 DEBUG_TRACE (DEBUG::Transport, string_compose ("Butler transport work, todo = %1 at %2\n", enum_2_string (ptw), (before = g_get_monotonic_time())));
365 if (ptw & PostTransportLocate) {
367 if (get_play_loop() && !Config->get_seamless_loop()) {
369 DEBUG_TRACE (DEBUG::Butler, "flush loop recording fragment to disk\n");
371 /* this locate might be happening while we are
374 * Non-seamless looping will require a locate (below) that
375 * will reset capture buffers and throw away data.
377 * Rather than first find all tracks and see if they
378 * have outstanding data, just do a flush anyway. It
379 * may be cheaper this way anyway, and is certainly
383 bool more_disk_io_to_do = false;
387 more_disk_io_to_do = _butler->flush_tracks_to_disk_after_locate (r, errors);
393 if (more_disk_io_to_do) {
402 if (ptw & PostTransportAdjustPlaybackBuffering) {
403 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
404 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
406 tr->adjust_playback_buffering ();
407 /* and refill those buffers ... */
409 (*i)->non_realtime_locate (_transport_sample);
411 VCAList v = _vca_manager->vcas ();
412 for (VCAList::const_iterator i = v.begin(); i != v.end(); ++i) {
413 (*i)->non_realtime_locate (_transport_sample);
417 if (ptw & PostTransportAdjustCaptureBuffering) {
418 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
419 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
421 tr->adjust_capture_buffering ();
426 if (ptw & PostTransportCurveRealloc) {
427 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
428 (*i)->curve_reallocate();
432 if (ptw & PostTransportSpeed) {
433 non_realtime_set_speed ();
436 if (ptw & PostTransportReverse) {
439 cumulative_rf_motion = 0;
442 /* don't seek if locate will take care of that in non_realtime_stop() */
444 if (!(ptw & PostTransportLocate)) {
445 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
446 (*i)->non_realtime_locate (_transport_sample);
448 if (on_entry != g_atomic_int_get (&_butler->should_do_transport_work)) {
449 /* new request, stop seeking, and start again */
450 g_atomic_int_dec_and_test (&_butler->should_do_transport_work);
454 VCAList v = _vca_manager->vcas ();
455 for (VCAList::const_iterator i = v.begin(); i != v.end(); ++i) {
456 (*i)->non_realtime_locate (_transport_sample);
461 if (ptw & PostTransportLocate) {
462 DEBUG_TRACE (DEBUG::Transport, "nonrealtime locate invoked from BTW\n");
463 non_realtime_locate ();
466 if (ptw & PostTransportStop) {
467 non_realtime_stop (ptw & PostTransportAbort, on_entry, finished);
469 g_atomic_int_dec_and_test (&_butler->should_do_transport_work);
474 if (ptw & PostTransportOverWrite) {
475 non_realtime_overwrite (on_entry, finished);
477 g_atomic_int_dec_and_test (&_butler->should_do_transport_work);
482 if (ptw & PostTransportAudition) {
483 non_realtime_set_audition ();
486 g_atomic_int_dec_and_test (&_butler->should_do_transport_work);
488 DEBUG_TRACE (DEBUG::Transport, string_compose (X_("Butler transport work all done after %1 usecs @ %2 trw = %3\n"), g_get_monotonic_time() - before, _transport_sample, _butler->transport_work_requested()));
492 Session::non_realtime_set_speed ()
494 boost::shared_ptr<RouteList> rl = routes.reader();
495 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
496 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
498 tr->non_realtime_speed_change ();
504 Session::non_realtime_overwrite (int on_entry, bool& finished)
506 boost::shared_ptr<RouteList> rl = routes.reader();
507 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
508 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
509 if (tr && tr->pending_overwrite ()) {
510 tr->overwrite_existing_buffers ();
512 if (on_entry != g_atomic_int_get (&_butler->should_do_transport_work)) {
521 Session::non_realtime_locate ()
523 DEBUG_TRACE (DEBUG::Transport, string_compose ("locate tracks to %1\n", _transport_sample));
525 if (Config->get_loop_is_mode() && get_play_loop()) {
527 Location *loc = _locations->auto_loop_location();
529 if (!loc || (_transport_sample < loc->start() || _transport_sample >= loc->end())) {
530 /* jumped out of loop range: stop tracks from looping,
531 but leave loop (mode) enabled.
533 set_track_loop (false);
535 } else if (loc && Config->get_seamless_loop() &&
536 ((loc->start() <= _transport_sample) ||
537 (loc->end() > _transport_sample) ) ) {
539 /* jumping to start of loop. This might have been done before but it is
540 * idempotent and cheap. Doing it here ensures that when we start playback
541 * outside the loop we still flip tracks into the magic seamless mode
544 set_track_loop (true);
547 set_track_loop (false);
552 /* no more looping .. should have been noticed elsewhere */
559 boost::shared_ptr<RouteList> rl = routes.reader();
562 gint sc = g_atomic_int_get (&_seek_counter);
563 tf = _transport_sample;
565 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
566 (*i)->non_realtime_locate (tf);
567 if (sc != g_atomic_int_get (&_seek_counter)) {
574 /* VCAs are quick to locate because they have no data (except
575 automation) associated with them. Don't bother with a
576 restart mechanism here, but do use the same transport sample
577 that the Routes used.
579 VCAList v = _vca_manager->vcas ();
580 for (VCAList::const_iterator i = v.begin(); i != v.end(); ++i) {
581 (*i)->non_realtime_locate (tf);
585 _scene_changer->locate (_transport_sample);
587 /* XXX: it would be nice to generate the new clicks here (in the non-RT thread)
588 rather than clearing them so that the RT thread has to spend time constructing
589 them (in Session::click).
594 #ifdef USE_TRACKS_CODE_FEATURES
596 Session::select_playhead_priority_target (samplepos_t& jump_to)
600 AutoReturnTarget autoreturn = Config->get_auto_return_target_list ();
606 if (Profile->get_trx() && transport_rolling() ) {
607 // We're playing, so do nothing.
608 // Next stop will put us where we need to be.
612 /* Note that the order of checking each AutoReturnTarget flag defines
613 the priority each flag.
615 Ardour/Mixbus: Last Locate
620 Tracks: Range Selection
626 if (autoreturn & RangeSelectionStart) {
627 if (!_range_selection.empty()) {
628 jump_to = _range_selection.from;
630 if (transport_rolling ()) {
631 /* Range selection no longer exists, but we're playing,
632 so do nothing. Next stop will put us where
640 if (jump_to < 0 && (autoreturn & Loop) && get_play_loop()) {
641 /* don't try to handle loop play when synced to JACK */
643 if (!synced_to_engine()) {
644 Location *location = _locations->auto_loop_location();
647 jump_to = location->start();
649 if (Config->get_seamless_loop()) {
650 /* need to get track buffers reloaded */
651 set_track_loop (true);
657 if (jump_to < 0 && (autoreturn & RegionSelectionStart)) {
658 if (!_object_selection.empty()) {
659 jump_to = _object_selection.from;
663 if (jump_to < 0 && (autoreturn & LastLocate)) {
664 jump_to = _last_roll_location;
672 Session::select_playhead_priority_target (samplepos_t& jump_to)
674 if (config.get_external_sync() || !config.get_auto_return()) {
678 jump_to = _last_roll_location;
685 Session::follow_playhead_priority ()
689 if (select_playhead_priority_target (target)) {
690 request_locate (target);
695 Session::non_realtime_stop (bool abort, int on_entry, bool& finished)
701 PostTransportWork ptw = post_transport_work();
706 boost::shared_ptr<RouteList> rl = routes.reader();
707 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
708 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
709 if (tr && tr->get_captured_samples () != 0) {
715 /* stop and locate are merged here because they share a lot of common stuff */
718 now = localtime (&xnow);
721 auditioner->cancel_audition ();
724 cumulative_rf_motion = 0;
728 begin_reversible_command (Operations::capture);
729 _have_captured = true;
732 DEBUG_TRACE (DEBUG::Transport, X_("Butler PTW: DS stop\n"));
734 if (abort && did_record) {
735 /* no reason to save the session file when we remove sources
737 _state_of_the_state = StateOfTheState (_state_of_the_state|InCleanup);
740 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
741 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
743 tr->transport_stopped_wallclock (*now, xnow, abort);
747 if (abort && did_record) {
748 _state_of_the_state = StateOfTheState (_state_of_the_state & ~InCleanup);
751 boost::shared_ptr<RouteList> r = routes.reader ();
753 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
754 if (!(*i)->is_auditioner()) {
755 (*i)->set_pending_declick (0);
760 commit_reversible_command ();
761 /* increase take name */
762 if (config.get_track_name_take () && !config.get_take_name ().empty()) {
763 string newname = config.get_take_name();
764 config.set_take_name(bump_name_number (newname));
768 if (_engine.running()) {
769 PostTransportWork ptw = post_transport_work ();
771 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
772 (*i)->non_realtime_transport_stop (_transport_sample, !(ptw & PostTransportLocate) || pending_locate_flush);
774 VCAList v = _vca_manager->vcas ();
775 for (VCAList::const_iterator i = v.begin(); i != v.end(); ++i) {
776 (*i)->non_realtime_transport_stop (_transport_sample, !(ptw & PostTransportLocate) || pending_locate_flush);
779 update_latency_compensation ();
782 bool const auto_return_enabled = (!config.get_external_sync() && (Config->get_auto_return_target_list() || abort));
784 if (auto_return_enabled ||
785 (ptw & PostTransportLocate) ||
786 (_requested_return_sample >= 0) ||
787 synced_to_engine()) {
789 if (pending_locate_flush) {
790 flush_all_inserts ();
793 // rg: what is the logic behind this case?
794 // _requested_return_sample should be ignored when synced_to_engine/slaved.
795 // currently worked around in MTC_Slave by forcing _requested_return_sample to -1
797 if ((auto_return_enabled || synced_to_engine() || _requested_return_sample >= 0) &&
798 !(ptw & PostTransportLocate)) {
800 /* no explicit locate queued */
802 bool do_locate = false;
804 if (_requested_return_sample >= 0) {
806 /* explicit return request pre-queued in event list. overrides everything else */
808 _transport_sample = _requested_return_sample;
814 if (select_playhead_priority_target (jump_to)) {
816 _transport_sample = jump_to;
821 _transport_sample = _last_roll_location;
826 _requested_return_sample = -1;
829 _engine.transport_locate (_transport_sample);
836 unset_preroll_record_trim ();
838 /* do this before seeking, because otherwise the tracks will do the wrong thing in seamless loop mode.
841 if (ptw & PostTransportClearSubstate) {
843 if (!Config->get_loop_is_mode()) {
848 /* this for() block can be put inside the previous if() and has the effect of ... ??? what */
851 DEBUG_TRACE (DEBUG::Transport, X_("Butler PTW: locate\n"));
852 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
853 DEBUG_TRACE (DEBUG::Transport, string_compose ("Butler PTW: locate on %1\n", (*i)->name()));
854 (*i)->non_realtime_locate (_transport_sample);
856 if (on_entry != g_atomic_int_get (&_butler->should_do_transport_work)) {
858 /* we will be back */
865 VCAList v = _vca_manager->vcas ();
866 for (VCAList::const_iterator i = v.begin(); i != v.end(); ++i) {
867 (*i)->non_realtime_locate (_transport_sample);
873 /* don't bother with this stuff if we're disconnected from the engine,
874 because there will be no process callbacks to deliver stuff from
877 if (_engine.connected() && !_engine.freewheeling()) {
878 // need to queue this in the next RT cycle
879 _send_timecode_update = true;
881 if (!dynamic_cast<MTC_Slave*>(_slave)) {
882 send_immediate_mmc (MIDI::MachineControlCommand (MIDI::MachineControl::cmdStop));
884 /* This (::non_realtime_stop()) gets called by main
885 process thread, which will lead to confusion
886 when calling AsyncMIDIPort::write().
888 Something must be done. XXX
890 send_mmc_locate (_transport_sample);
894 if ((ptw & PostTransportLocate) && get_record_enabled()) {
895 /* This is scheduled by realtime_stop(), which is also done
896 * when a slave requests /locate/ for an initial sync.
897 * We can't hold up the slave for long with a save() here,
898 * without breaking its initial sync cycle.
900 * save state only if there's no slave or if it's not yet locked.
902 if (!_slave || !_slave->locked()) {
903 DEBUG_TRACE (DEBUG::Transport, X_("Butler PTW: requests save\n"));
904 SaveSessionRequested (_current_snapshot_name);
909 /* always try to get rid of this */
911 remove_pending_capture_state ();
913 /* save the current state of things if appropriate */
915 if (did_record && !saved) {
916 SaveSessionRequested (_current_snapshot_name);
919 if (ptw & PostTransportStop) {
921 if (!Config->get_loop_is_mode()) {
926 PositionChanged (_transport_sample); /* EMIT SIGNAL */
927 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC with speed = %1\n", _transport_speed));
928 TransportStateChange (); /* EMIT SIGNAL */
929 AutomationWatch::instance().transport_stop_automation_watches (_transport_sample);
931 /* and start it up again if relevant */
933 if ((ptw & PostTransportLocate) && !config.get_external_sync() && pending_locate_roll) {
934 request_transport_speed (1.0);
937 /* Even if we didn't do a pending locate roll this time, we don't want it hanging
938 around for next time.
940 pending_locate_roll = false;
944 Session::check_declick_out ()
946 bool locate_required = transport_sub_state & PendingLocate;
948 /* this is called after a process() iteration. if PendingDeclickOut was set,
949 it means that we were waiting to declick the output (which has just been
950 done) before maybe doing something else. this is where we do that "something else".
952 note: called from the audio thread.
955 if (transport_sub_state & PendingDeclickOut) {
957 if (locate_required) {
958 start_locate (pending_locate_sample, pending_locate_roll, pending_locate_flush);
959 transport_sub_state &= ~(PendingDeclickOut|PendingLocate);
961 if (!(transport_sub_state & StopPendingCapture)) {
962 stop_transport (pending_abort);
963 transport_sub_state &= ~(PendingDeclickOut|PendingLocate);
967 } else if (transport_sub_state & PendingLoopDeclickOut) {
968 /* Nothing else to do here; we've declicked, and the loop event will be along shortly */
969 transport_sub_state &= ~PendingLoopDeclickOut;
974 Session::unset_play_loop ()
978 clear_events (SessionEvent::AutoLoop);
979 clear_events (SessionEvent::AutoLoopDeclick);
980 set_track_loop (false);
983 if (Config->get_seamless_loop()) {
984 /* likely need to flush track buffers: this will locate us to wherever we are */
985 add_post_transport_work (PostTransportLocate);
986 _butler->schedule_transport_work ();
992 Session::set_track_loop (bool yn)
994 Location* loc = _locations->auto_loop_location ();
1000 boost::shared_ptr<RouteList> rl = routes.reader ();
1002 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
1003 if (*i && !(*i)->is_private_route()) {
1004 (*i)->set_loop (yn ? loc : 0);
1010 Session::set_play_loop (bool yn, double speed)
1012 /* Called from event-handling context */
1016 if (yn == play_loop || (actively_recording() && yn) || (loc = _locations->auto_loop_location()) == 0) {
1017 /* nothing to do, or can't change loop status while recording */
1021 if (yn && Config->get_seamless_loop() && synced_to_engine()) {
1022 warning << string_compose (
1023 _("Seamless looping cannot be supported while %1 is using JACK transport.\n"
1024 "Recommend changing the configured options"), PROGRAM_NAME)
1032 have_looped = false;
1036 unset_play_range ();
1038 if (Config->get_seamless_loop()) {
1039 if (!Config->get_loop_is_mode()) {
1040 /* set all tracks to use internal looping */
1041 set_track_loop (true);
1043 /* we will do this in the locate to the start OR when we hit the end
1044 * of the loop for the first time
1048 /* set all tracks to NOT use internal looping */
1049 set_track_loop (false);
1052 /* Put the delick and loop events in into the event list. The declick event will
1053 cause a de-clicking fade-out just before the end of the loop, and it will also result
1054 in a fade-in when the loop restarts. The AutoLoop event will peform the actual loop.
1059 auto_loop_declick_range (loc, dcp, dcl);
1060 merge_event (new SessionEvent (SessionEvent::AutoLoopDeclick, SessionEvent::Replace, dcp, dcl, 0.0f));
1061 merge_event (new SessionEvent (SessionEvent::AutoLoop, SessionEvent::Replace, loc->end(), loc->start(), 0.0f));
1063 /* if requested to roll, locate to start of loop and
1064 * roll but ONLY if we're not already rolling.
1066 args: positition, roll=true, flush=true, with_loop=false, force buffer refill if seamless looping
1069 if (Config->get_loop_is_mode()) {
1070 /* loop IS a transport mode: if already
1071 rolling, do not locate to loop start.
1073 if (!transport_rolling() && (speed != 0.0)) {
1074 start_locate (loc->start(), true, true, false, true);
1078 start_locate (loc->start(), true, true, false, true);
1088 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC2 with speed = %1\n", _transport_speed));
1089 TransportStateChange ();
1092 Session::flush_all_inserts ()
1094 boost::shared_ptr<RouteList> r = routes.reader ();
1096 for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
1097 (*i)->flush_processors ();
1102 Session::start_locate (samplepos_t target_sample, bool with_roll, bool with_flush, bool for_loop_enabled, bool force)
1104 if (target_sample < 0) {
1105 error << _("Locate called for negative sample position - ignored") << endmsg;
1109 if (synced_to_engine()) {
1114 _slave->speed_and_position (sp, pos);
1116 if (target_sample != pos) {
1118 if (config.get_jack_time_master()) {
1119 /* actually locate now, since otherwise jack_timebase_callback
1120 will use the incorrect _transport_sample and report an old
1121 and incorrect time to Jack transport
1123 locate (target_sample, with_roll, with_flush, for_loop_enabled, force);
1126 /* tell JACK to change transport position, and we will
1127 follow along later in ::follow_slave()
1130 _engine.transport_locate (target_sample);
1132 if (sp != 1.0f && with_roll) {
1133 _engine.transport_start ();
1139 locate (target_sample, with_roll, with_flush, for_loop_enabled, force);
1144 Session::worst_latency_preroll () const
1146 return _worst_output_latency + _worst_input_latency;
1150 Session::micro_locate (samplecnt_t distance)
1152 boost::shared_ptr<RouteList> rl = routes.reader();
1153 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
1154 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
1155 if (tr && !tr->can_internal_playback_seek (distance)) {
1160 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
1161 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
1163 tr->internal_playback_seek (distance);
1167 _transport_sample += distance;
1171 /** @param with_mmc true to send a MMC locate command when the locate is done */
1173 Session::locate (samplepos_t target_sample, bool with_roll, bool with_flush, bool for_loop_enabled, bool force, bool with_mmc)
1175 bool need_butler = false;
1177 /* Locates for seamless looping are fairly different from other
1178 * locates. They assume that the diskstream buffers for each track
1179 * already have the correct data in them, and thus there is no need to
1180 * actually tell the tracks to locate. What does need to be done,
1181 * though, is all the housekeeping that is associated with non-linear
1182 * changes in the value of _transport_sample.
1185 DEBUG_TRACE (DEBUG::Transport, string_compose ("rt-locate to %1, roll %2 flush %3 loop-enabled %4 force %5 mmc %6\n",
1186 target_sample, with_roll, with_flush, for_loop_enabled, force, with_mmc));
1188 if (!force && _transport_sample == target_sample && !loop_changing && !for_loop_enabled) {
1190 /* already at the desired position. Not forced to locate,
1191 the loop isn't changing, so unless we're told to
1192 start rolling also, there's nothing to do but
1193 tell the world where we are (again).
1197 set_transport_speed (1.0, 0, false);
1199 loop_changing = false;
1200 Located (); /* EMIT SIGNAL */
1204 if (_transport_speed && !(for_loop_enabled && Config->get_seamless_loop())) {
1205 /* Schedule a declick. We'll be called again when its done.
1206 We only do it this way for ordinary locates, not those
1207 due to **seamless** loops.
1210 if (!(transport_sub_state & PendingDeclickOut)) {
1211 transport_sub_state |= (PendingDeclickOut|PendingLocate);
1212 pending_locate_sample = target_sample;
1213 pending_locate_roll = with_roll;
1214 pending_locate_flush = with_flush;
1215 cerr << "Declick scheduled ... back soon\n";
1220 cerr << "... now doing the actual locate\n";
1222 // Update Timecode time
1223 _transport_sample = target_sample;
1224 // Bump seek counter so that any in-process locate in the butler
1225 // thread(s?) can restart.
1226 g_atomic_int_inc (&_seek_counter);
1227 _last_roll_or_reversal_location = target_sample;
1228 _remaining_latency_preroll = worst_latency_preroll ();
1229 timecode_time(_transport_sample, transmitting_timecode_time); // XXX here?
1231 /* do "stopped" stuff if:
1233 * we are rolling AND
1234 * no autoplay in effect AND
1235 * we're not going to keep rolling after the locate AND
1236 * !(playing a loop with JACK sync)
1240 bool transport_was_stopped = !transport_rolling();
1242 if (!transport_was_stopped && (!auto_play_legal || !config.get_auto_play()) && !with_roll && !(synced_to_engine() && play_loop) &&
1243 (!Profile->get_trx() || !(config.get_external_sync() && !synced_to_engine()))) {
1244 realtime_stop (false, true); // XXX paul - check if the 2nd arg is really correct
1245 transport_was_stopped = true;
1247 /* otherwise tell the world that we located */
1251 if (force || !for_loop_enabled || loop_changing) {
1253 PostTransportWork todo = PostTransportLocate;
1255 if (with_roll && transport_was_stopped) {
1256 todo = PostTransportWork (todo | PostTransportRoll);
1259 add_post_transport_work (todo);
1264 /* this is functionally what clear_clicks() does but with a tentative lock */
1266 Glib::Threads::RWLock::WriterLock clickm (click_lock, Glib::Threads::TRY_LOCK);
1268 if (clickm.locked()) {
1270 for (Clicks::iterator i = clicks.begin(); i != clicks.end(); ++i) {
1279 /* switch from input if we're going to roll */
1280 if (Config->get_monitoring_model() == HardwareMonitoring) {
1281 set_track_monitor_input_status (!config.get_auto_input());
1284 /* otherwise we're going to stop, so do the opposite */
1285 if (Config->get_monitoring_model() == HardwareMonitoring) {
1286 set_track_monitor_input_status (true);
1290 /* cancel looped playback if transport pos outside of loop range */
1293 Location* al = _locations->auto_loop_location();
1296 if (_transport_sample < al->start() || _transport_sample >= al->end()) {
1298 // located outside the loop: cancel looping directly, this is called from event handling context
1300 have_looped = false;
1302 if (!Config->get_loop_is_mode()) {
1303 set_play_loop (false, _transport_speed);
1305 if (Config->get_seamless_loop()) {
1306 /* this will make the non_realtime_locate() in the butler
1307 which then causes seek() in tracks actually do the right
1310 set_track_loop (false);
1314 } else if (_transport_sample == al->start()) {
1316 // located to start of loop - this is looping, basically
1320 if (_last_roll_location != al->start()) {
1321 /* didn't start at loop start - playback must have
1322 * started before loop since we've now hit the loop
1325 add_post_transport_work (PostTransportLocate);
1331 boost::shared_ptr<RouteList> rl = routes.reader();
1333 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
1334 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
1336 if (tr && tr->rec_enable_control()->get_value()) {
1337 // tell it we've looped, so it can deal with the record state
1338 tr->transport_looped (_transport_sample);
1343 TransportLooped(); // EMIT SIGNAL
1349 _butler->schedule_transport_work ();
1352 loop_changing = false;
1354 _send_timecode_update = true;
1357 send_mmc_locate (_transport_sample);
1360 _last_roll_location = _last_roll_or_reversal_location = _transport_sample;
1361 if (!synced_to_engine () || _transport_sample == _engine.transport_sample ()) {
1362 Located (); /* EMIT SIGNAL */
1366 /** Set the transport speed.
1367 * Called from the process thread.
1368 * @param speed New speed
1371 Session::set_transport_speed (double speed, samplepos_t destination_sample, bool abort, bool clear_state, bool as_default)
1373 DEBUG_TRACE (DEBUG::Transport, string_compose ("@ %5 Set transport speed to %1, abort = %2 clear_state = %3, current = %4 as_default %6\n",
1374 speed, abort, clear_state, _transport_speed, _transport_sample, as_default));
1376 /* max speed is somewhat arbitrary but based on guestimates regarding disk i/o capability
1377 and user needs. We really need CD-style "skip" playback for ffwd and rewind.
1381 speed = min (8.0, speed);
1382 } else if (speed < 0) {
1383 speed = max (-8.0, speed);
1386 double new_engine_speed = 1.0;
1388 new_engine_speed = fabs (speed);
1389 if (speed < 0) speed = -1;
1390 if (speed > 0) speed = 1;
1393 if (_transport_speed == speed && new_engine_speed == _engine_speed) {
1394 if (as_default && speed == 0.0) { // => reset default transport speed. hacky or what?
1395 _default_transport_speed = 1.0;
1400 #if 0 // TODO pref: allow vari-speed recording
1401 if (actively_recording() && speed != 1.0 && speed != 0.0) {
1402 /* no varispeed during recording */
1403 DEBUG_TRACE (DEBUG::Transport, string_compose ("No varispeed during recording cur_speed %1, sample %2\n",
1404 _transport_speed, _transport_sample));
1409 _target_transport_speed = fabs(speed);
1410 _engine_speed = new_engine_speed;
1412 if (transport_rolling() && speed == 0.0) {
1414 /* we are rolling and we want to stop */
1416 if (Config->get_monitoring_model() == HardwareMonitoring) {
1417 set_track_monitor_input_status (true);
1420 if (synced_to_engine ()) {
1422 /* do this here because our response to the slave won't
1425 _play_range = false;
1426 _count_in_once = false;
1429 _engine.transport_stop ();
1431 bool const auto_return_enabled = (!config.get_external_sync() && (Config->get_auto_return_target_list() || abort));
1433 if (!auto_return_enabled) {
1434 _requested_return_sample = destination_sample;
1437 stop_transport (abort);
1440 } else if (transport_stopped() && speed == 1.0) {
1442 _default_transport_speed = speed;
1444 /* we are stopped and we want to start rolling at speed 1 */
1446 if (Config->get_loop_is_mode() && play_loop) {
1448 Location *location = _locations->auto_loop_location();
1450 if (location != 0) {
1451 if (_transport_sample != location->start()) {
1453 if (Config->get_seamless_loop()) {
1454 /* force tracks to do their thing */
1455 set_track_loop (true);
1458 /* jump to start and then roll from there */
1460 request_locate (location->start(), true);
1466 if (Config->get_monitoring_model() == HardwareMonitoring && config.get_auto_input()) {
1467 set_track_monitor_input_status (false);
1470 if (synced_to_engine()) {
1471 _engine.transport_start ();
1472 _count_in_once = false;
1479 /* not zero, not 1.0 ... varispeed */
1481 // TODO handled transport start.. _remaining_latency_preroll
1482 // and reversal of playback direction.
1484 if ((synced_to_engine()) && speed != 0.0 && speed != 1.0) {
1485 warning << string_compose (
1486 _("Global varispeed cannot be supported while %1 is connected to JACK transport control"),
1493 if (actively_recording()) {
1498 if (speed > 0.0 && _transport_sample == current_end_sample()) {
1502 if (speed < 0.0 && _transport_sample == 0) {
1508 /* if we are reversing relative to the current speed, or relative to the speed
1509 before the last stop, then we have to do extra work.
1512 PostTransportWork todo = PostTransportWork (0);
1514 if ((_transport_speed && speed * _transport_speed < 0.0) || (_last_transport_speed * speed < 0.0) || (_last_transport_speed == 0.0 && speed < 0.0)) {
1515 todo = PostTransportWork (todo | PostTransportReverse);
1516 _last_roll_or_reversal_location = _transport_sample;
1519 _last_transport_speed = _transport_speed;
1520 _transport_speed = speed;
1523 _default_transport_speed = speed;
1527 add_post_transport_work (todo);
1528 _butler->schedule_transport_work ();
1531 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC3 with speed = %1\n", _transport_speed));
1533 /* throttle signal emissions.
1534 * when slaved [_last]_transport_speed
1535 * usually changes every cycle (tiny amounts due to DLL).
1536 * Emitting a signal every cycle is overkill and unwarranted.
1538 * Using _last_transport_speed is not acceptable,
1539 * since it allows for large changes over a long period
1540 * of time. Hence we introduce a dedicated variable to keep track
1542 * The 0.2% dead-zone is somewhat arbitrary. Main use-case
1543 * for TransportStateChange() here is the ShuttleControl display.
1545 if (fabs (_signalled_varispeed - actual_speed ()) > .002
1546 // still, signal hard changes to 1.0 and 0.0:
1547 || (actual_speed () == 1.0 && _signalled_varispeed != 1.0)
1548 || (actual_speed () == 0.0 && _signalled_varispeed != 0.0)
1551 TransportStateChange (); /* EMIT SIGNAL */
1552 _signalled_varispeed = actual_speed ();
1558 /** Stop the transport. */
1560 Session::stop_transport (bool abort, bool clear_state)
1562 _count_in_once = false;
1563 if (_transport_speed == 0.0f) {
1567 DEBUG_TRACE (DEBUG::Transport, string_compose ("stop_transport, declick required? %1\n", get_transport_declick_required()));
1569 if (!get_transport_declick_required()) {
1571 /* stop has not yet been scheduled */
1573 boost::shared_ptr<RouteList> rl = routes.reader();
1574 samplepos_t stop_target = audible_sample();
1578 if (actively_recording() && /* we are recording */
1579 worst_input_latency() > current_block_size) { /* input latency exceeds block size, so simple 1 cycle delay before stop is not enough */
1581 /* we need to capture the audio that is still somewhere in the pipeline between
1582 wherever it was generated and the process callback. This means that even though
1583 the user (or something else) has asked us to stop, we have to roll
1584 past this point and then reset the playhead/transport location to
1585 the position at which the stop was requested.
1587 we still need playback to "stop" now, however, which is why we schedule
1591 DEBUG_TRACE (DEBUG::Transport, string_compose ("stop transport requested @ %1, scheduled for + %2 = %3, abort = %4\n",
1592 _transport_sample, _worst_input_latency,
1593 _transport_sample + _worst_input_latency,
1596 SessionEvent *ev = new SessionEvent (SessionEvent::StopOnce, SessionEvent::Replace,
1597 _transport_sample + _worst_input_latency,
1602 /* request a declick at the start of the next process cycle() so that playback ceases.
1603 It will remain silent until we actually stop (at the StopOnce event somewhere in
1604 the future). The extra flag (StopPendingCapture) is set to ensure that check_declick_out()
1605 does not stop the transport too early.
1607 new_bits = SubState (PendingDeclickOut|StopPendingCapture);
1611 /* Not recording, schedule a declick in the next process() cycle and then stop at its end */
1613 new_bits = PendingDeclickOut;
1614 DEBUG_TRACE (DEBUG::Transport, string_compose ("stop scheduled for next process cycle @ %1\n", _transport_sample));
1617 /* we'll be called again after the declick */
1618 transport_sub_state = SubState (transport_sub_state|new_bits);
1619 pending_abort = abort;
1625 DEBUG_TRACE (DEBUG::Transport, "time to actually stop\n");
1627 /* declick was scheduled, but we've been called again, which means it is really time to stop
1629 XXX: we should probably split this off into its own method and call it explicitly.
1632 realtime_stop (abort, clear_state);
1633 _butler->schedule_transport_work ();
1637 /** Called from the process thread */
1639 Session::start_transport ()
1641 DEBUG_TRACE (DEBUG::Transport, "start_transport\n");
1643 _last_roll_location = _transport_sample;
1644 _last_roll_or_reversal_location = _transport_sample;
1645 _remaining_latency_preroll = worst_latency_preroll ();
1647 have_looped = false;
1649 /* if record status is Enabled, move it to Recording. if its
1650 already Recording, move it to Disabled.
1653 switch (record_status()) {
1655 if (!config.get_punch_in()) {
1656 /* This is only for UIs (keep blinking rec-en before
1657 * punch-in, don't show rec-region etc). The UI still
1658 * depends on SessionEvent::PunchIn and ensuing signals.
1660 * The disk-writers handle punch in/out internally
1661 * in their local delay-compensated timeframe.
1669 disable_record (false);
1677 transport_sub_state |= PendingDeclickIn;
1679 _transport_speed = _default_transport_speed;
1680 _target_transport_speed = _transport_speed;
1682 if (!_engine.freewheeling()) {
1683 Timecode::Time time;
1684 timecode_time_subframes (_transport_sample, time);
1685 if (!dynamic_cast<MTC_Slave*>(_slave)) {
1686 send_immediate_mmc (MIDI::MachineControlCommand (MIDI::MachineControl::cmdDeferredPlay));
1689 if (actively_recording() && click_data && (config.get_count_in () || _count_in_once)) {
1690 _count_in_once = false;
1691 /* calculate count-in duration (in audio samples)
1692 * - use [fixed] tempo/meter at _transport_sample
1693 * - calc duration of 1 bar + time-to-beat before or at transport_sample
1695 const Tempo& tempo = _tempo_map->tempo_at_sample (_transport_sample);
1696 const Meter& meter = _tempo_map->meter_at_sample (_transport_sample);
1698 const double num = meter.divisions_per_bar ();
1699 const double den = meter.note_divisor ();
1700 const double barbeat = _tempo_map->exact_qn_at_sample (_transport_sample, 0) * den / (4. * num);
1701 const double bar_fract = fmod (barbeat, 1.0); // fraction of bar elapsed.
1703 _count_in_samples = meter.samples_per_bar (tempo, _current_sample_rate);
1705 double dt = _count_in_samples / num;
1706 if (bar_fract == 0) {
1707 /* at bar boundary, count-in 2 bars before start. */
1708 _count_in_samples *= 2;
1710 /* beats left after full bar until roll position */
1711 _count_in_samples *= 1. + bar_fract;
1714 if (_count_in_samples > _remaining_latency_preroll) {
1715 _remaining_latency_preroll = _count_in_samples;
1719 samplepos_t cf = _transport_sample - _count_in_samples;
1720 samplecnt_t offset = _click_io->connected_latency (true);
1721 while (cf < _transport_sample + offset) {
1722 add_click (cf, clickbeat == 0);
1724 clickbeat = fmod (clickbeat + 1, num);
1727 if (_count_in_samples < _remaining_latency_preroll) {
1728 _count_in_samples = _remaining_latency_preroll;
1733 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC4 with speed = %1\n", _transport_speed));
1734 TransportStateChange (); /* EMIT SIGNAL */
1737 /** Do any transport work in the audio thread that needs to be done after the
1738 * transport thread is finished. Audio thread, realtime safe.
1741 Session::post_transport ()
1743 PostTransportWork ptw = post_transport_work ();
1745 if (ptw & PostTransportAudition) {
1746 if (auditioner && auditioner->auditioning()) {
1747 process_function = &Session::process_audition;
1749 process_function = &Session::process_with_events;
1753 if (ptw & PostTransportStop) {
1755 transport_sub_state = 0;
1758 if (ptw & PostTransportLocate) {
1760 if (((!config.get_external_sync() && (auto_play_legal && config.get_auto_play())) && !_exporting) || (ptw & PostTransportRoll)) {
1761 _count_in_once = false;
1764 transport_sub_state = 0;
1769 /* XXX is this really safe? shouldn't we just be unsetting the bits that we actually
1772 set_post_transport_work (PostTransportWork (0));
1776 Session::reset_rf_scale (samplecnt_t motion)
1778 cumulative_rf_motion += motion;
1780 if (cumulative_rf_motion < 4 * _current_sample_rate) {
1782 } else if (cumulative_rf_motion < 8 * _current_sample_rate) {
1784 } else if (cumulative_rf_motion < 16 * _current_sample_rate) {
1796 Session::mtc_status_changed (bool yn)
1798 g_atomic_int_set (&_mtc_active, yn);
1799 MTCSyncStateChanged( yn );
1803 Session::ltc_status_changed (bool yn)
1805 g_atomic_int_set (&_ltc_active, yn);
1806 LTCSyncStateChanged( yn );
1810 Session::use_sync_source (Slave* new_slave)
1812 /* Runs in process() context */
1814 bool non_rt_required = false;
1816 /* XXX this deletion is problematic because we're in RT context */
1822 /* slave change, reset any DiskIO block on disk output because it is no
1823 longer valid with a new slave.
1825 DiskReader::set_no_disk_output (false);
1827 MTC_Slave* mtc_slave = dynamic_cast<MTC_Slave*>(_slave);
1829 mtc_slave->ActiveChanged.connect_same_thread (mtc_status_connection, boost::bind (&Session::mtc_status_changed, this, _1));
1830 MTCSyncStateChanged(mtc_slave->locked() );
1832 if (g_atomic_int_get (&_mtc_active) ){
1833 g_atomic_int_set (&_mtc_active, 0);
1834 MTCSyncStateChanged( false );
1836 mtc_status_connection.disconnect ();
1839 LTC_Slave* ltc_slave = dynamic_cast<LTC_Slave*> (_slave);
1841 ltc_slave->ActiveChanged.connect_same_thread (ltc_status_connection, boost::bind (&Session::ltc_status_changed, this, _1));
1842 LTCSyncStateChanged (ltc_slave->locked() );
1844 if (g_atomic_int_get (&_ltc_active) ){
1845 g_atomic_int_set (&_ltc_active, 0);
1846 LTCSyncStateChanged( false );
1848 ltc_status_connection.disconnect ();
1851 DEBUG_TRACE (DEBUG::Slave, string_compose ("set new slave to %1\n", _slave));
1853 // need to queue this for next process() cycle
1854 _send_timecode_update = true;
1856 boost::shared_ptr<RouteList> rl = routes.reader();
1857 for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
1858 boost::shared_ptr<Track> tr = boost::dynamic_pointer_cast<Track> (*i);
1859 if (tr && !tr->is_private_route()) {
1860 tr->set_slaved (_slave != 0);
1864 if (non_rt_required) {
1865 add_post_transport_work (PostTransportSpeed);
1866 _butler->schedule_transport_work ();
1873 Session::drop_sync_source ()
1875 request_sync_source (0);
1879 Session::switch_to_sync_source (SyncSource src)
1883 DEBUG_TRACE (DEBUG::Slave, string_compose ("Setting up sync source %1\n", enum_2_string (src)));
1887 if (_slave && dynamic_cast<MTC_Slave*>(_slave)) {
1892 new_slave = new MTC_Slave (*this, *_midi_ports->mtc_input_port());
1895 catch (failed_constructor& err) {
1901 if (_slave && dynamic_cast<LTC_Slave*>(_slave)) {
1906 new_slave = new LTC_Slave (*this);
1909 catch (failed_constructor& err) {
1916 if (_slave && dynamic_cast<MIDIClock_Slave*>(_slave)) {
1921 new_slave = new MIDIClock_Slave (*this, *_midi_ports->midi_clock_input_port(), 24);
1924 catch (failed_constructor& err) {
1930 if (_slave && dynamic_cast<Engine_Slave*>(_slave)) {
1934 if (config.get_video_pullup() != 0.0f) {
1938 new_slave = new Engine_Slave (*AudioEngine::instance());
1946 request_sync_source (new_slave);
1950 Session::unset_play_range ()
1952 _play_range = false;
1953 _clear_event_type (SessionEvent::RangeStop);
1954 _clear_event_type (SessionEvent::RangeLocate);
1958 Session::set_play_range (list<AudioRange>& range, bool leave_rolling)
1962 /* Called from event-processing context */
1964 unset_play_range ();
1966 if (range.empty()) {
1967 /* _play_range set to false in unset_play_range()
1969 if (!leave_rolling) {
1970 /* stop transport */
1971 SessionEvent* ev = new SessionEvent (SessionEvent::SetTransportSpeed, SessionEvent::Add, SessionEvent::Immediate, 0, 0.0f, false);
1979 /* cancel loop play */
1982 list<AudioRange>::size_type sz = range.size();
1986 list<AudioRange>::iterator i = range.begin();
1987 list<AudioRange>::iterator next;
1989 while (i != range.end()) {
1994 /* locating/stopping is subject to delays for declicking.
1997 samplepos_t requested_sample = i->end;
1999 if (requested_sample > current_block_size) {
2000 requested_sample -= current_block_size;
2002 requested_sample = 0;
2005 if (next == range.end()) {
2006 ev = new SessionEvent (SessionEvent::RangeStop, SessionEvent::Add, requested_sample, 0, 0.0f);
2008 ev = new SessionEvent (SessionEvent::RangeLocate, SessionEvent::Add, requested_sample, (*next).start, 0.0f);
2016 } else if (sz == 1) {
2018 ev = new SessionEvent (SessionEvent::RangeStop, SessionEvent::Add, range.front().end, 0, 0.0f);
2023 /* save range so we can do auto-return etc. */
2025 current_audio_range = range;
2027 /* now start rolling at the right place */
2029 ev = new SessionEvent (SessionEvent::LocateRoll, SessionEvent::Add, SessionEvent::Immediate, range.front().start, 0.0f, false);
2032 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC5 with speed = %1\n", _transport_speed));
2033 TransportStateChange ();
2037 Session::request_bounded_roll (samplepos_t start, samplepos_t end)
2039 AudioRange ar (start, end, 0);
2040 list<AudioRange> lar;
2043 request_play_range (&lar, true);
2047 Session::set_requested_return_sample (samplepos_t return_to)
2049 _requested_return_sample = return_to;
2053 Session::request_roll_at_and_return (samplepos_t start, samplepos_t return_to)
2055 SessionEvent *ev = new SessionEvent (SessionEvent::LocateRollLocate, SessionEvent::Add, SessionEvent::Immediate, return_to, 1.0);
2056 ev->target2_sample = start;
2061 Session::engine_halted ()
2065 /* there will be no more calls to process(), so
2066 we'd better clean up for ourselves, right now.
2068 but first, make sure the butler is out of
2076 realtime_stop (false, true);
2077 non_realtime_stop (false, 0, ignored);
2078 transport_sub_state = 0;
2080 DEBUG_TRACE (DEBUG::Transport, string_compose ("send TSC6 with speed = %1\n", _transport_speed));
2081 TransportStateChange (); /* EMIT SIGNAL */
2086 Session::xrun_recovery ()
2090 Xrun (_transport_sample); /* EMIT SIGNAL */
2092 if (Config->get_stop_recording_on_xrun() && actively_recording()) {
2094 /* it didn't actually halt, but we need
2095 to handle things in the same way.
2103 Session::route_processors_changed (RouteProcessorChange c)
2105 if (g_atomic_int_get (&_ignore_route_processor_changes) > 0) {
2109 if (c.type == RouteProcessorChange::MeterPointChange) {
2114 if (c.type == RouteProcessorChange::RealTimeChange) {
2119 update_latency_compensation ();
2126 Session::allow_auto_play (bool yn)
2128 auto_play_legal = yn;
2132 Session::maybe_stop (samplepos_t limit)
2134 if ((_transport_speed > 0.0f && _transport_sample >= limit) || (_transport_speed < 0.0f && _transport_sample == 0)) {
2135 if (synced_to_engine () && config.get_jack_time_master ()) {
2136 _engine.transport_stop ();
2137 } else if (!synced_to_engine ()) {
2146 Session::send_mmc_locate (samplepos_t t)
2152 if (!_engine.freewheeling()) {
2153 Timecode::Time time;
2154 timecode_time_subframes (t, time);
2155 send_immediate_mmc (MIDI::MachineControlCommand (time));
2159 /** Ask the transport to not send timecode until further notice. The suspension
2160 * will come into effect some finite time after this call, and timecode_transmission_suspended()
2161 * should be checked by the caller to find out when.
2164 Session::request_suspend_timecode_transmission ()
2166 SessionEvent* ev = new SessionEvent (SessionEvent::SetTimecodeTransmission, SessionEvent::Add, SessionEvent::Immediate, 0, 0, false);
2171 Session::request_resume_timecode_transmission ()
2173 SessionEvent* ev = new SessionEvent (SessionEvent::SetTimecodeTransmission, SessionEvent::Add, SessionEvent::Immediate, 0, 0, true);
2178 Session::timecode_transmission_suspended () const
2180 return g_atomic_int_get (&_suspend_timecode_transmission) == 1;