02ab75ef2e3c476a32cfa9e9b7e89322d136d60e
[aubio.git] / examples / aubiomfcc.c
1 /*
2   Copyright (C) 2007-2013 Paul Brossier <piem@aubio.org>
3
4   This file is part of aubio.
5
6   aubio is free software: you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by
8   the Free Software Foundation, either version 3 of the License, or
9   (at your option) any later version.
10
11   aubio is distributed in the hope that it will be useful,
12   but WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14   GNU General Public License for more details.
15
16   You should have received a copy of the GNU General Public License
17   along with aubio.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21 #include "utils.h"
22 #include "parse_args.h"
23
24 aubio_pvoc_t *pv;    // a phase vocoder
25 cvec_t *fftgrain;    // outputs a spectrum
26 aubio_mfcc_t * mfcc; // which the mfcc will process
27 fvec_t * mfcc_out;   // to get the output coefficients
28
29 uint_t n_filters = 40;
30 uint_t n_coefs = 13;
31
32 static void
33 process_block(fvec_t *ibuf, fvec_t *obuf) {
34   fvec_zeros(obuf);
35   //compute mag spectrum
36   aubio_pvoc_do (pv, ibuf, fftgrain);
37   //compute mfccs
38   aubio_mfcc_do(mfcc, fftgrain, mfcc_out);
39 }
40
41 static void process_print (void) {
42   /* output times in seconds and extracted mfccs */
43   outmsg("%f\t",blocks*hop_size/(float)samplerate);
44   fvec_print(mfcc_out);
45 }
46
47 int main(int argc, char **argv) {
48   // change some default params
49   buffer_size  = 512;
50   hop_size = 256;
51
52   examples_common_init(argc,argv);
53
54   verbmsg ("using source: %s at %dHz\n", source_uri, samplerate);
55   verbmsg ("buffer_size: %d, ", buffer_size);
56   verbmsg ("hop_size: %d\n", hop_size);
57
58   pv = new_aubio_pvoc (buffer_size, hop_size);
59   fftgrain = new_cvec (buffer_size);
60   mfcc = new_aubio_mfcc(buffer_size, n_filters, n_coefs, samplerate);
61   mfcc_out = new_fvec(n_coefs);
62
63   examples_common_process((aubio_process_func_t)process_block, process_print);
64
65   del_aubio_pvoc (pv);
66   del_cvec (fftgrain);
67   del_aubio_mfcc(mfcc);
68   del_fvec(mfcc_out);
69
70   examples_common_del();
71   return 0;
72 }
73