examples/: move parse_args to parse_args.h, clean up, remove lash and old frames_delay
[aubio.git] / examples / aubiopitch.c
1 /*
2   Copyright (C) 2003-2009 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_PITCH 1
23 #include "parse_args.h"
24
25 unsigned int pos = 0; /*frames%dspblocksize*/
26
27 aubio_pitch_t *o;
28 aubio_wavetable_t *wavetable;
29 fvec_t *pitch;
30
31 static int aubio_process(smpl_t **input, smpl_t **output, int nframes) {
32   unsigned int j;       /*frames*/
33   for (j=0;j<(unsigned)nframes;j++) {
34     if(usejack) {
35       /* write input to datanew */
36       fvec_write_sample(ibuf, input[0][j], pos);
37       /* put synthnew in output */
38       output[0][j] = fvec_read_sample(obuf, pos);
39     }
40     /*time for fft*/
41     if (pos == overlap_size-1) {         
42       /* block loop */
43       aubio_pitch_do (o, ibuf, pitch);
44       smpl_t freq = fvec_read_sample(pitch, 0);
45       aubio_wavetable_set_amp ( wavetable, aubio_level_lin (ibuf) );
46       if (freq != 0.0) {
47         aubio_wavetable_set_freq ( wavetable, freq );
48       } else {
49         aubio_wavetable_set_freq ( wavetable, 0.0 );
50       }
51       aubio_wavetable_do (wavetable, obuf, obuf);
52       /* end of block loop */
53       pos = -1; /* so it will be zero next j loop */
54     }
55     pos++;
56   }
57   return 1;
58 }
59
60 static void process_print (void) {
61       if (!verbose && usejack) return;
62       smpl_t pitch_found = fvec_read_sample(pitch, 0);
63       outmsg("%f %f\n",(frames) 
64               *overlap_size/(float)samplerate, pitch_found);
65 }
66
67 int main(int argc, char **argv) {
68   examples_common_init(argc,argv);
69
70   o = new_aubio_pitch (pitch_method, buffer_size, overlap_size, samplerate);
71   pitch = new_fvec (1);
72
73   wavetable = new_aubio_wavetable (samplerate, overlap_size);
74   aubio_wavetable_play ( wavetable );
75
76   examples_common_process(aubio_process,process_print);
77
78   del_aubio_pitch (o);
79   del_aubio_wavetable (wavetable);
80   del_fvec (pitch);
81
82   examples_common_del();
83   debug("End of program.\n");
84   fflush(stderr);
85   return 0;
86 }
87