xref: /freebsd/usr.bin/systat/netcmds.c (revision 81ad6265)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1980, 1992, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 
34 __FBSDID("$FreeBSD$");
35 
36 #ifdef lint
37 static const char sccsid[] = "@(#)netcmds.c	8.1 (Berkeley) 6/6/93";
38 #endif
39 
40 /*
41  * Common network command support routines.
42  */
43 #include <sys/param.h>
44 #include <sys/queue.h>
45 #include <sys/socket.h>
46 #include <sys/socketvar.h>
47 #include <sys/protosw.h>
48 
49 #include <net/route.h>
50 #include <netinet/in.h>
51 #include <netinet/in_systm.h>
52 #include <netinet/ip.h>
53 #include <netinet/in_pcb.h>
54 #include <arpa/inet.h>
55 
56 #include <ctype.h>
57 #include <netdb.h>
58 #include <stdlib.h>
59 #include <string.h>
60 
61 #include "systat.h"
62 #include "extern.h"
63 
64 #define	streq(a,b)	(strcmp(a,b)==0)
65 
66 static	struct hitem {
67 	struct	in_addr addr;
68 	int	onoff;
69 } *hosts;
70 
71 int nports, nhosts, protos;
72 
73 static void changeitems(const char *, int);
74 static int selectproto(const char *);
75 static void showprotos(void);
76 static int selectport(long, int);
77 static void showports(void);
78 static int selecthost(struct in_addr *, int);
79 static void showhosts(void);
80 
81 int
82 netcmd(const char *cmd, const char *args)
83 {
84 
85 	if (prefix(cmd, "proto")) {
86 		if (*args == '\0') {
87 			move(CMDLINE, 0);
88 			clrtoeol();
89 			addstr("which proto?");
90 		} else if (!selectproto(args)) {
91 			error("%s: Unknown protocol.", args);
92 		}
93 		return (1);
94 	}
95 	if (prefix(cmd, "ignore") || prefix(cmd, "display")) {
96 		changeitems(args, prefix(cmd, "display"));
97 		return (1);
98 	}
99 	if (prefix(cmd, "reset")) {
100 		selectproto(0);
101 		selecthost(0, 0);
102 		selectport(-1, 0);
103 		return (1);
104 	}
105 	if (prefix(cmd, "show")) {
106 		move(CMDLINE, 0); clrtoeol();
107 		if (*args == '\0') {
108 			showprotos();
109 			showhosts();
110 			showports();
111 			return (1);
112 		}
113 		if (prefix(args, "protos"))
114 			showprotos();
115 		else if (prefix(args, "hosts"))
116 			showhosts();
117 		else if (prefix(args, "ports"))
118 			showports();
119 		else
120 			addstr("show what?");
121 		return (1);
122 	}
123 	return (0);
124 }
125 
126 static void
127 changeitems(const char *args, int onoff)
128 {
129 	char *cp, *tmpstr, *tmpstr1;
130 	struct servent *sp;
131 	struct hostent *hp;
132 	struct in_addr in;
133 
134 	tmpstr = tmpstr1 = strdup(args);
135 	cp = strchr(tmpstr1, '\n');
136 	if (cp)
137 		*cp = '\0';
138 	for (;;tmpstr1 = cp) {
139 		for (cp = tmpstr1; *cp && isspace(*cp); cp++)
140 			;
141 		tmpstr1 = cp;
142 		for (; *cp && !isspace(*cp); cp++)
143 			;
144 		if (*cp)
145 			*cp++ = '\0';
146 		if (cp - tmpstr1 == 0)
147 			break;
148 		sp = getservbyname(tmpstr1,
149 		    protos == TCP ? "tcp" : protos == UDP ? "udp" : 0);
150 		if (sp) {
151 			selectport(sp->s_port, onoff);
152 			continue;
153 		}
154 		hp = gethostbyname(tmpstr1);
155 		if (hp == NULL) {
156 			in.s_addr = inet_addr(tmpstr1);
157 			if (in.s_addr == INADDR_NONE) {
158 				error("%s: unknown host or port", tmpstr1);
159 				continue;
160 			}
161 		} else
162 			in = *(struct in_addr *)hp->h_addr;
163 		selecthost(&in, onoff);
164 	}
165 	free(tmpstr);
166 }
167 
168 static int
169 selectproto(const char *proto)
170 {
171 
172 	if (proto == NULL || streq(proto, "all"))
173 		protos = TCP | UDP;
174 	else if (streq(proto, "tcp"))
175 		protos = TCP;
176 	else if (streq(proto, "udp"))
177 		protos = UDP;
178 	else
179 		return (0);
180 
181 	return (protos);
182 }
183 
184 static void
185 showprotos(void)
186 {
187 
188 	if ((protos&TCP) == 0)
189 		addch('!');
190 	addstr("tcp ");
191 	if ((protos&UDP) == 0)
192 		addch('!');
193 	addstr("udp ");
194 }
195 
196 static	struct pitem {
197 	long	port;
198 	int	onoff;
199 } *ports;
200 
201 static int
202 selectport(long port, int onoff)
203 {
204 	struct pitem *p;
205 
206 	if (port == -1) {
207 		if (ports == NULL)
208 			return (0);
209 		free((char *)ports), ports = 0;
210 		nports = 0;
211 		return (1);
212 	}
213 	for (p = ports; p < ports + nports; p++)
214 		if (p->port == port) {
215 			p->onoff = onoff;
216 			return (0);
217 		}
218 	if (nports == 0)
219 		ports = (struct pitem *)malloc(sizeof (*p));
220 	else
221 		ports = (struct pitem *)realloc(ports, (nports+1)*sizeof (*p));
222 	p = &ports[nports++];
223 	p->port = port;
224 	p->onoff = onoff;
225 	return (1);
226 }
227 
228 int
229 checkport(struct in_conninfo *inc)
230 {
231 	struct pitem *p;
232 
233 	if (ports)
234 	for (p = ports; p < ports+nports; p++)
235 		if (p->port == inc->inc_lport || p->port == inc->inc_fport)
236 			return (p->onoff);
237 	return (1);
238 }
239 
240 static void
241 showports(void)
242 {
243 	struct pitem *p;
244 	struct servent *sp;
245 
246 	for (p = ports; p < ports+nports; p++) {
247 		sp = getservbyport(p->port,
248 		    protos == (TCP|UDP) ? 0 : protos == TCP ? "tcp" : "udp");
249 		if (!p->onoff)
250 			addch('!');
251 		if (sp)
252 			printw("%s ", sp->s_name);
253 		else
254 			printw("%d ", p->port);
255 	}
256 }
257 
258 static int
259 selecthost(struct in_addr *in, int onoff)
260 {
261 	struct hitem *p;
262 
263 	if (in == NULL) {
264 		if (hosts == NULL)
265 			return (0);
266 		free((char *)hosts), hosts = 0;
267 		nhosts = 0;
268 		return (1);
269 	}
270 	for (p = hosts; p < hosts+nhosts; p++)
271 		if (p->addr.s_addr == in->s_addr) {
272 			p->onoff = onoff;
273 			return (0);
274 		}
275 	if (nhosts == 0)
276 		hosts = (struct hitem *)malloc(sizeof (*p));
277 	else
278 		hosts = (struct hitem *)realloc(hosts, (nhosts+1)*sizeof (*p));
279 	p = &hosts[nhosts++];
280 	p->addr = *in;
281 	p->onoff = onoff;
282 	return (1);
283 }
284 
285 int
286 checkhost(struct in_conninfo *inc)
287 {
288 	struct hitem *p;
289 
290 	if (hosts)
291 	for (p = hosts; p < hosts+nhosts; p++)
292 		if (p->addr.s_addr == inc->inc_laddr.s_addr ||
293 		    p->addr.s_addr == inc->inc_faddr.s_addr)
294 			return (p->onoff);
295 	return (1);
296 }
297 
298 static void
299 showhosts(void)
300 {
301 	struct hitem *p;
302 	struct hostent *hp;
303 
304 	for (p = hosts; p < hosts+nhosts; p++) {
305 		hp = gethostbyaddr((char *)&p->addr, sizeof (p->addr), AF_INET);
306 		if (!p->onoff)
307 			addch('!');
308 		printw("%s ", hp ? hp->h_name : (char *)inet_ntoa(p->addr));
309 	}
310 }
311