readasciifile.c

Go to the documentation of this file.

 
/*****************************************************************************/
#include "tpcclibConfig.h"
/*****************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/*****************************************************************************/
#include "tpcextensions.h"
/*****************************************************************************/
 
/*****************************************************************************/
size_t asciiFileSize(
  FILE *fp,
  int *nonprintable
) {
  if(nonprintable!=NULL) *nonprintable=0;
  if(fp==NULL) return(0);
  size_t n, bn;
  int c;
  n=bn=0;
  while((c=fgetc(fp))!=EOF && n<SIZE_MAX-1 && bn<2) {
    if(iscntrl(c) && c!=13 && c!=10 && c!=9 && c!=169) {
      bn++;
      if(c!=0) {
        if(nonprintable!=NULL) *nonprintable=1; 
        break;
      }
    }
    n++;
  }
  rewind(fp);
  if(nonprintable!=NULL && bn>1) *nonprintable=1; 
  return n;
}
/*****************************************************************************/
 
/*****************************************************************************/
#if(0) // NOT finalized, better to do with strings read line-by-line
 
size_t asciiFileChrCount(
  FILE *fp,
  const char *s,
  int omit_comments,
  int omit_quoted
) {
  size_t n=0;
  if(fp==NULL) return(n);
  if(s==NULL || strnlen(s, 1)==0) return(n);
  int c, j;
  int comment_line=0;
  int single_quotation=0;
  int double_quotation=0;
  while((c=fgetc(fp))!=EOF && n<SIZE_MAX-1) {
    /* Stop if non-printable character */
    if(iscntrl(c) && c!=13 && c!=10 && c!=9) break;
    /* Check for quotations */
    if(c=='\'') {
      if(single_quotation==0 && strchr(cptr+1, '\'')!=NULL) single_quotation=1;
      else single_quotation=0;
      continue;
    }
    if(*cptr=='\"') {
      if(double_quotation==0 && strchr(cptr+1, '\"')!=NULL) double_quotation=1;
      else double_quotation=0;
      continue;
    }
    if(single_quotation==1 || double_quotation==1) continue;
 
 
    /* Is character included in s ? */
    for(j=0; j<strlen(s); j++) if(c==(int)s[j]) n++;
    n++;
  }
  rewind(fp);
  return(n);
}
#endif
/*****************************************************************************/
 
/*****************************************************************************/
char *asciiFileRead(
  FILE *fp,
  char *data,
  size_t maxlen
) {
  /* Check the input */
  if(fp==NULL || maxlen<2) return NULL;
  /* Allocate memory if needed */
  char *cptr;
  if(data!=NULL) cptr=data; else {
    cptr=malloc(maxlen*sizeof(char)); if(cptr==NULL) return NULL;
  }
  size_t i=0; int c;
  while((c=fgetc(fp))!=EOF && i<maxlen-1) cptr[i++]=(char)c;
  cptr[i]=(char)0; if(i==0) {if(data==NULL) free(cptr); cptr=NULL;}
  return cptr;
}
/*****************************************************************************/
 
/*****************************************************************************/
int asciiCommentLine(
  const char *line,
  int *cont
) {
  if(cont!=NULL) *cont=0; 
  if(line==NULL) return 0;
  char *cptr=(char*)line;
  int i=strspn(cptr, " \t"); cptr+=i; if(cont!=NULL) *cont=i;
  if(*cptr!='#') return 0;
  if(cont==NULL) return 1;
  cptr++; i=strspn(cptr, " \t"); *cont+=(i+1);
  return 1;
}
/*****************************************************************************/
 
/*****************************************************************************/