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
36static char sccsid[] = "@(#)mbuf.c 8.1 (Berkeley) 6/6/93";
37#endif
38static const char rcsid[] =
39 "$FreeBSD: head/usr.bin/netstat/mbuf.c 78314 2001-06-15 23:35:13Z assar $";
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
54typedef int bool;
55
56static 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 */
96void
97mbpr(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, nmbcnt, nmbtypes;
104 size_t nmbclen, nmbuflen, nmbcntlen, 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 nmbcntlen = sizeof(int);
171 if (sysctlbyname("kern.ipc.nmbcnt", &nmbcnt, &nmbcntlen, 0, 0) < 0) {
172 warn("sysctl: retrieving nmbcnt");
173 goto err;
174 }
175
176#undef MSIZE
177#define MSIZE (mbstat.m_msize)
178#undef MCLBYTES
179#define MCLBYTES (mbstat.m_mclbytes)
180
181 totmbufs = 0;
182 for (mp = mbtypenames; mp->mt_name; mp++)
183 totmbufs += mbtypes[mp->mt_type];
184 printf("%lu/%lu/%u mbufs in use (current/peak/max):\n", totmbufs,
185 mbstat.m_mbufs, nmbufs);
186 for (mp = mbtypenames; mp->mt_name; mp++)
187 if (mbtypes[mp->mt_type]) {
188 seen[mp->mt_type] = YES;
189 printf("\t%lu mbufs allocated to %s\n",
190 mbtypes[mp->mt_type], mp->mt_name);
191 }
192 seen[MT_FREE] = YES;
193 for (i = 0; i < nmbtypes; i++)
194 if (!seen[i] && mbtypes[i]) {
195 printf("\t%lu mbufs allocated to <mbuf type %d>\n",
196 mbtypes[i], i);
197 }
198 printf("%lu/%lu/%u mbuf clusters in use (current/peak/max)\n",
199 mbstat.m_clusters - mbstat.m_clfree, mbstat.m_clusters,
200 nmbclusters);
201 printf("%lu/%lu m_ext reference counters (in use/allocated)\n",
202 mbstat.m_refcnt - mbstat.m_refree, mbstat.m_refcnt);
203 totmem = mbstat.m_mbufs * MSIZE + mbstat.m_clusters * MCLBYTES +
204 mbstat.m_refcnt * sizeof(union mext_refcnt);
205 totpossible = nmbclusters * MCLBYTES + nmbufs * MSIZE +
206 nmbcnt * sizeof(union mext_refcnt);
207 printf("%lu Kbytes allocated to network (%lu%% of mb_map in use)\n",
208 totmem / 1024, (totmem * 100) / totpossible);
209 printf("%lu requests for memory denied\n", mbstat.m_drops);
210 printf("%lu requests for memory delayed\n", mbstat.m_wait);
211 printf("%lu calls to protocol drain routines\n", mbstat.m_drain);
212
213err:
214 if (mbtypes != NULL)
215 free(mbtypes);
216 if (seen != NULL)
217 free(seen);
218}
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
36static char sccsid[] = "@(#)mbuf.c 8.1 (Berkeley) 6/6/93";
37#endif
38static const char rcsid[] =
39 "$FreeBSD: head/usr.bin/netstat/mbuf.c 78314 2001-06-15 23:35:13Z assar $";
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
54typedef int bool;
55
56static 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 */
96void
97mbpr(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, nmbcnt, nmbtypes;
104 size_t nmbclen, nmbuflen, nmbcntlen, 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 nmbcntlen = sizeof(int);
171 if (sysctlbyname("kern.ipc.nmbcnt", &nmbcnt, &nmbcntlen, 0, 0) < 0) {
172 warn("sysctl: retrieving nmbcnt");
173 goto err;
174 }
175
176#undef MSIZE
177#define MSIZE (mbstat.m_msize)
178#undef MCLBYTES
179#define MCLBYTES (mbstat.m_mclbytes)
180
181 totmbufs = 0;
182 for (mp = mbtypenames; mp->mt_name; mp++)
183 totmbufs += mbtypes[mp->mt_type];
184 printf("%lu/%lu/%u mbufs in use (current/peak/max):\n", totmbufs,
185 mbstat.m_mbufs, nmbufs);
186 for (mp = mbtypenames; mp->mt_name; mp++)
187 if (mbtypes[mp->mt_type]) {
188 seen[mp->mt_type] = YES;
189 printf("\t%lu mbufs allocated to %s\n",
190 mbtypes[mp->mt_type], mp->mt_name);
191 }
192 seen[MT_FREE] = YES;
193 for (i = 0; i < nmbtypes; i++)
194 if (!seen[i] && mbtypes[i]) {
195 printf("\t%lu mbufs allocated to <mbuf type %d>\n",
196 mbtypes[i], i);
197 }
198 printf("%lu/%lu/%u mbuf clusters in use (current/peak/max)\n",
199 mbstat.m_clusters - mbstat.m_clfree, mbstat.m_clusters,
200 nmbclusters);
201 printf("%lu/%lu m_ext reference counters (in use/allocated)\n",
202 mbstat.m_refcnt - mbstat.m_refree, mbstat.m_refcnt);
203 totmem = mbstat.m_mbufs * MSIZE + mbstat.m_clusters * MCLBYTES +
204 mbstat.m_refcnt * sizeof(union mext_refcnt);
205 totpossible = nmbclusters * MCLBYTES + nmbufs * MSIZE +
206 nmbcnt * sizeof(union mext_refcnt);
207 printf("%lu Kbytes allocated to network (%lu%% of mb_map in use)\n",
208 totmem / 1024, (totmem * 100) / totpossible);
209 printf("%lu requests for memory denied\n", mbstat.m_drops);
210 printf("%lu requests for memory delayed\n", mbstat.m_wait);
211 printf("%lu calls to protocol drain routines\n", mbstat.m_drain);
212
213err:
214 if (mbtypes != NULL)
215 free(mbtypes);
216 if (seen != NULL)
217 free(seen);
218}