examples/aubioonset.c

   1 /*
   2    Copyright (C) 2003 Paul Brossier
   3
   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.
   8
   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.
  13
  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.
  17 */
  18
  19 #include "utils.h"
  20
  21 unsigned int pos = 0; /*frames%dspblocksize*/
  22 uint_t usepitch = 0;
  23
  24 int aubio_process(float **input, float **output, int nframes);
  25 int aubio_process(float **input, float **output, int nframes) {
  26   unsigned int i;       /*channels*/
  27   unsigned int j;       /*frames*/
  28   for (j=0;j<(unsigned)nframes;j++) {
  29     if(usejack) {
  30       for (i=0;i<channels;i++) {
  31         /* write input to datanew */
  32         fvec_write_sample(ibuf, input[i][j], i, pos);
  33         /* put synthnew in output */
  34         output[i][j] = fvec_read_sample(obuf, i, pos);
  35       }
  36     }
  37     /*time for fft*/
  38     if (pos == overlap_size-1) {
  39       /* block loop */
  40       aubio_pvoc_do (pv,ibuf, fftgrain);
  41       aubio_onsetdetection(o,fftgrain, onset);
  42       if (usedoubled) {
  43         aubio_onsetdetection(o2,fftgrain, onset2);
  44         onset->data[0][0] *= onset2->data[0][0];
  45       }
  46       isonset = aubio_peakpick_pimrt(onset,parms);
  47       if (isonset) {
  48         /* test for silence */
  49         if (aubio_silence_detection(ibuf, silence)==1)
  50           isonset=0;
  51         else
  52           for (pos = 0; pos < overlap_size; pos++){
  53             obuf->data[0][pos] = woodblock->data[0][pos];
  54           }
  55       } else {
  56         for (pos = 0; pos < overlap_size; pos++)
  57           obuf->data[0][pos] = 0.;
  58       }
  59       /* end of block loop */
  60       pos = -1; /* so it will be zero next j loop */
  61     }
  62     pos++;
  63   }
  64   return 1;
  65 }
  66
  67 void process_print (void);
  68 void process_print (void) {
  69       /* output times in seconds, taking back some
  70        * delay to ensure the label is _before_ the
  71        * actual onset */
  72       if (isonset && output_filename == NULL) {
  73         if(frames >= 4) {
  74           outmsg("%f\n",(frames-4)*overlap_size/(float)samplerate);
  75         } else if (frames < 4) {
  76           outmsg("%f\n",0.);
  77         }
  78       }
  79 }
  80
  81 int main(int argc, char **argv) {
  82   examples_common_init(argc,argv);
  83   examples_common_process(aubio_process,process_print);
  84   examples_common_del();
  85   debug("End of program.\n");
  86   fflush(stderr);
  87   return 0;
  88 }
  89