configfile.c

Go to the documentation of this file.

/*----------------------------------------------------------------------------
 secwatch - Copyright (C) 2006 Nic Stevens -- See COPYING for license details
------------------------------------------------------------------------------
 configfile.c - load configuration data from specified file and provide
 functions to return config vars in various formats.
-----------------------------------------------------------------------------*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <syslog.h>
#include "log.h"
#include "strutil.h"
#include "module.h"
#define CONFIG_DECL
#include "configfile.h"

int confVarInt(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type != ci_integer) {
                    *eptr = EINVAL;
                    return -1;
               }
               return config[i].val.i;
          }
     }
     *eptr = ENOENT;
     return -1;
}
int confVarBool(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type != ci_boolean) {
                    *eptr = EINVAL;
                    return -1;
               }
               return config[i].val.i;
          }
     }
     *eptr = ENOENT;
     return -1;
}
int confVarSyslog(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type == ci_logpri || config[i].type == ci_logfac) 
                    return config[i].val.i;
               *eptr = EINVAL;
               return -1;
          }
     }
     *eptr = ENOENT;
     return -1;
}
char * confVarText(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type != ci_text) {
                    *eptr = EINVAL;
                    return NULL;
               }
               return config[i].val.s;
          }
     }
     *eptr = ENOENT;
     return NULL;
}
char * confVarPath(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type != ci_pathname) {
                    *eptr = EINVAL;
                    return NULL;
               }
               return config[i].val.s;
          }
     }
     *eptr = ENOENT;
     return NULL;
}
char ** confVarFlist(char *name, int *eptr) {
     int i;
     *eptr = 0;
     for(i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               if(config[i].type != ci_flist) {
                    *eptr = EINVAL;
                    return NULL;
               }
               return config[i].val.a;
          }
     }
     *eptr = ENOENT;
     return NULL;
}
char *fixupPathName(char *val, char  *path) {
     size_t sz;
     char *tb, *tb1 = "", *tb2 = "/", tmp[2049];

     if(*val == '/')
          return val;

     if(path[strlen(path)-1] != '/')
          tb = tb2;
     else
          tb = tb1;

     sprintf(tmp,"%s%s%s",path,tb,val);
     sz = strlen(tmp)+5;
     if((val = realloc(val,sz)) == NULL)
          return NULL;
     strcpy(val,tmp);
     return val;
}
int getBooleanValue(char *s, int *v) {
     LOCAL char * bools[2][3] = {{"false","off","no"},{"true","on","yes"}};
     int i, j;
     *v = -1;
     for(i = 0; i < 2; i++) { 
          for(j = 0; j < 3; j++) {
               if(strcasecmp(s,bools[i][j]) == 0) {
                    *v = i;
                    return 0;
               }
          }
     }
     return -1;
}
LOCAL cfgitem_t *  _configTabEntry(char *name) {
     int i;
     for (i = 0; config[i].name != NULL; i++) {
          if(strcmp(config[i].name,name) == 0) {
               return &config[i];
          }
     }
     errno = ENOENT;
     return NULL;
}
int readConfig(char *file, char *ebuf, size_t ebsiz) {
     char buf[1024], _name[1024], _val[1024], *name, *val;
     char cbuf[1024];
     char *p, *ep, *p1;
     int i, line = 0;
     cfgitem_t *c;
     FILE *f;
     
     if((f = fopen(file,"r")) == NULL) {
          snprintf(ebuf,ebsiz,"%s(%d) Cannot open config file \"%s\": %m",file,line,file);
          return -1;
     }
     while((p = fgets(buf,sizeof(buf)-1,f)) != NULL) {
          line++;
          if(*p == '#') continue;
          if((p = strchr(buf,'#')) != NULL)
               *p = '\0';
          if((p = strchr(buf,'=')) == NULL)
               continue;
          *p++  = '\0';
          strcpy(_name,buf);
          strcpy(_val,p);
          name = trim(_name);
          val = trim(_val);
          if(strcmp(name,"loadmodule") == 0) {
               if(loadModule(val,cbuf,sizeof(cbuf))) {
                    snprintf(ebuf,ebsiz,"%s(%d): Error loading module: %s",file,line,cbuf);
                    return -1;
               }
               printf("module %s loaded\n",val);
               continue;
          }
          if((c = _configTabEntry(name)) == NULL) {
               snprintf(ebuf,ebsiz,"%s(%d): invalid configuration item %s",file,line,name);
               fclose(f);
               return -1;
          }
          switch(c->type) {
          case ci_pathname:
               if((c->val.s = strdup(val)) == NULL) {
                    snprintf(ebuf,ebsiz,"%s(%d): Could not alloc space for %s: %m",file,line,name);
                    fclose(f);
                    return -1;
               }
               break;
          case ci_integer:
               c->val.i = atoi(val);
               break;
          case ci_boolean:
               if(getBooleanValue(val,&c->val.i)) {
                    snprintf(ebuf,ebsiz,"%s(%d): Cannot evaluate boolen from %s",file,line,val);
                    return -1;
               }
               break;
          case ci_text:
               if((c->val.s = strdup(val)) == NULL) {
                    snprintf(ebuf,ebsiz,"%s(%d): Could not alloc space for %s: %m",file,line,name);
                    fclose(f);
                    return -1;
               }
               break;
          case ci_logpri:
               if((c->val.i = sysLogPri(val)) == -1) {
                    snprintf(ebuf,ebsiz,"%s(%d): Cannot parse log priority from \"%s\"\n",file,line,val);
                    return -1;
               }
               break;
          case ci_logfac:
               if((c->val.i = sysLogFac(val)) == -1) {
                    snprintf(ebuf,ebsiz,"%s(%d): Cannot parse log facility from \"%s\"\n",file,line,val);
                    return -1;
               }
               break;
          case ci_flist:
               if((c->val.a = split(",",trim(val))) == NULL) {
                    snprintf(ebuf,ebsiz,"%s(%d): Cannot split flist \"%s\": %m",file,line,name);
                    return -1;
               }
               break;
          }
     }
     fclose(f);
     return 0;
}

void dumpConfig() {
     int i, j;
     char *types[] = {"ci_pathname","ci_integer","ci_boolean","ci_logpri","ci_logfac","ci_text","ci_flist"};
     printf(">> Configuration Dump <<\n");
     for(i = 0; config[i].name != NULL; i++) {
          printf("%-15.15s\t%-15.15s\t",
                 config[i].name,types[config[i].type]);
          switch(config[i].type) {
          case ci_pathname:
          case ci_text:
               printf("%s",(config[i].val.s) ? config[i].val.s : "null");
               break;
          case ci_logfac:
               printf("%s",sysLogFacId(config[i].val.i));
               break;
          case ci_logpri:
               printf("%s",sysLogPriId(config[i].val.i));
               break;
          case ci_integer:
               printf("%d",config[i].val.i);
               break;
          case ci_boolean:
               printf("%s",(config[i].val.i) ? "true" : "false");
               break;
          case ci_flist:
               for(j = 0; config[i].val.a[j] != NULL; j++) {
                    if(config[i].val.a[j+1] == NULL)
                         printf("%s",config[i].val.a[j]);
                    else
                         printf("%s,",config[i].val.a[j]);
               }
               break;
          default:
               printf("unknown type %d\n",config[i].type);
               break;
          }
          printf("\n");
     }
}

---