Home | History | Annotate | Line # | Download | only in config
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