Files
obitools3/src/obidmscolumn_idx.c

69 lines
2.0 KiB
C
Raw Normal View History

2016-02-18 10:38:51 +01:00
/****************************************************************************
* 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
*
**********************************************************************/
int obi_column_set_index_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx, index_t value)
2016-02-18 10:38:51 +01:00
{
if (obi_column_prepare_to_set_value(column, line_nb, element_idx) < 0)
return -1;
2016-02-18 10:38:51 +01:00
// Set the value
*(((index_t*) (column->data)) + (line_nb * ((column->header)->nb_elements_per_line)) + element_idx) = value;
2016-02-18 10:38:51 +01:00
return 0;
}
index_t obi_column_get_index_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx)
2016-02-18 10:38:51 +01:00
{
if (obi_column_prepare_to_get_value(column, line_nb) < 0)
2016-02-18 10:38:51 +01:00
return OBIIdx_NA;
return *(((index_t*) (column->data)) + (line_nb * ((column->header)->nb_elements_per_line)) + element_idx);
2016-02-18 10:38:51 +01:00
}
int obi_column_set_index_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name, index_t value)
{
index_t element_idx = obi_column_get_element_index_from_name(column, element_name);
if (element_idx == OBIIdx_NA)
return -1;
return obi_column_set_index_with_elt_idx(column, line_nb, element_idx, value);
}
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);
}