annotate query.cpp @ 589:9119f2fa3efe

Header file rearrangement Make it so that lshlib.h is slightly more like a header file to include to use the LSH ("class G") class, and slightly less a header file for developing that class, by removing all the #includes and moving them to the one-file lshlib.cpp instead. Make audioDB-internals.h slightly more of a project header file, by including there all the headers we actually need. Remove some assert()s (which do nothing) and some Uns32Ts (-> uint32_t)
author mas01cr
date Tue, 11 Aug 2009 21:42:13 +0000
parents 633614461994
children 6ad0a6e67d4c
rev   line source
mas01cr@509 1 extern "C" {
mas01cr@509 2 #include "audioDB_API.h"
mas01cr@509 3 }
mas01cr@498 4 #include "audioDB-internals.h"
mas01cr@498 5 #include "accumulators.h"
mas01cr@239 6
mas01cr@498 7 bool audiodb_powers_acceptable(const adb_query_refine_t *r, double p1, double p2) {
mas01cr@498 8 if (r->flags & ADB_REFINE_ABSOLUTE_THRESHOLD) {
mas01cr@498 9 if ((p1 < r->absolute_threshold) || (p2 < r->absolute_threshold)) {
mas01cr@239 10 return false;
mas01cr@239 11 }
mas01cr@239 12 }
mas01cr@498 13 if (r->flags & ADB_REFINE_RELATIVE_THRESHOLD) {
mas01cr@498 14 if (fabs(p1-p2) > fabs(r->relative_threshold)) {
mas01cr@239 15 return false;
mas01cr@239 16 }
mas01cr@239 17 }
mas01cr@239 18 return true;
mas01cr@239 19 }
mas01cr@239 20
mas01cr@498 21 adb_query_results_t *audiodb_query_spec(adb_t *adb, const adb_query_spec_t *qspec) {
mas01cr@498 22 adb_qstate_internal_t qstate = {0};
mas01cr@498 23 qstate.allowed_keys = new std::set<std::string>;
mas01cr@498 24 adb_query_results_t *results;
mas01cr@498 25 if(qspec->refine.flags & ADB_REFINE_INCLUDE_KEYLIST) {
mas01cr@498 26 for(unsigned int k = 0; k < qspec->refine.include.nkeys; k++) {
mas01cr@498 27 qstate.allowed_keys->insert(qspec->refine.include.keys[k]);
mas01cr@498 28 }
mas01cr@498 29 } else {
mas01cr@498 30 for(unsigned int k = 0; k < adb->header->numFiles; k++) {
mas01cr@498 31 qstate.allowed_keys->insert((*adb->keys)[k]);
mas01cr@498 32 }
mas01cr@498 33 }
mas01cr@498 34 if(qspec->refine.flags & ADB_REFINE_EXCLUDE_KEYLIST) {
mas01cr@498 35 for(unsigned int k = 0; k < qspec->refine.exclude.nkeys; k++) {
mas01cr@498 36 qstate.allowed_keys->erase(qspec->refine.exclude.keys[k]);
mas01cr@498 37 }
mas01cr@498 38 }
mas01mc@292 39
mas01cr@498 40 switch(qspec->params.distance) {
mas01cr@498 41 case ADB_DISTANCE_DOT_PRODUCT:
mas01cr@498 42 switch(qspec->params.accumulation) {
mas01cr@498 43 case ADB_ACCUMULATION_DB:
mas01cr@498 44 qstate.accumulator = new DBAccumulator<adb_result_dist_gt>(qspec->params.npoints);
mas01cr@498 45 break;
mas01cr@498 46 case ADB_ACCUMULATION_PER_TRACK:
mas01cr@498 47 qstate.accumulator = new PerTrackAccumulator<adb_result_dist_gt>(qspec->params.npoints, qspec->params.ntracks);
mas01cr@498 48 break;
mas01cr@498 49 case ADB_ACCUMULATION_ONE_TO_ONE:
mas01cr@498 50 qstate.accumulator = new NearestAccumulator<adb_result_dist_gt>();
mas01cr@498 51 break;
mas01cr@498 52 default:
mas01cr@498 53 goto error;
mas01cr@239 54 }
mas01cr@239 55 break;
mas01cr@498 56 case ADB_DISTANCE_EUCLIDEAN_NORMED:
mas01cr@498 57 case ADB_DISTANCE_EUCLIDEAN:
mas01cr@498 58 switch(qspec->params.accumulation) {
mas01cr@498 59 case ADB_ACCUMULATION_DB:
mas01cr@498 60 qstate.accumulator = new DBAccumulator<adb_result_dist_lt>(qspec->params.npoints);
mas01cr@498 61 break;
mas01cr@498 62 case ADB_ACCUMULATION_PER_TRACK:
mas01cr@498 63 qstate.accumulator = new PerTrackAccumulator<adb_result_dist_lt>(qspec->params.npoints, qspec->params.ntracks);
mas01cr@498 64 break;
mas01cr@498 65 case ADB_ACCUMULATION_ONE_TO_ONE:
mas01cr@498 66 qstate.accumulator = new NearestAccumulator<adb_result_dist_lt>();
mas01cr@498 67 break;
mas01cr@498 68 default:
mas01cr@498 69 goto error;
mas01mc@263 70 }
mas01mc@263 71 break;
mas01cr@239 72 default:
mas01cr@498 73 goto error;
mas01mc@329 74 }
mas01cr@498 75
mas01cr@498 76 if((qspec->refine.flags & ADB_REFINE_RADIUS) && audiodb_index_exists(adb->path, qspec->refine.radius, qspec->qid.sequence_length)) {
mas01cr@498 77 if(audiodb_index_query_loop(adb, qspec, &qstate) < 0) {
mas01cr@498 78 goto error;
mas01cr@498 79 }
mas01cr@498 80 } else {
mas01cr@498 81 if(audiodb_query_loop(adb, qspec, &qstate)) {
mas01cr@498 82 goto error;
mas01cr@498 83 }
mas01mc@329 84 }
mas01mc@292 85
mas01cr@498 86 results = qstate.accumulator->get_points();
mas01cr@498 87
mas01cr@498 88 delete qstate.accumulator;
mas01cr@498 89 delete qstate.allowed_keys;
mas01cr@498 90
mas01cr@498 91 return results;
mas01cr@498 92
mas01cr@498 93 error:
mas01cr@498 94 if(qstate.accumulator)
mas01cr@498 95 delete qstate.accumulator;
mas01cr@498 96 if(qstate.allowed_keys)
mas01cr@498 97 delete qstate.allowed_keys;
mas01cr@498 98 return NULL;
mas01cr@239 99 }
mas01cr@239 100
mas01cr@498 101 int audiodb_query_free_results(adb_t *adb, const adb_query_spec_t *spec, adb_query_results_t *rs) {
mas01cr@498 102 free(rs->results);
mas01cr@498 103 free(rs);
mas01cr@498 104 return 0;
mas01cr@239 105 }
mas01cr@239 106
mas01cr@589 107 /* FIXME: we should check the return values from allocation */
mas01cr@498 108 static void audiodb_initialize_arrays(adb_t *adb, const adb_query_spec_t *spec, int track, unsigned int numVectors, double *query, double *data_buffer, double **D, double **DD) {
mas01cr@239 109 unsigned int j, k, l, w;
mas01cr@239 110 double *dp, *qp, *sp;
mas01cr@239 111
mas01cr@498 112 const unsigned HOP_SIZE = spec->refine.hopsize;
mas01cr@498 113 const unsigned wL = spec->qid.sequence_length;
mas01cr@239 114
mas01cr@239 115 for(j = 0; j < numVectors; j++) {
mas01cr@239 116 // Sum products matrix
mas01cr@498 117 D[j] = new double[(*adb->track_lengths)[track]];
mas01cr@239 118 // Matched filter matrix
mas01cr@498 119 DD[j]=new double[(*adb->track_lengths)[track]];
mas01cr@239 120 }
mas01cr@239 121
mas01cr@239 122 // Dot product
mas01cr@239 123 for(j = 0; j < numVectors; j++)
mas01cr@498 124 for(k = 0; k < (*adb->track_lengths)[track]; k++){
mas01cr@498 125 qp = query + j * adb->header->dim;
mas01cr@498 126 sp = data_buffer + k * adb->header->dim;
mas01cr@239 127 DD[j][k] = 0.0; // Initialize matched filter array
mas01cr@239 128 dp = &D[j][k]; // point to correlation cell j,k
mas01cr@239 129 *dp = 0.0; // initialize correlation cell
mas01cr@498 130 l = adb->header->dim; // size of vectors
mas01cr@239 131 while(l--)
mas01cr@239 132 *dp += *qp++ * *sp++;
mas01cr@239 133 }
mas01cr@239 134
mas01cr@239 135 // Matched Filter
mas01cr@239 136 // HOP SIZE == 1
mas01cr@239 137 double* spd;
mas01cr@239 138 if(HOP_SIZE == 1) { // HOP_SIZE = shingleHop
mas01cr@239 139 for(w = 0; w < wL; w++) {
mas01cr@239 140 for(j = 0; j < numVectors - w; j++) {
mas01cr@239 141 sp = DD[j];
mas01cr@239 142 spd = D[j+w] + w;
mas01cr@498 143 k = (*adb->track_lengths)[track] - w;
mas01mc@292 144 while(k--)
mas01mc@292 145 *sp++ += *spd++;
mas01cr@239 146 }
mas01cr@239 147 }
mas01cr@239 148 } else { // HOP_SIZE != 1
mas01cr@239 149 for(w = 0; w < wL; w++) {
mas01cr@239 150 for(j = 0; j < numVectors - w; j += HOP_SIZE) {
mas01cr@239 151 sp = DD[j];
mas01cr@239 152 spd = D[j+w]+w;
mas01cr@498 153 for(k = 0; k < (*adb->track_lengths)[track] - w; k += HOP_SIZE) {
mas01cr@239 154 *sp += *spd;
mas01cr@239 155 sp += HOP_SIZE;
mas01cr@239 156 spd += HOP_SIZE;
mas01cr@239 157 }
mas01cr@239 158 }
mas01cr@239 159 }
mas01cr@239 160 }
mas01cr@239 161 }
mas01cr@239 162
mas01cr@498 163 static void audiodb_delete_arrays(int track, unsigned int numVectors, double **D, double **DD) {
mas01cr@239 164 if(D != NULL) {
mas01cr@239 165 for(unsigned int j = 0; j < numVectors; j++) {
mas01cr@239 166 delete[] D[j];
mas01cr@239 167 }
mas01cr@239 168 }
mas01cr@239 169 if(DD != NULL) {
mas01cr@239 170 for(unsigned int j = 0; j < numVectors; j++) {
mas01cr@239 171 delete[] DD[j];
mas01cr@239 172 }
mas01cr@239 173 }
mas01cr@239 174 }
mas01cr@239 175
mas01cr@498 176 int audiodb_read_data(adb_t *adb, int trkfid, int track, double **data_buffer_p, size_t *data_buffer_size_p) {
mas01cr@498 177 uint32_t track_length = (*adb->track_lengths)[track];
mas01cr@498 178 size_t track_size = track_length * sizeof(double) * adb->header->dim;
mas01cr@498 179 if (track_size > *data_buffer_size_p) {
mas01cr@239 180 if(*data_buffer_p) {
mas01cr@239 181 free(*data_buffer_p);
mas01cr@239 182 }
mas01cr@239 183 {
mas01cr@498 184 *data_buffer_size_p = track_size;
mas01cr@498 185 void *tmp = malloc(track_size);
mas01cr@239 186 if (tmp == NULL) {
mas01cr@498 187 goto error;
mas01cr@239 188 }
mas01cr@239 189 *data_buffer_p = (double *) tmp;
mas01cr@239 190 }
mas01cr@239 191 }
mas01cr@239 192
mas01cr@498 193 read_or_goto_error(trkfid, *data_buffer_p, track_size);
mas01cr@498 194 return 0;
mas01cr@498 195
mas01cr@498 196 error:
mas01cr@498 197 return 1;
mas01cr@239 198 }
mas01cr@239 199
mas01cr@498 200 int audiodb_track_id_datum(adb_t *adb, uint32_t track_id, adb_datum_t *d) {
mas01cr@498 201 off_t track_offset = (*adb->track_offsets)[track_id];
mas01cr@509 202 if(adb->header->flags & ADB_HEADER_FLAG_REFERENCES) {
mas01cr@498 203 /* create a reference/insert, then use adb_insert_create_datum() */
mas01cr@498 204 adb_reference_t reference = {0};
mas01cr@509 205 char features[ADB_MAXSTR], power[ADB_MAXSTR], times[ADB_MAXSTR];
mas01cr@509 206 lseek(adb->fd, adb->header->dataOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01cr@509 207 read_or_goto_error(adb->fd, features, ADB_MAXSTR);
mas01cr@498 208 reference.features = features;
mas01cr@509 209 if(adb->header->flags & ADB_HEADER_FLAG_POWER) {
mas01cr@509 210 lseek(adb->fd, adb->header->powerTableOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01cr@509 211 read_or_goto_error(adb->fd, power, ADB_MAXSTR);
mas01cr@498 212 reference.power = power;
mas01cr@498 213 }
mas01cr@509 214 if(adb->header->flags & ADB_HEADER_FLAG_TIMES) {
mas01cr@509 215 lseek(adb->fd, adb->header->timesTableOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01cr@509 216 read_or_goto_error(adb->fd, times, ADB_MAXSTR);
mas01cr@498 217 reference.times = times;
mas01cr@498 218 }
mas01cr@498 219 return audiodb_insert_create_datum(&reference, d);
mas01cr@498 220 } else {
mas01cr@498 221 /* initialize from sources of data that we already have */
mas01cr@498 222 d->nvectors = (*adb->track_lengths)[track_id];
mas01cr@498 223 d->dim = adb->header->dim;
mas01cr@498 224 d->key = (*adb->keys)[track_id].c_str();
mas01cr@498 225 /* read out stuff from the database tables */
mas01cr@498 226 d->data = (double *) malloc(d->nvectors * d->dim * sizeof(double));
mas01cr@498 227 lseek(adb->fd, adb->header->dataOffset + track_offset, SEEK_SET);
mas01cr@498 228 read_or_goto_error(adb->fd, d->data, d->nvectors * d->dim * sizeof(double));
mas01cr@509 229 if(adb->header->flags & ADB_HEADER_FLAG_POWER) {
mas01cr@498 230 d->power = (double *) malloc(d->nvectors * sizeof(double));
mas01cr@498 231 lseek(adb->fd, adb->header->powerTableOffset + track_offset / d->dim, SEEK_SET);
mas01cr@498 232 read_or_goto_error(adb->fd, d->power, d->nvectors * sizeof(double));
mas01cr@498 233 }
mas01cr@509 234 if(adb->header->flags & ADB_HEADER_FLAG_TIMES) {
mas01cr@498 235 d->times = (double *) malloc(2 * d->nvectors * sizeof(double));
mas01cr@498 236 lseek(adb->fd, adb->header->timesTableOffset + track_offset / d->dim, SEEK_SET);
mas01cr@498 237 read_or_goto_error(adb->fd, d->times, 2 * d->nvectors * sizeof(double));
mas01cr@498 238 }
mas01cr@498 239 return 0;
mas01cr@498 240 }
mas01cr@498 241 error:
mas01cr@580 242 audiodb_really_free_datum(d);
mas01cr@498 243 return 1;
mas01cr@498 244 }
mas01mc@292 245
mas01cr@498 246 int audiodb_datum_qpointers(adb_datum_t *d, uint32_t sequence_length, double **vector_data, double **vector, adb_qpointers_internal_t *qpointers) {
mas01cr@498 247 uint32_t nvectors = d->nvectors;
mas01cr@498 248
mas01cr@498 249 qpointers->nvectors = nvectors;
mas01cr@498 250
mas01cr@498 251 size_t vector_size = nvectors * sizeof(double) * d->dim;
mas01cr@498 252 *vector_data = new double[vector_size];
mas01cr@498 253 memcpy(*vector_data, d->data, vector_size);
mas01cr@498 254
mas01cr@498 255 qpointers->l2norm_data = new double[vector_size / d->dim];
mas01cr@498 256 audiodb_l2norm_buffer(*vector_data, d->dim, nvectors, qpointers->l2norm_data);
mas01cr@498 257 audiodb_sequence_sum(qpointers->l2norm_data, nvectors, sequence_length);
mas01cr@498 258 audiodb_sequence_sqrt(qpointers->l2norm_data, nvectors, sequence_length);
mas01cr@498 259
mas01cr@498 260 if(d->power) {
mas01cr@498 261 qpointers->power_data = new double[vector_size / d->dim];
mas01cr@498 262 memcpy(qpointers->power_data, d->power, vector_size / d->dim);
mas01cr@498 263 audiodb_sequence_sum(qpointers->power_data, nvectors, sequence_length);
mas01cr@498 264 audiodb_sequence_average(qpointers->power_data, nvectors, sequence_length);
mas01cr@239 265 }
mas01cr@239 266
mas01cr@498 267 if(d->times) {
mas01cr@498 268 qpointers->mean_duration = new double[1];
mas01cr@498 269 *qpointers->mean_duration = 0;
mas01cr@498 270 for(unsigned int k = 0; k < nvectors; k++) {
mas01cr@498 271 *qpointers->mean_duration += d->times[2*k+1] - d->times[2*k];
mas01cr@239 272 }
mas01cr@498 273 *qpointers->mean_duration /= nvectors;
mas01cr@239 274 }
mas01cr@239 275
mas01cr@498 276 *vector = *vector_data;
mas01cr@498 277 qpointers->l2norm = qpointers->l2norm_data;
mas01cr@498 278 qpointers->power = qpointers->power_data;
mas01cr@498 279 return 0;
mas01cr@498 280 }
mas01cr@498 281
mas01cr@498 282 int audiodb_query_spec_qpointers(adb_t *adb, const adb_query_spec_t *spec, double **vector_data, double **vector, adb_qpointers_internal_t *qpointers) {
mas01cr@498 283 adb_datum_t *datum;
mas01cr@498 284 adb_datum_t d = {0};
mas01cr@498 285 uint32_t sequence_length;
mas01cr@498 286 uint32_t sequence_start;
mas01cr@498 287
mas01cr@498 288 datum = spec->qid.datum;
mas01cr@498 289 sequence_length = spec->qid.sequence_length;
mas01cr@498 290 sequence_start = spec->qid.sequence_start;
mas01cr@498 291
mas01cr@498 292 if(datum->data) {
mas01cr@498 293 if(datum->dim != adb->header->dim) {
mas01cr@498 294 return 1;
mas01cr@239 295 }
mas01cr@498 296 /* initialize d, and mark that nothing needs freeing later. */
mas01cr@498 297 d = *datum;
mas01cr@498 298 datum = &d;
mas01cr@498 299 } else if (datum->key) {
mas01cr@498 300 uint32_t track_id;
mas01cr@498 301 if((track_id = audiodb_key_index(adb, datum->key)) == (uint32_t) -1) {
mas01cr@498 302 return 1;
mas01cr@498 303 }
mas01cr@498 304 audiodb_track_id_datum(adb, track_id, &d);
mas01cr@498 305 } else {
mas01cr@498 306 return 1;
mas01cr@239 307 }
mas01cr@239 308
mas01cr@498 309 /* FIXME: check the overflow logic here */
mas01cr@498 310 if(sequence_start + sequence_length > d.nvectors) {
mas01cr@498 311 if(datum != &d) {
mas01cr@580 312 audiodb_really_free_datum(&d);
mas01cr@498 313 }
mas01cr@498 314 return 1;
mas01cr@498 315 }
mas01cr@239 316
mas01cr@498 317 audiodb_datum_qpointers(&d, sequence_length, vector_data, vector, qpointers);
mas01cr@498 318
mas01cr@498 319 /* Finally, if applicable, set up the moving qpointers. */
mas01cr@498 320 if(spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) {
mas01cr@498 321 /* the qpointers are already at the start, and so correct. */
mas01cr@498 322 } else {
mas01cr@498 323 /* adjust the qpointers to point to the correct place in the sequence */
mas01cr@498 324 *vector = *vector_data + spec->qid.sequence_start * d.dim;
mas01cr@498 325 qpointers->l2norm = qpointers->l2norm_data + spec->qid.sequence_start;
mas01cr@498 326 if(d.power) {
mas01cr@498 327 qpointers->power = qpointers->power_data + spec->qid.sequence_start;
mas01cr@239 328 }
mas01cr@498 329 qpointers->nvectors = sequence_length;
mas01cr@239 330 }
mas01cr@498 331
mas01cr@498 332 /* Clean up: free any bits of datum that we have ourselves
mas01cr@498 333 * allocated. */
mas01cr@498 334 if(datum != &d) {
mas01cr@580 335 audiodb_really_free_datum(&d);
mas01cr@498 336 }
mas01cr@498 337
mas01cr@498 338 return 0;
mas01cr@239 339 }
mas01cr@239 340
mas01cr@498 341 static int audiodb_set_up_dbpointers(adb_t *adb, const adb_query_spec_t *spec, adb_qpointers_internal_t *dbpointers) {
mas01cr@498 342 uint32_t nvectors = adb->header->length / (adb->header->dim * sizeof(double));
mas01cr@498 343 uint32_t sequence_length = spec->qid.sequence_length;
mas01mc@292 344
mas01cr@498 345 bool using_power = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@498 346 bool using_times = spec->refine.flags & ADB_REFINE_DURATION_RATIO;
mas01cr@498 347 double *times_table = NULL;
mas01cr@498 348
mas01cr@498 349
mas01cr@498 350 dbpointers->nvectors = nvectors;
mas01cr@498 351 dbpointers->l2norm_data = new double[nvectors];
mas01cr@498 352
mas01cr@498 353 double *snpp = dbpointers->l2norm_data, *sppp = 0;
mas01cr@498 354 lseek(adb->fd, adb->header->l2normTableOffset, SEEK_SET);
mas01cr@498 355 read_or_goto_error(adb->fd, dbpointers->l2norm_data, nvectors * sizeof(double));
mas01cr@498 356
mas01cr@498 357 if (using_power) {
mas01cr@509 358 if (!(adb->header->flags & ADB_HEADER_FLAG_POWER)) {
mas01cr@498 359 goto error;
mas01cr@498 360 }
mas01cr@498 361 dbpointers->power_data = new double[nvectors];
mas01cr@498 362 sppp = dbpointers->power_data;
mas01cr@498 363 lseek(adb->fd, adb->header->powerTableOffset, SEEK_SET);
mas01cr@498 364 read_or_goto_error(adb->fd, dbpointers->power_data, nvectors * sizeof(double));
mas01mc@292 365 }
mas01mc@292 366
mas01cr@498 367 for(unsigned int i = 0; i < adb->header->numFiles; i++){
mas01cr@498 368 size_t track_length = (*adb->track_lengths)[i];
mas01cr@498 369 if(track_length >= sequence_length) {
mas01cr@498 370 audiodb_sequence_sum(snpp, track_length, sequence_length);
mas01cr@498 371 audiodb_sequence_sqrt(snpp, track_length, sequence_length);
mas01cr@498 372 if (using_power) {
mas01cr@498 373 audiodb_sequence_sum(sppp, track_length, sequence_length);
mas01cr@498 374 audiodb_sequence_average(sppp, track_length, sequence_length);
mas01cr@498 375 }
mas01mc@324 376 }
mas01cr@498 377 snpp += track_length;
mas01cr@498 378 if (using_power) {
mas01cr@498 379 sppp += track_length;
mas01mc@324 380 }
mas01mc@292 381 }
mas01mc@292 382
mas01cr@498 383 if (using_times) {
mas01cr@509 384 if(!(adb->header->flags & ADB_HEADER_FLAG_TIMES)) {
mas01cr@498 385 goto error;
mas01cr@498 386 }
mas01mc@292 387
mas01cr@498 388 dbpointers->mean_duration = new double[adb->header->numFiles];
mas01cr@498 389
mas01cr@498 390 times_table = (double *) malloc(2 * nvectors * sizeof(double));
mas01cr@498 391 if(!times_table) {
mas01cr@498 392 goto error;
mas01cr@498 393 }
mas01cr@498 394 lseek(adb->fd, adb->header->timesTableOffset, SEEK_SET);
mas01cr@498 395 read_or_goto_error(adb->fd, times_table, 2 * nvectors * sizeof(double));
mas01cr@498 396 for(unsigned int k = 0; k < adb->header->numFiles; k++) {
mas01cr@498 397 size_t track_length = (*adb->track_lengths)[k];
mas01cr@498 398 unsigned int j;
mas01cr@498 399 dbpointers->mean_duration[k] = 0.0;
mas01cr@498 400 for(j = 0; j < track_length; j++) {
mas01cr@498 401 dbpointers->mean_duration[k] += times_table[2*j+1] - times_table[2*j];
mas01mc@292 402 }
mas01cr@498 403 dbpointers->mean_duration[k] /= j;
mas01mc@292 404 }
mas01cr@498 405
mas01cr@498 406 free(times_table);
mas01cr@498 407 times_table = NULL;
mas01mc@292 408 }
mas01cr@498 409
mas01cr@498 410 dbpointers->l2norm = dbpointers->l2norm_data;
mas01cr@498 411 dbpointers->power = dbpointers->power_data;
mas01cr@498 412 return 0;
mas01cr@498 413
mas01cr@498 414 error:
mas01cr@498 415 if(dbpointers->l2norm_data) {
mas01cr@498 416 delete [] dbpointers->l2norm_data;
mas01cr@498 417 }
mas01cr@498 418 if(dbpointers->power_data) {
mas01cr@498 419 delete [] dbpointers->power_data;
mas01cr@498 420 }
mas01cr@498 421 if(dbpointers->mean_duration) {
mas01cr@498 422 delete [] dbpointers->mean_duration;
mas01cr@498 423 }
mas01cr@498 424 if(times_table) {
mas01cr@498 425 free(times_table);
mas01cr@498 426 }
mas01cr@498 427 return 1;
mas01cr@498 428
mas01mc@292 429 }
mas01mc@292 430
mas01cr@498 431 int audiodb_query_queue_loop(adb_t *adb, const adb_query_spec_t *spec, adb_qstate_internal_t *qstate, double *query, adb_qpointers_internal_t *qpointers) {
mas01cr@498 432 adb_qpointers_internal_t dbpointers = {0};
mas01mc@292 433
mas01cr@498 434 uint32_t sequence_length = spec->qid.sequence_length;
mas01cr@498 435 bool power_refine = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@239 436
mas01cr@498 437 if(qstate->exact_evaluation_queue->size() == 0) {
mas01cr@498 438 return 0;
mas01cr@239 439 }
mas01cr@239 440
mas01cr@498 441 /* We are guaranteed that the order of points is sorted by:
mas01cr@498 442 * {trackID, spos, qpos} so we can be relatively efficient in
mas01cr@498 443 * initialization of track data. We assume that points usually
mas01cr@498 444 * don't overlap, so we will use exhaustive dot product evaluation
mas01cr@498 445 * (instead of memoization of partial sums, as in query_loop()).
mas01cr@498 446 */
mas01cr@498 447 double dist;
mas01cr@498 448 double *dbdata = 0, *dbdata_pointer;
mas01cr@589 449 uint32_t currentTrack = 0x80000000; // KLUDGE: Initialize with a value outside of track index range
mas01cr@589 450 uint32_t npairs = qstate->exact_evaluation_queue->size();
mas01cr@498 451 while(npairs--) {
mas01cr@498 452 PointPair pp = qstate->exact_evaluation_queue->top();
mas01cr@498 453 if(currentTrack != pp.trackID) {
mas01cr@509 454 maybe_delete_array(dbdata);
mas01cr@509 455 maybe_delete_array(dbpointers.l2norm_data);
mas01cr@509 456 maybe_delete_array(dbpointers.power_data);
mas01cr@509 457 maybe_delete_array(dbpointers.mean_duration);
mas01cr@498 458 currentTrack = pp.trackID;
mas01cr@498 459 adb_datum_t d = {0};
mas01cr@498 460 if(audiodb_track_id_datum(adb, pp.trackID, &d)) {
mas01cr@498 461 delete qstate->exact_evaluation_queue;
mas01cr@498 462 return 1;
mas01cr@498 463 }
mas01cr@498 464 if(audiodb_datum_qpointers(&d, sequence_length, &dbdata, &dbdata_pointer, &dbpointers)) {
mas01cr@498 465 delete qstate->exact_evaluation_queue;
mas01cr@580 466 audiodb_really_free_datum(&d);
mas01cr@498 467 return 1;
mas01cr@498 468 }
mas01cr@580 469 audiodb_really_free_datum(&d);
mas01cr@498 470 }
mas01cr@589 471 uint32_t qPos = (spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) ? pp.qpos : 0;
mas01cr@589 472 uint32_t sPos = pp.spos; // index into l2norm table
mas01cr@498 473 // Test power thresholds before computing distance
mas01cr@498 474 if( ( (!power_refine) || audiodb_powers_acceptable(&spec->refine, qpointers->power[qPos], dbpointers.power[sPos])) &&
mas01cr@498 475 ( qPos<qpointers->nvectors-sequence_length+1 && sPos<(*adb->track_lengths)[pp.trackID]-sequence_length+1 ) ){
mas01cr@498 476 // Compute distance
mas01cr@498 477 dist = audiodb_dot_product(query + qPos*adb->header->dim, dbdata + sPos*adb->header->dim, adb->header->dim*sequence_length);
mas01cr@498 478 double qn = qpointers->l2norm[qPos];
mas01cr@498 479 double sn = dbpointers.l2norm[sPos];
mas01cr@498 480 switch(spec->params.distance) {
mas01cr@498 481 case ADB_DISTANCE_EUCLIDEAN_NORMED:
mas01cr@498 482 dist = 2 - (2/(qn*sn))*dist;
mas01cr@498 483 break;
mas01cr@498 484 case ADB_DISTANCE_EUCLIDEAN:
mas01cr@498 485 dist = qn*qn + sn*sn - 2*dist;
mas01cr@498 486 break;
mas01cr@498 487 }
mas01cr@498 488 if((!(spec->refine.flags & ADB_REFINE_RADIUS)) ||
mas01cr@509 489 dist <= (spec->refine.radius + ADB_DISTANCE_TOLERANCE)) {
mas01cr@498 490 adb_result_t r;
mas01cr@498 491 r.key = (*adb->keys)[pp.trackID].c_str();
mas01cr@498 492 r.dist = dist;
mas01cr@498 493 r.qpos = pp.qpos;
mas01cr@498 494 r.ipos = pp.spos;
mas01cr@498 495 qstate->accumulator->add_point(&r);
mas01cr@239 496 }
mas01cr@239 497 }
mas01cr@498 498 qstate->exact_evaluation_queue->pop();
mas01mc@292 499 }
mas01mc@474 500
mas01mc@315 501 // Cleanup
mas01cr@509 502 maybe_delete_array(dbdata);
mas01cr@509 503 maybe_delete_array(dbpointers.l2norm_data);
mas01cr@509 504 maybe_delete_array(dbpointers.power_data);
mas01cr@509 505 maybe_delete_array(dbpointers.mean_duration);
mas01cr@498 506 delete qstate->exact_evaluation_queue;
mas01cr@498 507 return 0;
mas01mc@292 508 }
mas01mc@292 509
mas01cr@498 510 int audiodb_query_loop(adb_t *adb, const adb_query_spec_t *spec, adb_qstate_internal_t *qstate) {
mas01cr@498 511
mas01cr@498 512 double *query, *query_data;
mas01cr@498 513 adb_qpointers_internal_t qpointers = {0}, dbpointers = {0};
mas01mc@292 514
mas01cr@498 515 bool power_refine = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@239 516
mas01cr@509 517 if(adb->header->flags & ADB_HEADER_FLAG_REFERENCES) {
mas01cr@498 518 /* FIXME: actually it would be nice to support this mode of
mas01cr@498 519 * operation, but for now... */
mas01cr@498 520 return 1;
mas01cr@498 521 }
mas01mc@324 522
mas01cr@498 523 if(audiodb_query_spec_qpointers(adb, spec, &query_data, &query, &qpointers)) {
mas01cr@498 524 return 1;
mas01cr@498 525 }
mas01cr@239 526
mas01cr@498 527 if(audiodb_set_up_dbpointers(adb, spec, &dbpointers)) {
mas01cr@498 528 return 1;
mas01cr@498 529 }
mas01cr@239 530
mas01cr@498 531 unsigned j,k,track,trackOffset=0, HOP_SIZE = spec->refine.hopsize;
mas01cr@498 532 unsigned wL = spec->qid.sequence_length;
mas01cr@239 533 double **D = 0; // Differences query and target
mas01cr@239 534 double **DD = 0; // Matched filter distance
mas01cr@239 535
mas01cr@498 536 D = new double*[qpointers.nvectors]; // pre-allocate
mas01cr@498 537 DD = new double*[qpointers.nvectors];
mas01cr@239 538
mas01cr@239 539 off_t trackIndexOffset;
mas01cr@239 540
mas01cr@239 541 // Track loop
mas01cr@239 542 size_t data_buffer_size = 0;
mas01cr@239 543 double *data_buffer = 0;
mas01cr@498 544 lseek(adb->fd, adb->header->dataOffset, SEEK_SET);
mas01cr@239 545
mas01cr@498 546 std::set<std::string>::iterator keys_end = qstate->allowed_keys->end();
mas01cr@498 547 for(track = 0; track < adb->header->numFiles; track++) {
mas01cr@498 548 unsigned t = track;
mas01cr@498 549
mas01cr@498 550 while (qstate->allowed_keys->find((*adb->keys)[track]) == keys_end) {
mas01cr@498 551 track++;
mas01cr@498 552 if(track == adb->header->numFiles) {
mas01cr@498 553 goto loop_finish;
mas01cr@239 554 }
mas01cr@239 555 }
mas01cr@498 556 trackOffset = (*adb->track_offsets)[track];
mas01cr@498 557 if(track != t) {
mas01cr@498 558 lseek(adb->fd, adb->header->dataOffset + trackOffset, SEEK_SET);
mas01cr@498 559 }
mas01cr@498 560 trackIndexOffset = trackOffset / (adb->header->dim * sizeof(double)); // dbpointers.nvectors offset
mas01cr@239 561
mas01cr@498 562 if(audiodb_read_data(adb, adb->fd, track, &data_buffer, &data_buffer_size)) {
mas01cr@498 563 return 1;
mas01mc@292 564 }
mas01cr@498 565 if(wL <= (*adb->track_lengths)[track]) { // test for short sequences
mas01cr@498 566
mas01cr@498 567 audiodb_initialize_arrays(adb, spec, track, qpointers.nvectors, query, data_buffer, D, DD);
mas01mc@292 568
mas01cr@498 569 if((!(spec->refine.flags & ADB_REFINE_DURATION_RATIO)) ||
mas01cr@498 570 fabs(dbpointers.mean_duration[track]-qpointers.mean_duration[0]) < qpointers.mean_duration[0]*spec->refine.duration_ratio) {
mas01cr@239 571
mas01cr@239 572 // Search for minimum distance by shingles (concatenated vectors)
mas01cr@498 573 for(j = 0; j <= qpointers.nvectors - wL; j += HOP_SIZE) {
mas01cr@498 574 for(k = 0; k <= (*adb->track_lengths)[track] - wL; k += HOP_SIZE) {
mas01cr@498 575 double thisDist = 0;
mas01cr@498 576 double qn = qpointers.l2norm[j];
mas01cr@498 577 double sn = dbpointers.l2norm[trackIndexOffset + k];
mas01cr@498 578 switch(spec->params.distance) {
mas01cr@498 579 case ADB_DISTANCE_EUCLIDEAN_NORMED:
mas01cr@498 580 thisDist = 2-(2/(qn*sn))*DD[j][k];
mas01cr@498 581 break;
mas01cr@498 582 case ADB_DISTANCE_EUCLIDEAN:
mas01cr@498 583 thisDist = qn*qn + sn*sn - 2*DD[j][k];
mas01cr@498 584 break;
mas01cr@498 585 case ADB_DISTANCE_DOT_PRODUCT:
mas01cr@498 586 thisDist = DD[j][k];
mas01cr@498 587 break;
mas01cr@498 588 }
mas01cr@239 589 // Power test
mas01cr@498 590 if ((!power_refine) || audiodb_powers_acceptable(&spec->refine, qpointers.power[j], dbpointers.power[trackIndexOffset + k])) {
mas01cr@239 591 // radius test
mas01cr@498 592 if((!(spec->refine.flags & ADB_REFINE_RADIUS)) ||
mas01cr@509 593 thisDist <= (spec->refine.radius + ADB_DISTANCE_TOLERANCE)) {
mas01cr@498 594 adb_result_t r;
mas01cr@498 595 r.key = (*adb->keys)[track].c_str();
mas01cr@498 596 r.dist = thisDist;
mas01cr@498 597 if(spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) {
mas01cr@498 598 r.qpos = j;
mas01cr@498 599 } else {
mas01cr@498 600 r.qpos = spec->qid.sequence_start;
mas01cr@498 601 }
mas01cr@498 602 r.ipos = k;
mas01cr@498 603 qstate->accumulator->add_point(&r);
mas01cr@239 604 }
mas01cr@239 605 }
mas01cr@239 606 }
mas01cr@239 607 }
mas01cr@239 608 } // Duration match
mas01cr@498 609 audiodb_delete_arrays(track, qpointers.nvectors, D, DD);
mas01cr@239 610 }
mas01cr@239 611 }
mas01cr@239 612
mas01cr@498 613 loop_finish:
mas01cr@498 614
mas01cr@239 615 free(data_buffer);
mas01cr@239 616
mas01cr@239 617 // Clean up
mas01cr@239 618 if(query_data)
mas01cr@239 619 delete[] query_data;
mas01cr@498 620 if(qpointers.l2norm_data)
mas01cr@498 621 delete[] qpointers.l2norm_data;
mas01cr@498 622 if(qpointers.power_data)
mas01cr@498 623 delete[] qpointers.power_data;
mas01cr@498 624 if(qpointers.mean_duration)
mas01cr@498 625 delete[] qpointers.mean_duration;
mas01cr@498 626 if(dbpointers.power_data)
mas01cr@498 627 delete[] dbpointers.power_data;
mas01cr@498 628 if(dbpointers.l2norm_data)
mas01cr@498 629 delete[] dbpointers.l2norm_data;
mas01cr@239 630 if(D)
mas01cr@239 631 delete[] D;
mas01cr@239 632 if(DD)
mas01cr@239 633 delete[] DD;
mas01cr@498 634 if(dbpointers.mean_duration)
mas01cr@498 635 delete[] dbpointers.mean_duration;
mas01cr@498 636
mas01cr@498 637 return 0;
mas01cr@239 638 }