void test_double_float() {
test_header();
double d = 2.2354e-10;
float f = d;
uint32_t i = 7821334;
uchar_vec b;
unsigned char *buffer = NULL;
kv_init(b);
dump_double(d, &b);
buffer = b.a;
fprintf(stderr, "%g == %g - ", d, load_double(&buffer));
fprintf(stderr, "buffer used: %zu\n", buffer - b.a);
kv_clear(b);
dump_float(f, &b);
buffer = b.a;
fprintf(stderr, "%g == %g - ", d, load_float(&buffer));
fprintf(stderr, "buffer used: %zu\n", buffer - b.a);
kv_clear(b);
dump_uint32(i, &b);
buffer = b.a;
fprintf(stderr, "%d == %d - ", i, load_uint32(&buffer));
fprintf(stderr, "buffer used: %zu\n", buffer - b.a);
kv_destroy(b);
}
/*read the data contain in the file
*/
int32_t macsim_read(GenericReader_T* genreader,glu_item_t* item)
{
char data_var[LG_MAX_STRING_MACSIM];
uint32_t indice_data=0,
rep=EOF,
dimension=0;
uint8_t continuer=1;
TSP_sample_symbol_info_list_t ssi_list;
ssi_list=*genreader->ssi_list;
if(NULL!=genreader->handler->file)
{
/*TYPE_CHAR or TYPE_UCHAR is a string of LG_MAX_STRING_MACSIM length */
if( (TSP_TYPE_CHAR==ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].type)
|| (TSP_TYPE_UCHAR==ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].type) )
{
item->size=ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].dimension;
/*calculate the real dimension for the string symbol*/
dimension=ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].dimension/LG_MAX_STRING_MACSIM;
}
else
{
item->size=ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].dimension;
dimension=ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].dimension;
}
item->size*=tsp_type_size[ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].type];
while( continuer &&
(indice_data<dimension))
{
memset(data_var,'\0',LG_MAX_STRING_MACSIM);
/*read one data of the file*/
rep=read_data_file(genreader->handler->file,data_var);
if(EOF!=rep)
{
/*end of line*/
if(END_SAMPLE_SET==rep)
{
continuer=0;
}
/*load retrieve data in the raw value*/
switch(ssi_list.TSP_sample_symbol_info_list_t_val[item->provider_global_index].type)
{
case TSP_TYPE_DOUBLE :
load_double(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_FLOAT :
load_float(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_INT8 :
load_int8(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_INT16:
load_int16(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_INT32 :
load_int32(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_INT64 :
load_int64(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_UINT8:
load_uint8(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_UINT16:
load_uint16(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_UINT32:
load_uint32(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_UINT64:
load_uint64(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_CHAR:
load_char(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_UCHAR:
load_uchar(data_var,item->raw_value,indice_data);
break;
case TSP_TYPE_RAW:
load_type_raw(data_var,item->raw_value,indice_data);
break;
default:
break;
}
++indice_data;
}
else
{
continuer=0;
}
}
}
return(rep);
}
