source: examples/aubiopitch.c @ 299ad52

feature/autosinkfeature/cnnfeature/cnn_orgfeature/constantqfeature/crepefeature/crepe_orgfeature/pitchshiftfeature/pydocstringsfeature/timestretchfix/ffmpeg5pitchshiftsamplertimestretchyinfft+
Last change on this file since 299ad52 was b14107f, checked in by Paul Brossier <piem@piem.org>, 15 years ago

examples/aubiopitch.c: added c version of aubiopitch, more renaming

  • Property mode set to 100644
File size: 2.4 KB
Line 
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
21unsigned int pos = 0; /*frames%dspblocksize*/
22
23aubio_pitch_t *o;
24fvec_t *pitch;
25
26static int aubio_process(smpl_t **input, smpl_t **output, int nframes) {
27  unsigned int i;       /*channels*/
28  unsigned int j;       /*frames*/
29  for (j=0;j<(unsigned)nframes;j++) {
30    if(usejack) {
31      for (i=0;i<channels;i++) {
32        /* write input to datanew */
33        fvec_write_sample(ibuf, input[i][j], i, pos);
34        /* put synthnew in output */
35        output[i][j] = fvec_read_sample(obuf, i, pos);
36      }
37    }
38    /*time for fft*/
39    if (pos == overlap_size-1) {         
40      /* block loop */
41      aubio_pitch_do (o, ibuf, pitch);
42      if (fvec_read_sample(pitch, 0, 0)) {
43        for (pos = 0; pos < overlap_size; pos++){
44          obuf->data[0][pos] = woodblock->data[0][pos];
45        }
46      } else {
47        for (pos = 0; pos < overlap_size; pos++) {
48          obuf->data[0][pos] = 0.;
49        }
50      }
51      /* end of block loop */
52      pos = -1; /* so it will be zero next j loop */
53    }
54    pos++;
55  }
56  return 1;
57}
58
59static void process_print (void) {
60      if (!verbose && usejack) return;
61      smpl_t pitch_found = fvec_read_sample(pitch, 0, 0);
62      outmsg("%f %f\n",(frames) 
63              *overlap_size/(float)samplerate, pitch_found);
64}
65
66int main(int argc, char **argv) {
67  examples_common_init(argc,argv);
68
69  o = new_aubio_pitch (onset_mode, buffer_size, overlap_size, channels,
70          samplerate);
71  pitch = new_fvec (1, channels);
72
73  examples_common_process(aubio_process,process_print);
74
75  del_aubio_pitch (o);
76  del_fvec (pitch);
77
78  examples_common_del();
79  debug("End of program.\n");
80  fflush(stderr);
81  return 0;
82}
83
Note: See TracBrowser for help on using the repository browser.