[tests] factorise source tests
[aubio.git] / tests / src / io / test-source_multi.c
1 #include <aubio.h>
2 #include "utils_tests.h"
3
4 int main (int argc, char **argv)
5 {
6   sint_t err = 0;
7   if (argc < 2) {
8     PRINT_ERR("not enough arguments, running tests\n");
9     err = run_on_default_source(main);
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     PRINT_MSG(" - read file.wav at original samplerate with 256 frames blocks, mono\n");
20     PRINT_MSG("       %s file.wav 0 4096 1\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 n_channels = 0;
28   if ( argc >= 3 ) samplerate = atoi(argv[2]);
29   if ( argc >= 4 ) hop_size   = atoi(argv[3]);
30   if ( argc >= 5 ) n_channels = atoi(argv[4]);
31
32   char_t *source_path = argv[1];
33
34   aubio_source_t* s = new_aubio_source(source_path, samplerate, hop_size);
35   if (!s) { err = -1; goto beach; }
36
37   if ( samplerate == 0 ) samplerate = aubio_source_get_samplerate(s);
38
39   if ( n_channels == 0 ) n_channels = aubio_source_get_channels(s);
40
41   fmat_t *mat = new_fmat(n_channels, hop_size);
42
43   do {
44     aubio_source_do_multi (s, mat, &read);
45     fmat_print (mat);
46     n_frames += read;
47   } while ( read == hop_size );
48
49   PRINT_MSG("read %d frames in %d channels at %dHz (%d blocks) from %s\n",
50       n_frames, n_channels, samplerate, n_frames / hop_size, source_path);
51
52   del_fmat (mat);
53   del_aubio_source (s);
54 beach:
55
56   return err;
57 }