traceroute6.c revision 1.11.2.3 1 1.11.2.3 tv /* $NetBSD: traceroute6.c,v 1.11.2.3 2000/10/18 02:03:03 tv Exp $ */
2 1.11.2.3 tv /* $KAME: traceroute6.c,v 1.33 2000/10/07 06:22:55 itojun Exp $ */
3 1.3 itojun
4 1.1 itojun /*
5 1.1 itojun * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
6 1.1 itojun * All rights reserved.
7 1.11 itojun *
8 1.1 itojun * Redistribution and use in source and binary forms, with or without
9 1.1 itojun * modification, are permitted provided that the following conditions
10 1.1 itojun * are met:
11 1.1 itojun * 1. Redistributions of source code must retain the above copyright
12 1.1 itojun * notice, this list of conditions and the following disclaimer.
13 1.1 itojun * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 itojun * notice, this list of conditions and the following disclaimer in the
15 1.1 itojun * documentation and/or other materials provided with the distribution.
16 1.1 itojun * 3. Neither the name of the project nor the names of its contributors
17 1.1 itojun * may be used to endorse or promote products derived from this software
18 1.1 itojun * without specific prior written permission.
19 1.11 itojun *
20 1.1 itojun * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 1.1 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 1.1 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 1.1 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 1.1 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 1.1 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 1.1 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 1.1 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 1.1 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 1.1 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 1.1 itojun * SUCH DAMAGE.
31 1.1 itojun */
32 1.1 itojun
33 1.1 itojun /*-
34 1.1 itojun * Copyright (c) 1990, 1993
35 1.1 itojun * The Regents of the University of California. All rights reserved.
36 1.1 itojun *
37 1.1 itojun * This code is derived from software contributed to Berkeley by
38 1.1 itojun * Van Jacobson.
39 1.1 itojun *
40 1.1 itojun * Redistribution and use in source and binary forms, with or without
41 1.1 itojun * modification, are permitted provided that the following conditions
42 1.1 itojun * are met:
43 1.1 itojun * 1. Redistributions of source code must retain the above copyright
44 1.1 itojun * notice, this list of conditions and the following disclaimer.
45 1.1 itojun * 2. Redistributions in binary form must reproduce the above copyright
46 1.1 itojun * notice, this list of conditions and the following disclaimer in the
47 1.1 itojun * documentation and/or other materials provided with the distribution.
48 1.1 itojun * 3. All advertising materials mentioning features or use of this software
49 1.1 itojun * must display the following acknowledgement:
50 1.1 itojun * This product includes software developed by the University of
51 1.1 itojun * California, Berkeley and its contributors.
52 1.1 itojun * 4. Neither the name of the University nor the names of its contributors
53 1.1 itojun * may be used to endorse or promote products derived from this software
54 1.1 itojun * without specific prior written permission.
55 1.1 itojun *
56 1.1 itojun * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
57 1.1 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
58 1.1 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
59 1.1 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
60 1.1 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
61 1.1 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
62 1.1 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
63 1.1 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
64 1.1 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
65 1.1 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
66 1.1 itojun * SUCH DAMAGE.
67 1.1 itojun */
68 1.1 itojun
69 1.3 itojun #if 0
70 1.1 itojun #ifndef lint
71 1.1 itojun static char copyright[] =
72 1.1 itojun "@(#) Copyright (c) 1990, 1993\n\
73 1.1 itojun The Regents of the University of California. All rights reserved.\n";
74 1.1 itojun #endif /* not lint */
75 1.1 itojun
76 1.1 itojun #ifndef lint
77 1.1 itojun static char sccsid[] = "@(#)traceroute.c 8.1 (Berkeley) 6/6/93";
78 1.3 itojun #endif /* not lint */
79 1.1 itojun #else
80 1.3 itojun #include <sys/cdefs.h>
81 1.3 itojun #ifndef lint
82 1.11.2.3 tv __RCSID("$NetBSD: traceroute6.c,v 1.11.2.3 2000/10/18 02:03:03 tv Exp $");
83 1.3 itojun #endif
84 1.1 itojun #endif
85 1.1 itojun
86 1.1 itojun /*
87 1.1 itojun * traceroute host - trace the route ip packets follow going to "host".
88 1.1 itojun *
89 1.1 itojun * Attempt to trace the route an ip packet would follow to some
90 1.1 itojun * internet host. We find out intermediate hops by launching probe
91 1.1 itojun * packets with a small ttl (time to live) then listening for an
92 1.1 itojun * icmp "time exceeded" reply from a gateway. We start our probes
93 1.1 itojun * with a ttl of one and increase by one until we get an icmp "port
94 1.1 itojun * unreachable" (which means we got to "host") or hit a max (which
95 1.1 itojun * defaults to 30 hops & can be changed with the -m flag). Three
96 1.1 itojun * probes (change with -q flag) are sent at each ttl setting and a
97 1.1 itojun * line is printed showing the ttl, address of the gateway and
98 1.1 itojun * round trip time of each probe. If the probe answers come from
99 1.1 itojun * different gateways, the address of each responding system will
100 1.1 itojun * be printed. If there is no response within a 5 sec. timeout
101 1.1 itojun * interval (changed with the -w flag), a "*" is printed for that
102 1.1 itojun * probe.
103 1.1 itojun *
104 1.1 itojun * Probe packets are UDP format. We don't want the destination
105 1.1 itojun * host to process them so the destination port is set to an
106 1.1 itojun * unlikely value (if some clod on the destination is using that
107 1.1 itojun * value, it can be changed with the -p flag).
108 1.1 itojun *
109 1.1 itojun * A sample use might be:
110 1.1 itojun *
111 1.1 itojun * [yak 71]% traceroute nis.nsf.net.
112 1.1 itojun * traceroute to nis.nsf.net (35.1.1.48), 30 hops max, 56 byte packet
113 1.1 itojun * 1 helios.ee.lbl.gov (128.3.112.1) 19 ms 19 ms 0 ms
114 1.1 itojun * 2 lilac-dmc.Berkeley.EDU (128.32.216.1) 39 ms 39 ms 19 ms
115 1.1 itojun * 3 lilac-dmc.Berkeley.EDU (128.32.216.1) 39 ms 39 ms 19 ms
116 1.1 itojun * 4 ccngw-ner-cc.Berkeley.EDU (128.32.136.23) 39 ms 40 ms 39 ms
117 1.1 itojun * 5 ccn-nerif22.Berkeley.EDU (128.32.168.22) 39 ms 39 ms 39 ms
118 1.1 itojun * 6 128.32.197.4 (128.32.197.4) 40 ms 59 ms 59 ms
119 1.1 itojun * 7 131.119.2.5 (131.119.2.5) 59 ms 59 ms 59 ms
120 1.1 itojun * 8 129.140.70.13 (129.140.70.13) 99 ms 99 ms 80 ms
121 1.1 itojun * 9 129.140.71.6 (129.140.71.6) 139 ms 239 ms 319 ms
122 1.1 itojun * 10 129.140.81.7 (129.140.81.7) 220 ms 199 ms 199 ms
123 1.1 itojun * 11 nic.merit.edu (35.1.1.48) 239 ms 239 ms 239 ms
124 1.1 itojun *
125 1.1 itojun * Note that lines 2 & 3 are the same. This is due to a buggy
126 1.1 itojun * kernel on the 2nd hop system -- lbl-csam.arpa -- that forwards
127 1.1 itojun * packets with a zero ttl.
128 1.1 itojun *
129 1.1 itojun * A more interesting example is:
130 1.1 itojun *
131 1.1 itojun * [yak 72]% traceroute allspice.lcs.mit.edu.
132 1.1 itojun * traceroute to allspice.lcs.mit.edu (18.26.0.115), 30 hops max
133 1.1 itojun * 1 helios.ee.lbl.gov (128.3.112.1) 0 ms 0 ms 0 ms
134 1.1 itojun * 2 lilac-dmc.Berkeley.EDU (128.32.216.1) 19 ms 19 ms 19 ms
135 1.1 itojun * 3 lilac-dmc.Berkeley.EDU (128.32.216.1) 39 ms 19 ms 19 ms
136 1.1 itojun * 4 ccngw-ner-cc.Berkeley.EDU (128.32.136.23) 19 ms 39 ms 39 ms
137 1.1 itojun * 5 ccn-nerif22.Berkeley.EDU (128.32.168.22) 20 ms 39 ms 39 ms
138 1.1 itojun * 6 128.32.197.4 (128.32.197.4) 59 ms 119 ms 39 ms
139 1.1 itojun * 7 131.119.2.5 (131.119.2.5) 59 ms 59 ms 39 ms
140 1.1 itojun * 8 129.140.70.13 (129.140.70.13) 80 ms 79 ms 99 ms
141 1.1 itojun * 9 129.140.71.6 (129.140.71.6) 139 ms 139 ms 159 ms
142 1.1 itojun * 10 129.140.81.7 (129.140.81.7) 199 ms 180 ms 300 ms
143 1.1 itojun * 11 129.140.72.17 (129.140.72.17) 300 ms 239 ms 239 ms
144 1.1 itojun * 12 * * *
145 1.1 itojun * 13 128.121.54.72 (128.121.54.72) 259 ms 499 ms 279 ms
146 1.1 itojun * 14 * * *
147 1.1 itojun * 15 * * *
148 1.1 itojun * 16 * * *
149 1.1 itojun * 17 * * *
150 1.1 itojun * 18 ALLSPICE.LCS.MIT.EDU (18.26.0.115) 339 ms 279 ms 279 ms
151 1.1 itojun *
152 1.1 itojun * (I start to see why I'm having so much trouble with mail to
153 1.1 itojun * MIT.) Note that the gateways 12, 14, 15, 16 & 17 hops away
154 1.1 itojun * either don't send ICMP "time exceeded" messages or send them
155 1.1 itojun * with a ttl too small to reach us. 14 - 17 are running the
156 1.1 itojun * MIT C Gateway code that doesn't send "time exceeded"s. God
157 1.1 itojun * only knows what's going on with 12.
158 1.1 itojun *
159 1.1 itojun * The silent gateway 12 in the above may be the result of a bug in
160 1.1 itojun * the 4.[23]BSD network code (and its derivatives): 4.x (x <= 3)
161 1.1 itojun * sends an unreachable message using whatever ttl remains in the
162 1.1 itojun * original datagram. Since, for gateways, the remaining ttl is
163 1.1 itojun * zero, the icmp "time exceeded" is guaranteed to not make it back
164 1.1 itojun * to us. The behavior of this bug is slightly more interesting
165 1.1 itojun * when it appears on the destination system:
166 1.1 itojun *
167 1.1 itojun * 1 helios.ee.lbl.gov (128.3.112.1) 0 ms 0 ms 0 ms
168 1.1 itojun * 2 lilac-dmc.Berkeley.EDU (128.32.216.1) 39 ms 19 ms 39 ms
169 1.1 itojun * 3 lilac-dmc.Berkeley.EDU (128.32.216.1) 19 ms 39 ms 19 ms
170 1.1 itojun * 4 ccngw-ner-cc.Berkeley.EDU (128.32.136.23) 39 ms 40 ms 19 ms
171 1.1 itojun * 5 ccn-nerif35.Berkeley.EDU (128.32.168.35) 39 ms 39 ms 39 ms
172 1.1 itojun * 6 csgw.Berkeley.EDU (128.32.133.254) 39 ms 59 ms 39 ms
173 1.1 itojun * 7 * * *
174 1.1 itojun * 8 * * *
175 1.1 itojun * 9 * * *
176 1.1 itojun * 10 * * *
177 1.1 itojun * 11 * * *
178 1.1 itojun * 12 * * *
179 1.1 itojun * 13 rip.Berkeley.EDU (128.32.131.22) 59 ms ! 39 ms ! 39 ms !
180 1.1 itojun *
181 1.1 itojun * Notice that there are 12 "gateways" (13 is the final
182 1.1 itojun * destination) and exactly the last half of them are "missing".
183 1.1 itojun * What's really happening is that rip (a Sun-3 running Sun OS3.5)
184 1.1 itojun * is using the ttl from our arriving datagram as the ttl in its
185 1.1 itojun * icmp reply. So, the reply will time out on the return path
186 1.1 itojun * (with no notice sent to anyone since icmp's aren't sent for
187 1.1 itojun * icmp's) until we probe with a ttl that's at least twice the path
188 1.1 itojun * length. I.e., rip is really only 7 hops away. A reply that
189 1.1 itojun * returns with a ttl of 1 is a clue this problem exists.
190 1.1 itojun * Traceroute prints a "!" after the time if the ttl is <= 1.
191 1.1 itojun * Since vendors ship a lot of obsolete (DEC's Ultrix, Sun 3.x) or
192 1.1 itojun * non-standard (HPUX) software, expect to see this problem
193 1.1 itojun * frequently and/or take care picking the target host of your
194 1.1 itojun * probes.
195 1.1 itojun *
196 1.1 itojun * Other possible annotations after the time are !H, !N, !P (got a host,
197 1.1 itojun * network or protocol unreachable, respectively), !S or !F (source
198 1.1 itojun * route failed or fragmentation needed -- neither of these should
199 1.1 itojun * ever occur and the associated gateway is busted if you see one). If
200 1.1 itojun * almost all the probes result in some kind of unreachable, traceroute
201 1.1 itojun * will give up and exit.
202 1.1 itojun *
203 1.1 itojun * Notes
204 1.1 itojun * -----
205 1.1 itojun * This program must be run by root or be setuid. (I suggest that
206 1.1 itojun * you *don't* make it setuid -- casual use could result in a lot
207 1.1 itojun * of unnecessary traffic on our poor, congested nets.)
208 1.1 itojun *
209 1.1 itojun * This program requires a kernel mod that does not appear in any
210 1.1 itojun * system available from Berkeley: A raw ip socket using proto
211 1.1 itojun * IPPROTO_RAW must interpret the data sent as an ip datagram (as
212 1.1 itojun * opposed to data to be wrapped in a ip datagram). See the README
213 1.1 itojun * file that came with the source to this program for a description
214 1.1 itojun * of the mods I made to /sys/netinet/raw_ip.c. Your mileage may
215 1.1 itojun * vary. But, again, ANY 4.x (x < 4) BSD KERNEL WILL HAVE TO BE
216 1.1 itojun * MODIFIED TO RUN THIS PROGRAM.
217 1.1 itojun *
218 1.1 itojun * The udp port usage may appear bizarre (well, ok, it is bizarre).
219 1.1 itojun * The problem is that an icmp message only contains 8 bytes of
220 1.1 itojun * data from the original datagram. 8 bytes is the size of a udp
221 1.1 itojun * header so, if we want to associate replies with the original
222 1.1 itojun * datagram, the necessary information must be encoded into the
223 1.1 itojun * udp header (the ip id could be used but there's no way to
224 1.1 itojun * interlock with the kernel's assignment of ip id's and, anyway,
225 1.1 itojun * it would have taken a lot more kernel hacking to allow this
226 1.1 itojun * code to set the ip id). So, to allow two or more users to
227 1.1 itojun * use traceroute simultaneously, we use this task's pid as the
228 1.1 itojun * source port (the high bit is set to move the port number out
229 1.1 itojun * of the "likely" range). To keep track of which probe is being
230 1.1 itojun * replied to (so times and/or hop counts don't get confused by a
231 1.1 itojun * reply that was delayed in transit), we increment the destination
232 1.1 itojun * port number before each probe.
233 1.1 itojun *
234 1.1 itojun * Don't use this as a coding example. I was trying to find a
235 1.1 itojun * routing problem and this code sort-of popped out after 48 hours
236 1.1 itojun * without sleep. I was amazed it ever compiled, much less ran.
237 1.1 itojun *
238 1.1 itojun * I stole the idea for this program from Steve Deering. Since
239 1.1 itojun * the first release, I've learned that had I attended the right
240 1.1 itojun * IETF working group meetings, I also could have stolen it from Guy
241 1.1 itojun * Almes or Matt Mathis. I don't know (or care) who came up with
242 1.1 itojun * the idea first. I envy the originators' perspicacity and I'm
243 1.1 itojun * glad they didn't keep the idea a secret.
244 1.1 itojun *
245 1.1 itojun * Tim Seaver, Ken Adelman and C. Philip Wood provided bug fixes and/or
246 1.1 itojun * enhancements to the original distribution.
247 1.1 itojun *
248 1.1 itojun * I've hacked up a round-trip-route version of this that works by
249 1.1 itojun * sending a loose-source-routed udp datagram through the destination
250 1.1 itojun * back to yourself. Unfortunately, SO many gateways botch source
251 1.1 itojun * routing, the thing is almost worthless. Maybe one day...
252 1.1 itojun *
253 1.1 itojun * -- Van Jacobson (van (at) helios.ee.lbl.gov)
254 1.1 itojun * Tue Dec 20 03:50:13 PST 1988
255 1.1 itojun */
256 1.1 itojun
257 1.1 itojun #include <sys/param.h>
258 1.1 itojun #include <sys/time.h>
259 1.1 itojun #include <sys/socket.h>
260 1.1 itojun #include <sys/uio.h>
261 1.1 itojun #include <sys/file.h>
262 1.1 itojun #include <sys/ioctl.h>
263 1.1 itojun
264 1.11 itojun #include <netinet/in.h>
265 1.1 itojun
266 1.1 itojun #include <arpa/inet.h>
267 1.1 itojun
268 1.1 itojun #include <netdb.h>
269 1.1 itojun #include <stdio.h>
270 1.1 itojun #include <err.h>
271 1.11.2.3 tv #ifdef HAVE_POLL
272 1.11.2.3 tv #include <poll.h>
273 1.11.2.3 tv #endif
274 1.1 itojun #include <errno.h>
275 1.1 itojun #include <stdlib.h>
276 1.1 itojun #include <string.h>
277 1.1 itojun #include <unistd.h>
278 1.1 itojun
279 1.1 itojun #include <netinet/ip6.h>
280 1.1 itojun #include <netinet/icmp6.h>
281 1.1 itojun #include <netinet/udp.h>
282 1.1 itojun
283 1.1 itojun #ifdef IPSEC
284 1.11 itojun #include <net/route.h>
285 1.1 itojun #include <netinet6/ipsec.h>
286 1.1 itojun #endif
287 1.1 itojun
288 1.1 itojun #define DUMMY_PORT 10010
289 1.1 itojun
290 1.1 itojun #define MAXPACKET 65535 /* max ip packet size */
291 1.1 itojun #ifndef MAXHOSTNAMELEN
292 1.1 itojun #define MAXHOSTNAMELEN 64
293 1.1 itojun #endif
294 1.1 itojun
295 1.1 itojun #ifndef FD_SET
296 1.1 itojun #define NFDBITS (8*sizeof(fd_set))
297 1.1 itojun #define FD_SETSIZE NFDBITS
298 1.1 itojun #define FD_SET(n, p) ((p)->fds_bits[(n)/NFDBITS] |= (1 << ((n) % NFDBITS)))
299 1.1 itojun #define FD_CLR(n, p) ((p)->fds_bits[(n)/NFDBITS] &= ~(1 << ((n) % NFDBITS)))
300 1.1 itojun #define FD_ISSET(n, p) ((p)->fds_bits[(n)/NFDBITS] & (1 << ((n) % NFDBITS)))
301 1.1 itojun #define FD_ZERO(p) bzero((char *)(p), sizeof(*(p)))
302 1.1 itojun #endif
303 1.1 itojun
304 1.1 itojun #define Fprintf (void)fprintf
305 1.1 itojun #define Sprintf (void)sprintf
306 1.1 itojun #define Printf (void)printf
307 1.1 itojun
308 1.11 itojun #ifndef HAVE_GETIPNODEBYNAME
309 1.11 itojun #define getipnodebyname(x, y, z, u) gethostbyname2((x), (y))
310 1.11 itojun #define freehostent(x)
311 1.11 itojun #endif
312 1.11 itojun
313 1.1 itojun /*
314 1.1 itojun * format of a (udp) probe packet.
315 1.1 itojun */
316 1.1 itojun struct opacket {
317 1.1 itojun u_char seq; /* sequence number of this packet */
318 1.1 itojun u_char hops; /* hop limit of the packet */
319 1.1 itojun struct timeval tv; /* time packet left */
320 1.1 itojun };
321 1.1 itojun
322 1.1 itojun u_char packet[512]; /* last inbound (icmp) packet */
323 1.1 itojun struct opacket *outpacket; /* last output (udp) packet */
324 1.1 itojun
325 1.1 itojun int main __P((int, char *[]));
326 1.1 itojun int wait_for_reply __P((int, struct msghdr *));
327 1.6 itojun #ifdef IPSEC
328 1.6 itojun #ifdef IPSEC_POLICY_IPSEC
329 1.6 itojun int setpolicy __P((int so, char *policy));
330 1.6 itojun #endif
331 1.6 itojun #endif
332 1.1 itojun void send_probe __P((int, int));
333 1.1 itojun struct udphdr *get_udphdr __P((struct ip6_hdr *, u_char *));
334 1.1 itojun int get_hoplim __P((struct msghdr *));
335 1.1 itojun double deltaT __P((struct timeval *, struct timeval *));
336 1.1 itojun char *pr_type __P((int));
337 1.1 itojun int packet_ok __P((struct msghdr *, int, int));
338 1.1 itojun void print __P((struct msghdr *, int));
339 1.1 itojun void tvsub __P((struct timeval *, struct timeval *));
340 1.7 itojun const char *inetname __P((struct sockaddr *));
341 1.1 itojun void usage __P((void));
342 1.1 itojun
343 1.1 itojun int rcvsock; /* receive (icmp) socket file descriptor */
344 1.1 itojun int sndsock; /* send (udp) socket file descriptor */
345 1.1 itojun struct timezone tz; /* leftover */
346 1.1 itojun
347 1.1 itojun struct msghdr rcvmhdr;
348 1.1 itojun struct iovec rcviov[2];
349 1.1 itojun int rcvhlim;
350 1.1 itojun struct in6_pktinfo *rcvpktinfo;
351 1.1 itojun
352 1.1 itojun struct sockaddr_in6 Src, Dst, Rcv;
353 1.1 itojun int datalen; /* How much data */
354 1.7 itojun /* XXX: 2064 = 127(max hops in type 0 rthdr) * sizeof(ip6_hdr) + 16(margin) */
355 1.7 itojun char rtbuf[2064];
356 1.7 itojun #ifdef USE_RFC2292BIS
357 1.7 itojun struct ip6_rthdr *rth;
358 1.11 itojun #endif
359 1.1 itojun struct cmsghdr *cmsg;
360 1.1 itojun
361 1.1 itojun char *source = 0;
362 1.1 itojun char *hostname;
363 1.1 itojun
364 1.1 itojun int nprobes = 3;
365 1.11 itojun int first_hop = 1;
366 1.1 itojun int max_hops = 30;
367 1.1 itojun u_short ident;
368 1.1 itojun u_short port = 32768+666; /* start udp dest port # for probe packets */
369 1.1 itojun int options; /* socket options */
370 1.1 itojun int verbose;
371 1.1 itojun int waittime = 5; /* time to wait for response (in seconds) */
372 1.1 itojun int nflag; /* print addresses numerically */
373 1.1 itojun int lflag; /* print both numerical address & hostname */
374 1.1 itojun
375 1.7 itojun #ifdef KAME_SCOPEID
376 1.7 itojun const int niflag = NI_WITHSCOPEID;
377 1.7 itojun #else
378 1.7 itojun const int niflag = 0;
379 1.7 itojun #endif
380 1.1 itojun
381 1.1 itojun int
382 1.1 itojun main(argc, argv)
383 1.1 itojun int argc;
384 1.1 itojun char *argv[];
385 1.1 itojun {
386 1.7 itojun struct hostent *hp;
387 1.7 itojun int error;
388 1.7 itojun struct addrinfo hints, *res;
389 1.8 itojun int ch, i, on, probe, seq, hops, rcvcmsglen;
390 1.8 itojun static u_char *rcvcmsgbuf;
391 1.11 itojun char hbuf[NI_MAXHOST], src0[NI_MAXHOST];
392 1.11 itojun
393 1.11 itojun /*
394 1.11 itojun * Receive ICMP
395 1.11 itojun */
396 1.11 itojun if ((rcvsock = socket(AF_INET6, SOCK_RAW, IPPROTO_ICMPV6)) < 0) {
397 1.11 itojun perror("socket(ICMPv6)");
398 1.11 itojun exit(5);
399 1.11 itojun }
400 1.1 itojun
401 1.11 itojun /* set a minimum set of socket options */
402 1.1 itojun on = 1;
403 1.11 itojun /* specify to tell receiving interface */
404 1.11 itojun #ifdef IPV6_RECVPKTINFO
405 1.11 itojun if (setsockopt(rcvsock, IPPROTO_IPV6, IPV6_RECVPKTINFO, &on,
406 1.11 itojun sizeof(on)) < 0)
407 1.11 itojun err(1, "setsockopt(IPV6_RECVPKTINFO)");
408 1.11 itojun #else /* old adv. API */
409 1.11 itojun if (setsockopt(rcvsock, IPPROTO_IPV6, IPV6_PKTINFO, &on,
410 1.11 itojun sizeof(on)) < 0)
411 1.11 itojun err(1, "setsockopt(IPV6_PKTINFO)");
412 1.11 itojun #endif
413 1.11 itojun
414 1.11 itojun /* specify to tell value of hoplimit field of received IP6 hdr */
415 1.11 itojun #ifdef IPV6_RECVHOPLIMIT
416 1.11 itojun if (setsockopt(rcvsock, IPPROTO_IPV6, IPV6_RECVHOPLIMIT, &on,
417 1.11 itojun sizeof(on)) < 0)
418 1.11 itojun err(1, "setsockopt(IPV6_RECVHOPLIMIT)");
419 1.11 itojun #else /* old adv. API */
420 1.11 itojun if (setsockopt(rcvsock, IPPROTO_IPV6, IPV6_HOPLIMIT, &on,
421 1.11 itojun sizeof(on)) < 0)
422 1.11 itojun err(1, "setsockopt(IPV6_HOPLIMIT)");
423 1.11 itojun #endif
424 1.11 itojun
425 1.11 itojun /* revoke privs */
426 1.11 itojun seteuid(getuid());
427 1.11 itojun setuid(getuid());
428 1.11 itojun
429 1.1 itojun seq = 0;
430 1.1 itojun
431 1.11 itojun while ((ch = getopt(argc, argv, "df:g:lm:np:q:rs:w:v")) != EOF)
432 1.1 itojun switch(ch) {
433 1.1 itojun case 'd':
434 1.1 itojun options |= SO_DEBUG;
435 1.1 itojun break;
436 1.11 itojun case 'f':
437 1.11 itojun first_hop = atoi(optarg);
438 1.11 itojun if (first_hop > max_hops) {
439 1.11 itojun Fprintf(stderr,
440 1.11 itojun "traceroute6: min hoplimit must be <= %d.\n", max_hops);
441 1.11 itojun exit(1);
442 1.11 itojun }
443 1.1 itojun break;
444 1.1 itojun case 'g':
445 1.3 itojun hp = getipnodebyname(optarg, AF_INET6, 0, &h_errno);
446 1.1 itojun if (hp == NULL) {
447 1.1 itojun Fprintf(stderr,
448 1.1 itojun "traceroute6: unknown host %s\n", optarg);
449 1.1 itojun exit(1);
450 1.1 itojun }
451 1.7 itojun #ifdef USE_RFC2292BIS
452 1.7 itojun if (rth == NULL) {
453 1.7 itojun /*
454 1.7 itojun * XXX: We can't detect the number of
455 1.7 itojun * intermediate nodes yet.
456 1.7 itojun */
457 1.7 itojun if ((rth = inet6_rth_init((void *)rtbuf,
458 1.7 itojun sizeof(rtbuf),
459 1.7 itojun IPV6_RTHDR_TYPE_0,
460 1.7 itojun 0)) == NULL) {
461 1.7 itojun Fprintf(stderr,
462 1.7 itojun "inet6_rth_init failed.\n");
463 1.7 itojun exit(1);
464 1.7 itojun }
465 1.7 itojun }
466 1.7 itojun if (inet6_rth_add((void *)rth,
467 1.7 itojun (struct in6_addr *)hp->h_addr)) {
468 1.7 itojun Fprintf(stderr,
469 1.7 itojun "inet6_rth_add failed for %s\n",
470 1.7 itojun optarg);
471 1.7 itojun exit(1);
472 1.7 itojun }
473 1.7 itojun #else /* old advanced API */
474 1.1 itojun if (cmsg == NULL)
475 1.1 itojun cmsg = inet6_rthdr_init(rtbuf, IPV6_RTHDR_TYPE_0);
476 1.1 itojun inet6_rthdr_add(cmsg, (struct in6_addr *)hp->h_addr, IPV6_RTHDR_LOOSE);
477 1.7 itojun #endif
478 1.7 itojun freehostent(hp);
479 1.1 itojun break;
480 1.11 itojun case 'l':
481 1.11 itojun lflag++;
482 1.11 itojun break;
483 1.1 itojun case 'm':
484 1.1 itojun max_hops = atoi(optarg);
485 1.11 itojun if (max_hops < first_hop) {
486 1.1 itojun Fprintf(stderr,
487 1.11 itojun "traceroute6: max hoplimit must be >= %d.\n", first_hop);
488 1.1 itojun exit(1);
489 1.1 itojun }
490 1.1 itojun break;
491 1.1 itojun case 'n':
492 1.1 itojun nflag++;
493 1.1 itojun break;
494 1.1 itojun case 'p':
495 1.1 itojun port = atoi(optarg);
496 1.1 itojun if (port < 1) {
497 1.1 itojun Fprintf(stderr,
498 1.1 itojun "traceroute6: port must be >0.\n");
499 1.1 itojun exit(1);
500 1.1 itojun }
501 1.1 itojun break;
502 1.1 itojun case 'q':
503 1.1 itojun nprobes = atoi(optarg);
504 1.1 itojun if (nprobes < 1) {
505 1.1 itojun Fprintf(stderr,
506 1.1 itojun "traceroute6: nprobes must be >0.\n");
507 1.1 itojun exit(1);
508 1.1 itojun }
509 1.1 itojun break;
510 1.1 itojun case 'r':
511 1.1 itojun options |= SO_DONTROUTE;
512 1.1 itojun break;
513 1.1 itojun case 's':
514 1.1 itojun /*
515 1.1 itojun * set the ip source address of the outbound
516 1.1 itojun * probe (e.g., on a multi-homed host).
517 1.1 itojun */
518 1.1 itojun source = optarg;
519 1.1 itojun break;
520 1.1 itojun case 'v':
521 1.1 itojun verbose++;
522 1.1 itojun break;
523 1.1 itojun case 'w':
524 1.1 itojun waittime = atoi(optarg);
525 1.1 itojun if (waittime <= 1) {
526 1.1 itojun Fprintf(stderr,
527 1.1 itojun "traceroute6: wait must be >1 sec.\n");
528 1.1 itojun exit(1);
529 1.1 itojun }
530 1.1 itojun break;
531 1.1 itojun default:
532 1.1 itojun usage();
533 1.1 itojun }
534 1.1 itojun argc -= optind;
535 1.1 itojun argv += optind;
536 1.1 itojun
537 1.1 itojun if (argc < 1)
538 1.1 itojun usage();
539 1.1 itojun
540 1.1 itojun #if 1
541 1.1 itojun setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
542 1.1 itojun #else
543 1.1 itojun setlinebuf (stdout);
544 1.1 itojun #endif
545 1.1 itojun
546 1.7 itojun memset(&hints, 0, sizeof(hints));
547 1.7 itojun hints.ai_family = PF_INET6;
548 1.7 itojun hints.ai_socktype = SOCK_RAW;
549 1.7 itojun hints.ai_protocol = IPPROTO_ICMPV6;
550 1.7 itojun hints.ai_flags = AI_CANONNAME;
551 1.7 itojun error = getaddrinfo(*argv, NULL, &hints, &res);
552 1.7 itojun if (error) {
553 1.7 itojun (void)fprintf(stderr,
554 1.7 itojun "traceroute6: %s\n", gai_strerror(error));
555 1.7 itojun exit(1);
556 1.7 itojun }
557 1.7 itojun if (res->ai_addrlen != sizeof(Dst)) {
558 1.7 itojun (void)fprintf(stderr,
559 1.7 itojun "traceroute6: size of sockaddr mismatch\n");
560 1.7 itojun exit(1);
561 1.7 itojun }
562 1.7 itojun memcpy(&Dst, res->ai_addr, res->ai_addrlen);
563 1.7 itojun hostname = res->ai_canonname ? strdup(res->ai_canonname) : *argv;
564 1.1 itojun
565 1.1 itojun if (*++argv)
566 1.1 itojun datalen = atoi(*argv);
567 1.1 itojun if (datalen < 0 || datalen >= MAXPACKET - sizeof(struct opacket)) {
568 1.1 itojun Fprintf(stderr,
569 1.1 itojun "traceroute6: packet size must be 0 <= s < %ld.\n",
570 1.1 itojun (long)(MAXPACKET - sizeof(struct opacket)));
571 1.1 itojun exit(1);
572 1.1 itojun }
573 1.1 itojun datalen += sizeof(struct opacket);
574 1.1 itojun outpacket = (struct opacket *)malloc((unsigned)datalen);
575 1.1 itojun if (! outpacket) {
576 1.10 itojun perror("malloc");
577 1.1 itojun exit(1);
578 1.1 itojun }
579 1.1 itojun (void) bzero((char *)outpacket, datalen);
580 1.1 itojun
581 1.1 itojun /* initialize msghdr for receiving packets */
582 1.1 itojun rcviov[0].iov_base = (caddr_t)packet;
583 1.1 itojun rcviov[0].iov_len = sizeof(packet);
584 1.11 itojun rcvmhdr.msg_name = (caddr_t)&Rcv;
585 1.11 itojun rcvmhdr.msg_namelen = sizeof(Rcv);
586 1.1 itojun rcvmhdr.msg_iov = rcviov;
587 1.1 itojun rcvmhdr.msg_iovlen = 1;
588 1.8 itojun rcvcmsglen = CMSG_SPACE(sizeof(struct in6_pktinfo))
589 1.8 itojun + CMSG_SPACE(sizeof(int));
590 1.8 itojun if ((rcvcmsgbuf = malloc(rcvcmsglen)) == NULL) {
591 1.8 itojun Fprintf(stderr, "traceroute6: malloc failed\n");
592 1.8 itojun exit(1);
593 1.8 itojun }
594 1.1 itojun rcvmhdr.msg_control = (caddr_t) rcvcmsgbuf;
595 1.8 itojun rcvmhdr.msg_controllen = rcvcmsglen;
596 1.1 itojun
597 1.1 itojun if (options & SO_DEBUG)
598 1.1 itojun (void) setsockopt(rcvsock, SOL_SOCKET, SO_DEBUG,
599 1.1 itojun (char *)&on, sizeof(on));
600 1.1 itojun if (options & SO_DONTROUTE)
601 1.1 itojun (void) setsockopt(rcvsock, SOL_SOCKET, SO_DONTROUTE,
602 1.1 itojun (char *)&on, sizeof(on));
603 1.1 itojun #ifdef IPSEC
604 1.1 itojun #ifdef IPSEC_POLICY_IPSEC
605 1.5 itojun /*
606 1.5 itojun * do not raise error even if setsockopt fails, kernel may have ipsec
607 1.5 itojun * turned off.
608 1.5 itojun */
609 1.6 itojun if (setpolicy(rcvsock, "in bypass") < 0)
610 1.11.2.2 itojun errx(1, "%s", ipsec_strerror());
611 1.6 itojun if (setpolicy(rcvsock, "out bypass") < 0)
612 1.11.2.2 itojun errx(1, "%s", ipsec_strerror());
613 1.1 itojun #else
614 1.1 itojun {
615 1.1 itojun int level = IPSEC_LEVEL_NONE;
616 1.1 itojun
617 1.1 itojun (void)setsockopt(rcvsock, IPPROTO_IPV6, IPV6_ESP_TRANS_LEVEL, &level,
618 1.1 itojun sizeof(level));
619 1.1 itojun (void)setsockopt(rcvsock, IPPROTO_IPV6, IPV6_ESP_NETWORK_LEVEL, &level,
620 1.1 itojun sizeof(level));
621 1.1 itojun #ifdef IP_AUTH_TRANS_LEVEL
622 1.1 itojun (void)setsockopt(rcvsock, IPPROTO_IPV6, IPV6_AUTH_TRANS_LEVEL, &level,
623 1.1 itojun sizeof(level));
624 1.1 itojun #else
625 1.1 itojun (void)setsockopt(rcvsock, IPPROTO_IPV6, IPV6_AUTH_LEVEL, &level,
626 1.1 itojun sizeof(level));
627 1.1 itojun #endif
628 1.1 itojun #ifdef IP_AUTH_NETWORK_LEVEL
629 1.1 itojun (void)setsockopt(rcvsock, IPPROTO_IPV6, IPV6_AUTH_NETWORK_LEVEL, &level,
630 1.1 itojun sizeof(level));
631 1.1 itojun #endif
632 1.1 itojun }
633 1.1 itojun #endif /*IPSEC_POLICY_IPSEC*/
634 1.1 itojun #endif /*IPSEC*/
635 1.1 itojun
636 1.1 itojun /*
637 1.1 itojun * Send UDP
638 1.1 itojun */
639 1.1 itojun if ((sndsock = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
640 1.10 itojun perror("socket(SOCK_DGRAM)");
641 1.1 itojun exit(5);
642 1.1 itojun }
643 1.1 itojun #ifdef SO_SNDBUF
644 1.1 itojun if (setsockopt(sndsock, SOL_SOCKET, SO_SNDBUF, (char *)&datalen,
645 1.1 itojun sizeof(datalen)) < 0) {
646 1.10 itojun perror("setsockopt(SO_SNDBUF)");
647 1.1 itojun exit(6);
648 1.1 itojun }
649 1.1 itojun #endif /* SO_SNDBUF */
650 1.1 itojun if (options & SO_DEBUG)
651 1.1 itojun (void) setsockopt(sndsock, SOL_SOCKET, SO_DEBUG,
652 1.1 itojun (char *)&on, sizeof(on));
653 1.1 itojun if (options & SO_DONTROUTE)
654 1.1 itojun (void) setsockopt(sndsock, SOL_SOCKET, SO_DONTROUTE,
655 1.1 itojun (char *)&on, sizeof(on));
656 1.7 itojun #ifdef USE_RFC2292BIS
657 1.7 itojun if (rth) {/* XXX: there is no library to finalize the header... */
658 1.7 itojun rth->ip6r_len = rth->ip6r_segleft * 2;
659 1.7 itojun if (setsockopt(sndsock, IPPROTO_IPV6, IPV6_RTHDR,
660 1.7 itojun (void *)rth, (rth->ip6r_len + 1) << 3)) {
661 1.7 itojun Fprintf(stderr, "setsockopt(IPV6_RTHDR): %s\n",
662 1.7 itojun strerror(errno));
663 1.7 itojun exit(1);
664 1.7 itojun }
665 1.7 itojun }
666 1.7 itojun #else /* old advanced API */
667 1.1 itojun if (cmsg != NULL) {
668 1.1 itojun inet6_rthdr_lasthop(cmsg, IPV6_RTHDR_LOOSE);
669 1.7 itojun if (setsockopt(sndsock, IPPROTO_IPV6, IPV6_PKTOPTIONS,
670 1.7 itojun rtbuf, cmsg->cmsg_len) < 0) {
671 1.7 itojun Fprintf(stderr, "setsockopt(IPV6_PKTOPTIONS): %s\n",
672 1.7 itojun strerror(errno));
673 1.7 itojun exit(1);
674 1.7 itojun }
675 1.1 itojun }
676 1.7 itojun #endif /* USE_RFC2292BIS */
677 1.1 itojun #ifdef IPSEC
678 1.1 itojun #ifdef IPSEC_POLICY_IPSEC
679 1.5 itojun /*
680 1.5 itojun * do not raise error even if setsockopt fails, kernel may have ipsec
681 1.5 itojun * turned off.
682 1.5 itojun */
683 1.6 itojun if (setpolicy(sndsock, "in bypass") < 0)
684 1.11.2.2 itojun errx(1, "%s", ipsec_strerror());
685 1.6 itojun if (setpolicy(sndsock, "out bypass") < 0)
686 1.11.2.2 itojun errx(1, "%s", ipsec_strerror());
687 1.1 itojun #else
688 1.1 itojun {
689 1.1 itojun int level = IPSEC_LEVEL_BYPASS;
690 1.1 itojun
691 1.1 itojun (void)setsockopt(sndsock, IPPROTO_IPV6, IPV6_ESP_TRANS_LEVEL, &level,
692 1.1 itojun sizeof(level));
693 1.1 itojun (void)setsockopt(sndsock, IPPROTO_IPV6, IPV6_ESP_NETWORK_LEVEL, &level,
694 1.1 itojun sizeof(level));
695 1.1 itojun #ifdef IP_AUTH_TRANS_LEVEL
696 1.1 itojun (void)setsockopt(sndsock, IPPROTO_IPV6, IPV6_AUTH_TRANS_LEVEL, &level,
697 1.1 itojun sizeof(level));
698 1.1 itojun #else
699 1.1 itojun (void)setsockopt(sndsock, IPPROTO_IPV6, IPV6_AUTH_LEVEL, &level,
700 1.1 itojun sizeof(level));
701 1.1 itojun #endif
702 1.1 itojun #ifdef IP_AUTH_NETWORK_LEVEL
703 1.1 itojun (void)setsockopt(sndsock, IPPROTO_IPV6, IPV6_AUTH_NETWORK_LEVEL, &level,
704 1.1 itojun sizeof(level));
705 1.1 itojun #endif
706 1.1 itojun }
707 1.1 itojun #endif /*IPSEC_POLICY_IPSEC*/
708 1.1 itojun #endif /*IPSEC*/
709 1.1 itojun
710 1.1 itojun /*
711 1.1 itojun * Source selection
712 1.1 itojun */
713 1.11 itojun bzero(&Src, sizeof(Src));
714 1.1 itojun if (source) {
715 1.11 itojun struct addrinfo hints, *res;
716 1.11 itojun int error;
717 1.11 itojun
718 1.11 itojun memset(&hints, 0, sizeof(hints));
719 1.11 itojun hints.ai_family = AF_INET6;
720 1.11 itojun hints.ai_socktype = SOCK_DGRAM; /*dummy*/
721 1.11 itojun hints.ai_flags = AI_NUMERICHOST;
722 1.11 itojun error = getaddrinfo(source, "0", &hints, &res);
723 1.11 itojun if (error) {
724 1.11 itojun Printf("traceroute6: %s: %s\n", source,
725 1.11 itojun gai_strerror(error));
726 1.11 itojun exit(1);
727 1.11 itojun }
728 1.11 itojun if (res->ai_addrlen > sizeof(Src)) {
729 1.11 itojun Printf("traceroute6: %s: %s\n", source,
730 1.11 itojun gai_strerror(error));
731 1.1 itojun exit(1);
732 1.1 itojun }
733 1.11 itojun memcpy(&Src, res->ai_addr, res->ai_addrlen);
734 1.11 itojun freeaddrinfo(res);
735 1.1 itojun } else {
736 1.1 itojun struct sockaddr_in6 Nxt;
737 1.1 itojun int dummy, len;
738 1.1 itojun
739 1.1 itojun Nxt = Dst;
740 1.1 itojun Nxt.sin6_port = htons(DUMMY_PORT);
741 1.1 itojun if (cmsg != NULL)
742 1.1 itojun bcopy(inet6_rthdr_getaddr(cmsg, 1), &Nxt.sin6_addr,
743 1.1 itojun sizeof(Nxt.sin6_addr));
744 1.1 itojun if ((dummy = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
745 1.11 itojun perror("socket");
746 1.11 itojun exit(1);
747 1.1 itojun }
748 1.11 itojun if (connect(dummy, (struct sockaddr *)&Nxt, Nxt.sin6_len) < 0) {
749 1.1 itojun perror("connect");
750 1.11 itojun exit(1);
751 1.11 itojun }
752 1.11 itojun len = sizeof(Src);
753 1.11 itojun if (getsockname(dummy, (struct sockaddr *)&Src, &len) < 0) {
754 1.1 itojun perror("getsockname");
755 1.11 itojun exit(1);
756 1.1 itojun }
757 1.11 itojun if (getnameinfo((struct sockaddr *)&Src, Src.sin6_len,
758 1.11 itojun src0, sizeof(src0), NULL, 0,
759 1.11 itojun NI_NUMERICHOST | niflag)) {
760 1.11 itojun Fprintf(stderr, "getnameinfo failed for source\n");
761 1.11 itojun exit(1);
762 1.11 itojun }
763 1.11 itojun source = src0;
764 1.11 itojun close(dummy);
765 1.1 itojun }
766 1.11 itojun
767 1.11 itojun #if 1
768 1.1 itojun ident = (getpid() & 0xffff) | 0x8000;
769 1.11 itojun #else
770 1.11 itojun ident = 0; /*let the kernel pick one*/
771 1.11 itojun #endif
772 1.1 itojun Src.sin6_port = htons(ident);
773 1.11 itojun if (bind(sndsock, (struct sockaddr *)&Src, Src.sin6_len) < 0) {
774 1.10 itojun perror("bind");
775 1.11 itojun exit(1);
776 1.11 itojun }
777 1.11 itojun
778 1.11 itojun if (ident == 0) {
779 1.11 itojun int len;
780 1.11 itojun
781 1.11 itojun len = sizeof(Src);
782 1.11 itojun if (getsockname(sndsock, (struct sockaddr *)&Src, &i) < 0) {
783 1.11 itojun perror("getsockname");
784 1.11 itojun exit(1);
785 1.11 itojun }
786 1.11 itojun ident = ntohs(Src.sin6_port);
787 1.1 itojun }
788 1.1 itojun
789 1.1 itojun /*
790 1.1 itojun * Message to users
791 1.1 itojun */
792 1.7 itojun if (getnameinfo((struct sockaddr *)&Dst, Dst.sin6_len, hbuf,
793 1.7 itojun sizeof(hbuf), NULL, 0, NI_NUMERICHOST | niflag))
794 1.7 itojun strcpy(hbuf, "(invalid)");
795 1.11 itojun Fprintf(stderr, "traceroute6");
796 1.11 itojun Fprintf(stderr, " to %s (%s)", hostname, hbuf);
797 1.1 itojun if (source)
798 1.1 itojun Fprintf(stderr, " from %s", source);
799 1.11 itojun Fprintf(stderr,
800 1.11 itojun ", %d hops max, %d byte packets\n",
801 1.11 itojun max_hops, datalen);
802 1.1 itojun (void) fflush(stderr);
803 1.1 itojun
804 1.11 itojun if (first_hop > 1)
805 1.11 itojun Printf("Skipping %d intermediate hops\n", first_hop - 1);
806 1.11 itojun
807 1.1 itojun /*
808 1.1 itojun * Main loop
809 1.1 itojun */
810 1.11 itojun for (hops = first_hop; hops <= max_hops; ++hops) {
811 1.1 itojun struct in6_addr lastaddr;
812 1.1 itojun int got_there = 0;
813 1.1 itojun int unreachable = 0;
814 1.1 itojun
815 1.1 itojun Printf("%2d ", hops);
816 1.1 itojun bzero(&lastaddr, sizeof(lastaddr));
817 1.1 itojun for (probe = 0; probe < nprobes; ++probe) {
818 1.1 itojun int cc;
819 1.1 itojun struct timeval t1, t2;
820 1.1 itojun struct timezone tz;
821 1.1 itojun
822 1.1 itojun (void) gettimeofday(&t1, &tz);
823 1.1 itojun send_probe(++seq, hops);
824 1.1 itojun while ((cc = wait_for_reply(rcvsock, &rcvmhdr))) {
825 1.1 itojun (void) gettimeofday(&t2, &tz);
826 1.1 itojun if ((i = packet_ok(&rcvmhdr, cc, seq))) {
827 1.1 itojun if (! IN6_ARE_ADDR_EQUAL(&Rcv.sin6_addr,
828 1.1 itojun &lastaddr)) {
829 1.1 itojun print(&rcvmhdr, cc);
830 1.1 itojun lastaddr = Rcv.sin6_addr;
831 1.1 itojun }
832 1.1 itojun Printf(" %g ms", deltaT(&t1, &t2));
833 1.1 itojun switch(i - 1) {
834 1.1 itojun case ICMP6_DST_UNREACH_NOROUTE:
835 1.1 itojun ++unreachable;
836 1.1 itojun Printf(" !N");
837 1.1 itojun break;
838 1.1 itojun case ICMP6_DST_UNREACH_ADMIN:
839 1.1 itojun ++unreachable;
840 1.1 itojun Printf(" !P");
841 1.1 itojun break;
842 1.1 itojun case ICMP6_DST_UNREACH_NOTNEIGHBOR:
843 1.1 itojun ++unreachable;
844 1.1 itojun Printf(" !S");
845 1.1 itojun break;
846 1.1 itojun case ICMP6_DST_UNREACH_ADDR:
847 1.1 itojun ++unreachable;
848 1.1 itojun Printf(" !A");
849 1.1 itojun break;
850 1.1 itojun case ICMP6_DST_UNREACH_NOPORT:
851 1.1 itojun if (rcvhlim >= 0 &&
852 1.1 itojun rcvhlim <= 1)
853 1.1 itojun Printf(" !");
854 1.1 itojun ++got_there;
855 1.1 itojun break;
856 1.1 itojun }
857 1.1 itojun break;
858 1.1 itojun }
859 1.1 itojun }
860 1.1 itojun if (cc == 0)
861 1.1 itojun Printf(" *");
862 1.1 itojun (void) fflush(stdout);
863 1.1 itojun }
864 1.1 itojun putchar('\n');
865 1.4 itojun if (got_there ||
866 1.4 itojun (unreachable > 0 && unreachable >= ((nprobes + 1) / 2))) {
867 1.1 itojun exit(0);
868 1.4 itojun }
869 1.1 itojun }
870 1.1 itojun
871 1.1 itojun exit(0);
872 1.1 itojun }
873 1.1 itojun
874 1.1 itojun int
875 1.1 itojun wait_for_reply(sock, mhdr)
876 1.1 itojun int sock;
877 1.1 itojun struct msghdr *mhdr;
878 1.1 itojun {
879 1.11.2.3 tv #ifdef HAVE_POLL
880 1.11.2.3 tv struct pollfd pfd[1];
881 1.1 itojun int cc = 0;
882 1.1 itojun
883 1.11.2.3 tv pfd[0].fd = sock;
884 1.11.2.3 tv pfd[0].events = POLLIN;
885 1.11.2.3 tv pfd[0].revents = 0;
886 1.11.2.3 tv
887 1.11.2.3 tv if (poll(pfd, 1, waittime * 1000) > 0)
888 1.11.2.3 tv cc = recvmsg(rcvsock, mhdr, 0);
889 1.11.2.3 tv
890 1.11.2.3 tv return(cc);
891 1.11.2.3 tv #else
892 1.11.2.3 tv fd_set *fdsp;
893 1.11.2.3 tv struct timeval wait;
894 1.11.2.3 tv int cc = 0, fdsn;
895 1.11.2.3 tv
896 1.11.2.3 tv fdsn = howmany(sock+1, NFDBITS) * sizeof(fd_mask);
897 1.11.2.3 tv if ((fdsp = (fd_set *)malloc(fdsn)) == NULL)
898 1.11.2.3 tv err(1, "malloc");
899 1.11.2.3 tv memset(fdsp, 0, fdsn);
900 1.11.2.3 tv FD_SET(sock, fdsp);
901 1.1 itojun wait.tv_sec = waittime; wait.tv_usec = 0;
902 1.1 itojun
903 1.11.2.3 tv if (select(sock+1, fdsp, (fd_set *)0, (fd_set *)0, &wait) > 0)
904 1.1 itojun cc = recvmsg(rcvsock, mhdr, 0);
905 1.1 itojun
906 1.11.2.3 tv free(fdsp);
907 1.1 itojun return(cc);
908 1.11.2.3 tv #endif
909 1.1 itojun }
910 1.6 itojun
911 1.6 itojun #ifdef IPSEC
912 1.6 itojun #ifdef IPSEC_POLICY_IPSEC
913 1.6 itojun int
914 1.6 itojun setpolicy(so, policy)
915 1.6 itojun int so;
916 1.6 itojun char *policy;
917 1.6 itojun {
918 1.6 itojun char *buf;
919 1.6 itojun
920 1.6 itojun buf = ipsec_set_policy(policy, strlen(policy));
921 1.6 itojun if (buf == NULL) {
922 1.11.2.1 thorpej warnx("%s", ipsec_strerror());
923 1.6 itojun return -1;
924 1.6 itojun }
925 1.6 itojun (void)setsockopt(so, IPPROTO_IPV6, IPV6_IPSEC_POLICY,
926 1.6 itojun buf, ipsec_get_policylen(buf));
927 1.6 itojun
928 1.6 itojun free(buf);
929 1.6 itojun
930 1.6 itojun return 0;
931 1.6 itojun }
932 1.6 itojun #endif
933 1.6 itojun #endif
934 1.1 itojun
935 1.1 itojun void
936 1.1 itojun send_probe(seq, hops)
937 1.1 itojun int seq, hops;
938 1.1 itojun {
939 1.1 itojun struct opacket *op = outpacket;
940 1.1 itojun int i;
941 1.1 itojun
942 1.1 itojun if(setsockopt(sndsock, IPPROTO_IPV6, IPV6_UNICAST_HOPS,
943 1.1 itojun (char *)&hops, sizeof(hops)) < 0) {
944 1.1 itojun perror("setsockopt IPV6_UNICAST_HOPS");
945 1.1 itojun }
946 1.1 itojun
947 1.1 itojun Dst.sin6_port = htons(port + seq);
948 1.1 itojun
949 1.1 itojun op->seq = seq;
950 1.1 itojun op->hops = hops;
951 1.1 itojun (void) gettimeofday(&op->tv, &tz);
952 1.1 itojun
953 1.1 itojun i = sendto(sndsock, (char *)outpacket, datalen , 0,
954 1.7 itojun (struct sockaddr *)&Dst, Dst.sin6_len);
955 1.1 itojun if (i < 0 || i != datalen) {
956 1.1 itojun if (i<0)
957 1.1 itojun perror("sendto");
958 1.1 itojun Printf("traceroute6: wrote %s %d chars, ret=%d\n", hostname,
959 1.1 itojun datalen, i);
960 1.1 itojun (void) fflush(stdout);
961 1.1 itojun }
962 1.1 itojun }
963 1.1 itojun
964 1.1 itojun int
965 1.1 itojun get_hoplim(mhdr)
966 1.1 itojun struct msghdr *mhdr;
967 1.1 itojun {
968 1.1 itojun struct cmsghdr *cm;
969 1.1 itojun
970 1.1 itojun for (cm = (struct cmsghdr *)CMSG_FIRSTHDR(mhdr); cm;
971 1.1 itojun cm = (struct cmsghdr *)CMSG_NXTHDR(mhdr, cm)) {
972 1.1 itojun if (cm->cmsg_level == IPPROTO_IPV6 &&
973 1.1 itojun cm->cmsg_type == IPV6_HOPLIMIT &&
974 1.1 itojun cm->cmsg_len == CMSG_LEN(sizeof(int)))
975 1.1 itojun return(*(int *)CMSG_DATA(cm));
976 1.1 itojun }
977 1.1 itojun
978 1.1 itojun return(-1);
979 1.1 itojun }
980 1.1 itojun
981 1.1 itojun double
982 1.1 itojun deltaT(t1p, t2p)
983 1.1 itojun struct timeval *t1p, *t2p;
984 1.1 itojun {
985 1.1 itojun register double dt;
986 1.1 itojun
987 1.1 itojun dt = (double)(t2p->tv_sec - t1p->tv_sec) * 1000.0 +
988 1.1 itojun (double)(t2p->tv_usec - t1p->tv_usec) / 1000.0;
989 1.1 itojun return (dt);
990 1.1 itojun }
991 1.1 itojun
992 1.1 itojun
993 1.1 itojun /*
994 1.1 itojun * Convert an ICMP "type" field to a printable string.
995 1.1 itojun */
996 1.1 itojun char *
997 1.1 itojun pr_type(t0)
998 1.1 itojun int t0;
999 1.1 itojun {
1000 1.1 itojun u_char t = t0 & 0xff;
1001 1.1 itojun char *cp;
1002 1.1 itojun
1003 1.1 itojun switch (t) {
1004 1.1 itojun case ICMP6_DST_UNREACH:
1005 1.1 itojun cp = "Destination Unreachable";
1006 1.1 itojun break;
1007 1.1 itojun case ICMP6_PACKET_TOO_BIG:
1008 1.1 itojun cp = "Pakcet Too Big";
1009 1.1 itojun break;
1010 1.1 itojun case ICMP6_TIME_EXCEEDED:
1011 1.1 itojun cp = "Time Exceeded";
1012 1.1 itojun break;
1013 1.1 itojun case ICMP6_PARAM_PROB:
1014 1.1 itojun cp = "Parameter Problem";
1015 1.1 itojun break;
1016 1.1 itojun case ICMP6_ECHO_REQUEST:
1017 1.1 itojun cp = "Echo Request";
1018 1.1 itojun break;
1019 1.1 itojun case ICMP6_ECHO_REPLY:
1020 1.1 itojun cp = "Echo Reply";
1021 1.1 itojun break;
1022 1.1 itojun case ICMP6_MEMBERSHIP_QUERY:
1023 1.1 itojun cp = "Group Membership Query";
1024 1.1 itojun break;
1025 1.1 itojun case ICMP6_MEMBERSHIP_REPORT:
1026 1.1 itojun cp = "Group Membership Report";
1027 1.1 itojun break;
1028 1.1 itojun case ICMP6_MEMBERSHIP_REDUCTION:
1029 1.1 itojun cp = "Group Membership Reduction";
1030 1.1 itojun break;
1031 1.1 itojun case ND_ROUTER_SOLICIT:
1032 1.1 itojun cp = "Router Solicitation";
1033 1.1 itojun break;
1034 1.1 itojun case ND_ROUTER_ADVERT:
1035 1.1 itojun cp = "Router Advertisement";
1036 1.1 itojun break;
1037 1.1 itojun case ND_NEIGHBOR_SOLICIT:
1038 1.1 itojun cp = "Neighbor Solicitation";
1039 1.1 itojun break;
1040 1.1 itojun case ND_NEIGHBOR_ADVERT:
1041 1.1 itojun cp = "Neighbor Advertisement";
1042 1.1 itojun break;
1043 1.1 itojun case ND_REDIRECT:
1044 1.9 itojun cp = "Redirect";
1045 1.1 itojun break;
1046 1.1 itojun default:
1047 1.1 itojun cp = "Unknown";
1048 1.1 itojun break;
1049 1.1 itojun }
1050 1.1 itojun return cp;
1051 1.1 itojun }
1052 1.1 itojun
1053 1.1 itojun
1054 1.1 itojun int
1055 1.1 itojun packet_ok(mhdr, cc, seq)
1056 1.1 itojun struct msghdr *mhdr;
1057 1.1 itojun int cc;
1058 1.1 itojun int seq;
1059 1.1 itojun {
1060 1.1 itojun register struct icmp6_hdr *icp;
1061 1.1 itojun struct sockaddr_in6 *from = (struct sockaddr_in6 *)mhdr->msg_name;
1062 1.1 itojun u_char type, code;
1063 1.1 itojun char *buf = (char *)mhdr->msg_iov[0].iov_base;
1064 1.1 itojun struct cmsghdr *cm;
1065 1.1 itojun int *hlimp;
1066 1.7 itojun char hbuf[NI_MAXHOST];
1067 1.1 itojun
1068 1.1 itojun #ifdef OLDRAWSOCKET
1069 1.1 itojun int hlen;
1070 1.1 itojun struct ip6_hdr *ip;
1071 1.11 itojun #endif
1072 1.1 itojun
1073 1.1 itojun #ifdef OLDRAWSOCKET
1074 1.1 itojun ip = (struct ip6_hdr *) buf;
1075 1.1 itojun hlen = sizeof(struct ip6_hdr);
1076 1.1 itojun if (cc < hlen + sizeof(struct icmp6_hdr)) {
1077 1.7 itojun if (verbose) {
1078 1.7 itojun if (getnameinfo((struct sockaddr *)from, from->sin6_len,
1079 1.7 itojun hbuf, sizeof(hbuf), NULL, 0,
1080 1.7 itojun NI_NUMERICHOST | niflag) != 0)
1081 1.7 itojun strcpy(hbuf, "invalid");
1082 1.1 itojun Printf("packet too short (%d bytes) from %s\n", cc,
1083 1.7 itojun hbuf);
1084 1.7 itojun }
1085 1.1 itojun return (0);
1086 1.1 itojun }
1087 1.1 itojun cc -= hlen;
1088 1.1 itojun icp = (struct icmp6_hdr *)(buf + hlen);
1089 1.1 itojun #else
1090 1.1 itojun if (cc < sizeof(struct icmp6_hdr)) {
1091 1.7 itojun if (verbose) {
1092 1.7 itojun if (getnameinfo((struct sockaddr *)from, from->sin6_len,
1093 1.7 itojun hbuf, sizeof(hbuf), NULL, 0,
1094 1.7 itojun NI_NUMERICHOST | niflag) != 0)
1095 1.7 itojun strcpy(hbuf, "invalid");
1096 1.7 itojun Printf("data too short (%d bytes) from %s\n", cc, hbuf);
1097 1.7 itojun }
1098 1.1 itojun return(0);
1099 1.1 itojun }
1100 1.1 itojun icp = (struct icmp6_hdr *)buf;
1101 1.1 itojun #endif
1102 1.1 itojun /* get optional information via advanced API */
1103 1.1 itojun rcvpktinfo = NULL;
1104 1.1 itojun hlimp = NULL;
1105 1.1 itojun for (cm = (struct cmsghdr *)CMSG_FIRSTHDR(mhdr); cm;
1106 1.1 itojun cm = (struct cmsghdr *)CMSG_NXTHDR(mhdr, cm)) {
1107 1.1 itojun if (cm->cmsg_level == IPPROTO_IPV6 &&
1108 1.1 itojun cm->cmsg_type == IPV6_PKTINFO &&
1109 1.1 itojun cm->cmsg_len ==
1110 1.1 itojun CMSG_LEN(sizeof(struct in6_pktinfo)))
1111 1.1 itojun rcvpktinfo = (struct in6_pktinfo *)(CMSG_DATA(cm));
1112 1.1 itojun
1113 1.1 itojun if (cm->cmsg_level == IPPROTO_IPV6 &&
1114 1.1 itojun cm->cmsg_type == IPV6_HOPLIMIT &&
1115 1.1 itojun cm->cmsg_len == CMSG_LEN(sizeof(int)))
1116 1.1 itojun hlimp = (int *)CMSG_DATA(cm);
1117 1.1 itojun }
1118 1.1 itojun if (rcvpktinfo == NULL || hlimp == NULL) {
1119 1.1 itojun warnx("failed to get received hop limit or packet info");
1120 1.11 itojun #if 0
1121 1.1 itojun return(0);
1122 1.11 itojun #else
1123 1.11 itojun rcvhlim = 0; /*XXX*/
1124 1.11 itojun #endif
1125 1.1 itojun }
1126 1.11 itojun else
1127 1.11 itojun rcvhlim = *hlimp;
1128 1.11 itojun
1129 1.1 itojun type = icp->icmp6_type;
1130 1.1 itojun code = icp->icmp6_code;
1131 1.1 itojun if ((type == ICMP6_TIME_EXCEEDED && code == ICMP6_TIME_EXCEED_TRANSIT)
1132 1.1 itojun || type == ICMP6_DST_UNREACH) {
1133 1.1 itojun struct ip6_hdr *hip;
1134 1.1 itojun struct udphdr *up;
1135 1.1 itojun
1136 1.1 itojun hip = (struct ip6_hdr *)(icp + 1);
1137 1.1 itojun if ((up = get_udphdr(hip, (u_char *)(buf + cc))) == NULL) {
1138 1.1 itojun if (verbose)
1139 1.1 itojun warnx("failed to get upper layer header");
1140 1.1 itojun return(0);
1141 1.1 itojun }
1142 1.1 itojun if (up->uh_sport == htons(ident) &&
1143 1.1 itojun up->uh_dport == htons(port+seq))
1144 1.1 itojun return (type == ICMP6_TIME_EXCEEDED ? -1 : code + 1);
1145 1.1 itojun }
1146 1.1 itojun if (verbose) {
1147 1.1 itojun int i;
1148 1.11 itojun u_int8_t *p;
1149 1.7 itojun char sbuf[NI_MAXHOST+1], dbuf[INET6_ADDRSTRLEN];
1150 1.1 itojun
1151 1.7 itojun if (getnameinfo((struct sockaddr *)from, from->sin6_len,
1152 1.7 itojun sbuf, sizeof(sbuf), NULL, 0, NI_NUMERICHOST | niflag) != 0)
1153 1.7 itojun strcpy(sbuf, "invalid");
1154 1.7 itojun Printf("\n%d bytes from %s to %s", cc, sbuf,
1155 1.11 itojun rcvpktinfo ? inet_ntop(AF_INET6, &rcvpktinfo->ipi6_addr,
1156 1.11 itojun dbuf, sizeof(dbuf))
1157 1.11 itojun : "?");
1158 1.1 itojun Printf(": icmp type %d (%s) code %d\n", type, pr_type(type),
1159 1.1 itojun icp->icmp6_code);
1160 1.11 itojun p = (u_int8_t *)(icp + 1);
1161 1.11 itojun #define WIDTH 16
1162 1.11 itojun for (i = 0; i < cc; i++) {
1163 1.11 itojun if (i % WIDTH == 0)
1164 1.11 itojun Printf("%04x:", i);
1165 1.11 itojun if (i % 4 == 0)
1166 1.11 itojun Printf(" ");
1167 1.11 itojun Printf("%02x", p[i]);
1168 1.11 itojun if (i % WIDTH == WIDTH - 1)
1169 1.11 itojun Printf("\n");
1170 1.11 itojun }
1171 1.11 itojun if (cc % WIDTH != 0)
1172 1.11 itojun Printf("\n");
1173 1.1 itojun }
1174 1.1 itojun return(0);
1175 1.1 itojun }
1176 1.1 itojun
1177 1.1 itojun /*
1178 1.1 itojun * Increment pointer until find the UDP header.
1179 1.1 itojun */
1180 1.1 itojun struct udphdr *
1181 1.1 itojun get_udphdr(ip6, lim)
1182 1.1 itojun struct ip6_hdr *ip6;
1183 1.1 itojun u_char *lim;
1184 1.1 itojun {
1185 1.1 itojun u_char *cp = (u_char *)ip6, nh;
1186 1.1 itojun int hlen;
1187 1.1 itojun
1188 1.1 itojun if (cp + sizeof(*ip6) >= lim)
1189 1.1 itojun return(NULL);
1190 1.1 itojun
1191 1.1 itojun nh = ip6->ip6_nxt;
1192 1.1 itojun cp += sizeof(struct ip6_hdr);
1193 1.1 itojun
1194 1.1 itojun while(lim - cp >= 8) {
1195 1.1 itojun switch(nh) {
1196 1.1 itojun case IPPROTO_ESP:
1197 1.1 itojun case IPPROTO_TCP:
1198 1.1 itojun case IPPROTO_ICMPV6:
1199 1.1 itojun return(NULL);
1200 1.1 itojun case IPPROTO_UDP:
1201 1.1 itojun return((struct udphdr *)cp);
1202 1.1 itojun case IPPROTO_FRAGMENT:
1203 1.1 itojun hlen = sizeof(struct ip6_frag);
1204 1.1 itojun nh = ((struct ip6_frag *)cp)->ip6f_nxt;
1205 1.1 itojun break;
1206 1.1 itojun case IPPROTO_AH:
1207 1.1 itojun hlen = (((struct ip6_ext *)cp)->ip6e_len + 2) << 2;
1208 1.1 itojun nh = ((struct ip6_ext *)cp)->ip6e_nxt;
1209 1.1 itojun break;
1210 1.1 itojun default:
1211 1.1 itojun hlen = (((struct ip6_ext *)cp)->ip6e_len + 1) << 3;
1212 1.1 itojun nh = ((struct ip6_ext *)cp)->ip6e_nxt;
1213 1.1 itojun break;
1214 1.1 itojun }
1215 1.1 itojun
1216 1.1 itojun cp += hlen;
1217 1.1 itojun }
1218 1.1 itojun
1219 1.1 itojun return(NULL);
1220 1.1 itojun }
1221 1.1 itojun
1222 1.1 itojun void
1223 1.1 itojun print(mhdr, cc)
1224 1.1 itojun struct msghdr *mhdr;
1225 1.1 itojun int cc;
1226 1.1 itojun {
1227 1.1 itojun struct sockaddr_in6 *from = (struct sockaddr_in6 *)mhdr->msg_name;
1228 1.7 itojun char hbuf[NI_MAXHOST];
1229 1.1 itojun
1230 1.7 itojun if (getnameinfo((struct sockaddr *)from, from->sin6_len,
1231 1.7 itojun hbuf, sizeof(hbuf), NULL, 0, NI_NUMERICHOST | niflag) != 0)
1232 1.7 itojun strcpy(hbuf, "invalid");
1233 1.7 itojun if (nflag)
1234 1.7 itojun Printf(" %s", hbuf);
1235 1.7 itojun else if (lflag)
1236 1.7 itojun Printf(" %s (%s)", inetname((struct sockaddr *)from), hbuf);
1237 1.7 itojun else
1238 1.7 itojun Printf(" %s", inetname((struct sockaddr *)from));
1239 1.1 itojun
1240 1.1 itojun if (verbose) {
1241 1.1 itojun #ifdef OLDRAWSOCKET
1242 1.1 itojun Printf(" %d bytes to %s", cc,
1243 1.11 itojun rcvpktinfo ? inet_ntop(AF_INET6, &rcvpktinfo->ipi6_addr,
1244 1.11 itojun hbuf, sizeof(hbuf))
1245 1.11 itojun : "?");
1246 1.1 itojun #else
1247 1.1 itojun Printf(" %d bytes of data to %s", cc,
1248 1.11 itojun rcvpktinfo ? inet_ntop(AF_INET6, &rcvpktinfo->ipi6_addr,
1249 1.11 itojun hbuf, sizeof(hbuf))
1250 1.11 itojun : "?");
1251 1.1 itojun #endif
1252 1.1 itojun }
1253 1.1 itojun }
1254 1.1 itojun
1255 1.1 itojun /*
1256 1.1 itojun * Subtract 2 timeval structs: out = out - in.
1257 1.1 itojun * Out is assumed to be >= in.
1258 1.1 itojun */
1259 1.1 itojun void
1260 1.1 itojun tvsub(out, in)
1261 1.1 itojun register struct timeval *out, *in;
1262 1.1 itojun {
1263 1.1 itojun if ((out->tv_usec -= in->tv_usec) < 0) {
1264 1.1 itojun out->tv_sec--;
1265 1.1 itojun out->tv_usec += 1000000;
1266 1.1 itojun }
1267 1.1 itojun out->tv_sec -= in->tv_sec;
1268 1.1 itojun }
1269 1.1 itojun
1270 1.1 itojun
1271 1.1 itojun /*
1272 1.1 itojun * Construct an Internet address representation.
1273 1.1 itojun * If the nflag has been supplied, give
1274 1.1 itojun * numeric value, otherwise try for symbolic name.
1275 1.1 itojun */
1276 1.7 itojun const char *
1277 1.7 itojun inetname(sa)
1278 1.7 itojun struct sockaddr *sa;
1279 1.1 itojun {
1280 1.1 itojun register char *cp;
1281 1.7 itojun static char line[NI_MAXHOST];
1282 1.1 itojun static char domain[MAXHOSTNAMELEN + 1];
1283 1.1 itojun static int first = 1;
1284 1.1 itojun
1285 1.1 itojun if (first && !nflag) {
1286 1.1 itojun first = 0;
1287 1.1 itojun if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
1288 1.1 itojun (cp = index(domain, '.')))
1289 1.1 itojun (void) strcpy(domain, cp + 1);
1290 1.1 itojun else
1291 1.1 itojun domain[0] = 0;
1292 1.1 itojun }
1293 1.7 itojun cp = NULL;
1294 1.1 itojun if (!nflag) {
1295 1.7 itojun if (getnameinfo(sa, sa->sa_len, line, sizeof(line), NULL, 0,
1296 1.7 itojun NI_NAMEREQD) == 0) {
1297 1.7 itojun if ((cp = index(line, '.')) &&
1298 1.1 itojun !strcmp(cp + 1, domain))
1299 1.1 itojun *cp = 0;
1300 1.7 itojun cp = line;
1301 1.1 itojun }
1302 1.1 itojun }
1303 1.1 itojun if (cp)
1304 1.7 itojun return cp;
1305 1.7 itojun
1306 1.7 itojun if (getnameinfo(sa, sa->sa_len, line, sizeof(line), NULL, 0,
1307 1.7 itojun NI_NUMERICHOST | niflag) != 0)
1308 1.7 itojun strcpy(line, "invalid");
1309 1.7 itojun return line;
1310 1.1 itojun }
1311 1.1 itojun
1312 1.1 itojun void
1313 1.1 itojun usage()
1314 1.1 itojun {
1315 1.1 itojun (void)fprintf(stderr,
1316 1.11 itojun "usage: traceroute6 [-dlnrv] [-f first_hop] [-m max_hops] [-p port#] \n"
1317 1.11 itojun " [-q nqueries] [-s src_addr] [-g gateway] [-w wait] host [data size]\n");
1318 1.1 itojun exit(1);
1319 1.1 itojun }
1320