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 * @(#)mbuf.c 8.1 (Berkeley) 6/6/93 34 * $FreeBSD: src/usr.bin/netstat/mbuf.c,v 1.17.2.3 2001/08/10 09:07:09 ru Exp $ 35 * $DragonFly: src/usr.bin/netstat/mbuf.c,v 1.4 2005/03/12 10:38:42 y0netan1 Exp $ 36 */ 37 38 #include <sys/param.h> 39 #include <sys/mbuf.h> 40 #include <sys/protosw.h> 41 #include <sys/socket.h> 42 #include <sys/sysctl.h> 43 44 #include <err.h> 45 #include <stdio.h> 46 #include <stdlib.h> 47 #include "netstat.h" 48 49 #define YES 1 50 typedef int bool; 51 52 static struct mbtypenames { 53 int mt_type; 54 char *mt_name; 55 } mbtypenames[] = { 56 { MT_DATA, "data" }, 57 { MT_OOBDATA, "oob data" }, 58 { MT_CONTROL, "ancillary data" }, 59 { MT_HEADER, "packet headers" }, 60 { MT_SONAME, "socket names and addresses" }, 61 { 0, 0 } 62 }; 63 64 /* 65 * Print mbuf statistics. 66 */ 67 void 68 mbpr(u_long mbaddr, u_long mbtaddr, u_long nmbcaddr, u_long nmbufaddr) 69 { 70 u_long totmem, totpossible, totmbufs; 71 register int i; 72 struct mbstat mbstat; 73 struct mbtypenames *mp; 74 int name[3], nmbclusters, nmbufs, nmbtypes; 75 size_t nmbclen, nmbuflen, mbstatlen, mbtypeslen; 76 u_long *mbtypes; 77 bool *seen; /* "have we seen this type yet?" */ 78 79 mbtypes = NULL; 80 seen = NULL; 81 82 /* 83 * XXX 84 * We can't kread() mbtypeslen from a core image so we'll 85 * bogusly assume it's the same as in the running kernel. 86 */ 87 if (sysctlbyname("kern.ipc.mbtypes", NULL, &mbtypeslen, NULL, 0) < 0) { 88 warn("sysctl: retrieving mbtypes length"); 89 goto err; 90 } 91 if ((mbtypes = malloc(mbtypeslen)) == NULL) { 92 warn("malloc: %lu bytes for mbtypes", (u_long)mbtypeslen); 93 goto err; 94 } 95 96 nmbtypes = mbtypeslen / sizeof(*mbtypes); 97 if ((seen = calloc(nmbtypes, sizeof(*seen))) == NULL) { 98 warn("calloc"); 99 goto err; 100 } 101 102 if (mbaddr) { 103 if (kread(mbaddr, (char *)&mbstat, sizeof mbstat)) 104 goto err; 105 if (kread(mbtaddr, (char *)mbtypes, mbtypeslen)) 106 goto err; 107 if (kread(nmbcaddr, (char *)&nmbclusters, sizeof(int))) 108 goto err; 109 if (kread(nmbufaddr, (char *)&nmbufs, sizeof(int))) 110 goto err; 111 } else { 112 name[0] = CTL_KERN; 113 name[1] = KERN_IPC; 114 name[2] = KIPC_MBSTAT; 115 mbstatlen = sizeof mbstat; 116 if (sysctl(name, 3, &mbstat, &mbstatlen, 0, 0) < 0) { 117 warn("sysctl: retrieving mbstat"); 118 goto err; 119 } 120 121 if (sysctlbyname("kern.ipc.mbtypes", mbtypes, &mbtypeslen, NULL, 122 0) < 0) { 123 warn("sysctl: retrieving mbtypes"); 124 goto err; 125 } 126 127 name[2] = KIPC_NMBCLUSTERS; 128 nmbclen = sizeof(int); 129 if (sysctl(name, 3, &nmbclusters, &nmbclen, 0, 0) < 0) { 130 warn("sysctl: retrieving nmbclusters"); 131 goto err; 132 } 133 134 nmbuflen = sizeof(int); 135 if (sysctlbyname("kern.ipc.nmbufs", &nmbufs, &nmbuflen, 0, 0) < 0) { 136 warn("sysctl: retrieving nmbufs"); 137 goto err; 138 } 139 } 140 141 #undef MSIZE 142 #define MSIZE (mbstat.m_msize) 143 #undef MCLBYTES 144 #define MCLBYTES (mbstat.m_mclbytes) 145 146 totmbufs = 0; 147 for (mp = mbtypenames; mp->mt_name; mp++) 148 totmbufs += mbtypes[mp->mt_type]; 149 printf("%lu/%lu/%u mbufs in use (current/peak/max):\n", totmbufs, 150 mbstat.m_mbufs, nmbufs); 151 for (mp = mbtypenames; mp->mt_name; mp++) 152 if (mbtypes[mp->mt_type]) { 153 seen[mp->mt_type] = YES; 154 printf("\t%lu mbufs allocated to %s\n", 155 mbtypes[mp->mt_type], mp->mt_name); 156 } 157 seen[MT_FREE] = YES; 158 for (i = 0; i < nmbtypes; i++) 159 if (!seen[i] && mbtypes[i]) { 160 printf("\t%lu mbufs allocated to <mbuf type %d>\n", 161 mbtypes[i], i); 162 } 163 printf("%lu/%lu/%u mbuf clusters in use (current/peak/max)\n", 164 mbstat.m_clusters - mbstat.m_clfree, mbstat.m_clusters, 165 nmbclusters); 166 totmem = mbstat.m_mbufs * MSIZE + mbstat.m_clusters * MCLBYTES; 167 totpossible = nmbclusters * MCLBYTES + MSIZE * nmbufs; 168 printf("%lu Kbytes allocated to network (%lu%% of mb_map in use)\n", 169 totmem / 1024, (totmem * 100) / totpossible); 170 printf("%lu requests for memory denied\n", mbstat.m_drops); 171 printf("%lu requests for memory delayed\n", mbstat.m_wait); 172 printf("%lu calls to protocol drain routines\n", mbstat.m_drain); 173 174 err: 175 if (mbtypes != NULL) 176 free(mbtypes); 177 if (seen != NULL) 178 free(seen); 179 } 180