subr_debug.c revision 1.2.4.4 1 1.2.4.4 yamt /* $NetBSD: subr_debug.c,v 1.2.4.4 2007/10/27 11:35:32 yamt Exp $ */
2 1.2.4.2 yamt
3 1.2.4.2 yamt /*-
4 1.2.4.2 yamt * Copyright (c) 2007 The NetBSD Foundation, Inc.
5 1.2.4.2 yamt * All rights reserved.
6 1.2.4.2 yamt *
7 1.2.4.2 yamt * This code is derived from software contributed to The NetBSD Foundation
8 1.2.4.2 yamt * by Andrew Doran.
9 1.2.4.2 yamt *
10 1.2.4.2 yamt * Redistribution and use in source and binary forms, with or without
11 1.2.4.2 yamt * modification, are permitted provided that the following conditions
12 1.2.4.2 yamt * are met:
13 1.2.4.2 yamt * 1. Redistributions of source code must retain the above copyright
14 1.2.4.2 yamt * notice, this list of conditions and the following disclaimer.
15 1.2.4.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
16 1.2.4.2 yamt * notice, this list of conditions and the following disclaimer in the
17 1.2.4.2 yamt * documentation and/or other materials provided with the distribution.
18 1.2.4.2 yamt * 3. All advertising materials mentioning features or use of this software
19 1.2.4.2 yamt * must display the following acknowledgement:
20 1.2.4.2 yamt * This product includes software developed by the NetBSD
21 1.2.4.2 yamt * Foundation, Inc. and its contributors.
22 1.2.4.2 yamt * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.2.4.2 yamt * contributors may be used to endorse or promote products derived
24 1.2.4.2 yamt * from this software without specific prior written permission.
25 1.2.4.2 yamt *
26 1.2.4.2 yamt * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.2.4.2 yamt * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.2.4.2 yamt * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.2.4.2 yamt * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.2.4.2 yamt * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.2.4.2 yamt * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.2.4.2 yamt * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.2.4.2 yamt * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.2.4.2 yamt * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.2.4.2 yamt * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.2.4.2 yamt * POSSIBILITY OF SUCH DAMAGE.
37 1.2.4.2 yamt */
38 1.2.4.2 yamt
39 1.2.4.2 yamt /*
40 1.2.4.2 yamt * Shared support code for kernels built with the DEBUG option.
41 1.2.4.2 yamt */
42 1.2.4.2 yamt
43 1.2.4.2 yamt #include <sys/cdefs.h>
44 1.2.4.4 yamt __KERNEL_RCSID(0, "$NetBSD: subr_debug.c,v 1.2.4.4 2007/10/27 11:35:32 yamt Exp $");
45 1.2.4.2 yamt
46 1.2.4.2 yamt #include "opt_ddb.h"
47 1.2.4.2 yamt
48 1.2.4.2 yamt #include <sys/param.h>
49 1.2.4.2 yamt #include <sys/proc.h>
50 1.2.4.2 yamt #include <sys/systm.h>
51 1.2.4.2 yamt #include <sys/kmem.h>
52 1.2.4.2 yamt #include <sys/debug.h>
53 1.2.4.2 yamt
54 1.2.4.2 yamt #include <uvm/uvm_extern.h>
55 1.2.4.2 yamt
56 1.2.4.2 yamt #include <machine/lock.h>
57 1.2.4.4 yamt #include <sys/cpu.h>
58 1.2.4.2 yamt
59 1.2.4.2 yamt /*
60 1.2.4.2 yamt * Allocation/free validation by pointer address. Introduces
61 1.2.4.2 yamt * significant overhead and is not enabled by default. Patch
62 1.2.4.2 yamt * `debug_freecheck' to 1 at boot time to enable.
63 1.2.4.2 yamt */
64 1.2.4.2 yamt #define FREECHECK_BYTES (8*1024*1024)
65 1.2.4.2 yamt
66 1.2.4.2 yamt typedef struct fcitem {
67 1.2.4.2 yamt void *i_addr;
68 1.2.4.2 yamt struct fcitem *i_next;
69 1.2.4.2 yamt } fcitem_t;
70 1.2.4.2 yamt
71 1.2.4.2 yamt fcitem_t *freecheck_free;
72 1.2.4.2 yamt __cpu_simple_lock_t freecheck_lock;
73 1.2.4.2 yamt int debug_freecheck;
74 1.2.4.2 yamt
75 1.2.4.2 yamt void
76 1.2.4.2 yamt debug_init(void)
77 1.2.4.2 yamt {
78 1.2.4.2 yamt size_t cnt;
79 1.2.4.2 yamt fcitem_t *i;
80 1.2.4.2 yamt
81 1.2.4.2 yamt __cpu_simple_lock_init(&freecheck_lock);
82 1.2.4.2 yamt
83 1.2.4.2 yamt if (debug_freecheck) {
84 1.2.4.2 yamt i = (fcitem_t *)uvm_km_alloc(kernel_map, FREECHECK_BYTES, 0,
85 1.2.4.2 yamt UVM_KMF_WIRED);
86 1.2.4.2 yamt if (i == NULL) {
87 1.2.4.2 yamt printf("freecheck_init: unable to allocate memory");
88 1.2.4.2 yamt return;
89 1.2.4.2 yamt }
90 1.2.4.2 yamt
91 1.2.4.2 yamt for (cnt = FREECHECK_BYTES / sizeof(*i); cnt != 0; cnt--) {
92 1.2.4.2 yamt i->i_next = freecheck_free;
93 1.2.4.2 yamt freecheck_free = i++;
94 1.2.4.2 yamt }
95 1.2.4.2 yamt }
96 1.2.4.2 yamt }
97 1.2.4.2 yamt
98 1.2.4.2 yamt void
99 1.2.4.2 yamt freecheck_out(void **head, void *addr)
100 1.2.4.2 yamt {
101 1.2.4.2 yamt fcitem_t *i;
102 1.2.4.2 yamt int s;
103 1.2.4.2 yamt
104 1.2.4.2 yamt if (!debug_freecheck)
105 1.2.4.2 yamt return;
106 1.2.4.2 yamt
107 1.2.4.2 yamt s = splvm();
108 1.2.4.2 yamt __cpu_simple_lock(&freecheck_lock);
109 1.2.4.3 yamt for (i = *head; i != NULL; i = i->i_next) {
110 1.2.4.3 yamt if (i->i_addr != addr)
111 1.2.4.3 yamt continue;
112 1.2.4.3 yamt __cpu_simple_unlock(&freecheck_lock);
113 1.2.4.3 yamt splx(s);
114 1.2.4.3 yamt panic("freecheck_out: %p already out", addr);
115 1.2.4.3 yamt }
116 1.2.4.2 yamt if ((i = freecheck_free) != NULL) {
117 1.2.4.2 yamt freecheck_free = i->i_next;
118 1.2.4.2 yamt i->i_addr = addr;
119 1.2.4.2 yamt i->i_next = *head;
120 1.2.4.2 yamt *head = i;
121 1.2.4.2 yamt }
122 1.2.4.2 yamt __cpu_simple_unlock(&freecheck_lock);
123 1.2.4.2 yamt splx(s);
124 1.2.4.2 yamt
125 1.2.4.2 yamt if (i == NULL) {
126 1.2.4.2 yamt printf("freecheck_out: no more slots");
127 1.2.4.2 yamt debug_freecheck = 0;
128 1.2.4.2 yamt }
129 1.2.4.2 yamt }
130 1.2.4.2 yamt
131 1.2.4.2 yamt void
132 1.2.4.2 yamt freecheck_in(void **head, void *addr)
133 1.2.4.2 yamt {
134 1.2.4.2 yamt fcitem_t *i;
135 1.2.4.2 yamt void *pp;
136 1.2.4.2 yamt int s;
137 1.2.4.2 yamt
138 1.2.4.2 yamt if (!debug_freecheck)
139 1.2.4.2 yamt return;
140 1.2.4.2 yamt
141 1.2.4.2 yamt s = splvm();
142 1.2.4.2 yamt __cpu_simple_lock(&freecheck_lock);
143 1.2.4.2 yamt for (i = *head, pp = head; i != NULL; pp = &i->i_next, i = i->i_next) {
144 1.2.4.2 yamt if (i->i_addr == addr) {
145 1.2.4.2 yamt *(fcitem_t **)pp = i->i_next;
146 1.2.4.2 yamt i->i_next = freecheck_free;
147 1.2.4.2 yamt freecheck_free = i;
148 1.2.4.2 yamt break;
149 1.2.4.2 yamt }
150 1.2.4.2 yamt }
151 1.2.4.2 yamt __cpu_simple_unlock(&freecheck_lock);
152 1.2.4.2 yamt splx(s);
153 1.2.4.2 yamt
154 1.2.4.2 yamt if (i != NULL)
155 1.2.4.2 yamt return;
156 1.2.4.2 yamt
157 1.2.4.2 yamt #ifdef DDB
158 1.2.4.2 yamt printf("freecheck_in: %p not out", addr);
159 1.2.4.2 yamt Debugger();
160 1.2.4.2 yamt #else
161 1.2.4.2 yamt panic("freecheck_in: %p not out", addr);
162 1.2.4.2 yamt #endif
163 1.2.4.2 yamt }
164