xref: /freebsd/usr.bin/systat/netcmds.c (revision afe61c15161c324a7af299a9b8457aba5afc92db)
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  * 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 static char sccsid[] = "@(#)netcmds.c	8.1 (Berkeley) 6/6/93";
36 #endif /* not lint */
37 
38 /*
39  * Common network command support routines.
40  */
41 #include <sys/param.h>
42 #include <sys/socket.h>
43 #include <sys/socketvar.h>
44 #include <sys/mbuf.h>
45 #include <sys/protosw.h>
46 
47 #include <net/route.h>
48 #include <netinet/in.h>
49 #include <netinet/in_systm.h>
50 #include <netinet/ip.h>
51 #include <netinet/in_pcb.h>
52 
53 #include <netdb.h>
54 #include <stdlib.h>
55 #include <string.h>
56 #include <ctype.h>
57 #include "systat.h"
58 #include "extern.h"
59 
60 #define	streq(a,b)	(strcmp(a,b)==0)
61 
62 static	struct hitem {
63 	struct	in_addr addr;
64 	int	onoff;
65 } *hosts;
66 
67 int nports, nhosts, protos;
68 
69 static void changeitems __P((char *, int));
70 static int selectproto __P((char *));
71 static void showprotos __P((void));
72 static int selectport __P((long, int));
73 static void showports __P((void));
74 static int selecthost __P((struct in_addr *, int));
75 static void showhosts __P((void));
76 
77 int
78 netcmd(cmd, args)
79 	char *cmd, *args;
80 {
81 
82 	if (prefix(cmd, "tcp") || prefix(cmd, "udp")) {
83 		selectproto(cmd);
84 		return (1);
85 	}
86 	if (prefix(cmd, "ignore") || prefix(cmd, "display")) {
87 		changeitems(args, prefix(cmd, "display"));
88 		return (1);
89 	}
90 	if (prefix(cmd, "reset")) {
91 		selectproto(0);
92 		selecthost(0, 0);
93 		selectport(-1, 0);
94 		return (1);
95 	}
96 	if (prefix(cmd, "show")) {
97 		move(CMDLINE, 0); clrtoeol();
98 		if (*args == '\0') {
99 			showprotos();
100 			showhosts();
101 			showports();
102 			return (1);
103 		}
104 		if (prefix(args, "protos"))
105 			showprotos();
106 		else if (prefix(args, "hosts"))
107 			showhosts();
108 		else if (prefix(args, "ports"))
109 			showports();
110 		else
111 			addstr("show what?");
112 		return (1);
113 	}
114 	return (0);
115 }
116 
117 
118 static void
119 changeitems(args, onoff)
120 	char *args;
121 	int onoff;
122 {
123 	register char *cp;
124 	struct servent *sp;
125 	struct hostent *hp;
126 	struct in_addr in;
127 	char *index();
128 
129 	cp = index(args, '\n');
130 	if (cp)
131 		*cp = '\0';
132 	for (;;args = cp) {
133 		for (cp = args; *cp && isspace(*cp); cp++)
134 			;
135 		args = cp;
136 		for (; *cp && !isspace(*cp); cp++)
137 			;
138 		if (*cp)
139 			*cp++ = '\0';
140 		if (cp - args == 0)
141 			break;
142 		sp = getservbyname(args,
143 		    protos == TCP ? "tcp" : protos == UDP ? "udp" : 0);
144 		if (sp) {
145 			selectport(sp->s_port, onoff);
146 			continue;
147 		}
148 		hp = gethostbyname(args);
149 		if (hp == 0) {
150 			in.s_addr = inet_addr(args);
151 			if (in.s_addr == -1) {
152 				error("%s: unknown host or port", args);
153 				continue;
154 			}
155 		} else
156 			in = *(struct in_addr *)hp->h_addr;
157 		selecthost(&in, onoff);
158 	}
159 }
160 
161 static int
162 selectproto(proto)
163 	char *proto;
164 {
165 	int new = protos;
166 
167 	if (proto == 0 || streq(proto, "all"))
168 		new = TCP|UDP;
169 	else if (streq(proto, "tcp"))
170 		new = TCP;
171 	else if (streq(proto, "udp"))
172 		new = UDP;
173 	return (new != protos, protos = new);
174 }
175 
176 static void
177 showprotos()
178 {
179 
180 	if ((protos&TCP) == 0)
181 		addch('!');
182 	addstr("tcp ");
183 	if ((protos&UDP) == 0)
184 		addch('!');
185 	addstr("udp ");
186 }
187 
188 static	struct pitem {
189 	long	port;
190 	int	onoff;
191 } *ports;
192 
193 static int
194 selectport(port, onoff)
195 	long port;
196 	int onoff;
197 {
198 	register struct pitem *p;
199 
200 	if (port == -1) {
201 		if (ports == 0)
202 			return (0);
203 		free((char *)ports), ports = 0;
204 		nports = 0;
205 		return (1);
206 	}
207 	for (p = ports; p < ports+nports; p++)
208 		if (p->port == port) {
209 			p->onoff = onoff;
210 			return (0);
211 		}
212 	if (nports == 0)
213 		ports = (struct pitem *)malloc(sizeof (*p));
214 	else
215 		ports = (struct pitem *)realloc(ports, (nports+1)*sizeof (*p));
216 	p = &ports[nports++];
217 	p->port = port;
218 	p->onoff = onoff;
219 	return (1);
220 }
221 
222 int
223 checkport(inp)
224 	register struct inpcb *inp;
225 {
226 	register struct pitem *p;
227 
228 	if (ports)
229 	for (p = ports; p < ports+nports; p++)
230 		if (p->port == inp->inp_lport || p->port == inp->inp_fport)
231 			return (p->onoff);
232 	return (1);
233 }
234 
235 static void
236 showports()
237 {
238 	register struct pitem *p;
239 	struct servent *sp;
240 
241 	for (p = ports; p < ports+nports; p++) {
242 		sp = getservbyport(p->port,
243 		    protos == TCP|UDP ? 0 : protos == TCP ? "tcp" : "udp");
244 		if (!p->onoff)
245 			addch('!');
246 		if (sp)
247 			printw("%s ", sp->s_name);
248 		else
249 			printw("%d ", p->port);
250 	}
251 }
252 
253 static int
254 selecthost(in, onoff)
255 	struct in_addr *in;
256 	int onoff;
257 {
258 	register struct hitem *p;
259 
260 	if (in == 0) {
261 		if (hosts == 0)
262 			return (0);
263 		free((char *)hosts), hosts = 0;
264 		nhosts = 0;
265 		return (1);
266 	}
267 	for (p = hosts; p < hosts+nhosts; p++)
268 		if (p->addr.s_addr == in->s_addr) {
269 			p->onoff = onoff;
270 			return (0);
271 		}
272 	if (nhosts == 0)
273 		hosts = (struct hitem *)malloc(sizeof (*p));
274 	else
275 		hosts = (struct hitem *)realloc(hosts, (nhosts+1)*sizeof (*p));
276 	p = &hosts[nhosts++];
277 	p->addr = *in;
278 	p->onoff = onoff;
279 	return (1);
280 }
281 
282 int
283 checkhost(inp)
284 	register struct inpcb *inp;
285 {
286 	register struct hitem *p;
287 
288 	if (hosts)
289 	for (p = hosts; p < hosts+nhosts; p++)
290 		if (p->addr.s_addr == inp->inp_laddr.s_addr ||
291 		    p->addr.s_addr == inp->inp_faddr.s_addr)
292 			return (p->onoff);
293 	return (1);
294 }
295 
296 static void
297 showhosts()
298 {
299 	register struct hitem *p;
300 	struct hostent *hp;
301 
302 	for (p = hosts; p < hosts+nhosts; p++) {
303 		hp = gethostbyaddr((char *)&p->addr, sizeof (p->addr), AF_INET);
304 		if (!p->onoff)
305 			addch('!');
306 		printw("%s ", hp ? hp->h_name : (char *)inet_ntoa(p->addr));
307 	}
308 }
309