src/liboconfig/oconfig.c

   1 /**
   2  * oconfig - src/oconfig.c
   3  * Copyright (C) 2006,2007  Florian octo Forster <octo at verplant.org>
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation; only version 2 of the License is applicable.
   8  *
   9  * This program is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
  12  * more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along with
  15  * this program; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  17  */
  18
  19 #include <stdlib.h>
  20 #include <stdio.h>
  21 #include <string.h>
  22 #include <assert.h>
  23 #include <errno.h>
  24
  25 #include "oconfig.h"
  26
  27 extern FILE *yyin;
  28
  29 oconfig_item_t *ci_root;
  30 char           *c_file;
  31
  32 static void yyset_in  (FILE *fd)
  33 {
  34   yyin = fd;
  35 } /* void yyset_in */
  36
  37 oconfig_item_t *oconfig_parse_fh (FILE *fh)
  38 {
  39   int status;
  40   oconfig_item_t *ret;
  41
  42   char file[10];
  43
  44   yyset_in (fh);
  45
  46   if (NULL == c_file) {
  47     int status;
  48
  49     status = snprintf (file, sizeof (file), "<fd#%d>", fileno (fh));
  50
  51     if ((status < 0) || (status >= sizeof (file))) {
  52       c_file = "<unknown>";
  53     }
  54     else {
  55       file[sizeof (file) - 1] = '\0';
  56       c_file = file;
  57     }
  58   }
  59
  60   status = yyparse ();
  61   if (status != 0)
  62   {
  63     fprintf (stderr, "yyparse returned error #%i\n", status);
  64     return (NULL);
  65   }
  66
  67   c_file = NULL;
  68
  69   ret = ci_root;
  70   ci_root = NULL;
  71   yyset_in ((FILE *) 0);
  72
  73   return (ret);
  74 } /* oconfig_item_t *oconfig_parse_fh */
  75
  76 oconfig_item_t *oconfig_parse_file (const char *file)
  77 {
  78   FILE *fh;
  79   oconfig_item_t *ret;
  80
  81   c_file = file;
  82
  83   fh = fopen (file, "r");
  84   if (fh == NULL)
  85   {
  86     fprintf (stderr, "fopen (%s) failed: %s\n", file, strerror (errno));
  87     return (NULL);
  88   }
  89
  90   ret = oconfig_parse_fh (fh);
  91   fclose (fh);
  92
  93   c_file = NULL;
  94
  95   return (ret);
  96 } /* oconfig_item_t *oconfig_parse_file */
  97
  98 void oconfig_free (oconfig_item_t *ci)
  99 {
 100   int i;
 101
 102   if (ci == NULL)
 103     return;
 104
 105   if (ci->key != NULL)
 106     free (ci->key);
 107
 108   for (i = 0; i < ci->values_num; i++)
 109     if ((ci->values[i].type == OCONFIG_TYPE_STRING)
 110         && (NULL != ci->values[i].value.string))
 111       free (ci->values[i].value.string);
 112
 113   if (ci->values != NULL)
 114     free (ci->values);
 115
 116   for (i = 0; i < ci->children_num; i++)
 117     oconfig_free (ci->children + i);
 118
 119   if (ci->children != NULL)
 120     free (ci->children);
 121 }
 122
 123 /*
 124  * vim:shiftwidth=2:tabstop=8:softtabstop=2
 125  */