2 Copyright (C) 2003 Paul Brossier
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 uint_t pos = 0; /* frames%dspblocksize */
23 fvec_t * tempo_out = NULL;
24 aubio_tempo_t * bt = NULL;
28 static int aubio_process(smpl_t **input, smpl_t **output, int nframes) {
29 unsigned int i; /*channels*/
30 unsigned int j; /*frames*/
31 for (j=0;j<(unsigned)nframes;j++) {
33 for (i=0;i<channels;i++) {
34 /* write input to datanew */
35 fvec_write_sample(ibuf, input[i][j], i, pos);
36 /* put synthnew in output */
37 output[i][j] = fvec_read_sample(obuf, i, pos);
41 if (pos == overlap_size-1) {
43 aubio_tempo_do (bt,ibuf,tempo_out);
44 istactus = fvec_read_sample (tempo_out, 0, 0);
45 isonset = fvec_read_sample (tempo_out, 0, 1);
47 fvec_copy (woodblock, obuf);
51 /* end of block loop */
52 pos = -1; /* so it will be zero next j loop */
59 static void process_print (void) {
60 if (output_filename == NULL) {
62 outmsg("%f\n",((smpl_t)(frames*overlap_size)+(istactus-1.)*overlap_size)/(smpl_t)samplerate);
64 if (isonset && verbose)
65 outmsg(" \t \t%f\n",(frames)*overlap_size/(float)samplerate);
69 int main(int argc, char **argv) {
73 /* override default settings */
74 examples_common_init(argc,argv);
76 tempo_out = new_fvec(2,channels);
77 bt = new_aubio_tempo(onset_mode,buffer_size,overlap_size,channels, samplerate);
78 if (threshold != 0.) aubio_tempo_set_threshold (bt, threshold);
80 examples_common_process(aubio_process,process_print);
85 examples_common_del();
87 debug("End of program.\n");