mkioconf.c revision 1.3 1 1.3 drochner /* $NetBSD: mkioconf.c,v 1.3 2005/08/25 15:01:07 drochner Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*
4 1.1 thorpej * Copyright (c) 1992, 1993
5 1.1 thorpej * The Regents of the University of California. All rights reserved.
6 1.1 thorpej *
7 1.1 thorpej * This software was developed by the Computer Systems Engineering group
8 1.1 thorpej * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
9 1.1 thorpej * contributed to Berkeley.
10 1.1 thorpej *
11 1.1 thorpej * All advertising materials mentioning features or use of this software
12 1.1 thorpej * must display the following acknowledgement:
13 1.1 thorpej * This product includes software developed by the University of
14 1.1 thorpej * California, Lawrence Berkeley Laboratories.
15 1.1 thorpej *
16 1.1 thorpej * Redistribution and use in source and binary forms, with or without
17 1.1 thorpej * modification, are permitted provided that the following conditions
18 1.1 thorpej * are met:
19 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
20 1.1 thorpej * notice, this list of conditions and the following disclaimer.
21 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
22 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
23 1.1 thorpej * documentation and/or other materials provided with the distribution.
24 1.1 thorpej * 3. Neither the name of the University nor the names of its contributors
25 1.1 thorpej * may be used to endorse or promote products derived from this software
26 1.1 thorpej * without specific prior written permission.
27 1.1 thorpej *
28 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29 1.1 thorpej * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30 1.1 thorpej * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31 1.1 thorpej * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32 1.1 thorpej * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33 1.1 thorpej * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34 1.1 thorpej * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35 1.1 thorpej * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36 1.1 thorpej * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37 1.1 thorpej * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 1.1 thorpej * SUCH DAMAGE.
39 1.1 thorpej *
40 1.1 thorpej * from: @(#)mkioconf.c 8.1 (Berkeley) 6/6/93
41 1.1 thorpej */
42 1.1 thorpej
43 1.1 thorpej #if HAVE_NBTOOL_CONFIG_H
44 1.1 thorpej #include "nbtool_config.h"
45 1.1 thorpej #endif
46 1.1 thorpej
47 1.1 thorpej #include <sys/param.h>
48 1.1 thorpej #include <errno.h>
49 1.1 thorpej #include <stdio.h>
50 1.1 thorpej #include <stdlib.h>
51 1.1 thorpej #include <string.h>
52 1.1 thorpej #include "defs.h"
53 1.1 thorpej
54 1.1 thorpej /*
55 1.1 thorpej * Make ioconf.c.
56 1.1 thorpej */
57 1.3 drochner static int cf_locators_print(const char *, void *, void *);
58 1.1 thorpej static int cforder(const void *, const void *);
59 1.1 thorpej static int emitcfdata(FILE *);
60 1.1 thorpej static int emitcfdrivers(FILE *);
61 1.1 thorpej static int emitexterns(FILE *);
62 1.1 thorpej static int emitcfattachinit(FILE *);
63 1.1 thorpej static int emithdr(FILE *);
64 1.1 thorpej static int emitloc(FILE *);
65 1.1 thorpej static int emitpseudo(FILE *);
66 1.1 thorpej static int emitparents(FILE *);
67 1.1 thorpej static int emitroots(FILE *);
68 1.1 thorpej static int emitname2blk(FILE *);
69 1.1 thorpej
70 1.1 thorpej #define SEP(pos, max) (((u_int)(pos) % (max)) == 0 ? "\n\t" : " ")
71 1.1 thorpej
72 1.1 thorpej #define ARRNAME(n, l) (strchr((n), ARRCHR) && strncmp((n), (l), strlen((l))) == 0)
73 1.1 thorpej
74 1.1 thorpej /*
75 1.1 thorpej * NEWLINE can only be used in the emitXXX functions.
76 1.1 thorpej * In most cases it can be subsumed into an fprintf.
77 1.1 thorpej */
78 1.1 thorpej #define NEWLINE if (putc('\n', fp) < 0) return (1)
79 1.1 thorpej
80 1.1 thorpej int
81 1.1 thorpej mkioconf(void)
82 1.1 thorpej {
83 1.1 thorpej FILE *fp;
84 1.1 thorpej int v;
85 1.1 thorpej
86 1.1 thorpej qsort(packed, npacked, sizeof *packed, cforder);
87 1.1 thorpej if ((fp = fopen("ioconf.c.tmp", "w")) == NULL) {
88 1.1 thorpej (void)fprintf(stderr, "config: cannot write ioconf.c: %s\n",
89 1.1 thorpej strerror(errno));
90 1.1 thorpej return (1);
91 1.1 thorpej }
92 1.1 thorpej v = emithdr(fp);
93 1.1 thorpej if (v != 0 || emitcfdrivers(fp) || emitexterns(fp) ||
94 1.1 thorpej emitcfattachinit(fp) || emitloc(fp) || emitparents(fp) ||
95 1.1 thorpej emitcfdata(fp) || emitroots(fp) || emitpseudo(fp) ||
96 1.1 thorpej (do_devsw ? 0 : emitname2blk(fp))) {
97 1.1 thorpej if (v >= 0)
98 1.1 thorpej (void)fprintf(stderr,
99 1.1 thorpej "config: error writing ioconf.c: %s\n",
100 1.1 thorpej strerror(errno));
101 1.1 thorpej (void)fclose(fp);
102 1.1 thorpej /* (void)unlink("ioconf.c.tmp"); */
103 1.1 thorpej return (1);
104 1.1 thorpej }
105 1.1 thorpej (void)fclose(fp);
106 1.1 thorpej if (moveifchanged("ioconf.c.tmp", "ioconf.c") != 0) {
107 1.1 thorpej (void)fprintf(stderr, "config: error renaming ioconf.c: %s\n",
108 1.1 thorpej strerror(errno));
109 1.1 thorpej return (1);
110 1.1 thorpej }
111 1.1 thorpej return (0);
112 1.1 thorpej }
113 1.1 thorpej
114 1.1 thorpej static int
115 1.1 thorpej cforder(const void *a, const void *b)
116 1.1 thorpej {
117 1.1 thorpej int n1, n2;
118 1.1 thorpej
119 1.1 thorpej n1 = (*(struct devi **)a)->i_cfindex;
120 1.1 thorpej n2 = (*(struct devi **)b)->i_cfindex;
121 1.1 thorpej return (n1 - n2);
122 1.1 thorpej }
123 1.1 thorpej
124 1.1 thorpej static int
125 1.1 thorpej emithdr(FILE *ofp)
126 1.1 thorpej {
127 1.1 thorpej FILE *ifp;
128 1.1 thorpej int n, rv;
129 1.1 thorpej char ifnbuf[200], buf[BUFSIZ];
130 1.1 thorpej char *ifn;
131 1.1 thorpej
132 1.1 thorpej if (fprintf(ofp, "\
133 1.1 thorpej /*\n\
134 1.1 thorpej * MACHINE GENERATED: DO NOT EDIT\n\
135 1.1 thorpej *\n\
136 1.1 thorpej * ioconf.c, from \"%s\"\n\
137 1.1 thorpej */\n\n", conffile) < 0)
138 1.1 thorpej return (1);
139 1.1 thorpej
140 1.1 thorpej rv = 0;
141 1.1 thorpej (void)snprintf(ifnbuf, sizeof(ifnbuf), "arch/%s/conf/ioconf.incl.%s",
142 1.1 thorpej machine, machine);
143 1.1 thorpej ifn = sourcepath(ifnbuf);
144 1.1 thorpej if ((ifp = fopen(ifn, "r")) != NULL) {
145 1.1 thorpej while ((n = fread(buf, 1, sizeof(buf), ifp)) > 0)
146 1.1 thorpej if (fwrite(buf, 1, n, ofp) != n) {
147 1.1 thorpej rv = 1;
148 1.1 thorpej break;
149 1.1 thorpej }
150 1.1 thorpej if (rv == 0 && ferror(ifp)) {
151 1.1 thorpej (void)fprintf(stderr, "config: error reading %s: %s\n",
152 1.1 thorpej ifn, strerror(errno));
153 1.1 thorpej rv = -1;
154 1.1 thorpej }
155 1.1 thorpej (void)fclose(ifp);
156 1.1 thorpej } else {
157 1.1 thorpej if (fputs("\
158 1.1 thorpej #include <sys/param.h>\n\
159 1.1 thorpej #include <sys/conf.h>\n\
160 1.1 thorpej #include <sys/device.h>\n\
161 1.1 thorpej #include <sys/mount.h>\n", ofp) < 0)
162 1.1 thorpej rv = 1;
163 1.1 thorpej }
164 1.1 thorpej free(ifn);
165 1.1 thorpej return (rv);
166 1.1 thorpej }
167 1.1 thorpej
168 1.3 drochner /*
169 1.3 drochner * Emit an initialized array of character strings describing this
170 1.3 drochner * attribute's locators.
171 1.3 drochner */
172 1.3 drochner static int
173 1.3 drochner cf_locators_print(const char *name, void *value, void *arg)
174 1.3 drochner {
175 1.3 drochner struct attr *a;
176 1.3 drochner struct nvlist *nv;
177 1.3 drochner FILE *fp = arg;
178 1.3 drochner
179 1.3 drochner a = value;
180 1.3 drochner if (a->a_locs) {
181 1.3 drochner if (fprintf(fp,
182 1.3 drochner "static const struct cfiattrdata %scf_iattrdata = {\n",
183 1.3 drochner name) < 0)
184 1.3 drochner return (1);
185 1.3 drochner if (fprintf(fp, "\t\"%s\", %d,\n\t{\n", name, a->a_loclen) < 0)
186 1.3 drochner return (1);
187 1.3 drochner for (nv = a->a_locs; nv; nv = nv->nv_next)
188 1.3 drochner if (fprintf(fp, "\t\t{\"%s\", \"%s\", %s},\n",
189 1.3 drochner nv->nv_name,
190 1.3 drochner (nv->nv_str ? nv->nv_str : "NULL"),
191 1.3 drochner (nv->nv_str ? nv->nv_str : "0")) < 0)
192 1.3 drochner return (1);
193 1.3 drochner if (fprintf(fp, "\t}\n};\n") < 0)
194 1.3 drochner return (1);
195 1.3 drochner } else if (fprintf(fp,
196 1.3 drochner "static const struct cfiattrdata %scf_iattrdata = {\n"
197 1.3 drochner "\t\"%s\", 0, {\n\t\t{ NULL },\n\t}\n};\n", name, name) < 0)
198 1.3 drochner return (1);
199 1.3 drochner return 0;
200 1.3 drochner }
201 1.3 drochner
202 1.1 thorpej static int
203 1.1 thorpej emitcfdrivers(FILE *fp)
204 1.1 thorpej {
205 1.1 thorpej struct devbase *d;
206 1.1 thorpej struct nvlist *nv;
207 1.1 thorpej struct attr *a;
208 1.1 thorpej int has_iattrs;
209 1.1 thorpej
210 1.1 thorpej NEWLINE;
211 1.3 drochner if (ht_enumerate(attrtab, cf_locators_print, fp))
212 1.3 drochner return (1);
213 1.3 drochner
214 1.3 drochner NEWLINE;
215 1.1 thorpej TAILQ_FOREACH(d, &allbases, d_next) {
216 1.1 thorpej if (!devbase_has_instances(d, WILD))
217 1.1 thorpej continue;
218 1.1 thorpej has_iattrs = 0;
219 1.1 thorpej for (nv = d->d_attrs; nv != NULL; nv = nv->nv_next) {
220 1.1 thorpej a = nv->nv_ptr;
221 1.1 thorpej if (a->a_iattr == 0)
222 1.1 thorpej continue;
223 1.1 thorpej if (has_iattrs == 0 &&
224 1.1 thorpej fprintf(fp,
225 1.3 drochner "static const struct cfiattrdata * const %s_attrs[] = { ",
226 1.1 thorpej d->d_name) < 0)
227 1.1 thorpej return (1);
228 1.1 thorpej has_iattrs = 1;
229 1.3 drochner if (fprintf(fp, "&%scf_iattrdata, ", a->a_name) < 0)
230 1.1 thorpej return (1);
231 1.1 thorpej }
232 1.1 thorpej if (has_iattrs && fprintf(fp, "NULL };\n") < 0)
233 1.1 thorpej return (1);
234 1.1 thorpej if (fprintf(fp, "CFDRIVER_DECL(%s, %s, ", d->d_name, /* ) */
235 1.1 thorpej d->d_classattr != NULL ? d->d_classattr->a_devclass
236 1.1 thorpej : "DV_DULL") < 0)
237 1.1 thorpej return (1);
238 1.1 thorpej if (has_iattrs && fprintf(fp, "%s_attrs", d->d_name) < 0)
239 1.1 thorpej return (1);
240 1.1 thorpej else if (has_iattrs == 0 && fprintf(fp, "NULL") < 0)
241 1.1 thorpej return (1);
242 1.1 thorpej if (fprintf(fp, /* ( */ ");\n\n") < 0)
243 1.1 thorpej return (1);
244 1.1 thorpej }
245 1.1 thorpej
246 1.1 thorpej NEWLINE;
247 1.1 thorpej if (fprintf(fp,
248 1.1 thorpej "struct cfdriver * const cfdriver_list_initial[] = {\n") < 0)
249 1.1 thorpej return (1);
250 1.1 thorpej TAILQ_FOREACH(d, &allbases, d_next) {
251 1.1 thorpej if (!devbase_has_instances(d, WILD))
252 1.1 thorpej continue;
253 1.1 thorpej if (fprintf(fp, "\t&%s_cd,\n", d->d_name) < 0)
254 1.1 thorpej return (1);
255 1.1 thorpej }
256 1.1 thorpej if (fprintf(fp, "\tNULL\n};\n") < 0)
257 1.1 thorpej return (1);
258 1.1 thorpej
259 1.1 thorpej return (0);
260 1.1 thorpej }
261 1.1 thorpej
262 1.1 thorpej static int
263 1.1 thorpej emitexterns(FILE *fp)
264 1.1 thorpej {
265 1.1 thorpej struct deva *da;
266 1.1 thorpej
267 1.1 thorpej NEWLINE;
268 1.1 thorpej TAILQ_FOREACH(da, &alldevas, d_next) {
269 1.1 thorpej if (!deva_has_instances(da, WILD))
270 1.1 thorpej continue;
271 1.1 thorpej if (fprintf(fp, "extern struct cfattach %s_ca;\n",
272 1.1 thorpej da->d_name) < 0)
273 1.1 thorpej return (1);
274 1.1 thorpej }
275 1.1 thorpej return (0);
276 1.1 thorpej }
277 1.1 thorpej
278 1.1 thorpej static int
279 1.1 thorpej emitcfattachinit(FILE *fp)
280 1.1 thorpej {
281 1.1 thorpej struct devbase *d;
282 1.1 thorpej struct deva *da;
283 1.1 thorpej
284 1.1 thorpej NEWLINE;
285 1.1 thorpej TAILQ_FOREACH(d, &allbases, d_next) {
286 1.1 thorpej if (!devbase_has_instances(d, WILD))
287 1.1 thorpej continue;
288 1.1 thorpej if (d->d_ahead == NULL)
289 1.1 thorpej continue;
290 1.1 thorpej
291 1.1 thorpej if (fprintf(fp,
292 1.1 thorpej "static struct cfattach * const %s_cfattachinit[] = {\n\t",
293 1.1 thorpej d->d_name) < 0)
294 1.1 thorpej return (1);
295 1.1 thorpej for (da = d->d_ahead; da != NULL; da = da->d_bsame) {
296 1.1 thorpej if (!deva_has_instances(da, WILD))
297 1.1 thorpej continue;
298 1.1 thorpej if (fprintf(fp, "&%s_ca, ", da->d_name) < 0)
299 1.1 thorpej return (1);
300 1.1 thorpej }
301 1.1 thorpej if (fprintf(fp, "NULL\n};\n") < 0)
302 1.1 thorpej return (1);
303 1.1 thorpej }
304 1.1 thorpej
305 1.1 thorpej NEWLINE;
306 1.1 thorpej if (fprintf(fp,
307 1.1 thorpej "const struct cfattachinit cfattachinit[] = {\n") < 0)
308 1.1 thorpej return (1);
309 1.1 thorpej
310 1.1 thorpej TAILQ_FOREACH(d, &allbases, d_next) {
311 1.1 thorpej if (!devbase_has_instances(d, WILD))
312 1.1 thorpej continue;
313 1.1 thorpej if (d->d_ahead == NULL)
314 1.1 thorpej continue;
315 1.1 thorpej
316 1.1 thorpej if (fprintf(fp, "\t{ \"%s\", %s_cfattachinit },\n",
317 1.1 thorpej d->d_name, d->d_name) < 0)
318 1.1 thorpej return (1);
319 1.1 thorpej }
320 1.1 thorpej
321 1.1 thorpej if (fprintf(fp, "\t{ NULL, NULL }\n};\n") < 0)
322 1.1 thorpej return (1);
323 1.1 thorpej
324 1.1 thorpej return (0);
325 1.1 thorpej }
326 1.1 thorpej
327 1.1 thorpej static int
328 1.1 thorpej emitloc(FILE *fp)
329 1.1 thorpej {
330 1.1 thorpej int i;
331 1.1 thorpej
332 1.1 thorpej if (locators.used != 0) {
333 1.1 thorpej if (fprintf(fp, "\n/* locators */\n\
334 1.1 thorpej static int loc[%d] = {", locators.used) < 0)
335 1.1 thorpej return (1);
336 1.1 thorpej for (i = 0; i < locators.used; i++)
337 1.1 thorpej if (fprintf(fp, "%s%s,", SEP(i, 8),
338 1.1 thorpej locators.vec[i]) < 0)
339 1.1 thorpej return (1);
340 1.1 thorpej if (fprintf(fp, "\n};\n") < 0)
341 1.1 thorpej return (1);
342 1.1 thorpej } else if (*packed != NULL) {
343 1.1 thorpej /* We need to have *something*. */
344 1.1 thorpej if (fprintf(fp, "\n/* locators */\n\
345 1.1 thorpej static int loc[1] = { -1 };\n") < 0)
346 1.1 thorpej return (1);
347 1.1 thorpej }
348 1.1 thorpej
349 1.1 thorpej return (0);
350 1.1 thorpej }
351 1.1 thorpej
352 1.1 thorpej /*
353 1.1 thorpej * Emit static parent data.
354 1.1 thorpej */
355 1.1 thorpej static int
356 1.1 thorpej emitparents(FILE *fp)
357 1.1 thorpej {
358 1.1 thorpej struct pspec *p;
359 1.1 thorpej
360 1.1 thorpej NEWLINE;
361 1.1 thorpej TAILQ_FOREACH(p, &allpspecs, p_list) {
362 1.1 thorpej if (p->p_devs == NULL)
363 1.1 thorpej continue;
364 1.1 thorpej if (fprintf(fp,
365 1.1 thorpej "static const struct cfparent pspec%d = {\n", p->p_inst) < 0)
366 1.1 thorpej return (1);
367 1.1 thorpej if (fprintf(fp, "\t\"%s\", ", p->p_iattr->a_name) < 0)
368 1.1 thorpej return (1);
369 1.1 thorpej if (p->p_atdev != NULL) {
370 1.1 thorpej if (fprintf(fp, "\"%s\", ", p->p_atdev->d_name) < 0)
371 1.1 thorpej return (1);
372 1.1 thorpej if (p->p_atunit == WILD &&
373 1.1 thorpej fprintf(fp, "DVUNIT_ANY") < 0)
374 1.1 thorpej return (1);
375 1.1 thorpej else if (p->p_atunit != WILD &&
376 1.1 thorpej fprintf(fp, "%d", p->p_atunit) < 0)
377 1.1 thorpej return (1);
378 1.1 thorpej } else if (fprintf(fp, "NULL, 0") < 0)
379 1.1 thorpej return (1);
380 1.1 thorpej if (fprintf(fp, "\n};\n") < 0)
381 1.1 thorpej return (1);
382 1.1 thorpej }
383 1.1 thorpej
384 1.1 thorpej return (0);
385 1.1 thorpej }
386 1.1 thorpej
387 1.1 thorpej /*
388 1.1 thorpej * Emit the cfdata array.
389 1.1 thorpej */
390 1.1 thorpej static int
391 1.1 thorpej emitcfdata(FILE *fp)
392 1.1 thorpej {
393 1.1 thorpej struct devi **p, *i;
394 1.1 thorpej struct pspec *ps;
395 1.1 thorpej int unit, v;
396 1.1 thorpej const char *state, *basename, *attachment;
397 1.1 thorpej struct nvlist *nv;
398 1.1 thorpej struct attr *a;
399 1.1 thorpej char *loc;
400 1.1 thorpej char locbuf[20];
401 1.1 thorpej const char *lastname = "";
402 1.1 thorpej
403 1.1 thorpej if (fprintf(fp, "\n\
404 1.1 thorpej #define NORM FSTATE_NOTFOUND\n\
405 1.1 thorpej #define STAR FSTATE_STAR\n\
406 1.1 thorpej \n\
407 1.1 thorpej struct cfdata cfdata[] = {\n\
408 1.3 drochner /* driver attachment unit state loc flags pspec */\n") < 0)
409 1.1 thorpej return (1);
410 1.1 thorpej for (p = packed; (i = *p) != NULL; p++) {
411 1.1 thorpej /* the description */
412 1.1 thorpej if (fprintf(fp, "/*%3d: %s at ", i->i_cfindex, i->i_name) < 0)
413 1.1 thorpej return (1);
414 1.1 thorpej if ((ps = i->i_pspec) != NULL) {
415 1.1 thorpej if (ps->p_atdev != NULL &&
416 1.1 thorpej ps->p_atunit != WILD) {
417 1.1 thorpej if (fprintf(fp, "%s%d", ps->p_atdev->d_name,
418 1.1 thorpej ps->p_atunit) < 0)
419 1.1 thorpej return (1);
420 1.1 thorpej } else if (ps->p_atdev != NULL) {
421 1.1 thorpej if (fprintf(fp, "%s?", ps->p_atdev->d_name) < 0)
422 1.1 thorpej return (1);
423 1.1 thorpej } else {
424 1.1 thorpej if (fprintf(fp, "%s?", ps->p_iattr->a_name) < 0)
425 1.1 thorpej return (1);
426 1.1 thorpej }
427 1.1 thorpej
428 1.1 thorpej a = ps->p_iattr;
429 1.1 thorpej for (nv = a->a_locs, v = 0; nv != NULL;
430 1.1 thorpej nv = nv->nv_next, v++) {
431 1.1 thorpej if (ARRNAME(nv->nv_name, lastname)) {
432 1.1 thorpej if (fprintf(fp, " %s %s",
433 1.1 thorpej nv->nv_name, i->i_locs[v]) < 0)
434 1.1 thorpej return (1);
435 1.1 thorpej } else {
436 1.1 thorpej if (fprintf(fp, " %s %s",
437 1.1 thorpej nv->nv_name,
438 1.1 thorpej i->i_locs[v]) < 0)
439 1.1 thorpej return (1);
440 1.1 thorpej lastname = nv->nv_name;
441 1.1 thorpej }
442 1.1 thorpej }
443 1.1 thorpej } else {
444 1.1 thorpej a = NULL;
445 1.1 thorpej if (fputs("root", fp) < 0)
446 1.1 thorpej return (1);
447 1.1 thorpej }
448 1.1 thorpej
449 1.1 thorpej if (fputs(" */\n", fp) < 0)
450 1.1 thorpej return (-1);
451 1.1 thorpej
452 1.1 thorpej /* then the actual defining line */
453 1.1 thorpej basename = i->i_base->d_name;
454 1.1 thorpej attachment = i->i_atdeva->d_name;
455 1.1 thorpej if (i->i_unit == STAR) {
456 1.1 thorpej unit = i->i_base->d_umax;
457 1.1 thorpej state = "STAR";
458 1.1 thorpej } else {
459 1.1 thorpej unit = i->i_unit;
460 1.1 thorpej state = "NORM";
461 1.1 thorpej }
462 1.1 thorpej if (i->i_locoff >= 0) {
463 1.1 thorpej (void)snprintf(locbuf, sizeof(locbuf), "loc+%3d",
464 1.1 thorpej i->i_locoff);
465 1.1 thorpej loc = locbuf;
466 1.1 thorpej } else
467 1.1 thorpej loc = "loc";
468 1.1 thorpej if (fprintf(fp, " {\"%s\",%s\"%s\",%s%2d, %s, %7s, %#6x, ",
469 1.1 thorpej basename, strlen(basename) < 8 ? "\t\t"
470 1.1 thorpej : "\t",
471 1.1 thorpej attachment, strlen(attachment) < 5 ? "\t\t"
472 1.1 thorpej : "\t",
473 1.1 thorpej unit, state, loc, i->i_cfflags) < 0)
474 1.1 thorpej return (1);
475 1.1 thorpej if (ps != NULL) {
476 1.3 drochner if (fprintf(fp, "&pspec%d},\n", ps->p_inst) < 0)
477 1.1 thorpej return (1);
478 1.3 drochner } else if (fputs("NULL},\n", fp) < 0)
479 1.1 thorpej return (1);
480 1.1 thorpej }
481 1.1 thorpej return (fputs(" {0}\n};\n", fp) < 0);
482 1.1 thorpej }
483 1.1 thorpej
484 1.1 thorpej /*
485 1.1 thorpej * Emit the table of potential roots.
486 1.1 thorpej */
487 1.1 thorpej static int
488 1.1 thorpej emitroots(FILE *fp)
489 1.1 thorpej {
490 1.1 thorpej struct devi **p, *i;
491 1.1 thorpej
492 1.1 thorpej if (fputs("\nconst short cfroots[] = {\n", fp) < 0)
493 1.1 thorpej return (1);
494 1.1 thorpej for (p = packed; (i = *p) != NULL; p++) {
495 1.1 thorpej if (i->i_at != NULL)
496 1.1 thorpej continue;
497 1.1 thorpej if (i->i_unit != 0 &&
498 1.1 thorpej (i->i_unit != STAR || i->i_base->d_umax != 0))
499 1.1 thorpej (void)fprintf(stderr,
500 1.1 thorpej "config: warning: `%s at root' is not unit 0\n",
501 1.1 thorpej i->i_name);
502 1.1 thorpej if (fprintf(fp, "\t%2d /* %s */,\n",
503 1.1 thorpej i->i_cfindex, i->i_name) < 0)
504 1.1 thorpej return (1);
505 1.1 thorpej }
506 1.1 thorpej return (fputs("\t-1\n};\n", fp) < 0);
507 1.1 thorpej }
508 1.1 thorpej
509 1.1 thorpej /*
510 1.1 thorpej * Emit pseudo-device initialization.
511 1.1 thorpej */
512 1.1 thorpej static int
513 1.1 thorpej emitpseudo(FILE *fp)
514 1.1 thorpej {
515 1.1 thorpej struct devi *i;
516 1.1 thorpej struct devbase *d;
517 1.1 thorpej
518 1.1 thorpej if (fputs("\n/* pseudo-devices */\n", fp) < 0)
519 1.1 thorpej return (1);
520 1.1 thorpej TAILQ_FOREACH(i, &allpseudo, i_next) {
521 1.1 thorpej if (fprintf(fp, "void %sattach(int);\n",
522 1.1 thorpej i->i_base->d_name) < 0)
523 1.1 thorpej return (1);
524 1.1 thorpej }
525 1.1 thorpej if (fputs("\nstruct pdevinit pdevinit[] = {\n", fp) < 0)
526 1.1 thorpej return (1);
527 1.1 thorpej TAILQ_FOREACH(i, &allpseudo, i_next) {
528 1.1 thorpej d = i->i_base;
529 1.1 thorpej if (fprintf(fp, "\t{ %sattach, %d },\n",
530 1.1 thorpej d->d_name, d->d_umax) < 0)
531 1.1 thorpej return (1);
532 1.1 thorpej }
533 1.1 thorpej return (fputs("\t{ 0, 0 }\n};\n", fp) < 0);
534 1.1 thorpej }
535 1.1 thorpej
536 1.1 thorpej /*
537 1.1 thorpej * Emit name to major block number table.
538 1.1 thorpej */
539 1.1 thorpej int
540 1.1 thorpej emitname2blk(FILE *fp)
541 1.1 thorpej {
542 1.1 thorpej struct devbase *dev;
543 1.1 thorpej
544 1.1 thorpej if (fputs("\n/* device name to major block number */\n", fp) < 0)
545 1.1 thorpej return (1);
546 1.1 thorpej
547 1.1 thorpej if (fprintf(fp, "struct devnametobdevmaj dev_name2blk[] = {\n") < 0)
548 1.1 thorpej return (1);
549 1.1 thorpej
550 1.1 thorpej TAILQ_FOREACH(dev, &allbases, d_next) {
551 1.1 thorpej if (dev->d_major == NODEV)
552 1.1 thorpej continue;
553 1.1 thorpej
554 1.1 thorpej if (fprintf(fp, "\t{ \"%s\", %d },\n",
555 1.1 thorpej dev->d_name, dev->d_major) < 0)
556 1.1 thorpej return (1);
557 1.1 thorpej }
558 1.1 thorpej if (fprintf(fp, "\t{ NULL, 0 }\n};\n") < 0)
559 1.1 thorpej return (1);
560 1.1 thorpej
561 1.1 thorpej return (0);
562 1.1 thorpej }
563