[f4db0e73] | 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; |
---|
[54e74f0] | 25 | uint_t old_n_frames_1 = 0, old_n_frames_2 = 0, old_n_frames_3 = 0; |
---|
[f4db0e73] | 26 | if ( argc == 3 ) samplerate = atoi(argv[2]); |
---|
| 27 | if ( argc == 4 ) hop_size = atoi(argv[3]); |
---|
| 28 | |
---|
| 29 | char_t *source_path = argv[1]; |
---|
| 30 | |
---|
| 31 | fvec_t *vec = new_fvec(hop_size); |
---|
| 32 | |
---|
| 33 | aubio_source_t* s = new_aubio_source(source_path, samplerate, hop_size); |
---|
| 34 | if (!s) { err = 1; goto beach; } |
---|
| 35 | |
---|
| 36 | if (samplerate == 0 ) samplerate = aubio_source_get_samplerate(s); |
---|
| 37 | |
---|
| 38 | do { |
---|
| 39 | aubio_source_do(s, vec, &read); |
---|
| 40 | //fvec_print (vec); |
---|
| 41 | n_frames += read; |
---|
| 42 | } while ( read == hop_size ); |
---|
| 43 | |
---|
[08bd8e0] | 44 | PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n", |
---|
| 45 | n_frames * 1. / samplerate, |
---|
| 46 | n_frames, samplerate, |
---|
| 47 | n_frames / hop_size, source_path); |
---|
| 48 | |
---|
| 49 | old_n_frames_1 = n_frames; |
---|
[f4db0e73] | 50 | |
---|
| 51 | aubio_source_seek (s, 0); |
---|
| 52 | |
---|
[08bd8e0] | 53 | n_frames = 0; |
---|
| 54 | do { |
---|
| 55 | aubio_source_do(s, vec, &read); |
---|
| 56 | //fvec_print (vec); |
---|
| 57 | n_frames += read; |
---|
| 58 | } while ( read == hop_size ); |
---|
| 59 | |
---|
| 60 | PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n", |
---|
| 61 | n_frames * 1. / samplerate, |
---|
| 62 | n_frames, samplerate, |
---|
| 63 | n_frames / hop_size, source_path); |
---|
| 64 | |
---|
| 65 | old_n_frames_2 = n_frames; |
---|
| 66 | |
---|
[3a00b1e7] | 67 | aubio_source_seek (s, old_n_frames_1 / 2); |
---|
[3286230] | 68 | |
---|
[f4db0e73] | 69 | n_frames = 0; |
---|
| 70 | do { |
---|
| 71 | aubio_source_do(s, vec, &read); |
---|
| 72 | //fvec_print (vec); |
---|
| 73 | n_frames += read; |
---|
| 74 | } while ( read == hop_size ); |
---|
| 75 | |
---|
[08bd8e0] | 76 | PRINT_MSG("read %.2fs, %d frames at %dHz (%d blocks) from %s\n", |
---|
| 77 | n_frames * 1. / samplerate, |
---|
| 78 | n_frames, samplerate, |
---|
| 79 | n_frames / hop_size, source_path); |
---|
| 80 | |
---|
| 81 | old_n_frames_3 = n_frames; |
---|
[f4db0e73] | 82 | |
---|
| 83 | del_aubio_source (s); |
---|
| 84 | beach: |
---|
| 85 | del_fvec (vec); |
---|
| 86 | |
---|
[7bb5cef] | 87 | // check that we got exactly the same number of frames |
---|
[08bd8e0] | 88 | assert ( old_n_frames_2 == old_n_frames_1 ); |
---|
[7bb5cef] | 89 | // check that we got about half the frames, with 3 decimals |
---|
| 90 | assert ( roundf(1.e3 * old_n_frames_1 / old_n_frames_3) / 1.e3 == 2.); |
---|
[f4db0e73] | 91 | return err; |
---|
| 92 | } |
---|