tests/src/io/test-source_seek.c

   1 #include <aubio.h>
   2 #include "utils_tests.h"
   3
   4 int main (int argc, char **argv)
   5 {
   6   aubio_init();
   7
   8   uint_t err = 0;
   9   if (argc < 2) {
  10     err = 2;
  11     PRINT_ERR("not enough arguments\n");
  12     PRINT_MSG("read a wave file as a mono vector\n");
  13     PRINT_MSG("usage: %s <source_path> [samplerate] [hop_size]\n", argv[0]);
  14     PRINT_MSG("examples:\n");
  15     PRINT_MSG(" - read file.wav at original samplerate\n");
  16     PRINT_MSG("       %s file.wav\n", argv[0]);
  17     PRINT_MSG(" - read file.wav at 32000Hz\n");
  18     PRINT_MSG("       %s file.aif 32000\n", argv[0]);
  19     PRINT_MSG(" - read file.wav at original samplerate with 4096 blocks\n");
  20     PRINT_MSG("       %s file.wav 0 4096 \n", argv[0]);
  21     return err;
  22   }
  23
  24   uint_t samplerate = 0;
  25   uint_t hop_size = 256;
  26   uint_t n_frames = 0, read = 0;
  27   uint_t old_n_frames_1 = 0, old_n_frames_2 = 0, old_n_frames_3 = 0;
  28   if ( argc == 3 ) samplerate = atoi(argv[2]);
  29   if ( argc == 4 ) hop_size = atoi(argv[3]);
  30
  31   char_t *source_path = argv[1];
  32
  33   fvec_t *vec = new_fvec(hop_size);
  34
  35   aubio_source_t* s = new_aubio_source(source_path, samplerate, hop_size);
  36   if (!s) { err = 1; goto beach; }
  37
  38   if (samplerate == 0 ) samplerate = aubio_source_get_samplerate(s);
  39
  40   do {
  41     aubio_source_do(s, vec, &read);
  42     //fvec_print (vec);
  43     n_frames += read;
  44   } while ( read == hop_size );
  45
  46   PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n",
  47       n_frames * 1. / samplerate,
  48       n_frames, samplerate,
  49       n_frames / hop_size, source_path);
  50
  51   old_n_frames_1 = n_frames;
  52
  53   aubio_source_seek (s, 0);
  54
  55   n_frames = 0;
  56   do {
  57     aubio_source_do(s, vec, &read);
  58     //fvec_print (vec);
  59     n_frames += read;
  60   } while ( read == hop_size );
  61
  62   PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n",
  63       n_frames * 1. / samplerate,
  64       n_frames, samplerate,
  65       n_frames / hop_size, source_path);
  66
  67   old_n_frames_2 = n_frames;
  68
  69   aubio_source_seek (s, old_n_frames_1 / 2);
  70
  71   n_frames = 0;
  72   do {
  73     aubio_source_do(s, vec, &read);
  74     //fvec_print (vec);
  75     n_frames += read;
  76   } while ( read == hop_size );
  77
  78   PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n",
  79       n_frames * 1. / samplerate,
  80       n_frames, samplerate,
  81       n_frames / hop_size, source_path);
  82
  83   old_n_frames_3 = n_frames;
  84
  85   del_aubio_source (s);
  86 beach:
  87   del_fvec (vec);
  88
  89   // check that we got exactly the same number of frames
  90   assert ( old_n_frames_2 == old_n_frames_1 );
  91   // check that we got about half the frames, with 3 decimals
  92   assert ( roundf(1.e3 * old_n_frames_1 / old_n_frames_3) / 1.e3 == 2.);
  93
  94   aubio_cleanup();
  95
  96   return err;
  97 }