annotate libtests/0010/prog1.c @ 497:9d8aee621afb api-inversion

More libtests fixups. Include audiodb_close() calls everywhere (whoops). Add the facility to run tests under valgrind. Unfortunately the error-exitcode flag doesn't actually cause an error exit if the only thing wrong is memory leaks, but it will if there are actual memory errors, which is a start.
author mas01cr
date Sat, 10 Jan 2009 16:07:43 +0000
parents 29d28cfe0222
children
rev   line source
mas01cr@487 1 #include "audioDB_API.h"
mas01cr@487 2 #include "test_utils_lib.h"
mas01ik@355 3
mas01cr@491 4 int main(int argc, char **argv) {
mas01cr@491 5 adb_t *adb;
mas01ik@355 6
mas01cr@491 7 clean_remove_db(TESTDB);
mas01cr@491 8 if(!(adb = audiodb_create(TESTDB, 0, 0, 0)))
mas01cr@491 9 return 1;
mas01cr@491 10 adb_datum_t datum1 = {1, 2, "testfeature01", (double[2]) {0, 1}};
mas01cr@491 11 adb_datum_t datum2 = {1, 2, "testfeature10", (double[2]) {1, 0}};
mas01cr@491 12 if(audiodb_insert_datum(adb, &datum1))
mas01cr@491 13 return 1;
mas01cr@491 14 if(audiodb_insert_datum(adb, &datum2))
mas01cr@491 15 return 1;
mas01cr@491 16 if(audiodb_l2norm(adb))
mas01cr@491 17 return 1;
mas01ik@355 18
mas01cr@491 19 adb_datum_t query = {1, 2, "testquery", (double[2]) {0, 0.5}};
mas01ik@355 20
mas01cr@491 21 adb_query_id_t qid = {0};
mas01cr@491 22 qid.datum = &query;
mas01cr@491 23 qid.sequence_length = 1;
mas01cr@491 24 qid.sequence_start = 0;
mas01cr@491 25 adb_query_parameters_t parms =
mas01cr@491 26 {ADB_ACCUMULATION_PER_TRACK, ADB_DISTANCE_EUCLIDEAN_NORMED, 10, 10};
mas01cr@491 27 adb_query_refine_t refine = {0};
mas01cr@491 28 refine.flags |= ADB_REFINE_RADIUS;
mas01cr@491 29 refine.radius = 5;
mas01cr@491 30 refine.hopsize = 1;
mas01ik@355 31
mas01cr@491 32 adb_query_spec_t spec;
mas01cr@491 33 spec.qid = qid;
mas01cr@491 34 spec.params = parms;
mas01cr@491 35 spec.refine = refine;
mas01ik@355 36
mas01cr@491 37 adb_query_results_t *results = audiodb_query_spec(adb, &spec);
mas01cr@491 38 if(!results || results->nresults != 2) return 1;
mas01cr@491 39 result_present_or_fail(results, "testfeature01", 0, 0, 0);
mas01cr@491 40 result_present_or_fail(results, "testfeature10", 2, 0, 0);
mas01cr@491 41 audiodb_query_free_results(adb, &spec, results);
mas01cr@491 42
mas01cr@491 43 /* the test in the original test suite for
mas01cr@491 44 * audioDB-the-command-line-program alters the parms.ntracks, which
mas01cr@491 45 * is not very meaningful in this context (given that we don't do
mas01cr@491 46 * aggregation, but simply return valid points); here instead we
mas01cr@491 47 * check that radius filtering works. */
mas01cr@491 48 spec.refine.radius = 1;
mas01cr@491 49 results = audiodb_query_spec(adb, &spec);
mas01cr@491 50 if(!results || results->nresults != 1) return 1;
mas01cr@491 51 result_present_or_fail(results, "testfeature01", 0, 0, 0);
mas01cr@491 52 audiodb_query_free_results(adb, &spec, results);
mas01ik@355 53
mas01cr@491 54 spec.qid.datum->data = (double[2]) {0.5, 0};
mas01cr@491 55 spec.refine.radius = 5;
mas01cr@491 56 results = audiodb_query_spec(adb, &spec);
mas01cr@491 57 if(!results || results->nresults != 2) return 1;
mas01cr@491 58 result_present_or_fail(results, "testfeature10", 0, 0, 0);
mas01cr@491 59 result_present_or_fail(results, "testfeature01", 2, 0, 0);
mas01cr@491 60 audiodb_query_free_results(adb, &spec, results);
mas01ik@355 61
mas01cr@491 62 spec.refine.radius = 1;
mas01cr@491 63 results = audiodb_query_spec(adb, &spec);
mas01cr@491 64 if(!results || results->nresults != 1) return 1;
mas01cr@491 65 result_present_or_fail(results, "testfeature10", 0, 0, 0);
mas01cr@491 66 audiodb_query_free_results(adb, &spec, results);
mas01ik@355 67
mas01cr@497 68 audiodb_close(adb);
mas01cr@497 69
mas01cr@491 70 return 104;
mas01ik@355 71 }