1 /*
2 * VMPAGEINFO.C
3 *
4 * cc -I/usr/src/sys vmpagequeues.c -o ~/bin/vmpagequeues -lkvm
5 *
6 * vmpagequeues
7 *
8 * Outputs statistics on PQ_FREE (-f, default), or -c, -i, -a for
9 * PQ_CACHE, PQ_INACTIVE, and PQ_ACTIVE.
10 *
11 * Copyright (c) 2016 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
44 #define _KERNEL_STRUCTURES_
45 #include <sys/param.h>
46 #include <sys/user.h>
47 #include <sys/malloc.h>
48 #include <sys/signalvar.h>
49 #include <sys/vnode.h>
50 #include <sys/namecache.h>
51 #include <sys/slaballoc.h>
52
53 #include <vm/vm.h>
54 #include <vm/vm_page.h>
55 #include <vm/vm_kern.h>
56 #include <vm/vm_object.h>
57 #include <vm/swap_pager.h>
58 #include <vm/vnode_pager.h>
59
60 #include <stdio.h>
61 #include <stdlib.h>
62 #include <string.h>
63 #include <fcntl.h>
64 #include <kvm.h>
65 #include <nlist.h>
66 #include <getopt.h>
67
68 struct nlist Nl[] = {
69 #if 0
70 { "_vm_page_buckets" },
71 { "_vm_page_hash_mask" },
72 #endif
73 { "_vm_page_queues" },
74 { NULL }
75 };
76
77 int debugopt;
78 int verboseopt;
79
80 static void kkread_vmpage(kvm_t *kd, u_long addr, vm_page_t m);
81 static void kkread(kvm_t *kd, u_long addr, void *buf, size_t nbytes);
82 static int kkread_err(kvm_t *kd, u_long addr, void *buf, size_t nbytes);
83
84 int
main(int ac,char ** av)85 main(int ac, char **av)
86 {
87 const char *corefile = NULL;
88 const char *sysfile = NULL;
89 kvm_t *kd;
90 int ch;
91 int i;
92 int q = PQ_FREE;
93 struct vpgqueues queues[PQ_COUNT];
94
95 while ((ch = getopt(ac, av, "M:N:dviacf")) != -1) {
96 switch(ch) {
97 case 'i':
98 q = PQ_INACTIVE;
99 break;
100 case 'a':
101 q = PQ_ACTIVE;
102 break;
103 case 'c':
104 q = PQ_CACHE;
105 break;
106 case 'f':
107 q = PQ_FREE;
108 break;
109 case 'd':
110 ++debugopt;
111 break;
112 case 'v':
113 ++verboseopt;
114 break;
115 case 'M':
116 corefile = optarg;
117 break;
118 case 'N':
119 sysfile = optarg;
120 break;
121 default:
122 fprintf(stderr, "%s [-M core] [-N system]\n", av[0]);
123 exit(1);
124 }
125 }
126 ac -= optind;
127 av += optind;
128
129 if ((kd = kvm_open(sysfile, corefile, NULL, O_RDONLY, "kvm:")) == NULL) {
130 perror("kvm_open");
131 exit(1);
132 }
133 if (kvm_nlist(kd, Nl) != 0) {
134 perror("kvm_nlist");
135 exit(1);
136 }
137
138 for (;;) {
139 kkread(kd, Nl[0].n_value, queues, sizeof(queues));
140 for (i = 0; i < PQ_L2_SIZE; ++i) {
141 struct vpgqueues *vpq = &queues[q+i];
142 if ((i & 7) == 0)
143 printf("%3d ", i);
144 printf("\t%6d", vpq->lcnt);
145 if ((i & 7) == 7)
146 printf("\n");
147 if ((i & 63) == 63)
148 printf("\n");
149 }
150 printf("\n");
151 sleep(1);
152 }
153 return(0);
154 }
155
156 static void
kkread(kvm_t * kd,u_long addr,void * buf,size_t nbytes)157 kkread(kvm_t *kd, u_long addr, void *buf, size_t nbytes)
158 {
159 if (kvm_read(kd, addr, buf, nbytes) != nbytes) {
160 perror("kvm_read");
161 exit(1);
162 }
163 }
164
165 static int
kkread_err(kvm_t * kd,u_long addr,void * buf,size_t nbytes)166 kkread_err(kvm_t *kd, u_long addr, void *buf, size_t nbytes)
167 {
168 if (kvm_read(kd, addr, buf, nbytes) != nbytes) {
169 return 1;
170 }
171 return 0;
172 }
173