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