xref: /openbsd-src/usr.sbin/tcpdrop/tcpdrop.c (revision 5ad04d351680822078003e2b066cfc9680d6157d)
1 /* $OpenBSD: tcpdrop.c,v 1.13 2014/01/10 04:02:15 lteo Exp $ */
2 
3 /*
4  * Copyright (c) 2004 Markus Friedl <markus@openbsd.org>
5  *
6  * Permission to use, copy, modify, and distribute this software for any
7  * purpose with or without fee is hereby granted, provided that the above
8  * copyright notice and this permission notice appear in all copies.
9  *
10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17  */
18 
19 #include <sys/param.h>
20 #include <sys/socket.h>
21 #include <sys/sysctl.h>
22 #include <sys/timeout.h>
23 
24 #include <netinet/in.h>
25 #include <netinet/tcp.h>
26 #include <netinet/tcp_timer.h>
27 #include <netinet/tcp_var.h>
28 
29 #include <err.h>
30 #include <stdio.h>
31 #include <string.h>
32 #include <stdlib.h>
33 #include <netdb.h>
34 
35 extern char *__progname;
36 
37 /*
38  * Drop a tcp connection.
39  */
40 int
41 main(int argc, char **argv)
42 {
43 	int mib[] = { CTL_NET, PF_INET, IPPROTO_TCP, TCPCTL_DROP };
44 	struct addrinfo hints, *ail, *aif, *laddr, *faddr;
45 	char fhbuf[NI_MAXHOST], fsbuf[NI_MAXSERV];
46 	char lhbuf[NI_MAXHOST], lsbuf[NI_MAXSERV];
47 	char *laddr1, *addr1, *port1, *faddr2, *addr2, *port2;
48 	struct tcp_ident_mapping tir;
49 	int gaierr, rval = 0;
50 
51 	memset(&hints, 0, sizeof(hints));
52 	hints.ai_family = AF_UNSPEC;
53 	hints.ai_socktype = SOCK_STREAM;
54 
55 	if (argc == 3) {
56 		laddr1 = addr1 = strdup(argv[1]);
57 		if (!addr1)
58 			err(1, "strdup");
59 		port1 = strrchr(addr1, ':');
60 		if (port1)
61 			*port1++ = '\0';
62 		else
63 			goto fail;
64 
65 		faddr2 = addr2 = strdup(argv[2]);
66 		if (!addr2)
67 			err(1, "strdup");
68 		port2 = strrchr(addr2, ':');
69 		if (port2)
70 			*port2++ = '\0';
71 		else
72 			goto fail;
73 	} else if (argc == 5) {
74 		laddr1 = addr1 = argv[1];
75 		port1 = argv[2];
76 		faddr2 = addr2 = argv[3];
77 		port2 = argv[4];
78 	} else {
79 fail:
80 		fprintf(stderr,
81 		    "usage: %s local-addr local-port remote-addr remote-port\n",
82 		    __progname);
83 		fprintf(stderr,
84 		    "       %s local-addr:local-port remote-addr:remote-port\n",
85 		    __progname);
86 		exit(1);
87 	}
88 
89 	if (addr1[0] == '[' && addr1[strlen(addr1) - 1] == ']') {
90 		laddr1 = strdup(addr1);
91 		if (!laddr1)
92 			err(1, "strdup");
93 		laddr1[strlen(laddr1) - 1] = '\0';
94 		laddr1++;
95 	}
96 	if (addr2[0] == '[' && addr2[strlen(addr2) - 1] == ']') {
97 		faddr2 = strdup(addr2);
98 		if (!faddr2)
99 			err(1, "strdup");
100 		faddr2[strlen(faddr2) - 1] = '\0';
101 		faddr2++;
102 	}
103 
104 	if ((gaierr = getaddrinfo(laddr1, port1, &hints, &laddr)) != 0)
105 		errx(1, "%s port %s: %s", addr1, port1,
106 		    gai_strerror(gaierr));
107 
108 	if ((gaierr = getaddrinfo(faddr2, port2, &hints, &faddr)) != 0) {
109 		freeaddrinfo(laddr);
110 		errx(1, "%s port %s: %s", addr2, port2,
111 		    gai_strerror(gaierr));
112 	}
113 
114 	rval = 1;
115 	for (ail = laddr; ail; ail = ail->ai_next) {
116 		for (aif = faddr; aif; aif = aif->ai_next) {
117 			if (ail->ai_family != aif->ai_family)
118 				continue;
119 			rval = 0;
120 			memset(&tir, 0, sizeof(tir));
121 			memcpy(&tir.faddr, aif->ai_addr, aif->ai_addrlen);
122 			memcpy(&tir.laddr, ail->ai_addr, ail->ai_addrlen);
123 
124 			if ((gaierr = getnameinfo(aif->ai_addr, aif->ai_addrlen,
125 			    fhbuf, sizeof(fhbuf), fsbuf, sizeof(fsbuf),
126 			    NI_NUMERICHOST | NI_NUMERICSERV)) != 0)
127 				errx(1, "getnameinfo: %s", gai_strerror(gaierr));
128 			if ((gaierr = getnameinfo(ail->ai_addr, ail->ai_addrlen,
129 			    lhbuf, sizeof(lhbuf), lsbuf, sizeof(lsbuf),
130 			    NI_NUMERICHOST | NI_NUMERICSERV)) != 0)
131 				errx(1, "getnameinfo: %s", gai_strerror(gaierr));
132 
133 			if (sysctl(mib, sizeof (mib) / sizeof (int), NULL,
134 			    NULL, &tir, sizeof(tir)) == -1) {
135 				rval = 1;
136 				warn("%s %s %s %s", lhbuf, lsbuf, fhbuf, fsbuf);
137 			} else {
138 				if (aif->ai_family == PF_INET6)
139 					printf("[%s]:%s [%s]:%s dropped\n",
140 					    lhbuf, lsbuf, fhbuf, fsbuf);
141 				else
142 					printf("%s:%s %s:%s dropped\n",
143 					    lhbuf, lsbuf, fhbuf, fsbuf);
144 			}
145 		}
146 	}
147 	freeaddrinfo(laddr);
148 	freeaddrinfo(faddr);
149 	exit(rval);
150 }
151