xref: /openbsd/usr.bin/netstat/mbuf.c (revision 404b540a)
1 /*	$OpenBSD: mbuf.c,v 1.30 2009/06/25 22:31:18 deraadt Exp $	*/
2 /*	$NetBSD: mbuf.c,v 1.9 1996/05/07 02:55:03 thorpej Exp $	*/
3 
4 /*
5  * Copyright (c) 1983, 1988, 1993
6  *	The Regents of the University of California.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the University nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 
33 #include <sys/param.h>
34 #include <sys/protosw.h>
35 #include <sys/socket.h>
36 #include <sys/mbuf.h>
37 #include <sys/pool.h>
38 #include <sys/sysctl.h>
39 #include <net/if.h>
40 
41 #include <errno.h>
42 #include <kvm.h>
43 #include <limits.h>
44 #include <stdio.h>
45 #include <string.h>
46 #include <unistd.h>
47 #include "netstat.h"
48 
49 #define	YES	1
50 typedef int bool;
51 
52 struct	mbstat mbstat;
53 struct pool mbpool, mclpools[MCLPOOLS];
54 int	mclp;
55 char	*mclnames[] = {
56 	"mcl2k", "mcl4k", "mcl8k", "mcl9k", "mcl12k", "mcl16k", "mcl64k"
57 };
58 char	**mclnamep = mclnames;
59 
60 extern kvm_t *kvmd;
61 
62 static struct mbtypes {
63 	int	mt_type;
64 	char	*mt_name;
65 } mbtypes[] = {
66 	{ MT_DATA,	"data" },
67 	{ MT_OOBDATA,	"oob data" },
68 	{ MT_CONTROL,	"ancillary data" },
69 	{ MT_HEADER,	"packet headers" },
70 	{ MT_FTABLE,	"fragment reassembly queue headers" },	/* XXX */
71 	{ MT_SONAME,	"socket names and addresses" },
72 	{ MT_SOOPTS,	"socket options" },
73 	{ 0, 0 }
74 };
75 
76 int nmbtypes = sizeof(mbstat.m_mtypes) / sizeof(short);
77 bool seen[256];			/* "have we seen this type yet?" */
78 
79 /*
80  * Print mbuf statistics.
81  */
82 void
83 mbpr(void)
84 {
85 	unsigned long totmem, totused, totmbufs;
86 	int totpct;
87 	int i, mib[4], npools;
88 	struct pool pool;
89 	struct mbtypes *mp;
90 	size_t size;
91 	int page_size = getpagesize();
92 
93 	if (nmbtypes != 256) {
94 		fprintf(stderr,
95 		    "%s: unexpected change to mbstat; check source\n",
96 		    __progname);
97 		return;
98 	}
99 
100 	mib[0] = CTL_KERN;
101 	mib[1] = KERN_MBSTAT;
102 	size = sizeof(mbstat);
103 
104 	if (sysctl(mib, 2, &mbstat, &size, NULL, 0) < 0) {
105 		printf("Can't retrieve mbuf statistics from the kernel: %s\n",
106 		    strerror(errno));
107 		return;
108 	}
109 
110 	mib[0] = CTL_KERN;
111 	mib[1] = KERN_POOL;
112 	mib[2] = KERN_POOL_NPOOLS;
113 	size = sizeof(npools);
114 
115 	if (sysctl(mib, 3, &npools, &size, NULL, 0) < 0) {
116 		printf("Can't figure out number of pools in kernel: %s\n",
117 		    strerror(errno));
118 		return;
119 	}
120 
121 	for (i = 1; npools; i++) {
122 		char name[32];
123 
124 		mib[0] = CTL_KERN;
125 		mib[1] = KERN_POOL;
126 		mib[2] = KERN_POOL_POOL;
127 		mib[3] = i;
128 		size = sizeof(struct pool);
129 		if (sysctl(mib, 4, &pool, &size, NULL, 0) < 0) {
130 			if (errno == ENOENT)
131 				continue;
132 			printf("error getting pool: %s\n",
133 			    strerror(errno));
134 			return;
135 		}
136 		npools--;
137 		mib[2] = KERN_POOL_NAME;
138 		size = sizeof(name);
139 		if (sysctl(mib, 4, &name, &size, NULL, 0) < 0) {
140 			printf("error getting pool name: %s\n",
141 			    strerror(errno));
142 			return;
143 		}
144 
145 		if (!strncmp(name, "mbpl", strlen("mbpl")))
146 			bcopy(&pool, &mbpool, sizeof(struct pool));
147 		else if (mclp < sizeof(mclpools) / sizeof(mclpools[0]) &&
148 		    !strncmp(name, *mclnamep, strlen(*mclnamep))) {
149 			bcopy(&pool, &mclpools[mclp++],
150 			    sizeof(struct pool));
151 			mclnamep++;
152 		}
153 	}
154 
155 	totmbufs = 0;
156 	for (mp = mbtypes; mp->mt_name; mp++)
157 		totmbufs += (unsigned int)mbstat.m_mtypes[mp->mt_type];
158 	printf("%lu mbuf%s in use:\n", totmbufs, plural(totmbufs));
159 	for (mp = mbtypes; mp->mt_name; mp++)
160 		if (mbstat.m_mtypes[mp->mt_type]) {
161 			seen[mp->mt_type] = YES;
162 			printf("\t%u mbuf%s allocated to %s\n",
163 			    mbstat.m_mtypes[mp->mt_type],
164 			    plural(mbstat.m_mtypes[mp->mt_type]),
165 			    mp->mt_name);
166 		}
167 	seen[MT_FREE] = YES;
168 	for (i = 0; i < nmbtypes; i++)
169 		if (!seen[i] && mbstat.m_mtypes[i]) {
170 			printf("\t%u mbuf%s allocated to <mbuf type %d>\n",
171 			    mbstat.m_mtypes[i],
172 			    plural(mbstat.m_mtypes[i]), i);
173 		}
174 	totmem = (mbpool.pr_npages * (unsigned long)page_size);
175 	totused = mbpool.pr_nout * mbpool.pr_size;
176 	for (i = 0; i < mclp; i++) {
177 		printf("%u/%lu/%lu mbuf %d byte clusters in use (current/peak/max)\n",
178 		    mclpools[i].pr_nout,
179 		    (u_long)mclpools[i].pr_hiwat * mclpools[i].pr_itemsperpage,
180 		    (u_long)mclpools[i].pr_maxpages * mclpools[i].pr_itemsperpage,
181 		    mclpools[i].pr_size);
182 		totmem += (mclpools[i].pr_npages * (unsigned long)page_size);
183 		totused += mclpools[i].pr_nout * mclpools[i].pr_size;
184 	}
185 
186 	totpct = (totmem == 0)? 0 : (totused/(totmem / 100));
187 	printf("%lu Kbytes allocated to network (%d%% in use)\n",
188 	    totmem / 1024, totpct);
189 	printf("%lu requests for memory denied\n", mbstat.m_drops);
190 	printf("%lu requests for memory delayed\n", mbstat.m_wait);
191 	printf("%lu calls to protocol drain routines\n", mbstat.m_drain);
192 }
193