tests/src/io/test-source_seek.c: add source_seek test
[aubio.git] / 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   uint_t err = 0;
7   if (argc < 2) {
8     err = 2;
9     PRINT_ERR("not enough arguments\n");
10     PRINT_MSG("read a wave file as a mono vector\n");
11     PRINT_MSG("usage: %s <source_path> [samplerate] [hop_size]\n", argv[0]);
12     PRINT_MSG("examples:\n");
13     PRINT_MSG(" - read file.wav at original samplerate\n");
14     PRINT_MSG("       %s file.wav\n", argv[0]);
15     PRINT_MSG(" - read file.wav at 32000Hz\n");
16     PRINT_MSG("       %s file.aif 32000\n", argv[0]);
17     PRINT_MSG(" - read file.wav at original samplerate with 4096 blocks\n");
18     PRINT_MSG("       %s file.wav 0 4096 \n", argv[0]);
19     return err;
20   }
21
22   uint_t samplerate = 0;
23   uint_t hop_size = 256;
24   uint_t n_frames = 0, read = 0;
25   if ( argc == 3 ) samplerate = atoi(argv[2]);
26   if ( argc == 4 ) hop_size = atoi(argv[3]);
27
28   char_t *source_path = argv[1];
29
30   fvec_t *vec = new_fvec(hop_size);
31
32   aubio_source_t* s = new_aubio_source(source_path, samplerate, hop_size);
33   if (!s) { err = 1; goto beach; }
34
35   if (samplerate == 0 ) samplerate = aubio_source_get_samplerate(s);
36
37   do {
38     aubio_source_do(s, vec, &read);
39     //fvec_print (vec);
40     n_frames += read;
41   } while ( read == hop_size );
42
43   PRINT_MSG("read %d frames at %dHz (%d blocks) from %s\n", n_frames, samplerate,
44     n_frames / hop_size, source_path);
45
46   aubio_source_seek (s, 0);
47
48   n_frames = 0;
49   do {
50     aubio_source_do(s, vec, &read);
51     //fvec_print (vec);
52     n_frames += read;
53   } while ( read == hop_size );
54
55   PRINT_MSG("read %d frames at %dHz (%d blocks) from %s\n", n_frames, samplerate,
56     n_frames / hop_size, source_path);
57
58   del_aubio_source (s);
59 beach:
60   del_fvec (vec);
61
62   return err;
63 }