iftget.c

Go to the documentation of this file.

 
/*****************************************************************************/
#include "tpcclibConfig.h"
/*****************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <time.h>
#include <string.h>
/*****************************************************************************/
#include "tpcift.h"
/*****************************************************************************/
 
/*****************************************************************************/
int iftGetFloat(
  IFT *ift,
  int index,
  float *v
) {
  if(v!=NULL) *v=nanf(""); else return -2;
  if(ift==NULL) return -2;
  if(index<0 || index>=ift->keyNr) return -2;
  if(ift->item[index].value==NULL) return -1;
  if(sscanf(ift->item[index].value, "%f", v)!=1 || isnan(*v)) return -1;
  return 0;
}
/*****************************************************************************/
 
/*****************************************************************************/
int iftGetDouble(
  IFT *ift,
  int index,
  double *v
) {
  if(v!=NULL) *v=nan(""); else return -2;
  if(ift==NULL) return -2;
  if(index<0 || index>=ift->keyNr) return -2;
  if(ift->item[index].value==NULL) return -1;
  if(sscanf(ift->item[index].value, "%lf", v)!=1 || isnan(*v)) return -1;
  return 0;
}
/*****************************************************************************/
 
/*****************************************************************************/
int iftGetInt(
  IFT *ift,
  int index,
  int *v
) {
  if(v!=NULL) *v=-9999; else return -2;
  if(ift==NULL) return -2;
  if(index<0 || index>=ift->keyNr) return -2;
  if(ift->item[index].value==NULL) return -1;
  if(sscanf(ift->item[index].value, "%d", v)!=1 || *v==-9999) return -1;
  return 0;
}
/*****************************************************************************/
 
/*****************************************************************************/
int iftGetUInt(
  IFT *ift,
  int index,
  unsigned int *v
) {
  if(v!=NULL) *v=0; else return -2;
  if(ift==NULL) return -2;
  if(index<0 || index>=ift->keyNr) return -2;
  if(ift->item[index].value==NULL) return -1;
  if(sscanf(ift->item[index].value, "%ud", v)!=1) return -1;
  return 0;
}
/*****************************************************************************/
 
/*****************************************************************************/
int iftGetDoubleWithUnit(
  IFT *ift,
  int index,
  double *v,
  int *unit
) {
  if(v!=NULL) *v=nan("");
  if(unit!=NULL) *unit=UNIT_UNKNOWN;
  if(ift==NULL) return(2);
  if(index<0 || index>=ift->keyNr) return(1);
  if(ift->item[index].value==NULL) return(2);
  char s[128];
  if(strTokenNCpy(ift->item[index].value, " \t", 1, s, 128)==0) return(2);
  if(v!=NULL) *v=atofVerified(s);
  if(unit==NULL) return(0);
  if(strTokenNCpy(ift->item[index].value, " \t", 2, s, 128)==0) return(0);
  strCleanPars(s); *unit=unitIdentify(s);
  return 0;
}
/*****************************************************************************/
 
/*****************************************************************************/