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$"; 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 <string.h> 52 #include "netstat.h" 53 54 #define YES 1 55 typedef int bool; 56 57 /* XXX: mbtypes stats temporarily disactivated. */ 58 #if 0 59 static struct mbtypenames { 60 int mt_type; 61 char *mt_name; 62 } mbtypenames[] = { 63 { MT_DATA, "data" }, 64 { MT_OOBDATA, "oob data" }, 65 { MT_CONTROL, "ancillary data" }, 66 { MT_HEADER, "packet headers" }, 67 #ifdef MT_SOCKET 68 { MT_SOCKET, "socket structures" }, /* XXX */ 69 #endif 70 #ifdef MT_PCB 71 { MT_PCB, "protocol control blocks" }, /* XXX */ 72 #endif 73 #ifdef MT_RTABLE 74 { MT_RTABLE, "routing table entries" }, /* XXX */ 75 #endif 76 #ifdef MT_HTABLE 77 { MT_HTABLE, "IMP host table entries" }, /* XXX */ 78 #endif 79 #ifdef MT_ATABLE 80 { MT_ATABLE, "address resolution tables" }, 81 #endif 82 { MT_FTABLE, "fragment reassembly queue headers" }, /* XXX */ 83 { MT_SONAME, "socket names and addresses" }, 84 #ifdef MT_SOOPTS 85 { MT_SOOPTS, "socket options" }, 86 #endif 87 #ifdef MT_RIGHTS 88 { MT_RIGHTS, "access rights" }, 89 #endif 90 #ifdef MT_IFADDR 91 { MT_IFADDR, "interface addresses" }, /* XXX */ 92 #endif 93 { 0, 0 } 94 }; 95 #endif /* 0 */ 96 97 /* 98 * Print mbuf statistics. 99 */ 100 void 101 mbpr(u_long mbaddr, u_long mbtaddr, u_long nmbcaddr, u_long nmbufaddr, 102 u_long mblimaddr, u_long cllimaddr, u_long cpusaddr, u_long pgsaddr, 103 u_long mbpaddr) 104 { 105 int i, nmbufs, nmbclusters, page_size, num_objs; 106 u_int mbuf_limit, clust_limit; 107 u_long totspace[2], totused[2], totnum, totfree; 108 size_t mlen; 109 struct mbstat *mbstat = NULL; 110 struct mbpstat **mbpstat = NULL; 111 112 /* XXX: mbtypes stats temporarily disabled. */ 113 #if 0 114 int nmbtypes; 115 size_t mbtypeslen; 116 struct mbtypenames *mp; 117 u_long *mbtypes = NULL; 118 bool *seen = NULL; 119 120 /* 121 * XXX 122 * We can't kread() mbtypeslen from a core image so we'll 123 * bogusly assume it's the same as in the running kernel. 124 */ 125 if (sysctlbyname("kern.ipc.mbtypes", NULL, &mbtypeslen, NULL, 0) < 0) { 126 warn("sysctl: retrieving mbtypes length"); 127 goto err; 128 } 129 if ((mbtypes = malloc(mbtypeslen)) == NULL) { 130 warn("malloc: %lu bytes for mbtypes", (u_long)mbtypeslen); 131 goto err; 132 } 133 134 nmbtypes = mbtypeslen / sizeof(*mbtypes); 135 if ((seen = calloc(nmbtypes, sizeof(*seen))) == NULL) { 136 warn("calloc"); 137 goto err; 138 } 139 #endif 140 141 mlen = sizeof *mbstat; 142 if ((mbstat = malloc(mlen)) == NULL) { 143 warn("malloc: cannot allocate memory for mbstat"); 144 goto err; 145 } 146 147 /* 148 * XXX: Unfortunately, for the time being, we have to fetch 149 * the total length of the per-CPU stats area via sysctl 150 * (regardless of whether we're looking at a core or not. 151 */ 152 if (sysctlbyname("kern.ipc.mb_statpcpu", NULL, &mlen, NULL, 0) < 0) { 153 warn("sysctl: retrieving mb_statpcpu len"); 154 goto err; 155 } 156 num_objs = (int)(mlen / sizeof(struct mbpstat)); 157 if ((mbpstat = calloc(num_objs, sizeof(struct mbpstat *))) == NULL) { 158 warn("calloc: cannot allocate memory for mbpstats pointers"); 159 goto err; 160 } 161 if ((mbpstat[0] = calloc(num_objs, sizeof(struct mbpstat))) == NULL) { 162 warn("calloc: cannot allocate memory for mbpstats"); 163 goto err; 164 } 165 166 if (mbaddr) { 167 if (kread(mbpaddr, (char *)mbpstat[0], mlen)) 168 goto err; 169 if (kread(mbaddr, (char *)mbstat, sizeof mbstat)) 170 goto err; 171 #if 0 172 if (kread(mbtaddr, (char *)mbtypes, mbtypeslen)) 173 goto err; 174 #endif 175 if (kread(nmbcaddr, (char *)&nmbclusters, sizeof(int))) 176 goto err; 177 if (kread(nmbufaddr, (char *)&nmbufs, sizeof(int))) 178 goto err; 179 if (kread(mblimaddr, (char *)&mbuf_limit, sizeof(u_int))) 180 goto err; 181 if (kread(cllimaddr, (char *)&clust_limit, sizeof(u_int))) 182 goto err; 183 if (kread(pgsaddr, (char *)&page_size, sizeof(int))) 184 goto err; 185 } else { 186 if (sysctlbyname("kern.ipc.mb_statpcpu", mbpstat[0], &mlen, 187 NULL, 0) < 0) { 188 warn("sysctl: retrieving mb_statpcpu"); 189 goto err; 190 } 191 mlen = sizeof *mbstat; 192 if (sysctlbyname("kern.ipc.mbstat", mbstat, &mlen, NULL, 0) 193 < 0) { 194 warn("sysctl: retrieving mbstat"); 195 goto err; 196 } 197 #if 0 198 if (sysctlbyname("kern.ipc.mbtypes", mbtypes, &mbtypeslen, NULL, 199 0) < 0) { 200 warn("sysctl: retrieving mbtypes"); 201 goto err; 202 } 203 #endif 204 mlen = sizeof(int); 205 if (sysctlbyname("kern.ipc.nmbclusters", &nmbclusters, &mlen, 206 NULL, 0) < 0) { 207 warn("sysctl: retrieving nmbclusters"); 208 goto err; 209 } 210 mlen = sizeof(int); 211 if (sysctlbyname("kern.ipc.nmbufs", &nmbufs, &mlen, NULL, 0) 212 < 0) { 213 warn("sysctl: retrieving nmbufs"); 214 goto err; 215 } 216 mlen = sizeof(u_int); 217 if (sysctlbyname("kern.ipc.mbuf_limit", &mbuf_limit, &mlen, 218 NULL, 0) < 0) { 219 warn("sysctl: retrieving mbuf_limit"); 220 goto err; 221 } 222 mlen = sizeof(u_int); 223 if (sysctlbyname("kern.ipc.clust_limit", &clust_limit, &mlen, 224 NULL, 0) < 0) { 225 warn("sysctl: retrieving clust_limit"); 226 goto err; 227 } 228 mlen = sizeof(int); 229 if (sysctlbyname("hw.pagesize", &page_size, &mlen, NULL, 0) 230 < 0) { 231 warn("sysctl: retrieving hw.pagesize"); 232 goto err; 233 } 234 } 235 236 for (i = 0; i < num_objs; i++) 237 mbpstat[i] = mbpstat[0] + i; 238 239 #undef MSIZE 240 #define MSIZE (mbstat->m_msize) 241 #undef MCLBYTES 242 #define MCLBYTES (mbstat->m_mclbytes) 243 #define MBPERPG (page_size / MSIZE) 244 #define CLPERPG (page_size / MCLBYTES) 245 #define GENLST (num_objs - 1) 246 247 printf("mbuf usage:\n"); 248 printf("\tGEN list:\t%lu/%lu (in use/in pool)\n", 249 (mbpstat[GENLST]->mb_mbpgs * MBPERPG - mbpstat[GENLST]->mb_mbfree), 250 (mbpstat[GENLST]->mb_mbpgs * MBPERPG)); 251 totnum = mbpstat[GENLST]->mb_mbpgs * MBPERPG; 252 totfree = mbpstat[GENLST]->mb_mbfree; 253 totspace[0] = mbpstat[GENLST]->mb_mbpgs * page_size; 254 for (i = 0; i < (num_objs - 1); i++) { 255 if (mbpstat[i]->mb_active == 0) 256 continue; 257 printf("\tCPU #%d list:\t%lu/%lu (in use/in pool)\n", i, 258 (mbpstat[i]->mb_mbpgs * MBPERPG - mbpstat[i]->mb_mbfree), 259 (mbpstat[i]->mb_mbpgs * MBPERPG)); 260 totspace[0] += mbpstat[i]->mb_mbpgs * page_size; 261 totnum += mbpstat[i]->mb_mbpgs * MBPERPG; 262 totfree += mbpstat[i]->mb_mbfree; 263 } 264 totused[0] = totnum - totfree; 265 printf("\tTotal:\t\t%lu/%lu (in use/in pool)\n", totused[0], totnum); 266 printf("\tMaximum number allowed on each CPU list: %d\n", mbuf_limit); 267 printf("\tMaximum possible: %d\n", nmbufs); 268 printf("\t%lu%% of mbuf map consumed\n", ((totspace[0] * 100) / (nmbufs 269 * MSIZE))); 270 271 printf("mbuf cluster usage:\n"); 272 printf("\tGEN list:\t%lu/%lu (in use/in pool)\n", 273 (mbpstat[GENLST]->mb_clpgs * CLPERPG - mbpstat[GENLST]->mb_clfree), 274 (mbpstat[GENLST]->mb_clpgs * CLPERPG)); 275 totnum = mbpstat[GENLST]->mb_clpgs * CLPERPG; 276 totfree = mbpstat[GENLST]->mb_clfree; 277 totspace[1] = mbpstat[GENLST]->mb_clpgs * page_size; 278 for (i = 0; i < (num_objs - 1); i++) { 279 if (mbpstat[i]->mb_active == 0) 280 continue; 281 printf("\tCPU #%d list:\t%lu/%lu (in use/in pool)\n", i, 282 (mbpstat[i]->mb_clpgs * CLPERPG - mbpstat[i]->mb_clfree), 283 (mbpstat[i]->mb_clpgs * CLPERPG)); 284 totspace[1] += mbpstat[i]->mb_clpgs * page_size; 285 totnum += mbpstat[i]->mb_clpgs * CLPERPG; 286 totfree += mbpstat[i]->mb_clfree; 287 } 288 totused[1] = totnum - totfree; 289 printf("\tTotal:\t\t%lu/%lu (in use/in pool)\n", totused[1], totnum); 290 printf("\tMaximum number allowed on each CPU list: %d\n", clust_limit); 291 printf("\tMaximum possible: %d\n", nmbclusters); 292 printf("\t%lu%% of cluster map consumed\n", ((totspace[1] * 100) / 293 (nmbclusters * MCLBYTES))); 294 295 printf("%lu KBytes of wired memory reserved (%lu%% in use)\n", 296 (totspace[0] + totspace[1]) / 1024, ((totused[0] * MSIZE + 297 totused[1] * MCLBYTES) * 100) / (totspace[0] + totspace[1])); 298 printf("%lu requests for memory denied\n", mbstat->m_drops); 299 printf("%lu requests for memory delayed\n", mbstat->m_wait); 300 printf("%lu calls to protocol drain routines\n", mbstat->m_drain); 301 302 err: 303 #if 0 304 if (mbtypes != NULL) 305 free(mbtypes); 306 if (seen != NULL) 307 free(seen); 308 #endif 309 if (mbstat != NULL) 310 free(mbstat); 311 if (mbpstat != NULL) { 312 if (mbpstat[0] != NULL) 313 free(mbpstat[0]); 314 free(mbpstat); 315 } 316 317 return; 318 } 319