xref: /netbsd-src/sys/kern/subr_evcnt.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /* $NetBSD: subr_evcnt.c,v 1.2 2004/02/17 08:22:12 tron Exp $ */
2 
3 /*
4  * Copyright (c) 1996, 2000 Christopher G. Demetriou
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. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *          This product includes software developed for the
18  *          NetBSD Project.  See http://www.NetBSD.org/ for
19  *          information about NetBSD.
20  * 4. The name of the author may not be used to endorse or promote products
21  *    derived from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33  *
34  * --(license Id: LICENSE.proto,v 1.1 2000/06/13 21:40:26 cgd Exp )--
35  */
36 
37 /*
38  * Copyright (c) 1992, 1993
39  *	The Regents of the University of California.  All rights reserved.
40  *
41  * This software was developed by the Computer Systems Engineering group
42  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
43  * contributed to Berkeley.
44  *
45  * All advertising materials mentioning features or use of this software
46  * must display the following acknowledgement:
47  *	This product includes software developed by the University of
48  *	California, Lawrence Berkeley Laboratories.
49  *
50  * Redistribution and use in source and binary forms, with or without
51  * modification, are permitted provided that the following conditions
52  * are met:
53  * 1. Redistributions of source code must retain the above copyright
54  *    notice, this list of conditions and the following disclaimer.
55  * 2. Redistributions in binary form must reproduce the above copyright
56  *    notice, this list of conditions and the following disclaimer in the
57  *    documentation and/or other materials provided with the distribution.
58  * 3. Neither the name of the University nor the names of its contributors
59  *    may be used to endorse or promote products derived from this software
60  *    without specific prior written permission.
61  *
62  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
63  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
64  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
65  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
66  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
67  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
68  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
69  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
70  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
71  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
72  * SUCH DAMAGE.
73  *
74  * from: Header: subr_autoconf.c,v 1.12 93/02/01 19:31:48 torek Exp  (LBL)
75  *
76  *	@(#)subr_autoconf.c	8.3 (Berkeley) 5/17/94
77  */
78 
79 #include <sys/cdefs.h>
80 __KERNEL_RCSID(0, "$NetBSD: subr_evcnt.c,v 1.2 2004/02/17 08:22:12 tron Exp $");
81 
82 #include "opt_ddb.h"
83 
84 #include <sys/param.h>
85 #include <sys/device.h>
86 #include <sys/systm.h>
87 
88 /* list of all events */
89 struct evcntlist allevents = TAILQ_HEAD_INITIALIZER(allevents);
90 
91 /*
92  * We need a dummy object to stuff into the evcnt link set to
93  * ensure that there always is at least one object in the set.
94  */
95 static struct evcnt dummy_static_evcnt;
96 __link_set_add_bss(evcnts, dummy_static_evcnt);
97 
98 /*
99  * Initialize event counters.  This does the attach procedure for
100  * each of the static event counters in the "evcnts" link set.
101  */
102 void
103 evcnt_init(void)
104 {
105 	__link_set_decl(evcnts, struct evcnt);
106 	struct evcnt * const *evp;
107 
108 	__link_set_foreach(evp, evcnts) {
109 		if (*evp == &dummy_static_evcnt)
110 			continue;
111 		evcnt_attach_static(*evp);
112 	}
113 }
114 
115 /*
116  * Attach a statically-initialized event.  The type and string pointers
117  * are already set up.
118  */
119 void
120 evcnt_attach_static(struct evcnt *ev)
121 {
122 	int len;
123 
124 	len = strlen(ev->ev_group);
125 #ifdef DIAGNOSTIC
126 	if (len >= EVCNT_STRING_MAX)		/* ..._MAX includes NUL */
127 		panic("evcnt_attach_static: group length (%s)", ev->ev_group);
128 #endif
129 	ev->ev_grouplen = len;
130 
131 	len = strlen(ev->ev_name);
132 #ifdef DIAGNOSTIC
133 	if (len >= EVCNT_STRING_MAX)		/* ..._MAX includes NUL */
134 		panic("evcnt_attach_static: name length (%s)", ev->ev_name);
135 #endif
136 	ev->ev_namelen = len;
137 
138 	TAILQ_INSERT_TAIL(&allevents, ev, ev_list);
139 }
140 
141 /*
142  * Attach a dynamically-initialized event.  Zero it, set up the type
143  * and string pointers and then act like it was statically initialized.
144  */
145 void
146 evcnt_attach_dynamic(struct evcnt *ev, int type, const struct evcnt *parent,
147     const char *group, const char *name)
148 {
149 
150 	memset(ev, 0, sizeof *ev);
151 	ev->ev_type = type;
152 	ev->ev_parent = parent;
153 	ev->ev_group = group;
154 	ev->ev_name = name;
155 	evcnt_attach_static(ev);
156 }
157 
158 /*
159  * Detach an event.
160  */
161 void
162 evcnt_detach(struct evcnt *ev)
163 {
164 
165 	TAILQ_REMOVE(&allevents, ev, ev_list);
166 }
167 
168 #ifdef DDB
169 void
170 event_print(int full, void (*pr)(const char *, ...))
171 {
172 	struct evcnt *evp;
173 
174 	TAILQ_FOREACH(evp, &allevents, ev_list) {
175 		if (evp->ev_count == 0 && !full)
176 			continue;
177 
178 		(*pr)("evcnt type %d: %s %s = %lld\n", evp->ev_type,
179 		    evp->ev_group, evp->ev_name, evp->ev_count);
180 	}
181 }
182 #endif /* DDB */
183