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