shithub: aubio

Download patch

ref: e6cde322b11d5e95519b77f873c0c598032f2826
parent: 5e392e3e80fb6bc6de5c0508d55ae1a03fcec306
parent: 22df684f264cd993b14996a344f08041f6f0202e
author: Paul Brossier <piem@piem.org>
date: Fri Mar 22 08:25:39 EDT 2013

Merge branch 'synth' into develop

--- /dev/null
+++ b/tests/src/synth/test-sampler.c
@@ -1,0 +1,56 @@
+#include <aubio.h>
+#include "utils_tests.h"
+
+int main (int argc, char **argv)
+{
+  sint_t err = 0;
+
+  if (argc < 4) {
+    err = 2;
+    PRINT_ERR("not enough arguments\n");
+    PRINT_MSG("usage: %s <input_path> <output_path> <sample_path> [samplerate]\n", argv[0]);
+    return err;
+  }
+
+  uint_t samplerate = 0; // default is the samplerate of input_path
+  uint_t hop_size = 512;
+  uint_t n_frames = 0, read = 0;
+
+  char_t *source_path = argv[1];
+  char_t *sink_path = argv[2];
+  char_t *sample_path = argv[3];
+  if ( argc == 5 ) samplerate = atoi(argv[4]);
+
+  fvec_t *vec = new_fvec(hop_size);
+  aubio_source_t *source = new_aubio_source(source_path, samplerate, hop_size);
+  if (samplerate == 0 ) samplerate = aubio_source_get_samplerate(source);
+  aubio_sink_t *sink = new_aubio_sink(sink_path, samplerate);
+
+  aubio_sampler_t * sampler = new_aubio_sampler (samplerate, hop_size);
+
+  aubio_sampler_load (sampler, sample_path);
+
+  do {
+    aubio_source_do(source, vec, &read);
+    if (n_frames / hop_size == 10) {
+      aubio_sampler_play ( sampler );
+    }
+    if (n_frames / hop_size == 20) {
+      aubio_sampler_play ( sampler );
+    }
+    if (n_frames > 10.0 * samplerate) {
+      aubio_sampler_stop ( sampler );
+    }
+    aubio_sampler_do (sampler, vec, vec);
+    aubio_sink_do(sink, vec, read);
+    n_frames += read;
+  } while ( read == hop_size );
+
+  del_aubio_sampler(sampler);
+  del_aubio_source(source);
+  del_aubio_sink(sink);
+  del_fvec(vec);
+  aubio_cleanup();
+
+  return 0;
+}