2 * Copyright (c) 1983, 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * @(#)mbuf.c 8.1 (Berkeley) 6/6/93
30 * $FreeBSD: src/usr.bin/netstat/mbuf.c,v 1.17.2.3 2001/08/10 09:07:09 ru Exp $
31 * $DragonFly: src/usr.bin/netstat/mbuf.c,v 1.7 2006/10/09 22:30:48 hsu Exp $
34 #define _KERNEL_STRUCTURES
35 #include <sys/param.h>
37 #include <sys/protosw.h>
38 #include <sys/socket.h>
39 #include <sys/sysctl.h>
49 static struct mbtypenames
{
54 { MT_OOBDATA
, "oob data" },
55 { MT_CONTROL
, "ancillary data" },
56 { MT_HEADER
, "packet headers" },
57 { MT_SONAME
, "socket names and addresses" },
62 * Print mbuf statistics.
65 mbpr(u_long mbaddr
, u_long mbtaddr
, u_long nmbcaddr
, u_long nmbjcaddr
,
66 u_long nmbufaddr
, u_long ncpusaddr
)
68 u_long totmem
, totpossible
;
69 struct mbstat
*mbstat
;
70 struct mbtypenames
*mp
;
71 int name
[3], nmbclusters
, nmbjclusters
, nmbufs
, nmbtypes
;
72 size_t nmbclen
, nmbjclen
, nmbuflen
, mbstatlen
, mbtypeslen
;
77 bool *seen
; /* "have we seen this type yet?" */
85 * We can't kread() mbtypeslen from a core image so we'll
86 * bogusly assume it's the same as in the running kernel.
88 if (sysctlbyname("kern.ipc.mbtypes", NULL
, &mbtypeslen
, NULL
, 0) < 0) {
89 warn("sysctl: retrieving mbtypes length");
92 nmbtypes
= mbtypeslen
/ sizeof(*mbtypes
);
93 if ((seen
= calloc(nmbtypes
, sizeof(*seen
))) == NULL
) {
99 if (kread(ncpusaddr
, (char *)&ncpus
, sizeof ncpus
))
101 mbstat
= calloc(ncpus
, sizeof(*mbstat
));
102 if (kread(mbaddr
, (char *)mbstat
, sizeof *mbstat
* ncpus
))
104 mbtypes
= calloc(ncpus
, mbtypeslen
);
105 if (kread(mbtaddr
, (char *)mbtypes
, mbtypeslen
* ncpus
))
107 if (kread(nmbcaddr
, (char *)&nmbclusters
, sizeof(int)))
109 if (kread(nmbjcaddr
, (char *)&nmbjclusters
, sizeof(int)))
111 if (kread(nmbufaddr
, (char *)&nmbufs
, sizeof(int)))
113 for (n
= 1; n
< ncpus
; ++n
) {
114 mbstat
[0].m_mbufs
+= mbstat
[n
].m_mbufs
;
115 mbstat
[0].m_clusters
+= mbstat
[n
].m_clusters
;
116 mbstat
[0].m_drops
+= mbstat
[n
].m_drops
;
117 mbstat
[0].m_wait
+= mbstat
[n
].m_wait
;
118 mbstat
[0].m_drain
+= mbstat
[n
].m_drain
;
120 for (i
= 0; i
< nmbtypes
; ++i
) {
121 mbtypes
[i
] += mbtypes
[n
* nmbtypes
+ i
];
127 name
[2] = KIPC_MBSTAT
;
128 mbstat
= malloc(sizeof(*mbstat
));
129 mbstatlen
= sizeof *mbstat
;
130 /* fake ncpus, kernel will aggregate mbstat array for us */
131 if (sysctl(name
, 3, mbstat
, &mbstatlen
, 0, 0) < 0) {
132 warn("sysctl: retrieving mbstat");
136 mbtypes
= malloc(mbtypeslen
);
137 if (sysctlbyname("kern.ipc.mbtypes", mbtypes
, &mbtypeslen
, NULL
,
139 warn("sysctl: retrieving mbtypes");
143 name
[2] = KIPC_NMBCLUSTERS
;
144 nmbclen
= sizeof(int);
145 if (sysctl(name
, 3, &nmbclusters
, &nmbclen
, 0, 0) < 0) {
146 warn("sysctl: retrieving nmbclusters");
150 nmbjclen
= sizeof(int);
151 if (sysctlbyname("kern.ipc.nmbjclusters",
152 &nmbjclusters
, &nmbjclen
, 0, 0) < 0) {
153 warn("sysctl: retrieving nmbjclusters");
157 nmbuflen
= sizeof(int);
158 if (sysctlbyname("kern.ipc.nmbufs", &nmbufs
, &nmbuflen
, 0, 0) < 0) {
159 warn("sysctl: retrieving nmbufs");
165 #define MSIZE (mbstat->m_msize)
167 #define MCLBYTES (mbstat->m_mclbytes)
169 #define MJUMPAGESIZE (mbstat->m_mjumpagesize)
171 printf("%lu/%u mbufs in use (current/max):\n", mbstat
->m_mbufs
, nmbufs
);
172 printf("%lu/%u mbuf clusters in use (current/max)\n",
173 mbstat
->m_clusters
, nmbclusters
);
174 printf("%lu/%u mbuf jumbo clusters in use (current/max)\n",
175 mbstat
->m_jclusters
, nmbjclusters
);
176 for (mp
= mbtypenames
; mp
->mt_name
; mp
++)
177 if (mbtypes
[mp
->mt_type
]) {
178 seen
[mp
->mt_type
] = YES
;
179 printf("\t%lu mbufs and mbuf clusters "
181 mbtypes
[mp
->mt_type
], mp
->mt_name
);
184 for (i
= 0; i
< nmbtypes
; i
++)
185 if (!seen
[i
] && mbtypes
[i
]) {
186 printf("\t%lu mbufs and mbuf clusters allocated to <mbuf type %d>\n",
189 totmem
= mbstat
->m_mbufs
* MSIZE
+ mbstat
->m_clusters
* MCLBYTES
+
190 mbstat
->m_jclusters
* MJUMPAGESIZE
;
191 totpossible
= MSIZE
* nmbufs
+ nmbclusters
* MCLBYTES
+
192 nmbjclusters
* MJUMPAGESIZE
;
193 printf("%lu Kbytes allocated to network (%lu%% of mb_map in use)\n",
194 totmem
/ 1024, (totmem
* 100) / totpossible
);
195 printf("%lu requests for memory denied\n", mbstat
->m_drops
);
196 printf("%lu requests for memory delayed\n", mbstat
->m_wait
);
197 printf("%lu calls to protocol drain routines\n", mbstat
->m_drain
);