[tests] add run_on_default_source_and_sink helper
[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 void process_block (fvec_t *ibuf, fvec_t *obuf)
33 {
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 void process_print (void)
42 {
43   /* output times in selected format */
44   print_time (blocks * hop_size);
45   outmsg ("\t");
46   /* output extracted mfcc */
47   fvec_print (mfcc_out);
48 }
49
50 int main(int argc, char **argv) {
51   int ret = 0;
52   // change some default params
53   buffer_size  = 512;
54   hop_size = 256;
55
56   examples_common_init(argc,argv);
57
58   verbmsg ("using source: %s at %dHz\n", source_uri, samplerate);
59   verbmsg ("buffer_size: %d, ", buffer_size);
60   verbmsg ("hop_size: %d\n", hop_size);
61
62   pv = new_aubio_pvoc (buffer_size, hop_size);
63   fftgrain = new_cvec (buffer_size);
64   mfcc = new_aubio_mfcc(buffer_size, n_filters, n_coefs, samplerate);
65   mfcc_out = new_fvec(n_coefs);
66   if (pv == NULL || fftgrain == NULL || mfcc == NULL || mfcc_out == NULL) {
67     ret = 1;
68     goto beach;
69   }
70
71   examples_common_process((aubio_process_func_t)process_block, process_print);
72
73   del_aubio_pvoc (pv);
74   del_cvec (fftgrain);
75   del_aubio_mfcc(mfcc);
76   del_fvec(mfcc_out);
77
78 beach:
79   examples_common_del();
80   return ret;
81 }