xref: /openbsd-src/usr.bin/netstat/mbuf.c (revision 91f110e064cd7c194e59e019b83bb7496c1c84d4)
1 /*	$OpenBSD: mbuf.c,v 1.31 2010/07/08 08:47:07 lum 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 <limits.h>
43 #include <stdio.h>
44 #include <string.h>
45 #include <unistd.h>
46 #include "netstat.h"
47 
48 #define	YES	1
49 typedef int bool;
50 
51 struct	mbstat mbstat;
52 struct pool mbpool, mclpools[MCLPOOLS];
53 int	mclp;
54 char	*mclnames[] = {
55 	"mcl2k", "mcl4k", "mcl8k", "mcl9k", "mcl12k", "mcl16k", "mcl64k"
56 };
57 char	**mclnamep = mclnames;
58 
59 static struct mbtypes {
60 	int	mt_type;
61 	char	*mt_name;
62 } mbtypes[] = {
63 	{ MT_DATA,	"data" },
64 	{ MT_OOBDATA,	"oob data" },
65 	{ MT_CONTROL,	"ancillary data" },
66 	{ MT_HEADER,	"packet headers" },
67 	{ MT_FTABLE,	"fragment reassembly queue headers" },	/* XXX */
68 	{ MT_SONAME,	"socket names and addresses" },
69 	{ MT_SOOPTS,	"socket options" },
70 	{ 0, 0 }
71 };
72 
73 int nmbtypes = sizeof(mbstat.m_mtypes) / sizeof(short);
74 bool seen[256];			/* "have we seen this type yet?" */
75 
76 /*
77  * Print mbuf statistics.
78  */
79 void
80 mbpr(void)
81 {
82 	unsigned long totmem, totused, totmbufs;
83 	int totpct;
84 	int i, mib[4], npools;
85 	struct pool pool;
86 	struct mbtypes *mp;
87 	size_t size;
88 	int page_size = getpagesize();
89 
90 	if (nmbtypes != 256) {
91 		fprintf(stderr,
92 		    "%s: unexpected change to mbstat; check source\n",
93 		    __progname);
94 		return;
95 	}
96 
97 	mib[0] = CTL_KERN;
98 	mib[1] = KERN_MBSTAT;
99 	size = sizeof(mbstat);
100 
101 	if (sysctl(mib, 2, &mbstat, &size, NULL, 0) < 0) {
102 		printf("Can't retrieve mbuf statistics from the kernel: %s\n",
103 		    strerror(errno));
104 		return;
105 	}
106 
107 	mib[0] = CTL_KERN;
108 	mib[1] = KERN_POOL;
109 	mib[2] = KERN_POOL_NPOOLS;
110 	size = sizeof(npools);
111 
112 	if (sysctl(mib, 3, &npools, &size, NULL, 0) < 0) {
113 		printf("Can't figure out number of pools in kernel: %s\n",
114 		    strerror(errno));
115 		return;
116 	}
117 
118 	for (i = 1; npools; i++) {
119 		char name[32];
120 
121 		mib[0] = CTL_KERN;
122 		mib[1] = KERN_POOL;
123 		mib[2] = KERN_POOL_POOL;
124 		mib[3] = i;
125 		size = sizeof(struct pool);
126 		if (sysctl(mib, 4, &pool, &size, NULL, 0) < 0) {
127 			if (errno == ENOENT)
128 				continue;
129 			printf("error getting pool: %s\n",
130 			    strerror(errno));
131 			return;
132 		}
133 		npools--;
134 		mib[2] = KERN_POOL_NAME;
135 		size = sizeof(name);
136 		if (sysctl(mib, 4, &name, &size, NULL, 0) < 0) {
137 			printf("error getting pool name: %s\n",
138 			    strerror(errno));
139 			return;
140 		}
141 
142 		if (!strncmp(name, "mbpl", strlen("mbpl")))
143 			bcopy(&pool, &mbpool, sizeof(struct pool));
144 		else if (mclp < sizeof(mclpools) / sizeof(mclpools[0]) &&
145 		    !strncmp(name, *mclnamep, strlen(*mclnamep))) {
146 			bcopy(&pool, &mclpools[mclp++],
147 			    sizeof(struct pool));
148 			mclnamep++;
149 		}
150 	}
151 
152 	totmbufs = 0;
153 	for (mp = mbtypes; mp->mt_name; mp++)
154 		totmbufs += (unsigned int)mbstat.m_mtypes[mp->mt_type];
155 	printf("%lu mbuf%s in use:\n", totmbufs, plural(totmbufs));
156 	for (mp = mbtypes; mp->mt_name; mp++)
157 		if (mbstat.m_mtypes[mp->mt_type]) {
158 			seen[mp->mt_type] = YES;
159 			printf("\t%u mbuf%s allocated to %s\n",
160 			    mbstat.m_mtypes[mp->mt_type],
161 			    plural(mbstat.m_mtypes[mp->mt_type]),
162 			    mp->mt_name);
163 		}
164 	seen[MT_FREE] = YES;
165 	for (i = 0; i < nmbtypes; i++)
166 		if (!seen[i] && mbstat.m_mtypes[i]) {
167 			printf("\t%u mbuf%s allocated to <mbuf type %d>\n",
168 			    mbstat.m_mtypes[i],
169 			    plural(mbstat.m_mtypes[i]), i);
170 		}
171 	totmem = (mbpool.pr_npages * (unsigned long)page_size);
172 	totused = mbpool.pr_nout * mbpool.pr_size;
173 	for (i = 0; i < mclp; i++) {
174 		printf("%u/%lu/%lu mbuf %d byte clusters in use (current/peak/max)\n",
175 		    mclpools[i].pr_nout,
176 		    (u_long)mclpools[i].pr_hiwat * mclpools[i].pr_itemsperpage,
177 		    (u_long)mclpools[i].pr_maxpages * mclpools[i].pr_itemsperpage,
178 		    mclpools[i].pr_size);
179 		totmem += (mclpools[i].pr_npages * (unsigned long)page_size);
180 		totused += mclpools[i].pr_nout * mclpools[i].pr_size;
181 	}
182 
183 	totpct = (totmem == 0)? 0 : (totused/(totmem / 100));
184 	printf("%lu Kbytes allocated to network (%d%% in use)\n",
185 	    totmem / 1024, totpct);
186 	printf("%lu requests for memory denied\n", mbstat.m_drops);
187 	printf("%lu requests for memory delayed\n", mbstat.m_wait);
188 	printf("%lu calls to protocol drain routines\n", mbstat.m_drain);
189 }
190