Check for SYS/GL during library init. Reason is that
[AROS.git] / workbench / network / common / C / netstat / mbuf.c
blob0dfc9436bb3f250cba1948dadda2e72a0a48b3ea
1 /*
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
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.
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.
34 #ifndef lint
35 static char sccsid[] = "@(#)mbuf.c 8.1 (Berkeley) 6/6/93";
36 #endif /* not lint */
38 #include <sys/param.h>
39 #include <sys/protosw.h>
40 #include <sys/socket.h>
41 #include <sys/mbuf.h>
43 #include <stdio.h>
44 #include "netstat.h"
46 #define YES 1
47 typedef int bool;
49 struct mbstat mbstat;
51 static struct mbtypes {
52 int mt_type;
53 char *mt_name;
54 } mbtypes[] = {
55 { MT_DATA, "data" },
56 { MT_OOBDATA, "oob data" },
57 { MT_CONTROL, "ancillary data" },
58 { MT_HEADER, "packet headers" },
59 { MT_SOCKET, "socket structures" }, /* XXX */
60 { MT_PCB, "protocol control blocks" }, /* XXX */
61 { MT_RTABLE, "routing table entries" }, /* XXX */
62 { MT_HTABLE, "IMP host table entries" }, /* XXX */
63 { MT_ATABLE, "address resolution tables" },
64 { MT_FTABLE, "fragment reassembly queue headers" }, /* XXX */
65 { MT_SONAME, "socket names and addresses" },
66 { MT_SOOPTS, "socket options" },
67 { MT_RIGHTS, "access rights" },
68 { MT_IFADDR, "interface addresses" }, /* XXX */
69 { 0, 0 }
72 int nmbtypes = sizeof(mbstat.m_mtypes) / sizeof(short);
73 bool seen[256]; /* "have we seen this type yet?" */
76 * Print mbuf statistics.
78 void
79 mbpr(mbaddr)
80 u_long mbaddr;
82 register int totmem, totfree, totmbufs;
83 register int i;
84 register struct mbtypes *mp;
86 if (nmbtypes != 256) {
87 warnx("unexpected change to mbstat; check source");
88 return;
90 if (mbaddr == 0) {
91 warnx("mbstat: symbol not in namelist");
92 return;
94 if (kread(mbaddr, (char *)&mbstat, sizeof (mbstat)))
95 return;
96 totmbufs = 0;
97 for (mp = mbtypes; mp->mt_name; mp++)
98 totmbufs += mbstat.m_mtypes[mp->mt_type];
99 printf("%u mbufs in use:\n", totmbufs);
100 for (mp = mbtypes; mp->mt_name; mp++)
101 if (mbstat.m_mtypes[mp->mt_type]) {
102 seen[mp->mt_type] = YES;
103 printf("\t%u mbufs allocated to %s\n",
104 mbstat.m_mtypes[mp->mt_type], mp->mt_name);
106 seen[MT_FREE] = YES;
107 for (i = 0; i < nmbtypes; i++)
108 if (!seen[i] && mbstat.m_mtypes[i]) {
109 printf("\t%u mbufs allocated to <mbuf type %d>\n",
110 mbstat.m_mtypes[i], i);
112 printf("%u/%u mbuf clusters in use\n",
113 mbstat.m_clusters - mbstat.m_clfree, mbstat.m_clusters);
114 totmem = totmbufs * MSIZE + mbstat.m_clusters * MCLBYTES;
115 totfree = mbstat.m_clfree * MCLBYTES;
116 printf("%u Kbytes allocated to network (%d%% in use)\n",
117 totmem / 1024, (totmem - totfree) * 100 / totmem);
118 printf("%u requests for memory denied\n", mbstat.m_drops);
119 printf("%u requests for memory delayed\n", mbstat.m_wait);
120 printf("%u calls to protocol drain routines\n", mbstat.m_drain);