|
|
@@ -96,6 +96,16 @@ Audio_Region::Fade::apply_interleaved ( sample_t *buf, Audio_Region::Fade::fade_ |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
static |
|
|
|
void |
|
|
|
apply_fade ( sample_t *buf, const int channels, Audio_Region::Fade fade, const nframes_t bS, const nframes_t bE, const nframes_t edge, Audio_Region::Fade::fade_dir_e dir ) |
|
|
|
{ |
|
|
|
const nframes_t bSS = dir == Audio_Region::Fade::Out ? bS + fade.length : bS; |
|
|
|
const nframes_t fade_start = bSS > edge ? bSS - edge : 0; |
|
|
|
const nframes_t fade_offset = bSS > edge ? 0 : edge - bSS; |
|
|
|
|
|
|
|
fade.apply_interleaved( buf + ( channels * fade_offset ), dir, fade_start, (bE - bS) - fade_offset, channels ); |
|
|
|
}; |
|
|
|
|
|
|
|
/** read the overlapping at /pos/ for /nframes/ of this region into |
|
|
|
/buf/, where /pos/ is in timeline frames. /buf/ is an interleaved |
|
|
@@ -133,35 +143,17 @@ Audio_Region::read ( sample_t *buf, bool buf_is_empty, nframes_t pos, nframes_t |
|
|
|
|
|
|
|
/* calculate offsets into file and sample buffer */ |
|
|
|
|
|
|
|
nframes_t sO, /* offset into source */ |
|
|
|
bO, /* offset into buffer */ |
|
|
|
cnt; /* number of frames to read */ |
|
|
|
|
|
|
|
cnt = nframes; |
|
|
|
|
|
|
|
if ( bS < rS ) |
|
|
|
{ |
|
|
|
/* beginning of region is inside buffer */ |
|
|
|
sO = 0; |
|
|
|
bO = rS - bS; |
|
|
|
// cnt -= bO; |
|
|
|
} |
|
|
|
else |
|
|
|
{ |
|
|
|
/* beginning of region precedes buffer */ |
|
|
|
bO = 0; |
|
|
|
sO = bS - rS; |
|
|
|
} |
|
|
|
const nframes_t sO = bS < rS ? 0 : bS - rS; /* offset into source */ |
|
|
|
const nframes_t bO = bS < rS ? rS - bS : 0; /* offset into buffer (when region start is after beginning of buffer) */ |
|
|
|
|
|
|
|
nframes_t cnt = nframes; /* number of frames to read */ |
|
|
|
|
|
|
|
/* if region ends within this buffer, don't read beyond end */ |
|
|
|
if ( bE > rE ) |
|
|
|
cnt = nframes - ( bE - rE ); |
|
|
|
|
|
|
|
if ( bS < rS ) |
|
|
|
cnt = nframes - ( rS - bS ); |
|
|
|
|
|
|
|
// const nframes_t start = ofs + r.start + sofs; |
|
|
|
/* const nframes_t start = r.offset + sO; */ |
|
|
|
cnt -= bO; |
|
|
|
|
|
|
|
const nframes_t len = cnt; |
|
|
|
|
|
|
|
/* FIXME: keep the declick defults someplace else */ |
|
|
@@ -188,67 +180,49 @@ Audio_Region::read ( sample_t *buf, bool buf_is_empty, nframes_t pos, nframes_t |
|
|
|
|
|
|
|
// printf( "reading region ofs = %lu, sofs = %lu, %lu-%lu\n", ofs, sofs, start, end ); |
|
|
|
|
|
|
|
|
|
|
|
if ( _loop ) |
|
|
|
{ |
|
|
|
nframes_t lofs = sO % _loop; |
|
|
|
nframes_t lstart = r.offset + lofs; |
|
|
|
|
|
|
|
/* FIXME: What if loop size is smaller than nframes? */ |
|
|
|
if ( _loop < nframes ) |
|
|
|
{ |
|
|
|
/* very small loop or very large buffer... */ |
|
|
|
WARNING("Loop size (%lu) is smaller than buffer size (%lu). Behavior undefined.", _loop, nframes ); |
|
|
|
} |
|
|
|
|
|
|
|
const nframes_t lO = sO % _loop; /* how far we are into the loop */ |
|
|
|
const nframes_t nthloop = sO / _loop; /* which loop iteration */ |
|
|
|
const nframes_t seam_L = rS + ( nthloop * _loop ); /* receding seam */ |
|
|
|
const nframes_t seam_R = rS + ( (nthloop + 1 ) * _loop ); /* upcoming seam */ |
|
|
|
|
|
|
|
/* read interleaved channels */ |
|
|
|
if ( lofs + len > _loop ) |
|
|
|
if ( seam_R > bS && seam_R < bE ) |
|
|
|
{ |
|
|
|
/* this buffer covers a loop boundary */ |
|
|
|
|
|
|
|
/* read the first part */ |
|
|
|
cnt = _clip->read( cbuf + ( _clip->channels() * bO ), -1, lstart, len - ( ( lofs + len ) - _loop ) ); |
|
|
|
cnt = _clip->read( cbuf + ( _clip->channels() * bO ), -1, r.offset + lO, ( seam_R - bS ) - bO ); |
|
|
|
/* read the second part */ |
|
|
|
cnt += _clip->read( cbuf + ( _clip->channels() * ( bO + cnt ) ), -1, lstart + cnt, len - cnt ); |
|
|
|
cnt += _clip->read( cbuf + ( _clip->channels() * ( bO + cnt ) ), -1, r.offset + 0, ( len - cnt ) - bO ); |
|
|
|
|
|
|
|
assert( cnt == len ); |
|
|
|
/* assert( cnt == len ); */ |
|
|
|
} |
|
|
|
else |
|
|
|
cnt = _clip->read( cbuf + ( channels * bO ), -1, lstart, len ); |
|
|
|
/* buffer contains no loop seam, perform straight read. */ |
|
|
|
cnt = _clip->read( cbuf + ( _clip->channels() * bO ), -1, r.offset + lO, cnt ); |
|
|
|
|
|
|
|
/* this buffer is inside declicking proximity to the loop boundary */ |
|
|
|
if ( lofs + cnt + declick.length > _loop /* buffer ends within declick length of the end of loop */ |
|
|
|
&& |
|
|
|
sO + declick.length < r.length /* not the last loop */ |
|
|
|
) |
|
|
|
for ( int i = 0; i < 2; i++ ) |
|
|
|
{ |
|
|
|
/* */ |
|
|
|
/* fixme: what if loop is shorter than declick? */ |
|
|
|
const nframes_t declick_start = _loop - declick.length; |
|
|
|
|
|
|
|
/* when the buffer covers the beginning of the |
|
|
|
* declick, how many frames between the beginning of |
|
|
|
* the buffer and the beginning of the declick */ |
|
|
|
const nframes_t declick_onset_offset = declick_start > lofs ? declick_start - lofs : 0; |
|
|
|
|
|
|
|
/* how far into the declick we are */ |
|
|
|
const nframes_t declick_offset = lofs > declick_start ? lofs - declick_start : 0; |
|
|
|
nframes_t seam = i ? seam_R : seam_L; |
|
|
|
|
|
|
|
/* this is the end side of the loop boundary */ |
|
|
|
|
|
|
|
const nframes_t fl = cnt - declick_onset_offset; |
|
|
|
|
|
|
|
declick.apply_interleaved( cbuf + ( _clip->channels() * ( bO + declick_onset_offset ) ), |
|
|
|
Fade::Out, |
|
|
|
declick_offset, fl, _clip->channels() ); |
|
|
|
} |
|
|
|
|
|
|
|
if ( lofs < declick.length /* buffer begins within declick length of beginning of loop */ |
|
|
|
&& |
|
|
|
sO > _loop ) /* not the first loop */ |
|
|
|
{ |
|
|
|
|
|
|
|
const nframes_t declick_end = declick.length; |
|
|
|
|
|
|
|
const nframes_t click_len = lofs + cnt > declick_end ? declick_end - lofs : cnt; |
|
|
|
|
|
|
|
/* this is the beginning of the loop next boundary */ |
|
|
|
declick.apply_interleaved( cbuf + ( _clip->channels() * bO ), Fade::In, lofs, click_len, _clip->channels() ); |
|
|
|
if ( seam != rS && seam != rE ) /* not either end of the region */ |
|
|
|
{ |
|
|
|
if ( seam >= bS && seam <= bE + declick.length ) |
|
|
|
/* fade out previous loop segment */ |
|
|
|
apply_fade( cbuf, _clip->channels(), declick, bS, bE, seam, Fade::Out ); |
|
|
|
|
|
|
|
if ( seam <= bE && seam + declick.length >= bS ) |
|
|
|
/* fade in next loop segment */ |
|
|
|
apply_fade( cbuf, _clip->channels(), declick, bS, bE, seam, Fade::In ); |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
else |
|
|
@@ -268,7 +242,6 @@ Audio_Region::read ( sample_t *buf, bool buf_is_empty, nframes_t pos, nframes_t |
|
|
|
buffer_apply_gain( cbuf, nframes * _clip->channels(), _scale ); |
|
|
|
|
|
|
|
/* perform fade/declicking if necessary */ |
|
|
|
// if ( 0 ) |
|
|
|
{ |
|
|
|
assert( cnt <= nframes ); |
|
|
|
|
|
|
@@ -278,44 +251,13 @@ Audio_Region::read ( sample_t *buf, bool buf_is_empty, nframes_t pos, nframes_t |
|
|
|
|
|
|
|
/* do fade in if necessary */ |
|
|
|
if ( sO < fade.length ) |
|
|
|
fade.apply_interleaved( cbuf + ( _clip->channels() * bO ), Fade::In, sO, cnt, _clip->channels() ); |
|
|
|
apply_fade( cbuf, _clip->channels(), fade, bS, bE, rS, Fade::In ); |
|
|
|
|
|
|
|
fade = declick < _fade_out ? _fade_out : declick; |
|
|
|
|
|
|
|
if ( sO + cnt + fade.length > r.length ) |
|
|
|
{ |
|
|
|
/* offset into fade */ |
|
|
|
nframes_t fsofs; |
|
|
|
/* fade offset in buffer (on top of ofs) */ |
|
|
|
nframes_t fofs; |
|
|
|
/* length of required fade segment */ |
|
|
|
nframes_t fcnt; |
|
|
|
|
|
|
|
if ( sO + fade.length > r.length ) |
|
|
|
{ |
|
|
|
/* we're already into the fade */ |
|
|
|
/* fades can be longer than their regions... */ |
|
|
|
if ( fade.length > r.length ) |
|
|
|
fsofs = ( fade.length - r.length ) + sO; |
|
|
|
else |
|
|
|
fsofs = bS - ( rE - fade.length ); |
|
|
|
|
|
|
|
fofs = 0; |
|
|
|
fcnt = cnt; |
|
|
|
} |
|
|
|
else |
|
|
|
{ |
|
|
|
/* fade starts within this buffer */ |
|
|
|
fofs = ( rE - fade.length ) - bS; |
|
|
|
fsofs = 0; |
|
|
|
fcnt = cnt - fofs; |
|
|
|
} |
|
|
|
|
|
|
|
// DMESSAGE( "f.length=%lu, r.length=%lu, fsofs=%lu, fofs=%lu, fcnt=%lu, len=%lu", fade.length,r.length, fsofs, fofs, fcnt, len ); |
|
|
|
fade.apply_interleaved( cbuf + ( _clip->channels() * (bO + fofs ) ), |
|
|
|
Fade::Out, fsofs, fcnt, _clip->channels() ); |
|
|
|
} |
|
|
|
|
|
|
|
/* do fade out if necessary */ |
|
|
|
if ( sO + cnt + fade.length > r.length ) |
|
|
|
apply_fade( cbuf, _clip->channels(), fade, bS, bE, rE, Fade::Out ); |
|
|
|
} |
|
|
|
|
|
|
|
if ( buf != cbuf ) |
|
|
|