source: src/resample.c @ 8595fe3

/*
         Copyright (C) 2003 Paul Brossier

         This program is free software; you can redistribute it and/or modify
         it under the terms of the GNU General Public License as published by
         the Free Software Foundation; either version 2 of the License, or
         (at your option) any later version.

         This program is distributed in the hope that it will be useful,
         but WITHOUT ANY WARRANTY; without even the implied warranty of
         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
         GNU General Public License for more details.

         You should have received a copy of the GNU General Public License
         along with this program; if not, write to the Free Software
         Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
         
*/


#include <samplerate.h> /* from libsamplerate */

#include "aubio_priv.h"
#include "sample.h"
#include "resample.h"

struct _aubio_resampler_t {
        SRC_DATA  *proc;
        SRC_STATE *stat;
        float ratio;
        uint_t type;
};

aubio_resampler_t * new_aubio_resampler(float ratio, uint_t type) {
        aubio_resampler_t * s  = AUBIO_NEW(aubio_resampler_t);
        int error = 0;
        s->stat = src_new (type, 1, &error) ; /* only one channel */
        s->proc = AUBIO_NEW(SRC_DATA);
        if (error) AUBIO_ERR("%s\n",src_strerror(error));
        s->ratio = ratio;
        return s;
}

void del_aubio_resampler(aubio_resampler_t *s) {
        src_delete(s->stat);
        AUBIO_FREE(s);
}

uint_t aubio_resampler_process(aubio_resampler_t *s, 
    fvec_t * input,  fvec_t * output) {
        uint_t i ;
        s->proc->input_frames = input->length;
        s->proc->output_frames = output->length;
        s->proc->src_ratio = s->ratio;
        for (i = 0 ; i< input->channels; i++) 
        {
                /* make SRC_PROC data point to input outputs */
                s->proc->data_in = input->data[i];
                s->proc->data_out= output->data[i];
                /* do resampling */
                src_process (s->stat, s->proc) ;
        }
        return AUBIO_OK;
}