116 lines
3.5 KiB
C
116 lines
3.5 KiB
C
/****************************************************************************
|
|
* OBIDMS_column_qual functions *
|
|
****************************************************************************/
|
|
|
|
/**
|
|
* @file obidsmcolumn_qual.c
|
|
* @author Celine Mercier
|
|
* @date May 4th 2016
|
|
* @brief Functions handling OBIColumns containing data in the form of indices referring to sequence quality arrays.
|
|
*/
|
|
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <stdint.h>
|
|
|
|
#include "obidmscolumn.h"
|
|
#include "obitypes.h"
|
|
#include "obidmscolumn_str.c"
|
|
|
|
|
|
/**********************************************************************
|
|
*
|
|
* 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_obiqual_char_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx, const char* value)
|
|
{ // TODO discuss
|
|
return obi_column_set_obistr_with_elt_idx(column, line_nb, element_idx, value);
|
|
}
|
|
|
|
|
|
int obi_column_set_obiqual_int_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx, const uint8_t* value)
|
|
{
|
|
char* value_char;
|
|
|
|
// Transform the int array into a char array
|
|
// Length??
|
|
//value_char = ;
|
|
|
|
obi_column_set_obiqual_char_with_elt_idx(column, line_nb, element_idx, value_char)
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
char* obi_column_get_obiqual_char_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx)
|
|
{ // TODO discuss
|
|
char* value;
|
|
|
|
value = obi_column_get_obistr_with_elt_idx(column, line_nb, element_idx);
|
|
if (strcmp(value, OBIStr_NA) == 0)
|
|
return OBIQual_char_NA;
|
|
|
|
return value;
|
|
}
|
|
|
|
|
|
uint8_t* obi_column_get_obiqual_int_with_elt_idx(OBIDMS_column_p column, index_t line_nb, index_t element_idx) // TODO const? (mapped)
|
|
{
|
|
index_t idx;
|
|
|
|
if (obi_column_prepare_to_get_value(column, line_nb) < 0)
|
|
return OBIQual_int_NA;
|
|
|
|
idx = *(((index_t*) (column->data)) + (line_nb * ((column->header)->nb_elements_per_line)) + element_idx);
|
|
|
|
// Check NA
|
|
if (idx == OBIIdx_NA)
|
|
return OBIQual_int_NA;
|
|
|
|
return obi_retrieve_quality_int(column->indexer, idx);
|
|
}
|
|
|
|
|
|
int obi_column_set_obiqual_char_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name, const char* 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_obiqual_char_with_elt_idx(column, line_nb, element_idx, value);
|
|
}
|
|
|
|
|
|
int obi_column_set_obiqual_int_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name, uint8_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_obiqual_int_with_elt_idx(column, line_nb, element_idx, value);
|
|
}
|
|
|
|
|
|
char* obi_column_get_obiqual_char_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 OBIQual_char_NA;
|
|
|
|
return obi_column_get_obiqual_char_with_elt_idx(column, line_nb, element_idx);
|
|
}
|
|
|
|
|
|
uint8_t* obi_column_get_obiqual_int_with_elt_name(OBIDMS_column_p column, index_t line_nb, const char* element_name) // TODO const? (mapped)
|
|
{
|
|
index_t element_idx = obi_column_get_element_index_from_name(column, element_name);
|
|
if (element_idx == OBIIdx_NA)
|
|
return OBIQual_int_NA;
|
|
|
|
return obi_column_get_obiqual_int_with_elt_idx(column, line_nb, element_idx);
|
|
}
|
|
|