Add the 'webstress' utility. This program will fork a number of child
[dragonfly.git] / test / debug / vnodeinfo.c
1 /*
2  * VNODEINFO.C
3  *
4  * cc -I/usr/src/sys vnodeinfo.c -o /usr/local/bin/vnodeinfo -lkvm
5  *
6  * vnodeinfo
7  *
8  * Dump the mountlist and related vnodes.
9  *
10  *
11  * Copyright (c) 2004 The DragonFly Project.  All rights reserved.
12  * 
13  * This code is derived from software contributed to The DragonFly Project
14  * by Matthew Dillon <dillon@backplane.com>
15  * 
16  * Redistribution and use in source and binary forms, with or without
17  * modification, are permitted provided that the following conditions
18  * are met:
19  * 
20  * 1. Redistributions of source code must retain the above copyright
21  *    notice, this list of conditions and the following disclaimer.
22  * 2. Redistributions in binary form must reproduce the above copyright
23  *    notice, this list of conditions and the following disclaimer in
24  *    the documentation and/or other materials provided with the
25  *    distribution.
26  * 3. Neither the name of The DragonFly Project nor the names of its
27  *    contributors may be used to endorse or promote products derived
28  *    from this software without specific, prior written permission.
29  * 
30  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
31  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
32  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
33  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
34  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
35  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
36  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
37  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
38  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
39  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
40  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41  * SUCH DAMAGE.
42  *
43  * $DragonFly: src/test/debug/vnodeinfo.c,v 1.5 2005/03/24 20:14:42 dillon Exp $
44  */
45
46 #define _KERNEL_STRUCTURES_
47 #include <sys/param.h>
48 #include <sys/user.h>
49 #include <sys/malloc.h>
50 #include <sys/signalvar.h>
51 #include <sys/mount.h>
52 #include <sys/vnode.h>
53
54 #include <vm/vm.h>
55 #include <vm/vm_page.h>
56 #include <vm/vm_kern.h>
57 #include <vm/vm_object.h>
58 #include <vm/swap_pager.h>
59 #include <vm/vnode_pager.h>
60
61 #include <stdio.h>
62 #include <stdlib.h>
63 #include <string.h>
64 #include <fcntl.h>
65 #include <kvm.h>
66 #include <nlist.h>
67 #include <getopt.h>
68
69 struct nlist Nl[] = {
70     { "_mountlist" },
71     { "_vnode_free_list" },
72     { NULL }
73 };
74
75 static void kkread(kvm_t *kd, u_long addr, void *buf, size_t nbytes);
76 static struct mount *dumpmount(kvm_t *kd, struct mount *mp);
77 static struct vnode *dumpvp(kvm_t *kd, struct vnode *vp, int whichlist);
78 static int getobjpages(kvm_t *kd, struct vm_object *obj);
79 static int getobjvnpsize(kvm_t *kd, struct vm_object *obj);
80
81 main(int ac, char **av)
82 {
83     struct mount *mp;
84     struct vnode *vp;
85     kvm_t *kd;
86     int i;
87     int ch;
88     const char *corefile = NULL;
89     const char *sysfile = NULL;
90
91     while ((ch = getopt(ac, av, "M:N:")) != -1) {
92         switch(ch) {   
93         case 'M':
94             corefile = optarg;
95             break;
96         case 'N': 
97             sysfile = optarg;
98             break; 
99         default:  
100             fprintf(stderr, "%s [-M core] [-N system]\n", av[0]);
101             exit(1);
102         }
103     }
104
105     if ((kd = kvm_open(sysfile, corefile, NULL, O_RDONLY, "kvm:")) == NULL) {
106         perror("kvm_open");
107         exit(1);
108     }
109     if (kvm_nlist(kd, Nl) != 0) {
110         perror("kvm_nlist");
111         exit(1);
112     }
113     kkread(kd, Nl[0].n_value, &mp, sizeof(mp));
114     while (mp)
115         mp = dumpmount(kd, mp);
116     kkread(kd, Nl[1].n_value, &vp, sizeof(vp));
117     printf("VNODEFREELIST {\n");
118     while (vp)
119         vp = dumpvp(kd, vp, 0);
120     printf("}\n");
121     return(0);
122 }
123
124 static struct mount *
125 dumpmount(kvm_t *kd, struct mount *mp)
126 {
127     struct mount mnt;
128     struct vnode *vp;
129
130     kkread(kd, (u_long)mp, &mnt, sizeof(mnt));
131     printf("MOUNTPOINT %s on %s {\n", 
132         mnt.mnt_stat.f_mntfromname, mnt.mnt_stat.f_mntonname);
133     printf("    lk_flags %08x share %d wait %d excl %d holder = %p\n",
134         mnt.mnt_lock.lk_flags, mnt.mnt_lock.lk_sharecount,
135         mnt.mnt_lock.lk_waitcount, mnt.mnt_lock.lk_exclusivecount,
136         mnt.mnt_lock.lk_lockholder);
137     printf("    mnt_flag %08x mnt_kern_flag %08x\n", 
138         mnt.mnt_flag, mnt.mnt_kern_flag);
139     printf("    mnt_nvnodelistsize %d\n", mnt.mnt_nvnodelistsize);
140     vp = mnt.mnt_nvnodelist.tqh_first;
141     while (vp)
142         vp = dumpvp(kd, vp, 1);
143
144     printf("}\n");
145
146     return(mnt.mnt_list.tqe_next);
147 }
148
149 static const char *
150 vtype(enum vtype type)
151 {
152     static char buf[32];
153
154     switch(type) {
155     case VNON:
156         return("VNON");
157     case VREG:
158         return("VREG");
159     case VDIR:
160         return("VDIR");
161     case VBLK:
162         return("VBLK");
163     case VCHR:
164         return("VCHR");
165     case VLNK:
166         return("VLNK");
167     case VSOCK:
168         return("VSOCK");
169     case VFIFO:
170         return("VFIFO");
171     case VBAD:
172         return("VBAD");
173     default:
174         break;
175     }
176     snprintf(buf, sizeof(buf), "%d", (int)type);
177     return(buf);
178 }
179
180 static struct vnode *
181 dumpvp(kvm_t *kd, struct vnode *vp, int whichlist)
182 {
183     struct vnode vn;
184
185     kkread(kd, (u_long)vp, &vn, sizeof(vn));
186
187     printf("    vnode %p usecnt %d holdcnt %d type=%s flags %08x",
188         vp, vn.v_usecount, vn.v_holdcnt, vtype(vn.v_type), vn.v_flag);
189
190     if ((vn.v_flag & VOBJBUF) && vn.v_object) {
191         int npages = getobjpages(kd, vn.v_object);
192         int vnpsize = getobjvnpsize(kd, vn.v_object);
193         if (npages || vnpsize)
194             printf(" vmobjpgs=%d vnpsize=%d", npages, vnpsize);
195     }
196
197     if (vn.v_flag & VROOT)
198         printf(" VROOT");
199     if (vn.v_flag & VTEXT)
200         printf(" VTEXT");
201     if (vn.v_flag & VSYSTEM)
202         printf(" VSYSTEM");
203     if (vn.v_flag & VISTTY)
204         printf(" VISTTY");
205 #ifdef VXLOCK
206     if (vn.v_flag & VXLOCK)
207         printf(" VXLOCK");
208     if (vn.v_flag & VXWANT)
209         printf(" VXWANT");
210 #endif
211 #ifdef VRECLAIMED
212     if (vn.v_flag & VRECLAIMED)
213         printf(" VRECLAIMED");
214     if (vn.v_flag & VINACTIVE)
215         printf(" VINACTIVE");
216 #endif
217     if (vn.v_flag & VBWAIT)
218         printf(" VBWAIT");
219     if (vn.v_flag & VOBJBUF)
220         printf(" VOBJBUF");
221     if (vn.v_flag & VAGE)
222         printf(" VAGE");
223     if (vn.v_flag & VOLOCK)
224         printf(" VOLOCK");
225     if (vn.v_flag & VOWANT)
226         printf(" VOWANT");
227 #ifdef VDOOMED
228     if (vn.v_flag & VDOOMED)
229         printf(" VDOOMED");
230 #endif
231     if (vn.v_flag & VFREE)
232         printf(" VFREE");
233 #ifdef VINFREE
234     if (vn.v_flag & VINFREE)
235         printf(" VINFREE");
236 #endif
237     if (vn.v_flag & VONWORKLST)
238         printf(" VONWORKLST");
239     if (vn.v_flag & VMOUNT)
240         printf(" VMOUNT");
241     if (vn.v_flag & VOBJDIRTY)
242         printf(" VOBJDIRTY");
243     if (vn.v_flag & VPLACEMARKER)
244         printf(" VPLACEMARKER");
245
246     printf("\n");
247
248     if (vn.v_lock.lk_sharecount || vn.v_lock.lk_waitcount || 
249         vn.v_lock.lk_exclusivecount || vn.v_lock.lk_lockholder != LK_NOTHREAD) {
250         printf("\tlk_flags %08x share %d wait %d excl %d holder = %p\n",
251             vn.v_lock.lk_flags, vn.v_lock.lk_sharecount,
252             vn.v_lock.lk_waitcount, vn.v_lock.lk_exclusivecount,
253             vn.v_lock.lk_lockholder);
254     }
255
256     if (whichlist)
257         return(vn.v_nmntvnodes.tqe_next);
258     else
259         return(vn.v_freelist.tqe_next);
260 }
261
262 static
263 int
264 getobjpages(kvm_t *kd, struct vm_object *obj)
265 {
266         struct vm_object vmobj;
267
268         kkread(kd, (u_long)obj, &vmobj, sizeof(vmobj));
269         return(vmobj.resident_page_count);
270 }
271
272 static
273 int
274 getobjvnpsize(kvm_t *kd, struct vm_object *obj)
275 {
276         struct vm_object vmobj;
277
278         kkread(kd, (u_long)obj, &vmobj, sizeof(vmobj));
279         return(vmobj.un_pager.vnp.vnp_size);
280 }
281
282 static void
283 kkread(kvm_t *kd, u_long addr, void *buf, size_t nbytes)
284 {
285     if (kvm_read(kd, addr, buf, nbytes) != nbytes) {
286         perror("kvm_read");
287         exit(1);
288     }
289 }
290