hostinfod/configuration.c

   1 /* virt-hostinfo
   2  * Copyright (C) 2009 Red Hat Inc.
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 #include <config.h>
  21 #endif
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <unistd.h>
  27
  28 #include <apr_general.h>
  29 #include <apr_strings.h>
  30
  31 #include "hostinfod.h"
  32
  33 typedef int (*process_line_fn) (const char *path, int lineno,
  34                                 const char *key, const char *value);
  35 typedef int (*process_section_fn) (const char *path, int lineno,
  36                                    const char *section);
  37 static void process_conf_file (const char *path, int exit_if_not_exist,
  38                                process_line_fn process_line,
  39                                process_section_fn process_section);
  40 static int get_bool (const char *str);
  41
  42 /* Read the main configuration file. */
  43 static int main_process_line (const char *path, int lineno, const char *key, const char *value);
  44
  45 void
  46 read_main_conf_file (void)
  47 {
  48   process_conf_file (conf_file, 0, main_process_line, NULL);
  49 }
  50
  51 static int
  52 main_process_line (const char *path, int lineno,
  53                    const char *key, const char *value)
  54 {
  55   int bool;
  56
  57   if (strcasecmp (key, "guests") == 0) {
  58     if (!value) {
  59       error ("%s:%d: directive is empty: %s", path, lineno, key);
  60       return -1;
  61     }
  62     guests_file = apr_pstrdup (pool, value);
  63   } else if (strcasecmp (key, "sockets") == 0) {
  64     if (!value) {
  65       error ("%s:%d: directive is empty: %s", path, lineno, key);
  66       return -1;
  67     }
  68     socket_dir = apr_pstrdup (pool, value);
  69   } else if (strcasecmp (key, "verbose") == 0) {
  70     bool = get_bool (value);
  71     if (bool == -1) {
  72       error ("%s:%d: %s: not a valid boolean - use 1 or 0", path, lineno, key);
  73       return -1;
  74     }
  75     if (!verbose_set_on_cmdline)
  76       verbose = bool;
  77   } else if (strcasecmp (key, "foreground") == 0) {
  78     bool = get_bool (value);
  79     if (bool == -1) {
  80       error ("%s:%d: %s: not a valid boolean - use 1 or 0", path, lineno, key);
  81       return -1;
  82     }
  83     if (!foreground_set_on_cmdline)
  84       foreground = bool;
  85   } else {
  86     error ("%s:%d: unknown directive in configuration file: %s",
  87            path, lineno, key);
  88     return -1;
  89   }
  90   return 0;
  91 }
  92
  93 /* Configuration file parser. */
  94 static void
  95 process_conf_file (const char *path, int exit_if_not_exist,
  96                    process_line_fn process_line,
  97                    process_section_fn process_section)
  98 {
  99   static const char *whitespace = " \t\n\v";
 100   FILE *fp;
 101   char *line = NULL;
 102   int lineno = 0;
 103   size_t len = 0;
 104   size_t real_len, key_len;
 105   ssize_t r;
 106   const char *key, *value;
 107
 108   debug ("begin processing configuration file %s", path);
 109
 110   fp = fopen (path, "r");
 111   if (!fp) {
 112     if (exit_if_not_exist) {
 113       perrorf ("%s", path);
 114       exit (1);
 115     } else
 116       pwarningf ("%s", path);
 117     return;
 118   }
 119
 120   while ((r = getline (&line, &len, fp)) != -1) {
 121     lineno++;
 122
 123     /* Remove trailing \n */
 124     real_len = len;
 125     if (real_len > 0 && line[real_len-1] == '\n')
 126       line[--real_len] = '\0';
 127
 128     /* Ignore blank lines and comments. */
 129     if (real_len == 0)
 130       continue;
 131     if (line[0] == '#' || strspn (line, whitespace) == real_len)
 132       continue;
 133
 134     if (line[0] == '[') {       /* Section. */
 135       if (line[real_len-1] == ']')
 136         line[--real_len] = '\0';
 137       else {
 138         error ("%s:%d: in section header, ']' not found (is there trailing whitespace or a comment?), near: %s",
 139                path, lineno, line);
 140         exit (1);
 141       }
 142
 143       debug ("configuration file: section [%s]", line);
 144
 145       if (process_section && process_section (path, lineno, line) == -1)
 146         exit (1);
 147     }
 148     else {                      /* Key value */
 149       key_len = strcspn (line, whitespace);
 150       line[key_len] = '\0';
 151       key = line;
 152       value = key_len < real_len ? &line[key_len+1] : NULL;
 153       if (value) {
 154         value += strspn (line, whitespace);
 155         if (value[0] == '\0')
 156           value = NULL;
 157       }
 158
 159       debug ("configuration file: key '%s', value '%s'", key, value);
 160
 161       if (process_line && process_line (path, lineno, key, value) == -1)
 162         exit (1);
 163     }
 164   }
 165
 166   free (line);
 167
 168   if (ferror (fp)) {
 169     error ("%s: error reading configuration file", path);
 170     exit (1);
 171   }
 172   if (fclose (fp) == EOF) {
 173     perrorf ("%s", path);
 174     exit (1);
 175   }
 176
 177   debug ("finished processing configuration file successfully");
 178 }
 179
 180 static int
 181 get_bool (const char *str)
 182 {
 183   if (!str)
 184     return -1;
 185
 186   if (strcasecmp (str, "on") == 0)
 187     return 1;
 188   if (strcasecmp (str, "off") == 0)
 189     return 0;
 190
 191   switch (str[0]) {
 192   case '1': case 'y': case 'Y': case 't': case 'T': case 'e': case 'E':
 193     return 1;
 194   case '0': case 'n': case 'N': case 'f': case 'F': case 'd': case 'D':
 195     return 0;
 196   }
 197
 198   return -1;
 199 }