getconf.c

Go to the documentation of this file.

#include "stralloc.h"
#include "byte.h"
#include "logmsg.h"
#include "getconf.h"
#include "idx.h"
#include "errtxt.h"
#include "readclose.h"
 
#define WHO "getconf"

 
void die_nomem() { logmsg(WHO,111,FATAL,ERR_NOMEM); } 
 
static stralloc data = {0};
 
int getconf(stralloc *sa,const char *fn,int flagrequired,const char *dir)
{
  int i;
  int j;
  int k;
 
  if (!stralloc_copys(&data,"")) die_nomem();
 
  switch (openreadclose(fn,&data,128)) {
    case -1: logmsg(WHO,111,FATAL,B("unable to read :",dir,"/",fn));
    case  0: if (!flagrequired) return 0;
             logmsg(WHO,100,FATAL,B(dir,"/",fn," does not exist"));
  }
 
  if (!stralloc_append(&data,"\n")) die_nomem();
  if (!stralloc_copys(sa,"")) die_nomem();
 
  i = 0;
  for (j = 0; j < data.len; ++j)
    if (data.s[j] == '\n') {
      k = j;
      while ((k > i) && ((data.s[k-1] == ' ') || (data.s[k-1] == '\t'))) 
        --k;
      if ((k > i) && (data.s[i] != '#')) {
        if (!stralloc_catb(sa,data.s + i,k - i)) die_nomem();
        if (!stralloc_0(sa)) die_nomem();
      }
      i = j + 1;
    }
  return 1;
}
 
int getconf_line(stralloc *sa,const char *fn,int flagrequired,const char *dir)
{
  if (!getconf(sa,fn,flagrequired,dir)) return 0;
  sa->len = byte_chr(sa->s,sa->len,0);
  return 1;
}