1 /* $NetBSD: mbuf.c,v 1.17 2002/03/09 23:26:51 sommerfeld Exp $ */ 2 3 /* 4 * Copyright (c) 1983, 1988, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by the University of 18 * California, Berkeley and its contributors. 19 * 4. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36 #include <sys/cdefs.h> 37 #ifndef lint 38 #if 0 39 static char sccsid[] = "from: @(#)mbuf.c 8.1 (Berkeley) 6/6/93"; 40 #else 41 __RCSID("$NetBSD: mbuf.c,v 1.17 2002/03/09 23:26:51 sommerfeld Exp $"); 42 #endif 43 #endif /* not lint */ 44 45 #define __POOL_EXPOSE 46 47 #include <sys/param.h> 48 #include <sys/protosw.h> 49 #include <sys/socket.h> 50 #include <sys/mbuf.h> 51 #include <sys/pool.h> 52 53 #include <stdio.h> 54 #include <stdlib.h> 55 #include "netstat.h" 56 57 #define YES 1 58 typedef int bool; 59 60 struct mbstat mbstat; 61 struct pool mbpool, mclpool; 62 struct pool_allocator mbpa, mclpa; 63 64 static struct mbtypes { 65 int mt_type; 66 char *mt_name; 67 } mbtypes[] = { 68 { MT_DATA, "data" }, 69 { MT_OOBDATA, "oob data" }, 70 { MT_CONTROL, "ancillary data" }, 71 { MT_HEADER, "packet headers" }, 72 { MT_FTABLE, "fragment reassembly queue headers" }, /* XXX */ 73 { MT_SONAME, "socket names and addresses" }, 74 { MT_SOOPTS, "socket options" }, 75 { 0, 0 } 76 }; 77 78 int nmbtypes = sizeof(mbstat.m_mtypes) / sizeof(short); 79 bool seen[256]; /* "have we seen this type yet?" */ 80 81 /* 82 * Print mbuf statistics. 83 */ 84 void 85 mbpr(mbaddr, msizeaddr, mclbaddr, mbpooladdr, mclpooladdr) 86 u_long mbaddr; 87 u_long msizeaddr, mclbaddr; 88 u_long mbpooladdr, mclpooladdr; 89 { 90 int totmem, totused, totmbufs, totpct; 91 int i; 92 struct mbtypes *mp; 93 94 int mclbytes, msize; 95 96 if (nmbtypes != 256) { 97 fprintf(stderr, 98 "%s: unexpected change to mbstat; check source\n", 99 getprogname()); 100 return; 101 } 102 if (mbaddr == 0) { 103 fprintf(stderr, "%s: mbstat: symbol not in namelist\n", 104 getprogname()); 105 return; 106 } 107 /*XXX*/ 108 if (msizeaddr != 0) 109 kread(msizeaddr, (char *)&msize, sizeof (msize)); 110 else 111 msize = MSIZE; 112 if (mclbaddr != 0) 113 kread(mclbaddr, (char *)&mclbytes, sizeof (mclbytes)); 114 else 115 mclbytes = MCLBYTES; 116 /*XXX*/ 117 118 if (kread(mbaddr, (char *)&mbstat, sizeof (mbstat))) 119 return; 120 121 if (kread(mbpooladdr, (char *)&mbpool, sizeof (mbpool))) 122 return; 123 124 if (kread(mclpooladdr, (char *)&mclpool, sizeof (mclpool))) 125 return; 126 127 mbpooladdr = (u_long) mbpool.pr_alloc; 128 mclpooladdr = (u_long) mclpool.pr_alloc; 129 130 if (kread(mbpooladdr, (char *)&mbpa, sizeof (mbpa))) 131 return; 132 133 if (kread(mclpooladdr, (char *)&mclpa, sizeof (mclpa))) 134 return; 135 136 totmbufs = 0; 137 for (mp = mbtypes; mp->mt_name; mp++) 138 totmbufs += mbstat.m_mtypes[mp->mt_type]; 139 printf("%u mbufs in use:\n", totmbufs); 140 for (mp = mbtypes; mp->mt_name; mp++) 141 if (mbstat.m_mtypes[mp->mt_type]) { 142 seen[mp->mt_type] = YES; 143 printf("\t%u mbufs allocated to %s\n", 144 mbstat.m_mtypes[mp->mt_type], mp->mt_name); 145 } 146 seen[MT_FREE] = YES; 147 for (i = 0; i < nmbtypes; i++) 148 if (!seen[i] && mbstat.m_mtypes[i]) { 149 printf("\t%u mbufs allocated to <mbuf type %d>\n", 150 mbstat.m_mtypes[i], i); 151 } 152 153 printf("%lu/%lu mapped pages in use\n", 154 (u_long)(mclpool.pr_nget - mclpool.pr_nput), 155 ((u_long)mclpool.pr_npages * mclpool.pr_itemsperpage)); 156 totmem = (mbpool.pr_npages << mbpa.pa_pageshift) + 157 (mclpool.pr_npages << mclpa.pa_pageshift); 158 totused = (mbpool.pr_nget - mbpool.pr_nput) * mbpool.pr_size + 159 (mclpool.pr_nget - mclpool.pr_nput) * mclpool.pr_size; 160 totpct = (totmem == 0)? 0 : ((totused * 100)/totmem); 161 printf("%u Kbytes allocated to network (%d%% in use)\n", 162 totmem / 1024, totpct); 163 printf("%lu requests for memory denied\n", mbstat.m_drops); 164 printf("%lu requests for memory delayed\n", mbstat.m_wait); 165 printf("%lu calls to protocol drain routines\n", mbstat.m_drain); 166 } 167