xref: /dragonfly/usr.sbin/config/mkoptions.c (revision 984263bc)
1 /*
2  * Copyright (c) 1995  Peter Wemm
3  * Copyright (c) 1980, 1993
4  *	The Regents of the University of California.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by the University of
17  *	California, Berkeley and its contributors.
18  * 4. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #ifndef lint
36 #if 0
37 static char sccsid[] = "@(#)mkheaders.c	8.1 (Berkeley) 6/6/93";
38 #endif
39 static const char rcsid[] =
40   "$FreeBSD: src/usr.sbin/config/mkoptions.c,v 1.17.2.3 2001/12/13 19:18:01 dillon Exp $";
41 #endif /* not lint */
42 
43 /*
44  * Make all the .h files for the optional entries
45  */
46 
47 #include <ctype.h>
48 #include <err.h>
49 #include <stdio.h>
50 #include <string.h>
51 #include <sys/param.h>
52 #include "config.h"
53 #include "y.tab.h"
54 
55 static	struct users {
56 	int	u_default;
57 	int	u_min;
58 	int	u_max;
59 } users[] = {
60 	{ 8, 2, 512 },			/* MACHINE_I386 */
61 	{ 8, 2, 512 },			/* MACHINE_PC98 */
62 	{ 8, 2, 512 },			/* MACHINE_ALPHA */
63 };
64 #define	NUSERS	(sizeof (users) / sizeof (users[0]))
65 
66 static char *lower __P((char *));
67 static void read_options __P((void));
68 static void do_option __P((char *));
69 static char *tooption __P((char *));
70 
71 void
72 options()
73 {
74 	char buf[40];
75 	struct cputype *cp;
76 	struct opt_list *ol;
77 	struct opt *op;
78 	struct users *up;
79 
80 	/* Fake the cpu types as options. */
81 	for (cp = cputype; cp != NULL; cp = cp->cpu_next) {
82 		op = (struct opt *)malloc(sizeof(*op));
83 		memset(op, 0, sizeof(*op));
84 		op->op_name = ns(cp->cpu_name);
85 		op->op_next = opt;
86 		opt = op;
87 	}
88 
89 	/* Initialize `maxusers'. */
90 	if ((unsigned)machine > NUSERS) {
91 		printf("maxusers config info isn't present, using i386\n");
92 		up = &users[MACHINE_I386 - 1];
93 	} else
94 		up = &users[machine - 1];
95 	if (maxusers == 0) {
96 		/* printf("maxusers not specified; will auto-size\n"); */
97 		/* maxusers = 0; */
98 	} else if (maxusers < up->u_min) {
99 		printf("minimum of %d maxusers assumed\n", up->u_min);
100 		maxusers = up->u_min;
101 	} else if (maxusers > up->u_max)
102 		printf("warning: maxusers > %d (%d)\n", up->u_max, maxusers);
103 
104 	/* Fake MAXUSERS as an option. */
105 	op = (struct opt *)malloc(sizeof(*op));
106 	memset(op, 0, sizeof(*op));
107 	op->op_name = "MAXUSERS";
108 	snprintf(buf, sizeof(buf), "%d", maxusers);
109 	op->op_value = ns(buf);
110 	op->op_next = opt;
111 	opt = op;
112 
113 	read_options();
114 	for (ol = otab; ol != 0; ol = ol->o_next)
115 		do_option(ol->o_name);
116 	for (op = opt; op; op = op->op_next) {
117 		if (!op->op_ownfile) {
118 			printf("%s:%d: unknown option \"%s\"\n",
119 			       PREFIX, op->op_line, op->op_name);
120 			exit(1);
121 		}
122 	}
123 }
124 
125 /*
126  * Generate an <options>.h file
127  */
128 
129 static void
130 do_option(name)
131 	char *name;
132 {
133 	char *basefile, *file, *inw;
134 	struct opt_list *ol;
135 	struct opt *op, *op_head, *topp;
136 	FILE *inf, *outf;
137 	char *value;
138 	char *oldvalue;
139 	int seen;
140 	int tidy;
141 
142 	file = tooption(name);
143 
144 	/*
145 	 * Check to see if the option was specified..
146 	 */
147 	value = NULL;
148 	for (op = opt; op; op = op->op_next) {
149 		if (eq(name, op->op_name)) {
150 			oldvalue = value;
151 			value = op->op_value;
152 			if (value == NULL)
153 				value = ns("1");
154 			if (oldvalue != NULL && !eq(value, oldvalue))
155 				printf(
156 			    "%s:%d: option \"%s\" redefined from %s to %s\n",
157 				   PREFIX, op->op_line, op->op_name, oldvalue,
158 				   value);
159 			op->op_ownfile++;
160 		}
161 	}
162 
163 	inf = fopen(file, "r");
164 	if (inf == 0) {
165 		outf = fopen(file, "w");
166 		if (outf == 0)
167 			err(1, "%s", file);
168 
169 		/* was the option in the config file? */
170 		if (value) {
171 			fprintf(outf, "#define %s %s\n", name, value);
172 		} /* else empty file */
173 
174 		(void) fclose(outf);
175 		return;
176 	}
177 	basefile = "";
178 	for (ol = otab; ol != 0; ol = ol->o_next)
179 		if (eq(name, ol->o_name)) {
180 			basefile = ol->o_file;
181 			break;
182 		}
183 	oldvalue = NULL;
184 	op_head = NULL;
185 	seen = 0;
186 	tidy = 0;
187 	for (;;) {
188 		char *cp;
189 		char *invalue;
190 
191 		/* get the #define */
192 		if ((inw = get_word(inf)) == 0 || inw == (char *)EOF)
193 			break;
194 		/* get the option name */
195 		if ((inw = get_word(inf)) == 0 || inw == (char *)EOF)
196 			break;
197 		inw = ns(inw);
198 		/* get the option value */
199 		if ((cp = get_word(inf)) == 0 || cp == (char *)EOF)
200 			break;
201 		/* option value */
202 		invalue = ns(cp); /* malloced */
203 		if (eq(inw, name)) {
204 			oldvalue = invalue;
205 			invalue = value;
206 			seen++;
207 		}
208 		for (ol = otab; ol != 0; ol = ol->o_next)
209 			if (eq(inw, ol->o_name))
210 				break;
211 		if (!eq(inw, name) && !ol) {
212 			printf("WARNING: unknown option `%s' removed from %s\n",
213 				inw, file);
214 			tidy++;
215 		} else if (ol != NULL && !eq(basefile, ol->o_file)) {
216 			printf("WARNING: option `%s' moved from %s to %s\n",
217 				inw, basefile, ol->o_file);
218 			tidy++;
219 		} else {
220 			op = (struct opt *) malloc(sizeof *op);
221 			bzero(op, sizeof(*op));
222 			op->op_name = inw;
223 			op->op_value = invalue;
224 			op->op_next = op_head;
225 			op_head = op;
226 		}
227 
228 		/* EOL? */
229 		cp = get_word(inf);
230 		if (cp == (char *)EOF)
231 			break;
232 	}
233 	(void) fclose(inf);
234 	if (!tidy && ((value == NULL && oldvalue == NULL) ||
235 	    (value && oldvalue && eq(value, oldvalue)))) {
236 		for (op = op_head; op != NULL; op = topp) {
237 			topp = op->op_next;
238 			free(op->op_name);
239 			free(op->op_value);
240 			free(op);
241 		}
242 		return;
243 	}
244 
245 	if (value && !seen) {
246 		/* New option appears */
247 		op = (struct opt *) malloc(sizeof *op);
248 		bzero(op, sizeof(*op));
249 		op->op_name = ns(name);
250 		op->op_value = value ? ns(value) : NULL;
251 		op->op_next = op_head;
252 		op_head = op;
253 	}
254 
255 	outf = fopen(file, "w");
256 	if (outf == 0)
257 		err(1, "%s", file);
258 	for (op = op_head; op != NULL; op = topp) {
259 		/* was the option in the config file? */
260 		if (op->op_value) {
261 			fprintf(outf, "#define %s %s\n",
262 				op->op_name, op->op_value);
263 		}
264 		topp = op->op_next;
265 		free(op->op_name);
266 		free(op->op_value);
267 		free(op);
268 	}
269 	(void) fclose(outf);
270 }
271 
272 /*
273  * Find the filename to store the option spec into.
274  */
275 static char *
276 tooption(name)
277 	char *name;
278 {
279 	static char hbuf[MAXPATHLEN];
280 	char nbuf[MAXPATHLEN];
281 	struct opt_list *po;
282 
283 	/* "cannot happen"?  the otab list should be complete.. */
284 	(void) strlcpy(nbuf, "options.h", sizeof(nbuf));
285 
286 	for (po = otab ; po != 0; po = po->o_next) {
287 		if (eq(po->o_name, name)) {
288 			strlcpy(nbuf, po->o_file, sizeof(nbuf));
289 			break;
290 		}
291 	}
292 
293 	(void) strlcpy(hbuf, path(nbuf), sizeof(hbuf));
294 	return (hbuf);
295 }
296 
297 /*
298  * read the options and options.<machine> files
299  */
300 static void
301 read_options()
302 {
303 	FILE *fp;
304 	char fname[MAXPATHLEN];
305 	char *wd, *this, *val;
306 	struct opt_list *po;
307 	int first = 1;
308 	char genopt[MAXPATHLEN];
309 
310 	otab = 0;
311 	if (ident == NULL) {
312 		printf("no ident line specified\n");
313 		exit(1);
314 	}
315 	(void) snprintf(fname, sizeof(fname), "../../conf/options");
316 openit:
317 	fp = fopen(fname, "r");
318 	if (fp == 0) {
319 		return;
320 	}
321 next:
322 	wd = get_word(fp);
323 	if (wd == (char *)EOF) {
324 		(void) fclose(fp);
325 		if (first == 1) {
326 			first++;
327 			(void) snprintf(fname, sizeof fname, "../../conf/options.%s", machinename);
328 			fp = fopen(fname, "r");
329 			if (fp != 0)
330 				goto next;
331 			(void) snprintf(fname, sizeof fname, "options.%s", machinename);
332 			goto openit;
333 		}
334 		if (first == 2) {
335 			first++;
336 			(void) snprintf(fname, sizeof fname, "options.%s", raisestr(ident));
337 			fp = fopen(fname, "r");
338 			if (fp != 0)
339 				goto next;
340 		}
341 		return;
342 	}
343 	if (wd == 0)
344 		goto next;
345 	if (wd[0] == '#')
346 	{
347 		while (((wd = get_word(fp)) != (char *)EOF) && wd)
348 		;
349 		goto next;
350 	}
351 	this = ns(wd);
352 	val = get_word(fp);
353 	if (val == (char *)EOF)
354 		return;
355 	if (val == 0) {
356 		char *s = ns(this);
357 		(void) snprintf(genopt, sizeof(genopt), "opt_%s.h", lower(s));
358 		val = genopt;
359 		free(s);
360 	}
361 	val = ns(val);
362 
363 	for (po = otab ; po != 0; po = po->o_next) {
364 		if (eq(po->o_name, this)) {
365 			printf("%s: Duplicate option %s.\n",
366 			       fname, this);
367 			exit(1);
368 		}
369 	}
370 
371 	po = (struct opt_list *) malloc(sizeof *po);
372 	bzero(po, sizeof(*po));
373 	po->o_name = this;
374 	po->o_file = val;
375 	po->o_next = otab;
376 	otab = po;
377 
378 	goto next;
379 }
380 
381 static char *
382 lower(str)
383 	register char *str;
384 {
385 	register char *cp = str;
386 
387 	while (*str) {
388 		if (isupper(*str))
389 			*str = tolower(*str);
390 		str++;
391 	}
392 	return (cp);
393 }
394 
395