1 /**
2 * collectd - src/liboconfig/oconfig.c
3 * Copyright (C) 2006,2007 Florian Forster
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
22 *
23 * Authors:
24 * Florian Forster <octo at collectd.org>
25 **/
27 #include <stdlib.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <assert.h>
31 #include <errno.h>
33 #include "oconfig.h"
35 extern FILE *yyin;
37 oconfig_item_t *ci_root;
38 const char *c_file;
40 static void yyset_in (FILE *fd)
41 {
42 yyin = fd;
43 } /* void yyset_in */
45 oconfig_item_t *oconfig_parse_fh (FILE *fh)
46 {
47 int status;
48 oconfig_item_t *ret;
50 char file[10];
52 yyset_in (fh);
54 if (NULL == c_file) {
55 int status;
57 status = snprintf (file, sizeof (file), "<fd#%d>", fileno (fh));
59 if ((status < 0) || (status >= sizeof (file))) {
60 c_file = "<unknown>";
61 }
62 else {
63 file[sizeof (file) - 1] = '\0';
64 c_file = file;
65 }
66 }
68 status = yyparse ();
69 if (status != 0)
70 {
71 fprintf (stderr, "yyparse returned error #%i\n", status);
72 return (NULL);
73 }
75 c_file = NULL;
77 ret = ci_root;
78 ci_root = NULL;
79 yyset_in ((FILE *) 0);
81 return (ret);
82 } /* oconfig_item_t *oconfig_parse_fh */
84 oconfig_item_t *oconfig_parse_file (const char *file)
85 {
86 FILE *fh;
87 oconfig_item_t *ret;
89 c_file = file;
91 fh = fopen (file, "r");
92 if (fh == NULL)
93 {
94 fprintf (stderr, "fopen (%s) failed: %s\n", file, strerror (errno));
95 return (NULL);
96 }
98 ret = oconfig_parse_fh (fh);
99 fclose (fh);
101 c_file = NULL;
103 return (ret);
104 } /* oconfig_item_t *oconfig_parse_file */
106 oconfig_item_t *oconfig_clone (const oconfig_item_t *ci_orig)
107 {
108 oconfig_item_t *ci_copy;
110 ci_copy = (oconfig_item_t *) malloc (sizeof (*ci_copy));
111 if (ci_copy == NULL)
112 {
113 fprintf (stderr, "malloc failed.\n");
114 return (NULL);
115 }
116 memset (ci_copy, 0, sizeof (*ci_copy));
117 ci_copy->values = NULL;
118 ci_copy->parent = NULL;
119 ci_copy->children = NULL;
121 ci_copy->key = strdup (ci_orig->key);
122 if (ci_copy->key == NULL)
123 {
124 fprintf (stderr, "strdup failed.\n");
125 free (ci_copy);
126 return (NULL);
127 }
129 if (ci_orig->values_num > 0) /* {{{ */
130 {
131 int i;
133 ci_copy->values = (oconfig_value_t *) calloc (ci_orig->values_num,
134 sizeof (*ci_copy->values));
135 if (ci_copy->values == NULL)
136 {
137 fprintf (stderr, "calloc failed.\n");
138 free (ci_copy->key);
139 free (ci_copy);
140 return (NULL);
141 }
142 ci_copy->values_num = ci_orig->values_num;
144 for (i = 0; i < ci_copy->values_num; i++)
145 {
146 ci_copy->values[i].type = ci_orig->values[i].type;
147 if (ci_copy->values[i].type == OCONFIG_TYPE_STRING)
148 {
149 ci_copy->values[i].value.string
150 = strdup (ci_orig->values[i].value.string);
151 if (ci_copy->values[i].value.string == NULL)
152 {
153 fprintf (stderr, "strdup failed.\n");
154 oconfig_free (ci_copy);
155 return (NULL);
156 }
157 }
158 else /* ci_copy->values[i].type != OCONFIG_TYPE_STRING) */
159 {
160 ci_copy->values[i].value = ci_orig->values[i].value;
161 }
162 }
163 } /* }}} if (ci_orig->values_num > 0) */
165 if (ci_orig->children_num > 0) /* {{{ */
166 {
167 int i;
169 ci_copy->children = (oconfig_item_t *) calloc (ci_orig->children_num,
170 sizeof (*ci_copy->children));
171 if (ci_copy->children == NULL)
172 {
173 fprintf (stderr, "calloc failed.\n");
174 oconfig_free (ci_copy);
175 return (NULL);
176 }
177 ci_copy->children_num = ci_orig->children_num;
179 for (i = 0; i < ci_copy->children_num; i++)
180 {
181 oconfig_item_t *child;
183 child = oconfig_clone (ci_orig->children + i);
184 if (child == NULL)
185 {
186 oconfig_free (ci_copy);
187 return (NULL);
188 }
189 child->parent = ci_copy;
190 ci_copy->children[i] = *child;
191 free (child);
192 } /* for (i = 0; i < ci_copy->children_num; i++) */
193 } /* }}} if (ci_orig->children_num > 0) */
195 return (ci_copy);
196 } /* oconfig_item_t *oconfig_clone */
198 void oconfig_free_all (oconfig_item_t *ci)
199 {
200 int i;
202 if (ci == NULL)
203 return;
205 if (ci->key != NULL)
206 free (ci->key);
208 for (i = 0; i < ci->values_num; i++)
209 if ((ci->values[i].type == OCONFIG_TYPE_STRING)
210 && (NULL != ci->values[i].value.string))
211 free (ci->values[i].value.string);
213 if (ci->values != NULL)
214 free (ci->values);
216 for (i = 0; i < ci->children_num; i++)
217 oconfig_free_all (ci->children + i);
219 if (ci->children != NULL)
220 free (ci->children);
221 }
223 void oconfig_free (oconfig_item_t *ci)
224 {
225 oconfig_free_all (ci);
226 free (ci);
227 ci = NULL;
228 }
230 /*
231 * vim:shiftwidth=2:tabstop=8:softtabstop=2:fdm=marker
232 */