examples/: large refactoring, improve option management, remove old stuff, move block...
[aubio.git] / examples / aubiotrack.c
1 /*
2   Copyright (C) 2003-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 #define PROG_HAS_TEMPO 1
23 #include "parse_args.h"
24
25 aubio_tempo_t * tempo;
26 aubio_wavetable_t *wavetable;
27 fvec_t * tempo_out;
28 smpl_t istactus = 0;
29 smpl_t isonset = 0;
30
31 void process_block(fvec_t * ibuf, fvec_t *obuf) {
32   aubio_tempo_do (tempo, ibuf, tempo_out);
33   istactus = fvec_read_sample (tempo_out, 0);
34   isonset = fvec_read_sample (tempo_out, 1);
35   fvec_zeros (obuf);
36   if (istactus > 0.) {
37     aubio_wavetable_play ( wavetable );
38   } else {
39     aubio_wavetable_stop ( wavetable );
40   }
41   aubio_wavetable_do (wavetable, obuf, obuf);
42 }
43
44 void process_print (void) {
45   if (istactus) {
46     outmsg("%f\n", aubio_tempo_get_last_s(tempo) );
47   }
48   //if (isonset && verbose)
49   //  outmsg(" \t \t%f\n",(blocks)*hop_size/(float)samplerate);
50 }
51
52 int main(int argc, char **argv) {
53   // override general settings from utils.c
54   buffer_size = 1024;
55   hop_size = 512;
56
57   examples_common_init(argc,argv);
58
59   verbmsg ("using source: %s at %dHz\n", source_uri, samplerate);
60
61   verbmsg ("tempo method: %s, ", tempo_method);
62   verbmsg ("buffer_size: %d, ", buffer_size);
63   verbmsg ("hop_size: %d, ", hop_size);
64   verbmsg ("threshold: %f\n", onset_threshold);
65
66   tempo_out = new_fvec(2);
67   tempo = new_aubio_tempo(tempo_method, buffer_size, hop_size, samplerate);
68   if (onset_threshold != 0.) aubio_tempo_set_threshold (tempo, onset_threshold);
69
70   wavetable = new_aubio_wavetable (samplerate, hop_size);
71   aubio_wavetable_set_freq ( wavetable, 2450.);
72   //aubio_sampler_load (sampler, "/archives/sounds/woodblock.aiff");
73
74   examples_common_process((aubio_process_func_t)process_block,process_print);
75
76   del_aubio_tempo(tempo);
77   del_aubio_wavetable (wavetable);
78   del_fvec(tempo_out);
79
80   examples_common_del();
81   return 0;
82 }
83