ndp.c revision 1.25 1 /* $NetBSD: ndp.c,v 1.25 2002/06/03 19:27:40 itojun Exp $ */
2 /* $KAME: ndp.c,v 1.100 2002/06/03 19:25:27 itojun Exp $ */
3
4 /*
5 * Copyright (C) 1995, 1996, 1997, 1998, and 1999 WIDE Project.
6 * All rights reserved.
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. Neither the name of the project nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32 /*
33 * Copyright (c) 1984, 1993
34 * The Regents of the University of California. All rights reserved.
35 *
36 * This code is derived from software contributed to Berkeley by
37 * Sun Microsystems, Inc.
38 *
39 * Redistribution and use in source and binary forms, with or without
40 * modification, are permitted provided that the following conditions
41 * are met:
42 * 1. Redistributions of source code must retain the above copyright
43 * notice, this list of conditions and the following disclaimer.
44 * 2. Redistributions in binary form must reproduce the above copyright
45 * notice, this list of conditions and the following disclaimer in the
46 * documentation and/or other materials provided with the distribution.
47 * 3. All advertising materials mentioning features or use of this software
48 * must display the following acknowledgement:
49 * This product includes software developed by the University of
50 * California, Berkeley and its contributors.
51 * 4. Neither the name of the University nor the names of its contributors
52 * may be used to endorse or promote products derived from this software
53 * without specific prior written permission.
54 *
55 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
56 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
57 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
58 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
59 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
60 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
61 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
62 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
63 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
64 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
65 * SUCH DAMAGE.
66 */
67
68 /*
69 * Based on:
70 * "@(#) Copyright (c) 1984, 1993\n\
71 * The Regents of the University of California. All rights reserved.\n";
72 *
73 * "@(#)arp.c 8.2 (Berkeley) 1/2/94";
74 */
75
76 /*
77 * ndp - display, set, delete and flush neighbor cache
78 */
79
80
81 #include <sys/param.h>
82 #include <sys/file.h>
83 #include <sys/ioctl.h>
84 #include <sys/socket.h>
85 #include <sys/sysctl.h>
86 #include <sys/time.h>
87
88 #include <net/if.h>
89 #include <net/if_dl.h>
90 #include <net/if_types.h>
91 #include <net/route.h>
92
93 #include <netinet/in.h>
94
95 #include <netinet/icmp6.h>
96 #include <netinet6/in6_var.h>
97 #include <netinet6/nd6.h>
98
99 #include <arpa/inet.h>
100
101 #include <netdb.h>
102 #include <errno.h>
103 #include <nlist.h>
104 #include <stdio.h>
105 #include <string.h>
106 #include <paths.h>
107 #include <err.h>
108 #include <stdlib.h>
109 #include <fcntl.h>
110 #include <unistd.h>
111 #include <err.h>
112 #include "gmt2local.h"
113
114 /* packing rule for routing socket */
115 #define ROUNDUP(a) \
116 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long))
117 #define ADVANCE(x, n) (x += ROUNDUP((n)->sa_len))
118
119 static pid_t pid;
120 static int nflag;
121 static int tflag;
122 static int32_t thiszone; /* time difference with gmt */
123 static int s = -1;
124 static int repeat = 0;
125
126 char ntop_buf[INET6_ADDRSTRLEN]; /* inet_ntop() */
127 char host_buf[NI_MAXHOST]; /* getnameinfo() */
128 char ifix_buf[IFNAMSIZ]; /* if_indextoname() */
129
130 int main __P((int, char **));
131 int file __P((char *));
132 void getsocket __P((void));
133 int set __P((int, char **));
134 void get __P((char *));
135 int delete __P((char *));
136 void dump __P((struct in6_addr *, int));
137 static struct in6_nbrinfo *getnbrinfo __P((struct in6_addr *, int, int));
138 static char *ether_str __P((struct sockaddr_dl *));
139 int ndp_ether_aton __P((char *, u_char *));
140 void usage __P((void));
141 int rtmsg __P((int));
142 void ifinfo __P((char *, int, char **));
143 void rtrlist __P((void));
144 void plist __P((void));
145 void pfx_flush __P((void));
146 void rtrlist __P((void));
147 void rtr_flush __P((void));
148 void harmonize_rtr __P((void));
149 #ifdef SIOCSDEFIFACE_IN6 /* XXX: check SIOCGDEFIFACE_IN6 as well? */
150 static void getdefif __P((void));
151 static void setdefif __P((char *));
152 #endif
153 static char *sec2str __P((time_t));
154 static char *ether_str __P((struct sockaddr_dl *));
155 static void ts_print __P((const struct timeval *));
156
157 #ifdef ICMPV6CTL_ND6_DRLIST
158 static char *rtpref_str[] = {
159 "medium", /* 00 */
160 "high", /* 01 */
161 "rsv", /* 10 */
162 "low" /* 11 */
163 };
164 #endif
165
166 int mode = 0;
167 char *arg = NULL;
168
169 int
170 main(argc, argv)
171 int argc;
172 char **argv;
173 {
174 int ch;
175
176 pid = getpid();
177 thiszone = gmt2local(0);
178 while ((ch = getopt(argc, argv, "acd:f:Ii:nprstA:HPR")) != -1)
179 switch (ch) {
180 case 'a':
181 case 'c':
182 case 'p':
183 case 'r':
184 case 'H':
185 case 'P':
186 case 'R':
187 case 's':
188 case 'I':
189 if (mode) {
190 usage();
191 /*NOTREACHED*/
192 }
193 mode = ch;
194 arg = NULL;
195 break;
196 case 'd':
197 case 'f':
198 case 'i' :
199 if (mode) {
200 usage();
201 /*NOTREACHED*/
202 }
203 mode = ch;
204 arg = optarg;
205 break;
206 case 'n':
207 nflag = 1;
208 break;
209 case 't':
210 tflag = 1;
211 break;
212 case 'A':
213 if (mode) {
214 usage();
215 /*NOTREACHED*/
216 }
217 mode = 'a';
218 repeat = atoi(optarg);
219 if (repeat < 0) {
220 usage();
221 /*NOTREACHED*/
222 }
223 break;
224 default:
225 usage();
226 }
227
228 argc -= optind;
229 argv += optind;
230
231 switch (mode) {
232 case 'a':
233 case 'c':
234 if (argc != 0) {
235 usage();
236 /*NOTREACHED*/
237 }
238 dump(0, mode == 'c');
239 break;
240 case 'd':
241 if (argc != 0) {
242 usage();
243 /*NOTREACHED*/
244 }
245 delete(arg);
246 break;
247 case 'I':
248 #ifdef SIOCSDEFIFACE_IN6 /* XXX: check SIOCGDEFIFACE_IN6 as well? */
249 if (argc > 1) {
250 usage();
251 /*NOTREACHED*/
252 } else if (argc == 1) {
253 if (strcmp(*argv, "delete") == 0 ||
254 if_nametoindex(*argv))
255 setdefif(*argv);
256 else
257 errx(1, "invalid interface %s", *argv);
258 }
259 getdefif(); /* always call it to print the result */
260 break;
261 #else
262 errx(1, "not supported yet");
263 /*NOTREACHED*/
264 #endif
265 case 'p':
266 if (argc != 0) {
267 usage();
268 /*NOTREACHED*/
269 }
270 plist();
271 break;
272 case 'i':
273 ifinfo(arg, argc, argv);
274 break;
275 case 'r':
276 if (argc != 0) {
277 usage();
278 /*NOTREACHED*/
279 }
280 rtrlist();
281 break;
282 case 's':
283 if (argc < 2 || argc > 4)
284 usage();
285 exit(set(argc, argv) ? 1 : 0);
286 case 'H':
287 if (argc != 0) {
288 usage();
289 /*NOTREACHED*/
290 }
291 harmonize_rtr();
292 break;
293 case 'P':
294 if (argc != 0) {
295 usage();
296 /*NOTREACHED*/
297 }
298 pfx_flush();
299 break;
300 case 'R':
301 if (argc != 0) {
302 usage();
303 /*NOTREACHED*/
304 }
305 rtr_flush();
306 break;
307 case 0:
308 if (argc != 1) {
309 usage();
310 /*NOTREACHED*/
311 }
312 get(argv[0]);
313 break;
314 }
315 exit(0);
316 }
317
318 /*
319 * Process a file to set standard ndp entries
320 */
321 int
322 file(name)
323 char *name;
324 {
325 FILE *fp;
326 int i, retval;
327 char line[100], arg[5][50], *args[5];
328
329 if ((fp = fopen(name, "r")) == NULL) {
330 fprintf(stderr, "ndp: cannot open %s\n", name);
331 exit(1);
332 }
333 args[0] = &arg[0][0];
334 args[1] = &arg[1][0];
335 args[2] = &arg[2][0];
336 args[3] = &arg[3][0];
337 args[4] = &arg[4][0];
338 retval = 0;
339 while (fgets(line, 100, fp) != NULL) {
340 i = sscanf(line, "%s %s %s %s %s", arg[0], arg[1], arg[2],
341 arg[3], arg[4]);
342 if (i < 2) {
343 fprintf(stderr, "ndp: bad line: %s\n", line);
344 retval = 1;
345 continue;
346 }
347 if (set(i, args))
348 retval = 1;
349 }
350 fclose(fp);
351 return (retval);
352 }
353
354 void
355 getsocket()
356 {
357 if (s < 0) {
358 s = socket(PF_ROUTE, SOCK_RAW, 0);
359 if (s < 0) {
360 err(1, "ndp: socket");
361 /* NOTREACHED */
362 }
363 }
364 }
365
366 struct sockaddr_in6 so_mask = {sizeof(so_mask), AF_INET6 };
367 struct sockaddr_in6 blank_sin = {sizeof(blank_sin), AF_INET6 }, sin_m;
368 struct sockaddr_dl blank_sdl = {sizeof(blank_sdl), AF_LINK }, sdl_m;
369 int expire_time, flags, found_entry;
370 struct {
371 struct rt_msghdr m_rtm;
372 char m_space[512];
373 } m_rtmsg;
374
375 /*
376 * Set an individual neighbor cache entry
377 */
378 int
379 set(argc, argv)
380 int argc;
381 char **argv;
382 {
383 register struct sockaddr_in6 *sin = &sin_m;
384 register struct sockaddr_dl *sdl;
385 register struct rt_msghdr *rtm = &(m_rtmsg.m_rtm);
386 struct addrinfo hints, *res;
387 int gai_error;
388 u_char *ea;
389 char *host = argv[0], *eaddr = argv[1];
390
391 getsocket();
392 argc -= 2;
393 argv += 2;
394 sdl_m = blank_sdl;
395 sin_m = blank_sin;
396
397 bzero(&hints, sizeof(hints));
398 hints.ai_family = AF_INET6;
399 gai_error = getaddrinfo(host, NULL, &hints, &res);
400 if (gai_error) {
401 fprintf(stderr, "ndp: %s: %s\n", host,
402 gai_strerror(gai_error));
403 return 1;
404 }
405 sin->sin6_addr = ((struct sockaddr_in6 *)res->ai_addr)->sin6_addr;
406 #ifdef __KAME__
407 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr)) {
408 *(u_int16_t *)&sin->sin6_addr.s6_addr[2] =
409 htons(((struct sockaddr_in6 *)res->ai_addr)->sin6_scope_id);
410 }
411 #endif
412 ea = (u_char *)LLADDR(&sdl_m);
413 if (ndp_ether_aton(eaddr, ea) == 0)
414 sdl_m.sdl_alen = 6;
415 flags = expire_time = 0;
416 while (argc-- > 0) {
417 if (strncmp(argv[0], "temp", 4) == 0) {
418 struct timeval time;
419
420 gettimeofday(&time, 0);
421 expire_time = time.tv_sec + 20 * 60;
422 } else if (strncmp(argv[0], "proxy", 5) == 0)
423 flags |= RTF_ANNOUNCE;
424 argv++;
425 }
426 if (rtmsg(RTM_GET) < 0) {
427 errx(1, "RTM_GET(%s) failed", host);
428 /* NOTREACHED */
429 }
430 sin = (struct sockaddr_in6 *)(rtm + 1);
431 sdl = (struct sockaddr_dl *)(ROUNDUP(sin->sin6_len) + (char *)sin);
432 if (IN6_ARE_ADDR_EQUAL(&sin->sin6_addr, &sin_m.sin6_addr)) {
433 if (sdl->sdl_family == AF_LINK &&
434 (rtm->rtm_flags & RTF_LLINFO) &&
435 !(rtm->rtm_flags & RTF_GATEWAY)) {
436 switch (sdl->sdl_type) {
437 case IFT_ETHER: case IFT_FDDI: case IFT_ISO88023:
438 case IFT_ISO88024: case IFT_ISO88025:
439 goto overwrite;
440 }
441 }
442 /*
443 * IPv4 arp command retries with sin_other = SIN_PROXY here.
444 */
445 fprintf(stderr, "set: cannot configure a new entry\n");
446 return 1;
447 }
448
449 overwrite:
450 if (sdl->sdl_family != AF_LINK) {
451 printf("cannot intuit interface index and type for %s\n", host);
452 return (1);
453 }
454 sdl_m.sdl_type = sdl->sdl_type;
455 sdl_m.sdl_index = sdl->sdl_index;
456 return (rtmsg(RTM_ADD));
457 }
458
459 /*
460 * Display an individual neighbor cache entry
461 */
462 void
463 get(host)
464 char *host;
465 {
466 struct sockaddr_in6 *sin = &sin_m;
467 struct addrinfo hints, *res;
468 int gai_error;
469
470 sin_m = blank_sin;
471 bzero(&hints, sizeof(hints));
472 hints.ai_family = AF_INET6;
473 gai_error = getaddrinfo(host, NULL, &hints, &res);
474 if (gai_error) {
475 fprintf(stderr, "ndp: %s: %s\n", host,
476 gai_strerror(gai_error));
477 return;
478 }
479 sin->sin6_addr = ((struct sockaddr_in6 *)res->ai_addr)->sin6_addr;
480 #ifdef __KAME__
481 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr)) {
482 *(u_int16_t *)&sin->sin6_addr.s6_addr[2] =
483 htons(((struct sockaddr_in6 *)res->ai_addr)->sin6_scope_id);
484 }
485 #endif
486 dump(&sin->sin6_addr, 0);
487 if (found_entry == 0) {
488 getnameinfo((struct sockaddr *)sin, sin->sin6_len, host_buf,
489 sizeof(host_buf), NULL ,0,
490 (nflag ? NI_NUMERICHOST : 0));
491 printf("%s (%s) -- no entry\n", host, host_buf);
492 exit(1);
493 }
494 }
495
496 /*
497 * Delete a neighbor cache entry
498 */
499 int
500 delete(host)
501 char *host;
502 {
503 struct sockaddr_in6 *sin = &sin_m;
504 register struct rt_msghdr *rtm = &m_rtmsg.m_rtm;
505 struct sockaddr_dl *sdl;
506 struct addrinfo hints, *res;
507 int gai_error;
508
509 getsocket();
510 sin_m = blank_sin;
511
512 bzero(&hints, sizeof(hints));
513 hints.ai_family = AF_INET6;
514 gai_error = getaddrinfo(host, NULL, &hints, &res);
515 if (gai_error) {
516 fprintf(stderr, "ndp: %s: %s\n", host,
517 gai_strerror(gai_error));
518 return 1;
519 }
520 sin->sin6_addr = ((struct sockaddr_in6 *)res->ai_addr)->sin6_addr;
521 #ifdef __KAME__
522 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr)) {
523 *(u_int16_t *)&sin->sin6_addr.s6_addr[2] =
524 htons(((struct sockaddr_in6 *)res->ai_addr)->sin6_scope_id);
525 }
526 #endif
527 if (rtmsg(RTM_GET) < 0) {
528 errx(1, "RTM_GET(%s) failed", host);
529 /* NOTREACHED */
530 }
531 sin = (struct sockaddr_in6 *)(rtm + 1);
532 sdl = (struct sockaddr_dl *)(ROUNDUP(sin->sin6_len) + (char *)sin);
533 if (IN6_ARE_ADDR_EQUAL(&sin->sin6_addr, &sin_m.sin6_addr)) {
534 if (sdl->sdl_family == AF_LINK &&
535 (rtm->rtm_flags & RTF_LLINFO) &&
536 !(rtm->rtm_flags & RTF_GATEWAY)) {
537 goto delete;
538 }
539 /*
540 * IPv4 arp command retries with sin_other = SIN_PROXY here.
541 */
542 fprintf(stderr, "delete: cannot delete non-NDP entry\n");
543 return 1;
544 }
545
546 delete:
547 if (sdl->sdl_family != AF_LINK) {
548 printf("cannot locate %s\n", host);
549 return (1);
550 }
551 if (rtmsg(RTM_DELETE) == 0) {
552 struct sockaddr_in6 s6 = *sin; /* XXX: for safety */
553
554 #ifdef __KAME__
555 if (IN6_IS_ADDR_LINKLOCAL(&s6.sin6_addr)) {
556 s6.sin6_scope_id = ntohs(*(u_int16_t *)&s6.sin6_addr.s6_addr[2]);
557 *(u_int16_t *)&s6.sin6_addr.s6_addr[2] = 0;
558 }
559 #endif
560 getnameinfo((struct sockaddr *)&s6,
561 s6.sin6_len, host_buf,
562 sizeof(host_buf), NULL, 0,
563 (nflag ? NI_NUMERICHOST : 0));
564 printf("%s (%s) deleted\n", host, host_buf);
565 }
566
567 return 0;
568 }
569
570 #define W_ADDR 36
571 #define W_LL 17
572 #define W_IF 6
573
574 /*
575 * Dump the entire neighbor cache
576 */
577 void
578 dump(addr, cflag)
579 struct in6_addr *addr;
580 int cflag;
581 {
582 int mib[6];
583 size_t needed;
584 char *lim, *buf, *next;
585 struct rt_msghdr *rtm;
586 struct sockaddr_in6 *sin;
587 struct sockaddr_dl *sdl;
588 extern int h_errno;
589 struct in6_nbrinfo *nbi;
590 struct timeval time;
591 int addrwidth;
592 int llwidth;
593 int ifwidth;
594 char flgbuf[8];
595 char *ifname;
596
597 /* Print header */
598 if (!tflag && !cflag)
599 printf("%-*.*s %-*.*s %*.*s %-9.9s %1s %5s\n",
600 W_ADDR, W_ADDR, "Neighbor", W_LL, W_LL, "Linklayer Address",
601 W_IF, W_IF, "Netif", "Expire", "S", "Flags");
602
603 again:;
604 mib[0] = CTL_NET;
605 mib[1] = PF_ROUTE;
606 mib[2] = 0;
607 mib[3] = AF_INET6;
608 mib[4] = NET_RT_FLAGS;
609 mib[5] = RTF_LLINFO;
610 if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0)
611 err(1, "sysctl(PF_ROUTE estimate)");
612 if (needed > 0) {
613 if ((buf = malloc(needed)) == NULL)
614 errx(1, "malloc");
615 if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0)
616 err(1, "sysctl(PF_ROUTE, NET_RT_FLAGS)");
617 lim = buf + needed;
618 } else
619 buf = lim = NULL;
620
621 for (next = buf; next && next < lim; next += rtm->rtm_msglen) {
622 int isrouter = 0, prbs = 0;
623
624 rtm = (struct rt_msghdr *)next;
625 sin = (struct sockaddr_in6 *)(rtm + 1);
626 sdl = (struct sockaddr_dl *)((char *)sin + ROUNDUP(sin->sin6_len));
627
628 /*
629 * Some OSes can produce a route that has the LINK flag but
630 * has a non-AF_LINK gateway (e.g. fe80::xx%lo0 on FreeBSD
631 * and BSD/OS, where xx is not the interface identifier on
632 * lo0). Such routes entry would annoy getnbrinfo() below,
633 * so we skip them.
634 * XXX: such routes should have the GATEWAY flag, not the
635 * LINK flag. However, there is rotten routing software
636 * that advertises all routes that have the GATEWAY flag.
637 * Thus, KAME kernel intentionally does not set the LINK flag.
638 * What is to be fixed is not ndp, but such routing software
639 * (and the kernel workaround)...
640 */
641 if (sdl->sdl_family != AF_LINK)
642 continue;
643
644 if (!(rtm->rtm_flags & RTF_HOST))
645 continue;
646
647 if (addr) {
648 if (!IN6_ARE_ADDR_EQUAL(addr, &sin->sin6_addr))
649 continue;
650 found_entry = 1;
651 } else if (IN6_IS_ADDR_MULTICAST(&sin->sin6_addr))
652 continue;
653 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr) ||
654 IN6_IS_ADDR_MC_LINKLOCAL(&sin->sin6_addr)) {
655 /* XXX: should scope id be filled in the kernel? */
656 if (sin->sin6_scope_id == 0)
657 sin->sin6_scope_id = sdl->sdl_index;
658 #ifdef __KAME__
659 /* KAME specific hack; removed the embedded id */
660 *(u_int16_t *)&sin->sin6_addr.s6_addr[2] = 0;
661 #endif
662 }
663 getnameinfo((struct sockaddr *)sin, sin->sin6_len, host_buf,
664 sizeof(host_buf), NULL, 0, (nflag ? NI_NUMERICHOST : 0));
665 if (cflag) {
666 #ifdef RTF_WASCLONED
667 if (rtm->rtm_flags & RTF_WASCLONED)
668 delete(host_buf);
669 #elif defined(RTF_CLONED)
670 if (rtm->rtm_flags & RTF_CLONED)
671 delete(host_buf);
672 #else
673 delete(host_buf);
674 #endif
675 continue;
676 }
677 gettimeofday(&time, 0);
678 if (tflag)
679 ts_print(&time);
680
681 addrwidth = strlen(host_buf);
682 if (addrwidth < W_ADDR)
683 addrwidth = W_ADDR;
684 llwidth = strlen(ether_str(sdl));
685 if (W_ADDR + W_LL - addrwidth > llwidth)
686 llwidth = W_ADDR + W_LL - addrwidth;
687 ifname = if_indextoname(sdl->sdl_index, ifix_buf);
688 if (!ifname)
689 ifname = "?";
690 ifwidth = strlen(ifname);
691 if (W_ADDR + W_LL + W_IF - addrwidth - llwidth > ifwidth)
692 ifwidth = W_ADDR + W_LL + W_IF - addrwidth - llwidth;
693
694 printf("%-*.*s %-*.*s %*.*s", addrwidth, addrwidth, host_buf,
695 llwidth, llwidth, ether_str(sdl), ifwidth, ifwidth, ifname);
696
697 /* Print neighbor discovery specific informations */
698 nbi = getnbrinfo(&sin->sin6_addr, sdl->sdl_index, 1);
699 if (nbi) {
700 if (nbi->expire > time.tv_sec) {
701 printf(" %-9.9s",
702 sec2str(nbi->expire - time.tv_sec));
703 } else if (nbi->expire == 0)
704 printf(" %-9.9s", "permanent");
705 else
706 printf(" %-9.9s", "expired");
707
708 switch (nbi->state) {
709 case ND6_LLINFO_NOSTATE:
710 printf(" N");
711 break;
712 #ifdef ND6_LLINFO_WAITDELETE
713 case ND6_LLINFO_WAITDELETE:
714 printf(" W");
715 break;
716 #endif
717 case ND6_LLINFO_INCOMPLETE:
718 printf(" I");
719 break;
720 case ND6_LLINFO_REACHABLE:
721 printf(" R");
722 break;
723 case ND6_LLINFO_STALE:
724 printf(" S");
725 break;
726 case ND6_LLINFO_DELAY:
727 printf(" D");
728 break;
729 case ND6_LLINFO_PROBE:
730 printf(" P");
731 break;
732 default:
733 printf(" ?");
734 break;
735 }
736
737 isrouter = nbi->isrouter;
738 prbs = nbi->asked;
739 } else {
740 warnx("failed to get neighbor information");
741 printf(" ");
742 }
743
744 /*
745 * other flags. R: router, P: proxy, W: ??
746 */
747 if ((rtm->rtm_addrs & RTA_NETMASK) == 0) {
748 snprintf(flgbuf, sizeof(flgbuf), "%s%s",
749 isrouter ? "R" : "",
750 (rtm->rtm_flags & RTF_ANNOUNCE) ? "p" : "");
751 } else {
752 sin = (struct sockaddr_in6 *)
753 (sdl->sdl_len + (char *)sdl);
754 #if 0 /* W and P are mystery even for us */
755 snprintf(flgbuf, sizeof(flgbuf), "%s%s%s%s",
756 isrouter ? "R" : "",
757 !IN6_IS_ADDR_UNSPECIFIED(&sin->sin6_addr) ? "P" : "",
758 (sin->sin6_len != sizeof(struct sockaddr_in6)) ? "W" : "",
759 (rtm->rtm_flags & RTF_ANNOUNCE) ? "p" : "");
760 #else
761 snprintf(flgbuf, sizeof(flgbuf), "%s%s",
762 isrouter ? "R" : "",
763 (rtm->rtm_flags & RTF_ANNOUNCE) ? "p" : "");
764 #endif
765 }
766 printf(" %s", flgbuf);
767
768 if (prbs)
769 printf(" %d", prbs);
770
771 printf("\n");
772 }
773 if (buf != NULL)
774 free(buf);
775
776 if (repeat) {
777 printf("\n");
778 sleep(repeat);
779 goto again;
780 }
781 }
782
783 static struct in6_nbrinfo *
784 getnbrinfo(addr, ifindex, warning)
785 struct in6_addr *addr;
786 int ifindex;
787 int warning;
788 {
789 static struct in6_nbrinfo nbi;
790 int s;
791
792 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
793 err(1, "socket");
794
795 bzero(&nbi, sizeof(nbi));
796 if_indextoname(ifindex, nbi.ifname);
797 nbi.addr = *addr;
798 if (ioctl(s, SIOCGNBRINFO_IN6, (caddr_t)&nbi) < 0) {
799 if (warning)
800 warn("ioctl(SIOCGNBRINFO_IN6)");
801 close(s);
802 return(NULL);
803 }
804
805 close(s);
806 return(&nbi);
807 }
808
809 static char *
810 ether_str(sdl)
811 struct sockaddr_dl *sdl;
812 {
813 static char hbuf[NI_MAXHOST];
814
815 if (sdl->sdl_alen) {
816 if (getnameinfo((struct sockaddr *)sdl, sdl->sdl_len,
817 hbuf, sizeof(hbuf), NULL, 0, NI_NUMERICHOST) != 0)
818 snprintf(hbuf, sizeof(hbuf), "<invalid>");
819 } else
820 snprintf(hbuf, sizeof(hbuf), "(incomplete)");
821
822 return(hbuf);
823 }
824
825 int
826 ndp_ether_aton(a, n)
827 char *a;
828 u_char *n;
829 {
830 int i, o[6];
831
832 i = sscanf(a, "%x:%x:%x:%x:%x:%x", &o[0], &o[1], &o[2],
833 &o[3], &o[4], &o[5]);
834 if (i != 6) {
835 fprintf(stderr, "ndp: invalid Ethernet address '%s'\n", a);
836 return (1);
837 }
838 for (i = 0; i < 6; i++)
839 n[i] = o[i];
840 return (0);
841 }
842
843 void
844 usage()
845 {
846 printf("usage: ndp [-nt] hostname\n");
847 printf(" ndp [-nt] -a | -c | -p | -r | -H | -P | -R\n");
848 printf(" ndp [-nt] -A wait\n");
849 printf(" ndp [-nt] -d hostname\n");
850 printf(" ndp [-nt] -f filename\n");
851 printf(" ndp [-nt] -i interface [flags...]\n");
852 #ifdef SIOCSDEFIFACE_IN6
853 printf(" ndp [-nt] -I [interface|delete]\n");
854 #endif
855 printf(" ndp [-nt] -s nodename etheraddr [temp] [proxy]\n");
856 exit(1);
857 }
858
859 int
860 rtmsg(cmd)
861 int cmd;
862 {
863 static int seq;
864 int rlen;
865 register struct rt_msghdr *rtm = &m_rtmsg.m_rtm;
866 register char *cp = m_rtmsg.m_space;
867 register int l;
868
869 errno = 0;
870 if (cmd == RTM_DELETE)
871 goto doit;
872 bzero((char *)&m_rtmsg, sizeof(m_rtmsg));
873 rtm->rtm_flags = flags;
874 rtm->rtm_version = RTM_VERSION;
875
876 switch (cmd) {
877 default:
878 fprintf(stderr, "ndp: internal wrong cmd\n");
879 exit(1);
880 case RTM_ADD:
881 rtm->rtm_addrs |= RTA_GATEWAY;
882 if (expire_time) {
883 rtm->rtm_rmx.rmx_expire = expire_time;
884 rtm->rtm_inits = RTV_EXPIRE;
885 }
886 rtm->rtm_flags |= (RTF_HOST | RTF_STATIC);
887 if (rtm->rtm_flags & RTF_ANNOUNCE) {
888 rtm->rtm_flags &= ~RTF_HOST;
889 rtm->rtm_flags |= RTA_NETMASK;
890 }
891 /* FALLTHROUGH */
892 case RTM_GET:
893 rtm->rtm_addrs |= RTA_DST;
894 }
895 #define NEXTADDR(w, s) \
896 if (rtm->rtm_addrs & (w)) { \
897 bcopy((char *)&s, cp, sizeof(s)); cp += sizeof(s);}
898
899 NEXTADDR(RTA_DST, sin_m);
900 NEXTADDR(RTA_GATEWAY, sdl_m);
901 memset(&so_mask.sin6_addr, 0xff, sizeof(so_mask.sin6_addr));
902 NEXTADDR(RTA_NETMASK, so_mask);
903
904 rtm->rtm_msglen = cp - (char *)&m_rtmsg;
905 doit:
906 l = rtm->rtm_msglen;
907 rtm->rtm_seq = ++seq;
908 rtm->rtm_type = cmd;
909 if ((rlen = write(s, (char *)&m_rtmsg, l)) < 0) {
910 if (errno != ESRCH || cmd != RTM_DELETE) {
911 err(1, "writing to routing socket");
912 /* NOTREACHED */
913 }
914 }
915 do {
916 l = read(s, (char *)&m_rtmsg, sizeof(m_rtmsg));
917 } while (l > 0 && (rtm->rtm_seq != seq || rtm->rtm_pid != pid));
918 if (l < 0)
919 (void) fprintf(stderr, "ndp: read from routing socket: %s\n",
920 strerror(errno));
921 return (0);
922 }
923
924 void
925 ifinfo(ifname, argc, argv)
926 char *ifname;
927 int argc;
928 char **argv;
929 {
930 struct in6_ndireq nd;
931 int i, s;
932 u_int32_t newflags;
933 #ifdef IPV6CTL_USETEMPADDR
934 u_int8_t nullbuf[8];
935 #endif
936
937 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
938 err(1, "socket");
939 /* NOTREACHED */
940 }
941 bzero(&nd, sizeof(nd));
942 strlcpy(nd.ifname, ifname, sizeof(nd.ifname));
943 if (ioctl(s, SIOCGIFINFO_IN6, (caddr_t)&nd) < 0) {
944 err(1, "ioctl(SIOCGIFINFO_IN6)");
945 /* NOTREACHED */
946 }
947 #define ND nd.ndi
948 newflags = ND.flags;
949 for (i = 0; i < argc; i++) {
950 int clear = 0;
951 char *cp = argv[i];
952
953 if (*cp == '-') {
954 clear = 1;
955 cp++;
956 }
957
958 #define SETFLAG(s, f) \
959 do {\
960 if (strcmp(cp, (s)) == 0) {\
961 if (clear)\
962 newflags &= ~(f);\
963 else\
964 newflags |= (f);\
965 }\
966 } while (0)
967 SETFLAG("nud", ND6_IFF_PERFORMNUD);
968 #ifdef ND6_IFF_ACCEPT_RTADV
969 SETFLAG("accept_rtadv", ND6_IFF_ACCEPT_RTADV);
970 #endif
971 #ifdef ND6_IFF_PREFER_SOURCE
972 SETFLAG("prefer_source", ND6_IFF_PREFER_SOURCE);
973 #endif
974
975 ND.flags = newflags;
976 if (ioctl(s, SIOCSIFINFO_FLAGS, (caddr_t)&nd) < 0) {
977 err(1, "ioctl(SIOCSIFINFO_FLAGS)");
978 /* NOTREACHED */
979 }
980 #undef SETFLAG
981 }
982
983 if (!ND.initialized) {
984 errx(1, "%s: not initialized yet", ifname);
985 /* NOTREACHED */
986 }
987
988 printf("linkmtu=%d", ND.linkmtu);
989 printf(", curhlim=%d", ND.chlim);
990 printf(", basereachable=%ds%dms",
991 ND.basereachable / 1000, ND.basereachable % 1000);
992 printf(", reachable=%ds", ND.reachable);
993 printf(", retrans=%ds%dms", ND.retrans / 1000, ND.retrans % 1000);
994 #ifdef IPV6CTL_USETEMPADDR
995 memset(nullbuf, 0, sizeof(nullbuf));
996 if (memcmp(nullbuf, ND.randomid, sizeof(nullbuf)) != 0) {
997 int j;
998 u_int8_t *rbuf;
999
1000 for (i = 0; i < 3; i++) {
1001 switch (i) {
1002 case 0:
1003 printf("\nRandom seed(0): ");
1004 rbuf = ND.randomseed0;
1005 break;
1006 case 1:
1007 printf("\nRandom seed(1): ");
1008 rbuf = ND.randomseed1;
1009 break;
1010 case 2:
1011 printf("\nRandom ID: ");
1012 rbuf = ND.randomid;
1013 break;
1014 }
1015 for (j = 0; j < 8; j++)
1016 printf("%02x", rbuf[j]);
1017 }
1018 }
1019 #endif
1020 if (ND.flags) {
1021 printf("\nFlags: ");
1022 if ((ND.flags & ND6_IFF_PERFORMNUD))
1023 printf("PERFORMNUD ");
1024 #ifdef ND6_IFF_ACCEPT_RTADV
1025 if ((ND.flags & ND6_IFF_ACCEPT_RTADV))
1026 printf("ACCEPT_RA ");
1027 #endif
1028 #ifdef ND6_IFF_PREFER_SOURCE
1029 if ((ND.flags & ND6_IFF_PREFER_SOURCE))
1030 printf("PREFER_SRC ");
1031 #endif
1032 }
1033 putc('\n', stdout);
1034 #undef ND
1035
1036 close(s);
1037 }
1038
1039 #ifndef ND_RA_FLAG_RTPREF_MASK /* XXX: just for compilation on *BSD release */
1040 #define ND_RA_FLAG_RTPREF_MASK 0x18 /* 00011000 */
1041 #endif
1042
1043 void
1044 rtrlist()
1045 {
1046 #ifdef ICMPV6CTL_ND6_DRLIST
1047 int mib[] = { CTL_NET, PF_INET6, IPPROTO_ICMPV6, ICMPV6CTL_ND6_DRLIST };
1048 char *buf;
1049 struct in6_defrouter *p, *ep;
1050 size_t l;
1051 struct timeval time;
1052
1053 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), NULL, &l, NULL, 0) < 0) {
1054 err(1, "sysctl(ICMPV6CTL_ND6_DRLIST)");
1055 /*NOTREACHED*/
1056 }
1057 buf = malloc(l);
1058 if (!buf) {
1059 errx(1, "not enough core");
1060 /*NOTREACHED*/
1061 }
1062 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), buf, &l, NULL, 0) < 0) {
1063 err(1, "sysctl(ICMPV6CTL_ND6_DRLIST)");
1064 /*NOTREACHED*/
1065 }
1066
1067 ep = (struct in6_defrouter *)(buf + l);
1068 for (p = (struct in6_defrouter *)buf; p < ep; p++) {
1069 int rtpref;
1070
1071 if (getnameinfo((struct sockaddr *)&p->rtaddr,
1072 p->rtaddr.sin6_len, host_buf, sizeof(host_buf), NULL, 0,
1073 (nflag ? NI_NUMERICHOST : 0)) != 0)
1074 strlcpy(host_buf, "?", sizeof(host_buf));
1075
1076 printf("%s if=%s", host_buf,
1077 if_indextoname(p->if_index, ifix_buf));
1078 printf(", flags=%s%s",
1079 p->flags & ND_RA_FLAG_MANAGED ? "M" : "",
1080 p->flags & ND_RA_FLAG_OTHER ? "O" : "");
1081 rtpref = ((p->flags & ND_RA_FLAG_RTPREF_MASK) >> 3) & 0xff;
1082 printf(", pref=%s", rtpref_str[rtpref]);
1083
1084 gettimeofday(&time, 0);
1085 if (p->expire == 0)
1086 printf(", expire=Never\n");
1087 else
1088 printf(", expire=%s\n",
1089 sec2str(p->expire - time.tv_sec));
1090 }
1091 free(buf);
1092 #else
1093 struct in6_drlist dr;
1094 int s, i;
1095 struct timeval time;
1096
1097 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
1098 err(1, "socket");
1099 /* NOTREACHED */
1100 }
1101 bzero(&dr, sizeof(dr));
1102 strlcpy(dr.ifname, "lo0", sizeof(dr.ifname)); /* dummy */
1103 if (ioctl(s, SIOCGDRLST_IN6, (caddr_t)&dr) < 0) {
1104 err(1, "ioctl(SIOCGDRLST_IN6)");
1105 /* NOTREACHED */
1106 }
1107 #define DR dr.defrouter[i]
1108 for (i = 0 ; DR.if_index && i < DRLSTSIZ ; i++) {
1109 struct sockaddr_in6 sin6;
1110
1111 bzero(&sin6, sizeof(sin6));
1112 sin6.sin6_family = AF_INET6;
1113 sin6.sin6_len = sizeof(sin6);
1114 sin6.sin6_addr = DR.rtaddr;
1115 getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len, host_buf,
1116 sizeof(host_buf), NULL, 0,
1117 (nflag ? NI_NUMERICHOST : 0));
1118
1119 printf("%s if=%s", host_buf,
1120 if_indextoname(DR.if_index, ifix_buf));
1121 printf(", flags=%s%s",
1122 DR.flags & ND_RA_FLAG_MANAGED ? "M" : "",
1123 DR.flags & ND_RA_FLAG_OTHER ? "O" : "");
1124 gettimeofday(&time, 0);
1125 if (DR.expire == 0)
1126 printf(", expire=Never\n");
1127 else
1128 printf(", expire=%s\n",
1129 sec2str(DR.expire - time.tv_sec));
1130 }
1131 #undef DR
1132 close(s);
1133 #endif
1134 }
1135
1136 void
1137 plist()
1138 {
1139 #ifdef ICMPV6CTL_ND6_PRLIST
1140 int mib[] = { CTL_NET, PF_INET6, IPPROTO_ICMPV6, ICMPV6CTL_ND6_PRLIST };
1141 char *buf;
1142 struct in6_prefix *p, *ep, *n;
1143 struct sockaddr_in6 *advrtr;
1144 size_t l;
1145 struct timeval time;
1146 const int niflags = NI_NUMERICHOST;
1147 int ninflags = nflag ? NI_NUMERICHOST : 0;
1148 char namebuf[NI_MAXHOST];
1149
1150 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), NULL, &l, NULL, 0) < 0) {
1151 err(1, "sysctl(ICMPV6CTL_ND6_PRLIST)");
1152 /*NOTREACHED*/
1153 }
1154 buf = malloc(l);
1155 if (!buf) {
1156 errx(1, "not enough core");
1157 /*NOTREACHED*/
1158 }
1159 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), buf, &l, NULL, 0) < 0) {
1160 err(1, "sysctl(ICMPV6CTL_ND6_PRLIST)");
1161 /*NOTREACHED*/
1162 }
1163
1164 ep = (struct in6_prefix *)(buf + l);
1165 for (p = (struct in6_prefix *)buf; p < ep; p = n) {
1166 advrtr = (struct sockaddr_in6 *)(p + 1);
1167 n = (struct in6_prefix *)&advrtr[p->advrtrs];
1168
1169 if (getnameinfo((struct sockaddr *)&p->prefix,
1170 p->prefix.sin6_len, namebuf, sizeof(namebuf),
1171 NULL, 0, niflags) != 0)
1172 strlcpy(namebuf, "?", sizeof(namebuf));
1173 printf("%s/%d if=%s\n", namebuf, p->prefixlen,
1174 if_indextoname(p->if_index, ifix_buf));
1175
1176 gettimeofday(&time, 0);
1177 /*
1178 * meaning of fields, especially flags, is very different
1179 * by origin. notify the difference to the users.
1180 */
1181 printf("flags=%s%s%s%s%s",
1182 p->raflags.onlink ? "L" : "",
1183 p->raflags.autonomous ? "A" : "",
1184 (p->flags & NDPRF_ONLINK) != 0 ? "O" : "",
1185 (p->flags & NDPRF_DETACHED) != 0 ? "D" : "",
1186 #ifdef NDPRF_HOME
1187 (p->flags & NDPRF_HOME) != 0 ? "H" : ""
1188 #else
1189 ""
1190 #endif
1191 );
1192 if (p->vltime == ND6_INFINITE_LIFETIME)
1193 printf(" vltime=infinity");
1194 else
1195 printf(" vltime=%lu", (unsigned long)p->vltime);
1196 if (p->pltime == ND6_INFINITE_LIFETIME)
1197 printf(", pltime=infinity");
1198 else
1199 printf(", pltime=%lu", (unsigned long)p->pltime);
1200 if (p->expire == 0)
1201 printf(", expire=Never");
1202 else if (p->expire >= time.tv_sec)
1203 printf(", expire=%s",
1204 sec2str(p->expire - time.tv_sec));
1205 else
1206 printf(", expired");
1207 printf(", ref=%d", p->refcnt);
1208 printf("\n");
1209 /*
1210 * "advertising router" list is meaningful only if the prefix
1211 * information is from RA.
1212 */
1213 if (p->advrtrs) {
1214 int j;
1215 struct sockaddr_in6 *sin6;
1216
1217 sin6 = advrtr;
1218 printf(" advertised by\n");
1219 for (j = 0; j < p->advrtrs; j++) {
1220 struct in6_nbrinfo *nbi;
1221
1222 if (getnameinfo((struct sockaddr *)sin6,
1223 sin6->sin6_len, namebuf, sizeof(namebuf),
1224 NULL, 0, ninflags) != 0)
1225 strlcpy(namebuf, "?", sizeof(namebuf));
1226 printf(" %s", namebuf);
1227
1228 nbi = getnbrinfo(&sin6->sin6_addr,
1229 p->if_index, 0);
1230 if (nbi) {
1231 switch (nbi->state) {
1232 case ND6_LLINFO_REACHABLE:
1233 case ND6_LLINFO_STALE:
1234 case ND6_LLINFO_DELAY:
1235 case ND6_LLINFO_PROBE:
1236 printf(" (reachable)\n");
1237 break;
1238 default:
1239 printf(" (unreachable)\n");
1240 }
1241 } else
1242 printf(" (no neighbor state)\n");
1243 sin6++;
1244 }
1245 } else
1246 printf(" No advertising router\n");
1247 }
1248 free(buf);
1249 #else
1250 struct in6_prlist pr;
1251 int s, i;
1252 struct timeval time;
1253
1254 gettimeofday(&time, 0);
1255
1256 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
1257 err(1, "socket");
1258 /* NOTREACHED */
1259 }
1260 bzero(&pr, sizeof(pr));
1261 strlcpy(pr.ifname, "lo0", sizeof(pr.ifname)); /* dummy */
1262 if (ioctl(s, SIOCGPRLST_IN6, (caddr_t)&pr) < 0) {
1263 err(1, "ioctl(SIOCGPRLST_IN6)");
1264 /* NOTREACHED */
1265 }
1266 #define PR pr.prefix[i]
1267 for (i = 0; PR.if_index && i < PRLSTSIZ ; i++) {
1268 struct sockaddr_in6 p6;
1269 char namebuf[NI_MAXHOST];
1270 int niflags;
1271
1272 #ifdef NDPRF_ONLINK
1273 p6 = PR.prefix;
1274 #else
1275 memset(&p6, 0, sizeof(p6));
1276 p6.sin6_family = AF_INET6;
1277 p6.sin6_len = sizeof(p6);
1278 p6.sin6_addr = PR.prefix;
1279 #endif
1280
1281 /*
1282 * copy link index to sin6_scope_id field.
1283 * XXX: KAME specific.
1284 */
1285 if (IN6_IS_ADDR_LINKLOCAL(&p6.sin6_addr)) {
1286 u_int16_t linkid;
1287
1288 memcpy(&linkid, &p6.sin6_addr.s6_addr[2],
1289 sizeof(linkid));
1290 linkid = ntohs(linkid);
1291 p6.sin6_scope_id = linkid;
1292 p6.sin6_addr.s6_addr[2] = 0;
1293 p6.sin6_addr.s6_addr[3] = 0;
1294 }
1295
1296 niflags = NI_NUMERICHOST;
1297 if (getnameinfo((struct sockaddr *)&p6,
1298 sizeof(p6), namebuf, sizeof(namebuf),
1299 NULL, 0, niflags)) {
1300 warnx("getnameinfo failed");
1301 continue;
1302 }
1303 printf("%s/%d if=%s\n", namebuf, PR.prefixlen,
1304 if_indextoname(PR.if_index, ifix_buf));
1305
1306 gettimeofday(&time, 0);
1307 /*
1308 * meaning of fields, especially flags, is very different
1309 * by origin. notify the difference to the users.
1310 */
1311 #if 0
1312 printf(" %s",
1313 PR.origin == PR_ORIG_RA ? "" : "advertise: ");
1314 #endif
1315 #ifdef NDPRF_ONLINK
1316 printf("flags=%s%s%s%s%s",
1317 PR.raflags.onlink ? "L" : "",
1318 PR.raflags.autonomous ? "A" : "",
1319 (PR.flags & NDPRF_ONLINK) != 0 ? "O" : "",
1320 (PR.flags & NDPRF_DETACHED) != 0 ? "D" : "",
1321 #ifdef NDPRF_HOME
1322 (PR.flags & NDPRF_HOME) != 0 ? "H" : ""
1323 #else
1324 ""
1325 #endif
1326 );
1327 #else
1328 printf("flags=%s%s",
1329 PR.raflags.onlink ? "L" : "",
1330 PR.raflags.autonomous ? "A" : "");
1331 #endif
1332 if (PR.vltime == ND6_INFINITE_LIFETIME)
1333 printf(" vltime=infinity");
1334 else
1335 printf(" vltime=%lu", PR.vltime);
1336 if (PR.pltime == ND6_INFINITE_LIFETIME)
1337 printf(", pltime=infinity");
1338 else
1339 printf(", pltime=%lu", PR.pltime);
1340 if (PR.expire == 0)
1341 printf(", expire=Never");
1342 else if (PR.expire >= time.tv_sec)
1343 printf(", expire=%s",
1344 sec2str(PR.expire - time.tv_sec));
1345 else
1346 printf(", expired");
1347 #ifdef NDPRF_ONLINK
1348 printf(", ref=%d", PR.refcnt);
1349 #endif
1350 #if 0
1351 switch (PR.origin) {
1352 case PR_ORIG_RA:
1353 printf(", origin=RA");
1354 break;
1355 case PR_ORIG_RR:
1356 printf(", origin=RR");
1357 break;
1358 case PR_ORIG_STATIC:
1359 printf(", origin=static");
1360 break;
1361 case PR_ORIG_KERNEL:
1362 printf(", origin=kernel");
1363 break;
1364 default:
1365 printf(", origin=?");
1366 break;
1367 }
1368 #endif
1369 printf("\n");
1370 /*
1371 * "advertising router" list is meaningful only if the prefix
1372 * information is from RA.
1373 */
1374 if (0 && /* prefix origin is almost obsolted */
1375 PR.origin != PR_ORIG_RA)
1376 ;
1377 else if (PR.advrtrs) {
1378 int j;
1379 printf(" advertised by\n");
1380 for (j = 0; j < PR.advrtrs; j++) {
1381 struct sockaddr_in6 sin6;
1382 struct in6_nbrinfo *nbi;
1383
1384 bzero(&sin6, sizeof(sin6));
1385 sin6.sin6_family = AF_INET6;
1386 sin6.sin6_len = sizeof(sin6);
1387 sin6.sin6_addr = PR.advrtr[j];
1388 sin6.sin6_scope_id = PR.if_index; /* XXX */
1389 getnameinfo((struct sockaddr *)&sin6,
1390 sin6.sin6_len, host_buf,
1391 sizeof(host_buf), NULL, 0,
1392 (nflag ? NI_NUMERICHOST : 0));
1393 printf(" %s", host_buf);
1394
1395 nbi = getnbrinfo(&sin6.sin6_addr,
1396 PR.if_index, 0);
1397 if (nbi) {
1398 switch (nbi->state) {
1399 case ND6_LLINFO_REACHABLE:
1400 case ND6_LLINFO_STALE:
1401 case ND6_LLINFO_DELAY:
1402 case ND6_LLINFO_PROBE:
1403 printf(" (reachable)\n");
1404 break;
1405 default:
1406 printf(" (unreachable)\n");
1407 }
1408 } else
1409 printf(" (no neighbor state)\n");
1410 }
1411 if (PR.advrtrs > DRLSTSIZ)
1412 printf(" and %d routers\n",
1413 PR.advrtrs - DRLSTSIZ);
1414 } else
1415 printf(" No advertising router\n");
1416 }
1417 #undef PR
1418 close(s);
1419 #endif
1420 }
1421
1422 void
1423 pfx_flush()
1424 {
1425 char dummyif[IFNAMSIZ+8];
1426 int s;
1427
1428 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
1429 err(1, "socket");
1430 strlcpy(dummyif, "lo0", sizeof(dummyif)); /* dummy */
1431 if (ioctl(s, SIOCSPFXFLUSH_IN6, (caddr_t)&dummyif) < 0)
1432 err(1, "ioctl(SIOCSPFXFLUSH_IN6)");
1433 }
1434
1435 void
1436 rtr_flush()
1437 {
1438 char dummyif[IFNAMSIZ+8];
1439 int s;
1440
1441 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
1442 err(1, "socket");
1443 strlcpy(dummyif, "lo0", sizeof(dummyif)); /* dummy */
1444 if (ioctl(s, SIOCSRTRFLUSH_IN6, (caddr_t)&dummyif) < 0)
1445 err(1, "ioctl(SIOCSRTRFLUSH_IN6)");
1446
1447 close(s);
1448 }
1449
1450 void
1451 harmonize_rtr()
1452 {
1453 char dummyif[IFNAMSIZ+8];
1454 int s;
1455
1456 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
1457 err(1, "socket");
1458 strlcpy(dummyif, "lo0", sizeof(dummyif)); /* dummy */
1459 if (ioctl(s, SIOCSNDFLUSH_IN6, (caddr_t)&dummyif) < 0)
1460 err(1, "ioctl(SIOCSNDFLUSH_IN6)");
1461
1462 close(s);
1463 }
1464
1465 #ifdef SIOCSDEFIFACE_IN6 /* XXX: check SIOCGDEFIFACE_IN6 as well? */
1466 static void
1467 setdefif(ifname)
1468 char *ifname;
1469 {
1470 struct in6_ndifreq ndifreq;
1471 unsigned int ifindex;
1472
1473 if (strcasecmp(ifname, "delete") == 0)
1474 ifindex = 0;
1475 else {
1476 if ((ifindex = if_nametoindex(ifname)) == 0)
1477 err(1, "failed to resolve i/f index for %s", ifname);
1478 }
1479
1480 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
1481 err(1, "socket");
1482
1483 strlcpy(ndifreq.ifname, "lo0", sizeof(ndifreq.ifname)); /* dummy */
1484 ndifreq.ifindex = ifindex;
1485
1486 if (ioctl(s, SIOCSDEFIFACE_IN6, (caddr_t)&ndifreq) < 0)
1487 err(1, "ioctl(SIOCSDEFIFACE_IN6)");
1488
1489 close(s);
1490 }
1491
1492 static void
1493 getdefif()
1494 {
1495 struct in6_ndifreq ndifreq;
1496 char ifname[IFNAMSIZ+8];
1497
1498 if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0)
1499 err(1, "socket");
1500
1501 memset(&ndifreq, 0, sizeof(ndifreq));
1502 strlcpy(ndifreq.ifname, "lo0", sizeof(ndifreq.ifname)); /* dummy */
1503
1504 if (ioctl(s, SIOCGDEFIFACE_IN6, (caddr_t)&ndifreq) < 0)
1505 err(1, "ioctl(SIOCGDEFIFACE_IN6)");
1506
1507 if (ndifreq.ifindex == 0)
1508 printf("No default interface.\n");
1509 else {
1510 if ((if_indextoname(ndifreq.ifindex, ifname)) == NULL)
1511 err(1, "failed to resolve ifname for index %lu",
1512 ndifreq.ifindex);
1513 printf("ND default interface = %s\n", ifname);
1514 }
1515
1516 close(s);
1517 }
1518 #endif
1519
1520 static char *
1521 sec2str(total)
1522 time_t total;
1523 {
1524 static char result[256];
1525 int days, hours, mins, secs;
1526 int first = 1;
1527 char *p = result;
1528 char *ep = &result[sizeof(result)];
1529 int n;
1530
1531 days = total / 3600 / 24;
1532 hours = (total / 3600) % 24;
1533 mins = (total / 60) % 60;
1534 secs = total % 60;
1535
1536 if (days) {
1537 first = 0;
1538 n = snprintf(p, ep - p, "%dd", days);
1539 if (n < 0 || n >= ep - p)
1540 return "?";
1541 p += n;
1542 }
1543 if (!first || hours) {
1544 first = 0;
1545 n = snprintf(p, ep - p, "%dh", hours);
1546 if (n < 0 || n >= ep - p)
1547 return "?";
1548 p += n;
1549 }
1550 if (!first || mins) {
1551 first = 0;
1552 n = snprintf(p, ep - p, "%dm", mins);
1553 if (n < 0 || n >= ep - p)
1554 return "?";
1555 p += n;
1556 }
1557 snprintf(p, ep - p, "%ds", secs);
1558
1559 return(result);
1560 }
1561
1562 /*
1563 * Print the timestamp
1564 * from tcpdump/util.c
1565 */
1566 static void
1567 ts_print(tvp)
1568 const struct timeval *tvp;
1569 {
1570 int s;
1571
1572 /* Default */
1573 s = (tvp->tv_sec + thiszone) % 86400;
1574 (void)printf("%02d:%02d:%02d.%06u ",
1575 s / 3600, (s % 3600) / 60, s % 60, (u_int32_t)tvp->tv_usec);
1576 }
1577