Changeset 50bc5f2 for examples/utils.c


Ignore:
Timestamp:
Sep 25, 2009, 7:08:59 AM (15 years ago)
Author:
Paul Brossier <piem@piem.org>
Branches:
feature/autosink, feature/cnn, feature/cnn_org, feature/constantq, feature/crepe, feature/crepe_org, feature/pitchshift, feature/pydocstrings, feature/timestretch, fix/ffmpeg5, master, pitchshift, sampler, timestretch, yinfft+
Children:
04ceeab
Parents:
c3f4173
Message:

examples/utils.{c,h}: update copyright and license, run through indent

File:
1 edited

Legend:

Unmodified
Added
Removed

  • examples/utils.c

    rc3f4173 r50bc5f2  
    1 
    2 #include "aubio.h"
    3 
    4 #ifndef HAVE_JACK
    5 #define HAVE_JACK 0
    6 #endif
    7 
    8 #include <getopt.h>
    9 #include <stdlib.h>
    10 #include <stdio.h>
    11 #include <string.h>
    12 #include <math.h> /* for isfinite */
     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
    1321#include "utils.h"
    1422
    … …  
    1624#include <lash/lash.h>
    1725#include <pthread.h>
    18 lash_client_t * aubio_lash_client;
    19 lash_args_t * lash_args;
    20 void * lash_thread_main (void * data);
     26lash_client_t *aubio_lash_client;
     27lash_args_t *lash_args;
     28void *lash_thread_main (void *data);
    2129int lash_main (void);
    2230void save_data (void);
    23 void restore_data(lash_config_t * lash_config);
     31void restore_data (lash_config_t * lash_config);
    2432pthread_t lash_thread;
    2533#endif /* HAVE_LASH */
    2634
    2735/* settings */
    28 const char * output_filename = NULL;
    29 const char * input_filename  = NULL;
    30 const char * onset_filename  = AUBIO_PREFIX "/share/sounds/" PACKAGE "/woodblock.aiff";
     36const char *output_filename = NULL;
     37const char *input_filename = NULL;
     38const char *onset_filename =
     39    AUBIO_PREFIX "/share/sounds/" PACKAGE "/woodblock.aiff";
    3140int frames = 0;
    3241int verbose = 0;
    … …  
    3746
    3847/* energy,specdiff,hfc,complexdomain,phase */
    39 aubio_onsetdetection_type type_onset  = aubio_onset_kl;
     48aubio_onsetdetection_type type_onset = aubio_onset_kl;
    4049aubio_onsetdetection_type type_onset2 = aubio_onset_complex;
    41 smpl_t threshold                      = 0.3;
    42 smpl_t silence                        = -90.;
    43 uint_t buffer_size                    = 512; //1024;
    44 uint_t overlap_size                   = 256; //512;
    45 uint_t channels                       = 1;
    46 uint_t samplerate                     = 44100;
    47 
    48 
    49 aubio_sndfile_t * file = NULL;
    50 aubio_sndfile_t * fileout = NULL;
    51 
    52 aubio_pvoc_t * pv;
    53 fvec_t * ibuf;
    54 fvec_t * obuf;
    55 cvec_t * fftgrain;
    56 fvec_t * woodblock;
     50smpl_t threshold = 0.3;
     51smpl_t silence = -90.;
     52uint_t buffer_size = 512;      //1024;
     53uint_t overlap_size = 256;      //512;
     54uint_t channels = 1;
     55uint_t samplerate = 44100;
     56
     57
     58aubio_sndfile_t *file = NULL;
     59aubio_sndfile_t *fileout = NULL;
     60
     61aubio_pvoc_t *pv;
     62fvec_t *ibuf;
     63fvec_t *obuf;
     64cvec_t *fftgrain;
     65fvec_t *woodblock;
    5766aubio_onsetdetection_t *o;
    5867aubio_onsetdetection_t *o2;
    … …  
    6069fvec_t *onset2;
    6170int isonset = 0;
    62 aubio_pickpeak_t * parms;
     71aubio_pickpeak_t *parms;
    6372
    6473
    6574/* pitch objects */
    66 smpl_t pitch               = 0.;
    67 aubio_pitchdetection_t * pitchdet;
    68 aubio_pitchdetection_type type_pitch = aubio_pitch_yinfft; // aubio_pitch_mcomb
     75smpl_t pitch = 0.;
     76aubio_pitchdetection_t *pitchdet;
     77aubio_pitchdetection_type type_pitch = aubio_pitch_yinfft;      // aubio_pitch_mcomb
    6978aubio_pitchdetection_mode mode_pitch = aubio_pitchm_freq;
    70 uint_t median         = 6;
    71 
    72 fvec_t * note_buffer = NULL;
    73 fvec_t * note_buffer2 = NULL;
    74 smpl_t curlevel       = 0.;
    75 smpl_t maxonset       = 0.;
     79uint_t median = 6;
     80
     81fvec_t *note_buffer = NULL;
     82fvec_t *note_buffer2 = NULL;
     83smpl_t curlevel = 0.;
     84smpl_t maxonset = 0.;
    7685
    7786/* midi objects */
    78 aubio_midi_player_t * mplay;
    79 aubio_midi_driver_t * mdriver;
    80 aubio_midi_event_t  * event;
     87aubio_midi_player_t *mplay;
     88aubio_midi_driver_t *mdriver;
     89aubio_midi_event_t *event;
    8190
    8291smpl_t curnote = 0.;
    … …  
    9099smpl_t threshold;
    91100smpl_t averaging;
    92 const char * prog_name;
    93 
    94 void usage (FILE * stream, int exit_code)
    95 {
    96         fprintf(stream, "usage: %s [ options ] \n", prog_name);
    97         fprintf(stream,
    98                         "       -h      --help          Display this message.\n"
    99                         "       -v      --verbose       Be verbose.\n"
    100                         "       -j      --jack          Use Jack.\n"
    101                         "       -o      --output        Output type.\n"
    102                         "       -i      --input         Input type.\n"
    103                         "       -O      --onset         Select onset detection algorithm.\n"
    104                         "       -t      --threshold     Set onset detection threshold.\n"
    105                         "       -s      --silence       Select silence threshold.\n"
    106                         "       -p      --pitch         Select pitch detection algorithm.\n"
    107                         "       -B      --bufsize       Set buffer size.\n"
    108                         "       -H      --hopsize       Set hopsize.\n"
    109                         "       -a      --averaging     Use averaging.\n"
    110                );
    111         exit(exit_code);
    112 }
    113 
    114 int parse_args (int argc, char **argv) {
    115         const char *options = "hvjo:i:O:t:s:p:B:H:a";
    116         int next_option;
    117         struct option long_options[] =
    118         {
    119                 {"help"     , 0, NULL, 'h'},
    120                 {"verbose"  , 0, NULL, 'v'},
    121                 {"jack"     , 0, NULL, 'j'},
    122                 {"output"   , 1, NULL, 'o'},
    123                 {"input"    , 1, NULL, 'i'},
    124                 {"onset"    , 1, NULL, 'O'},
    125                 {"threshold", 1, NULL, 't'},
    126                 {"silence"  , 1, NULL, 's'},
    127                 {"pitch"    , 1, NULL, 'p'},
    128                 {"averaging", 0, NULL, 'a'},
    129                 {"bufsize",   1, NULL, 'B'},
    130                 {"hopsize",   1, NULL, 'H'},
    131                 {NULL       , 0, NULL, 0}
    132         };
     101const char *prog_name;
     102
     103void
     104usage (FILE * stream, int exit_code)
     105{
     106  fprintf (stream, "usage: %s [ options ] \n", prog_name);
     107  fprintf (stream,
     108      "       -h      --help          Display this message.\n"
     109      "       -v      --verbose       Be verbose.\n"
     110      "       -j      --jack          Use Jack.\n"
     111      "       -o      --output        Output type.\n"
     112      "       -i      --input         Input type.\n"
     113      "       -O      --onset         Select onset detection algorithm.\n"
     114      "       -t      --threshold     Set onset detection threshold.\n"
     115      "       -s      --silence       Select silence threshold.\n"
     116      "       -p      --pitch         Select pitch detection algorithm.\n"
     117      "       -B      --bufsize       Set buffer size.\n"
     118      "       -H      --hopsize       Set hopsize.\n"
     119      "       -a      --averaging     Use averaging.\n");
     120  exit (exit_code);
     121}
     122
     123int
     124parse_args (int argc, char **argv)
     125{
     126  const char *options = "hvjo:i:O:t:s:p:B:H:a";
     127  int next_option;
     128  struct option long_options[] = {
     129    {"help", 0, NULL, 'h'},
     130    {"verbose", 0, NULL, 'v'},
     131    {"jack", 0, NULL, 'j'},
     132    {"output", 1, NULL, 'o'},
     133    {"input", 1, NULL, 'i'},
     134    {"onset", 1, NULL, 'O'},
     135    {"threshold", 1, NULL, 't'},
     136    {"silence", 1, NULL, 's'},
     137    {"pitch", 1, NULL, 'p'},
     138    {"averaging", 0, NULL, 'a'},
     139    {"bufsize", 1, NULL, 'B'},
     140    {"hopsize", 1, NULL, 'H'},
     141    {NULL, 0, NULL, 0}
     142  };
    133143#ifdef HAVE_LASH
    134         lash_args = lash_extract_args(&argc, &argv);
     144  lash_args = lash_extract_args (&argc, &argv);
    135145#endif /* HAVE_LASH */
    136         prog_name = argv[0];
    137         if( argc < 1 ) {
    138                 usage (stderr, 1);
    139                 return -1;
     146  prog_name = argv[0];
     147  if (argc < 1) {
     148    usage (stderr, 1);
     149    return -1;
     150  }
     151  do {
     152    next_option = getopt_long (argc, argv, options, long_options, NULL);
     153    switch (next_option) {
     154      case 'o':
     155        output_filename = optarg;
     156        break;
     157      case 'i':
     158        input_filename = optarg;
     159        break;
     160      case 'h':                /* help */
     161        usage (stdout, 0);
     162        return -1;
     163      case 'v':                /* verbose */
     164        verbose = 1;
     165        break;
     166      case 'j':
     167        usejack = 1;
     168        break;
     169      case 'O':                /*onset type */
     170        if (strcmp (optarg, "energy") == 0)
     171          type_onset = aubio_onset_energy;
     172        else if (strcmp (optarg, "specdiff") == 0)
     173          type_onset = aubio_onset_specdiff;
     174        else if (strcmp (optarg, "hfc") == 0)
     175          type_onset = aubio_onset_hfc;
     176        else if (strcmp (optarg, "complexdomain") == 0)
     177          type_onset = aubio_onset_complex;
     178        else if (strcmp (optarg, "complex") == 0)
     179          type_onset = aubio_onset_complex;
     180        else if (strcmp (optarg, "phase") == 0)
     181          type_onset = aubio_onset_phase;
     182        else if (strcmp (optarg, "mkl") == 0)
     183          type_onset = aubio_onset_mkl;
     184        else if (strcmp (optarg, "kl") == 0)
     185          type_onset = aubio_onset_kl;
     186        else if (strcmp (optarg, "specflux") == 0)
     187          type_onset = aubio_onset_specflux;
     188        else {
     189          errmsg ("unknown onset type.\n");
     190          abort ();
    140191        }
    141         do {
    142                 next_option = getopt_long (argc, argv, options,
    143                                 long_options, NULL);
    144                 switch (next_option) {
    145                         case 'o':
    146                                 output_filename = optarg;
    147                                 break;
    148                         case 'i':
    149                                 input_filename = optarg;
    150                                 break;
    151                         case 'h': /* help */
    152                                 usage (stdout, 0);
    153                                 return -1;
    154                         case 'v': /* verbose */
    155                                 verbose = 1;
    156                                 break;
    157                         case 'j':
    158                                 usejack = 1;
    159                                 break;
    160                         case 'O':   /*onset type*/
    161                                 if (strcmp(optarg,"energy") == 0)
    162                                         type_onset = aubio_onset_energy;
    163                                 else if (strcmp(optarg,"specdiff") == 0)
    164                                         type_onset = aubio_onset_specdiff;
    165                                 else if (strcmp(optarg,"hfc") == 0)
    166                                         type_onset = aubio_onset_hfc;
    167                                 else if (strcmp(optarg,"complexdomain") == 0)
    168                                         type_onset = aubio_onset_complex;
    169                                 else if (strcmp(optarg,"complex") == 0)
    170                                         type_onset = aubio_onset_complex;
    171                                 else if (strcmp(optarg,"phase") == 0)
    172                                         type_onset = aubio_onset_phase;
    173                                 else if (strcmp(optarg,"mkl") == 0)
    174                                         type_onset = aubio_onset_mkl;
    175                                 else if (strcmp(optarg,"kl") == 0)
    176                                         type_onset = aubio_onset_kl;
    177                                 else if (strcmp(optarg,"specflux") == 0)
    178                                         type_onset = aubio_onset_specflux;
    179                                 else {
    180                                         errmsg("unknown onset type.\n");
    181                                         abort();
    182                                 }
    183                                 usedoubled = 0;
    184                                 break;
    185                         case 's':   /* threshold value for onset */
    186                                 silence = (smpl_t)atof(optarg);
    187                                 break;
    188                         case 't':   /* threshold value for onset */
    189                                 threshold = (smpl_t)atof(optarg);
    190                                 /*
    191                                    if (!isfinite(threshold)) {
    192                                    debug("could not get threshold.\n");
    193                                    abort();
    194                                    }
    195                                    */
    196                                 break;
    197                         case 'p':
    198                                 if (strcmp(optarg,"mcomb") == 0)
    199                                         type_pitch = aubio_pitch_mcomb;
    200                                 else if (strcmp(optarg,"yinfft") == 0)
    201                                         type_pitch = aubio_pitch_yin;
    202                                 else if (strcmp(optarg,"yin") == 0)
    203                                         type_pitch = aubio_pitch_yin;
    204                                 else if (strcmp(optarg,"schmitt") == 0)
    205                                         type_pitch = aubio_pitch_schmitt;
    206                                 else if (strcmp(optarg,"fcomb") == 0)
    207                                         type_pitch = aubio_pitch_fcomb;
    208                                 else {
    209                                         errmsg("unknown pitch type.\n");
    210                                         abort();
    211                                 }
    212                                 break;
    213                         case 'a':
    214                                 averaging = 1;
    215                                 break;
    216                         case 'B':
    217                                 buffer_size = atoi(optarg);
    218                                 break;
    219                         case 'H':
    220                                 overlap_size = atoi(optarg);
    221                                 break;
    222                         case '?': /* unknown options */
    223                                 usage(stderr, 1);
    224                                 break;
    225                         case -1: /* done with options */
    226                                 break;
    227                         default: /*something else unexpected */
    228                                 fprintf(stderr, "Error parsing option '%c'\n", next_option);
    229                                 abort ();
    230                 }
     192        usedoubled = 0;
     193        break;
     194      case 's':                /* threshold value for onset */
     195        silence = (smpl_t) atof (optarg);
     196        break;
     197      case 't':                /* threshold value for onset */
     198        threshold = (smpl_t) atof (optarg);
     199        /*
     200           if (!isfinite(threshold)) {
     201           debug("could not get threshold.\n");
     202           abort();
     203           }
     204         */
     205        break;
     206      case 'p':
     207        if (strcmp (optarg, "mcomb") == 0)
     208          type_pitch = aubio_pitch_mcomb;
     209        else if (strcmp (optarg, "yinfft") == 0)
     210          type_pitch = aubio_pitch_yin;
     211        else if (strcmp (optarg, "yin") == 0)
     212          type_pitch = aubio_pitch_yin;
     213        else if (strcmp (optarg, "schmitt") == 0)
     214          type_pitch = aubio_pitch_schmitt;
     215        else if (strcmp (optarg, "fcomb") == 0)
     216          type_pitch = aubio_pitch_fcomb;
     217        else {
     218          errmsg ("unknown pitch type.\n");
     219          abort ();
    231220        }
    232         while (next_option != -1);
    233 
    234         if (input_filename != NULL) {
    235                 debug ("Input file : %s\n", input_filename );
    236         } else if (input_filename != NULL && output_filename != NULL) {
    237                 debug ("Input file : %s\n", input_filename );
    238                 debug ("Output file : %s\n", output_filename );
    239         } else {
    240                 if (HAVE_JACK)
    241                 {
    242                         debug ("Jack input output\n");
    243                         usejack = 1;
    244                 } else {
    245                         debug ("Error: Could not switch to jack mode\n   aubio was compiled without jack support\n");
    246                         exit(1);
    247                 }
    248         }
    249 
    250         return 0;
    251 }
    252 
    253 void examples_common_init(int argc,char ** argv) {
    254 
    255 
    256   aubio_sndfile_t * onsetfile = NULL;
     221        break;
     222      case 'a':
     223        averaging = 1;
     224        break;
     225      case 'B':
     226        buffer_size = atoi (optarg);
     227        break;
     228      case 'H':
     229        overlap_size = atoi (optarg);
     230        break;
     231      case '?':                /* unknown options */
     232        usage (stderr, 1);
     233        break;
     234      case -1:                 /* done with options */
     235        break;
     236      default:                 /*something else unexpected */
     237        fprintf (stderr, "Error parsing option '%c'\n", next_option);
     238        abort ();
     239    }
     240  }
     241  while (next_option != -1);
     242
     243  if (input_filename != NULL) {
     244    debug ("Input file : %s\n", input_filename);
     245  } else if (input_filename != NULL && output_filename != NULL) {
     246    debug ("Input file : %s\n", input_filename);
     247    debug ("Output file : %s\n", output_filename);
     248  } else {
     249    if (HAVE_JACK) {
     250      debug ("Jack input output\n");
     251      usejack = 1;
     252    } else {
     253      debug
     254          ("Error: Could not switch to jack mode\n   aubio was compiled without jack support\n");
     255      exit (1);
     256    }
     257  }
     258
     259  return 0;
     260}
     261
     262void
     263examples_common_init (int argc, char **argv)
     264{
     265
     266
     267  aubio_sndfile_t *onsetfile = NULL;
    257268  /* parse command line arguments */
    258   parse_args(argc, argv);
    259 
    260   woodblock = new_fvec(buffer_size,1);
     269  parse_args (argc, argv);
     270
     271  woodblock = new_fvec (buffer_size, 1);
    261272  if (output_filename || usejack) {
    262           /* dummy assignement to keep egcs happy */
    263           isonset = (onsetfile = new_aubio_sndfile_ro(onset_filename)) ||
    264                   (onsetfile = new_aubio_sndfile_ro("sounds/woodblock.aiff")) ||
    265                   (onsetfile = new_aubio_sndfile_ro("../sounds/woodblock.aiff"));
    266           if (onsetfile == NULL) {
    267             outmsg("Could not find woodblock.aiff\n");
    268             exit(1);
    269           }
     273    /* dummy assignement to keep egcs happy */
     274    isonset = (onsetfile = new_aubio_sndfile_ro (onset_filename)) ||
     275        (onsetfile = new_aubio_sndfile_ro ("sounds/woodblock.aiff")) ||
     276        (onsetfile = new_aubio_sndfile_ro ("../sounds/woodblock.aiff"));
     277    if (onsetfile == NULL) {
     278      outmsg ("Could not find woodblock.aiff\n");
     279      exit (1);
     280    }
    270281  }
    271282  if (onsetfile) {
    272           /* read the output sound once */
    273           aubio_sndfile_read(onsetfile, overlap_size, woodblock);
    274   }
    275 
    276   if(!usejack)
    277   {
    278     debug("Opening files ...\n");
     283    /* read the output sound once */
     284    aubio_sndfile_read (onsetfile, overlap_size, woodblock);
     285  }
     286
     287  if (!usejack) {
     288    debug ("Opening files ...\n");
    279289    file = new_aubio_sndfile_ro (input_filename);
    280290    if (file == NULL) {
    281       outmsg("Could not open input file %s.\n", input_filename);
    282       exit(1);
    283     }
    284     if (verbose) aubio_sndfile_info(file);
    285     channels = aubio_sndfile_channels(file);
    286     samplerate = aubio_sndfile_samplerate(file);
     291      outmsg ("Could not open input file %s.\n", input_filename);
     292      exit (1);
     293    }
     294    if (verbose)
     295      aubio_sndfile_info (file);
     296    channels = aubio_sndfile_channels (file);
     297    samplerate = aubio_sndfile_samplerate (file);
    287298    if (output_filename != NULL)
    288       fileout = new_aubio_sndfile_wo(file, output_filename);
     299      fileout = new_aubio_sndfile_wo (file, output_filename);
    289300  }
    290301#ifdef HAVE_LASH
    291302  else {
    292     aubio_lash_client = lash_init(lash_args, argv[0],
    293         LASH_Config_Data_Set | LASH_Terminal,
    294         LASH_PROTOCOL(2, 0));
     303    aubio_lash_client = lash_init (lash_args, argv[0],
     304        LASH_Config_Data_Set | LASH_Terminal, LASH_PROTOCOL (2, 0));
    295305    if (!aubio_lash_client) {
    296       fprintf(stderr, "%s: could not initialise lash\n", __FUNCTION__);
     306      fprintf (stderr, "%s: could not initialise lash\n", __FUNCTION__);
    297307    }
    298308    /* tell the lash server our client id */
    299     if (lash_enabled(aubio_lash_client)) {
    300       lash_event_t * event = (lash_event_t *)lash_event_new_with_type(LASH_Client_Name);
    301       lash_event_set_string(event, "aubio");
    302       lash_send_event(aubio_lash_client, event);
    303       pthread_create(&lash_thread, NULL, lash_thread_main, NULL);
     309    if (lash_enabled (aubio_lash_client)) {
     310      lash_event_t *event =
     311          (lash_event_t *) lash_event_new_with_type (LASH_Client_Name);
     312      lash_event_set_string (event, "aubio");
     313      lash_send_event (aubio_lash_client, event);
     314      pthread_create (&lash_thread, NULL, lash_thread_main, NULL);
    304315    }
    305316  }
    306317#endif /* HAVE_LASH */
    307318
    308   ibuf      = new_fvec(overlap_size, channels);
    309   obuf      = new_fvec(overlap_size, channels);
    310   fftgrain  = new_cvec(buffer_size, channels);
     319  ibuf = new_fvec (overlap_size, channels);
     320  obuf = new_fvec (overlap_size, channels);
     321  fftgrain = new_cvec (buffer_size, channels);
    311322
    312323  if (usepitch) {
    313     pitchdet = new_aubio_pitchdetection(buffer_size*4,
     324    pitchdet = new_aubio_pitchdetection (buffer_size * 4,
    314325        overlap_size, channels, samplerate, type_pitch, mode_pitch);
    315     aubio_pitchdetection_set_yinthresh(pitchdet, 0.7);
     326    aubio_pitchdetection_set_yinthresh (pitchdet, 0.7);
    316327
    317328    if (median) {
    318       note_buffer = new_fvec(median, 1);
    319       note_buffer2= new_fvec(median, 1);
     329      note_buffer = new_fvec (median, 1);
     330      note_buffer2 = new_fvec (median, 1);
    320331    }
    321332  }
    322333  /* phase vocoder */
    323   pv = new_aubio_pvoc(buffer_size, overlap_size, channels);
     334  pv = new_aubio_pvoc (buffer_size, overlap_size, channels);
    324335  /* onsets */
    325   parms = new_aubio_peakpicker(threshold);
    326   o = new_aubio_onsetdetection(type_onset,buffer_size,channels);
    327   onset = new_fvec(1, channels);
    328   if (usedoubled)    {
    329     o2 = new_aubio_onsetdetection(type_onset2,buffer_size,channels);
    330     onset2 = new_fvec(1 , channels);
    331   }
    332 
    333 }
    334 
    335 
    336 void examples_common_del(void){
     336  parms = new_aubio_peakpicker (threshold);
     337  o = new_aubio_onsetdetection (type_onset, buffer_size, channels);
     338  onset = new_fvec (1, channels);
     339  if (usedoubled) {
     340    o2 = new_aubio_onsetdetection (type_onset2, buffer_size, channels);
     341    onset2 = new_fvec (1, channels);
     342  }
     343
     344}
     345
     346
     347void
     348examples_common_del (void)
     349{
    337350  if (usepitch) {
    338           send_noteon(curnote,0);
    339           del_aubio_pitchdetection(pitchdet);
    340           if (median) {
    341                   del_fvec(note_buffer);
    342                   del_fvec(note_buffer2);
    343           }
    344   }
    345   if (usedoubled)    {
    346     del_aubio_onsetdetection(o2);
    347     del_fvec(onset2);
    348   }
    349   del_aubio_onsetdetection(o);
    350   del_aubio_peakpicker(parms);
    351   del_aubio_pvoc(pv);
    352   del_fvec(obuf);
    353   del_fvec(ibuf);
    354   del_cvec(fftgrain);
    355   del_fvec(onset);
    356   del_fvec(woodblock);
    357   aubio_cleanup();
    358 }
    359 
    360 void examples_common_process(aubio_process_func_t process_func, aubio_print_func_t print ){
    361   if(usejack) {
     351    send_noteon (curnote, 0);
     352    del_aubio_pitchdetection (pitchdet);
     353    if (median) {
     354      del_fvec (note_buffer);
     355      del_fvec (note_buffer2);
     356    }
     357  }
     358  if (usedoubled) {
     359    del_aubio_onsetdetection (o2);
     360    del_fvec (onset2);
     361  }
     362  del_aubio_onsetdetection (o);
     363  del_aubio_peakpicker (parms);
     364  del_aubio_pvoc (pv);
     365  del_fvec (obuf);
     366  del_fvec (ibuf);
     367  del_cvec (fftgrain);
     368  del_fvec (onset);
     369  del_fvec (woodblock);
     370  aubio_cleanup ();
     371}
     372
     373void
     374examples_common_process (aubio_process_func_t process_func,
     375    aubio_print_func_t print)
     376{
     377  if (usejack) {
    362378#if HAVE_JACK
    363     aubio_jack_t * jack_setup;
    364     debug("Jack init ...\n");
    365     jack_setup = new_aubio_jack(channels, channels,
    366           1, 1,
    367           (aubio_process_func_t)process_func);
     379    aubio_jack_t *jack_setup;
     380    debug ("Jack init ...\n");
     381    jack_setup = new_aubio_jack (channels, channels,
     382        1, 1, (aubio_process_func_t) process_func);
    368383    if (usepitch) {
    369             debug("Midi init ...\n");
    370             mplay = new_aubio_midi_player();
    371             mdriver = new_aubio_midi_driver("alsa_seq",
    372                             (handle_midi_event_func_t)aubio_midi_send_event, mplay);
    373             event = new_aubio_midi_event();
    374     }
    375     debug("Jack activation ...\n");
    376     aubio_jack_activate(jack_setup);
    377     debug("Processing (Ctrl+C to quit) ...\n");
    378     pause();
    379     aubio_jack_close(jack_setup);
     384      debug ("Midi init ...\n");
     385      mplay = new_aubio_midi_player ();
     386      mdriver = new_aubio_midi_driver ("alsa_seq",
     387          (handle_midi_event_func_t) aubio_midi_send_event, mplay);
     388      event = new_aubio_midi_event ();
     389    }
     390    debug ("Jack activation ...\n");
     391    aubio_jack_activate (jack_setup);
     392    debug ("Processing (Ctrl+C to quit) ...\n");
     393    pause ();
     394    aubio_jack_close (jack_setup);
    380395    if (usepitch) {
    381             send_noteon(curnote,0);
    382             del_aubio_midi_driver(mdriver);
     396      send_noteon (curnote, 0);
     397      del_aubio_midi_driver (mdriver);
    383398    }
    384399#else
    385     usage(stderr, 1);
    386     outmsg("Compiled without jack output, exiting.\n");
     400    usage (stderr, 1);
     401    outmsg ("Compiled without jack output, exiting.\n");
    387402#endif
    388403
    389404  } else {
    390405    /* phasevoc */
    391     debug("Processing ...\n");
     406    debug ("Processing ...\n");
    392407
    393408    frames = 0;
    394409
    395     while ((signed)overlap_size == aubio_sndfile_read(file, overlap_size, ibuf))
    396     {
    397       isonset=0;
    398       process_func(ibuf->data, obuf->data, overlap_size);
    399       print();
     410    while ((signed) overlap_size == aubio_sndfile_read (file, overlap_size,
     411            ibuf)) {
     412      isonset = 0;
     413      process_func (ibuf->data, obuf->data, overlap_size);
     414      print ();
    400415      if (output_filename != NULL) {
    401         aubio_sndfile_write(fileout,overlap_size,obuf);
     416        aubio_sndfile_write (fileout, overlap_size, obuf);
    402417      }
    403418      frames++;
    404419    }
    405420
    406     debug("Processed %d frames of %d samples.\n", frames, buffer_size);
    407 
    408     flush_process(process_func, print);
    409     del_aubio_sndfile(file);
     421    debug ("Processed %d frames of %d samples.\n", frames, buffer_size);
     422
     423    flush_process (process_func, print);
     424    del_aubio_sndfile (file);
    410425
    411426    if (output_filename != NULL)
    412       del_aubio_sndfile(fileout);
    413 
    414   }
    415 }
    416 
    417 void flush_process(aubio_process_func_t process_func, aubio_print_func_t print){
    418   uint_t i,j;
     427      del_aubio_sndfile (fileout);
     428
     429  }
     430}
     431
     432void
     433flush_process (aubio_process_func_t process_func, aubio_print_func_t print)
     434{
     435  uint_t i, j;
    419436  for (i = 0; i < channels; i++) {
    420437    for (j = 0; j < obuf->length; j++) {
    421       fvec_write_sample(obuf,0.,i,j);
    422     }
    423   }
    424   for (i = 0; (signed)i < frames_delay; i++) {
    425     process_func(ibuf->data, obuf->data, overlap_size);
    426     print();
    427   }
    428 }
    429 
    430 
    431 void send_noteon(int pitch, int velo)
    432 {
    433     smpl_t mpitch = floor(aubio_freqtomidi(pitch)+.5);
    434     /* we should check if we use midi here, not jack */
     438      fvec_write_sample (obuf, 0., i, j);
     439    }
     440  }
     441  for (i = 0; (signed) i < frames_delay; i++) {
     442    process_func (ibuf->data, obuf->data, overlap_size);
     443    print ();
     444  }
     445}
     446
     447
     448void
     449send_noteon (int pitch, int velo)
     450{
     451  smpl_t mpitch = floor (aubio_freqtomidi (pitch) + .5);
     452  /* we should check if we use midi here, not jack */
    435453#if HAVE_ALSA
    436     if (usejack) {
    437         if (velo==0) {
    438             aubio_midi_event_set_type(event,NOTE_OFF);
    439         } else {
    440             aubio_midi_event_set_type(event,NOTE_ON);
    441         }
    442         aubio_midi_event_set_channel(event,0);
    443         aubio_midi_event_set_pitch(event,mpitch);
    444         aubio_midi_event_set_velocity(event,velo);
    445         aubio_midi_direct_output(mdriver,event);
    446     } else
     454  if (usejack) {
     455    if (velo == 0) {
     456      aubio_midi_event_set_type (event, NOTE_OFF);
     457    } else {
     458      aubio_midi_event_set_type (event, NOTE_ON);
     459    }
     460    aubio_midi_event_set_channel (event, 0);
     461    aubio_midi_event_set_pitch (event, mpitch);
     462    aubio_midi_event_set_velocity (event, velo);
     463    aubio_midi_direct_output (mdriver, event);
     464  } else
    447465#endif
    448     if (!verbose)
    449     {
    450         if (velo==0) {
    451             outmsg("%f\n",frames*overlap_size/(float)samplerate);
    452         } else {
    453             outmsg("%f\t%f\t", mpitch,
    454                         frames*overlap_size/(float)samplerate);
    455         }
    456     }
    457 }
    458 
    459 
    460 void note_append(fvec_t * note_buffer, smpl_t curnote) {
     466  if (!verbose) {
     467    if (velo == 0) {
     468      outmsg ("%f\n", frames * overlap_size / (float) samplerate);
     469    } else {
     470      outmsg ("%f\t%f\t", mpitch, frames * overlap_size / (float) samplerate);
     471    }
     472  }
     473}
     474
     475
     476void
     477note_append (fvec_t * note_buffer, smpl_t curnote)
     478{
    461479  uint_t i = 0;
    462   for (i = 0; i < note_buffer->length - 1; i++) { 
    463       note_buffer->data[0][i] = note_buffer->data[0][i+1];
     480  for (i = 0; i < note_buffer->length - 1; i++) {
     481    note_buffer->data[0][i] = note_buffer->data[0][i + 1];
    464482  }
    465483  note_buffer->data[0][note_buffer->length - 1] = curnote;
    … …  
    467485}
    468486
    469 uint_t get_note(fvec_t *note_buffer, fvec_t *note_buffer2){
     487uint_t
     488get_note (fvec_t * note_buffer, fvec_t * note_buffer2)
     489{
    470490  uint_t i = 0;
    471   for (i = 0; i < note_buffer->length; i++) { 
    472       note_buffer2->data[0][i] = note_buffer->data[0][i];
    473   }
    474   return vec_median(note_buffer2);
     491  for (i = 0; i < note_buffer->length; i++) {
     492    note_buffer2->data[0][i] = note_buffer->data[0][i];
     493  }
     494  return vec_median (note_buffer2);
    475495}
    476496
    477497#if HAVE_LASH
    478498
    479 void * lash_thread_main(void *data __attribute__((unused)))
    480 {
    481         printf("LASH thread running\n");
    482 
    483         while (!lash_main())
    484                 usleep(1000);
    485 
    486         printf("LASH thread finished\n");
    487         return NULL;
    488 }
    489 
    490 int lash_main(void) {
    491         lash_event_t *lash_event;
    492         lash_config_t *lash_config;
    493 
    494         while ((lash_event = lash_get_event(aubio_lash_client))) {
    495                 switch (lash_event_get_type(lash_event)) {
    496                 case LASH_Quit:
    497                         lash_event_destroy(lash_event);
    498       exit(1);
    499       return 1;
    500                 case LASH_Restore_Data_Set:
    501                         lash_send_event(aubio_lash_client, lash_event);
    502                         break;
    503                 case LASH_Save_Data_Set:
    504                         save_data();
    505                         lash_send_event(aubio_lash_client, lash_event);
    506                         break;
    507                 case LASH_Server_Lost:
    508                         return 1;
    509                 default:
    510                         printf("%s: received unknown LASH event of type %d",
    511                                    __FUNCTION__, lash_event_get_type(lash_event));
    512                         lash_event_destroy(lash_event);
    513       break;
    514                 }
    515         }
    516 
    517         while ((lash_config = lash_get_config(aubio_lash_client))) {
    518                 restore_data(lash_config);
    519                 lash_config_destroy(lash_config);
    520         }
    521 
    522         return 0;
    523 }
    524 
    525 void save_data() {
    526         lash_config_t *lash_config;
    527 
    528         lash_config = lash_config_new_with_key("threshold");
    529         lash_config_set_value_double(lash_config, threshold);
    530         lash_send_config(aubio_lash_client, lash_config);
    531 
    532 }
    533 
    534 void restore_data(lash_config_t * lash_config) {
    535         const char *lash_key;
    536 
    537         lash_key = lash_config_get_key(lash_config);
    538 
    539         if (strcmp(lash_key, "threshold") == 0) {
    540                 threshold = lash_config_get_value_double(lash_config);
    541                 return;
    542         }
     499void *
     500lash_thread_main (void *data __attribute__ ((unused)))
     501{
     502  printf ("LASH thread running\n");
     503
     504  while (!lash_main ())
     505    usleep (1000);
     506
     507  printf ("LASH thread finished\n");
     508  return NULL;
     509}
     510
     511int
     512lash_main (void)
     513{
     514  lash_event_t *lash_event;
     515  lash_config_t *lash_config;
     516
     517  while ((lash_event = lash_get_event (aubio_lash_client))) {
     518    switch (lash_event_get_type (lash_event)) {
     519      case LASH_Quit:
     520        lash_event_destroy (lash_event);
     521        exit (1);
     522        return 1;
     523      case LASH_Restore_Data_Set:
     524        lash_send_event (aubio_lash_client, lash_event);
     525        break;
     526      case LASH_Save_Data_Set:
     527        save_data ();
     528        lash_send_event (aubio_lash_client, lash_event);
     529        break;
     530      case LASH_Server_Lost:
     531        return 1;
     532      default:
     533        printf ("%s: received unknown LASH event of type %d",
     534            __FUNCTION__, lash_event_get_type (lash_event));
     535        lash_event_destroy (lash_event);
     536        break;
     537    }
     538  }
     539
     540  while ((lash_config = lash_get_config (aubio_lash_client))) {
     541    restore_data (lash_config);
     542    lash_config_destroy (lash_config);
     543  }
     544
     545  return 0;
     546}
     547
     548void
     549save_data ()
     550{
     551  lash_config_t *lash_config;
     552
     553  lash_config = lash_config_new_with_key ("threshold");
     554  lash_config_set_value_double (lash_config, threshold);
     555  lash_send_config (aubio_lash_client, lash_config);
     556
     557}
     558
     559void
     560restore_data (lash_config_t * lash_config)
     561{
     562  const char *lash_key;
     563
     564  lash_key = lash_config_get_key (lash_config);
     565
     566  if (strcmp (lash_key, "threshold") == 0) {
     567    threshold = lash_config_get_value_double (lash_config);
     568    return;
     569  }
    543570
    544571}
    545572
    546573#endif /* HAVE_LASH */
    547 
Note: See TracChangeset for help on using the changeset viewer.