Add Lua bindings to query all stripables
[ardour.git] / libs / ardour / internal_send.cc
index e8e560c7c082fb198dd8fa9017d69babd91067c0..3c01e1acc2a76c4e018f4a33edcb5bd7faf5e4bd 100644 (file)
@@ -19,6 +19,7 @@
 
 #include "pbd/error.h"
 #include "pbd/failed_constructor.h"
+#include "pbd/types_convert.h"
 
 #include "ardour/amp.h"
 #include "ardour/audio_buffer.h"
@@ -30,7 +31,7 @@
 #include "ardour/session.h"
 #include "ardour/audioengine.h"
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 namespace ARDOUR { class MuteMaster; class Pannable; }
 
@@ -49,6 +50,7 @@ InternalSend::InternalSend (Session& s,
                bool ignore_bitslot)
        : Send (s, p, mm, role, ignore_bitslot)
        , _send_from (sendfrom)
+       , _allow_feedback (false)
 {
        if (sendto) {
                if (use_target (sendto)) {
@@ -74,10 +76,10 @@ InternalSend::init_gain ()
 {
        if (_role == Listen) {
                /* send to monitor bus is always at unity */
-               _amp->set_gain (GAIN_COEFF_UNITY, this);
+               _gain_control->set_value (GAIN_COEFF_UNITY, PBD::Controllable::NoGroup);
        } else {
                /* aux sends start at -inf dB */
-               _amp->set_gain (GAIN_COEFF_ZERO, this);
+               _gain_control->set_value (GAIN_COEFF_ZERO, PBD::Controllable::NoGroup);
        }
 }
 
@@ -133,7 +135,7 @@ InternalSend::send_to_going_away ()
 }
 
 void
-InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame, pframes_t nframes, bool)
+InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame, double speed, pframes_t nframes, bool)
 {
        if ((!_active && !_pending_active) || !_send_to) {
                _meter->reset ();
@@ -144,14 +146,37 @@ InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame
        // in-place, which a send must never do.
 
        if (_panshell && !_panshell->bypassed() && role() != Listen) {
-               _panshell->run (bufs, mixbufs, start_frame, end_frame, nframes);
+               if (mixbufs.count ().n_audio () > 0) {
+                       _panshell->run (bufs, mixbufs, start_frame, end_frame, nframes);
+               }
+
+               /* non-audio data will not have been copied by the panner, do it now
+                * if there are more buffers available than send buffers, ignore them,
+                * if there are less, copy the last as IO::copy_to_output does. */
+
+               for (DataType::iterator t = DataType::begin(); t != DataType::end(); ++t) {
+                       if (*t != DataType::AUDIO) {
+                               BufferSet::iterator o = mixbufs.begin(*t);
+                               BufferSet::iterator i = bufs.begin(*t);
+
+                               while (i != bufs.end(*t) && o != mixbufs.end(*t)) {
+                                       o->read_from (*i, nframes);
+                                       ++i;
+                                       ++o;
+                               }
+                               while (o != mixbufs.end(*t)) {
+                                       o->silence(nframes, 0);
+                                       ++o;
+                               }
+                       }
+               }
        } else {
                if (role() == Listen) {
                        /* We're going to the monitor bus, so discard MIDI data */
-                       
+
                        uint32_t const bufs_audio = bufs.count().get (DataType::AUDIO);
                        uint32_t const mixbufs_audio = mixbufs.count().get (DataType::AUDIO);
-                       
+
                        /* monitor-section has same number of channels as master-bus (on creation).
                         *
                         * There is no clear answer what should happen when trying to PFL or AFL
@@ -171,7 +196,8 @@ InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame
                        */
 
                        uint32_t j = 0;
-                       for (uint32_t i = 0; i < mixbufs_audio; ++i) {
+                       uint32_t i = 0;
+                       for (i = 0; i < mixbufs_audio && j < bufs_audio; ++i) {
                                mixbufs.get_audio(i).read_from (bufs.get_audio(j), nframes);
                                ++j;
 
@@ -179,6 +205,10 @@ InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame
                                        j = 0;
                                }
                        }
+                       /* in case or MIDI track with 0 audio channels */
+                       for (; i < mixbufs_audio; ++i) {
+                               mixbufs.get_audio(i).silence (nframes);
+                       }
 
                } else {
                        assert (mixbufs.available() >= bufs.count());
@@ -213,9 +243,9 @@ InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame
 
        _amp->set_gain_automation_buffer (_session.send_gain_automation_buffer ());
        _amp->setup_gain_automation (start_frame, end_frame, nframes);
-       _amp->run (mixbufs, start_frame, end_frame, nframes, true);
+       _amp->run (mixbufs, start_frame, end_frame, speed, nframes, true);
 
-       _delayline->run (mixbufs, start_frame, end_frame, nframes, true);
+       _delayline->run (mixbufs, start_frame, end_frame, speed, nframes, true);
 
        /* consider metering */
 
@@ -223,7 +253,7 @@ InternalSend::run (BufferSet& bufs, framepos_t start_frame, framepos_t end_frame
                if (_amp->gain_control()->get_value() == GAIN_COEFF_ZERO) {
                        _meter->reset();
                } else {
-                       _meter->run (mixbufs, start_frame, end_frame, nframes, true);
+                       _meter->run (mixbufs, start_frame, end_frame, speed, nframes, true);
                }
        }
 
@@ -243,10 +273,20 @@ InternalSend::set_block_size (pframes_t nframes)
         return 0;
 }
 
+void
+InternalSend::set_allow_feedback (bool yn)
+{
+       _allow_feedback = yn;
+       _send_from->processors_changed (RouteProcessorChange ()); /* EMIT SIGNAL */
+}
+
 bool
 InternalSend::feeds (boost::shared_ptr<Route> other) const
 {
-       return _send_to == other;
+       if (_role == Listen || !_allow_feedback) {
+               return _send_to == other;
+       }
+       return false;
 }
 
 XMLNode&
@@ -256,11 +296,12 @@ InternalSend::state (bool full)
 
        /* this replaces any existing "type" property */
 
-       node.add_property ("type", "intsend");
+       node.set_property ("type", "intsend");
 
        if (_send_to) {
-               node.add_property ("target", _send_to->id().to_s());
+               node.set_property ("target", _send_to->id());
        }
+       node.set_property ("allow-feedback", _allow_feedback);
 
        return node;
 }
@@ -274,15 +315,11 @@ InternalSend::get_state()
 int
 InternalSend::set_state (const XMLNode& node, int version)
 {
-       const XMLProperty* prop;
-
        init_gain ();
 
        Send::set_state (node, version);
 
-       if ((prop = node.property ("target")) != 0) {
-
-               _send_to_id = prop->value();
+       if (node.get_property ("target", _send_to_id)) {
 
                /* if we're loading a session, the target route may not have been
                   create yet. make sure we defer till we are sure that it should
@@ -296,6 +333,8 @@ InternalSend::set_state (const XMLNode& node, int version)
                }
        }
 
+       node.get_property (X_("allow-feedback"), _allow_feedback);
+
        return 0;
 }
 
@@ -400,4 +439,4 @@ InternalSend::cycle_start (pframes_t /*nframes*/)
        for (BufferSet::audio_iterator b = mixbufs.audio_begin(); b != mixbufs.audio_end(); ++b) {
                b->prepare ();
        }
-}      
+}