LTC generator checks itself if to send LTC or not.
[ardour.git] / libs / ardour / session_process.cc
index be3f4f968b9c10a387d823ff7004455a2f421ca5..bd5cc664512b823b0fd597e538982bd05f4c4fe9 100644 (file)
 #include "pbd/error.h"
 #include "pbd/enumwriter.h"
 
-#include <glibmm/thread.h>
+#include <glibmm/threads.h>
 
-#include "ardour/ardour.h"
 #include "ardour/audioengine.h"
 #include "ardour/auditioner.h"
 #include "ardour/butler.h"
+#include "ardour/cycle_timer.h"
 #include "ardour/debug.h"
+#include "ardour/graph.h"
+#include "ardour/port.h"
 #include "ardour/process_thread.h"
 #include "ardour/session.h"
 #include "ardour/slave.h"
-#include "ardour/timestamps.h"
-#include "ardour/graph.h"
-#include "ardour/audio_port.h"
-#include "ardour/tempo.h"
 #include "ardour/ticker.h"
-#include "ardour/cycle_timer.h"
+#include "ardour/types.h"
 
 #include "midi++/manager.h"
 #include "midi++/mmc.h"
@@ -62,8 +60,6 @@ Session::process (pframes_t nframes)
 {
        framepos_t transport_at_start = _transport_frame;
 
-       MIDI::Manager::instance()->cycle_start(nframes);
-
        _silent = false;
 
        if (processing_blocked()) {
@@ -98,8 +94,6 @@ Session::process (pframes_t nframes)
        }
 
        SendFeedback (); /* EMIT SIGNAL */
-
-       MIDI::Manager::instance()->cycle_end();
 }
 
 int
@@ -115,13 +109,17 @@ Session::no_roll (pframes_t nframes)
        
        framepos_t end_frame = _transport_frame + nframes; // FIXME: varispeed + no_roll ??
        int ret = 0;
-       bool declick = get_transport_declick_required();
+       int declick = get_transport_declick_required();
        boost::shared_ptr<RouteList> r = routes.reader ();
 
        if (_click_io) {
                _click_io->silence (nframes);
        }
 
+#ifdef HAVE_LTC
+       ltc_tx_send_time_code_for_cycle (_transport_frame, end_frame, _target_transport_speed, _transport_speed, nframes);
+#endif
+
        if (_process_graph) {
                DEBUG_TRACE(DEBUG::ProcessThreads,"calling graph/no-roll\n");
                _process_graph->routes_no_roll( nframes, _transport_frame, end_frame, non_realtime_work_pending(), declick);
@@ -164,7 +162,7 @@ Session::process_routes (pframes_t nframes, bool& need_butler)
 
        const framepos_t start_frame = _transport_frame;
        const framepos_t end_frame = _transport_frame + floor (nframes * _transport_speed);
-
+       
        if (_process_graph) {
                DEBUG_TRACE(DEBUG::ProcessThreads,"calling graph/process-routes\n");
                _process_graph->process_routes (nframes, start_frame, end_frame, declick, need_butler);
@@ -347,8 +345,8 @@ Session::process_with_events (pframes_t nframes)
        if (_transport_speed == 1.0) {
                frames_moved = (framecnt_t) nframes;
        } else {
-               interpolation.set_target_speed (fabs(_target_transport_speed));
-               interpolation.set_speed (fabs(_transport_speed));
+               interpolation.set_target_speed (_target_transport_speed);
+               interpolation.set_speed (_transport_speed);
                frames_moved = (framecnt_t) interpolation.interpolate (0, nframes, 0, 0);
        }
 
@@ -519,7 +517,7 @@ Session::follow_slave (pframes_t nframes)
                slave_speed = 0.0f;
        }
 
-       if (_slave->is_always_synced() || config.get_timecode_source_is_synced()) {
+       if (_slave->is_always_synced() || Config->get_timecode_source_is_synced()) {
 
                /* if the TC source is synced, then we assume that its
                   speed is binary: 0.0 or 1.0
@@ -547,7 +545,7 @@ Session::follow_slave (pframes_t nframes)
                                                   _slave_state, slave_transport_frame, slave_speed, this_delta, average_slave_delta));
 
 
-       if (_slave_state == Running && !_slave->is_always_synced() && !config.get_timecode_source_is_synced()) {
+       if (_slave_state == Running && !_slave->is_always_synced() && !Config->get_timecode_source_is_synced()) {
 
                if (_transport_speed != 0.0f) {
 
@@ -589,7 +587,7 @@ Session::follow_slave (pframes_t nframes)
                        }
 
 #if 1
-                       if ((framecnt_t) abs(average_slave_delta) > _slave->resolution()) {
+                       if (!actively_recording() && (framecnt_t) abs(average_slave_delta) > _slave->resolution()) {
                                cerr << "average slave delta greater than slave resolution (" << _slave->resolution() << "), going to silent motion\n";
                                goto silent_motion;
                        }
@@ -659,7 +657,10 @@ Session::track_slave_state (float slave_speed, framepos_t slave_transport_frame,
 
                        } else {
 
-                               _slave_state = Running;
+                               DEBUG_TRACE (DEBUG::Slave, string_compose ("slave stopped -> running at %1\n", slave_transport_frame));
+
+                               memset (delta_accumulator, 0, sizeof (int32_t) * delta_accumulator_size);
+                               average_slave_delta = 0L;
 
                                Location* al = _locations->auto_loop_location();
 
@@ -669,8 +670,10 @@ Session::track_slave_state (float slave_speed, framepos_t slave_transport_frame,
                                }
 
                                if (slave_transport_frame != _transport_frame) {
+                                       DEBUG_TRACE (DEBUG::Slave, string_compose ("require locate to run. eng: %1 -> sl: %2\n", _transport_frame, slave_transport_frame));
                                        locate (slave_transport_frame, false, false);
                                }
+                               _slave_state = Running;
                        }
                        break;
 
@@ -719,9 +722,6 @@ Session::track_slave_state (float slave_speed, framepos_t slave_transport_frame,
                                        cerr << "cannot micro-seek\n";
                                        /* XXX what? */
                                }
-
-                               memset (delta_accumulator, 0, sizeof (int32_t) * delta_accumulator_size);
-                               average_slave_delta = 0L;
                        }
                }
 
@@ -744,7 +744,7 @@ Session::track_slave_state (float slave_speed, framepos_t slave_transport_frame,
                        force_locate (slave_transport_frame, false);
                }
 
-               _slave_state = Stopped;
+               reset_slave_state();
        }
 }
 
@@ -793,6 +793,9 @@ Session::process_without_events (pframes_t nframes)
 
        if (!_exporting && _slave) {
                if (!follow_slave (nframes)) {
+#ifdef HAVE_LTC
+                       ltc_tx_send_time_code_for_cycle (_transport_frame, _transport_frame, 0, 0 , nframes);
+#endif
                        return;
                }
        }
@@ -805,8 +808,8 @@ Session::process_without_events (pframes_t nframes)
        if (_transport_speed == 1.0) {
                frames_moved = (framecnt_t) nframes;
        } else {
-               interpolation.set_target_speed (fabs(_target_transport_speed));
-               interpolation.set_speed (fabs(_transport_speed));
+               interpolation.set_target_speed (_target_transport_speed);
+               interpolation.set_speed (_transport_speed);
                frames_moved = (framecnt_t) interpolation.interpolate (0, nframes, 0, 0);
        }
 
@@ -814,6 +817,10 @@ Session::process_without_events (pframes_t nframes)
                send_midi_time_code_for_cycle (_transport_frame, _transport_frame + frames_moved, nframes);
        }
 
+#ifdef HAVE_LTC
+       ltc_tx_send_time_code_for_cycle (_transport_frame, _transport_frame + frames_moved, _target_transport_speed, _transport_speed, nframes);
+#endif
+
        framepos_t const stop_limit = compute_stop_limit ();
 
        if (maybe_stop (stop_limit)) {
@@ -834,16 +841,6 @@ Session::process_without_events (pframes_t nframes)
 
        get_track_statistics ();
 
-       /* XXX: I'm not sure whether this is correct, but at least it
-          matches process_with_events, so that this new frames_moved
-          is -ve when transport speed is -ve.  This means that the
-          transport position is updated correctly when we are in
-          reverse.  It seems a bit wrong that we're not using the
-          interpolator to compute this.
-       */
-
-       frames_moved = (framecnt_t) floor (_transport_speed * nframes);
-
        if (frames_moved < 0) {
                decrement_transport_position (-frames_moved);
        } else {
@@ -1021,18 +1018,32 @@ Session::process_event (SessionEvent* ev)
 
        case SessionEvent::AutoLoop:
                if (play_loop) {
+                       /* roll after locate, do not flush, set "with loop"
+                          true only if we are seamless looping
+                       */
                        start_locate (ev->target_frame, true, false, Config->get_seamless_loop());
                }
                remove = false;
                del = false;
                break;
 
+       case SessionEvent::AutoLoopDeclick:
+               if (play_loop) {
+                       /* Request a declick fade-out and a fade-in; the fade-out will happen
+                          at the end of the loop, and the fade-in at the start.
+                       */
+                       transport_sub_state |= (PendingLoopDeclickOut | PendingLoopDeclickIn);
+               }
+               remove = false;
+               del = false;
+               break;
+
        case SessionEvent::Locate:
                if (ev->yes_or_no) {
-                       // cerr << "forced locate to " << ev->target_frame << endl;
+                       /* args: do not roll after locate, do flush, not with loop */
                        locate (ev->target_frame, false, true, false);
                } else {
-                       // cerr << "soft locate to " << ev->target_frame << endl;
+                       /* args: do not roll after locate, do flush, not with loop */
                        start_locate (ev->target_frame, false, true, false);
                }
                _send_timecode_update = true;
@@ -1040,10 +1051,10 @@ Session::process_event (SessionEvent* ev)
 
        case SessionEvent::LocateRoll:
                if (ev->yes_or_no) {
-                       // cerr << "forced locate to+roll " << ev->target_frame << endl;
+                       /* args: roll after locate, do flush, not with loop */
                        locate (ev->target_frame, true, true, false);
                } else {
-                       // cerr << "soft locate to+roll " << ev->target_frame << endl;
+                       /* args: roll after locate, do flush, not with loop */
                        start_locate (ev->target_frame, true, true, false);
                }
                _send_timecode_update = true;
@@ -1057,7 +1068,7 @@ Session::process_event (SessionEvent* ev)
 
 
        case SessionEvent::SetTransportSpeed:
-               set_transport_speed (ev->speed, ev->yes_or_no, ev->second_yes_or_no);
+               set_transport_speed (ev->speed, ev->yes_or_no, ev->second_yes_or_no, ev->third_yes_or_no);
                break;
 
        case SessionEvent::PunchIn:
@@ -1096,6 +1107,7 @@ Session::process_event (SessionEvent* ev)
                break;
 
        case SessionEvent::RangeLocate:
+               /* args: roll after locate, do flush, not with loop */
                start_locate (ev->target_frame, true, true, false);
                remove = false;
                del = false;
@@ -1110,6 +1122,7 @@ Session::process_event (SessionEvent* ev)
                break;
 
        case SessionEvent::SetSyncSource:
+               DEBUG_TRACE (DEBUG::Slave, "seen request for new slave\n");
                use_sync_source (ev->slave);
                break;