tweak config param for automation sampling interval, set to 500msec by default, and...
[ardour.git] / libs / ardour / audioregion.cc
index 248da959367a24ddbecf7bdde47429e0a29203c6..577f12c78e8ed2c75eba41a6b3997a5e0fa91b49 100644 (file)
@@ -26,7 +26,7 @@
 
 #include <boost/scoped_array.hpp>
 
-#include <glibmm/thread.h>
+#include <glibmm/threads.h>
 
 #include "pbd/basename.h"
 #include "pbd/xml++.h"
@@ -39,6 +39,7 @@
 #include "ardour/audioregion.h"
 #include "ardour/session.h"
 #include "ardour/dB.h"
+#include "ardour/debug.h"
 #include "ardour/playlist.h"
 #include "ardour/audiofilesource.h"
 #include "ardour/region_factory.h"
@@ -65,6 +66,11 @@ namespace ARDOUR {
                PBD::PropertyDescriptor<bool> fade_out_is_short;
                PBD::PropertyDescriptor<bool> fade_in_is_xfade;
                PBD::PropertyDescriptor<bool> fade_in_is_short;
+               PBD::PropertyDescriptor<boost::shared_ptr<AutomationList> > fade_in;
+               PBD::PropertyDescriptor<boost::shared_ptr<AutomationList> > inverse_fade_in;
+               PBD::PropertyDescriptor<boost::shared_ptr<AutomationList> > fade_out;
+               PBD::PropertyDescriptor<boost::shared_ptr<AutomationList> > inverse_fade_out;
+               PBD::PropertyDescriptor<boost::shared_ptr<AutomationList> > envelope;
        }
 }
 
@@ -164,6 +170,16 @@ AudioRegion::make_property_quarks ()
        DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for fade-in-is-xfade = %1\n",    Properties::fade_in_is_xfade.property_id));
        Properties::fade_in_is_short.property_id = g_quark_from_static_string (X_("fade-in-is-short"));
        DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for fade-in-is-short = %1\n",    Properties::fade_in_is_short.property_id));
+       Properties::fade_in.property_id = g_quark_from_static_string (X_("FadeIn"));
+       DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for FadeIn = %1\n",              Properties::fade_in.property_id));
+       Properties::inverse_fade_in.property_id = g_quark_from_static_string (X_("InverseFadeIn"));
+       DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for InverseFadeIn = %1\n",       Properties::inverse_fade_in.property_id));
+       Properties::fade_out.property_id = g_quark_from_static_string (X_("FadeOut"));
+       DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for FadeOut = %1\n",             Properties::fade_out.property_id));
+       Properties::inverse_fade_out.property_id = g_quark_from_static_string (X_("InverseFadeOut"));
+       DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for InverseFadeOut = %1\n",      Properties::inverse_fade_out.property_id));
+       Properties::envelope.property_id = g_quark_from_static_string (X_("Envelope"));
+       DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for Envelope = %1\n",            Properties::envelope.property_id));
 }
 
 void
@@ -181,6 +197,11 @@ AudioRegion::register_properties ()
        add_property (_fade_out_is_short);
        add_property (_fade_in_is_xfade);
        add_property (_fade_in_is_short);
+       add_property (_fade_in);
+       add_property (_inverse_fade_in);
+       add_property (_fade_out);
+       add_property (_inverse_fade_out);
+       add_property (_envelope);
 }
 
 #define AUDIOREGION_STATE_DEFAULT \
@@ -193,7 +214,11 @@ AudioRegion::register_properties ()
        , _fade_in_is_xfade (Properties::fade_in_is_xfade, false) \
        , _fade_out_is_xfade (Properties::fade_out_is_xfade, false) \
        , _fade_in_is_short (Properties::fade_in_is_short, false) \
-       , _fade_out_is_short (Properties::fade_out_is_short, false) 
+       , _fade_out_is_short (Properties::fade_out_is_short, false) \
+       , _fade_in (Properties::fade_in, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter (FadeInAutomation)))) \
+       , _inverse_fade_in (Properties::inverse_fade_in, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter (FadeInAutomation)))) \
+       , _fade_out (Properties::fade_out, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter (FadeOutAutomation)))) \
+       , _inverse_fade_out (Properties::inverse_fade_out, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter (FadeOutAutomation))))
 
 #define AUDIOREGION_COPY_STATE(other) \
        _envelope_active (Properties::envelope_active, other->_envelope_active) \
@@ -205,7 +230,11 @@ AudioRegion::register_properties ()
        , _fade_in_is_xfade (Properties::fade_in_is_xfade, other->_fade_in_is_xfade) \
        , _fade_out_is_xfade (Properties::fade_out_is_xfade, other->_fade_out_is_xfade) \
        , _fade_in_is_short (Properties::fade_in_is_short, other->_fade_in_is_short) \
-       , _fade_out_is_short (Properties::fade_out_is_short, other->_fade_out_is_short)
+       , _fade_out_is_short (Properties::fade_out_is_short, other->_fade_out_is_short) \
+       , _fade_in (Properties::fade_in, boost::shared_ptr<AutomationList> (new AutomationList (*other->_fade_in.val()))) \
+       , _inverse_fade_in (Properties::fade_in, boost::shared_ptr<AutomationList> (new AutomationList (*other->_inverse_fade_in.val()))) \
+       , _fade_out (Properties::fade_in, boost::shared_ptr<AutomationList> (new AutomationList (*other->_fade_out.val()))) \
+       , _inverse_fade_out (Properties::fade_in, boost::shared_ptr<AutomationList> (new AutomationList (*other->_inverse_fade_out.val())))
 /* a Session will reset these to its chosen defaults by calling AudioRegion::set_default_fade() */
 
 void
@@ -227,12 +256,8 @@ AudioRegion::init ()
 AudioRegion::AudioRegion (Session& s, framepos_t start, framecnt_t len, std::string name)
        : Region (s, start, len, name, DataType::AUDIO)
        , AUDIOREGION_STATE_DEFAULT
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter(EnvelopeAutomation))))
        , _automatable (s)
-       , _fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _inverse_fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _inverse_fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _envelope (new AutomationList(Evoral::Parameter(EnvelopeAutomation)))
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -244,12 +269,8 @@ AudioRegion::AudioRegion (Session& s, framepos_t start, framecnt_t len, std::str
 AudioRegion::AudioRegion (const SourceList& srcs)
        : Region (srcs)
        , AUDIOREGION_STATE_DEFAULT
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList (Evoral::Parameter(EnvelopeAutomation))))
        , _automatable(srcs[0]->session())
-       , _fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _inverse_fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _inverse_fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _envelope (new AutomationList(Evoral::Parameter(EnvelopeAutomation)))
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -260,15 +281,11 @@ AudioRegion::AudioRegion (const SourceList& srcs)
 AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other)
        : Region (other)
        , AUDIOREGION_COPY_STATE (other)
-       , _automatable (other->session())
-       , _fade_in (new AutomationList (*other->_fade_in))
-       , _inverse_fade_in (new AutomationList(*other->_inverse_fade_in))
-       , _fade_out (new AutomationList (*other->_fade_out))
-       , _inverse_fade_out (new AutomationList (*other->_inverse_fade_out))
          /* As far as I can see, the _envelope's times are relative to region position, and have nothing
             to do with sources (and hence _start).  So when we copy the envelope, we just use the supplied offset.
          */
-       , _envelope (new AutomationList (*other->_envelope, 0, other->_length))
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList (*other->_envelope.val(), 0, other->_length)))
+       , _automatable (other->session())
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -286,15 +303,11 @@ AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other)
 AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other, framecnt_t offset)
        : Region (other, offset)
        , AUDIOREGION_COPY_STATE (other)
-       , _automatable (other->session())
-       , _fade_in (new AutomationList (*other->_fade_in))
-       , _inverse_fade_in (new AutomationList(*other->_inverse_fade_in))
-       , _fade_out (new AutomationList (*other->_fade_out))
-       , _inverse_fade_out (new AutomationList (*other->_inverse_fade_out))
          /* As far as I can see, the _envelope's times are relative to region position, and have nothing
             to do with sources (and hence _start).  So when we copy the envelope, we just use the supplied offset.
          */
-       , _envelope (new AutomationList (*other->_envelope, offset, other->_length))
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList (*other->_envelope.val(), offset, other->_length)))
+       , _automatable (other->session())
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -312,12 +325,8 @@ AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other, framecnt_t
 AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other, const SourceList& srcs)
        : Region (boost::static_pointer_cast<const Region>(other), srcs)
        , AUDIOREGION_COPY_STATE (other)
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList (*other->_envelope.val())))
        , _automatable (other->session())
-       , _fade_in (new AutomationList (*other->_fade_in))
-       , _inverse_fade_in (new AutomationList(*other->_inverse_fade_in))
-       , _fade_out (new AutomationList (*other->_fade_out))
-       , _inverse_fade_out (new AutomationList (*other->_inverse_fade_out))
-       , _envelope (new AutomationList (*other->_envelope))
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -335,12 +344,8 @@ AudioRegion::AudioRegion (boost::shared_ptr<const AudioRegion> other, const Sour
 AudioRegion::AudioRegion (SourceList& srcs)
        : Region (srcs)
        , AUDIOREGION_STATE_DEFAULT
+       , _envelope (Properties::envelope, boost::shared_ptr<AutomationList> (new AutomationList(Evoral::Parameter(EnvelopeAutomation))))
        , _automatable(srcs[0]->session())
-       , _fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _inverse_fade_in (new AutomationList(Evoral::Parameter(FadeInAutomation)))
-       , _fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _inverse_fade_out (new AutomationList(Evoral::Parameter(FadeOutAutomation)))
-       , _envelope (new AutomationList(Evoral::Parameter(EnvelopeAutomation)))
        , _fade_in_suspended (0)
        , _fade_out_suspended (0)
 {
@@ -524,7 +529,7 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
 
        /* COMPUTE DETAILS OF ANY FADES INVOLVED IN THIS READ */
 
-       /* Amount of fade in that we are dealing with in this read */
+       /* Amount (length) of fade in that we are dealing with in this read */
        framecnt_t fade_in_limit = 0;
 
        /* Offset from buf / mixdown_buffer of the start
@@ -532,7 +537,7 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
        */
        frameoffset_t fade_out_offset = 0;
        
-       /* Amount of fade in that we are dealing with in this read */
+       /* Amount (length) of fade out that we are dealing with in this read */
        framecnt_t fade_out_limit = 0;
 
        framecnt_t fade_interval_start = 0;
@@ -542,7 +547,7 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
        if (_fade_in_active && _session.config.get_use_region_fades()) {
                
                framecnt_t fade_in_length = (framecnt_t) _fade_in->back()->when;
-               
+
                /* see if this read is within the fade in */
                
                if (internal_offset < fade_in_length) {
@@ -611,7 +616,6 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
                apply_gain_to_buffer (mixdown_buffer, to_read, _scale_amplitude);
        }
 
-
        /* APPLY FADES TO THE DATA IN mixdown_buffer AND MIX THE RESULTS INTO
         * buf. The key things to realize here: (1) the fade being applied is
         * (as of April 26th 2012) just the inverse of the fade in curve (2) 
@@ -623,7 +627,7 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
 
                if (opaque()) {
                        if (_inverse_fade_in) {
-                               
+
                                /* explicit inverse fade in curve (e.g. for constant
                                 * power), so we have to fetch it.
                                 */
@@ -655,7 +659,6 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
                        _fade_in->curve().get_vector (internal_offset, internal_offset + fade_in_limit, gain_buffer, fade_in_limit);
                }
 
-
                /* Mix our newly-read data in, with the fade */
                for (framecnt_t n = 0; n < fade_in_limit; ++n) {
                        buf[n] += mixdown_buffer[n] * gain_buffer[n];
@@ -671,18 +674,19 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
                                
                                _inverse_fade_out->curve().get_vector (curve_offset, curve_offset + fade_out_limit, gain_buffer, fade_out_limit);
                                
-                               /* Fade the data from lower levels out */
+                               /* Fade the data from lower levels in */
                                for (framecnt_t n = 0, m = fade_out_offset; n < fade_out_limit; ++n, ++m) {
                                        buf[m] *= gain_buffer[n];
                                }
                                
                                /* fetch the actual fade out */
-                               
+
                                _fade_out->curve().get_vector (curve_offset, curve_offset + fade_out_limit, gain_buffer, fade_out_limit);
                                
                        } else {
-                               
-                               /* no explicit inverse fade out, so just use (1 - fade
+
+                               /* no explicit inverse fade out (which is
+                                * actually a fade in), so just use (1 - fade
                                 * out) for the fade in of lower layers
                                 */
                                
@@ -696,18 +700,21 @@ AudioRegion::read_at (Sample *buf, Sample *mixdown_buffer, float *gain_buffer,
                        _fade_out->curve().get_vector (curve_offset, curve_offset + fade_out_limit, gain_buffer, fade_out_limit);
                }
 
-               /* Mix our newly-read data out, with the fade */
+               /* Mix our newly-read data with whatever was already there,
+                  with the fade out applied to our data.
+               */
                for (framecnt_t n = 0, m = fade_out_offset; n < fade_out_limit; ++n, ++m) {
                        buf[m] += mixdown_buffer[m] * gain_buffer[n];
                }
        }
-
        
        /* MIX OR COPY THE REGION BODY FROM mixdown_buffer INTO buf */
 
        framecnt_t const N = to_read - fade_in_limit - fade_out_limit;
        if (N > 0) {
                if (opaque ()) {
+                       DEBUG_TRACE (DEBUG::AudioPlayback, string_compose ("Region %1 memcpy into buf @ %2 + %3, from mixdown buffer @ %4 + %5, len = %6 cnt was %7\n",
+                                                                          name(), buf, fade_in_limit, mixdown_buffer, fade_in_limit, N, cnt));
                        memcpy (buf + fade_in_limit, mixdown_buffer + fade_in_limit, N * sizeof (Sample));
                } else {
                        mix_buffers_no_gain (buf + fade_in_limit, mixdown_buffer + fade_in_limit, N);
@@ -756,8 +763,8 @@ AudioRegion::read_from_sources (SourceList const & srcs, framecnt_t limit, Sampl
                */
 
                if (Config->get_replicate_missing_region_channels()) {
-                       /* track is N-channel, this region has less channels, so use a relevant channel
-                        */
+
+                       /* copy an existing channel's data in for this non-existant one */
 
                        uint32_t channel = n_channels() % chan_n;
                        boost::shared_ptr<AudioSource> src = boost::dynamic_pointer_cast<AudioSource> (srcs[channel]);
@@ -765,6 +772,11 @@ AudioRegion::read_from_sources (SourceList const & srcs, framecnt_t limit, Sampl
                        if (src->read (buf, _start + internal_offset, to_read) != to_read) {
                                return 0; /* "read nothing" */
                        }
+
+               } else {
+                       
+                       /* use silence */
+                       memset (buf, 0, sizeof (Sample) * to_read);
                }
        }
 
@@ -988,7 +1000,7 @@ void
 AudioRegion::set_fade_in (boost::shared_ptr<AutomationList> f)
 {
        _fade_in->freeze ();
-       *_fade_in = *f;
+       *(_fade_in.val()) = *f;
        _fade_in->thaw ();
        _default_fade_in = false;
 
@@ -1010,23 +1022,23 @@ AudioRegion::set_fade_in (FadeShape shape, framecnt_t len)
        case FadeLinear:
                _fade_in->fast_simple_add (0.0, 0.0);
                _fade_in->fast_simple_add (len, 1.0);
-               reverse_curve (_inverse_fade_in, _fade_in);
+               reverse_curve (_inverse_fade_in.val(), _fade_in.val());
                break;
 
        case FadeFast:
-               generate_db_fade (_fade_in, len, 10, -60);
-               reverse_curve (c1, _fade_in);
+               generate_db_fade (_fade_in.val(), len, 10, -60);
+               reverse_curve (c1, _fade_in.val());
                _fade_in->copy_events (*c1);
-               generate_inverse_power_curve (_inverse_fade_in, _fade_in);
+               generate_inverse_power_curve (_inverse_fade_in.val(), _fade_in.val());
                break;
 
        case FadeSlow:
                generate_db_fade (c1, len, 10, -1);  // start off with a slow fade
                generate_db_fade (c2, len, 10, -80); // end with a fast fade
-               merge_curves (_fade_in, c1, c2);
-               reverse_curve (c3, _fade_in);
+               merge_curves (_fade_in.val(), c1, c2);
+               reverse_curve (c3, _fade_in.val());
                _fade_in->copy_events (*c3);
-               generate_inverse_power_curve (_inverse_fade_in, _fade_in);
+               generate_inverse_power_curve (_inverse_fade_in.val(), _fade_in.val());
                break;
 
        case FadeConstantPower:
@@ -1035,7 +1047,7 @@ AudioRegion::set_fade_in (FadeShape shape, framecnt_t len)
                        _fade_in->fast_simple_add (len*dist, sin (dist*M_PI/2));
                }
                _fade_in->fast_simple_add (len, 1.0);
-               reverse_curve (_inverse_fade_in, _fade_in);
+               reverse_curve (_inverse_fade_in.val(), _fade_in.val());
                break;
                
        case FadeSymmetric:
@@ -1053,9 +1065,9 @@ AudioRegion::set_fade_in (FadeShape shape, framecnt_t len)
                        _fade_in->fast_simple_add (len* (breakpoint+((1.0-breakpoint)*(double)i/(double)num_steps)), coeff);
                }
                _fade_in->fast_simple_add (len, VERY_SMALL_SIGNAL);
-               reverse_curve (c3, _fade_in);
+               reverse_curve (c3, _fade_in.val());
                _fade_in->copy_events (*c3);
-               reverse_curve (_inverse_fade_in, _fade_in );
+               reverse_curve (_inverse_fade_in.val(), _fade_in.val());
                break;
        }
 
@@ -1068,7 +1080,7 @@ void
 AudioRegion::set_fade_out (boost::shared_ptr<AutomationList> f)
 {
        _fade_out->freeze ();
-       *_fade_out = *f;
+       *(_fade_out.val()) = *f;
        _fade_out->thaw ();
        _default_fade_out = false;
 
@@ -1089,19 +1101,19 @@ AudioRegion::set_fade_out (FadeShape shape, framecnt_t len)
        case FadeLinear:
                _fade_out->fast_simple_add (0.0, 1.0);
                _fade_out->fast_simple_add (len, VERY_SMALL_SIGNAL);
-               reverse_curve (_inverse_fade_out, _fade_out);
+               reverse_curve (_inverse_fade_out.val(), _fade_out.val());
                break;
                
        case FadeFast: 
-               generate_db_fade (_fade_out, len, 10, -60);
-               generate_inverse_power_curve (_inverse_fade_out, _fade_out);
+               generate_db_fade (_fade_out.val(), len, 10, -60);
+               generate_inverse_power_curve (_inverse_fade_out.val(), _fade_out.val());
                break;
                
        case FadeSlow: 
                generate_db_fade (c1, len, 10, -1);  //start off with a slow fade
                generate_db_fade (c2, len, 10, -80);  //end with a fast fade
-               merge_curves (_fade_out, c1, c2);
-               generate_inverse_power_curve (_inverse_fade_out, _fade_out);
+               merge_curves (_fade_out.val(), c1, c2);
+               generate_inverse_power_curve (_inverse_fade_out.val(), _fade_out.val());
                break;
 
        case FadeConstantPower:
@@ -1113,7 +1125,7 @@ AudioRegion::set_fade_out (FadeShape shape, framecnt_t len)
                        _fade_out->fast_simple_add ((len * dist), cos(dist*M_PI/2));
                }
                _fade_out->fast_simple_add (len, VERY_SMALL_SIGNAL);
-               reverse_curve (_inverse_fade_out, _fade_out);
+               reverse_curve (_inverse_fade_out.val(), _fade_out.val());
                break;
                
        case FadeSymmetric:
@@ -1132,7 +1144,7 @@ AudioRegion::set_fade_out (FadeShape shape, framecnt_t len)
                        _fade_out->fast_simple_add (len* (breakpoint+((1.0-breakpoint)*(double)i/(double)num_steps)), coeff);
                }
                _fade_out->fast_simple_add (len, VERY_SMALL_SIGNAL);
-               reverse_curve (_inverse_fade_out, _fade_out);
+               reverse_curve (_inverse_fade_out.val(), _fade_out.val());
                break;
        }
 
@@ -1829,7 +1841,7 @@ AudioRegion::find_silence (Sample threshold, framecnt_t min_length, InterThreadI
 Evoral::Range<framepos_t>
 AudioRegion::body_range () const
 {
-       return Evoral::Range<framepos_t> (first_frame() + _fade_in->back()->when, last_frame() - _fade_out->back()->when);
+       return Evoral::Range<framepos_t> (first_frame() + _fade_in->back()->when + 1, last_frame() - _fade_out->back()->when);
 }
 
 void