2 * Copyright (c) 1992, 1993
3 * The Regents of the University of California. All rights reserved.
6 * This code is derived from software donated to Berkeley by
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)conf.c 8.2 (Berkeley) 3/27/94
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
46 #include <sys/types.h>
47 #include <sys/param.h>
48 #include <sys/syslog.h>
52 #define ALLOC(ty) (xmalloc(sizeof(ty)))
54 typedef struct path path;
56 qelem p_q; /* 2-way linked list */
57 int p_lno; /* Line number of this record */
58 char *p_args; /* copy of arg string (malloc) */
59 char *p_key; /* Pathname to match (also p_argv[0]) */
60 regex_t p_rx; /* RE to match against pathname () */
61 int p_rxvalid; /* non-zero if valid regular expression */
62 int p_argc; /* number of elements in arg string */
63 char **p_argv; /* argv[] pointers into arg string (malloc) */
66 static char *conf_file; /* XXX for regerror */
67 static path *curp; /* XXX for regerror */
70 * Add an element to a 2-way list,
73 static void ins_que(qelem *elem, qelem *pred)
75 qelem *p = pred->q_forw;
83 * Remove an element from a 2-way list
85 static void rem_que(qelem *elem)
87 qelem *p = elem->q_forw;
88 qelem *p2 = elem->q_back;
94 * Error checking malloc
96 static void *xmalloc(unsigned siz)
98 void *p = malloc(siz);
101 syslog(LOG_ALERT, "malloc: failed to get %d bytes", siz);
106 * Insert the path in the list.
107 * If there is already an element with the same key then
108 * the *second* one is ignored (return 0). If the key is
109 * not found then the path is added to the end of the list
112 static int pinsert(path *p0, qelem *q0)
119 for (q = q0->q_forw; q != q0; q = q->q_forw) {
120 path *p = (path *) q;
121 if (strcmp(p->p_key, p0->p_key) == 0)
124 ins_que(&p0->p_q, q0->q_back);
129 static path *palloc(char *cline, int lno)
138 * Implement comment chars
140 s = strchr(cline, '#');
145 * Do a pass through the string to count the number
150 for (s = key; s != NULL; ) {
152 while ((val = strsep(&s, " \t\n")) != NULL && *val == '\0')
164 * Now do another pass and generate a new path structure
168 p->p_argv = xmalloc(c * sizeof(char *));
169 p->p_args = strdup(cline);
171 for (s = p->p_args; s != NULL; ) {
173 while ((val = strsep(&s, " \t\n")) != NULL && *val == '\0')
183 for (c = 0; c < p->p_argc; c++)
184 printf("%sv[%d] = %s\n", c?"\t":"", c, p->p_argv[c]);
187 p->p_key = p->p_argv[0];
188 if (strpbrk(p->p_key, RE_CHARS)) {
192 val = regcomp(&p->p_rx, p->p_key, REG_EXTENDED | REG_NOSUB);
194 char errbuf[_POSIX2_LINE_MAX];
195 regerror(val, &p->p_rx, errbuf, sizeof errbuf);
196 syslog(LOG_ERR, "%s:%d: regcomp %s: %s",
197 conf_file, curp->p_lno, curp->p_key, errbuf);
213 * Free a path structure
215 static void pfree(path *p)
221 free((char *) p->p_argv);
226 * Discard all currently held path structures on q0.
227 * and add all the ones on xq.
229 static void preplace(qelem *q0, qelem *xq)
232 * While the list is not empty,
233 * take the first element off the list
236 while (q0->q_forw != q0) {
237 qelem *q = q0->q_forw;
241 while (xq->q_forw != xq) {
242 qelem *q = xq->q_forw;
249 * Read the lines from the configuration file and
250 * add them to the list of paths.
252 static void readfp(qelem *q0, FILE *fp)
254 char cline[LINE_MAX];
259 * Make a new empty list.
261 q.q_forw = q.q_back = &q;
264 * Read the lines from the configuration file.
266 while (fgets(cline, sizeof(cline), fp)) {
267 path *p = palloc(cline, nread+1);
268 if (p && !pinsert(p, &q))
274 * If some records were read, then throw
275 * away the old list and replace with the
283 * Read the configuration file (conf) and replace
284 * the existing path list with the new version.
285 * If the file is not readable, then no changes take place
287 void conf_read(qelem *q, char *conf)
289 FILE *fp = fopen(conf, "r");
291 conf_file = conf; /* XXX */
293 conf_file = 0; /* XXX */
296 syslog(LOG_ERR, "open config file \"%s\": %s", conf, strerror(errno));
301 char **conf_match(qelem *q0, char *key)
305 for (q = q0->q_forw; q != q0; q = q->q_forw) {
306 path *p = (path *) q;
308 if (!regexec(&p->p_rx, key, 0, 0, 0)) {
309 return p->p_argv + 1;
312 if (strncmp(p->p_key, key, strlen(p->p_key)) == 0)
313 return (p->p_argv+1);