Tweak colouring in the processor list.
[ardour.git] / libs / ardour / session_process.cc
index 9549227933d27fc8d5e4dfa4c1c3bbdf0712ae95..9902e5a1e32769141b080794ab4bedeff0c9a4a0 100644 (file)
 #include "ardour/slave.h"
 #include "ardour/timestamps.h"
 #include "ardour/graph.h"
-#include "ardour/port.h"
+#include "ardour/audio_port.h"
 
 #include "midi++/manager.h"
+#include "midi++/mmc.h"
 
 #include "i18n.h"
 
@@ -51,7 +52,7 @@ using namespace std;
  * @param nframes Number of frames to process.
  */
 void
-Session::process (nframes_t nframes)
+Session::process (pframes_t nframes)
 {
        MIDI::Manager::instance()->cycle_start(nframes);
 
@@ -67,16 +68,16 @@ Session::process (nframes_t nframes)
                        post_transport ();
                }
        }
-        
-        _engine.main_thread()->get_buffers ();
+
+       _engine.main_thread()->get_buffers ();
 
        (this->*process_function) (nframes);
 
-        _engine.main_thread()->drop_buffers ();
+       _engine.main_thread()->drop_buffers ();
 
        // the ticker is for sending time information like MidiClock
-       nframes_t transport_frames = transport_frame();
-       BBT_Time  transport_bbt;
+       framepos_t transport_frames = transport_frame();
+       Timecode::BBT_Time transport_bbt;
        bbt_time(transport_frames, transport_bbt);
        Timecode::Time transport_timecode;
        timecode_time(transport_frames, transport_timecode);
@@ -88,15 +89,15 @@ Session::process (nframes_t nframes)
 }
 
 int
-Session::fail_roll (nframes_t nframes)
+Session::fail_roll (pframes_t nframes)
 {
        return no_roll (nframes);
 }
 
 int
-Session::no_roll (nframes_t nframes)
+Session::no_roll (pframes_t nframes)
 {
-       nframes_t end_frame = _transport_frame + nframes; // FIXME: varispeed + no_roll ??
+       framepos_t end_frame = _transport_frame + nframes; // FIXME: varispeed + no_roll ??
        int ret = 0;
        bool declick = get_transport_declick_required();
        boost::shared_ptr<RouteList> r = routes.reader ();
@@ -105,6 +106,7 @@ Session::no_roll (nframes_t nframes)
                _click_io->silence (nframes);
        }
 
+       DEBUG_TRACE(DEBUG::Graph,"calling graph/no-roll\n");
        route_graph->routes_no_roll( nframes, _transport_frame, end_frame, non_realtime_work_pending(), actively_recording(), declick);
         /*
        for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
@@ -128,7 +130,7 @@ Session::no_roll (nframes_t nframes)
 }
 
 int
-Session::process_routes (nframes_t nframes, bool& need_butler)
+Session::process_routes (pframes_t nframes, bool& need_butler)
 {
        bool record_active;
        int  declick = get_transport_declick_required();
@@ -142,9 +144,10 @@ Session::process_routes (nframes_t nframes, bool& need_butler)
 
        record_active = actively_recording(); // || (get_record_enabled() && get_punch_in());
 
-       const nframes_t start_frame = _transport_frame;
-       const nframes_t end_frame = _transport_frame + (nframes_t)floor(nframes * _transport_speed);
+       const framepos_t start_frame = _transport_frame;
+       const framepos_t end_frame = _transport_frame + floor (nframes * _transport_speed);
 
+       DEBUG_TRACE(DEBUG::Graph,"calling graph/process-routes\n");
        route_graph->process_routes( nframes, start_frame, end_frame, declick, record_active, rec_monitors, need_butler);
 /*
        for (RouteList::iterator i = r->begin(); i != r->end(); ++i) {
@@ -167,7 +170,7 @@ Session::process_routes (nframes_t nframes, bool& need_butler)
 }
 
 int
-Session::silent_process_routes (nframes_t nframes, bool& need_butler)
+Session::silent_process_routes (pframes_t nframes, bool& need_butler)
 {
        bool record_active = actively_recording();
        int  declick = get_transport_declick_required();
@@ -179,8 +182,8 @@ Session::silent_process_routes (nframes_t nframes, bool& need_butler)
                declick = -1;
        }
 
-       const nframes_t start_frame = _transport_frame;
-       const nframes_t end_frame = _transport_frame + lrintf(nframes * _transport_speed);
+       const framepos_t start_frame = _transport_frame;
+       const framepos_t end_frame = _transport_frame + lrintf(nframes * _transport_speed);
 
        route_graph->silent_process_routes( nframes, start_frame, end_frame, record_active, rec_monitors, need_butler);
 /*
@@ -230,14 +233,14 @@ Session::get_track_statistics ()
 
 /** Process callback used when the auditioner is not active */
 void
-Session::process_with_events (nframes_t nframes)
+Session::process_with_events (pframes_t nframes)
 {
-       SessionEvent*         ev;
-       nframes_t      this_nframes;
-       nframes_t      end_frame;
+       SessionEvent*  ev;
+       pframes_t      this_nframes;
+       framepos_t     end_frame;
        bool           session_needs_butler = false;
-       nframes_t      stop_limit;
-       long           frames_moved;
+       framepos_t     stop_limit;
+       framecnt_t     frames_moved;
 
        /* make sure the auditioner is silent */
 
@@ -262,13 +265,42 @@ Session::process_with_events (nframes_t nframes)
                process_event (ev);
        }
 
-       /* Events caused a transport change, send an MTC Full Frame (Timecode) message.
-        * This is sent whether rolling or not, to give slaves an idea of ardour time
-        * on locates (and allow slow slaves to position and prepare for rolling)
+       /* Decide on what to do with quarter-frame MTC during this cycle */
+
+       bool const was_sending_qf_mtc = _send_qf_mtc;
+       double const tolerance = Config->get_mtc_qf_speed_tolerance() / 100.0;
+
+       if (_transport_speed != 0) {
+               _send_qf_mtc = (
+                       Config->get_send_mtc () &&
+                       _transport_speed >= (1 - tolerance) &&
+                       _transport_speed <= (1 + tolerance)
+                       );
+               
+               if (_send_qf_mtc && !was_sending_qf_mtc) {
+                       /* we will re-start quarter-frame MTC this cycle, so send a full update to set things up */
+                       _send_timecode_update = true;
+               }
+               
+               if (Config->get_send_mtc() && !_send_qf_mtc && _pframes_since_last_mtc > (frame_rate () / 4)) {
+                       /* we're sending MTC, but we're not sending QF MTC at the moment, and it's been
+                          a quarter of a second since we sent anything at all, so send a full MTC update
+                          this cycle.
+                       */
+                       _send_timecode_update = true;
+               }
+               
+               _pframes_since_last_mtc += nframes;
+       }
+               
+       /* Events caused a transport change (or we re-started sending
+        * MTC), so send an MTC Full Frame (Timecode) message.  This
+        * is sent whether rolling or not, to give slaves an idea of
+        * ardour time on locates (and allow slow slaves to position
+        * and prepare for rolling)
         */
        if (_send_timecode_update) {
-               send_full_time_code(nframes);
-               deliver_mmc (MIDI::MachineControl::cmdLocate, _transport_frame);
+               send_full_time_code (_transport_frame);
        }
 
        if (!process_can_proceed()) {
@@ -282,14 +314,14 @@ Session::process_with_events (nframes_t nframes)
        }
 
        if (_transport_speed == 1.0) {
-               frames_moved = (long) nframes;
+               frames_moved = (framecnt_t) nframes;
        } else {
                interpolation.set_target_speed (fabs(_target_transport_speed));
                interpolation.set_speed (fabs(_transport_speed));
-               frames_moved = (long) interpolation.interpolate (0, nframes, 0, 0);
+               frames_moved = (framecnt_t) interpolation.interpolate (0, nframes, 0, 0);
        }
 
-       end_frame = _transport_frame + (nframes_t)frames_moved;
+       end_frame = _transport_frame + frames_moved;
 
        {
                SessionEvent* this_event;
@@ -311,18 +343,18 @@ Session::process_with_events (nframes_t nframes)
                        return;
                }
 
-               if (!_exporting) {
-                       send_midi_time_code_for_cycle (nframes);
+               if (!_exporting && !timecode_transmission_suspended()) {
+                       send_midi_time_code_for_cycle (_transport_frame, end_frame, nframes);
                }
 
                if (actively_recording()) {
-                       stop_limit = max_frames;
+                       stop_limit = max_framepos;
                } else {
 
                        if (Config->get_stop_at_session_end()) {
                                stop_limit = current_end_frame();
                        } else {
-                               stop_limit = max_frames;
+                               stop_limit = max_framepos;
                        }
                }
 
@@ -342,13 +374,13 @@ Session::process_with_events (nframes_t nframes)
                while (nframes) {
 
                        this_nframes = nframes; /* real (jack) time relative */
-                       frames_moved = (long) floor (_transport_speed * nframes); /* transport relative */
+                       frames_moved = (framecnt_t) floor (_transport_speed * nframes); /* transport relative */
 
                        /* running an event, position transport precisely to its time */
                        if (this_event && this_event->action_frame <= end_frame && this_event->action_frame >= _transport_frame) {
                                /* this isn't quite right for reverse play */
-                               frames_moved = (long) (this_event->action_frame - _transport_frame);
-                               this_nframes = (nframes_t) abs( floor(frames_moved / _transport_speed) );
+                               frames_moved = (framecnt_t) (this_event->action_frame - _transport_frame);
+                               this_nframes = abs (floor(frames_moved / _transport_speed));
                        }
 
                        if (this_nframes) {
@@ -397,7 +429,7 @@ Session::process_with_events (nframes_t nframes)
                        }
 
                        /* this is necessary to handle the case of seamless looping */
-                       end_frame = _transport_frame + (nframes_t) floor (nframes * _transport_speed);
+                       end_frame = _transport_frame + floor (nframes * _transport_speed);
 
                }
 
@@ -432,11 +464,11 @@ Session::transport_locked () const
 }
 
 bool
-Session::follow_slave (nframes_t nframes)
+Session::follow_slave (pframes_t nframes)
 {
        double slave_speed;
-       nframes64_t slave_transport_frame;
-       nframes_t this_delta;
+       framepos_t slave_transport_frame;
+       framecnt_t this_delta;
        int dir;
 
        if (!_slave->ok()) {
@@ -536,7 +568,7 @@ Session::follow_slave (nframes_t nframes)
                        }
                        
 #if 1
-                       if ((nframes_t) abs(average_slave_delta) > _slave->resolution()) {
+                       if ((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;
                        }
@@ -562,7 +594,7 @@ Session::follow_slave (nframes_t nframes)
 }
 
 void
-Session::calculate_moving_average_of_slave_delta(int dir, nframes_t this_delta)
+Session::calculate_moving_average_of_slave_delta (int dir, framecnt_t this_delta)
 {
        if (delta_accumulator_cnt >= delta_accumulator_size) {
                have_first_delta_accumulator = true;
@@ -570,7 +602,7 @@ Session::calculate_moving_average_of_slave_delta(int dir, nframes_t this_delta)
        }
 
        if (delta_accumulator_cnt != 0 || this_delta < _current_frame_rate) {
-               delta_accumulator[delta_accumulator_cnt++] = long(dir) * long(this_delta);
+               delta_accumulator[delta_accumulator_cnt++] = (framecnt_t) dir *  (framecnt_t) this_delta;
        }
 
        if (have_first_delta_accumulator) {
@@ -578,7 +610,7 @@ Session::calculate_moving_average_of_slave_delta(int dir, nframes_t this_delta)
                for (int i = 0; i < delta_accumulator_size; ++i) {
                        average_slave_delta += delta_accumulator[i];
                }
-               average_slave_delta /= long(delta_accumulator_size);
+               average_slave_delta /= (int32_t) delta_accumulator_size;
                if (average_slave_delta < 0L) {
                        average_dir = -1;
                        average_slave_delta = abs(average_slave_delta);
@@ -589,7 +621,7 @@ Session::calculate_moving_average_of_slave_delta(int dir, nframes_t this_delta)
 }
 
 void
-Session::track_slave_state (float slave_speed, nframes_t slave_transport_frame, nframes_t this_delta)
+Session::track_slave_state (float slave_speed, framepos_t slave_transport_frame, framecnt_t this_delta)
 {
        if (slave_speed != 0.0f) {
 
@@ -608,7 +640,7 @@ Session::track_slave_state (float slave_speed, nframes_t slave_transport_frame,
 
                                _slave_state = Running;
 
-                               Location* al = _locations.auto_loop_location();
+                               Location* al = _locations->auto_loop_location();
 
                                if (al && play_loop && (slave_transport_frame < al->start() || slave_transport_frame > al->end())) {
                                        // cancel looping
@@ -642,7 +674,7 @@ Session::track_slave_state (float slave_speed, nframes_t slave_transport_frame,
 
 
                                bool ok = true;
-                               nframes_t frame_delta = slave_transport_frame - _transport_frame;
+                               framecnt_t frame_delta = slave_transport_frame - _transport_frame;
 
                                boost::shared_ptr<RouteList> rl = routes.reader();
                                for (RouteList::iterator i = rl->begin(); i != rl->end(); ++i) {
@@ -667,7 +699,7 @@ Session::track_slave_state (float slave_speed, nframes_t slave_transport_frame,
                                        /* XXX what? */
                                }
 
-                               memset (delta_accumulator, 0, sizeof (long) * delta_accumulator_size);
+                               memset (delta_accumulator, 0, sizeof (int32_t) * delta_accumulator_size);
                                average_slave_delta = 0L;
                                this_delta = 0;
                        }
@@ -697,7 +729,7 @@ Session::track_slave_state (float slave_speed, nframes_t slave_transport_frame,
 }
 
 void
-Session::follow_slave_silently (nframes_t nframes, float slave_speed)
+Session::follow_slave_silently (pframes_t nframes, float slave_speed)
 {
        if (slave_speed && _transport_speed) {
 
@@ -722,16 +754,16 @@ Session::follow_slave_silently (nframes_t nframes, float slave_speed)
                } else {
                        increment_transport_position (frames_moved);
                }
-
-               nframes_t stop_limit;
+                
+               framepos_t stop_limit;
 
                if (actively_recording()) {
-                       stop_limit = max_frames;
+                       stop_limit = max_framepos;
                } else {
                        if (Config->get_stop_at_session_end()) {
                                stop_limit = current_end_frame();
                        } else {
-                               stop_limit = max_frames;
+                               stop_limit = max_framepos;
                        }
                }
 
@@ -740,11 +772,11 @@ Session::follow_slave_silently (nframes_t nframes, float slave_speed)
 }
 
 void
-Session::process_without_events (nframes_t nframes)
+Session::process_without_events (pframes_t nframes)
 {
        bool session_needs_butler = false;
-       nframes_t stop_limit;
-       long frames_moved;
+       framepos_t stop_limit;
+       framecnt_t frames_moved;
 
        if (!process_can_proceed()) {
                _silent = true;
@@ -762,17 +794,25 @@ Session::process_without_events (nframes_t nframes)
                return;
        }
 
-       if (!_exporting) {
-               send_midi_time_code_for_cycle (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));
+               frames_moved = (framecnt_t) interpolation.interpolate (0, nframes, 0, 0);
+       }
+       
+       if (!_exporting && !timecode_transmission_suspended()) {
+               send_midi_time_code_for_cycle (_transport_frame, _transport_frame + frames_moved, nframes);
        }
 
        if (actively_recording()) {
-               stop_limit = max_frames;
+               stop_limit = max_framepos;
        } else {
                if (Config->get_stop_at_session_end()) {
                        stop_limit = current_end_frame();
                } else {
-                       stop_limit = max_frames;
+                       stop_limit = max_framepos;
                }
        }
 
@@ -787,14 +827,6 @@ Session::process_without_events (nframes_t nframes)
 
        click (_transport_frame, nframes);
 
-       if (_transport_speed == 1.0) {
-               frames_moved = (long) nframes;
-       } else {
-               interpolation.set_target_speed (fabs(_target_transport_speed));
-               interpolation.set_speed (fabs(_transport_speed));
-               frames_moved = (long) interpolation.interpolate (0, nframes, 0, 0);
-       }
-
        if (process_routes (nframes, session_needs_butler)) {
                fail_roll (nframes);
                return;
@@ -820,7 +852,7 @@ Session::process_without_events (nframes_t nframes)
  * @param nframes number of frames to process.
  */
 void
-Session::process_audition (nframes_t nframes)
+Session::process_audition (pframes_t nframes)
 {
        SessionEvent* ev;
        boost::shared_ptr<RouteList> r = routes.reader ();
@@ -867,9 +899,9 @@ Session::process_audition (nframes_t nframes)
 }
 
 bool
-Session::maybe_sync_start (nframes_t& nframes)
+Session::maybe_sync_start (pframes_t & nframes)
 {
-       nframes_t sync_offset;
+       pframes_t sync_offset;
 
        if (!waiting_for_sync_offset) {
                return false;
@@ -884,7 +916,7 @@ Session::maybe_sync_start (nframes_t& nframes)
 
                no_roll (sync_offset);
                nframes -= sync_offset;
-               Port::increment_port_offset (sync_offset);
+               AudioPort::increment_port_offset (sync_offset);
                waiting_for_sync_offset = false;
 
                if (nframes == 0) {
@@ -1091,6 +1123,18 @@ Session::process_event (SessionEvent* ev)
                del = false; // other side of RT request needs to clean up
                break;
 
+        case SessionEvent::AdjustPlaybackBuffering:
+                schedule_playback_buffering_adjustment ();
+                break;
+
+        case SessionEvent::AdjustCaptureBuffering:
+                schedule_capture_buffering_adjustment ();
+                break;
+
+       case SessionEvent::SetTimecodeTransmission:
+               g_atomic_int_set (&_suspend_timecode_transmission, ev->yes_or_no ? 0 : 1);
+               break;
+
        default:
          fatal << string_compose(_("Programming error: illegal event type in process_event (%1)"), ev->type) << endmsg;
                /*NOTREACHED*/