xref: /dragonfly/usr.bin/netstat/mbuf.c (revision 984263bc)
1 /*
2  * Copyright (c) 1983, 1988, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *	This product includes software developed by the University of
16  *	California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33 
34 #ifndef lint
35 #if 0
36 static char sccsid[] = "@(#)mbuf.c	8.1 (Berkeley) 6/6/93";
37 #endif
38 static const char rcsid[] =
39   "$FreeBSD: src/usr.bin/netstat/mbuf.c,v 1.17.2.3 2001/08/10 09:07:09 ru Exp $";
40 #endif /* not lint */
41 
42 #include <sys/param.h>
43 #include <sys/mbuf.h>
44 #include <sys/protosw.h>
45 #include <sys/socket.h>
46 #include <sys/sysctl.h>
47 
48 #include <err.h>
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include "netstat.h"
52 
53 #define	YES	1
54 typedef int bool;
55 
56 static struct mbtypenames {
57 	int	mt_type;
58 	char	*mt_name;
59 } mbtypenames[] = {
60 	{ MT_DATA,	"data" },
61 	{ MT_OOBDATA,	"oob data" },
62 	{ MT_CONTROL,	"ancillary data" },
63 	{ MT_HEADER,	"packet headers" },
64 #ifdef MT_SOCKET
65 	{ MT_SOCKET,	"socket structures" },			/* XXX */
66 #endif
67 #ifdef MT_PCB
68 	{ MT_PCB,	"protocol control blocks" },		/* XXX */
69 #endif
70 #ifdef MT_RTABLE
71 	{ MT_RTABLE,	"routing table entries" },		/* XXX */
72 #endif
73 #ifdef MT_HTABLE
74 	{ MT_HTABLE,	"IMP host table entries" },		/* XXX */
75 #endif
76 #ifdef MT_ATABLE
77 	{ MT_ATABLE,	"address resolution tables" },
78 #endif
79 	{ MT_FTABLE,	"fragment reassembly queue headers" },	/* XXX */
80 	{ MT_SONAME,	"socket names and addresses" },
81 #ifdef MT_SOOPTS
82 	{ MT_SOOPTS,	"socket options" },
83 #endif
84 #ifdef MT_RIGHTS
85 	{ MT_RIGHTS,	"access rights" },
86 #endif
87 #ifdef MT_IFADDR
88 	{ MT_IFADDR,	"interface addresses" },		/* XXX */
89 #endif
90 	{ 0, 0 }
91 };
92 
93 /*
94  * Print mbuf statistics.
95  */
96 void
97 mbpr(u_long mbaddr, u_long mbtaddr, u_long nmbcaddr, u_long nmbufaddr)
98 {
99 	u_long totmem, totpossible, totmbufs;
100 	register int i;
101 	struct mbstat mbstat;
102 	struct mbtypenames *mp;
103 	int name[3], nmbclusters, nmbufs, nmbtypes;
104 	size_t nmbclen, nmbuflen, mbstatlen, mbtypeslen;
105 	u_long *mbtypes;
106 	bool *seen;	/* "have we seen this type yet?" */
107 
108 	mbtypes = NULL;
109 	seen = NULL;
110 
111 	/*
112 	 * XXX
113 	 * We can't kread() mbtypeslen from a core image so we'll
114 	 * bogusly assume it's the same as in the running kernel.
115 	 */
116 	if (sysctlbyname("kern.ipc.mbtypes", NULL, &mbtypeslen, NULL, 0) < 0) {
117 		warn("sysctl: retrieving mbtypes length");
118 		goto err;
119 	}
120 	if ((mbtypes = malloc(mbtypeslen)) == NULL) {
121 		warn("malloc: %lu bytes for mbtypes", (u_long)mbtypeslen);
122 		goto err;
123 	}
124 
125 	nmbtypes = mbtypeslen / sizeof(*mbtypes);
126 	if ((seen = calloc(nmbtypes, sizeof(*seen))) == NULL) {
127 		warn("calloc");
128 		goto err;
129 	}
130 
131 	if (mbaddr) {
132 		if (kread(mbaddr, (char *)&mbstat, sizeof mbstat))
133 			goto err;
134 		if (kread(mbtaddr, (char *)mbtypes, mbtypeslen))
135 			goto err;
136 		if (kread(nmbcaddr, (char *)&nmbclusters, sizeof(int)))
137 			goto err;
138 		if (kread(nmbufaddr, (char *)&nmbufs, sizeof(int)))
139 			goto err;
140 	} else {
141 		name[0] = CTL_KERN;
142 		name[1] = KERN_IPC;
143 		name[2] = KIPC_MBSTAT;
144 		mbstatlen = sizeof mbstat;
145 		if (sysctl(name, 3, &mbstat, &mbstatlen, 0, 0) < 0) {
146 			warn("sysctl: retrieving mbstat");
147 			goto err;
148 		}
149 
150 		if (sysctlbyname("kern.ipc.mbtypes", mbtypes, &mbtypeslen, NULL,
151 		    0) < 0) {
152 			warn("sysctl: retrieving mbtypes");
153 			goto err;
154 		}
155 
156 		name[2] = KIPC_NMBCLUSTERS;
157 		nmbclen = sizeof(int);
158 		if (sysctl(name, 3, &nmbclusters, &nmbclen, 0, 0) < 0) {
159 			warn("sysctl: retrieving nmbclusters");
160 			goto err;
161 		}
162 
163 		nmbuflen = sizeof(int);
164 		if (sysctlbyname("kern.ipc.nmbufs", &nmbufs, &nmbuflen, 0, 0) < 0) {
165 			warn("sysctl: retrieving nmbufs");
166 			goto err;
167 		}
168 	}
169 
170 #undef MSIZE
171 #define MSIZE		(mbstat.m_msize)
172 #undef MCLBYTES
173 #define	MCLBYTES	(mbstat.m_mclbytes)
174 
175 	totmbufs = 0;
176 	for (mp = mbtypenames; mp->mt_name; mp++)
177 		totmbufs += mbtypes[mp->mt_type];
178 	printf("%lu/%lu/%u mbufs in use (current/peak/max):\n", totmbufs,
179 	    mbstat.m_mbufs, nmbufs);
180 	for (mp = mbtypenames; mp->mt_name; mp++)
181 		if (mbtypes[mp->mt_type]) {
182 			seen[mp->mt_type] = YES;
183 			printf("\t%lu mbufs allocated to %s\n",
184 			    mbtypes[mp->mt_type], mp->mt_name);
185 		}
186 	seen[MT_FREE] = YES;
187 	for (i = 0; i < nmbtypes; i++)
188 		if (!seen[i] && mbtypes[i]) {
189 			printf("\t%lu mbufs allocated to <mbuf type %d>\n",
190 			    mbtypes[i], i);
191 		}
192 	printf("%lu/%lu/%u mbuf clusters in use (current/peak/max)\n",
193 		mbstat.m_clusters - mbstat.m_clfree, mbstat.m_clusters,
194 		nmbclusters);
195 	totmem = mbstat.m_mbufs * MSIZE + mbstat.m_clusters * MCLBYTES;
196 	totpossible = nmbclusters * MCLBYTES + MSIZE * nmbufs;
197 	printf("%lu Kbytes allocated to network (%lu%% of mb_map in use)\n",
198 		totmem / 1024, (totmem * 100) / totpossible);
199 	printf("%lu requests for memory denied\n", mbstat.m_drops);
200 	printf("%lu requests for memory delayed\n", mbstat.m_wait);
201 	printf("%lu calls to protocol drain routines\n", mbstat.m_drain);
202 
203 err:
204 	if (mbtypes != NULL)
205 		free(mbtypes);
206 	if (seen != NULL)
207 		free(seen);
208 }
209