Browse Source

Bugfixes:

On starting/seeking too small amount was read which caused noise
Freeze function work better
master
Nasca Octavian PAUL 14 years ago
parent
commit
7e128a284f
3 changed files with 44 additions and 29 deletions
  1. +8
    -4
      Player.cpp
  2. +31
    -23
      Stretch.cpp
  3. +5
    -2
      Stretch.h

+ 8
- 4
Player.cpp View File

@@ -390,7 +390,8 @@ void Player::computesamples(){




if (first_in_buf) readsize=stretchl->get_nsamples_for_fill(); if (first_in_buf) readsize=stretchl->get_nsamples_for_fill();
if (readsize&&(!freeze_mode)) result=(ai->read(readsize,inbuf_i)==(readsize));
else if (freeze_mode) readsize=0;
if (readsize) result=(ai->read(readsize,inbuf_i)==(readsize));
if (result){ if (result){
float in_pos=(REALTYPE) ai->info.currentsample/(REALTYPE)ai->info.nsamples; float in_pos=(REALTYPE) ai->info.currentsample/(REALTYPE)ai->info.nsamples;
if (ai->eof) in_pos=0.0; if (ai->eof) in_pos=0.0;
@@ -401,26 +402,29 @@ void Player::computesamples(){
inbuf.r[i]=inbuf_i[i*2+1]*tmp; inbuf.r[i]=inbuf_i[i*2+1]*tmp;
}; };


first_in_buf=false;
stretchl->window_type=window_type; stretchl->window_type=window_type;
stretchr->window_type=window_type; stretchr->window_type=window_type;
REALTYPE s_onset=onset_detection_sensitivity; REALTYPE s_onset=onset_detection_sensitivity;
if (freeze_mode) s_onset=0.0;
stretchl->set_onset_detection_sensitivity(s_onset); stretchl->set_onset_detection_sensitivity(s_onset);
stretchr->set_onset_detection_sensitivity(s_onset); stretchr->set_onset_detection_sensitivity(s_onset);
bool freezing=freeze_mode&&(!first_in_buf);
stretchl->set_freezing(freezing);
stretchr->set_freezing(freezing);

REALTYPE onset_l=stretchl->process(inbuf.l,readsize); REALTYPE onset_l=stretchl->process(inbuf.l,readsize);
REALTYPE onset_r=stretchr->process(inbuf.r,readsize); REALTYPE onset_r=stretchr->process(inbuf.r,readsize);
REALTYPE onset=(onset_l>onset_r)?onset_l:onset_r; REALTYPE onset=(onset_l>onset_r)?onset_l:onset_r;
stretchl->here_is_onset(onset); stretchl->here_is_onset(onset);
stretchr->here_is_onset(onset); stretchr->here_is_onset(onset);
binaural_beats->process(stretchl->out_buf,stretchr->out_buf,stretchl->get_bufsize(),in_pos_100); binaural_beats->process(stretchl->out_buf,stretchr->out_buf,stretchl->get_bufsize(),in_pos_100);
// stretchl->process_output(stretchl->out_buf,stretchl->out_bufsize); // stretchl->process_output(stretchl->out_buf,stretchl->out_bufsize);
// stretchr->process_output(stretchr->out_buf,stretchr->out_bufsize); // stretchr->process_output(stretchr->out_buf,stretchr->out_bufsize);
int nskip=stretchl->get_skip_nsamples(); int nskip=stretchl->get_skip_nsamples();
if (freeze_mode) nskip=0;
if (nskip>0) ai->skip(nskip); if (nskip>0) ai->skip(nskip);




first_in_buf=false;
bufmutex.lock(); bufmutex.lock();


for (int i=0;i<outbuf.size;i++){ for (int i=0;i<outbuf.size;i++){


+ 31
- 23
Stretch.cpp View File

@@ -142,6 +142,7 @@ void FFT::applywindow(FFTWindow type){




Stretch::Stretch(REALTYPE rap_,int bufsize_,FFTWindow w,bool bypass_,REALTYPE samplerate_,int stereo_mode_){ Stretch::Stretch(REALTYPE rap_,int bufsize_,FFTWindow w,bool bypass_,REALTYPE samplerate_,int stereo_mode_){
freezing=false;
onset_detection_sensitivity=0.0; onset_detection_sensitivity=0.0;


samplerate=samplerate_; samplerate=samplerate_;
@@ -259,13 +260,15 @@ REALTYPE Stretch::process(REALTYPE *smps,int nsmps){
}; };


if (smps!=NULL){ if (smps!=NULL){
if ((nsmps!=0)&&(nsmps!=bufsize)&&(nsmps!=bufsize*2)){
if ((nsmps!=0)&&(nsmps!=bufsize)&&(nsmps!=get_max_bufsize())){
printf("Warning wrong nsmps on Stretch::process() %d,%d\n",nsmps,bufsize); printf("Warning wrong nsmps on Stretch::process() %d,%d\n",nsmps,bufsize);
return 0.0; return 0.0;
}; };
if (nsmps!=0){//new data arrived: update the frequency components if (nsmps!=0){//new data arrived: update the frequency components
do_analyse_inbuf(smps); do_analyse_inbuf(smps);
if (nsmps==bufsize*2) do_analyse_inbuf(smps+bufsize);
if (nsmps==get_max_bufsize()) {
for (int k=bufsize;k<get_max_bufsize();k+=bufsize) do_analyse_inbuf(smps+k);
};
if (onset_detection_sensitivity>1e-3) onset=do_detect_onset(); if (onset_detection_sensitivity>1e-3) onset=do_detect_onset();
}; };


@@ -274,8 +277,9 @@ REALTYPE Stretch::process(REALTYPE *smps,int nsmps){
//move the buffers //move the buffers
if (nsmps!=0){//new data arrived: update the frequency components if (nsmps!=0){//new data arrived: update the frequency components
do_next_inbuf_smps(smps); do_next_inbuf_smps(smps);
if (nsmps==bufsize*2) {
do_next_inbuf_smps(smps+bufsize);
if (nsmps==get_max_bufsize()) {
for (int k=bufsize;k<get_max_bufsize();k+=bufsize) do_next_inbuf_smps(smps+k);

}; };
}; };
@@ -315,33 +319,35 @@ REALTYPE Stretch::process(REALTYPE *smps,int nsmps){


}; };


long double used_rap=rap*get_stretch_multiplier(c_pos_percents);
if (!freezing){
long double used_rap=rap*get_stretch_multiplier(c_pos_percents);


long double r=1.0/used_rap;
if (extra_onset_time_credit>0){
REALTYPE credit_get=0.5*r;//must be smaller than r
extra_onset_time_credit-=credit_get;
if (extra_onset_time_credit<0.0) extra_onset_time_credit=0.0;
r-=credit_get;
};
long double r=1.0/used_rap;
if (extra_onset_time_credit>0){
REALTYPE credit_get=0.5*r;//must be smaller than r
extra_onset_time_credit-=credit_get;
if (extra_onset_time_credit<0.0) extra_onset_time_credit=0.0;
r-=credit_get;
};


long double old_remained_samples_test=remained_samples;
remained_samples+=r;
int result=0;
if (remained_samples>=1.0){
skip_samples=(int)(floor(remained_samples-1.0)*bufsize);
remained_samples=remained_samples-floor(remained_samples);
require_new_buffer=true;
}else{
require_new_buffer=false;
long double old_remained_samples_test=remained_samples;
remained_samples+=r;
int result=0;
if (remained_samples>=1.0){
skip_samples=(int)(floor(remained_samples-1.0)*bufsize);
remained_samples=remained_samples-floor(remained_samples);
require_new_buffer=true;
}else{
require_new_buffer=false;
};
}; };

// long double rf_test=remained_samples-old_remained_samples_test;//this value should be almost like "rf" (for most of the time with the exception of changing the "ri" value) for extremely long stretches (otherwise the shown stretch value is not accurate) // long double rf_test=remained_samples-old_remained_samples_test;//this value should be almost like "rf" (for most of the time with the exception of changing the "ri" value) for extremely long stretches (otherwise the shown stretch value is not accurate)
//for stretch up to 10^18x "long double" must have at least 64 bits in the fraction part (true for gcc compiler on x86 and macosx) //for stretch up to 10^18x "long double" must have at least 64 bits in the fraction part (true for gcc compiler on x86 and macosx)
return onset; return onset;
}; };


void Stretch::here_is_onset(REALTYPE onset){ void Stretch::here_is_onset(REALTYPE onset){
if (freezing) return;
if (onset>0.5){ if (onset>0.5){
require_new_buffer=true; require_new_buffer=true;
extra_onset_time_credit+=1.0-remained_samples; extra_onset_time_credit+=1.0-remained_samples;
@@ -352,15 +358,17 @@ void Stretch::here_is_onset(REALTYPE onset){


int Stretch::get_nsamples(REALTYPE current_pos_percents){ int Stretch::get_nsamples(REALTYPE current_pos_percents){
if (bypass) return bufsize; if (bypass) return bufsize;
if (freezing) return 0;
c_pos_percents=current_pos_percents; c_pos_percents=current_pos_percents;
return require_new_buffer?bufsize:0; return require_new_buffer?bufsize:0;
}; };


int Stretch::get_nsamples_for_fill(){ int Stretch::get_nsamples_for_fill(){
return bufsize*2;
return get_max_bufsize();
}; };


int Stretch::get_skip_nsamples(){ int Stretch::get_skip_nsamples(){
if (freezing||bypass) return 0;
return skip_samples; return skip_samples;
}; };




+ 5
- 2
Stretch.h View File

@@ -63,7 +63,7 @@ class Stretch{
virtual ~Stretch(); virtual ~Stretch();


int get_max_bufsize(){ int get_max_bufsize(){
return bufsize*2;
return bufsize*3;
}; };
int get_bufsize(){ int get_bufsize(){
return bufsize; return bufsize;
@@ -74,6 +74,9 @@ class Stretch{
}; };


REALTYPE process(REALTYPE *smps,int nsmps);//returns the onset value REALTYPE process(REALTYPE *smps,int nsmps);//returns the onset value
void set_freezing(bool new_freezing){
freezing=new_freezing;
};




REALTYPE *out_buf;//pot sa pun o variabila "max_out_bufsize" si asta sa fie marimea lui out_buf si pe out_bufsize sa il folosesc ca marime adaptiva REALTYPE *out_buf;//pot sa pun o variabila "max_out_bufsize" si asta sa fie marimea lui out_buf si pe out_bufsize sa il folosesc ca marime adaptiva
@@ -117,7 +120,7 @@ class Stretch{
REALTYPE c_pos_percents; REALTYPE c_pos_percents;
int skip_samples; int skip_samples;
bool require_new_buffer; bool require_new_buffer;
bool bypass;
bool bypass,freezing;
}; };






Loading…
Cancel
Save