mbufs.c revision 1.1.1.1 1 1.1 jtc /*-
2 1.1 jtc * Copyright (c) 1980, 1992, 1993
3 1.1 jtc * The Regents of the University of California. All rights reserved.
4 1.1 jtc *
5 1.1 jtc * Redistribution and use in source and binary forms, with or without
6 1.1 jtc * modification, are permitted provided that the following conditions
7 1.1 jtc * are met:
8 1.1 jtc * 1. Redistributions of source code must retain the above copyright
9 1.1 jtc * notice, this list of conditions and the following disclaimer.
10 1.1 jtc * 2. Redistributions in binary form must reproduce the above copyright
11 1.1 jtc * notice, this list of conditions and the following disclaimer in the
12 1.1 jtc * documentation and/or other materials provided with the distribution.
13 1.1 jtc * 3. All advertising materials mentioning features or use of this software
14 1.1 jtc * must display the following acknowledgement:
15 1.1 jtc * This product includes software developed by the University of
16 1.1 jtc * California, Berkeley and its contributors.
17 1.1 jtc * 4. Neither the name of the University nor the names of its contributors
18 1.1 jtc * may be used to endorse or promote products derived from this software
19 1.1 jtc * without specific prior written permission.
20 1.1 jtc *
21 1.1 jtc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 1.1 jtc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 1.1 jtc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 1.1 jtc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 1.1 jtc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 1.1 jtc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 1.1 jtc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 1.1 jtc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 1.1 jtc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 1.1 jtc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 1.1 jtc * SUCH DAMAGE.
32 1.1 jtc */
33 1.1 jtc
34 1.1 jtc #ifndef lint
35 1.1 jtc static char sccsid[] = "@(#)mbufs.c 8.1 (Berkeley) 6/6/93";
36 1.1 jtc #endif /* not lint */
37 1.1 jtc
38 1.1 jtc #include <sys/param.h>
39 1.1 jtc #include <sys/types.h>
40 1.1 jtc #include <sys/mbuf.h>
41 1.1 jtc
42 1.1 jtc #include <stdlib.h>
43 1.1 jtc #include <string.h>
44 1.1 jtc #include <nlist.h>
45 1.1 jtc #include <paths.h>
46 1.1 jtc #include "systat.h"
47 1.1 jtc #include "extern.h"
48 1.1 jtc
49 1.1 jtc static struct mbstat *mb;
50 1.1 jtc
51 1.1 jtc char *mtnames[] = {
52 1.1 jtc "free",
53 1.1 jtc "data",
54 1.1 jtc "headers",
55 1.1 jtc "sockets",
56 1.1 jtc "pcbs",
57 1.1 jtc "routes",
58 1.1 jtc "hosts",
59 1.1 jtc "arps",
60 1.1 jtc "socknames",
61 1.1 jtc "zombies",
62 1.1 jtc "sockopts",
63 1.1 jtc "frags",
64 1.1 jtc "rights",
65 1.1 jtc "ifaddrs",
66 1.1 jtc };
67 1.1 jtc
68 1.1 jtc #define NNAMES (sizeof (mtnames) / sizeof (mtnames[0]))
69 1.1 jtc
70 1.1 jtc WINDOW *
71 1.1 jtc openmbufs()
72 1.1 jtc {
73 1.1 jtc return (subwin(stdscr, LINES-5-1, 0, 5, 0));
74 1.1 jtc }
75 1.1 jtc
76 1.1 jtc void
77 1.1 jtc closembufs(w)
78 1.1 jtc WINDOW *w;
79 1.1 jtc {
80 1.1 jtc if (w == NULL)
81 1.1 jtc return;
82 1.1 jtc wclear(w);
83 1.1 jtc wrefresh(w);
84 1.1 jtc delwin(w);
85 1.1 jtc }
86 1.1 jtc
87 1.1 jtc void
88 1.1 jtc labelmbufs()
89 1.1 jtc {
90 1.1 jtc wmove(wnd, 0, 0); wclrtoeol(wnd);
91 1.1 jtc mvwaddstr(wnd, 0, 10,
92 1.1 jtc "/0 /5 /10 /15 /20 /25 /30 /35 /40 /45 /50 /55 /60");
93 1.1 jtc }
94 1.1 jtc
95 1.1 jtc void
96 1.1 jtc showmbufs()
97 1.1 jtc {
98 1.1 jtc register int i, j, max, index;
99 1.1 jtc char buf[10];
100 1.1 jtc
101 1.1 jtc if (mb == 0)
102 1.1 jtc return;
103 1.1 jtc for (j = 0; j < wnd->maxy; j++) {
104 1.1 jtc max = 0, index = -1;
105 1.1 jtc for (i = 0; i < wnd->maxy; i++)
106 1.1 jtc if (mb->m_mtypes[i] > max) {
107 1.1 jtc max = mb->m_mtypes[i];
108 1.1 jtc index = i;
109 1.1 jtc }
110 1.1 jtc if (max == 0)
111 1.1 jtc break;
112 1.1 jtc if (j > NNAMES)
113 1.1 jtc mvwprintw(wnd, 1+j, 0, "%10d", index);
114 1.1 jtc else
115 1.1 jtc mvwprintw(wnd, 1+j, 0, "%-10.10s", mtnames[index]);
116 1.1 jtc wmove(wnd, 1 + j, 10);
117 1.1 jtc if (max > 60) {
118 1.1 jtc sprintf(buf, " %d", max);
119 1.1 jtc max = 60;
120 1.1 jtc while (max--)
121 1.1 jtc waddch(wnd, 'X');
122 1.1 jtc waddstr(wnd, buf);
123 1.1 jtc } else {
124 1.1 jtc while (max--)
125 1.1 jtc waddch(wnd, 'X');
126 1.1 jtc wclrtoeol(wnd);
127 1.1 jtc }
128 1.1 jtc mb->m_mtypes[index] = 0;
129 1.1 jtc }
130 1.1 jtc wmove(wnd, 1+j, 0); wclrtobot(wnd);
131 1.1 jtc }
132 1.1 jtc
133 1.1 jtc static struct nlist namelist[] = {
134 1.1 jtc #define X_MBSTAT 0
135 1.1 jtc { "_mbstat" },
136 1.1 jtc { "" }
137 1.1 jtc };
138 1.1 jtc
139 1.1 jtc int
140 1.1 jtc initmbufs()
141 1.1 jtc {
142 1.1 jtc if (namelist[X_MBSTAT].n_type == 0) {
143 1.1 jtc if (kvm_nlist(kd, namelist)) {
144 1.1 jtc nlisterr(namelist);
145 1.1 jtc return(0);
146 1.1 jtc }
147 1.1 jtc if (namelist[X_MBSTAT].n_type == 0) {
148 1.1 jtc error("namelist on %s failed", _PATH_UNIX);
149 1.1 jtc return(0);
150 1.1 jtc }
151 1.1 jtc }
152 1.1 jtc if (mb == 0)
153 1.1 jtc mb = (struct mbstat *)calloc(1, sizeof (*mb));
154 1.1 jtc return(1);
155 1.1 jtc }
156 1.1 jtc
157 1.1 jtc void
158 1.1 jtc fetchmbufs()
159 1.1 jtc {
160 1.1 jtc if (namelist[X_MBSTAT].n_type == 0)
161 1.1 jtc return;
162 1.1 jtc NREAD(X_MBSTAT, mb, sizeof (*mb));
163 1.1 jtc }
164