obidmscolumn_idx.c 1.98 KB
Newer Older
Celine Mercier committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
/****************************************************************************
 * OBIDMS_column_idx functions                                              *
 ****************************************************************************/

/**
 * @file obidsmcolumn_idx.c
 * @author Celine Mercier
 * @date February 14th 2016
 * @brief Functions handling OBIColumns containing data with the index_t type.
 */


#include <stdlib.h>
#include <stdio.h>

#include "obidmscolumn.h"
#include "obitypes.h"


/**********************************************************************
 *
 * D E F I N I T I O N   O F   T H E   P U B L I C   F U N C T I O N S
 *
 **********************************************************************/


27
int obi_column_set_index_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx, index_t value)
Celine Mercier committed
28
{
29
	if (obi_column_prepare_to_set_value(column, line_nb, element_idx) < 0)
30
		return -1;
Celine Mercier committed
31 32

	// Set the value
33
	*(((index_t*) (column->data)) + (line_nb * ((column->header)->nb_elements_per_line)) + element_idx) = value;
Celine Mercier committed
34 35 36 37 38

	return 0;
}


39
index_t obi_column_get_index_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx)
Celine Mercier committed
40
{
41
	if (obi_column_prepare_to_get_value(column, line_nb) < 0)
Celine Mercier committed
42 43
		return OBIIdx_NA;

44
	return *(((index_t*) (column->data)) + (line_nb * ((column->header)->nb_elements_per_line)) + element_idx);
Celine Mercier committed
45 46
}

47

48
int obi_column_set_index_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name, index_t value)
49
{
50 51 52
	index_t element_idx = obi_column_get_element_index_from_name(column, element_name);
	if (element_idx == OBIIdx_NA)
		return -1;
53

54
	return obi_column_set_index_with_elt_idx(column, line_nb, element_idx, value);
55 56 57 58 59 60 61 62 63 64 65 66 67 68
}


index_t obi_column_get_index_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name)
{
	index_t element_idx = obi_column_get_element_index_from_name(column, element_name);
	if (element_idx == OBIIdx_NA)
		return OBIIdx_NA;

	return obi_column_get_index_with_elt_idx(column, line_nb, element_idx);
}