xref: /dragonfly/usr.bin/systat/mbufs.c (revision 25a2db75)
1 /*-
2  * Copyright (c) 1980, 1992, 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  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * @(#)mbufs.c	8.1 (Berkeley) 6/6/93
30  * $FreeBSD: src/usr.bin/systat/mbufs.c,v 1.10.2.1 2000/08/26 09:36:55 ps Exp $
31  */
32 
33 #define _KERNEL_STRUCTURES
34 #include <sys/param.h>
35 #include <sys/types.h>
36 #include <sys/mbuf.h>
37 #include <sys/sysctl.h>
38 
39 #include <errno.h>
40 #include <stdlib.h>
41 #include <string.h>
42 #include <paths.h>
43 #include "systat.h"
44 #include "extern.h"
45 
46 static struct mbstat *mb;
47 static u_long *m_mbtypes;
48 static int nmbtypes;
49 
50 static struct mtnames {
51 	int mt_type;
52 	const char *mt_name;
53 } mtnames[] = {
54 	{ MT_DATA, 	"data"},
55 	{ MT_HEADER,	"headers"},
56 	{ MT_SONAME,	"socknames"},
57 	{ MT_CONTROL,	"control"},
58 	{ MT_OOBDATA,	"oobdata"}
59 };
60 
61 #define	NNAMES	(sizeof (mtnames) / sizeof (mtnames[0]))
62 
63 WINDOW *
64 openmbufs(void)
65 {
66 	return (subwin(stdscr, LINES-5-1, 0, 5, 0));
67 }
68 
69 void
70 closembufs(WINDOW *w)
71 {
72 	if (w == NULL)
73 		return;
74 	wclear(w);
75 	wrefresh(w);
76 	delwin(w);
77 }
78 
79 void
80 labelmbufs(void)
81 {
82 	wmove(wnd, 0, 0); wclrtoeol(wnd);
83 	mvwaddstr(wnd, 0, 10,
84 	    "/0   /5   /10  /15  /20  /25  /30  /35  /40  /45  /50  /55  /60");
85 }
86 
87 void
88 showmbufs(void)
89 {
90 	int i, j, idx;
91 	u_long max;
92 	char buf[10];
93 	const char *mtname;
94 
95 	if (mb == NULL)
96 		return;
97 	for (j = 0; j < wnd->_maxy; j++) {
98 		max = 0, idx = -1;
99 		for (i = 0; i < wnd->_maxy; i++) {
100 			if (i == MT_FREE)
101 				continue;
102 			if (i >= nmbtypes)
103 				break;
104 			if (m_mbtypes[i] > max) {
105 				max = m_mbtypes[i];
106 				idx = i;
107 			}
108 		}
109 		if (max == 0)
110 			break;
111 
112 		mtname = NULL;
113 		for (i = 0; i < (int)NNAMES; i++)
114 			if (mtnames[i].mt_type == idx)
115 				mtname = mtnames[i].mt_name;
116 		if (mtname == NULL)
117 			mvwprintw(wnd, 1+j, 0, "%10d", idx);
118 		else
119 			mvwprintw(wnd, 1+j, 0, "%-10.10s", mtname);
120 		wmove(wnd, 1 + j, 10);
121 		if (max > 60) {
122 			snprintf(buf, sizeof(buf), " %lu", max);
123 			max = 60;
124 			while (max--)
125 				waddch(wnd, 'X');
126 			waddstr(wnd, buf);
127 		} else
128 			while (max--)
129 				waddch(wnd, 'X');
130 		wclrtoeol(wnd);
131 		mb->m_mbufs -= m_mbtypes[idx];
132 		m_mbtypes[idx] = 0;
133 	}
134 	if (mb->m_mbufs) {
135 		mvwprintw(wnd, 1+j, 0, "%-10.10s", "free");
136 		if (mb->m_mbufs > 60) {
137 			snprintf(buf, sizeof(buf), " %ld", mb->m_mbufs);
138 			mb->m_mbufs = 60;
139 			while (mb->m_mbufs--)
140 				waddch(wnd, 'X');
141 			waddstr(wnd, buf);
142 		} else {
143 			while(mb->m_mbufs--)
144 				waddch(wnd, 'X');
145 		}
146 		wclrtoeol(wnd);
147 		j++;
148 	}
149 	wmove(wnd, 1+j, 0); wclrtobot(wnd);
150 }
151 
152 int
153 initmbufs(void)
154 {
155 	size_t len, mbtypeslen;
156 
157 	if (sysctlbyname("kern.ipc.mbtypes", NULL, &mbtypeslen, NULL, 0) < 0) {
158 		error("sysctl getting mbtypes size failed");
159 		return 0;
160 	}
161 	if ((m_mbtypes = calloc(1, mbtypeslen)) == NULL) {
162 		error("calloc mbtypes failed");
163 		return 0;
164 	}
165 	nmbtypes = mbtypeslen / sizeof(*m_mbtypes);
166 
167 	len = 0;
168 	if (sysctlbyname("kern.ipc.mbstat", 0, &len, 0, 0) < 0) {
169 		error("sysctl getting mbstat size failed");
170 		return 0;
171 	}
172 
173 	if (mb == NULL)
174 		mb = (struct mbstat *)calloc(1, sizeof *mb);
175 	return 1;
176 }
177 
178 void
179 fetchmbufs(void)
180 {
181 	size_t len;
182 
183 	len = sizeof *mb;
184 	if (sysctlbyname("kern.ipc.mbstat", mb, &len, 0, 0) < 0)
185 		printw("sysctl: mbstat: %s", strerror(errno));
186 
187 	len = nmbtypes * sizeof *m_mbtypes;
188 	if (sysctlbyname("kern.ipc.mbtypes", m_mbtypes, &len, 0, 0) < 0)
189 		printw("sysctl: mbtypes: %s", strerror(errno));
190 }
191