73 lines
1.9 KiB
C
73 lines
1.9 KiB
C
|
/****************************************************************************
|
||
|
|
* 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"
|
||
|
|
#include "obierrno.h"
|
||
|
|
#include "obidebug.h"
|
||
|
|
|
||
|
|
|
||
|
|
#define DEBUG_LEVEL 0 // TODO has to be defined somewhere else (cython compil flag?)
|
||
|
|
|
||
|
|
|
||
|
|
/**********************************************************************
|
||
|
|
*
|
||
|
|
* 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(OBIDMS_column_p column, index_t line_nb, index_t value)
|
||
|
|
{
|
||
|
|
// Check that the line number is not greater than the maximum allowed
|
||
|
|
if (line_nb >= MAXIMUM_LINE_COUNT)
|
||
|
|
{
|
||
|
|
obi_set_errno(OBICOL_UNKNOWN_ERROR);
|
||
|
|
obidebug(1, "\nError trying to set a value at a line number greater than the maximum allowed");
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Check if the file needs to be enlarged
|
||
|
|
while ((line_nb+1) > (column->header)->line_count)
|
||
|
|
{
|
||
|
|
// Enlarge the file
|
||
|
|
if (obi_enlarge_column(column) < 0)
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Update lines used
|
||
|
|
if ((line_nb+1) > (column->header)->lines_used)
|
||
|
|
(column->header)->lines_used = line_nb+1;
|
||
|
|
|
||
|
|
// Set the value
|
||
|
|
*(((index_t*) (column->data)) + line_nb) = value;
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
index_t obi_column_get_index(OBIDMS_column_p column, index_t line_nb)
|
||
|
|
{
|
||
|
|
if ((line_nb+1) > ((column->header)->line_count))
|
||
|
|
{
|
||
|
|
obi_set_errno(OBICOL_UNKNOWN_ERROR);
|
||
|
|
obidebug(1, "\nError trying to get a value that is beyond the current number of lines used in the column");
|
||
|
|
return OBIIdx_NA;
|
||
|
|
}
|
||
|
|
|
||
|
|
return *(((index_t*) (column->data)) + line_nb);
|
||
|
|
}
|
||
|
|
|