Home | History | Annotate | Line # | Download | only in rtadvd
      1 /*	$NetBSD: dump.c,v 1.18 2021/03/23 18:16:53 christos Exp $	*/
      2 /*	$KAME: dump.c,v 1.34 2004/06/14 05:35:59 itojun Exp $	*/
      3 
      4 /*
      5  * Copyright (C) 2000 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 #include <sys/types.h>
     33 #include <sys/socket.h>
     34 #include <sys/queue.h>
     35 
     36 #include <net/if.h>
     37 #include <net/if_dl.h>
     38 #ifdef __FreeBSD__
     39 #include <net/if_var.h>
     40 #endif
     41 
     42 #include <netinet/in.h>
     43 
     44 /* XXX: the following two are non-standard include files */
     45 #include <netinet6/in6_var.h>
     46 #include <netinet6/nd6.h>
     47 
     48 #include <arpa/inet.h>
     49 
     50 #include <time.h>
     51 #include <stdio.h>
     52 #include <stdarg.h>
     53 #include <syslog.h>
     54 #include <string.h>
     55 #include <errno.h>
     56 #include <netdb.h>
     57 
     58 #include "rtadvd.h"
     59 #include "timer.h"
     60 #include "logit.h"
     61 #include "if.h"
     62 #include "dump.h"
     63 #include "prog_ops.h"
     64 
     65 static FILE *fp;
     66 
     67 static char *ether_str(struct sockaddr_dl *);
     68 static void if_dump(void);
     69 
     70 static const char *rtpref_str[] = {
     71 	"medium",		/* 00 */
     72 	"high",			/* 01 */
     73 	"rsv",			/* 10 */
     74 	"low"			/* 11 */
     75 };
     76 
     77 static char *
     78 ether_str(struct sockaddr_dl *sdl)
     79 {
     80 	static char hbuf[NI_MAXHOST];
     81 
     82 	if (sdl->sdl_alen) {
     83 		if (getnameinfo((struct sockaddr *)sdl, sdl->sdl_len,
     84 		    hbuf, sizeof(hbuf), NULL, 0, NI_NUMERICHOST) != 0)
     85 			snprintf(hbuf, sizeof(hbuf), "<invalid>");
     86 	} else
     87 		snprintf(hbuf, sizeof(hbuf), "NONE");
     88 
     89 	return(hbuf);
     90 }
     91 
     92 static void
     93 if_dump(void)
     94 {
     95 	struct rainfo *rai;
     96 	struct prefix *pfx;
     97 	struct rtinfo *rti;
     98 	struct rdnss *rdns;
     99 	struct rdnss_addr *rdnsa;
    100 	struct dnssl *dnsl;
    101 	struct dnssl_domain *dnsd;
    102 	char *p, len;
    103 	char prefixbuf[INET6_ADDRSTRLEN];
    104 	struct timespec now;
    105 
    106 	prog_clock_gettime(CLOCK_MONOTONIC, &now); /* XXX: unused in most cases */
    107 	TAILQ_FOREACH(rai, &ralist, next) {
    108 		fprintf(fp, "%s:\n", rai->ifname);
    109 
    110 		fprintf(fp, "  Status: %s\n",
    111 			(rai->ifflags & IFF_UP) ? "UP" : "DOWN");
    112 
    113 		/* control information */
    114 		if (rai->lastsent.tv_sec) {
    115 			/* note that ctime() appends CR by itself */
    116 			fprintf(fp, "  Last RA sent: %s",
    117 				ctime(&rai->lastsent.tv_sec));
    118 		}
    119 		if (rai->timer) {
    120 			fprintf(fp, "  Next RA will be sent: %s",
    121 				ctime(&rai->timer->tm.tv_sec));
    122 		}
    123 		else
    124 			fprintf(fp, "  RA timer is stopped");
    125 		fprintf(fp, "  waits: %d, initcount: %d\n",
    126 			rai->waiting, rai->initcounter);
    127 
    128 		/* statistics */
    129 		fprintf(fp, "  statistics: RA(out/in/inconsistent): "
    130 		    "%llu/%llu/%llu, ",
    131 		    (unsigned long long)rai->raoutput,
    132 		    (unsigned long long)rai->rainput,
    133 		    (unsigned long long)rai->rainconsistent);
    134 		fprintf(fp, "RS(input): %llu\n",
    135 		    (unsigned long long)rai->rsinput);
    136 
    137 		/* interface information */
    138 		if (rai->advlinkopt)
    139 			fprintf(fp, "  Link-layer address: %s\n",
    140 			    ether_str(rai->sdl));
    141 		fprintf(fp, "  MTU: %u\n", rai->phymtu);
    142 
    143 		/* Router configuration variables */
    144 		fprintf(fp, "  DefaultLifetime: %u, MaxAdvInterval: %u, "
    145 		    "MinAdvInterval: %u\n", rai->lifetime, rai->maxinterval,
    146 		    rai->mininterval);
    147 		fprintf(fp, "  Flags: %s%s%s, ",
    148 		    rai->managedflg ? "M" : "", rai->otherflg ? "O" : "",
    149 		    "");
    150 		fprintf(fp, "Preference: %s, ",
    151 			rtpref_str[(rai->rtpref >> 3) & 0xff]);
    152 		fprintf(fp, "MTU: %u\n", rai->linkmtu);
    153 		fprintf(fp, "  ReachableTime: %u, RetransTimer: %u, "
    154 			"CurHopLimit: %u\n", rai->reachabletime,
    155 			rai->retranstimer, rai->hoplimit);
    156 		if (rai->clockskew)
    157 			fprintf(fp, "  Clock skew: %usec\n",
    158 			    rai->clockskew);
    159 		TAILQ_FOREACH(pfx, &rai->prefix, next) {
    160 			if (pfx == TAILQ_FIRST(&rai->prefix))
    161 				fprintf(fp, "  Prefixes:\n");
    162 			fprintf(fp, "    %s/%d(",
    163 			    inet_ntop(AF_INET6, &pfx->prefix, prefixbuf,
    164 			    sizeof(prefixbuf)), pfx->prefixlen);
    165 			switch (pfx->origin) {
    166 			case PREFIX_FROM_KERNEL:
    167 				fprintf(fp, "KERNEL, ");
    168 				break;
    169 			case PREFIX_FROM_CONFIG:
    170 				fprintf(fp, "CONFIG, ");
    171 				break;
    172 			case PREFIX_FROM_DYNAMIC:
    173 				fprintf(fp, "DYNAMIC, ");
    174 				break;
    175 			}
    176 			if (pfx->validlifetime == ND6_INFINITE_LIFETIME)
    177 				fprintf(fp, "vltime: infinity");
    178 			else
    179 				fprintf(fp, "vltime: %u", pfx->validlifetime);
    180 			if (pfx->vltimeexpire != 0)
    181 				fprintf(fp, "(decr,expire %lld), ", (long long)
    182 					(pfx->vltimeexpire > now.tv_sec ?
    183 					pfx->vltimeexpire - now.tv_sec : 0));
    184 			else
    185 				fprintf(fp, ", ");
    186 			if (pfx->preflifetime ==  ND6_INFINITE_LIFETIME)
    187 				fprintf(fp, "pltime: infinity");
    188 			else
    189 				fprintf(fp, "pltime: %u", pfx->preflifetime);
    190 			if (pfx->pltimeexpire != 0)
    191 				fprintf(fp, "(decr,expire %lld), ", (long long)
    192 					(pfx->pltimeexpire > now.tv_sec ?
    193 					pfx->pltimeexpire - now.tv_sec : 0));
    194 			else
    195 				fprintf(fp, ", ");
    196 			fprintf(fp, "flags: %s%s%s",
    197 				pfx->onlinkflg ? "L" : "",
    198 				pfx->autoconfflg ? "A" : "",
    199 				"");
    200 			if (pfx->timer) {
    201 				struct timespec *rest;
    202 
    203 				rest = rtadvd_timer_rest(pfx->timer);
    204 				if (rest) { /* XXX: what if not? */
    205 					fprintf(fp, ", expire in: %ld",
    206 					    (long)rest->tv_sec);
    207 				}
    208 			}
    209 			fprintf(fp, ")\n");
    210 		}
    211 
    212 		TAILQ_FOREACH(rti, &rai->route, next) {
    213 			if (rti == TAILQ_FIRST(&rai->route))
    214 				fprintf(fp, "  Route Information:\n");
    215 			fprintf(fp, "    %s/%d (",
    216 				inet_ntop(AF_INET6, &rti->prefix,
    217 					  prefixbuf, sizeof(prefixbuf)),
    218 				rti->prefixlen);
    219 			fprintf(fp, "preference: %s, ",
    220 				rtpref_str[0xff & (rti->rtpref >> 3)]);
    221 			if (rti->ltime == ND6_INFINITE_LIFETIME)
    222 				fprintf(fp, "lifetime: infinity");
    223 			else
    224 				fprintf(fp, "lifetime: %ld", (long)rti->ltime);
    225 			fprintf(fp, ")\n");
    226 		}
    227 
    228 		TAILQ_FOREACH(rdns, &rai->rdnss, next) {
    229 			fprintf(fp, "  Recursive DNS Servers:\n");
    230 			if (rdns->lifetime == ND6_INFINITE_LIFETIME)
    231 				fprintf(fp, "    lifetime: infinity\n");
    232 			else
    233 				fprintf(fp, "    lifetime: %ld\n",
    234 				    (long)rdns->lifetime);
    235 			TAILQ_FOREACH(rdnsa, &rdns->list, next)
    236 				fprintf(fp, "    %s\n",
    237 				    inet_ntop(AF_INET6, &rdnsa->addr,
    238 				    prefixbuf, sizeof(prefixbuf)));
    239 		}
    240 
    241 		TAILQ_FOREACH(dnsl, &rai->dnssl, next) {
    242 			fprintf(fp, "  DNS Search List:\n");
    243 			if (dnsl->lifetime == ND6_INFINITE_LIFETIME)
    244 				fprintf(fp, "    lifetime: infinity\n");
    245 			else
    246 				fprintf(fp, "    lifetime: %ld\n",
    247 				    (long)dnsl->lifetime);
    248 			TAILQ_FOREACH(dnsd, &dnsl->list, next) {
    249 				fprintf(fp, "    ");
    250 				for (p = dnsd->domain, len = *p++;
    251 				    len != 0;
    252 				    len = *p++)
    253 				{
    254 					if (p != dnsd->domain)
    255 					    fputc('.', fp);
    256 					while(len-- != 0)
    257 					    fputc(*p++, fp);
    258 				}
    259 				fputc('\n', fp);
    260 			}
    261 		}
    262 	}
    263 }
    264 
    265 void
    266 rtadvd_dump_file(const char *dumpfile)
    267 {
    268 	logit(LOG_DEBUG, "%s: dump current status to %s", __func__,
    269 	    dumpfile);
    270 
    271 	if ((fp = fopen(dumpfile, "w")) == NULL) {
    272 		logit(LOG_WARNING, "%s: open a dump file(%s): %m",
    273 		       __func__, dumpfile);
    274 		return;
    275 	}
    276 
    277 	if_dump();
    278 
    279 	fclose(fp);
    280 }
    281