annotate query.cpp @ 545:bf89c80ec4cc multiprobeLSH

Expanded interface to audiodb_insert_create_datum() and audiodb_track_id_datum() to include _offset versions of both. Default cache is NULL, but offset and size parameters required.
author mas01mc
date Sun, 08 Feb 2009 15:53:57 +0000
parents 6afeb2c76957
children e8193805ce42 1731a6c457d7
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@498 107 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 108 unsigned int j, k, l, w;
mas01cr@239 109 double *dp, *qp, *sp;
mas01cr@239 110
mas01cr@498 111 const unsigned HOP_SIZE = spec->refine.hopsize;
mas01cr@498 112 const unsigned wL = spec->qid.sequence_length;
mas01cr@239 113
mas01cr@239 114 for(j = 0; j < numVectors; j++) {
mas01cr@239 115 // Sum products matrix
mas01cr@498 116 D[j] = new double[(*adb->track_lengths)[track]];
mas01cr@239 117 assert(D[j]);
mas01cr@239 118 // Matched filter matrix
mas01cr@498 119 DD[j]=new double[(*adb->track_lengths)[track]];
mas01cr@239 120 assert(DD[j]);
mas01cr@239 121 }
mas01cr@239 122
mas01cr@239 123 // Dot product
mas01cr@239 124 for(j = 0; j < numVectors; j++)
mas01cr@498 125 for(k = 0; k < (*adb->track_lengths)[track]; k++){
mas01cr@498 126 qp = query + j * adb->header->dim;
mas01cr@498 127 sp = data_buffer + k * adb->header->dim;
mas01cr@239 128 DD[j][k] = 0.0; // Initialize matched filter array
mas01cr@239 129 dp = &D[j][k]; // point to correlation cell j,k
mas01cr@239 130 *dp = 0.0; // initialize correlation cell
mas01cr@498 131 l = adb->header->dim; // size of vectors
mas01cr@239 132 while(l--)
mas01cr@239 133 *dp += *qp++ * *sp++;
mas01cr@239 134 }
mas01cr@239 135
mas01cr@239 136 // Matched Filter
mas01cr@239 137 // HOP SIZE == 1
mas01cr@239 138 double* spd;
mas01cr@239 139 if(HOP_SIZE == 1) { // HOP_SIZE = shingleHop
mas01cr@239 140 for(w = 0; w < wL; w++) {
mas01cr@239 141 for(j = 0; j < numVectors - w; j++) {
mas01cr@239 142 sp = DD[j];
mas01cr@239 143 spd = D[j+w] + w;
mas01cr@498 144 k = (*adb->track_lengths)[track] - w;
mas01mc@292 145 while(k--)
mas01mc@292 146 *sp++ += *spd++;
mas01cr@239 147 }
mas01cr@239 148 }
mas01cr@239 149 } else { // HOP_SIZE != 1
mas01cr@239 150 for(w = 0; w < wL; w++) {
mas01cr@239 151 for(j = 0; j < numVectors - w; j += HOP_SIZE) {
mas01cr@239 152 sp = DD[j];
mas01cr@239 153 spd = D[j+w]+w;
mas01cr@498 154 for(k = 0; k < (*adb->track_lengths)[track] - w; k += HOP_SIZE) {
mas01cr@239 155 *sp += *spd;
mas01cr@239 156 sp += HOP_SIZE;
mas01cr@239 157 spd += HOP_SIZE;
mas01cr@239 158 }
mas01cr@239 159 }
mas01cr@239 160 }
mas01cr@239 161 }
mas01cr@239 162 }
mas01cr@239 163
mas01cr@498 164 static void audiodb_delete_arrays(int track, unsigned int numVectors, double **D, double **DD) {
mas01cr@239 165 if(D != NULL) {
mas01cr@239 166 for(unsigned int j = 0; j < numVectors; j++) {
mas01cr@239 167 delete[] D[j];
mas01cr@239 168 }
mas01cr@239 169 }
mas01cr@239 170 if(DD != NULL) {
mas01cr@239 171 for(unsigned int j = 0; j < numVectors; j++) {
mas01cr@239 172 delete[] DD[j];
mas01cr@239 173 }
mas01cr@239 174 }
mas01cr@239 175 }
mas01cr@239 176
mas01cr@498 177 int audiodb_read_data(adb_t *adb, int trkfid, int track, double **data_buffer_p, size_t *data_buffer_size_p) {
mas01cr@498 178 uint32_t track_length = (*adb->track_lengths)[track];
mas01cr@498 179 size_t track_size = track_length * sizeof(double) * adb->header->dim;
mas01cr@498 180 if (track_size > *data_buffer_size_p) {
mas01cr@239 181 if(*data_buffer_p) {
mas01cr@239 182 free(*data_buffer_p);
mas01cr@239 183 }
mas01cr@239 184 {
mas01cr@498 185 *data_buffer_size_p = track_size;
mas01cr@498 186 void *tmp = malloc(track_size);
mas01cr@239 187 if (tmp == NULL) {
mas01cr@498 188 goto error;
mas01cr@239 189 }
mas01cr@239 190 *data_buffer_p = (double *) tmp;
mas01cr@239 191 }
mas01cr@239 192 }
mas01cr@239 193
mas01cr@498 194 read_or_goto_error(trkfid, *data_buffer_p, track_size);
mas01cr@498 195 return 0;
mas01cr@498 196
mas01cr@498 197 error:
mas01cr@498 198 return 1;
mas01cr@239 199 }
mas01cr@239 200
mas01mc@545 201 int audiodb_track_id_datum(adb_t * adb, uint32_t track_id, adb_datum_t *datum){
mas01mc@545 202 return audiodb_track_id_datum_offset(adb, track_id , datum, 0, 0, 0);
mas01mc@545 203 }
mas01mc@545 204
mas01mc@545 205 int audiodb_track_id_datum_offset(adb_t *adb, uint32_t track_id, adb_datum_t *d, off_t vector_offset, size_t num_vectors, adb_fd_cache_t* cache){
mas01cr@498 206 off_t track_offset = (*adb->track_offsets)[track_id];
mas01mc@541 207
mas01cr@509 208 if(adb->header->flags & ADB_HEADER_FLAG_REFERENCES) {
mas01cr@498 209 /* create a reference/insert, then use adb_insert_create_datum() */
mas01mc@541 210 adb_reference_t *reference = NULL;
mas01mc@541 211 if(! (cache && cache->reference) ){
mas01mc@541 212 reference = (adb_reference_t *) malloc(sizeof(adb_reference_t));
mas01mc@541 213 reference->features = (char*) malloc(ADB_MAXSTR*sizeof(char));
mas01mc@541 214 if(adb->header->flags & ADB_HEADER_FLAG_POWER)
mas01mc@541 215 reference->power = (char*) malloc(ADB_MAXSTR*sizeof(char));
mas01mc@543 216 else
mas01mc@543 217 reference->power = NULL;
mas01mc@541 218 if(adb->header->flags & ADB_HEADER_FLAG_TIMES)
mas01mc@541 219 reference->times = (char*)malloc(ADB_MAXSTR*sizeof(char));
mas01mc@543 220 else
mas01mc@543 221 reference->times = NULL;
mas01mc@541 222 if(cache)
mas01mc@541 223 cache->reference = reference;
mas01cr@498 224 }
mas01mc@541 225 else
mas01mc@541 226 reference = cache->reference;
mas01mc@541 227
mas01mc@541 228 if(! (cache && cache->track_id==track_id) ){
mas01mc@541 229 if(cache)
mas01mc@541 230 cache->track_id = track_id;
mas01mc@541 231 lseek(adb->fd, adb->header->dataOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01mc@541 232 read_or_goto_error(adb->fd, (void *)reference->features, ADB_MAXSTR);
mas01mc@541 233 if(adb->header->flags & ADB_HEADER_FLAG_POWER) {
mas01mc@541 234 lseek(adb->fd, adb->header->powerTableOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01mc@541 235 read_or_goto_error(adb->fd, (void *)reference->power, ADB_MAXSTR);
mas01mc@541 236 }
mas01mc@541 237 if(adb->header->flags & ADB_HEADER_FLAG_TIMES) {
mas01mc@541 238 lseek(adb->fd, adb->header->timesTableOffset + track_id * ADB_FILETABLE_ENTRY_SIZE, SEEK_SET);
mas01mc@541 239 read_or_goto_error(adb->fd, (void *)reference->times, ADB_MAXSTR);
mas01mc@541 240 }
mas01cr@498 241 }
mas01mc@541 242
mas01mc@545 243 int retval = audiodb_insert_create_datum_offset(reference, d, vector_offset*adb->header->dim*sizeof(double), num_vectors*adb->header->dim*sizeof(double), cache);
mas01mc@541 244 if(!cache){
mas01mc@541 245 audiodb_free_datum_reference(reference);
mas01mc@541 246 free(reference);
mas01mc@541 247 }
mas01mc@541 248 return retval;
mas01cr@498 249 } else {
mas01cr@498 250 /* initialize from sources of data that we already have */
mas01mc@539 251 if(num_vectors)
mas01mc@539 252 d->nvectors = num_vectors;
mas01mc@539 253 else
mas01mc@539 254 d->nvectors = (*adb->track_lengths)[track_id];
mas01cr@498 255 d->dim = adb->header->dim;
mas01cr@498 256 d->key = (*adb->keys)[track_id].c_str();
mas01cr@498 257 /* read out stuff from the database tables */
mas01cr@498 258 d->data = (double *) malloc(d->nvectors * d->dim * sizeof(double));
mas01mc@539 259 lseek(adb->fd, adb->header->dataOffset + track_offset + vector_offset*d->dim*sizeof(double), SEEK_SET);
mas01cr@498 260 read_or_goto_error(adb->fd, d->data, d->nvectors * d->dim * sizeof(double));
mas01cr@509 261 if(adb->header->flags & ADB_HEADER_FLAG_POWER) {
mas01cr@498 262 d->power = (double *) malloc(d->nvectors * sizeof(double));
mas01mc@539 263 lseek(adb->fd, adb->header->powerTableOffset + track_offset / d->dim + vector_offset*sizeof(double), SEEK_SET);
mas01cr@498 264 read_or_goto_error(adb->fd, d->power, d->nvectors * sizeof(double));
mas01cr@498 265 }
mas01cr@509 266 if(adb->header->flags & ADB_HEADER_FLAG_TIMES) {
mas01cr@498 267 d->times = (double *) malloc(2 * d->nvectors * sizeof(double));
mas01mc@539 268 lseek(adb->fd, adb->header->timesTableOffset + track_offset / d->dim + 2 * vector_offset*sizeof(double), SEEK_SET);
mas01cr@498 269 read_or_goto_error(adb->fd, d->times, 2 * d->nvectors * sizeof(double));
mas01cr@498 270 }
mas01cr@498 271 return 0;
mas01cr@498 272 }
mas01cr@498 273 error:
mas01cr@498 274 audiodb_free_datum(d);
mas01cr@498 275 return 1;
mas01cr@498 276 }
mas01mc@292 277
mas01cr@498 278 int audiodb_datum_qpointers(adb_datum_t *d, uint32_t sequence_length, double **vector_data, double **vector, adb_qpointers_internal_t *qpointers) {
mas01cr@498 279 uint32_t nvectors = d->nvectors;
mas01cr@498 280
mas01cr@498 281 qpointers->nvectors = nvectors;
mas01cr@498 282
mas01cr@498 283 size_t vector_size = nvectors * sizeof(double) * d->dim;
mas01cr@498 284 *vector_data = new double[vector_size];
mas01cr@498 285 memcpy(*vector_data, d->data, vector_size);
mas01cr@498 286
mas01cr@498 287 qpointers->l2norm_data = new double[vector_size / d->dim];
mas01cr@498 288 audiodb_l2norm_buffer(*vector_data, d->dim, nvectors, qpointers->l2norm_data);
mas01cr@498 289 audiodb_sequence_sum(qpointers->l2norm_data, nvectors, sequence_length);
mas01cr@498 290 audiodb_sequence_sqrt(qpointers->l2norm_data, nvectors, sequence_length);
mas01cr@498 291
mas01cr@498 292 if(d->power) {
mas01cr@498 293 qpointers->power_data = new double[vector_size / d->dim];
mas01cr@498 294 memcpy(qpointers->power_data, d->power, vector_size / d->dim);
mas01cr@498 295 audiodb_sequence_sum(qpointers->power_data, nvectors, sequence_length);
mas01cr@498 296 audiodb_sequence_average(qpointers->power_data, nvectors, sequence_length);
mas01cr@239 297 }
mas01cr@239 298
mas01cr@498 299 if(d->times) {
mas01cr@498 300 qpointers->mean_duration = new double[1];
mas01cr@498 301 *qpointers->mean_duration = 0;
mas01cr@498 302 for(unsigned int k = 0; k < nvectors; k++) {
mas01cr@498 303 *qpointers->mean_duration += d->times[2*k+1] - d->times[2*k];
mas01cr@239 304 }
mas01cr@498 305 *qpointers->mean_duration /= nvectors;
mas01cr@239 306 }
mas01cr@239 307
mas01cr@498 308 *vector = *vector_data;
mas01cr@498 309 qpointers->l2norm = qpointers->l2norm_data;
mas01cr@498 310 qpointers->power = qpointers->power_data;
mas01cr@498 311 return 0;
mas01cr@498 312 }
mas01cr@498 313
mas01mc@528 314 int audiodb_datum_qpointers_partial(adb_datum_t *d, uint32_t sequence_length, double **vector_data,
mas01mc@528 315 double **vector, adb_qpointers_internal_t *qpointers,
mas01mc@528 316 adb_qstate_internal_t *qstate){
mas01mc@528 317 uint32_t nvectors = d->nvectors;
mas01mc@528 318 qpointers->nvectors = nvectors;
mas01mc@528 319
mas01mc@539 320 PointPair pp = (*qstate->exact_evaluation_queue).top();
mas01mc@529 321 #ifdef _LSH_DEBUG_
mas01mc@539 322 cout << "tid=" << pp.trackID << " qpos=" << pp.qpos << " spos=" << pp.spos << endl;
mas01mc@539 323 cout.flush();
mas01mc@529 324 #endif
mas01mc@539 325
mas01mc@539 326 if(d->power) {
mas01mc@539 327 //memcpy(qpointers->power_data, d->power, seq_len_dbl);
mas01mc@539 328 audiodb_sequence_sum(d->power, sequence_length, sequence_length);
mas01mc@539 329 audiodb_sequence_average(d->power, sequence_length, sequence_length);
mas01mc@528 330 }
mas01mc@539 331
mas01mc@528 332 if(d->times) {
mas01mc@528 333 qpointers->mean_duration = new double[1];
mas01mc@528 334 *qpointers->mean_duration = 0;
mas01mc@528 335 for(unsigned int k = 0; k < nvectors; k++) {
mas01mc@528 336 *qpointers->mean_duration += d->times[2*k+1] - d->times[2*k];
mas01mc@528 337 }
mas01mc@528 338 *qpointers->mean_duration /= nvectors;
mas01mc@528 339 }
mas01mc@539 340
mas01mc@531 341 *vector = d->data;
mas01mc@531 342 *vector_data = d->data;
mas01mc@531 343 qpointers->l2norm = 0 ;
mas01mc@539 344 qpointers->power = d->power;
mas01mc@528 345 return 0;
mas01mc@528 346 }
mas01mc@528 347
mas01cr@498 348 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 349 adb_datum_t *datum;
mas01cr@498 350 adb_datum_t d = {0};
mas01cr@498 351 uint32_t sequence_length;
mas01cr@498 352 uint32_t sequence_start;
mas01cr@498 353
mas01cr@498 354 datum = spec->qid.datum;
mas01cr@498 355 sequence_length = spec->qid.sequence_length;
mas01cr@498 356 sequence_start = spec->qid.sequence_start;
mas01cr@498 357
mas01cr@498 358 if(datum->data) {
mas01cr@498 359 if(datum->dim != adb->header->dim) {
mas01cr@498 360 return 1;
mas01cr@239 361 }
mas01cr@498 362 /* initialize d, and mark that nothing needs freeing later. */
mas01cr@498 363 d = *datum;
mas01cr@498 364 datum = &d;
mas01cr@498 365 } else if (datum->key) {
mas01cr@498 366 uint32_t track_id;
mas01cr@498 367 if((track_id = audiodb_key_index(adb, datum->key)) == (uint32_t) -1) {
mas01cr@498 368 return 1;
mas01cr@498 369 }
mas01cr@498 370 audiodb_track_id_datum(adb, track_id, &d);
mas01cr@498 371 } else {
mas01cr@498 372 return 1;
mas01cr@239 373 }
mas01cr@239 374
mas01cr@498 375 /* FIXME: check the overflow logic here */
mas01cr@498 376 if(sequence_start + sequence_length > d.nvectors) {
mas01cr@498 377 if(datum != &d) {
mas01cr@498 378 audiodb_free_datum(&d);
mas01cr@498 379 }
mas01cr@498 380 return 1;
mas01cr@498 381 }
mas01cr@239 382
mas01cr@498 383 audiodb_datum_qpointers(&d, sequence_length, vector_data, vector, qpointers);
mas01cr@498 384
mas01cr@498 385 /* Finally, if applicable, set up the moving qpointers. */
mas01cr@498 386 if(spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) {
mas01cr@498 387 /* the qpointers are already at the start, and so correct. */
mas01cr@498 388 } else {
mas01cr@498 389 /* adjust the qpointers to point to the correct place in the sequence */
mas01cr@498 390 *vector = *vector_data + spec->qid.sequence_start * d.dim;
mas01cr@498 391 qpointers->l2norm = qpointers->l2norm_data + spec->qid.sequence_start;
mas01cr@498 392 if(d.power) {
mas01cr@498 393 qpointers->power = qpointers->power_data + spec->qid.sequence_start;
mas01cr@239 394 }
mas01cr@498 395 qpointers->nvectors = sequence_length;
mas01cr@239 396 }
mas01cr@498 397
mas01cr@498 398 /* Clean up: free any bits of datum that we have ourselves
mas01cr@498 399 * allocated. */
mas01cr@498 400 if(datum != &d) {
mas01cr@498 401 audiodb_free_datum(&d);
mas01cr@498 402 }
mas01cr@498 403
mas01cr@498 404 return 0;
mas01cr@239 405 }
mas01cr@239 406
mas01cr@498 407 static int audiodb_set_up_dbpointers(adb_t *adb, const adb_query_spec_t *spec, adb_qpointers_internal_t *dbpointers) {
mas01cr@498 408 uint32_t nvectors = adb->header->length / (adb->header->dim * sizeof(double));
mas01cr@498 409 uint32_t sequence_length = spec->qid.sequence_length;
mas01mc@292 410
mas01cr@498 411 bool using_power = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@498 412 bool using_times = spec->refine.flags & ADB_REFINE_DURATION_RATIO;
mas01cr@498 413 double *times_table = NULL;
mas01cr@498 414
mas01cr@498 415
mas01cr@498 416 dbpointers->nvectors = nvectors;
mas01cr@498 417 dbpointers->l2norm_data = new double[nvectors];
mas01cr@498 418
mas01cr@498 419 double *snpp = dbpointers->l2norm_data, *sppp = 0;
mas01cr@498 420 lseek(adb->fd, adb->header->l2normTableOffset, SEEK_SET);
mas01cr@498 421 read_or_goto_error(adb->fd, dbpointers->l2norm_data, nvectors * sizeof(double));
mas01cr@498 422
mas01cr@498 423 if (using_power) {
mas01cr@509 424 if (!(adb->header->flags & ADB_HEADER_FLAG_POWER)) {
mas01cr@498 425 goto error;
mas01cr@498 426 }
mas01cr@498 427 dbpointers->power_data = new double[nvectors];
mas01cr@498 428 sppp = dbpointers->power_data;
mas01cr@498 429 lseek(adb->fd, adb->header->powerTableOffset, SEEK_SET);
mas01cr@498 430 read_or_goto_error(adb->fd, dbpointers->power_data, nvectors * sizeof(double));
mas01mc@292 431 }
mas01mc@292 432
mas01cr@498 433 for(unsigned int i = 0; i < adb->header->numFiles; i++){
mas01cr@498 434 size_t track_length = (*adb->track_lengths)[i];
mas01cr@498 435 if(track_length >= sequence_length) {
mas01cr@498 436 audiodb_sequence_sum(snpp, track_length, sequence_length);
mas01cr@498 437 audiodb_sequence_sqrt(snpp, track_length, sequence_length);
mas01cr@498 438 if (using_power) {
mas01cr@498 439 audiodb_sequence_sum(sppp, track_length, sequence_length);
mas01cr@498 440 audiodb_sequence_average(sppp, track_length, sequence_length);
mas01cr@498 441 }
mas01mc@324 442 }
mas01cr@498 443 snpp += track_length;
mas01cr@498 444 if (using_power) {
mas01cr@498 445 sppp += track_length;
mas01mc@324 446 }
mas01mc@292 447 }
mas01mc@292 448
mas01cr@498 449 if (using_times) {
mas01cr@509 450 if(!(adb->header->flags & ADB_HEADER_FLAG_TIMES)) {
mas01cr@498 451 goto error;
mas01cr@498 452 }
mas01mc@292 453
mas01cr@498 454 dbpointers->mean_duration = new double[adb->header->numFiles];
mas01cr@498 455
mas01cr@498 456 times_table = (double *) malloc(2 * nvectors * sizeof(double));
mas01cr@498 457 if(!times_table) {
mas01cr@498 458 goto error;
mas01cr@498 459 }
mas01cr@498 460 lseek(adb->fd, adb->header->timesTableOffset, SEEK_SET);
mas01cr@498 461 read_or_goto_error(adb->fd, times_table, 2 * nvectors * sizeof(double));
mas01cr@498 462 for(unsigned int k = 0; k < adb->header->numFiles; k++) {
mas01cr@498 463 size_t track_length = (*adb->track_lengths)[k];
mas01cr@498 464 unsigned int j;
mas01cr@498 465 dbpointers->mean_duration[k] = 0.0;
mas01cr@498 466 for(j = 0; j < track_length; j++) {
mas01cr@498 467 dbpointers->mean_duration[k] += times_table[2*j+1] - times_table[2*j];
mas01mc@292 468 }
mas01cr@498 469 dbpointers->mean_duration[k] /= j;
mas01mc@292 470 }
mas01cr@498 471
mas01cr@498 472 free(times_table);
mas01cr@498 473 times_table = NULL;
mas01mc@292 474 }
mas01cr@498 475
mas01cr@498 476 dbpointers->l2norm = dbpointers->l2norm_data;
mas01cr@498 477 dbpointers->power = dbpointers->power_data;
mas01cr@498 478 return 0;
mas01cr@498 479
mas01cr@498 480 error:
mas01cr@498 481 if(dbpointers->l2norm_data) {
mas01cr@498 482 delete [] dbpointers->l2norm_data;
mas01cr@498 483 }
mas01cr@498 484 if(dbpointers->power_data) {
mas01cr@498 485 delete [] dbpointers->power_data;
mas01cr@498 486 }
mas01cr@498 487 if(dbpointers->mean_duration) {
mas01cr@498 488 delete [] dbpointers->mean_duration;
mas01cr@498 489 }
mas01cr@498 490 if(times_table) {
mas01cr@498 491 free(times_table);
mas01cr@498 492 }
mas01cr@498 493 return 1;
mas01cr@498 494
mas01mc@292 495 }
mas01mc@292 496
mas01cr@498 497 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 498 adb_qpointers_internal_t dbpointers = {0};
mas01mc@292 499
mas01cr@498 500 uint32_t sequence_length = spec->qid.sequence_length;
mas01cr@498 501 bool power_refine = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@239 502
mas01cr@498 503 if(qstate->exact_evaluation_queue->size() == 0) {
mas01cr@498 504 return 0;
mas01cr@239 505 }
mas01cr@239 506
mas01cr@498 507 /* We are guaranteed that the order of points is sorted by:
mas01cr@498 508 * {trackID, spos, qpos} so we can be relatively efficient in
mas01cr@498 509 * initialization of track data. We assume that points usually
mas01cr@498 510 * don't overlap, so we will use exhaustive dot product evaluation
mas01cr@498 511 * (instead of memoization of partial sums, as in query_loop()).
mas01cr@498 512 */
mas01cr@498 513 double dist;
mas01cr@498 514 double *dbdata = 0, *dbdata_pointer;
mas01cr@498 515 Uns32T npairs = qstate->exact_evaluation_queue->size();
mas01mc@541 516 Uns32T currentTrack = qstate->exact_evaluation_queue->top().trackID+1; // i.e. not first track
mas01mc@527 517 #ifdef _LSH_DEBUG_
mas01mc@527 518 cout << "Num vector pairs to evaluate: " << npairs << "..." << endl;
mas01mc@527 519 cout.flush();
mas01mc@527 520 #endif
mas01mc@531 521 adb_datum_t d = {0};
mas01mc@541 522 adb_fd_cache_t c = {0};
mas01mc@541 523 c.track_id = currentTrack;
mas01cr@498 524 while(npairs--) {
mas01cr@498 525 PointPair pp = qstate->exact_evaluation_queue->top();
mas01mc@541 526 if(pp.trackID != currentTrack){
mas01mc@541 527 audiodb_free_datum(&d);
mas01mc@541 528 currentTrack = pp.trackID;
mas01mc@541 529 }
mas01mc@539 530 maybe_delete_array(dbpointers.mean_duration);
mas01mc@545 531 if(audiodb_track_id_datum_offset(adb, pp.trackID, &d, pp.spos, sequence_length, &c)) {
mas01mc@539 532 delete qstate->exact_evaluation_queue;
mas01mc@539 533 delete qstate->set;
mas01mc@541 534 audiodb_free_datum(&d);
mas01mc@541 535 audiodb_free_datum_cache(&c);
mas01mc@539 536 return 1;
mas01mc@539 537 }
mas01mc@539 538
mas01mc@539 539 if(audiodb_datum_qpointers_partial(&d, sequence_length, &dbdata, &dbdata_pointer, &dbpointers, qstate)) {
mas01mc@539 540 delete qstate->exact_evaluation_queue;
mas01mc@539 541 delete qstate->set;
mas01mc@531 542 audiodb_free_datum(&d);
mas01mc@541 543 audiodb_free_datum_cache(&c);
mas01mc@539 544 return 1;
mas01mc@539 545 }
mas01mc@531 546
mas01cr@498 547 Uns32T qPos = (spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) ? pp.qpos : 0;
mas01cr@498 548 // Test power thresholds before computing distance
mas01mc@539 549 if( ( (!power_refine) || audiodb_powers_acceptable(&spec->refine, qpointers->power[qPos], dbpointers.power[0])) &&
mas01mc@539 550 ( qPos<qpointers->nvectors-sequence_length+1 && pp.spos<(*adb->track_lengths)[pp.trackID]-sequence_length+1 ) ){
mas01mc@531 551 // Compute distance
mas01mc@539 552 dist = audiodb_dot_product(query + qPos*adb->header->dim, dbdata, adb->header->dim*sequence_length);
mas01mc@531 553 double qn = audiodb_dot_product(query + qPos*adb->header->dim, query + qPos*adb->header->dim, adb->header->dim*sequence_length);
mas01mc@539 554 double sn = audiodb_dot_product(dbdata, dbdata, adb->header->dim*sequence_length);
mas01mc@531 555 qn = sqrt(qn);
mas01mc@531 556 sn = sqrt(sn);
mas01cr@498 557 switch(spec->params.distance) {
mas01cr@498 558 case ADB_DISTANCE_EUCLIDEAN_NORMED:
mas01cr@498 559 dist = 2 - (2/(qn*sn))*dist;
mas01cr@498 560 break;
mas01cr@498 561 case ADB_DISTANCE_EUCLIDEAN:
mas01cr@498 562 dist = qn*qn + sn*sn - 2*dist;
mas01cr@498 563 break;
mas01cr@498 564 }
mas01cr@498 565 if((!(spec->refine.flags & ADB_REFINE_RADIUS)) ||
mas01cr@509 566 dist <= (spec->refine.radius + ADB_DISTANCE_TOLERANCE)) {
mas01cr@498 567 adb_result_t r;
mas01cr@498 568 r.key = (*adb->keys)[pp.trackID].c_str();
mas01cr@498 569 r.dist = dist;
mas01cr@498 570 r.qpos = pp.qpos;
mas01cr@498 571 r.ipos = pp.spos;
mas01cr@498 572 qstate->accumulator->add_point(&r);
mas01cr@239 573 }
mas01cr@239 574 }
mas01cr@498 575 qstate->exact_evaluation_queue->pop();
mas01mc@292 576 }
mas01mc@474 577
mas01mc@315 578 // Cleanup
mas01mc@541 579 audiodb_free_datum(&d);
mas01mc@541 580 audiodb_free_datum_cache(&c);
mas01cr@509 581 maybe_delete_array(dbpointers.mean_duration);
mas01cr@498 582 delete qstate->exact_evaluation_queue;
mas01mc@529 583 delete qstate->set;
mas01cr@498 584 return 0;
mas01mc@292 585 }
mas01mc@292 586
mas01cr@498 587 int audiodb_query_loop(adb_t *adb, const adb_query_spec_t *spec, adb_qstate_internal_t *qstate) {
mas01cr@498 588
mas01cr@498 589 double *query, *query_data;
mas01cr@498 590 adb_qpointers_internal_t qpointers = {0}, dbpointers = {0};
mas01mc@292 591
mas01cr@498 592 bool power_refine = spec->refine.flags & (ADB_REFINE_ABSOLUTE_THRESHOLD|ADB_REFINE_RELATIVE_THRESHOLD);
mas01cr@239 593
mas01cr@509 594 if(adb->header->flags & ADB_HEADER_FLAG_REFERENCES) {
mas01cr@498 595 /* FIXME: actually it would be nice to support this mode of
mas01cr@498 596 * operation, but for now... */
mas01cr@498 597 return 1;
mas01cr@498 598 }
mas01mc@324 599
mas01cr@498 600 if(audiodb_query_spec_qpointers(adb, spec, &query_data, &query, &qpointers)) {
mas01cr@498 601 return 1;
mas01cr@498 602 }
mas01cr@239 603
mas01cr@498 604 if(audiodb_set_up_dbpointers(adb, spec, &dbpointers)) {
mas01cr@498 605 return 1;
mas01cr@498 606 }
mas01cr@239 607
mas01cr@498 608 unsigned j,k,track,trackOffset=0, HOP_SIZE = spec->refine.hopsize;
mas01cr@498 609 unsigned wL = spec->qid.sequence_length;
mas01cr@239 610 double **D = 0; // Differences query and target
mas01cr@239 611 double **DD = 0; // Matched filter distance
mas01cr@239 612
mas01cr@498 613 D = new double*[qpointers.nvectors]; // pre-allocate
mas01cr@498 614 DD = new double*[qpointers.nvectors];
mas01cr@239 615
mas01cr@239 616 off_t trackIndexOffset;
mas01cr@239 617
mas01cr@239 618 // Track loop
mas01cr@239 619 size_t data_buffer_size = 0;
mas01cr@239 620 double *data_buffer = 0;
mas01cr@498 621 lseek(adb->fd, adb->header->dataOffset, SEEK_SET);
mas01cr@239 622
mas01cr@498 623 std::set<std::string>::iterator keys_end = qstate->allowed_keys->end();
mas01cr@498 624 for(track = 0; track < adb->header->numFiles; track++) {
mas01cr@498 625 unsigned t = track;
mas01cr@498 626
mas01cr@498 627 while (qstate->allowed_keys->find((*adb->keys)[track]) == keys_end) {
mas01cr@498 628 track++;
mas01cr@498 629 if(track == adb->header->numFiles) {
mas01cr@498 630 goto loop_finish;
mas01cr@239 631 }
mas01cr@239 632 }
mas01cr@498 633 trackOffset = (*adb->track_offsets)[track];
mas01cr@498 634 if(track != t) {
mas01cr@498 635 lseek(adb->fd, adb->header->dataOffset + trackOffset, SEEK_SET);
mas01cr@498 636 }
mas01cr@498 637 trackIndexOffset = trackOffset / (adb->header->dim * sizeof(double)); // dbpointers.nvectors offset
mas01cr@239 638
mas01cr@498 639 if(audiodb_read_data(adb, adb->fd, track, &data_buffer, &data_buffer_size)) {
mas01cr@498 640 return 1;
mas01mc@292 641 }
mas01cr@498 642 if(wL <= (*adb->track_lengths)[track]) { // test for short sequences
mas01cr@498 643
mas01cr@498 644 audiodb_initialize_arrays(adb, spec, track, qpointers.nvectors, query, data_buffer, D, DD);
mas01mc@292 645
mas01cr@498 646 if((!(spec->refine.flags & ADB_REFINE_DURATION_RATIO)) ||
mas01cr@498 647 fabs(dbpointers.mean_duration[track]-qpointers.mean_duration[0]) < qpointers.mean_duration[0]*spec->refine.duration_ratio) {
mas01cr@239 648
mas01cr@239 649 // Search for minimum distance by shingles (concatenated vectors)
mas01cr@498 650 for(j = 0; j <= qpointers.nvectors - wL; j += HOP_SIZE) {
mas01cr@498 651 for(k = 0; k <= (*adb->track_lengths)[track] - wL; k += HOP_SIZE) {
mas01cr@498 652 double thisDist = 0;
mas01cr@498 653 double qn = qpointers.l2norm[j];
mas01cr@498 654 double sn = dbpointers.l2norm[trackIndexOffset + k];
mas01cr@498 655 switch(spec->params.distance) {
mas01cr@498 656 case ADB_DISTANCE_EUCLIDEAN_NORMED:
mas01cr@498 657 thisDist = 2-(2/(qn*sn))*DD[j][k];
mas01cr@498 658 break;
mas01cr@498 659 case ADB_DISTANCE_EUCLIDEAN:
mas01cr@498 660 thisDist = qn*qn + sn*sn - 2*DD[j][k];
mas01cr@498 661 break;
mas01cr@498 662 case ADB_DISTANCE_DOT_PRODUCT:
mas01cr@498 663 thisDist = DD[j][k];
mas01cr@498 664 break;
mas01cr@498 665 }
mas01cr@239 666 // Power test
mas01cr@498 667 if ((!power_refine) || audiodb_powers_acceptable(&spec->refine, qpointers.power[j], dbpointers.power[trackIndexOffset + k])) {
mas01cr@239 668 // radius test
mas01cr@498 669 if((!(spec->refine.flags & ADB_REFINE_RADIUS)) ||
mas01cr@509 670 thisDist <= (spec->refine.radius + ADB_DISTANCE_TOLERANCE)) {
mas01cr@498 671 adb_result_t r;
mas01cr@498 672 r.key = (*adb->keys)[track].c_str();
mas01cr@498 673 r.dist = thisDist;
mas01cr@498 674 if(spec->qid.flags & ADB_QID_FLAG_EXHAUSTIVE) {
mas01cr@498 675 r.qpos = j;
mas01cr@498 676 } else {
mas01cr@498 677 r.qpos = spec->qid.sequence_start;
mas01cr@498 678 }
mas01cr@498 679 r.ipos = k;
mas01cr@498 680 qstate->accumulator->add_point(&r);
mas01cr@239 681 }
mas01cr@239 682 }
mas01cr@239 683 }
mas01cr@239 684 }
mas01cr@239 685 } // Duration match
mas01cr@498 686 audiodb_delete_arrays(track, qpointers.nvectors, D, DD);
mas01cr@239 687 }
mas01cr@239 688 }
mas01cr@239 689
mas01cr@498 690 loop_finish:
mas01cr@498 691
mas01cr@239 692 free(data_buffer);
mas01cr@239 693
mas01cr@239 694 // Clean up
mas01cr@239 695 if(query_data)
mas01cr@239 696 delete[] query_data;
mas01cr@498 697 if(qpointers.l2norm_data)
mas01cr@498 698 delete[] qpointers.l2norm_data;
mas01cr@498 699 if(qpointers.power_data)
mas01cr@498 700 delete[] qpointers.power_data;
mas01cr@498 701 if(qpointers.mean_duration)
mas01cr@498 702 delete[] qpointers.mean_duration;
mas01cr@498 703 if(dbpointers.power_data)
mas01cr@498 704 delete[] dbpointers.power_data;
mas01cr@498 705 if(dbpointers.l2norm_data)
mas01cr@498 706 delete[] dbpointers.l2norm_data;
mas01cr@239 707 if(D)
mas01cr@239 708 delete[] D;
mas01cr@239 709 if(DD)
mas01cr@239 710 delete[] DD;
mas01cr@498 711 if(dbpointers.mean_duration)
mas01cr@498 712 delete[] dbpointers.mean_duration;
mas01cr@498 713
mas01cr@498 714 return 0;
mas01cr@239 715 }