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 }
|