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