mirror of
https://github.com/cookiengineer/audacity
synced 2026-01-01 17:38:43 +01:00
Associated with r11696 / patch for bug 485. Just forgot to add/delete these files associated with the patch.
This commit is contained in:
clayton.otey
476
lib-src/sbsms/src/slide.cpp
Normal file
476
lib-src/sbsms/src/slide.cpp
Normal file
@@ -0,0 +1,476 @@
|
||||
#include "sbsms.h"
|
||||
#include "real.h"
|
||||
#include <math.h>
|
||||
#include <algorithm>
|
||||
using namespace std;
|
||||
|
||||
namespace _sbsms_ {
|
||||
|
||||
class SlideImp {
|
||||
public:
|
||||
virtual ~SlideImp() {}
|
||||
virtual float getTotalStretch()=0;
|
||||
virtual float getStretchedTime(float t)=0;
|
||||
virtual float getRate(float t)=0;
|
||||
virtual float getStretch(float t)=0;
|
||||
virtual float getRate()=0;
|
||||
virtual float getStretch()=0;
|
||||
virtual void step()=0;
|
||||
};
|
||||
|
||||
class IdentitySlide : public SlideImp {
|
||||
public:
|
||||
IdentitySlide() {
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return 1.0f;
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return t;
|
||||
}
|
||||
float getRate(float t) {
|
||||
return 1.0f;
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f;
|
||||
}
|
||||
float getRate() {
|
||||
return 1.0f;
|
||||
}
|
||||
float getStretch() {
|
||||
return 1.0f;
|
||||
}
|
||||
void step() {
|
||||
}
|
||||
};
|
||||
|
||||
class ConstantSlide : public SlideImp {
|
||||
public:
|
||||
ConstantSlide(float rate) {
|
||||
this->rate = rate;
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return 1.0f / rate;
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return t / rate;
|
||||
}
|
||||
float getRate(float t) {
|
||||
return rate;
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f / rate;
|
||||
}
|
||||
float getRate() {
|
||||
return rate;
|
||||
}
|
||||
float getStretch() {
|
||||
return 1.0f / rate;
|
||||
}
|
||||
void step() {
|
||||
}
|
||||
protected:
|
||||
float rate;
|
||||
};
|
||||
|
||||
class LinearInputRateSlide : public SlideImp {
|
||||
public:
|
||||
LinearInputRateSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
if(n) {
|
||||
val = rate0;
|
||||
inc = (rate1 - rate0) / (double)n;
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return log(rate1 / rate0) / (rate1 - rate0);
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
float ratet = getRate(t);
|
||||
return log(ratet / rate0) / (rate1 - rate0);
|
||||
}
|
||||
float getRate(float t) {
|
||||
return rate0 + (rate1 - rate0) * t;
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f / getRate(t);
|
||||
}
|
||||
float getRate() {
|
||||
return (float)val;
|
||||
}
|
||||
float getStretch() {
|
||||
return (float)(1.0 / val);
|
||||
}
|
||||
void step() {
|
||||
val += inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
double val, inc;
|
||||
};
|
||||
|
||||
class LinearOutputRateSlide : public SlideImp {
|
||||
public:
|
||||
LinearOutputRateSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
if(n) {
|
||||
val = 0.0;
|
||||
inc = 1.0 / (double)n;
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return 2.0f / (rate0 + rate1);
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return (sqrt(rate0 * rate0 + (rate1 * rate1 - rate0 * rate0) * t) - rate0) * 2.0f / (rate1 * rate1 - rate0 * rate0);
|
||||
}
|
||||
float getRate(float t) {
|
||||
return rate0 + (sqrt(rate0 * rate0 + (rate1 * rate1 - rate0 * rate0) * t) - rate0);
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f / getRate(t);
|
||||
}
|
||||
float getRate() {
|
||||
return getRate((float)val);
|
||||
}
|
||||
float getStretch() {
|
||||
return getStretch((float)val);
|
||||
}
|
||||
void step() {
|
||||
val += inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
double val, inc;
|
||||
};
|
||||
|
||||
class LinearInputStretchSlide : public SlideImp {
|
||||
public:
|
||||
LinearInputStretchSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
if(n) {
|
||||
val = 1.0 / rate0;
|
||||
inc = (1.0 / rate1 - 1.0 / rate0) / (double)n;
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return 0.5f / rate0 + 0.5f / rate1;
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return t / rate0 * (1.0f + 0.5f * t * (rate0 / rate1 - 1.0f));
|
||||
}
|
||||
float getRate(float t) {
|
||||
return 1.0f / getStretch(t);
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return (1.0f / rate0 + (1.0f / rate1 - 1.0f / rate0) * t);
|
||||
}
|
||||
float getRate() {
|
||||
return (float)(1.0 / val);
|
||||
}
|
||||
float getStretch() {
|
||||
return (float)val;
|
||||
}
|
||||
void step() {
|
||||
val += inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
double val, inc;
|
||||
};
|
||||
|
||||
class LinearOutputStretchSlide : public SlideImp {
|
||||
public:
|
||||
LinearOutputStretchSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
c0 = rate0 / rate1;
|
||||
c1 = 1.0f / (rate0 * log(c0));
|
||||
if(n) {
|
||||
val = 0.0;
|
||||
inc = 1.0 / (double)n;
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return c1 * (c0 - 1.0f);
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return c1 * (pow(c0, t) - 1.0f);
|
||||
}
|
||||
float getRate(float t) {
|
||||
return rate0 * pow(c0, -t);
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return pow(c0, t) / rate0;
|
||||
}
|
||||
float getRate() {
|
||||
return getRate((float)val);
|
||||
}
|
||||
float getStretch() {
|
||||
return getStretch((float)val);
|
||||
}
|
||||
void step() {
|
||||
val += inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
double val, inc;
|
||||
float c0, c1;
|
||||
};
|
||||
|
||||
class GeometricInputSlide : public SlideImp {
|
||||
public:
|
||||
GeometricInputSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
if(n) {
|
||||
val = rate0;
|
||||
inc = pow((double)rate1 / rate0, 1.0 / (double)n);
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return (rate1 - rate0) / (log(rate1 / rate0) * (rate0 * rate1));
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return (float)(pow(rate0 / rate1, t) - 1.0) / (rate0 * log(rate0 / rate1));
|
||||
}
|
||||
float getRate(float t) {
|
||||
return rate0 * pow(rate1 / rate0, t);
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f / getRate(t);
|
||||
}
|
||||
float getRate() {
|
||||
return (float)val;
|
||||
}
|
||||
float getStretch() {
|
||||
return (float)(1.0 / val);
|
||||
}
|
||||
void step() {
|
||||
val *= inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
double val, inc;
|
||||
};
|
||||
|
||||
class GeometricOutputSlide : public SlideImp {
|
||||
public:
|
||||
GeometricOutputSlide(float rate0, float rate1, const SampleCountType &n) {
|
||||
this->rate0 = rate0;
|
||||
this->rate1 = rate1;
|
||||
log10 = log(rate1 / rate0);
|
||||
r10 = rate1 - rate0;
|
||||
totalStretch = getTotalStretch();
|
||||
if(n) {
|
||||
val = 0.0;
|
||||
inc = 1.0 / (double)n;
|
||||
}
|
||||
}
|
||||
float getTotalStretch() {
|
||||
return log(rate1 / rate0) / (rate1 - rate0);
|
||||
}
|
||||
float getStretchedTime(float t) {
|
||||
return log(r10 / rate0 * t + 1.0f) / r10;
|
||||
}
|
||||
float getRate(float t) {
|
||||
float t1 = getStretchedTime(t) / totalStretch;
|
||||
return rate0 * pow(rate1 / rate0, t1);
|
||||
}
|
||||
float getStretch(float t) {
|
||||
return 1.0f / getRate(t);
|
||||
}
|
||||
float getRate() {
|
||||
return getRate((float)val);
|
||||
}
|
||||
float getStretch() {
|
||||
return getStretch((float)val);
|
||||
}
|
||||
void step() {
|
||||
val += inc;
|
||||
}
|
||||
protected:
|
||||
float rate0, rate1;
|
||||
float log10, r10, totalStretch;
|
||||
double val, inc;
|
||||
};
|
||||
|
||||
|
||||
Slide :: Slide(SlideType slideType, float rate0, float rate1, const SampleCountType &n)
|
||||
{
|
||||
if(slideType == SlideIdentity) {
|
||||
imp = new IdentitySlide();
|
||||
} else if(slideType == SlideConstant || rate0 == rate1) {
|
||||
imp = new ConstantSlide(rate0);
|
||||
} else if(slideType == SlideLinearInputRate) {
|
||||
imp = new LinearInputRateSlide(rate0,rate1,n);
|
||||
} else if(slideType == SlideLinearOutputRate) {
|
||||
imp = new LinearOutputRateSlide(rate0,rate1,n);
|
||||
} else if(slideType == SlideLinearInputStretch) {
|
||||
imp = new LinearInputStretchSlide(rate0,rate1,n);
|
||||
} else if(slideType == SlideLinearOutputStretch) {
|
||||
imp = new LinearOutputStretchSlide(rate0,rate1,n);
|
||||
} else if(slideType == SlideGeometricInput) {
|
||||
imp = new GeometricInputSlide(rate0,rate1,n);
|
||||
} else if(slideType == SlideGeometricOutput) {
|
||||
imp = new GeometricOutputSlide(rate0,rate1,n);
|
||||
}
|
||||
}
|
||||
|
||||
Slide :: ~Slide()
|
||||
{
|
||||
delete imp;
|
||||
}
|
||||
|
||||
float Slide :: getTotalStretch()
|
||||
{
|
||||
return imp->getTotalStretch();
|
||||
}
|
||||
|
||||
float Slide :: getRate(float t)
|
||||
{
|
||||
if(t > 1.0f) t = 1.0f;
|
||||
return imp->getRate(t);
|
||||
}
|
||||
|
||||
float Slide :: getStretch(float t)
|
||||
{
|
||||
if(t > 1.0f) t = 1.0f;
|
||||
return imp->getStretch(t);
|
||||
}
|
||||
|
||||
float Slide :: getStretchedTime(float t)
|
||||
{
|
||||
if(t > 1.0f) t = 1.0f;
|
||||
return imp->getStretchedTime(t);
|
||||
}
|
||||
|
||||
float Slide :: getRate()
|
||||
{
|
||||
return imp->getRate();
|
||||
}
|
||||
|
||||
float Slide :: getStretch()
|
||||
{
|
||||
return imp->getStretch();
|
||||
}
|
||||
|
||||
void Slide :: step()
|
||||
{
|
||||
imp->step();
|
||||
}
|
||||
|
||||
class SBSMSInterfaceSlidingImp {
|
||||
public:
|
||||
friend class SBSMSInterfaceSliding;
|
||||
SBSMSInterfaceSlidingImp(Slide *rateSlide,
|
||||
Slide *pitchSlide,
|
||||
bool bPitchReferenceInput,
|
||||
const SampleCountType &samplesToInput,
|
||||
long preSamples,
|
||||
SBSMSQuality *quality);
|
||||
~SBSMSInterfaceSlidingImp() {}
|
||||
inline float getStretch(float t);
|
||||
inline float getPitch(float t);
|
||||
inline long getPresamples();
|
||||
SampleCountType getSamplesToInput();
|
||||
SampleCountType getSamplesToOutput();
|
||||
protected:
|
||||
Slide *stretchSlide;
|
||||
Slide *pitchSlide;
|
||||
bool bPitchReferenceInput;
|
||||
float totalStretch;
|
||||
float stretchScale;
|
||||
long preSamples;
|
||||
SampleCountType samplesToInput;
|
||||
SampleCountType samplesToOutput;
|
||||
};
|
||||
|
||||
|
||||
SBSMSInterfaceSlidingImp :: SBSMSInterfaceSlidingImp(Slide *stretchSlide,
|
||||
Slide *pitchSlide,
|
||||
bool bPitchReferenceInput,
|
||||
const SampleCountType &samplesToInput,
|
||||
long preSamples,
|
||||
SBSMSQuality *quality)
|
||||
{
|
||||
this->stretchSlide = stretchSlide;
|
||||
this->pitchSlide = pitchSlide;
|
||||
this->bPitchReferenceInput = bPitchReferenceInput;
|
||||
this->samplesToInput = samplesToInput;
|
||||
this->preSamples = preSamples;
|
||||
this->totalStretch = stretchSlide->getTotalStretch();
|
||||
this->samplesToOutput = (SampleCountType)((float)samplesToInput * totalStretch);
|
||||
stretchScale = 1.0f;
|
||||
|
||||
if(quality) {
|
||||
SampleCountType samplesIn = 0;
|
||||
SampleCountType samplesOut = 0;
|
||||
float outFrameSizefloat = 0.0f;
|
||||
float stretch = 1.0f;
|
||||
int inFrameSize = quality->getFrameSize();
|
||||
while(samplesIn < samplesToInput) {
|
||||
float t = (float)samplesIn / (float)samplesToInput;
|
||||
stretch = stretchSlide->getStretch(t);
|
||||
outFrameSizefloat += stretch * inFrameSize;
|
||||
int outFrameSize = (int) outFrameSizefloat;
|
||||
outFrameSizefloat -= (float) outFrameSize;
|
||||
samplesIn += inFrameSize;
|
||||
samplesOut += outFrameSize;
|
||||
}
|
||||
SampleCountType samplesOutputed = samplesOut - lrintf(stretch * (samplesIn - samplesToInput));
|
||||
stretchScale = (float)samplesToOutput / (float)samplesOutputed;
|
||||
}
|
||||
}
|
||||
|
||||
float SBSMSInterfaceSliding :: getStretch(float t) { return imp->getStretch(t); }
|
||||
float SBSMSInterfaceSlidingImp :: getStretch(float t)
|
||||
{
|
||||
return stretchScale * stretchSlide->getStretch(t);
|
||||
}
|
||||
|
||||
float SBSMSInterfaceSliding :: getPitch(float t) { return imp->getPitch(t); }
|
||||
float SBSMSInterfaceSlidingImp :: getPitch(float t)
|
||||
{
|
||||
if(bPitchReferenceInput) return pitchSlide->getRate(t);
|
||||
else return pitchSlide->getRate(min(1.0f,stretchSlide->getStretchedTime(t) / totalStretch));
|
||||
}
|
||||
|
||||
long SBSMSInterfaceSliding :: getPresamples() { return imp->getPresamples(); }
|
||||
long SBSMSInterfaceSlidingImp :: getPresamples()
|
||||
{
|
||||
return preSamples;
|
||||
}
|
||||
|
||||
SampleCountType SBSMSInterfaceSliding :: getSamplesToInput() { return imp->getSamplesToInput(); }
|
||||
SampleCountType SBSMSInterfaceSlidingImp :: getSamplesToInput()
|
||||
{
|
||||
return samplesToInput;
|
||||
}
|
||||
|
||||
SampleCountType SBSMSInterfaceSliding :: getSamplesToOutput() { return imp->getSamplesToOutput(); }
|
||||
SampleCountType SBSMSInterfaceSlidingImp :: getSamplesToOutput()
|
||||
{
|
||||
return samplesToOutput;
|
||||
}
|
||||
|
||||
SBSMSInterfaceSliding :: SBSMSInterfaceSliding(Slide *stretchSlide,
|
||||
Slide *pitchSlide,
|
||||
bool bPitchReferenceInput,
|
||||
const SampleCountType &samplesToInput,
|
||||
long preSamples,
|
||||
SBSMSQuality *quality)
|
||||
{
|
||||
imp = new SBSMSInterfaceSlidingImp(stretchSlide, pitchSlide, bPitchReferenceInput,
|
||||
samplesToInput, preSamples, quality);
|
||||
}
|
||||
|
||||
SBSMSInterfaceSliding :: ~SBSMSInterfaceSliding()
|
||||
{
|
||||
delete imp;
|
||||
}
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user