2 Copyright (C) 2003-2013 Paul Brossier <piem@aubio.org>
4 This file is part of aubio.
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.
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.
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/>.
22 #define PROG_HAS_TEMPO 1
23 #define PROG_HAS_ONSET 1
24 #define PROG_HAS_OUTPUT 1
25 #define PROG_HAS_JACK 1
26 #include "parse_args.h"
28 aubio_tempo_t * tempo;
29 aubio_wavetable_t *wavetable;
32 uint_t is_silence = 0.;
34 void process_block(fvec_t * ibuf, fvec_t *obuf) {
35 aubio_tempo_do (tempo, ibuf, tempo_out);
36 is_beat = fvec_get_sample (tempo_out, 0);
37 if (silence_threshold != -90.)
38 is_silence = aubio_silence_detection(ibuf, silence_threshold);
39 if ( !usejack && ! sink_uri ) return;
41 if ( is_beat && !is_silence ) {
42 aubio_wavetable_play ( wavetable );
43 /* Send tap over midi output */
44 /* Is called without jack use so ask for jack use */
47 /* Note on midi clock: Midi clock looks like it is more suitable here,
48 * but it is send 24 times between the detected bpm which is impossible
49 * to do since we get here only once per peat.
50 * Therefore midinote is used as a good workaround.
52 * http://www.blitter.com/~russtopia/MIDI/~jglatt/tech/midispec/clock.htm */
56 aubio_wavetable_stop ( wavetable );
59 aubio_wavetable_do (wavetable, ibuf, obuf);
61 aubio_wavetable_do (wavetable, obuf, obuf);
64 void process_print (void) {
65 if ( is_beat && !is_silence ) {
66 print_time (aubio_tempo_get_last (tempo));
71 int main(int argc, char **argv) {
72 // override general settings from utils.c
76 examples_common_init(argc,argv);
78 verbmsg ("using source: %s at %dHz\n", source_uri, samplerate);
80 verbmsg ("tempo method: %s, ", tempo_method);
81 verbmsg ("buffer_size: %d, ", buffer_size);
82 verbmsg ("hop_size: %d, ", hop_size);
83 verbmsg ("threshold: %f\n", onset_threshold);
85 tempo_out = new_fvec(2);
86 tempo = new_aubio_tempo(tempo_method, buffer_size, hop_size, samplerate);
87 // set silence threshold very low to output beats even during silence
88 // aubio_tempo_set_silence(tempo, -1000.);
89 if (onset_threshold != 0.) aubio_tempo_set_threshold (tempo, onset_threshold);
91 wavetable = new_aubio_wavetable (samplerate, hop_size);
92 aubio_wavetable_set_freq ( wavetable, 2450.);
93 //aubio_sampler_load (sampler, "/archives/sounds/woodblock.aiff");
95 examples_common_process((aubio_process_func_t)process_block,process_print);
97 del_aubio_tempo(tempo);
98 del_aubio_wavetable (wavetable);
101 examples_common_del();