Collect plugin runtime profile statistics.
[ardour.git] / libs / ardour / amp.cc
index 348f6957d41d11d3cb481138fe86a2d57070b366..7a8232d90cf1320286d9e5aacdc4d4525b381586 100644 (file)
 using namespace ARDOUR;
 using namespace PBD;
 
-// used for low-pass filter denormal protection
-#define GAIN_COEFF_TINY (1e-10) // -200dB
+#define GAIN_COEFF_DELTA (1e-5)
 
 Amp::Amp (Session& s, const std::string& name, boost::shared_ptr<GainControl> gc, bool control_midi_also)
        : Processor(s, "Amp")
-       , _apply_gain(true)
        , _apply_gain_automation(false)
        , _current_gain(GAIN_COEFF_ZERO)
-       , _current_automation_frame (INT64_MAX)
+       , _current_automation_sample (INT64_MAX)
        , _gain_control (gc)
        , _gain_automation_buffer(0)
        , _midi_amp (control_midi_also)
@@ -77,82 +75,96 @@ scale_midi_velocity(Evoral::Event<MidiBuffer::TimeType>& ev, float factor)
 }
 
 void
-Amp::run (BufferSet& bufs, framepos_t /*start_frame*/, framepos_t /*end_frame*/, double /*speed*/, pframes_t nframes, bool)
+Amp::run (BufferSet& bufs, samplepos_t /*start_sample*/, samplepos_t /*end_sample*/, double /*speed*/, pframes_t nframes, bool)
 {
        if (!_active && !_pending_active) {
+               /* disregard potentially prepared gain-automation. */
+               _apply_gain_automation = false;
                return;
        }
 
-       if (_apply_gain) {
+       if (_apply_gain_automation) {
 
-               if (_apply_gain_automation) {
+               gain_t* gab = _gain_automation_buffer;
+               assert (gab);
 
-                       gain_t* gab = _gain_automation_buffer;
-                       assert (gab);
+               /* see note in PluginInsert::connect_and_run -- effectively emit Changed signal */
+               _gain_control->set_value_unchecked (gab[0]);
 
-                       if (_midi_amp) {
-                               for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
-                                       MidiBuffer& mb (*i);
-                                       for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
-                                               Evoral::Event<MidiBuffer::TimeType> ev = *m;
-                                               if (ev.is_note_on()) {
-                                                       assert(ev.time() >= 0 && ev.time() < nframes);
-                                                       scale_midi_velocity (ev, fabsf (gab[ev.time()]));
-                                               }
+               if (_midi_amp) {
+                       for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
+                               MidiBuffer& mb (*i);
+                               for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
+                                       Evoral::Event<MidiBuffer::TimeType> ev = *m;
+                                       if (ev.is_note_on()) {
+                                               assert(ev.time() >= 0 && ev.time() < nframes);
+                                               scale_midi_velocity (ev, fabsf (gab[ev.time()]));
                                        }
                                }
                        }
+               }
 
+               const gain_t a = 156.825f / (gain_t)_session.nominal_sample_rate(); // 25 Hz LPF; see Amp::apply_gain for details
+               gain_t lpf = _current_gain;
 
-                       const double a = 156.825 / _session.nominal_frame_rate(); // 25 Hz LPF; see Amp::apply_gain for details
-                       double lpf = _current_gain;
-
-                       for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
-                               Sample* const sp = i->data();
-                               lpf = _current_gain;
-                               for (pframes_t nx = 0; nx < nframes; ++nx) {
-                                       sp[nx] *= lpf;
-                                       lpf += a * (gab[nx] - lpf);
-                               }
+               for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
+                       Sample* const sp = i->data();
+                       lpf = _current_gain;
+                       for (pframes_t nx = 0; nx < nframes; ++nx) {
+                               sp[nx] *= lpf;
+                               lpf += a * (gab[nx] - lpf);
                        }
+               }
 
-                       if (fabs (lpf) < GAIN_COEFF_TINY) {
-                               _current_gain = GAIN_COEFF_ZERO;
-                       } else {
-                               _current_gain = lpf;
-                       }
+               if (fabsf (lpf) < GAIN_COEFF_SMALL) {
+                       _current_gain = GAIN_COEFF_ZERO;
+               } else {
+                       _current_gain = lpf;
+               }
 
-               } else { /* manual (scalar) gain */
+               /* used it, don't do it again until setup_gain_automation() is
+                * called successfully.
+               */
+               _apply_gain_automation = false;
+
+       } else { /* manual (scalar) gain */
+
+               gain_t const target_gain = _gain_control->get_value();
 
-                       gain_t const dg = _gain_control->get_value();
+               if (fabsf (_current_gain - target_gain) >= GAIN_COEFF_DELTA) {
 
-                       if (_current_gain != dg) {
+                       _current_gain = Amp::apply_gain (bufs, _session.nominal_sample_rate(), nframes, _current_gain, target_gain, _midi_amp);
 
-                               _current_gain = Amp::apply_gain (bufs, _session.nominal_frame_rate(), nframes, _current_gain, dg, _midi_amp);
+                       /* see note in PluginInsert::connect_and_run ()
+                        * set_value_unchecked() won't emit a signal since the value is effectively unchanged
+                        */
+                       _gain_control->Changed (false, PBD::Controllable::NoGroup);
 
-                       } else if (_current_gain != GAIN_COEFF_UNITY) {
+               } else if (target_gain != GAIN_COEFF_UNITY) {
 
-                               /* gain has not changed, but its non-unity */
+                       _current_gain = target_gain;
 
-                               if (_midi_amp) {
-                                       /* don't Trim midi velocity -- only relevant for Midi on Audio tracks */
-                                       for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
+                       if (_midi_amp) {
+                               /* don't Trim midi velocity -- only relevant for Midi on Audio tracks */
+                               for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
 
-                                               MidiBuffer& mb (*i);
+                                       MidiBuffer& mb (*i);
 
-                                               for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
-                                                       Evoral::Event<MidiBuffer::TimeType> ev = *m;
-                                                       if (ev.is_note_on()) {
-                                                               scale_midi_velocity (ev, fabsf (_current_gain));
-                                                       }
+                                       for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
+                                               Evoral::Event<MidiBuffer::TimeType> ev = *m;
+                                               if (ev.is_note_on()) {
+                                                       scale_midi_velocity (ev, fabsf (_current_gain));
                                                }
                                        }
                                }
+                       }
 
-                               for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
-                                       apply_gain_to_buffer (i->data(), nframes, _current_gain);
-                               }
+                       for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
+                               apply_gain_to_buffer (i->data(), nframes, _current_gain);
                        }
+               } else {
+                       /* unity target gain */
+                       _current_gain = target_gain;
                }
        }
 
@@ -160,9 +172,9 @@ Amp::run (BufferSet& bufs, framepos_t /*start_frame*/, framepos_t /*end_frame*/,
 }
 
 gain_t
-Amp::apply_gain (BufferSet& bufs, framecnt_t sample_rate, framecnt_t nframes, gain_t initial, gain_t target, bool midi_amp)
+Amp::apply_gain (BufferSet& bufs, samplecnt_t sample_rate, samplecnt_t nframes, gain_t initial, gain_t target, bool midi_amp)
 {
-        /** Apply a (potentially) declicked gain to the buffers of @a bufs */
+       /** Apply a (potentially) declicked gain to the buffers of @a bufs */
        gain_t rv = target;
 
        if (nframes == 0 || bufs.count().n_total() == 0) {
@@ -207,7 +219,7 @@ Amp::apply_gain (BufferSet& bufs, framecnt_t sample_rate, framecnt_t nframes, ga
        /* Low pass filter coefficient: 1.0 - e^(-2.0 * π * f / 48000) f in Hz.
         * for f << SR,  approx a ~= 6.2 * f / SR;
         */
-       const double a = 156.825 / sample_rate; // 25 Hz LPF
+       const gain_t a = 156.825f / (gain_t)sample_rate; // 25 Hz LPF
 
        for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
                Sample* const buffer = i->data();
@@ -221,30 +233,29 @@ Amp::apply_gain (BufferSet& bufs, framecnt_t sample_rate, framecnt_t nframes, ga
                        rv = lpf;
                }
        }
-       if (fabsf (rv - target) < GAIN_COEFF_TINY) return target;
-       if (fabsf (rv) < GAIN_COEFF_TINY) return GAIN_COEFF_ZERO;
+       if (fabsf (rv - target) < GAIN_COEFF_DELTA) return target;
        return rv;
 }
 
 void
-Amp::declick (BufferSet& bufs, framecnt_t nframes, int dir)
+Amp::declick (BufferSet& bufs, samplecnt_t nframes, int dir)
 {
        if (nframes == 0 || bufs.count().n_total() == 0) {
                return;
        }
 
-       const framecnt_t declick = std::min ((framecnt_t) 512, nframes);
+       const samplecnt_t declick = std::min ((samplecnt_t) 512, nframes);
        const double     fractional_shift = 1.0 / declick ;
        gain_t           delta, initial;
 
        if (dir < 0) {
                /* fade out: remove more and more of delta from initial */
                delta = -1.0;
-                initial = GAIN_COEFF_UNITY;
+               initial = GAIN_COEFF_UNITY;
        } else {
                /* fade in: add more and more of delta from initial */
                delta = 1.0;
-                initial = GAIN_COEFF_ZERO;
+               initial = GAIN_COEFF_ZERO;
        }
 
        /* Audio Gain */
@@ -261,7 +272,7 @@ Amp::declick (BufferSet& bufs, framecnt_t nframes, int dir)
                /* now ensure the rest of the buffer has the target value applied, if necessary. */
                if (declick != nframes) {
                        if (dir < 0) {
-                                memset (&buffer[declick], 0, sizeof (Sample) * (nframes - declick));
+                               memset (&buffer[declick], 0, sizeof (Sample) * (nframes - declick));
                        }
                }
        }
@@ -269,9 +280,9 @@ Amp::declick (BufferSet& bufs, framecnt_t nframes, int dir)
 
 
 gain_t
-Amp::apply_gain (AudioBuffer& buf, framecnt_t sample_rate, framecnt_t nframes, gain_t initial, gain_t target)
+Amp::apply_gain (AudioBuffer& buf, samplecnt_t sample_rate, samplecnt_t nframes, gain_t initial, gain_t target, sampleoffset_t offset)
 {
-        /* Apply a (potentially) declicked gain to the contents of @a buf
+       /* Apply a (potentially) declicked gain to the contents of @a buf
         * -- used by MonitorProcessor::run()
         */
 
@@ -281,26 +292,25 @@ Amp::apply_gain (AudioBuffer& buf, framecnt_t sample_rate, framecnt_t nframes, g
 
        // if we don't need to declick, defer to apply_simple_gain
        if (initial == target) {
-               apply_simple_gain (buf, nframes, target);
+               apply_simple_gain (buf, nframes, target, offset);
                return target;
        }
 
-        Sample* const buffer = buf.data();
-       const double a = 156.825 / sample_rate; // 25 Hz LPF, see [other] Amp::apply_gain() above for details
+       Sample* const buffer = buf.data (offset);
+       const gain_t a = 156.825f / (gain_t)sample_rate; // 25 Hz LPF, see [other] Amp::apply_gain() above for details
 
-       double lpf = initial;
-        for (pframes_t nx = 0; nx < nframes; ++nx) {
-                buffer[nx] *= lpf;
+       gain_t lpf = initial;
+       for (pframes_t nx = 0; nx < nframes; ++nx) {
+               buffer[nx] *= lpf;
                lpf += a * (target - lpf);
-        }
+       }
 
-       if (fabs (lpf - target) < GAIN_COEFF_TINY) return target;
-       if (fabs (lpf) < GAIN_COEFF_TINY) return GAIN_COEFF_ZERO;
+       if (fabsf (lpf - target) < GAIN_COEFF_DELTA) return target;
        return lpf;
 }
 
 void
-Amp::apply_simple_gain (BufferSet& bufs, framecnt_t nframes, gain_t target, bool midi_amp)
+Amp::apply_simple_gain (BufferSet& bufs, samplecnt_t nframes, gain_t target, bool midi_amp)
 {
        if (fabsf (target) < GAIN_COEFF_SMALL) {
 
@@ -345,19 +355,19 @@ Amp::apply_simple_gain (BufferSet& bufs, framecnt_t nframes, gain_t target, bool
 }
 
 void
-Amp::apply_simple_gain (AudioBuffer& buf, framecnt_t nframes, gain_t target)
+Amp::apply_simple_gain (AudioBuffer& buf, samplecnt_t nframes, gain_t target, sampleoffset_t offset)
 {
        if (fabsf (target) < GAIN_COEFF_SMALL) {
-                memset (buf.data(), 0, sizeof (Sample) * nframes);
+               memset (buf.data (offset), 0, sizeof (Sample) * nframes);
        } else if (target != GAIN_COEFF_UNITY) {
-                apply_gain_to_buffer (buf.data(), nframes, target);
+               apply_gain_to_buffer (buf.data(offset), nframes, target);
        }
 }
 
 XMLNode&
-Amp::state (bool full_state)
+Amp::state ()
 {
-       XMLNode& node (Processor::state (full_state));
+       XMLNode& node (Processor::state ());
        node.set_property("type", _gain_control->parameter().type() == GainAutomation ? "amp" : "trim");
        node.add_child_nocopy (_gain_control->get_state());
 
@@ -381,9 +391,12 @@ Amp::set_state (const XMLNode& node, int version)
 /** Write gain automation for this cycle into the buffer previously passed in to
  *  set_gain_automation_buffer (if we are in automation playback mode and the
  *  transport is rolling).
+ *
+ *  After calling this, the gain-automation buffer is valid for the next run.
+ *  so make sure to call ::run() which invalidates the buffer again.
  */
 void
-Amp::setup_gain_automation (framepos_t start_frame, framepos_t end_frame, framecnt_t nframes)
+Amp::setup_gain_automation (samplepos_t start_sample, samplepos_t end_sample, samplecnt_t nframes)
 {
        Glib::Threads::Mutex::Lock am (control_lock(), Glib::Threads::TRY_LOCK);
 
@@ -392,30 +405,16 @@ Amp::setup_gain_automation (framepos_t start_frame, framepos_t end_frame, framec
            && _gain_control->automation_playback())
        {
                assert (_gain_automation_buffer);
-               _apply_gain_automation = _gain_control->list()->curve().rt_safe_get_vector (
-                       start_frame, end_frame, _gain_automation_buffer, nframes);
-
-               /* XXX the future requires a way to automate the control master
-                * and merge its own automation vector/curve with this one. We
-                * don't have a way to do that just yet, so for now, just get
-                * the master's current gain and scale our own automation
-                * vector/curve by this value.
-                */
-
-               if (_gain_control->slaved()) {
-                       const double master_gain = _gain_control->get_masters_value ();
-                       if (master_gain != 1.0) {
-                               apply_gain_to_buffer (_gain_automation_buffer, nframes, master_gain);
-                       }
-               }
 
-               if (start_frame != _current_automation_frame && _session.bounce_processing ()) {
+               _apply_gain_automation = _gain_control->get_masters_curve ( start_sample, end_sample, _gain_automation_buffer, nframes);
+
+               if (start_sample != _current_automation_sample && _session.bounce_processing ()) {
                        _current_gain = _gain_automation_buffer[0];
                }
-               _current_automation_frame = end_frame;
+               _current_automation_sample = end_sample;
        } else {
                _apply_gain_automation = false;
-               _current_automation_frame = INT64_MAX;
+               _current_automation_sample = INT64_MAX;
        }
 }
 
@@ -425,23 +424,10 @@ Amp::visible() const
        return true;
 }
 
-std::string
-Amp::value_as_string (boost::shared_ptr<const AutomationControl> ac) const
-{
-       if (ac == _gain_control) {
-               char buffer[32];
-               snprintf (buffer, sizeof (buffer), _("%.2fdB"), ac->internal_to_user (ac->get_value ()));
-               return buffer;
-       }
-
-       return Automatable::value_as_string (ac);
-}
-
 /** Sets up the buffer that setup_gain_automation and ::run will use for
  *  gain automationc curves.  Must be called before setup_gain_automation,
  *  and must be called with process lock held.
  */
-
 void
 Amp::set_gain_automation_buffer (gain_t* g)
 {