Home | History | Annotate | Line # | Download | only in config
lint.c revision 1.1
      1  1.1  cube /*	$NetBSD: lint.c,v 1.1 2007/01/08 16:08:08 cube Exp $	*/
      2  1.1  cube 
      3  1.1  cube /*
      4  1.1  cube  *  Copyright (c) 2006 The NetBSD Foundation.
      5  1.1  cube  *  All rights reserved.
      6  1.1  cube  *
      7  1.1  cube  *  This code is derived from software contributed to the NetBSD Foundation
      8  1.1  cube  *   by Quentin Garnier.
      9  1.1  cube  *
     10  1.1  cube  *  Redistribution and use in source and binary forms, with or without
     11  1.1  cube  *  modification, are permitted provided that the following conditions
     12  1.1  cube  *  are met:
     13  1.1  cube  *  1. Redistributions of source code must retain the above copyright
     14  1.1  cube  *     notice, this list of conditions and the following disclaimer.
     15  1.1  cube  *  2. Redistributions in binary form must reproduce the above copyright
     16  1.1  cube  *     notice, this list of conditions and the following disclaimer in the
     17  1.1  cube  *     documentation and/or other materials provided with the distribution.
     18  1.1  cube  *  3. Neither the name of The NetBSD Foundation nor the names of its
     19  1.1  cube  *     contributors may be used to endorse or promote products derived
     20  1.1  cube  *     from this software without specific prior written permission.
     21  1.1  cube  *
     22  1.1  cube  *  THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     23  1.1  cube  *  ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     24  1.1  cube  *  TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     25  1.1  cube  *  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     26  1.1  cube  *  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     27  1.1  cube  *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     28  1.1  cube  *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     29  1.1  cube  *  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     30  1.1  cube  *  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     31  1.1  cube  *  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     32  1.1  cube  *  POSSIBILITY OF SUCH DAMAGE.
     33  1.1  cube  */
     34  1.1  cube 
     35  1.1  cube #if HAVE_NBTOOL_CONFIG_H
     36  1.1  cube #include "nbtool_config.h"
     37  1.1  cube #endif
     38  1.1  cube 
     39  1.1  cube #include <stdlib.h>
     40  1.1  cube 
     41  1.1  cube #include "defs.h"
     42  1.1  cube 
     43  1.1  cube void
     44  1.1  cube emit_params()
     45  1.1  cube {
     46  1.1  cube 
     47  1.1  cube 	printf("version\t%d\n", CONFIG_VERSION);
     48  1.1  cube 	printf("ident\t\"LINT_%s\"\n", conffile);
     49  1.1  cube 	printf("maxusers\t%d\n", defmaxusers);
     50  1.1  cube 	printf("config lint root on ?\n");
     51  1.1  cube 	printf("\n");
     52  1.1  cube }
     53  1.1  cube 
     54  1.1  cube enum opt_types {
     55  1.1  cube 	OT_FLAG,
     56  1.1  cube 	OT_PARAM,
     57  1.1  cube 	OT_FS
     58  1.1  cube };
     59  1.1  cube 
     60  1.1  cube static struct opt_type {
     61  1.1  cube 	enum opt_types ot_type;
     62  1.1  cube 	const char *ot_name;
     63  1.1  cube 	struct hashtab **ot_ht;
     64  1.1  cube } opt_types[] = {
     65  1.1  cube 	{ OT_FLAG, "options", &opttab },
     66  1.1  cube 	{ OT_PARAM, "options", &opttab },
     67  1.1  cube 	{ OT_FS, "file-system", &fsopttab },
     68  1.1  cube };
     69  1.1  cube 
     70  1.1  cube static int
     71  1.1  cube do_emit_option(const char *name, void *value, void *v)
     72  1.1  cube {
     73  1.1  cube 	struct nvlist *nv = value;
     74  1.1  cube 	const struct opt_type *ot = v;
     75  1.1  cube 
     76  1.1  cube 	if (nv->nv_flags & NV_OBSOLETE)
     77  1.1  cube 		return 0;
     78  1.1  cube 
     79  1.1  cube 	if (ht_lookup(*(ot->ot_ht), name))
     80  1.1  cube 		return 0;
     81  1.1  cube 
     82  1.1  cube 	printf("%s\t%s", ot->ot_name, nv->nv_name);
     83  1.1  cube 	if (ot->ot_type == OT_PARAM)
     84  1.1  cube 		printf("=%s", nv->nv_str ? nv->nv_str : "1");
     85  1.1  cube 	printf("\n");
     86  1.1  cube 
     87  1.1  cube 	return 1;
     88  1.1  cube }
     89  1.1  cube 
     90  1.1  cube 
     91  1.1  cube void
     92  1.1  cube emit_options()
     93  1.1  cube {
     94  1.1  cube 
     95  1.1  cube 	(void)ht_enumerate(defflagtab, do_emit_option, &opt_types[0]);
     96  1.1  cube 	printf("\n");
     97  1.1  cube 	(void)ht_enumerate(defparamtab, do_emit_option, &opt_types[1]);
     98  1.1  cube 	printf("\n");
     99  1.1  cube 	(void)ht_enumerate(deffstab, do_emit_option, &opt_types[2]);
    100  1.1  cube 	printf("\n");
    101  1.1  cube }
    102  1.1  cube 
    103  1.1  cube static void
    104  1.1  cube do_emit_instances(struct devbase *d, struct attr *at)
    105  1.1  cube {
    106  1.1  cube 	struct nvlist *nv, *nv1;
    107  1.1  cube 	struct attr *a;
    108  1.1  cube 	struct deva *da;
    109  1.1  cube 
    110  1.1  cube 	if (at != NULL) {
    111  1.1  cube 		for (da = d->d_ahead; da != NULL; da = da->d_bsame)
    112  1.1  cube 			if (onlist(da->d_atlist, at))
    113  1.1  cube 				break;
    114  1.1  cube 		if (da == NULL)
    115  1.1  cube 			panic("do_emit_instances: no deva found for %s at %s",
    116  1.1  cube 			    d->d_name, at->a_name);
    117  1.1  cube 
    118  1.1  cube 		if (da->d_isdef > 1)
    119  1.1  cube 			return;
    120  1.1  cube 		da->d_isdef = 2;
    121  1.1  cube 	}
    122  1.1  cube 
    123  1.1  cube 	if (d->d_ispseudo)
    124  1.1  cube 		printf("pseudo-device\t%s\n", d->d_name);
    125  1.1  cube 	else if (at == NULL)
    126  1.1  cube 		printf("%s0\tat\troot\n", d->d_name);
    127  1.1  cube 	else {
    128  1.1  cube 		printf("%s0\tat\t%s?", d->d_name, at->a_name);
    129  1.1  cube 
    130  1.1  cube 		for (nv = at->a_locs; nv != NULL; nv = nv->nv_next) {
    131  1.1  cube 			if (nv->nv_int == 0)
    132  1.1  cube 				printf(" %s %c", nv->nv_name,
    133  1.1  cube 				    nv->nv_str ? '?' : '0');
    134  1.1  cube 		}
    135  1.1  cube 
    136  1.1  cube 		printf("\n");
    137  1.1  cube 	}
    138  1.1  cube 
    139  1.1  cube 	for (nv = d->d_attrs; nv != NULL; nv = nv->nv_next) {
    140  1.1  cube 		a = nv->nv_ptr;
    141  1.1  cube 		for (nv1 = a->a_devs; nv1 != NULL; nv1 = nv1->nv_next)
    142  1.1  cube 			do_emit_instances(nv1->nv_ptr, a);
    143  1.1  cube 	}
    144  1.1  cube }
    145  1.1  cube 
    146  1.1  cube /* ARGSUSED */
    147  1.1  cube static int
    148  1.1  cube emit_root_instance(const char *name, void *value, void *v)
    149  1.1  cube {
    150  1.1  cube 
    151  1.1  cube 	do_emit_instances((struct devbase *)value, NULL);
    152  1.1  cube 
    153  1.1  cube 	return 1;
    154  1.1  cube }
    155  1.1  cube 
    156  1.1  cube void
    157  1.1  cube emit_instances()
    158  1.1  cube {
    159  1.1  cube 
    160  1.1  cube 	(void)ht_enumerate(devroottab, emit_root_instance, NULL);
    161  1.1  cube }
    162