ndp.c revision 81366 
1/*	$FreeBSD: head/usr.sbin/ndp/ndp.c 81366 2001-08-09 19:40:35Z sumikawa $	*/
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}
1529