78 lines
2.1 KiB
C
Executable File
78 lines
2.1 KiB
C
Executable File
/****************************************************************************
|
|
* Array indexing functions *
|
|
****************************************************************************/
|
|
|
|
/**
|
|
* @file array_indexer.c
|
|
* @author Celine Mercier
|
|
* @date October 5th 2017
|
|
* @brief Functions handling the indexing and retrieval of arrays of any type.
|
|
*/
|
|
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <stdint.h>
|
|
#include <math.h>
|
|
|
|
#include "obiblob.h"
|
|
#include "obiblob_indexer.h"
|
|
#include "obidebug.h"
|
|
#include "obitypes.h"
|
|
|
|
|
|
#define DEBUG_LEVEL 0 // TODO has to be defined somewhere else (cython compil flag?)
|
|
|
|
|
|
index_t obi_index_array(Obi_indexer_p indexer, const void* value, uint8_t elt_size, int value_length)
|
|
{
|
|
Obi_blob_p value_b;
|
|
index_t idx;
|
|
int32_t length_bytes;
|
|
|
|
//fprintf(stderr, "\nelt size in C: %u, value len = %d\n", elt_size, value_length);
|
|
//for (int i=0; i<value_length; i++)
|
|
// fprintf(stderr, "%d - ", ((obiint_t*)value)[i]);
|
|
|
|
length_bytes = value_length * elt_size / 8;
|
|
|
|
//fprintf(stderr, "\nlength_bytes: %d", length_bytes);
|
|
|
|
// Encode value
|
|
value_b = obi_blob((byte_t*)value, elt_size, length_bytes, length_bytes);
|
|
if (value_b == NULL)
|
|
return -1;
|
|
|
|
//for (int i=0; i<value_length; i++)
|
|
// fprintf(stderr, "\nin blob: value %d\n", ((obiint_t*)(value_b->value))[i]);
|
|
|
|
// Add in the indexer
|
|
idx = obi_indexer_add(indexer, value_b);
|
|
|
|
free(value_b);
|
|
|
|
return idx;
|
|
}
|
|
|
|
|
|
const void* obi_retrieve_array(Obi_indexer_p indexer, index_t idx, int32_t* value_length_p)
|
|
{
|
|
Obi_blob_p value_b;
|
|
|
|
// Get encoded value
|
|
value_b = obi_indexer_get(indexer, idx);
|
|
|
|
//fprintf(stderr, "\nlen in blob: %d, elt size %u", value_b->length_decoded_value, value_b->element_size);
|
|
|
|
// Store array length
|
|
*value_length_p = (value_b->length_decoded_value) * 8 / (value_b->element_size);
|
|
|
|
//fprintf(stderr, "\ngetting length: %d\n", *value_length_p);
|
|
//for (int i=0; i<*value_length_p; i++)
|
|
// fprintf(stderr, "\nin blob getting: value %d\n", ((obiint_t*)(value_b->value))[i]);
|
|
|
|
// Return pointer on mapped array
|
|
return ((void*) (value_b->value));
|
|
}
|
|
|