diff options
author | Eric Andersen <andersen@codepoet.org> | 2001-07-10 16:29:00 +0000 |
---|---|---|
committer | Eric Andersen <andersen@codepoet.org> | 2001-07-10 16:29:00 +0000 |
commit | 5c58d283bbd71db2a43379fc2b804f6c138cf35e (patch) | |
tree | 6dd8028a88bf560831a117cba5f59709237055e9 | |
parent | 91b84603d3c3f3911bee87c8ad02c06cb8fc95ae (diff) | |
download | busybox-w32-5c58d283bbd71db2a43379fc2b804f6c138cf35e.tar.gz busybox-w32-5c58d283bbd71db2a43379fc2b804f6c138cf35e.tar.bz2 busybox-w32-5c58d283bbd71db2a43379fc2b804f6c138cf35e.zip |
A traceroute applet from vodz. This could probably be slimmed down,
but will do for now...
-rw-r--r-- | Config.h | 1 | ||||
-rw-r--r-- | applets.h | 3 | ||||
-rw-r--r-- | applets/usage.h | 22 | ||||
-rw-r--r-- | include/applets.h | 3 | ||||
-rw-r--r-- | include/usage.h | 22 | ||||
-rw-r--r-- | networking/traceroute.c | 593 | ||||
-rw-r--r-- | traceroute.c | 593 | ||||
-rw-r--r-- | usage.h | 22 |
8 files changed, 1259 insertions, 0 deletions
@@ -114,6 +114,7 @@ | |||
114 | //#define BB_TFTP | 114 | //#define BB_TFTP |
115 | #define BB_TOUCH | 115 | #define BB_TOUCH |
116 | //#define BB_TR | 116 | //#define BB_TR |
117 | //#define BB_TRACEROUTE | ||
117 | #define BB_TRUE_FALSE | 118 | #define BB_TRUE_FALSE |
118 | #define BB_TTY | 119 | #define BB_TTY |
119 | //#define BB_UNIX2DOS | 120 | //#define BB_UNIX2DOS |
@@ -386,6 +386,9 @@ | |||
386 | #ifdef BB_TR | 386 | #ifdef BB_TR |
387 | APPLET(tr, tr_main, _BB_DIR_USR_BIN) | 387 | APPLET(tr, tr_main, _BB_DIR_USR_BIN) |
388 | #endif | 388 | #endif |
389 | #ifdef BB_TRACEROUTE | ||
390 | APPLET(traceroute, traceroute_main, _BB_DIR_USR_BIN) | ||
391 | #endif | ||
389 | #ifdef BB_TRUE_FALSE | 392 | #ifdef BB_TRUE_FALSE |
390 | APPLET(true, true_main, _BB_DIR_BIN) | 393 | APPLET(true, true_main, _BB_DIR_BIN) |
391 | #endif | 394 | #endif |
diff --git a/applets/usage.h b/applets/usage.h index a19f0fe22..70dafd81c 100644 --- a/applets/usage.h +++ b/applets/usage.h | |||
@@ -1593,6 +1593,28 @@ | |||
1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ | 1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ |
1594 | "hello world\n" | 1594 | "hello world\n" |
1595 | 1595 | ||
1596 | #define traceroute_trivial_usage \ | ||
1597 | "[-dnrv] [-m max_ttl] [-p port#] [-q nqueries]\n\ | ||
1598 | [-s src_addr] [-t tos] [-w wait] host [data size]" | ||
1599 | #define traceroute_full_usage \ | ||
1600 | "trace the route ip packets follow going to \"host\"\n" \ | ||
1601 | "Options:\n" \ | ||
1602 | "\t-d\tset SO_DEBUG options to socket\n" \ | ||
1603 | "\t-n\tPrint hop addresses numerically rather than symbolically\n" \ | ||
1604 | "\t-r\tBypass the normal routing tables and send directly to a host\n" \ | ||
1605 | "\t-v\tVerbose output\n" \ | ||
1606 | "\t-m max_ttl\tSet the max time-to-live (max number of hops)\n" \ | ||
1607 | "\t-p port#\tSet the base UDP port number used in probes\n" \ | ||
1608 | "\t\t(default is 33434)\n" \ | ||
1609 | "\t-q nqueries\tSet the number of probes per ``ttl'' to nqueries\n" \ | ||
1610 | "\t\t(default is 3)\n" \ | ||
1611 | "\t-s src_addr\tUse the following IP address as the source address\n" \ | ||
1612 | "\t-t tos\tSet the type-of-service in probe packets to the following value\n" \ | ||
1613 | "\t\t(default 0)\n" \ | ||
1614 | "\t-w wait\tSet the time (in seconds) to wait for a response to a probe\n" \ | ||
1615 | "\t\t(default 3 sec.)." | ||
1616 | |||
1617 | |||
1596 | #define true_trivial_usage \ | 1618 | #define true_trivial_usage \ |
1597 | "" | 1619 | "" |
1598 | #define true_full_usage \ | 1620 | #define true_full_usage \ |
diff --git a/include/applets.h b/include/applets.h index e6ee3c95e..12a28d5be 100644 --- a/include/applets.h +++ b/include/applets.h | |||
@@ -386,6 +386,9 @@ | |||
386 | #ifdef BB_TR | 386 | #ifdef BB_TR |
387 | APPLET(tr, tr_main, _BB_DIR_USR_BIN) | 387 | APPLET(tr, tr_main, _BB_DIR_USR_BIN) |
388 | #endif | 388 | #endif |
389 | #ifdef BB_TRACEROUTE | ||
390 | APPLET(traceroute, traceroute_main, _BB_DIR_USR_BIN) | ||
391 | #endif | ||
389 | #ifdef BB_TRUE_FALSE | 392 | #ifdef BB_TRUE_FALSE |
390 | APPLET(true, true_main, _BB_DIR_BIN) | 393 | APPLET(true, true_main, _BB_DIR_BIN) |
391 | #endif | 394 | #endif |
diff --git a/include/usage.h b/include/usage.h index a19f0fe22..70dafd81c 100644 --- a/include/usage.h +++ b/include/usage.h | |||
@@ -1593,6 +1593,28 @@ | |||
1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ | 1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ |
1594 | "hello world\n" | 1594 | "hello world\n" |
1595 | 1595 | ||
1596 | #define traceroute_trivial_usage \ | ||
1597 | "[-dnrv] [-m max_ttl] [-p port#] [-q nqueries]\n\ | ||
1598 | [-s src_addr] [-t tos] [-w wait] host [data size]" | ||
1599 | #define traceroute_full_usage \ | ||
1600 | "trace the route ip packets follow going to \"host\"\n" \ | ||
1601 | "Options:\n" \ | ||
1602 | "\t-d\tset SO_DEBUG options to socket\n" \ | ||
1603 | "\t-n\tPrint hop addresses numerically rather than symbolically\n" \ | ||
1604 | "\t-r\tBypass the normal routing tables and send directly to a host\n" \ | ||
1605 | "\t-v\tVerbose output\n" \ | ||
1606 | "\t-m max_ttl\tSet the max time-to-live (max number of hops)\n" \ | ||
1607 | "\t-p port#\tSet the base UDP port number used in probes\n" \ | ||
1608 | "\t\t(default is 33434)\n" \ | ||
1609 | "\t-q nqueries\tSet the number of probes per ``ttl'' to nqueries\n" \ | ||
1610 | "\t\t(default is 3)\n" \ | ||
1611 | "\t-s src_addr\tUse the following IP address as the source address\n" \ | ||
1612 | "\t-t tos\tSet the type-of-service in probe packets to the following value\n" \ | ||
1613 | "\t\t(default 0)\n" \ | ||
1614 | "\t-w wait\tSet the time (in seconds) to wait for a response to a probe\n" \ | ||
1615 | "\t\t(default 3 sec.)." | ||
1616 | |||
1617 | |||
1596 | #define true_trivial_usage \ | 1618 | #define true_trivial_usage \ |
1597 | "" | 1619 | "" |
1598 | #define true_full_usage \ | 1620 | #define true_full_usage \ |
diff --git a/networking/traceroute.c b/networking/traceroute.c new file mode 100644 index 000000000..a02be8a9e --- /dev/null +++ b/networking/traceroute.c | |||
@@ -0,0 +1,593 @@ | |||
1 | /*- | ||
2 | * Copyright (c) 1990, 1993 | ||
3 | * The Regents of the University of California. All rights reserved. | ||
4 | * | ||
5 | * This code is derived from software contributed to Berkeley by | ||
6 | * Van Jacobson. | ||
7 | * | ||
8 | * Redistribution and use in source and binary forms, with or without | ||
9 | * modification, are permitted provided that the following conditions | ||
10 | * are met: | ||
11 | * 1. Redistributions of source code must retain the above copyright | ||
12 | * notice, this list of conditions and the following disclaimer. | ||
13 | * 2. Redistributions in binary form must reproduce the above copyright | ||
14 | * notice, this list of conditions and the following disclaimer in the | ||
15 | * documentation and/or other materials provided with the distribution. | ||
16 | * 3. All advertising materials mentioning features or use of this software | ||
17 | * must display the following acknowledgement: | ||
18 | * This product includes software developed by the University of | ||
19 | * California, Berkeley and its contributors. | ||
20 | * 4. Neither the name of the University nor the names of its contributors | ||
21 | * may be used to endorse or promote products derived from this software | ||
22 | * without specific prior written permission. | ||
23 | * | ||
24 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND | ||
25 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
26 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
27 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | ||
28 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
29 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
30 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
31 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
32 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
33 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
34 | * SUCH DAMAGE. | ||
35 | */ | ||
36 | |||
37 | /* | ||
38 | * traceroute host - trace the route ip packets follow going to "host". | ||
39 | * Notes | ||
40 | * ----- | ||
41 | * This program must be run by root or be setuid. (I suggest that | ||
42 | * you *don't* make it setuid -- casual use could result in a lot | ||
43 | * of unnecessary traffic on our poor, congested nets.) | ||
44 | * | ||
45 | * I stole the idea for this program from Steve Deering. Since | ||
46 | * the first release, I've learned that had I attended the right | ||
47 | * IETF working group meetings, I also could have stolen it from Guy | ||
48 | * Almes or Matt Mathis. I don't know (or care) who came up with | ||
49 | * the idea first. I envy the originators' perspicacity and I'm | ||
50 | * glad they didn't keep the idea a secret. | ||
51 | * | ||
52 | * Tim Seaver, Ken Adelman and C. Philip Wood provided bug fixes and/or | ||
53 | * enhancements to the original distribution. | ||
54 | * | ||
55 | * I've hacked up a round-trip-route version of this that works by | ||
56 | * sending a loose-source-routed udp datagram through the destination | ||
57 | * back to yourself. Unfortunately, SO many gateways botch source | ||
58 | * routing, the thing is almost worthless. Maybe one day... | ||
59 | * | ||
60 | * -- Van Jacobson (van@helios.ee.lbl.gov) | ||
61 | * Tue Dec 20 03:50:13 PST 1988 | ||
62 | */ | ||
63 | |||
64 | #include <stdio.h> | ||
65 | #include <errno.h> | ||
66 | #include <stdlib.h> | ||
67 | #include <string.h> | ||
68 | #include <unistd.h> | ||
69 | #include <sys/time.h> | ||
70 | #include <netdb.h> | ||
71 | #include <endian.h> | ||
72 | #include <arpa/inet.h> | ||
73 | #include <netinet/udp.h> | ||
74 | #include <netinet/ip.h> | ||
75 | #include <netinet/ip_icmp.h> | ||
76 | |||
77 | |||
78 | #define MAXPACKET 65535 /* max ip packet size */ | ||
79 | #ifndef MAXHOSTNAMELEN | ||
80 | #define MAXHOSTNAMELEN 64 | ||
81 | #endif | ||
82 | |||
83 | /* | ||
84 | * format of a (udp) probe packet. | ||
85 | */ | ||
86 | struct opacket { | ||
87 | struct ip ip; | ||
88 | struct udphdr udp; | ||
89 | u_char seq; /* sequence number of this packet */ | ||
90 | u_char ttl; /* ttl packet left with */ | ||
91 | struct timeval tv; /* time packet left */ | ||
92 | }; | ||
93 | |||
94 | /* | ||
95 | * Definitions for internet protocol version 4. | ||
96 | * Per RFC 791, September 1981. | ||
97 | */ | ||
98 | #define IPVERSION 4 | ||
99 | |||
100 | |||
101 | #include "busybox.h" | ||
102 | |||
103 | static int wait_for_reply (int, struct sockaddr_in *, int); | ||
104 | static void send_probe (int, int); | ||
105 | static double deltaT (struct timeval *, struct timeval *); | ||
106 | static int packet_ok (u_char *, int, struct sockaddr_in *, int); | ||
107 | static void print (u_char *, int, struct sockaddr_in *); | ||
108 | static char *inetname (struct in_addr); | ||
109 | |||
110 | static u_char packet[512]; /* last inbound (icmp) packet */ | ||
111 | static struct opacket *outpacket; /* last output (udp) packet */ | ||
112 | |||
113 | static int s; /* receive (icmp) socket file descriptor */ | ||
114 | static int sndsock; /* send (udp) socket file descriptor */ | ||
115 | |||
116 | static struct sockaddr whereto; /* Who to try to reach */ | ||
117 | static int datalen; /* How much data */ | ||
118 | |||
119 | static char *hostname; | ||
120 | |||
121 | static int max_ttl = 30; | ||
122 | static u_short ident; | ||
123 | static u_short port = 32768+666; /* start udp dest port # for probe packets */ | ||
124 | |||
125 | static int verbose; | ||
126 | static int waittime = 5; /* time to wait for response (in seconds) */ | ||
127 | static int nflag; /* print addresses numerically */ | ||
128 | |||
129 | int | ||
130 | #ifndef BB_TRACEROUTE | ||
131 | main(argc, argv) | ||
132 | #else | ||
133 | traceroute_main(argc, argv) | ||
134 | #endif | ||
135 | int argc; | ||
136 | char *argv[]; | ||
137 | { | ||
138 | extern char *optarg; | ||
139 | extern int optind; | ||
140 | struct hostent *hp; | ||
141 | struct protoent *pe; | ||
142 | struct sockaddr_in from, *to; | ||
143 | int ch, i, on, probe, seq, tos, ttl; | ||
144 | |||
145 | int options = 0; /* socket options */ | ||
146 | char *source = 0; | ||
147 | int nprobes = 3; | ||
148 | |||
149 | on = 1; | ||
150 | seq = tos = 0; | ||
151 | to = (struct sockaddr_in *)&whereto; | ||
152 | while ((ch = getopt(argc, argv, "dm:np:q:rs:t:w:v")) != EOF) | ||
153 | switch(ch) { | ||
154 | case 'd': | ||
155 | options |= SO_DEBUG; | ||
156 | break; | ||
157 | case 'm': | ||
158 | max_ttl = atoi(optarg); | ||
159 | if (max_ttl <= 1) | ||
160 | error_msg_and_die("max ttl must be >1."); | ||
161 | break; | ||
162 | case 'n': | ||
163 | nflag++; | ||
164 | break; | ||
165 | case 'p': | ||
166 | port = atoi(optarg); | ||
167 | if (port < 1) | ||
168 | error_msg_and_die("port must be >0."); | ||
169 | break; | ||
170 | case 'q': | ||
171 | nprobes = atoi(optarg); | ||
172 | if (nprobes < 1) | ||
173 | error_msg_and_die("nprobes must be >0."); | ||
174 | break; | ||
175 | case 'r': | ||
176 | options |= SO_DONTROUTE; | ||
177 | break; | ||
178 | case 's': | ||
179 | /* | ||
180 | * set the ip source address of the outbound | ||
181 | * probe (e.g., on a multi-homed host). | ||
182 | */ | ||
183 | source = optarg; | ||
184 | break; | ||
185 | case 't': | ||
186 | tos = atoi(optarg); | ||
187 | if (tos < 0 || tos > 255) | ||
188 | error_msg_and_die("tos must be 0 to 255."); | ||
189 | break; | ||
190 | case 'v': | ||
191 | verbose++; | ||
192 | break; | ||
193 | case 'w': | ||
194 | waittime = atoi(optarg); | ||
195 | if (waittime <= 1) | ||
196 | error_msg_and_die("wait must be >1 sec."); | ||
197 | break; | ||
198 | default: | ||
199 | show_usage(); | ||
200 | } | ||
201 | argc -= optind; | ||
202 | argv += optind; | ||
203 | |||
204 | if (argc < 1) | ||
205 | show_usage(); | ||
206 | |||
207 | setlinebuf (stdout); | ||
208 | |||
209 | (void) bzero((char *)&whereto, sizeof(struct sockaddr)); | ||
210 | to->sin_family = AF_INET; | ||
211 | to->sin_addr.s_addr = inet_addr(*argv); | ||
212 | if (to->sin_addr.s_addr != -1) | ||
213 | hostname = *argv; | ||
214 | else { | ||
215 | hp = gethostbyname(*argv); | ||
216 | if (hp) { | ||
217 | to->sin_family = hp->h_addrtype; | ||
218 | bcopy(hp->h_addr, (caddr_t)&to->sin_addr, hp->h_length); | ||
219 | hostname = (char *)hp->h_name; | ||
220 | } else { | ||
221 | error_msg_and_die("unknown host %s", *argv); | ||
222 | } | ||
223 | } | ||
224 | if (*++argv) | ||
225 | datalen = atoi(*argv); | ||
226 | if (datalen < 0 || datalen >= MAXPACKET - sizeof(struct opacket)) | ||
227 | error_msg_and_die("packet size must be 0 <= s < %d.", | ||
228 | MAXPACKET - sizeof(struct opacket)); | ||
229 | datalen += sizeof(struct opacket); | ||
230 | outpacket = (struct opacket *)xmalloc((unsigned)datalen); | ||
231 | (void) bzero((char *)outpacket, datalen); | ||
232 | outpacket->ip.ip_dst = to->sin_addr; | ||
233 | outpacket->ip.ip_tos = tos; | ||
234 | outpacket->ip.ip_v = IPVERSION; | ||
235 | outpacket->ip.ip_id = 0; | ||
236 | |||
237 | ident = (getpid() & 0xffff) | 0x8000; | ||
238 | |||
239 | if ((pe = getprotobyname("icmp")) == NULL) | ||
240 | error_msg_and_die("icmp: unknown protocol"); | ||
241 | if ((s = socket(AF_INET, SOCK_RAW, pe->p_proto)) < 0) | ||
242 | perror_msg_and_die("icmp socket"); | ||
243 | if (options & SO_DEBUG) | ||
244 | (void) setsockopt(s, SOL_SOCKET, SO_DEBUG, | ||
245 | (char *)&on, sizeof(on)); | ||
246 | if (options & SO_DONTROUTE) | ||
247 | (void) setsockopt(s, SOL_SOCKET, SO_DONTROUTE, | ||
248 | (char *)&on, sizeof(on)); | ||
249 | |||
250 | if ((sndsock = socket(AF_INET, SOCK_RAW, IPPROTO_RAW)) < 0) | ||
251 | perror_msg_and_die("raw socket"); | ||
252 | #ifdef SO_SNDBUF | ||
253 | if (setsockopt(sndsock, SOL_SOCKET, SO_SNDBUF, (char *)&datalen, | ||
254 | sizeof(datalen)) < 0) | ||
255 | perror_msg_and_die("SO_SNDBUF"); | ||
256 | #endif SO_SNDBUF | ||
257 | #ifdef IP_HDRINCL | ||
258 | if (setsockopt(sndsock, IPPROTO_IP, IP_HDRINCL, (char *)&on, | ||
259 | sizeof(on)) < 0) | ||
260 | perror_msg_and_die("IP_HDRINCL"); | ||
261 | #endif IP_HDRINCL | ||
262 | if (options & SO_DEBUG) | ||
263 | (void) setsockopt(sndsock, SOL_SOCKET, SO_DEBUG, | ||
264 | (char *)&on, sizeof(on)); | ||
265 | if (options & SO_DONTROUTE) | ||
266 | (void) setsockopt(sndsock, SOL_SOCKET, SO_DONTROUTE, | ||
267 | (char *)&on, sizeof(on)); | ||
268 | |||
269 | if (source) { | ||
270 | (void) bzero((char *)&from, sizeof(struct sockaddr)); | ||
271 | from.sin_family = AF_INET; | ||
272 | from.sin_addr.s_addr = inet_addr(source); | ||
273 | if (from.sin_addr.s_addr == -1) | ||
274 | error_msg_and_die("unknown host %s", source); | ||
275 | outpacket->ip.ip_src = from.sin_addr; | ||
276 | #ifndef IP_HDRINCL | ||
277 | if (bind(sndsock, (struct sockaddr *)&from, sizeof(from)) < 0) | ||
278 | perror_msg_and_die("bind"); | ||
279 | #endif IP_HDRINCL | ||
280 | } | ||
281 | |||
282 | fprintf(stderr, "traceroute to %s (%s)", hostname, | ||
283 | inet_ntoa(to->sin_addr)); | ||
284 | if (source) | ||
285 | fprintf(stderr, " from %s", source); | ||
286 | fprintf(stderr, ", %d hops max, %d byte packets\n", max_ttl, datalen); | ||
287 | (void) fflush(stderr); | ||
288 | |||
289 | for (ttl = 1; ttl <= max_ttl; ++ttl) { | ||
290 | u_long lastaddr = 0; | ||
291 | int got_there = 0; | ||
292 | int unreachable = 0; | ||
293 | |||
294 | printf("%2d ", ttl); | ||
295 | for (probe = 0; probe < nprobes; ++probe) { | ||
296 | int cc, reset_timer; | ||
297 | struct timeval t1, t2; | ||
298 | struct timezone tz; | ||
299 | struct ip *ip; | ||
300 | |||
301 | (void) gettimeofday(&t1, &tz); | ||
302 | send_probe(++seq, ttl); | ||
303 | reset_timer = 1; | ||
304 | while ((cc = wait_for_reply(s, &from, reset_timer)) != 0) { | ||
305 | (void) gettimeofday(&t2, &tz); | ||
306 | if ((i = packet_ok(packet, cc, &from, seq))) { | ||
307 | reset_timer = 1; | ||
308 | if (from.sin_addr.s_addr != lastaddr) { | ||
309 | print(packet, cc, &from); | ||
310 | lastaddr = from.sin_addr.s_addr; | ||
311 | } | ||
312 | printf(" %g ms", deltaT(&t1, &t2)); | ||
313 | switch(i - 1) { | ||
314 | case ICMP_UNREACH_PORT: | ||
315 | #ifndef ARCHAIC | ||
316 | ip = (struct ip *)packet; | ||
317 | if (ip->ip_ttl <= 1) | ||
318 | printf(" !"); | ||
319 | #endif ARCHAIC | ||
320 | ++got_there; | ||
321 | break; | ||
322 | case ICMP_UNREACH_NET: | ||
323 | ++unreachable; | ||
324 | printf(" !N"); | ||
325 | break; | ||
326 | case ICMP_UNREACH_HOST: | ||
327 | ++unreachable; | ||
328 | printf(" !H"); | ||
329 | break; | ||
330 | case ICMP_UNREACH_PROTOCOL: | ||
331 | ++got_there; | ||
332 | printf(" !P"); | ||
333 | break; | ||
334 | case ICMP_UNREACH_NEEDFRAG: | ||
335 | ++unreachable; | ||
336 | printf(" !F"); | ||
337 | break; | ||
338 | case ICMP_UNREACH_SRCFAIL: | ||
339 | ++unreachable; | ||
340 | printf(" !S"); | ||
341 | break; | ||
342 | } | ||
343 | break; | ||
344 | } else | ||
345 | reset_timer = 0; | ||
346 | } | ||
347 | if (cc == 0) | ||
348 | printf(" *"); | ||
349 | (void) fflush(stdout); | ||
350 | } | ||
351 | putchar('\n'); | ||
352 | if (got_there || unreachable >= nprobes-1) | ||
353 | exit(0); | ||
354 | } | ||
355 | |||
356 | return 0; | ||
357 | } | ||
358 | |||
359 | static int | ||
360 | wait_for_reply(sock, from, reset_timer) | ||
361 | int sock; | ||
362 | struct sockaddr_in *from; | ||
363 | int reset_timer; | ||
364 | { | ||
365 | fd_set fds; | ||
366 | static struct timeval wait; | ||
367 | int cc = 0; | ||
368 | int fromlen = sizeof (*from); | ||
369 | |||
370 | FD_ZERO(&fds); | ||
371 | FD_SET(sock, &fds); | ||
372 | if (reset_timer) { | ||
373 | /* | ||
374 | * traceroute could hang if someone else has a ping | ||
375 | * running and our ICMP reply gets dropped but we don't | ||
376 | * realize it because we keep waking up to handle those | ||
377 | * other ICMP packets that keep coming in. To fix this, | ||
378 | * "reset_timer" will only be true if the last packet that | ||
379 | * came in was for us or if this is the first time we're | ||
380 | * waiting for a reply since sending out a probe. Note | ||
381 | * that this takes advantage of the select() feature on | ||
382 | * Linux where the remaining timeout is written to the | ||
383 | * struct timeval area. | ||
384 | */ | ||
385 | wait.tv_sec = waittime; | ||
386 | wait.tv_usec = 0; | ||
387 | } | ||
388 | |||
389 | if (select(sock+1, &fds, (fd_set *)0, (fd_set *)0, &wait) > 0) | ||
390 | cc=recvfrom(s, (char *)packet, sizeof(packet), 0, | ||
391 | (struct sockaddr *)from, &fromlen); | ||
392 | |||
393 | return(cc); | ||
394 | } | ||
395 | |||
396 | |||
397 | static void | ||
398 | send_probe(seq, ttl) | ||
399 | int seq, ttl; | ||
400 | { | ||
401 | struct opacket *op = outpacket; | ||
402 | struct ip *ip = &op->ip; | ||
403 | struct udphdr *up = &op->udp; | ||
404 | int i; | ||
405 | struct timezone tz; | ||
406 | |||
407 | ip->ip_off = 0; | ||
408 | ip->ip_hl = sizeof(*ip) >> 2; | ||
409 | ip->ip_p = IPPROTO_UDP; | ||
410 | ip->ip_len = datalen; | ||
411 | ip->ip_ttl = ttl; | ||
412 | ip->ip_v = IPVERSION; | ||
413 | ip->ip_id = htons(ident+seq); | ||
414 | |||
415 | up->source = htons(ident); | ||
416 | up->dest = htons(port+seq); | ||
417 | up->len = htons((u_short)(datalen - sizeof(struct ip))); | ||
418 | up->check = 0; | ||
419 | |||
420 | op->seq = seq; | ||
421 | op->ttl = ttl; | ||
422 | (void) gettimeofday(&op->tv, &tz); | ||
423 | |||
424 | i = sendto(sndsock, (char *)outpacket, datalen, 0, &whereto, | ||
425 | sizeof(struct sockaddr)); | ||
426 | if (i < 0 || i != datalen) { | ||
427 | if (i<0) | ||
428 | perror("sendto"); | ||
429 | printf("traceroute: wrote %s %d chars, ret=%d\n", hostname, | ||
430 | datalen, i); | ||
431 | (void) fflush(stdout); | ||
432 | } | ||
433 | } | ||
434 | |||
435 | |||
436 | static double | ||
437 | deltaT(t1p, t2p) | ||
438 | struct timeval *t1p, *t2p; | ||
439 | { | ||
440 | register double dt; | ||
441 | |||
442 | dt = (double)(t2p->tv_sec - t1p->tv_sec) * 1000.0 + | ||
443 | (double)(t2p->tv_usec - t1p->tv_usec) / 1000.0; | ||
444 | return (dt); | ||
445 | } | ||
446 | |||
447 | |||
448 | /* | ||
449 | * Convert an ICMP "type" field to a printable string. | ||
450 | */ | ||
451 | static const char * | ||
452 | pr_type(t) | ||
453 | u_char t; | ||
454 | { | ||
455 | static const char * const ttab[] = { | ||
456 | "Echo Reply", "ICMP 1", "ICMP 2", "Dest Unreachable", | ||
457 | "Source Quench", "Redirect", "ICMP 6", "ICMP 7", | ||
458 | "Echo", "ICMP 9", "ICMP 10", "Time Exceeded", | ||
459 | "Param Problem", "Timestamp", "Timestamp Reply", "Info Request", | ||
460 | "Info Reply" | ||
461 | }; | ||
462 | |||
463 | if(t > 16) | ||
464 | return("OUT-OF-RANGE"); | ||
465 | |||
466 | return(ttab[t]); | ||
467 | } | ||
468 | |||
469 | |||
470 | static int | ||
471 | packet_ok(buf, cc, from, seq) | ||
472 | u_char *buf; | ||
473 | int cc; | ||
474 | struct sockaddr_in *from; | ||
475 | int seq; | ||
476 | { | ||
477 | register struct icmp *icp; | ||
478 | u_char type, code; | ||
479 | int hlen; | ||
480 | #ifndef ARCHAIC | ||
481 | struct ip *ip; | ||
482 | |||
483 | ip = (struct ip *) buf; | ||
484 | hlen = ip->ip_hl << 2; | ||
485 | if (cc < hlen + ICMP_MINLEN) { | ||
486 | if (verbose) | ||
487 | printf("packet too short (%d bytes) from %s\n", cc, | ||
488 | inet_ntoa(from->sin_addr)); | ||
489 | return (0); | ||
490 | } | ||
491 | cc -= hlen; | ||
492 | icp = (struct icmp *)(buf + hlen); | ||
493 | #else | ||
494 | icp = (struct icmp *)buf; | ||
495 | #endif ARCHAIC | ||
496 | type = icp->icmp_type; code = icp->icmp_code; | ||
497 | if ((type == ICMP_TIMXCEED && code == ICMP_TIMXCEED_INTRANS) || | ||
498 | type == ICMP_UNREACH) { | ||
499 | struct ip *hip; | ||
500 | struct udphdr *up; | ||
501 | |||
502 | hip = &icp->icmp_ip; | ||
503 | hlen = hip->ip_hl << 2; | ||
504 | up = (struct udphdr *)((u_char *)hip + hlen); | ||
505 | if (hlen + 12 <= cc && hip->ip_p == IPPROTO_UDP && | ||
506 | up->source == htons(ident) && | ||
507 | up->dest == htons(port+seq)) | ||
508 | return (type == ICMP_TIMXCEED? -1 : code+1); | ||
509 | } | ||
510 | #ifndef ARCHAIC | ||
511 | if (verbose) { | ||
512 | int i; | ||
513 | u_long *lp = (u_long *)&icp->icmp_ip; | ||
514 | |||
515 | printf("\n%d bytes from %s to %s", cc, | ||
516 | inet_ntoa(from->sin_addr), inet_ntoa(ip->ip_dst)); | ||
517 | printf(": icmp type %d (%s) code %d\n", type, pr_type(type), | ||
518 | icp->icmp_code); | ||
519 | for (i = 4; i < cc ; i += sizeof(long)) | ||
520 | printf("%2d: x%8.8lx\n", i, *lp++); | ||
521 | } | ||
522 | #endif ARCHAIC | ||
523 | return(0); | ||
524 | } | ||
525 | |||
526 | |||
527 | static void | ||
528 | print(buf, cc, from) | ||
529 | u_char *buf; | ||
530 | int cc; | ||
531 | struct sockaddr_in *from; | ||
532 | { | ||
533 | struct ip *ip; | ||
534 | int hlen; | ||
535 | |||
536 | ip = (struct ip *) buf; | ||
537 | hlen = ip->ip_hl << 2; | ||
538 | cc -= hlen; | ||
539 | |||
540 | if (nflag) | ||
541 | printf(" %s", inet_ntoa(from->sin_addr)); | ||
542 | else | ||
543 | printf(" %s (%s)", inetname(from->sin_addr), | ||
544 | inet_ntoa(from->sin_addr)); | ||
545 | |||
546 | if (verbose) | ||
547 | printf (" %d bytes to %s", cc, inet_ntoa (ip->ip_dst)); | ||
548 | } | ||
549 | |||
550 | |||
551 | /* | ||
552 | * Construct an Internet address representation. | ||
553 | * If the nflag has been supplied, give | ||
554 | * numeric value, otherwise try for symbolic name. | ||
555 | */ | ||
556 | static char * | ||
557 | inetname(in) | ||
558 | struct in_addr in; | ||
559 | { | ||
560 | register char *cp; | ||
561 | static char line[50]; | ||
562 | struct hostent *hp; | ||
563 | static char domain[MAXHOSTNAMELEN + 1]; | ||
564 | static int first = 1; | ||
565 | |||
566 | if (first && !nflag) { | ||
567 | first = 0; | ||
568 | if (gethostname(domain, MAXHOSTNAMELEN) == 0 && | ||
569 | (cp = index(domain, '.'))) | ||
570 | (void) strcpy(domain, cp + 1); | ||
571 | else | ||
572 | domain[0] = 0; | ||
573 | } | ||
574 | cp = 0; | ||
575 | if (!nflag && in.s_addr != INADDR_ANY) { | ||
576 | hp = gethostbyaddr((char *)&in, sizeof (in), AF_INET); | ||
577 | if (hp) { | ||
578 | if ((cp = index(hp->h_name, '.')) && | ||
579 | !strcmp(cp + 1, domain)) | ||
580 | *cp = 0; | ||
581 | cp = (char *)hp->h_name; | ||
582 | } | ||
583 | } | ||
584 | if (cp) | ||
585 | (void) strcpy(line, cp); | ||
586 | else { | ||
587 | in.s_addr = ntohl(in.s_addr); | ||
588 | #define C(x) ((x) & 0xff) | ||
589 | sprintf(line, "%u.%u.%u.%u", C(in.s_addr >> 24), | ||
590 | C(in.s_addr >> 16), C(in.s_addr >> 8), C(in.s_addr)); | ||
591 | } | ||
592 | return (line); | ||
593 | } | ||
diff --git a/traceroute.c b/traceroute.c new file mode 100644 index 000000000..a02be8a9e --- /dev/null +++ b/traceroute.c | |||
@@ -0,0 +1,593 @@ | |||
1 | /*- | ||
2 | * Copyright (c) 1990, 1993 | ||
3 | * The Regents of the University of California. All rights reserved. | ||
4 | * | ||
5 | * This code is derived from software contributed to Berkeley by | ||
6 | * Van Jacobson. | ||
7 | * | ||
8 | * Redistribution and use in source and binary forms, with or without | ||
9 | * modification, are permitted provided that the following conditions | ||
10 | * are met: | ||
11 | * 1. Redistributions of source code must retain the above copyright | ||
12 | * notice, this list of conditions and the following disclaimer. | ||
13 | * 2. Redistributions in binary form must reproduce the above copyright | ||
14 | * notice, this list of conditions and the following disclaimer in the | ||
15 | * documentation and/or other materials provided with the distribution. | ||
16 | * 3. All advertising materials mentioning features or use of this software | ||
17 | * must display the following acknowledgement: | ||
18 | * This product includes software developed by the University of | ||
19 | * California, Berkeley and its contributors. | ||
20 | * 4. Neither the name of the University nor the names of its contributors | ||
21 | * may be used to endorse or promote products derived from this software | ||
22 | * without specific prior written permission. | ||
23 | * | ||
24 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND | ||
25 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
26 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
27 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | ||
28 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
29 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
30 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
31 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
32 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
33 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
34 | * SUCH DAMAGE. | ||
35 | */ | ||
36 | |||
37 | /* | ||
38 | * traceroute host - trace the route ip packets follow going to "host". | ||
39 | * Notes | ||
40 | * ----- | ||
41 | * This program must be run by root or be setuid. (I suggest that | ||
42 | * you *don't* make it setuid -- casual use could result in a lot | ||
43 | * of unnecessary traffic on our poor, congested nets.) | ||
44 | * | ||
45 | * I stole the idea for this program from Steve Deering. Since | ||
46 | * the first release, I've learned that had I attended the right | ||
47 | * IETF working group meetings, I also could have stolen it from Guy | ||
48 | * Almes or Matt Mathis. I don't know (or care) who came up with | ||
49 | * the idea first. I envy the originators' perspicacity and I'm | ||
50 | * glad they didn't keep the idea a secret. | ||
51 | * | ||
52 | * Tim Seaver, Ken Adelman and C. Philip Wood provided bug fixes and/or | ||
53 | * enhancements to the original distribution. | ||
54 | * | ||
55 | * I've hacked up a round-trip-route version of this that works by | ||
56 | * sending a loose-source-routed udp datagram through the destination | ||
57 | * back to yourself. Unfortunately, SO many gateways botch source | ||
58 | * routing, the thing is almost worthless. Maybe one day... | ||
59 | * | ||
60 | * -- Van Jacobson (van@helios.ee.lbl.gov) | ||
61 | * Tue Dec 20 03:50:13 PST 1988 | ||
62 | */ | ||
63 | |||
64 | #include <stdio.h> | ||
65 | #include <errno.h> | ||
66 | #include <stdlib.h> | ||
67 | #include <string.h> | ||
68 | #include <unistd.h> | ||
69 | #include <sys/time.h> | ||
70 | #include <netdb.h> | ||
71 | #include <endian.h> | ||
72 | #include <arpa/inet.h> | ||
73 | #include <netinet/udp.h> | ||
74 | #include <netinet/ip.h> | ||
75 | #include <netinet/ip_icmp.h> | ||
76 | |||
77 | |||
78 | #define MAXPACKET 65535 /* max ip packet size */ | ||
79 | #ifndef MAXHOSTNAMELEN | ||
80 | #define MAXHOSTNAMELEN 64 | ||
81 | #endif | ||
82 | |||
83 | /* | ||
84 | * format of a (udp) probe packet. | ||
85 | */ | ||
86 | struct opacket { | ||
87 | struct ip ip; | ||
88 | struct udphdr udp; | ||
89 | u_char seq; /* sequence number of this packet */ | ||
90 | u_char ttl; /* ttl packet left with */ | ||
91 | struct timeval tv; /* time packet left */ | ||
92 | }; | ||
93 | |||
94 | /* | ||
95 | * Definitions for internet protocol version 4. | ||
96 | * Per RFC 791, September 1981. | ||
97 | */ | ||
98 | #define IPVERSION 4 | ||
99 | |||
100 | |||
101 | #include "busybox.h" | ||
102 | |||
103 | static int wait_for_reply (int, struct sockaddr_in *, int); | ||
104 | static void send_probe (int, int); | ||
105 | static double deltaT (struct timeval *, struct timeval *); | ||
106 | static int packet_ok (u_char *, int, struct sockaddr_in *, int); | ||
107 | static void print (u_char *, int, struct sockaddr_in *); | ||
108 | static char *inetname (struct in_addr); | ||
109 | |||
110 | static u_char packet[512]; /* last inbound (icmp) packet */ | ||
111 | static struct opacket *outpacket; /* last output (udp) packet */ | ||
112 | |||
113 | static int s; /* receive (icmp) socket file descriptor */ | ||
114 | static int sndsock; /* send (udp) socket file descriptor */ | ||
115 | |||
116 | static struct sockaddr whereto; /* Who to try to reach */ | ||
117 | static int datalen; /* How much data */ | ||
118 | |||
119 | static char *hostname; | ||
120 | |||
121 | static int max_ttl = 30; | ||
122 | static u_short ident; | ||
123 | static u_short port = 32768+666; /* start udp dest port # for probe packets */ | ||
124 | |||
125 | static int verbose; | ||
126 | static int waittime = 5; /* time to wait for response (in seconds) */ | ||
127 | static int nflag; /* print addresses numerically */ | ||
128 | |||
129 | int | ||
130 | #ifndef BB_TRACEROUTE | ||
131 | main(argc, argv) | ||
132 | #else | ||
133 | traceroute_main(argc, argv) | ||
134 | #endif | ||
135 | int argc; | ||
136 | char *argv[]; | ||
137 | { | ||
138 | extern char *optarg; | ||
139 | extern int optind; | ||
140 | struct hostent *hp; | ||
141 | struct protoent *pe; | ||
142 | struct sockaddr_in from, *to; | ||
143 | int ch, i, on, probe, seq, tos, ttl; | ||
144 | |||
145 | int options = 0; /* socket options */ | ||
146 | char *source = 0; | ||
147 | int nprobes = 3; | ||
148 | |||
149 | on = 1; | ||
150 | seq = tos = 0; | ||
151 | to = (struct sockaddr_in *)&whereto; | ||
152 | while ((ch = getopt(argc, argv, "dm:np:q:rs:t:w:v")) != EOF) | ||
153 | switch(ch) { | ||
154 | case 'd': | ||
155 | options |= SO_DEBUG; | ||
156 | break; | ||
157 | case 'm': | ||
158 | max_ttl = atoi(optarg); | ||
159 | if (max_ttl <= 1) | ||
160 | error_msg_and_die("max ttl must be >1."); | ||
161 | break; | ||
162 | case 'n': | ||
163 | nflag++; | ||
164 | break; | ||
165 | case 'p': | ||
166 | port = atoi(optarg); | ||
167 | if (port < 1) | ||
168 | error_msg_and_die("port must be >0."); | ||
169 | break; | ||
170 | case 'q': | ||
171 | nprobes = atoi(optarg); | ||
172 | if (nprobes < 1) | ||
173 | error_msg_and_die("nprobes must be >0."); | ||
174 | break; | ||
175 | case 'r': | ||
176 | options |= SO_DONTROUTE; | ||
177 | break; | ||
178 | case 's': | ||
179 | /* | ||
180 | * set the ip source address of the outbound | ||
181 | * probe (e.g., on a multi-homed host). | ||
182 | */ | ||
183 | source = optarg; | ||
184 | break; | ||
185 | case 't': | ||
186 | tos = atoi(optarg); | ||
187 | if (tos < 0 || tos > 255) | ||
188 | error_msg_and_die("tos must be 0 to 255."); | ||
189 | break; | ||
190 | case 'v': | ||
191 | verbose++; | ||
192 | break; | ||
193 | case 'w': | ||
194 | waittime = atoi(optarg); | ||
195 | if (waittime <= 1) | ||
196 | error_msg_and_die("wait must be >1 sec."); | ||
197 | break; | ||
198 | default: | ||
199 | show_usage(); | ||
200 | } | ||
201 | argc -= optind; | ||
202 | argv += optind; | ||
203 | |||
204 | if (argc < 1) | ||
205 | show_usage(); | ||
206 | |||
207 | setlinebuf (stdout); | ||
208 | |||
209 | (void) bzero((char *)&whereto, sizeof(struct sockaddr)); | ||
210 | to->sin_family = AF_INET; | ||
211 | to->sin_addr.s_addr = inet_addr(*argv); | ||
212 | if (to->sin_addr.s_addr != -1) | ||
213 | hostname = *argv; | ||
214 | else { | ||
215 | hp = gethostbyname(*argv); | ||
216 | if (hp) { | ||
217 | to->sin_family = hp->h_addrtype; | ||
218 | bcopy(hp->h_addr, (caddr_t)&to->sin_addr, hp->h_length); | ||
219 | hostname = (char *)hp->h_name; | ||
220 | } else { | ||
221 | error_msg_and_die("unknown host %s", *argv); | ||
222 | } | ||
223 | } | ||
224 | if (*++argv) | ||
225 | datalen = atoi(*argv); | ||
226 | if (datalen < 0 || datalen >= MAXPACKET - sizeof(struct opacket)) | ||
227 | error_msg_and_die("packet size must be 0 <= s < %d.", | ||
228 | MAXPACKET - sizeof(struct opacket)); | ||
229 | datalen += sizeof(struct opacket); | ||
230 | outpacket = (struct opacket *)xmalloc((unsigned)datalen); | ||
231 | (void) bzero((char *)outpacket, datalen); | ||
232 | outpacket->ip.ip_dst = to->sin_addr; | ||
233 | outpacket->ip.ip_tos = tos; | ||
234 | outpacket->ip.ip_v = IPVERSION; | ||
235 | outpacket->ip.ip_id = 0; | ||
236 | |||
237 | ident = (getpid() & 0xffff) | 0x8000; | ||
238 | |||
239 | if ((pe = getprotobyname("icmp")) == NULL) | ||
240 | error_msg_and_die("icmp: unknown protocol"); | ||
241 | if ((s = socket(AF_INET, SOCK_RAW, pe->p_proto)) < 0) | ||
242 | perror_msg_and_die("icmp socket"); | ||
243 | if (options & SO_DEBUG) | ||
244 | (void) setsockopt(s, SOL_SOCKET, SO_DEBUG, | ||
245 | (char *)&on, sizeof(on)); | ||
246 | if (options & SO_DONTROUTE) | ||
247 | (void) setsockopt(s, SOL_SOCKET, SO_DONTROUTE, | ||
248 | (char *)&on, sizeof(on)); | ||
249 | |||
250 | if ((sndsock = socket(AF_INET, SOCK_RAW, IPPROTO_RAW)) < 0) | ||
251 | perror_msg_and_die("raw socket"); | ||
252 | #ifdef SO_SNDBUF | ||
253 | if (setsockopt(sndsock, SOL_SOCKET, SO_SNDBUF, (char *)&datalen, | ||
254 | sizeof(datalen)) < 0) | ||
255 | perror_msg_and_die("SO_SNDBUF"); | ||
256 | #endif SO_SNDBUF | ||
257 | #ifdef IP_HDRINCL | ||
258 | if (setsockopt(sndsock, IPPROTO_IP, IP_HDRINCL, (char *)&on, | ||
259 | sizeof(on)) < 0) | ||
260 | perror_msg_and_die("IP_HDRINCL"); | ||
261 | #endif IP_HDRINCL | ||
262 | if (options & SO_DEBUG) | ||
263 | (void) setsockopt(sndsock, SOL_SOCKET, SO_DEBUG, | ||
264 | (char *)&on, sizeof(on)); | ||
265 | if (options & SO_DONTROUTE) | ||
266 | (void) setsockopt(sndsock, SOL_SOCKET, SO_DONTROUTE, | ||
267 | (char *)&on, sizeof(on)); | ||
268 | |||
269 | if (source) { | ||
270 | (void) bzero((char *)&from, sizeof(struct sockaddr)); | ||
271 | from.sin_family = AF_INET; | ||
272 | from.sin_addr.s_addr = inet_addr(source); | ||
273 | if (from.sin_addr.s_addr == -1) | ||
274 | error_msg_and_die("unknown host %s", source); | ||
275 | outpacket->ip.ip_src = from.sin_addr; | ||
276 | #ifndef IP_HDRINCL | ||
277 | if (bind(sndsock, (struct sockaddr *)&from, sizeof(from)) < 0) | ||
278 | perror_msg_and_die("bind"); | ||
279 | #endif IP_HDRINCL | ||
280 | } | ||
281 | |||
282 | fprintf(stderr, "traceroute to %s (%s)", hostname, | ||
283 | inet_ntoa(to->sin_addr)); | ||
284 | if (source) | ||
285 | fprintf(stderr, " from %s", source); | ||
286 | fprintf(stderr, ", %d hops max, %d byte packets\n", max_ttl, datalen); | ||
287 | (void) fflush(stderr); | ||
288 | |||
289 | for (ttl = 1; ttl <= max_ttl; ++ttl) { | ||
290 | u_long lastaddr = 0; | ||
291 | int got_there = 0; | ||
292 | int unreachable = 0; | ||
293 | |||
294 | printf("%2d ", ttl); | ||
295 | for (probe = 0; probe < nprobes; ++probe) { | ||
296 | int cc, reset_timer; | ||
297 | struct timeval t1, t2; | ||
298 | struct timezone tz; | ||
299 | struct ip *ip; | ||
300 | |||
301 | (void) gettimeofday(&t1, &tz); | ||
302 | send_probe(++seq, ttl); | ||
303 | reset_timer = 1; | ||
304 | while ((cc = wait_for_reply(s, &from, reset_timer)) != 0) { | ||
305 | (void) gettimeofday(&t2, &tz); | ||
306 | if ((i = packet_ok(packet, cc, &from, seq))) { | ||
307 | reset_timer = 1; | ||
308 | if (from.sin_addr.s_addr != lastaddr) { | ||
309 | print(packet, cc, &from); | ||
310 | lastaddr = from.sin_addr.s_addr; | ||
311 | } | ||
312 | printf(" %g ms", deltaT(&t1, &t2)); | ||
313 | switch(i - 1) { | ||
314 | case ICMP_UNREACH_PORT: | ||
315 | #ifndef ARCHAIC | ||
316 | ip = (struct ip *)packet; | ||
317 | if (ip->ip_ttl <= 1) | ||
318 | printf(" !"); | ||
319 | #endif ARCHAIC | ||
320 | ++got_there; | ||
321 | break; | ||
322 | case ICMP_UNREACH_NET: | ||
323 | ++unreachable; | ||
324 | printf(" !N"); | ||
325 | break; | ||
326 | case ICMP_UNREACH_HOST: | ||
327 | ++unreachable; | ||
328 | printf(" !H"); | ||
329 | break; | ||
330 | case ICMP_UNREACH_PROTOCOL: | ||
331 | ++got_there; | ||
332 | printf(" !P"); | ||
333 | break; | ||
334 | case ICMP_UNREACH_NEEDFRAG: | ||
335 | ++unreachable; | ||
336 | printf(" !F"); | ||
337 | break; | ||
338 | case ICMP_UNREACH_SRCFAIL: | ||
339 | ++unreachable; | ||
340 | printf(" !S"); | ||
341 | break; | ||
342 | } | ||
343 | break; | ||
344 | } else | ||
345 | reset_timer = 0; | ||
346 | } | ||
347 | if (cc == 0) | ||
348 | printf(" *"); | ||
349 | (void) fflush(stdout); | ||
350 | } | ||
351 | putchar('\n'); | ||
352 | if (got_there || unreachable >= nprobes-1) | ||
353 | exit(0); | ||
354 | } | ||
355 | |||
356 | return 0; | ||
357 | } | ||
358 | |||
359 | static int | ||
360 | wait_for_reply(sock, from, reset_timer) | ||
361 | int sock; | ||
362 | struct sockaddr_in *from; | ||
363 | int reset_timer; | ||
364 | { | ||
365 | fd_set fds; | ||
366 | static struct timeval wait; | ||
367 | int cc = 0; | ||
368 | int fromlen = sizeof (*from); | ||
369 | |||
370 | FD_ZERO(&fds); | ||
371 | FD_SET(sock, &fds); | ||
372 | if (reset_timer) { | ||
373 | /* | ||
374 | * traceroute could hang if someone else has a ping | ||
375 | * running and our ICMP reply gets dropped but we don't | ||
376 | * realize it because we keep waking up to handle those | ||
377 | * other ICMP packets that keep coming in. To fix this, | ||
378 | * "reset_timer" will only be true if the last packet that | ||
379 | * came in was for us or if this is the first time we're | ||
380 | * waiting for a reply since sending out a probe. Note | ||
381 | * that this takes advantage of the select() feature on | ||
382 | * Linux where the remaining timeout is written to the | ||
383 | * struct timeval area. | ||
384 | */ | ||
385 | wait.tv_sec = waittime; | ||
386 | wait.tv_usec = 0; | ||
387 | } | ||
388 | |||
389 | if (select(sock+1, &fds, (fd_set *)0, (fd_set *)0, &wait) > 0) | ||
390 | cc=recvfrom(s, (char *)packet, sizeof(packet), 0, | ||
391 | (struct sockaddr *)from, &fromlen); | ||
392 | |||
393 | return(cc); | ||
394 | } | ||
395 | |||
396 | |||
397 | static void | ||
398 | send_probe(seq, ttl) | ||
399 | int seq, ttl; | ||
400 | { | ||
401 | struct opacket *op = outpacket; | ||
402 | struct ip *ip = &op->ip; | ||
403 | struct udphdr *up = &op->udp; | ||
404 | int i; | ||
405 | struct timezone tz; | ||
406 | |||
407 | ip->ip_off = 0; | ||
408 | ip->ip_hl = sizeof(*ip) >> 2; | ||
409 | ip->ip_p = IPPROTO_UDP; | ||
410 | ip->ip_len = datalen; | ||
411 | ip->ip_ttl = ttl; | ||
412 | ip->ip_v = IPVERSION; | ||
413 | ip->ip_id = htons(ident+seq); | ||
414 | |||
415 | up->source = htons(ident); | ||
416 | up->dest = htons(port+seq); | ||
417 | up->len = htons((u_short)(datalen - sizeof(struct ip))); | ||
418 | up->check = 0; | ||
419 | |||
420 | op->seq = seq; | ||
421 | op->ttl = ttl; | ||
422 | (void) gettimeofday(&op->tv, &tz); | ||
423 | |||
424 | i = sendto(sndsock, (char *)outpacket, datalen, 0, &whereto, | ||
425 | sizeof(struct sockaddr)); | ||
426 | if (i < 0 || i != datalen) { | ||
427 | if (i<0) | ||
428 | perror("sendto"); | ||
429 | printf("traceroute: wrote %s %d chars, ret=%d\n", hostname, | ||
430 | datalen, i); | ||
431 | (void) fflush(stdout); | ||
432 | } | ||
433 | } | ||
434 | |||
435 | |||
436 | static double | ||
437 | deltaT(t1p, t2p) | ||
438 | struct timeval *t1p, *t2p; | ||
439 | { | ||
440 | register double dt; | ||
441 | |||
442 | dt = (double)(t2p->tv_sec - t1p->tv_sec) * 1000.0 + | ||
443 | (double)(t2p->tv_usec - t1p->tv_usec) / 1000.0; | ||
444 | return (dt); | ||
445 | } | ||
446 | |||
447 | |||
448 | /* | ||
449 | * Convert an ICMP "type" field to a printable string. | ||
450 | */ | ||
451 | static const char * | ||
452 | pr_type(t) | ||
453 | u_char t; | ||
454 | { | ||
455 | static const char * const ttab[] = { | ||
456 | "Echo Reply", "ICMP 1", "ICMP 2", "Dest Unreachable", | ||
457 | "Source Quench", "Redirect", "ICMP 6", "ICMP 7", | ||
458 | "Echo", "ICMP 9", "ICMP 10", "Time Exceeded", | ||
459 | "Param Problem", "Timestamp", "Timestamp Reply", "Info Request", | ||
460 | "Info Reply" | ||
461 | }; | ||
462 | |||
463 | if(t > 16) | ||
464 | return("OUT-OF-RANGE"); | ||
465 | |||
466 | return(ttab[t]); | ||
467 | } | ||
468 | |||
469 | |||
470 | static int | ||
471 | packet_ok(buf, cc, from, seq) | ||
472 | u_char *buf; | ||
473 | int cc; | ||
474 | struct sockaddr_in *from; | ||
475 | int seq; | ||
476 | { | ||
477 | register struct icmp *icp; | ||
478 | u_char type, code; | ||
479 | int hlen; | ||
480 | #ifndef ARCHAIC | ||
481 | struct ip *ip; | ||
482 | |||
483 | ip = (struct ip *) buf; | ||
484 | hlen = ip->ip_hl << 2; | ||
485 | if (cc < hlen + ICMP_MINLEN) { | ||
486 | if (verbose) | ||
487 | printf("packet too short (%d bytes) from %s\n", cc, | ||
488 | inet_ntoa(from->sin_addr)); | ||
489 | return (0); | ||
490 | } | ||
491 | cc -= hlen; | ||
492 | icp = (struct icmp *)(buf + hlen); | ||
493 | #else | ||
494 | icp = (struct icmp *)buf; | ||
495 | #endif ARCHAIC | ||
496 | type = icp->icmp_type; code = icp->icmp_code; | ||
497 | if ((type == ICMP_TIMXCEED && code == ICMP_TIMXCEED_INTRANS) || | ||
498 | type == ICMP_UNREACH) { | ||
499 | struct ip *hip; | ||
500 | struct udphdr *up; | ||
501 | |||
502 | hip = &icp->icmp_ip; | ||
503 | hlen = hip->ip_hl << 2; | ||
504 | up = (struct udphdr *)((u_char *)hip + hlen); | ||
505 | if (hlen + 12 <= cc && hip->ip_p == IPPROTO_UDP && | ||
506 | up->source == htons(ident) && | ||
507 | up->dest == htons(port+seq)) | ||
508 | return (type == ICMP_TIMXCEED? -1 : code+1); | ||
509 | } | ||
510 | #ifndef ARCHAIC | ||
511 | if (verbose) { | ||
512 | int i; | ||
513 | u_long *lp = (u_long *)&icp->icmp_ip; | ||
514 | |||
515 | printf("\n%d bytes from %s to %s", cc, | ||
516 | inet_ntoa(from->sin_addr), inet_ntoa(ip->ip_dst)); | ||
517 | printf(": icmp type %d (%s) code %d\n", type, pr_type(type), | ||
518 | icp->icmp_code); | ||
519 | for (i = 4; i < cc ; i += sizeof(long)) | ||
520 | printf("%2d: x%8.8lx\n", i, *lp++); | ||
521 | } | ||
522 | #endif ARCHAIC | ||
523 | return(0); | ||
524 | } | ||
525 | |||
526 | |||
527 | static void | ||
528 | print(buf, cc, from) | ||
529 | u_char *buf; | ||
530 | int cc; | ||
531 | struct sockaddr_in *from; | ||
532 | { | ||
533 | struct ip *ip; | ||
534 | int hlen; | ||
535 | |||
536 | ip = (struct ip *) buf; | ||
537 | hlen = ip->ip_hl << 2; | ||
538 | cc -= hlen; | ||
539 | |||
540 | if (nflag) | ||
541 | printf(" %s", inet_ntoa(from->sin_addr)); | ||
542 | else | ||
543 | printf(" %s (%s)", inetname(from->sin_addr), | ||
544 | inet_ntoa(from->sin_addr)); | ||
545 | |||
546 | if (verbose) | ||
547 | printf (" %d bytes to %s", cc, inet_ntoa (ip->ip_dst)); | ||
548 | } | ||
549 | |||
550 | |||
551 | /* | ||
552 | * Construct an Internet address representation. | ||
553 | * If the nflag has been supplied, give | ||
554 | * numeric value, otherwise try for symbolic name. | ||
555 | */ | ||
556 | static char * | ||
557 | inetname(in) | ||
558 | struct in_addr in; | ||
559 | { | ||
560 | register char *cp; | ||
561 | static char line[50]; | ||
562 | struct hostent *hp; | ||
563 | static char domain[MAXHOSTNAMELEN + 1]; | ||
564 | static int first = 1; | ||
565 | |||
566 | if (first && !nflag) { | ||
567 | first = 0; | ||
568 | if (gethostname(domain, MAXHOSTNAMELEN) == 0 && | ||
569 | (cp = index(domain, '.'))) | ||
570 | (void) strcpy(domain, cp + 1); | ||
571 | else | ||
572 | domain[0] = 0; | ||
573 | } | ||
574 | cp = 0; | ||
575 | if (!nflag && in.s_addr != INADDR_ANY) { | ||
576 | hp = gethostbyaddr((char *)&in, sizeof (in), AF_INET); | ||
577 | if (hp) { | ||
578 | if ((cp = index(hp->h_name, '.')) && | ||
579 | !strcmp(cp + 1, domain)) | ||
580 | *cp = 0; | ||
581 | cp = (char *)hp->h_name; | ||
582 | } | ||
583 | } | ||
584 | if (cp) | ||
585 | (void) strcpy(line, cp); | ||
586 | else { | ||
587 | in.s_addr = ntohl(in.s_addr); | ||
588 | #define C(x) ((x) & 0xff) | ||
589 | sprintf(line, "%u.%u.%u.%u", C(in.s_addr >> 24), | ||
590 | C(in.s_addr >> 16), C(in.s_addr >> 8), C(in.s_addr)); | ||
591 | } | ||
592 | return (line); | ||
593 | } | ||
@@ -1593,6 +1593,28 @@ | |||
1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ | 1593 | "$ echo "gdkkn vnqkc" | tr [a-y] [b-z]\n" \ |
1594 | "hello world\n" | 1594 | "hello world\n" |
1595 | 1595 | ||
1596 | #define traceroute_trivial_usage \ | ||
1597 | "[-dnrv] [-m max_ttl] [-p port#] [-q nqueries]\n\ | ||
1598 | [-s src_addr] [-t tos] [-w wait] host [data size]" | ||
1599 | #define traceroute_full_usage \ | ||
1600 | "trace the route ip packets follow going to \"host\"\n" \ | ||
1601 | "Options:\n" \ | ||
1602 | "\t-d\tset SO_DEBUG options to socket\n" \ | ||
1603 | "\t-n\tPrint hop addresses numerically rather than symbolically\n" \ | ||
1604 | "\t-r\tBypass the normal routing tables and send directly to a host\n" \ | ||
1605 | "\t-v\tVerbose output\n" \ | ||
1606 | "\t-m max_ttl\tSet the max time-to-live (max number of hops)\n" \ | ||
1607 | "\t-p port#\tSet the base UDP port number used in probes\n" \ | ||
1608 | "\t\t(default is 33434)\n" \ | ||
1609 | "\t-q nqueries\tSet the number of probes per ``ttl'' to nqueries\n" \ | ||
1610 | "\t\t(default is 3)\n" \ | ||
1611 | "\t-s src_addr\tUse the following IP address as the source address\n" \ | ||
1612 | "\t-t tos\tSet the type-of-service in probe packets to the following value\n" \ | ||
1613 | "\t\t(default 0)\n" \ | ||
1614 | "\t-w wait\tSet the time (in seconds) to wait for a response to a probe\n" \ | ||
1615 | "\t\t(default 3 sec.)." | ||
1616 | |||
1617 | |||
1596 | #define true_trivial_usage \ | 1618 | #define true_trivial_usage \ |
1597 | "" | 1619 | "" |
1598 | #define true_full_usage \ | 1620 | #define true_full_usage \ |