1/*
2 * Copyright (c) 1983, 1989, 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
--- 26 unchanged lines hidden (view full) ---
35
36#ifndef lint
37#if 0
38static char sccsid[] = "@(#)route.c 8.6 (Berkeley) 4/28/95";
39#endif
40#endif /* not lint */
41
42#include <sys/cdefs.h>
43__FBSDID("$FreeBSD: head/sbin/route/route.c 253427 2013-07-17 14:05:20Z hrs $");
44
45#include <sys/param.h>
46#include <sys/file.h>
47#include <sys/socket.h>
48#include <sys/ioctl.h>
49#include <sys/sysctl.h>
50#include <sys/types.h>
51#include <sys/queue.h>
--- 13 unchanged lines hidden (view full) ---
65#include <paths.h>
66#include <stdio.h>
67#include <stdlib.h>
68#include <string.h>
69#include <sysexits.h>
70#include <unistd.h>
71#include <ifaddrs.h>
72
73static struct keytab {
74 const char *kt_cp;
75 int kt_i;
76} keywords[] = {
77#include "keywords.h"
78 {0, 0}
79};
80
81static struct sockaddr_storage so[RTAX_MAX];
82static int pid, rtm_addrs;
83static int s;
84static int forcehost, forcenet, nflag, af, qflag, tflag;
85static int verbose, aflen;
86static int locking, lockrest, debugonly;
87static struct rt_metrics rt_metrics;
88static u_long rtm_inits;
89static uid_t uid;
90static int defaultfib;
91static int numfibs;
92
93static int atalk_aton(const char *, struct at_addr *);
94static char *atalk_ntoa(struct at_addr);
95static void printb(int, const char *);
96static void flushroutes(int argc, char *argv[]);
97static int flushroutes_fib(int);
98static int getaddr(int, char *, struct hostent **, int);
99static int keyword(const char *);
100#ifdef INET
101static void inet_makenetandmask(u_long, struct sockaddr_in *,
102 struct sockaddr_in *, u_long);
103#endif
104#ifdef INET6
105static int inet6_makenetandmask(struct sockaddr_in6 *, const char *);
106#endif
107static void interfaces(void);
108static void monitor(int, char*[]);
109static const char *netname(struct sockaddr *);
110static void newroute(int, char **);
111static int newroute_fib(int, char *, int);
112static void pmsg_addrs(char *, int, size_t);
113static void pmsg_common(struct rt_msghdr *, size_t);
114static int prefixlen(const char *);
115static void print_getmsg(struct rt_msghdr *, int, int);
116static void print_rtmsg(struct rt_msghdr *, size_t);
117static const char *routename(struct sockaddr *);
118static int rtmsg(int, int, int);
119static void set_metric(char *, int);
120static int set_sofib(int);
121static int set_procfib(int);
122static void sockaddr(char *, struct sockaddr *, size_t);
123static void sodump(struct sockaddr *, const char *);
124extern char *iso_ntoa(void);
125
126struct fibl {
127 TAILQ_ENTRY(fibl) fl_next;
128
129 int fl_num;
130 int fl_error;
131 int fl_errno;
132};
133static TAILQ_HEAD(fibl_head_t, fibl) fibl_head;
134
135static int fiboptlist_csv(const char *, struct fibl_head_t *);
136static int fiboptlist_range(const char *, struct fibl_head_t *);
137
138static void usage(const char *) __dead2;
139
140void
141usage(const char *cp)
142{
143 if (cp != NULL)
144 warnx("bad keyword: %s", cp);
145 errx(EX_USAGE, "usage: route [-dnqtv] command [[modifiers] args]");
146 /* NOTREACHED */
147}
148
149int
150main(int argc, char **argv)
151{
152 int ch;
153 size_t len;
--- 143 unchanged lines hidden (view full) ---
297#define ALLSTRLEN 64
298static int
299fiboptlist_csv(const char *arg, struct fibl_head_t *flh)
300{
301 struct fibl *fl;
302 char *str0, *str, *token, *endptr;
303 int fib, error;
304
305 str0 = str = NULL;
306 if (strcmp("all", arg) == 0) {
307 str = calloc(1, ALLSTRLEN);
308 if (str == NULL) {
309 error = 1;
310 goto fiboptlist_csv_ret;
311 }
312 if (numfibs > 1)
313 snprintf(str, ALLSTRLEN - 1, "%d-%d", 0, numfibs - 1);
--- 33 unchanged lines hidden (view full) ---
347 error = 1;
348 goto fiboptlist_csv_ret;
349 }
350 fl->fl_num = fib;
351 TAILQ_INSERT_TAIL(flh, fl, fl_next);
352 }
353 }
354fiboptlist_csv_ret:
355 if (str0 != NULL)
356 free(str0);
357 return (error);
358}
359
360/*
361 * Purge all entries in the routing tables not
362 * associated with network interfaces.
363 */
364static void
365flushroutes(int argc, char *argv[])
366{
367 struct fibl *fl;
368 int error;
369
370 if (uid != 0 && !debugonly && !tflag)
371 errx(EX_NOPERM, "must be root to alter routing table");
372 shutdown(s, SHUT_RD); /* Don't want to read back our messages */
373
374 TAILQ_INIT(&fibl_head);
375 while (argc > 1) {
376 argc--;
377 argv++;
378 if (**argv != '-')
379 usage(*argv);
380 switch (keyword(*argv + 1)) {
381#ifdef INET
382 case K_INET:
383 af = AF_INET;
384 break;
385#endif
386#ifdef INET6
387 case K_INET6:
388 af = AF_INET6;
389 break;
390#endif
391 case K_ATALK:
392 af = AF_APPLETALK;
393 break;
--- 35 unchanged lines hidden (view full) ---
429 warn("fib number %d is ignored", fib);
430 return (error);
431 }
432
433retry:
434 mib[0] = CTL_NET;
435 mib[1] = PF_ROUTE;
436 mib[2] = 0; /* protocol */
437 mib[3] = AF_UNSPEC;
438 mib[4] = NET_RT_DUMP;
439 mib[5] = 0; /* no flags */
440 if (sysctl(mib, nitems(mib), NULL, &needed, NULL, 0) < 0)
441 err(EX_OSERR, "route-sysctl-estimate");
442 if ((buf = malloc(needed)) == NULL)
443 errx(EX_OSERR, "malloc failed");
444 if (sysctl(mib, nitems(mib), buf, &needed, NULL, 0) < 0) {
445 if (errno == ENOMEM && count++ < 10) {
446 warnx("Routing table grew, retrying");
447 sleep(1);
448 free(buf);
449 goto retry;
450 }
451 err(EX_OSERR, "route-sysctl-get");
452 }
453 lim = buf + needed;
454 if (verbose)
455 (void)printf("Examining routing table from sysctl\n");
456 seqno = 0; /* ??? */
457 for (next = buf; next < lim; next += rtm->rtm_msglen) {
458 rtm = (struct rt_msghdr *)next;
459 if (verbose)
460 print_rtmsg(rtm, rtm->rtm_msglen);
461 if ((rtm->rtm_flags & RTF_GATEWAY) == 0)
462 continue;
463 if (af != 0) {
--- 6 unchanged lines hidden (view full) ---
470 continue;
471 rtm->rtm_type = RTM_DELETE;
472 rtm->rtm_seq = seqno;
473 rlen = write(s, next, rtm->rtm_msglen);
474 if (rlen < 0 && errno == EPERM)
475 err(1, "write to routing socket");
476 if (rlen < (int)rtm->rtm_msglen) {
477 warn("write to routing socket");
478 (void)printf("got only %d for rlen\n", rlen);
479 free(buf);
480 goto retry;
481 break;
482 }
483 seqno++;
484 if (qflag)
485 continue;
486 if (verbose)
--- 13 unchanged lines hidden (view full) ---
500 return (error);
501}
502
503const char *
504routename(struct sockaddr *sa)
505{
506 const char *cp;
507 static char line[MAXHOSTNAMELEN + 1];
508#ifdef INET
509 struct hostent *hp;
510#endif
511 static char domain[MAXHOSTNAMELEN + 1];
512 static int first = 1, n;
513
514 if (first) {
515 first = 0;
516 if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
517 (cp = strchr(domain, '.'))) {
518 domain[MAXHOSTNAMELEN] = '\0';
519 (void)strcpy(domain, cp + 1);
520 } else
521 domain[0] = '\0';
522 }
523
524 if (sa->sa_len == 0) {
525 strcpy(line, "default");
526 return (line);
527 }
528 switch (sa->sa_family) {
529#ifdef INET
530 case AF_INET:
531 {
532 struct in_addr in;
533
534 in = ((struct sockaddr_in *)sa)->sin_addr;
535 cp = NULL;
536 if (in.s_addr == INADDR_ANY || sa->sa_len < 4)
537 cp = "default";
538 if (cp == NULL && !nflag) {
539 hp = gethostbyaddr((char *)&in, sizeof (struct in_addr),
540 AF_INET);
541 if (hp != NULL) {
542 char *cptr;
543 cptr = strchr(hp->h_name, '.');
544 if (cptr != NULL &&
545 strcmp(cptr + 1, domain) == 0)
546 *cptr = '\0';
547 cp = hp->h_name;
548 }
549 }
550 if (cp != NULL) {
551 strncpy(line, cp, sizeof(line) - 1);
552 line[sizeof(line) - 1] = '\0';
553 } else
554 (void)sprintf(line, "%s", inet_ntoa(in));
555 break;
556 }
557
558#endif
559#ifdef INET6
560 case AF_INET6:
561 {
562 struct sockaddr_in6 sin6; /* use static var for safety */
563 int niflags = 0;
564
565 memset(&sin6, 0, sizeof(sin6));
566 memcpy(&sin6, sa, sa->sa_len);
567 sin6.sin6_len = sizeof(struct sockaddr_in6);
568 sin6.sin6_family = AF_INET6;
569 if (nflag)
570 niflags |= NI_NUMERICHOST;
571 if (getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len,
572 line, sizeof(line), NULL, 0, niflags) != 0)
573 strncpy(line, "invalid", sizeof(line));
574
575 return (line);
576 }
577#endif
578
579 case AF_APPLETALK:
580 (void)snprintf(line, sizeof(line), "atalk %s",
581 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
582 break;
583
584 case AF_LINK:
585 return (link_ntoa((struct sockaddr_dl *)sa));
586 break;
587
588 default:
589 {
590 u_short *sp = (u_short *)sa;
591 u_short *splim = sp + ((sa->sa_len + 1) >> 1);
592 char *cps = line + sprintf(line, "(%d)", sa->sa_family);
593 char *cpe = line + sizeof(line);
594
--- 10 unchanged lines hidden (view full) ---
605
606/*
607 * Return the name of the network whose address is given.
608 * The address is assumed to be that of a net, not a host.
609 */
610const char *
611netname(struct sockaddr *sa)
612{
613 static char line[MAXHOSTNAMELEN + 1];
614 int n;
615#ifdef INET
616 struct netent *np = NULL;
617 const char *cp = NULL;
618 u_long i;
619#endif
620
621 switch (sa->sa_family) {
622#ifdef INET
623 case AF_INET:
624 {
625 struct in_addr in;
626
627 in = ((struct sockaddr_in *)sa)->sin_addr;
628 i = in.s_addr = ntohl(in.s_addr);
629 if (in.s_addr == 0)
630 cp = "default";
631 else if (!nflag) {
632 np = getnetbyaddr(i, AF_INET);
633 if (np != NULL)
634 cp = np->n_name;
635 }
636#define C(x) (unsigned)((x) & 0xff)
637 if (cp != NULL)
638 strncpy(line, cp, sizeof(line));
639 else if ((in.s_addr & 0xffffff) == 0)
640 (void)sprintf(line, "%u", C(in.s_addr >> 24));
641 else if ((in.s_addr & 0xffff) == 0)
642 (void)sprintf(line, "%u.%u", C(in.s_addr >> 24),
643 C(in.s_addr >> 16));
644 else if ((in.s_addr & 0xff) == 0)
645 (void)sprintf(line, "%u.%u.%u", C(in.s_addr >> 24),
646 C(in.s_addr >> 16), C(in.s_addr >> 8));
647 else
648 (void)sprintf(line, "%u.%u.%u.%u", C(in.s_addr >> 24),
649 C(in.s_addr >> 16), C(in.s_addr >> 8),
650 C(in.s_addr));
651#undef C
652 break;
653 }
654#endif
655#ifdef INET6
656 case AF_INET6:
657 {
658 struct sockaddr_in6 sin6;
659 int niflags = 0;
660
661 memset(&sin6, 0, sizeof(sin6));
662 memcpy(&sin6, sa, sa->sa_len);
663 sin6.sin6_len = sizeof(sin6);
664 sin6.sin6_family = AF_INET6;
665 if (nflag)
666 niflags |= NI_NUMERICHOST;
667 if (getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len,
668 line, sizeof(line), NULL, 0, niflags) != 0)
669 strncpy(line, "invalid", sizeof(line));
670
671 return(line);
672 }
673#endif
674
675 case AF_APPLETALK:
676 (void)snprintf(line, sizeof(line), "atalk %s",
677 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
678 break;
679
680 case AF_LINK:
681 return (link_ntoa((struct sockaddr_dl *)sa));
682 break;
683
684 default:
685 {
686 u_short *sp = (u_short *)sa->sa_data;
687 u_short *splim = sp + ((sa->sa_len + 1)>>1);
688 char *cps = line + sprintf(line, "af %d:", sa->sa_family);
689 char *cpe = line + sizeof(line);
690
691 while (sp < splim && cps < cpe)
--- 43 unchanged lines hidden (view full) ---
735newroute(int argc, char **argv)
736{
737 struct hostent *hp;
738 struct fibl *fl;
739 char *cmd;
740 const char *dest, *gateway, *errmsg;
741 int key, error, flags, nrflags, fibnum;
742
743 if (uid != 0 && !debugonly && !tflag)
744 errx(EX_NOPERM, "must be root to alter routing table");
745 dest = NULL;
746 gateway = NULL;
747 flags = RTF_STATIC;
748 nrflags = 0;
749 hp = NULL;
750 TAILQ_INIT(&fibl_head);
751
752 cmd = argv[0];
753 if (*cmd != 'g' && *cmd != 's')
754 shutdown(s, SHUT_RD); /* Don't want to read back our messages */
755 while (--argc > 0) {
756 if (**(++argv)== '-') {
757 switch (key = keyword(1 + *argv)) {
758 case K_LINK:
759 af = AF_LINK;
760 aflen = sizeof(struct sockaddr_dl);
761 break;
762#ifdef INET
763 case K_INET:
764 af = AF_INET;
765 aflen = sizeof(struct sockaddr_in);
766 break;
767#endif
768#ifdef INET6
769 case K_INET6:
770 af = AF_INET6;
771 aflen = sizeof(struct sockaddr_in6);
772 break;
773#endif
774 case K_ATALK:
775 af = AF_APPLETALK;
776 aflen = sizeof(struct sockaddr_at);
777 break;
778 case K_SA:
779 af = PF_ROUTE;
780 aflen = sizeof(struct sockaddr_storage);
781 break;
782 case K_IFACE:
783 case K_INTERFACE:
784 nrflags |= F_INTERFACE;
785 break;
786 case K_NOSTATIC:
787 flags &= ~RTF_STATIC;
788 break;
--- 119 unchanged lines hidden (view full) ---
908 }
909 }
910
911 if (nrflags & F_FORCEHOST) {
912 nrflags |= F_ISHOST;
913#ifdef INET6
914 if (af == AF_INET6) {
915 rtm_addrs &= ~RTA_NETMASK;
916 memset(&so[RTAX_NETMASK], 0, sizeof(so[RTAX_NETMASK]));
917 }
918#endif
919 }
920 if (nrflags & F_FORCENET)
921 nrflags &= ~F_ISHOST;
922 flags |= RTF_UP;
923 if (nrflags & F_ISHOST)
924 flags |= RTF_HOST;
--- 106 unchanged lines hidden (view full) ---
1031 warn("fib number %d is ignored", fib);
1032 return (error);
1033 }
1034
1035 error = rtmsg(*cmd, flags, fib);
1036 return (error);
1037}
1038
1039#ifdef INET
1040static void
1041inet_makenetandmask(u_long net, struct sockaddr_in *sin,
1042 struct sockaddr_in *sin_mask, u_long bits)
1043{
1044 u_long mask = 0;
1045
1046 rtm_addrs |= RTA_NETMASK;
1047
1048 /*
1049 * MSB of net should be meaningful. 0/0 is exception.
1050 */
1051 if (net > 0)
1052 while ((net & 0xff000000) == 0)
1053 net <<= 8;
1054
1055 /*
1056 * If no /xx was specified we must calculate the
1057 * CIDR address.
1058 */
1059 if ((bits == 0) && (net != 0)) {
1060 u_long i, j;
1061
1062 for(i = 0, j = 0xff; i < 4; i++) {
1063 if (net & j) {
1064 break;
1065 }
1066 j <<= 8;
1067 }
1068 /* i holds the first non zero bit */
1069 bits = 32 - (i*8);
1070 }
1071 if (bits != 0)
1072 mask = 0xffffffff << (32 - bits);
1073
1074 sin->sin_addr.s_addr = htonl(net);
1075 sin_mask->sin_addr.s_addr = htonl(mask);
1076 sin_mask->sin_len = sizeof(struct sockaddr_in);
1077 sin_mask->sin_family = AF_INET;
1078}
1079#endif
1080
1081#ifdef INET6
1082/*
1083 * XXX the function may need more improvement...
1084 */
1085static int
1086inet6_makenetandmask(struct sockaddr_in6 *sin6, const char *plen)
1087{
--- 22 unchanged lines hidden (view full) ---
1110
1111/*
1112 * Interpret an argument as a network address of some kind,
1113 * returning 1 if a host address, 0 if a network address.
1114 */
1115static int
1116getaddr(int which, char *str, struct hostent **hpp, int nrflags)
1117{
1118 struct sockaddr *sa;
1119#if defined(INET)
1120 struct sockaddr_in *sin;
1121 struct hostent *hp;
1122 struct netent *np;
1123 u_long val;
1124 char *q;
1125#elif defined(INET6)
1126 char *q;
1127#endif
1128
1129 if (af == 0) {
1130#if defined(INET)
1131 af = AF_INET;
1132 aflen = sizeof(struct sockaddr_in);
1133#elif defined(INET6)
1134 af = AF_INET6;
1135 aflen = sizeof(struct sockaddr_in6);
1136#else
1137 af = AF_LINK;
1138 aflen = sizeof(struct sockaddr_dl);
1139#endif
1140 }
1141 rtm_addrs |= which;
1142
1143 switch (which) {
1144 case RTA_DST:
1145 sa = (struct sockaddr *)&so[RTAX_DST];
1146 break;
1147 case RTA_GATEWAY:
1148 sa = (struct sockaddr *)&so[RTAX_GATEWAY];
1149 break;
1150 case RTA_NETMASK:
1151 sa = (struct sockaddr *)&so[RTAX_NETMASK];
1152 break;
1153 case RTA_GENMASK:
1154 sa = (struct sockaddr *)&so[RTAX_GENMASK];
1155 break;
1156 case RTA_IFA:
1157 sa = (struct sockaddr *)&so[RTAX_IFA];
1158 break;
1159 case RTA_IFP:
1160 sa = (struct sockaddr *)&so[RTAX_IFP];
1161 break;
1162 default:
1163 usage("internal error");
1164 /*NOTREACHED*/
1165 }
1166 sa->sa_family = af;
1167 sa->sa_len = aflen;
1168
1169 switch (which) {
1170 case RTA_GATEWAY:
1171 if (nrflags & F_INTERFACE) {
1172 struct ifaddrs *ifap, *ifa;
1173 struct sockaddr_dl *sdl0 = (struct sockaddr_dl *)sa;
1174 struct sockaddr_dl *sdl = NULL;
1175
1176 if (getifaddrs(&ifap))
1177 err(EX_OSERR, "getifaddrs");
1178
1179 for (ifa = ifap; ifa != NULL; ifa = ifa->ifa_next) {
1180 if (ifa->ifa_addr->sa_family != AF_LINK)
1181 continue;
1182
1183 if (strcmp(str, ifa->ifa_name) != 0)
1184 continue;
1185
1186 sdl = (struct sockaddr_dl *)ifa->ifa_addr;
1187 }
1188 /* If we found it, then use it */
1189 if (sdl != NULL) {
1190 /*
1191 * Note that we need to copy before calling
1192 * freeifaddrs().
1193 */
1194 memcpy(sdl0, sdl, sdl->sdl_len);
1195 }
1196 freeifaddrs(ifap);
1197 if (sdl != NULL)
1198 return(1);
1199 }
1200 break;
1201 case RTA_IFP:
1202 sa->sa_family = AF_LINK;
1203 break;
1204 }
1205 if (strcmp(str, "default") == 0) {
1206 /*
1207 * Default is net 0.0.0.0/0
1208 */
1209 switch (which) {
1210 case RTA_DST:
1211 forcenet++;
1212 getaddr(RTA_NETMASK, str, 0, nrflags);
1213 break;
1214 }
1215 return (0);
1216 }
1217 switch (sa->sa_family) {
1218#ifdef INET6
1219 case AF_INET6:
1220 {
1221 struct addrinfo hints, *res;
1222 int ecode;
1223
1224 q = NULL;
1225 if (which == RTA_DST && (q = strchr(str, '/')) != NULL)
1226 *q = '\0';
1227 memset(&hints, 0, sizeof(hints));
1228 hints.ai_family = sa->sa_family;
1229 hints.ai_socktype = SOCK_DGRAM;
1230 ecode = getaddrinfo(str, NULL, &hints, &res);
1231 if (ecode != 0 || res->ai_family != AF_INET6 ||
1232 res->ai_addrlen != sizeof(struct sockaddr_in6))
1233 errx(EX_OSERR, "%s: %s", str, gai_strerror(ecode));
1234 memcpy(sa, res->ai_addr, res->ai_addrlen);
1235 freeaddrinfo(res);
1236 if (q != NULL)
1237 *q++ = '/';
1238 if (which == RTA_DST)
1239 return (inet6_makenetandmask((struct sockaddr_in6 *)sa,
1240 q));
1241 return (0);
1242 }
1243#endif /* INET6 */
1244
1245 case AF_APPLETALK:
1246 {
1247 struct sockaddr_at *sat = (struct sockaddr_at *)sa;
1248
1249 if (!atalk_aton(str, &sat->sat_addr))
1250 errx(EX_NOHOST, "bad address: %s", str);
1251 rtm_addrs |= RTA_NETMASK;
1252 return(forcehost || sat->sat_addr.s_node != 0);
1253 }
1254 case AF_LINK:
1255 link_addr(str, (struct sockaddr_dl *)sa);
1256 return (1);
1257
1258 case PF_ROUTE:
1259 sockaddr(str, sa, sizeof(struct sockaddr_storage));
1260 return (1);
1261#ifdef INET
1262 case AF_INET:
1263#endif
1264 default:
1265 break;
1266 }
1267
1268#ifdef INET
1269 sin = (struct sockaddr_in *)sa;
1270 if (hpp == NULL)
1271 hpp = &hp;
1272 *hpp = NULL;
1273
1274 q = strchr(str,'/');
1275 if (q != NULL && which == RTA_DST) {
1276 *q = '\0';
1277 if ((val = inet_network(str)) != INADDR_NONE) {
1278 inet_makenetandmask(val, sin,
1279 (struct sockaddr_in *)&so[RTAX_NETMASK],
1280 strtoul(q+1, 0, 0));
1281 return (0);
1282 }
1283 *q = '/';
1284 }
1285 if ((which != RTA_DST || forcenet == 0) &&
1286 inet_aton(str, &sin->sin_addr)) {
1287 val = sin->sin_addr.s_addr;
1288 if (which != RTA_DST || forcehost ||
1289 inet_lnaof(sin->sin_addr) != INADDR_ANY)
1290 return (1);
1291 else {
1292 val = ntohl(val);
1293 goto netdone;
1294 }
1295 }
1296 if (which == RTA_DST && forcehost == 0 &&
1297 ((val = inet_network(str)) != INADDR_NONE ||
1298 ((np = getnetbyname(str)) != NULL && (val = np->n_net) != 0))) {
1299netdone:
1300 inet_makenetandmask(val, sin,
1301 (struct sockaddr_in *)&so[RTAX_NETMASK], 0);
1302 return (0);
1303 }
1304 hp = gethostbyname(str);
1305 if (hp != NULL) {
1306 *hpp = hp;
1307 sin->sin_family = hp->h_addrtype;
1308 memmove((char *)&sin->sin_addr, hp->h_addr,
1309 MIN((size_t)hp->h_length, sizeof(sin->sin_addr)));
1310 return (1);
1311 }
1312#endif
1313 errx(EX_NOHOST, "bad address: %s", str);
1314}
1315
1316static int
1317prefixlen(const char *str)
1318{
1319 int len = atoi(str), q, r;
1320 int max;
1321 char *p;
1322
1323 rtm_addrs |= RTA_NETMASK;
1324 switch (af) {
1325#ifdef INET6
1326 case AF_INET6:
1327 {
1328 struct sockaddr_in6 *sin6 =
1329 (struct sockaddr_in6 *)&so[RTAX_NETMASK];
1330
1331 max = 128;
1332 p = (char *)&sin6->sin6_addr;
1333 sin6->sin6_family = AF_INET6;
1334 sin6->sin6_len = sizeof(*sin6);
1335 break;
1336 }
1337#endif
1338#ifdef INET
1339 case AF_INET:
1340 {
1341 struct sockaddr_in *sin =
1342 (struct sockaddr_in *)&so[RTAX_NETMASK];
1343
1344 max = 32;
1345 p = (char *)&sin->sin_addr;
1346 sin->sin_family = AF_INET;
1347 sin->sin_len = sizeof(*sin);
1348 break;
1349 }
1350#endif
1351 default:
1352 errx(EX_OSERR, "prefixlen not supported in this af");
1353 }
1354
1355 if (len < 0 || max < len)
1356 errx(EX_USAGE, "%s: invalid prefixlen", str);
1357
1358 q = len >> 3;
1359 r = len & 7;
1360 memset((void *)p, 0, max / 8);
1361 if (q > 0)
1362 memset((void *)p, 0xff, q);
1363 if (r > 0)
1364 *((u_char *)p + q) = (0xff00 >> r) & 0xff;
1365 if (len == max)
1366 return (-1);
1367 else
--- 7 unchanged lines hidden (view full) ---
1375 int mib[6];
1376 char *buf, *lim, *next, count = 0;
1377 struct rt_msghdr *rtm;
1378
1379retry2:
1380 mib[0] = CTL_NET;
1381 mib[1] = PF_ROUTE;
1382 mib[2] = 0; /* protocol */
1383 mib[3] = AF_UNSPEC;
1384 mib[4] = NET_RT_IFLIST;
1385 mib[5] = 0; /* no flags */
1386 if (sysctl(mib, nitems(mib), NULL, &needed, NULL, 0) < 0)
1387 err(EX_OSERR, "route-sysctl-estimate");
1388 if ((buf = malloc(needed)) == NULL)
1389 errx(EX_OSERR, "malloc failed");
1390 if (sysctl(mib, nitems(mib), buf, &needed, NULL, 0) < 0) {
1391 if (errno == ENOMEM && count++ < 10) {
1392 warnx("Routing table grew, retrying");
1393 sleep(1);
1394 free(buf);
1395 goto retry2;
1396 }
1397 err(EX_OSERR, "actual retrieval of interface table");
1398 }
--- 43 unchanged lines hidden (view full) ---
1442 if (debugonly) {
1443 interfaces();
1444 exit(0);
1445 }
1446 for (;;) {
1447 time_t now;
1448 n = read(s, msg, 2048);
1449 now = time(NULL);
1450 (void)printf("\ngot message of size %d on %s", n, ctime(&now));
1451 print_rtmsg((struct rt_msghdr *)msg, n);
1452 }
1453}
1454
1455static struct {
1456 struct rt_msghdr m_rtm;
1457 char m_space[512];
1458} m_rtmsg;
1459
1460static int
1461rtmsg(int cmd, int flags, int fib)
1462{
1463 static int seq;
1464 int rlen;
1465 char *cp = m_rtmsg.m_space;
1466 int l;
1467
1468#define NEXTADDR(w, u) \
1469 if (rtm_addrs & (w)) { \
1470 l = SA_SIZE((struct sockaddr *)&(u)); \
1471 memmove(cp, (char *)&(u), l); \
1472 cp += l; \
1473 if (verbose) \
1474 sodump((struct sockaddr *)&(u), #w); \
1475 }
1476
1477 errno = 0;
1478 memset(&m_rtmsg, 0, sizeof(m_rtmsg));
1479 if (cmd == 'a')
1480 cmd = RTM_ADD;
1481 else if (cmd == 'c')
1482 cmd = RTM_CHANGE;
1483 else if (cmd == 'g' || cmd == 's') {
1484 cmd = RTM_GET;
1485 if (so[RTAX_IFP].ss_family == 0) {
1486 so[RTAX_IFP].ss_family = AF_LINK;
1487 so[RTAX_IFP].ss_len = sizeof(struct sockaddr_dl);
1488 rtm_addrs |= RTA_IFP;
1489 }
1490 } else
1491 cmd = RTM_DELETE;
1492#define rtm m_rtmsg.m_rtm
1493 rtm.rtm_type = cmd;
1494 rtm.rtm_flags = flags;
1495 rtm.rtm_version = RTM_VERSION;
1496 rtm.rtm_seq = ++seq;
1497 rtm.rtm_addrs = rtm_addrs;
1498 rtm.rtm_rmx = rt_metrics;
1499 rtm.rtm_inits = rtm_inits;
1500
1501 NEXTADDR(RTA_DST, so[RTAX_DST]);
1502 NEXTADDR(RTA_GATEWAY, so[RTAX_GATEWAY]);
1503 NEXTADDR(RTA_NETMASK, so[RTAX_NETMASK]);
1504 NEXTADDR(RTA_GENMASK, so[RTAX_GENMASK]);
1505 NEXTADDR(RTA_IFP, so[RTAX_IFP]);
1506 NEXTADDR(RTA_IFA, so[RTAX_IFA]);
1507 rtm.rtm_msglen = l = cp - (char *)&m_rtmsg;
1508 if (verbose)
1509 print_rtmsg(&rtm, l);
1510 if (debugonly)
1511 return (0);
1512 if ((rlen = write(s, (char *)&m_rtmsg, l)) < 0) {
1513 if (errno == EPERM)
1514 err(1, "writing to routing socket");
--- 8 unchanged lines hidden (view full) ---
1523 warn("read from routing socket");
1524 else
1525 print_getmsg(&rtm, l, fib);
1526 }
1527#undef rtm
1528 return (0);
1529}
1530
1531static const char *msgtypes[] = {
1532 "",
1533 "RTM_ADD: Add Route",
1534 "RTM_DELETE: Delete Route",
1535 "RTM_CHANGE: Change Metrics or flags",
1536 "RTM_GET: Report Metrics",
1537 "RTM_LOSING: Kernel Suspects Partitioning",
1538 "RTM_REDIRECT: Told to use different route",
1539 "RTM_MISS: Lookup failed on this address",
--- 5 unchanged lines hidden (view full) ---
1545 "RTM_DELADDR: address being removed from iface",
1546 "RTM_IFINFO: iface status change",
1547 "RTM_NEWMADDR: new multicast group membership on iface",
1548 "RTM_DELMADDR: multicast group membership removed from iface",
1549 "RTM_IFANNOUNCE: interface arrival/departure",
1550 "RTM_IEEE80211: IEEE 802.11 wireless event",
1551};
1552
1553static const char metricnames[] =
1554 "\011weight\010rttvar\7rtt\6ssthresh\5sendpipe\4recvpipe\3expire"
1555 "\1mtu";
1556static const char routeflags[] =
1557 "\1UP\2GATEWAY\3HOST\4REJECT\5DYNAMIC\6MODIFIED\7DONE"
1558 "\012XRESOLVE\013LLINFO\014STATIC\015BLACKHOLE"
1559 "\017PROTO2\020PROTO1\021PRCLONING\022WASCLONED\023PROTO3"
1560 "\025PINNED\026LOCAL\027BROADCAST\030MULTICAST\035STICKY";
1561static const char ifnetflags[] =
1562 "\1UP\2BROADCAST\3DEBUG\4LOOPBACK\5PTP\6b6\7RUNNING\010NOARP"
1563 "\011PPROMISC\012ALLMULTI\013OACTIVE\014SIMPLEX\015LINK0\016LINK1"
1564 "\017LINK2\020MULTICAST";
1565static const char addrnames[] =
1566 "\1DST\2GATEWAY\3NETMASK\4GENMASK\5IFP\6IFA\7AUTHOR\010BRD";
1567
1568static const char errfmt[] =
1569 "\n%s: truncated route message, only %zu bytes left\n";
1570
1571static void
1572print_rtmsg(struct rt_msghdr *rtm, size_t msglen)
1573{
1574 struct if_msghdr *ifm;
1575 struct ifa_msghdr *ifam;
1576#ifdef RTM_NEWMADDR
1577 struct ifma_msghdr *ifmam;
1578#endif
1579 struct if_announcemsghdr *ifan;
1580 const char *state;
1581
1582 if (verbose == 0)
1583 return;
1584 if (rtm->rtm_version != RTM_VERSION) {
1585 (void)printf("routing message version %d not understood\n",
1586 rtm->rtm_version);
1587 return;
1588 }
1589 if (rtm->rtm_type < sizeof(msgtypes) / sizeof(msgtypes[0]))
1590 (void)printf("%s: ", msgtypes[rtm->rtm_type]);
1591 else
1592 (void)printf("unknown type %d: ", rtm->rtm_type);
1593 (void)printf("len %d, ", rtm->rtm_msglen);
--- 4 unchanged lines hidden (view full) ---
1598 else \
1599 msglen -= sizeof(x); \
1600 } while (0)
1601
1602 switch (rtm->rtm_type) {
1603 case RTM_IFINFO:
1604 REQUIRE(struct if_msghdr);
1605 ifm = (struct if_msghdr *)rtm;
1606 (void)printf("if# %d, ", ifm->ifm_index);
1607 switch (ifm->ifm_data.ifi_link_state) {
1608 case LINK_STATE_DOWN:
1609 state = "down";
1610 break;
1611 case LINK_STATE_UP:
1612 state = "up";
1613 break;
1614 default:
1615 state = "unknown";
1616 break;
1617 }
1618 (void)printf("link: %s, flags:", state);
1619 printb(ifm->ifm_flags, ifnetflags);
1620 pmsg_addrs((char *)(ifm + 1), ifm->ifm_addrs, msglen);
1621 break;
1622 case RTM_NEWADDR:
1623 case RTM_DELADDR:
1624 REQUIRE(struct ifa_msghdr);
1625 ifam = (struct ifa_msghdr *)rtm;
1626 (void)printf("metric %d, flags:", ifam->ifam_metric);
1627 printb(ifam->ifam_flags, routeflags);
1628 pmsg_addrs((char *)(ifam + 1), ifam->ifam_addrs, msglen);
1629 break;
1630#ifdef RTM_NEWMADDR
1631 case RTM_NEWMADDR:
1632 case RTM_DELMADDR:
1633 REQUIRE(struct ifma_msghdr);
1634 ifmam = (struct ifma_msghdr *)rtm;
1635 pmsg_addrs((char *)(ifmam + 1), ifmam->ifmam_addrs, msglen);
1636 break;
1637#endif
1638 case RTM_IFANNOUNCE:
1639 REQUIRE(struct if_announcemsghdr);
1640 ifan = (struct if_announcemsghdr *)rtm;
1641 (void)printf("if# %d, what: ", ifan->ifan_index);
1642 switch (ifan->ifan_what) {
1643 case IFAN_ARRIVAL:
1644 (void)printf("arrival");
1645 break;
1646 case IFAN_DEPARTURE:
1647 printf("departure");
1648 break;
1649 default:
1650 printf("#%d", ifan->ifan_what);
1651 break;
1652 }
1653 printf("\n");
1654 fflush(stdout);
1655 break;
1656
1657 default:
1658 printf("pid: %ld, seq %d, errno %d, flags:",
1659 (long)rtm->rtm_pid, rtm->rtm_seq, rtm->rtm_errno);
1660 printb(rtm->rtm_flags, routeflags);
1661 pmsg_common(rtm, msglen);
1662 }
1663
1664 return;
1665
1666badlen:
1667 (void)printf(errfmt, __func__, msglen);
1668#undef REQUIRE
1669}
1670
1671static void
1672print_getmsg(struct rt_msghdr *rtm, int msglen, int fib)
1673{
1674 struct sockaddr *dst = NULL, *gate = NULL, *mask = NULL;
1675 struct sockaddr_dl *ifp = NULL;
1676 struct sockaddr *sa;
1677 char *cp;
1678 int i;
1679
1680 (void)printf(" route to: %s\n",
1681 routename((struct sockaddr *)&so[RTAX_DST]));
1682 if (rtm->rtm_version != RTM_VERSION) {
1683 warnx("routing message version %d not understood",
1684 rtm->rtm_version);
1685 return;
1686 }
1687 if (rtm->rtm_msglen > msglen) {
1688 warnx("message length mismatch, in packet %d, returned %d",
1689 rtm->rtm_msglen, msglen);
--- 40 unchanged lines hidden (view full) ---
1730 if (gate && rtm->rtm_flags & RTF_GATEWAY)
1731 (void)printf(" gateway: %s\n", routename(gate));
1732 if (fib >= 0)
1733 (void)printf(" fib: %u\n", (unsigned int)fib);
1734 if (ifp)
1735 (void)printf(" interface: %.*s\n",
1736 ifp->sdl_nlen, ifp->sdl_data);
1737 (void)printf(" flags: ");
1738 printb(rtm->rtm_flags, routeflags);
1739
1740#define lock(f) ((rtm->rtm_rmx.rmx_locks & __CONCAT(RTV_,f)) ? 'L' : ' ')
1741#define msec(u) (((u) + 500) / 1000) /* usec to msec */
1742
1743 printf("\n%s\n", "\
1744 recvpipe sendpipe ssthresh rtt,msec mtu weight expire");
1745 printf("%8ld%c ", rtm->rtm_rmx.rmx_recvpipe, lock(RPIPE));
1746 printf("%8ld%c ", rtm->rtm_rmx.rmx_sendpipe, lock(SPIPE));
1747 printf("%8ld%c ", rtm->rtm_rmx.rmx_ssthresh, lock(SSTHRESH));
1748 printf("%8ld%c ", msec(rtm->rtm_rmx.rmx_rtt), lock(RTT));
1749 printf("%8ld%c ", rtm->rtm_rmx.rmx_mtu, lock(MTU));
1750 printf("%8ld%c ", rtm->rtm_rmx.rmx_weight, lock(WEIGHT));
1751 if (rtm->rtm_rmx.rmx_expire)
1752 rtm->rtm_rmx.rmx_expire -= time(0);
1753 printf("%8ld%c\n", rtm->rtm_rmx.rmx_expire, lock(EXPIRE));
1754#undef lock
1755#undef msec
1756#define RTA_IGN (RTA_DST|RTA_GATEWAY|RTA_NETMASK|RTA_IFP|RTA_IFA|RTA_BRD)
1757 if (verbose)
1758 pmsg_common(rtm, msglen);
1759 else if (rtm->rtm_addrs &~ RTA_IGN) {
1760 (void)printf("sockaddrs: ");
1761 printb(rtm->rtm_addrs, addrnames);
1762 putchar('\n');
1763 }
1764#undef RTA_IGN
1765}
1766
1767static void
1768pmsg_common(struct rt_msghdr *rtm, size_t msglen)
1769{
1770
1771 (void)printf("\nlocks: ");
1772 printb(rtm->rtm_rmx.rmx_locks, metricnames);
1773 (void)printf(" inits: ");
1774 printb(rtm->rtm_inits, metricnames);
1775 if (msglen > sizeof(struct rt_msghdr))
1776 pmsg_addrs(((char *)(rtm + 1)), rtm->rtm_addrs,
1777 msglen - sizeof(struct rt_msghdr));
1778 else
1779 (void)fflush(stdout);
1780}
1781
1782static void
1783pmsg_addrs(char *cp, int addrs, size_t len)
1784{
1785 struct sockaddr *sa;
1786 int i;
1787
1788 if (addrs == 0) {
1789 (void)putchar('\n');
1790 return;
1791 }
1792 (void)printf("\nsockaddrs: ");
1793 printb(addrs, addrnames);
1794 putchar('\n');
1795 for (i = 1; i != 0; i <<= 1)
1796 if (i & addrs) {
1797 sa = (struct sockaddr *)cp;
1798 if (len == 0 || len < SA_SIZE(sa)) {
1799 (void)printf(errfmt, __func__, len);
1800 break;
1801 }
1802 (void)printf(" %s", routename(sa));
1803 len -= SA_SIZE(sa);
1804 cp += SA_SIZE(sa);
1805 }
1806 (void)putchar('\n');
1807 (void)fflush(stdout);
1808}
1809
1810static void
1811printb(int b, const char *str)
1812{
1813 int i;
1814 int gotsome = 0;
1815
1816 if (b == 0)
1817 return;
1818 while ((i = *str++) != 0) {
1819 if (b & (1 << (i-1))) {
1820 if (gotsome == 0)
1821 i = '<';
1822 else
1823 i = ',';
1824 putchar(i);
1825 gotsome = 1;
1826 for (; (i = *str) > 32; str++)
1827 putchar(i);
1828 } else
1829 while (*str > 32)
1830 str++;
1831 }
1832 if (gotsome)
1833 putchar('>');
1834}
1835
1836int
1837keyword(const char *cp)
1838{
1839 struct keytab *kt = keywords;
1840
1841 while (kt->kt_cp != NULL && strcmp(kt->kt_cp, cp) != 0)
1842 kt++;
1843 return (kt->kt_i);
1844}
1845
1846static void
1847sodump(struct sockaddr *sa, const char *which)
1848{
1849#ifdef INET6
1850 char nbuf[INET6_ADDRSTRLEN];
1851#endif
1852
1853 switch (sa->sa_family) {
1854 case AF_LINK:
1855 (void)printf("%s: link %s; ", which,
1856 link_ntoa((struct sockaddr_dl *)sa));
1857 break;
1858#ifdef INET
1859 case AF_INET:
1860 (void)printf("%s: inet %s; ", which,
1861 inet_ntoa(((struct sockaddr_in *)sa)->sin_addr));
1862 break;
1863#endif
1864#ifdef INET6
1865 case AF_INET6:
1866 (void)printf("%s: inet6 %s; ", which, inet_ntop(sa->sa_family,
1867 &((struct sockaddr_in6 *)sa)->sin6_addr, nbuf,
1868 sizeof(nbuf)));
1869 break;
1870#endif
1871 case AF_APPLETALK:
1872 (void)printf("%s: atalk %s; ", which,
1873 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
1874 break;
1875 }
1876 (void)fflush(stdout);
1877}
1878
1879/* States*/
1880#define VIRGIN 0
1881#define GOTONE 1
1882#define GOTTWO 2
1883/* Inputs */
1884#define DIGIT (4*0)
1885#define END (4*1)
1886#define DELIM (4*2)
1887
1888static void
1889sockaddr(char *addr, struct sockaddr *sa, size_t size)
1890{
1891 char *cp = (char *)sa;
1892 char *cplim = cp + size;
1893 int byte = 0, state = VIRGIN, new = 0 /* foil gcc */;
1894
1895 memset(cp, 0, size);
1896 cp++;
1897 do {
1898 if ((*addr >= '0') && (*addr <= '9')) {
1899 new = *addr - '0';
--- 39 unchanged lines hidden (view full) ---
1939 return(1);
1940}
1941
1942static char *
1943atalk_ntoa(struct at_addr at)
1944{
1945 static char buf[20];
1946
1947 (void)snprintf(buf, sizeof(buf), "%u.%u", ntohs(at.s_net), at.s_node);
1948 buf[sizeof(buf) - 1] = '\0';
1949 return(buf);
1950}
2 * Copyright (c) 1983, 1989, 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
--- 26 unchanged lines hidden (view full) ---
35
36#ifndef lint
37#if 0
38static char sccsid[] = "@(#)route.c 8.6 (Berkeley) 4/28/95";
39#endif
40#endif /* not lint */
41
42#include <sys/cdefs.h>
43__FBSDID("$FreeBSD: head/sbin/route/route.c 253427 2013-07-17 14:05:20Z hrs $");
44
45#include <sys/param.h>
46#include <sys/file.h>
47#include <sys/socket.h>
48#include <sys/ioctl.h>
49#include <sys/sysctl.h>
50#include <sys/types.h>
51#include <sys/queue.h>
--- 13 unchanged lines hidden (view full) ---
65#include <paths.h>
66#include <stdio.h>
67#include <stdlib.h>
68#include <string.h>
69#include <sysexits.h>
70#include <unistd.h>
71#include <ifaddrs.h>
72
73static struct keytab {
74 const char *kt_cp;
75 int kt_i;
76} keywords[] = {
77#include "keywords.h"
78 {0, 0}
79};
80
81static struct sockaddr_storage so[RTAX_MAX];
82static int pid, rtm_addrs;
83static int s;
84static int forcehost, forcenet, nflag, af, qflag, tflag;
85static int verbose, aflen;
86static int locking, lockrest, debugonly;
87static struct rt_metrics rt_metrics;
88static u_long rtm_inits;
89static uid_t uid;
90static int defaultfib;
91static int numfibs;
92
93static int atalk_aton(const char *, struct at_addr *);
94static char *atalk_ntoa(struct at_addr);
95static void printb(int, const char *);
96static void flushroutes(int argc, char *argv[]);
97static int flushroutes_fib(int);
98static int getaddr(int, char *, struct hostent **, int);
99static int keyword(const char *);
100#ifdef INET
101static void inet_makenetandmask(u_long, struct sockaddr_in *,
102 struct sockaddr_in *, u_long);
103#endif
104#ifdef INET6
105static int inet6_makenetandmask(struct sockaddr_in6 *, const char *);
106#endif
107static void interfaces(void);
108static void monitor(int, char*[]);
109static const char *netname(struct sockaddr *);
110static void newroute(int, char **);
111static int newroute_fib(int, char *, int);
112static void pmsg_addrs(char *, int, size_t);
113static void pmsg_common(struct rt_msghdr *, size_t);
114static int prefixlen(const char *);
115static void print_getmsg(struct rt_msghdr *, int, int);
116static void print_rtmsg(struct rt_msghdr *, size_t);
117static const char *routename(struct sockaddr *);
118static int rtmsg(int, int, int);
119static void set_metric(char *, int);
120static int set_sofib(int);
121static int set_procfib(int);
122static void sockaddr(char *, struct sockaddr *, size_t);
123static void sodump(struct sockaddr *, const char *);
124extern char *iso_ntoa(void);
125
126struct fibl {
127 TAILQ_ENTRY(fibl) fl_next;
128
129 int fl_num;
130 int fl_error;
131 int fl_errno;
132};
133static TAILQ_HEAD(fibl_head_t, fibl) fibl_head;
134
135static int fiboptlist_csv(const char *, struct fibl_head_t *);
136static int fiboptlist_range(const char *, struct fibl_head_t *);
137
138static void usage(const char *) __dead2;
139
140void
141usage(const char *cp)
142{
143 if (cp != NULL)
144 warnx("bad keyword: %s", cp);
145 errx(EX_USAGE, "usage: route [-dnqtv] command [[modifiers] args]");
146 /* NOTREACHED */
147}
148
149int
150main(int argc, char **argv)
151{
152 int ch;
153 size_t len;
--- 143 unchanged lines hidden (view full) ---
297#define ALLSTRLEN 64
298static int
299fiboptlist_csv(const char *arg, struct fibl_head_t *flh)
300{
301 struct fibl *fl;
302 char *str0, *str, *token, *endptr;
303 int fib, error;
304
305 str0 = str = NULL;
306 if (strcmp("all", arg) == 0) {
307 str = calloc(1, ALLSTRLEN);
308 if (str == NULL) {
309 error = 1;
310 goto fiboptlist_csv_ret;
311 }
312 if (numfibs > 1)
313 snprintf(str, ALLSTRLEN - 1, "%d-%d", 0, numfibs - 1);
--- 33 unchanged lines hidden (view full) ---
347 error = 1;
348 goto fiboptlist_csv_ret;
349 }
350 fl->fl_num = fib;
351 TAILQ_INSERT_TAIL(flh, fl, fl_next);
352 }
353 }
354fiboptlist_csv_ret:
355 if (str0 != NULL)
356 free(str0);
357 return (error);
358}
359
360/*
361 * Purge all entries in the routing tables not
362 * associated with network interfaces.
363 */
364static void
365flushroutes(int argc, char *argv[])
366{
367 struct fibl *fl;
368 int error;
369
370 if (uid != 0 && !debugonly && !tflag)
371 errx(EX_NOPERM, "must be root to alter routing table");
372 shutdown(s, SHUT_RD); /* Don't want to read back our messages */
373
374 TAILQ_INIT(&fibl_head);
375 while (argc > 1) {
376 argc--;
377 argv++;
378 if (**argv != '-')
379 usage(*argv);
380 switch (keyword(*argv + 1)) {
381#ifdef INET
382 case K_INET:
383 af = AF_INET;
384 break;
385#endif
386#ifdef INET6
387 case K_INET6:
388 af = AF_INET6;
389 break;
390#endif
391 case K_ATALK:
392 af = AF_APPLETALK;
393 break;
--- 35 unchanged lines hidden (view full) ---
429 warn("fib number %d is ignored", fib);
430 return (error);
431 }
432
433retry:
434 mib[0] = CTL_NET;
435 mib[1] = PF_ROUTE;
436 mib[2] = 0; /* protocol */
437 mib[3] = AF_UNSPEC;
438 mib[4] = NET_RT_DUMP;
439 mib[5] = 0; /* no flags */
440 if (sysctl(mib, nitems(mib), NULL, &needed, NULL, 0) < 0)
441 err(EX_OSERR, "route-sysctl-estimate");
442 if ((buf = malloc(needed)) == NULL)
443 errx(EX_OSERR, "malloc failed");
444 if (sysctl(mib, nitems(mib), buf, &needed, NULL, 0) < 0) {
445 if (errno == ENOMEM && count++ < 10) {
446 warnx("Routing table grew, retrying");
447 sleep(1);
448 free(buf);
449 goto retry;
450 }
451 err(EX_OSERR, "route-sysctl-get");
452 }
453 lim = buf + needed;
454 if (verbose)
455 (void)printf("Examining routing table from sysctl\n");
456 seqno = 0; /* ??? */
457 for (next = buf; next < lim; next += rtm->rtm_msglen) {
458 rtm = (struct rt_msghdr *)next;
459 if (verbose)
460 print_rtmsg(rtm, rtm->rtm_msglen);
461 if ((rtm->rtm_flags & RTF_GATEWAY) == 0)
462 continue;
463 if (af != 0) {
--- 6 unchanged lines hidden (view full) ---
470 continue;
471 rtm->rtm_type = RTM_DELETE;
472 rtm->rtm_seq = seqno;
473 rlen = write(s, next, rtm->rtm_msglen);
474 if (rlen < 0 && errno == EPERM)
475 err(1, "write to routing socket");
476 if (rlen < (int)rtm->rtm_msglen) {
477 warn("write to routing socket");
478 (void)printf("got only %d for rlen\n", rlen);
479 free(buf);
480 goto retry;
481 break;
482 }
483 seqno++;
484 if (qflag)
485 continue;
486 if (verbose)
--- 13 unchanged lines hidden (view full) ---
500 return (error);
501}
502
503const char *
504routename(struct sockaddr *sa)
505{
506 const char *cp;
507 static char line[MAXHOSTNAMELEN + 1];
508#ifdef INET
509 struct hostent *hp;
510#endif
511 static char domain[MAXHOSTNAMELEN + 1];
512 static int first = 1, n;
513
514 if (first) {
515 first = 0;
516 if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
517 (cp = strchr(domain, '.'))) {
518 domain[MAXHOSTNAMELEN] = '\0';
519 (void)strcpy(domain, cp + 1);
520 } else
521 domain[0] = '\0';
522 }
523
524 if (sa->sa_len == 0) {
525 strcpy(line, "default");
526 return (line);
527 }
528 switch (sa->sa_family) {
529#ifdef INET
530 case AF_INET:
531 {
532 struct in_addr in;
533
534 in = ((struct sockaddr_in *)sa)->sin_addr;
535 cp = NULL;
536 if (in.s_addr == INADDR_ANY || sa->sa_len < 4)
537 cp = "default";
538 if (cp == NULL && !nflag) {
539 hp = gethostbyaddr((char *)&in, sizeof (struct in_addr),
540 AF_INET);
541 if (hp != NULL) {
542 char *cptr;
543 cptr = strchr(hp->h_name, '.');
544 if (cptr != NULL &&
545 strcmp(cptr + 1, domain) == 0)
546 *cptr = '\0';
547 cp = hp->h_name;
548 }
549 }
550 if (cp != NULL) {
551 strncpy(line, cp, sizeof(line) - 1);
552 line[sizeof(line) - 1] = '\0';
553 } else
554 (void)sprintf(line, "%s", inet_ntoa(in));
555 break;
556 }
557
558#endif
559#ifdef INET6
560 case AF_INET6:
561 {
562 struct sockaddr_in6 sin6; /* use static var for safety */
563 int niflags = 0;
564
565 memset(&sin6, 0, sizeof(sin6));
566 memcpy(&sin6, sa, sa->sa_len);
567 sin6.sin6_len = sizeof(struct sockaddr_in6);
568 sin6.sin6_family = AF_INET6;
569 if (nflag)
570 niflags |= NI_NUMERICHOST;
571 if (getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len,
572 line, sizeof(line), NULL, 0, niflags) != 0)
573 strncpy(line, "invalid", sizeof(line));
574
575 return (line);
576 }
577#endif
578
579 case AF_APPLETALK:
580 (void)snprintf(line, sizeof(line), "atalk %s",
581 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
582 break;
583
584 case AF_LINK:
585 return (link_ntoa((struct sockaddr_dl *)sa));
586 break;
587
588 default:
589 {
590 u_short *sp = (u_short *)sa;
591 u_short *splim = sp + ((sa->sa_len + 1) >> 1);
592 char *cps = line + sprintf(line, "(%d)", sa->sa_family);
593 char *cpe = line + sizeof(line);
594
--- 10 unchanged lines hidden (view full) ---
605
606/*
607 * Return the name of the network whose address is given.
608 * The address is assumed to be that of a net, not a host.
609 */
610const char *
611netname(struct sockaddr *sa)
612{
613 static char line[MAXHOSTNAMELEN + 1];
614 int n;
615#ifdef INET
616 struct netent *np = NULL;
617 const char *cp = NULL;
618 u_long i;
619#endif
620
621 switch (sa->sa_family) {
622#ifdef INET
623 case AF_INET:
624 {
625 struct in_addr in;
626
627 in = ((struct sockaddr_in *)sa)->sin_addr;
628 i = in.s_addr = ntohl(in.s_addr);
629 if (in.s_addr == 0)
630 cp = "default";
631 else if (!nflag) {
632 np = getnetbyaddr(i, AF_INET);
633 if (np != NULL)
634 cp = np->n_name;
635 }
636#define C(x) (unsigned)((x) & 0xff)
637 if (cp != NULL)
638 strncpy(line, cp, sizeof(line));
639 else if ((in.s_addr & 0xffffff) == 0)
640 (void)sprintf(line, "%u", C(in.s_addr >> 24));
641 else if ((in.s_addr & 0xffff) == 0)
642 (void)sprintf(line, "%u.%u", C(in.s_addr >> 24),
643 C(in.s_addr >> 16));
644 else if ((in.s_addr & 0xff) == 0)
645 (void)sprintf(line, "%u.%u.%u", C(in.s_addr >> 24),
646 C(in.s_addr >> 16), C(in.s_addr >> 8));
647 else
648 (void)sprintf(line, "%u.%u.%u.%u", C(in.s_addr >> 24),
649 C(in.s_addr >> 16), C(in.s_addr >> 8),
650 C(in.s_addr));
651#undef C
652 break;
653 }
654#endif
655#ifdef INET6
656 case AF_INET6:
657 {
658 struct sockaddr_in6 sin6;
659 int niflags = 0;
660
661 memset(&sin6, 0, sizeof(sin6));
662 memcpy(&sin6, sa, sa->sa_len);
663 sin6.sin6_len = sizeof(sin6);
664 sin6.sin6_family = AF_INET6;
665 if (nflag)
666 niflags |= NI_NUMERICHOST;
667 if (getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len,
668 line, sizeof(line), NULL, 0, niflags) != 0)
669 strncpy(line, "invalid", sizeof(line));
670
671 return(line);
672 }
673#endif
674
675 case AF_APPLETALK:
676 (void)snprintf(line, sizeof(line), "atalk %s",
677 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
678 break;
679
680 case AF_LINK:
681 return (link_ntoa((struct sockaddr_dl *)sa));
682 break;
683
684 default:
685 {
686 u_short *sp = (u_short *)sa->sa_data;
687 u_short *splim = sp + ((sa->sa_len + 1)>>1);
688 char *cps = line + sprintf(line, "af %d:", sa->sa_family);
689 char *cpe = line + sizeof(line);
690
691 while (sp < splim && cps < cpe)
--- 43 unchanged lines hidden (view full) ---
735newroute(int argc, char **argv)
736{
737 struct hostent *hp;
738 struct fibl *fl;
739 char *cmd;
740 const char *dest, *gateway, *errmsg;
741 int key, error, flags, nrflags, fibnum;
742
743 if (uid != 0 && !debugonly && !tflag)
744 errx(EX_NOPERM, "must be root to alter routing table");
745 dest = NULL;
746 gateway = NULL;
747 flags = RTF_STATIC;
748 nrflags = 0;
749 hp = NULL;
750 TAILQ_INIT(&fibl_head);
751
752 cmd = argv[0];
753 if (*cmd != 'g' && *cmd != 's')
754 shutdown(s, SHUT_RD); /* Don't want to read back our messages */
755 while (--argc > 0) {
756 if (**(++argv)== '-') {
757 switch (key = keyword(1 + *argv)) {
758 case K_LINK:
759 af = AF_LINK;
760 aflen = sizeof(struct sockaddr_dl);
761 break;
762#ifdef INET
763 case K_INET:
764 af = AF_INET;
765 aflen = sizeof(struct sockaddr_in);
766 break;
767#endif
768#ifdef INET6
769 case K_INET6:
770 af = AF_INET6;
771 aflen = sizeof(struct sockaddr_in6);
772 break;
773#endif
774 case K_ATALK:
775 af = AF_APPLETALK;
776 aflen = sizeof(struct sockaddr_at);
777 break;
778 case K_SA:
779 af = PF_ROUTE;
780 aflen = sizeof(struct sockaddr_storage);
781 break;
782 case K_IFACE:
783 case K_INTERFACE:
784 nrflags |= F_INTERFACE;
785 break;
786 case K_NOSTATIC:
787 flags &= ~RTF_STATIC;
788 break;
--- 119 unchanged lines hidden (view full) ---
908 }
909 }
910
911 if (nrflags & F_FORCEHOST) {
912 nrflags |= F_ISHOST;
913#ifdef INET6
914 if (af == AF_INET6) {
915 rtm_addrs &= ~RTA_NETMASK;
916 memset(&so[RTAX_NETMASK], 0, sizeof(so[RTAX_NETMASK]));
917 }
918#endif
919 }
920 if (nrflags & F_FORCENET)
921 nrflags &= ~F_ISHOST;
922 flags |= RTF_UP;
923 if (nrflags & F_ISHOST)
924 flags |= RTF_HOST;
--- 106 unchanged lines hidden (view full) ---
1031 warn("fib number %d is ignored", fib);
1032 return (error);
1033 }
1034
1035 error = rtmsg(*cmd, flags, fib);
1036 return (error);
1037}
1038
1039#ifdef INET
1040static void
1041inet_makenetandmask(u_long net, struct sockaddr_in *sin,
1042 struct sockaddr_in *sin_mask, u_long bits)
1043{
1044 u_long mask = 0;
1045
1046 rtm_addrs |= RTA_NETMASK;
1047
1048 /*
1049 * MSB of net should be meaningful. 0/0 is exception.
1050 */
1051 if (net > 0)
1052 while ((net & 0xff000000) == 0)
1053 net <<= 8;
1054
1055 /*
1056 * If no /xx was specified we must calculate the
1057 * CIDR address.
1058 */
1059 if ((bits == 0) && (net != 0)) {
1060 u_long i, j;
1061
1062 for(i = 0, j = 0xff; i < 4; i++) {
1063 if (net & j) {
1064 break;
1065 }
1066 j <<= 8;
1067 }
1068 /* i holds the first non zero bit */
1069 bits = 32 - (i*8);
1070 }
1071 if (bits != 0)
1072 mask = 0xffffffff << (32 - bits);
1073
1074 sin->sin_addr.s_addr = htonl(net);
1075 sin_mask->sin_addr.s_addr = htonl(mask);
1076 sin_mask->sin_len = sizeof(struct sockaddr_in);
1077 sin_mask->sin_family = AF_INET;
1078}
1079#endif
1080
1081#ifdef INET6
1082/*
1083 * XXX the function may need more improvement...
1084 */
1085static int
1086inet6_makenetandmask(struct sockaddr_in6 *sin6, const char *plen)
1087{
--- 22 unchanged lines hidden (view full) ---
1110
1111/*
1112 * Interpret an argument as a network address of some kind,
1113 * returning 1 if a host address, 0 if a network address.
1114 */
1115static int
1116getaddr(int which, char *str, struct hostent **hpp, int nrflags)
1117{
1118 struct sockaddr *sa;
1119#if defined(INET)
1120 struct sockaddr_in *sin;
1121 struct hostent *hp;
1122 struct netent *np;
1123 u_long val;
1124 char *q;
1125#elif defined(INET6)
1126 char *q;
1127#endif
1128
1129 if (af == 0) {
1130#if defined(INET)
1131 af = AF_INET;
1132 aflen = sizeof(struct sockaddr_in);
1133#elif defined(INET6)
1134 af = AF_INET6;
1135 aflen = sizeof(struct sockaddr_in6);
1136#else
1137 af = AF_LINK;
1138 aflen = sizeof(struct sockaddr_dl);
1139#endif
1140 }
1141 rtm_addrs |= which;
1142
1143 switch (which) {
1144 case RTA_DST:
1145 sa = (struct sockaddr *)&so[RTAX_DST];
1146 break;
1147 case RTA_GATEWAY:
1148 sa = (struct sockaddr *)&so[RTAX_GATEWAY];
1149 break;
1150 case RTA_NETMASK:
1151 sa = (struct sockaddr *)&so[RTAX_NETMASK];
1152 break;
1153 case RTA_GENMASK:
1154 sa = (struct sockaddr *)&so[RTAX_GENMASK];
1155 break;
1156 case RTA_IFA:
1157 sa = (struct sockaddr *)&so[RTAX_IFA];
1158 break;
1159 case RTA_IFP:
1160 sa = (struct sockaddr *)&so[RTAX_IFP];
1161 break;
1162 default:
1163 usage("internal error");
1164 /*NOTREACHED*/
1165 }
1166 sa->sa_family = af;
1167 sa->sa_len = aflen;
1168
1169 switch (which) {
1170 case RTA_GATEWAY:
1171 if (nrflags & F_INTERFACE) {
1172 struct ifaddrs *ifap, *ifa;
1173 struct sockaddr_dl *sdl0 = (struct sockaddr_dl *)sa;
1174 struct sockaddr_dl *sdl = NULL;
1175
1176 if (getifaddrs(&ifap))
1177 err(EX_OSERR, "getifaddrs");
1178
1179 for (ifa = ifap; ifa != NULL; ifa = ifa->ifa_next) {
1180 if (ifa->ifa_addr->sa_family != AF_LINK)
1181 continue;
1182
1183 if (strcmp(str, ifa->ifa_name) != 0)
1184 continue;
1185
1186 sdl = (struct sockaddr_dl *)ifa->ifa_addr;
1187 }
1188 /* If we found it, then use it */
1189 if (sdl != NULL) {
1190 /*
1191 * Note that we need to copy before calling
1192 * freeifaddrs().
1193 */
1194 memcpy(sdl0, sdl, sdl->sdl_len);
1195 }
1196 freeifaddrs(ifap);
1197 if (sdl != NULL)
1198 return(1);
1199 }
1200 break;
1201 case RTA_IFP:
1202 sa->sa_family = AF_LINK;
1203 break;
1204 }
1205 if (strcmp(str, "default") == 0) {
1206 /*
1207 * Default is net 0.0.0.0/0
1208 */
1209 switch (which) {
1210 case RTA_DST:
1211 forcenet++;
1212 getaddr(RTA_NETMASK, str, 0, nrflags);
1213 break;
1214 }
1215 return (0);
1216 }
1217 switch (sa->sa_family) {
1218#ifdef INET6
1219 case AF_INET6:
1220 {
1221 struct addrinfo hints, *res;
1222 int ecode;
1223
1224 q = NULL;
1225 if (which == RTA_DST && (q = strchr(str, '/')) != NULL)
1226 *q = '\0';
1227 memset(&hints, 0, sizeof(hints));
1228 hints.ai_family = sa->sa_family;
1229 hints.ai_socktype = SOCK_DGRAM;
1230 ecode = getaddrinfo(str, NULL, &hints, &res);
1231 if (ecode != 0 || res->ai_family != AF_INET6 ||
1232 res->ai_addrlen != sizeof(struct sockaddr_in6))
1233 errx(EX_OSERR, "%s: %s", str, gai_strerror(ecode));
1234 memcpy(sa, res->ai_addr, res->ai_addrlen);
1235 freeaddrinfo(res);
1236 if (q != NULL)
1237 *q++ = '/';
1238 if (which == RTA_DST)
1239 return (inet6_makenetandmask((struct sockaddr_in6 *)sa,
1240 q));
1241 return (0);
1242 }
1243#endif /* INET6 */
1244
1245 case AF_APPLETALK:
1246 {
1247 struct sockaddr_at *sat = (struct sockaddr_at *)sa;
1248
1249 if (!atalk_aton(str, &sat->sat_addr))
1250 errx(EX_NOHOST, "bad address: %s", str);
1251 rtm_addrs |= RTA_NETMASK;
1252 return(forcehost || sat->sat_addr.s_node != 0);
1253 }
1254 case AF_LINK:
1255 link_addr(str, (struct sockaddr_dl *)sa);
1256 return (1);
1257
1258 case PF_ROUTE:
1259 sockaddr(str, sa, sizeof(struct sockaddr_storage));
1260 return (1);
1261#ifdef INET
1262 case AF_INET:
1263#endif
1264 default:
1265 break;
1266 }
1267
1268#ifdef INET
1269 sin = (struct sockaddr_in *)sa;
1270 if (hpp == NULL)
1271 hpp = &hp;
1272 *hpp = NULL;
1273
1274 q = strchr(str,'/');
1275 if (q != NULL && which == RTA_DST) {
1276 *q = '\0';
1277 if ((val = inet_network(str)) != INADDR_NONE) {
1278 inet_makenetandmask(val, sin,
1279 (struct sockaddr_in *)&so[RTAX_NETMASK],
1280 strtoul(q+1, 0, 0));
1281 return (0);
1282 }
1283 *q = '/';
1284 }
1285 if ((which != RTA_DST || forcenet == 0) &&
1286 inet_aton(str, &sin->sin_addr)) {
1287 val = sin->sin_addr.s_addr;
1288 if (which != RTA_DST || forcehost ||
1289 inet_lnaof(sin->sin_addr) != INADDR_ANY)
1290 return (1);
1291 else {
1292 val = ntohl(val);
1293 goto netdone;
1294 }
1295 }
1296 if (which == RTA_DST && forcehost == 0 &&
1297 ((val = inet_network(str)) != INADDR_NONE ||
1298 ((np = getnetbyname(str)) != NULL && (val = np->n_net) != 0))) {
1299netdone:
1300 inet_makenetandmask(val, sin,
1301 (struct sockaddr_in *)&so[RTAX_NETMASK], 0);
1302 return (0);
1303 }
1304 hp = gethostbyname(str);
1305 if (hp != NULL) {
1306 *hpp = hp;
1307 sin->sin_family = hp->h_addrtype;
1308 memmove((char *)&sin->sin_addr, hp->h_addr,
1309 MIN((size_t)hp->h_length, sizeof(sin->sin_addr)));
1310 return (1);
1311 }
1312#endif
1313 errx(EX_NOHOST, "bad address: %s", str);
1314}
1315
1316static int
1317prefixlen(const char *str)
1318{
1319 int len = atoi(str), q, r;
1320 int max;
1321 char *p;
1322
1323 rtm_addrs |= RTA_NETMASK;
1324 switch (af) {
1325#ifdef INET6
1326 case AF_INET6:
1327 {
1328 struct sockaddr_in6 *sin6 =
1329 (struct sockaddr_in6 *)&so[RTAX_NETMASK];
1330
1331 max = 128;
1332 p = (char *)&sin6->sin6_addr;
1333 sin6->sin6_family = AF_INET6;
1334 sin6->sin6_len = sizeof(*sin6);
1335 break;
1336 }
1337#endif
1338#ifdef INET
1339 case AF_INET:
1340 {
1341 struct sockaddr_in *sin =
1342 (struct sockaddr_in *)&so[RTAX_NETMASK];
1343
1344 max = 32;
1345 p = (char *)&sin->sin_addr;
1346 sin->sin_family = AF_INET;
1347 sin->sin_len = sizeof(*sin);
1348 break;
1349 }
1350#endif
1351 default:
1352 errx(EX_OSERR, "prefixlen not supported in this af");
1353 }
1354
1355 if (len < 0 || max < len)
1356 errx(EX_USAGE, "%s: invalid prefixlen", str);
1357
1358 q = len >> 3;
1359 r = len & 7;
1360 memset((void *)p, 0, max / 8);
1361 if (q > 0)
1362 memset((void *)p, 0xff, q);
1363 if (r > 0)
1364 *((u_char *)p + q) = (0xff00 >> r) & 0xff;
1365 if (len == max)
1366 return (-1);
1367 else
--- 7 unchanged lines hidden (view full) ---
1375 int mib[6];
1376 char *buf, *lim, *next, count = 0;
1377 struct rt_msghdr *rtm;
1378
1379retry2:
1380 mib[0] = CTL_NET;
1381 mib[1] = PF_ROUTE;
1382 mib[2] = 0; /* protocol */
1383 mib[3] = AF_UNSPEC;
1384 mib[4] = NET_RT_IFLIST;
1385 mib[5] = 0; /* no flags */
1386 if (sysctl(mib, nitems(mib), NULL, &needed, NULL, 0) < 0)
1387 err(EX_OSERR, "route-sysctl-estimate");
1388 if ((buf = malloc(needed)) == NULL)
1389 errx(EX_OSERR, "malloc failed");
1390 if (sysctl(mib, nitems(mib), buf, &needed, NULL, 0) < 0) {
1391 if (errno == ENOMEM && count++ < 10) {
1392 warnx("Routing table grew, retrying");
1393 sleep(1);
1394 free(buf);
1395 goto retry2;
1396 }
1397 err(EX_OSERR, "actual retrieval of interface table");
1398 }
--- 43 unchanged lines hidden (view full) ---
1442 if (debugonly) {
1443 interfaces();
1444 exit(0);
1445 }
1446 for (;;) {
1447 time_t now;
1448 n = read(s, msg, 2048);
1449 now = time(NULL);
1450 (void)printf("\ngot message of size %d on %s", n, ctime(&now));
1451 print_rtmsg((struct rt_msghdr *)msg, n);
1452 }
1453}
1454
1455static struct {
1456 struct rt_msghdr m_rtm;
1457 char m_space[512];
1458} m_rtmsg;
1459
1460static int
1461rtmsg(int cmd, int flags, int fib)
1462{
1463 static int seq;
1464 int rlen;
1465 char *cp = m_rtmsg.m_space;
1466 int l;
1467
1468#define NEXTADDR(w, u) \
1469 if (rtm_addrs & (w)) { \
1470 l = SA_SIZE((struct sockaddr *)&(u)); \
1471 memmove(cp, (char *)&(u), l); \
1472 cp += l; \
1473 if (verbose) \
1474 sodump((struct sockaddr *)&(u), #w); \
1475 }
1476
1477 errno = 0;
1478 memset(&m_rtmsg, 0, sizeof(m_rtmsg));
1479 if (cmd == 'a')
1480 cmd = RTM_ADD;
1481 else if (cmd == 'c')
1482 cmd = RTM_CHANGE;
1483 else if (cmd == 'g' || cmd == 's') {
1484 cmd = RTM_GET;
1485 if (so[RTAX_IFP].ss_family == 0) {
1486 so[RTAX_IFP].ss_family = AF_LINK;
1487 so[RTAX_IFP].ss_len = sizeof(struct sockaddr_dl);
1488 rtm_addrs |= RTA_IFP;
1489 }
1490 } else
1491 cmd = RTM_DELETE;
1492#define rtm m_rtmsg.m_rtm
1493 rtm.rtm_type = cmd;
1494 rtm.rtm_flags = flags;
1495 rtm.rtm_version = RTM_VERSION;
1496 rtm.rtm_seq = ++seq;
1497 rtm.rtm_addrs = rtm_addrs;
1498 rtm.rtm_rmx = rt_metrics;
1499 rtm.rtm_inits = rtm_inits;
1500
1501 NEXTADDR(RTA_DST, so[RTAX_DST]);
1502 NEXTADDR(RTA_GATEWAY, so[RTAX_GATEWAY]);
1503 NEXTADDR(RTA_NETMASK, so[RTAX_NETMASK]);
1504 NEXTADDR(RTA_GENMASK, so[RTAX_GENMASK]);
1505 NEXTADDR(RTA_IFP, so[RTAX_IFP]);
1506 NEXTADDR(RTA_IFA, so[RTAX_IFA]);
1507 rtm.rtm_msglen = l = cp - (char *)&m_rtmsg;
1508 if (verbose)
1509 print_rtmsg(&rtm, l);
1510 if (debugonly)
1511 return (0);
1512 if ((rlen = write(s, (char *)&m_rtmsg, l)) < 0) {
1513 if (errno == EPERM)
1514 err(1, "writing to routing socket");
--- 8 unchanged lines hidden (view full) ---
1523 warn("read from routing socket");
1524 else
1525 print_getmsg(&rtm, l, fib);
1526 }
1527#undef rtm
1528 return (0);
1529}
1530
1531static const char *msgtypes[] = {
1532 "",
1533 "RTM_ADD: Add Route",
1534 "RTM_DELETE: Delete Route",
1535 "RTM_CHANGE: Change Metrics or flags",
1536 "RTM_GET: Report Metrics",
1537 "RTM_LOSING: Kernel Suspects Partitioning",
1538 "RTM_REDIRECT: Told to use different route",
1539 "RTM_MISS: Lookup failed on this address",
--- 5 unchanged lines hidden (view full) ---
1545 "RTM_DELADDR: address being removed from iface",
1546 "RTM_IFINFO: iface status change",
1547 "RTM_NEWMADDR: new multicast group membership on iface",
1548 "RTM_DELMADDR: multicast group membership removed from iface",
1549 "RTM_IFANNOUNCE: interface arrival/departure",
1550 "RTM_IEEE80211: IEEE 802.11 wireless event",
1551};
1552
1553static const char metricnames[] =
1554 "\011weight\010rttvar\7rtt\6ssthresh\5sendpipe\4recvpipe\3expire"
1555 "\1mtu";
1556static const char routeflags[] =
1557 "\1UP\2GATEWAY\3HOST\4REJECT\5DYNAMIC\6MODIFIED\7DONE"
1558 "\012XRESOLVE\013LLINFO\014STATIC\015BLACKHOLE"
1559 "\017PROTO2\020PROTO1\021PRCLONING\022WASCLONED\023PROTO3"
1560 "\025PINNED\026LOCAL\027BROADCAST\030MULTICAST\035STICKY";
1561static const char ifnetflags[] =
1562 "\1UP\2BROADCAST\3DEBUG\4LOOPBACK\5PTP\6b6\7RUNNING\010NOARP"
1563 "\011PPROMISC\012ALLMULTI\013OACTIVE\014SIMPLEX\015LINK0\016LINK1"
1564 "\017LINK2\020MULTICAST";
1565static const char addrnames[] =
1566 "\1DST\2GATEWAY\3NETMASK\4GENMASK\5IFP\6IFA\7AUTHOR\010BRD";
1567
1568static const char errfmt[] =
1569 "\n%s: truncated route message, only %zu bytes left\n";
1570
1571static void
1572print_rtmsg(struct rt_msghdr *rtm, size_t msglen)
1573{
1574 struct if_msghdr *ifm;
1575 struct ifa_msghdr *ifam;
1576#ifdef RTM_NEWMADDR
1577 struct ifma_msghdr *ifmam;
1578#endif
1579 struct if_announcemsghdr *ifan;
1580 const char *state;
1581
1582 if (verbose == 0)
1583 return;
1584 if (rtm->rtm_version != RTM_VERSION) {
1585 (void)printf("routing message version %d not understood\n",
1586 rtm->rtm_version);
1587 return;
1588 }
1589 if (rtm->rtm_type < sizeof(msgtypes) / sizeof(msgtypes[0]))
1590 (void)printf("%s: ", msgtypes[rtm->rtm_type]);
1591 else
1592 (void)printf("unknown type %d: ", rtm->rtm_type);
1593 (void)printf("len %d, ", rtm->rtm_msglen);
--- 4 unchanged lines hidden (view full) ---
1598 else \
1599 msglen -= sizeof(x); \
1600 } while (0)
1601
1602 switch (rtm->rtm_type) {
1603 case RTM_IFINFO:
1604 REQUIRE(struct if_msghdr);
1605 ifm = (struct if_msghdr *)rtm;
1606 (void)printf("if# %d, ", ifm->ifm_index);
1607 switch (ifm->ifm_data.ifi_link_state) {
1608 case LINK_STATE_DOWN:
1609 state = "down";
1610 break;
1611 case LINK_STATE_UP:
1612 state = "up";
1613 break;
1614 default:
1615 state = "unknown";
1616 break;
1617 }
1618 (void)printf("link: %s, flags:", state);
1619 printb(ifm->ifm_flags, ifnetflags);
1620 pmsg_addrs((char *)(ifm + 1), ifm->ifm_addrs, msglen);
1621 break;
1622 case RTM_NEWADDR:
1623 case RTM_DELADDR:
1624 REQUIRE(struct ifa_msghdr);
1625 ifam = (struct ifa_msghdr *)rtm;
1626 (void)printf("metric %d, flags:", ifam->ifam_metric);
1627 printb(ifam->ifam_flags, routeflags);
1628 pmsg_addrs((char *)(ifam + 1), ifam->ifam_addrs, msglen);
1629 break;
1630#ifdef RTM_NEWMADDR
1631 case RTM_NEWMADDR:
1632 case RTM_DELMADDR:
1633 REQUIRE(struct ifma_msghdr);
1634 ifmam = (struct ifma_msghdr *)rtm;
1635 pmsg_addrs((char *)(ifmam + 1), ifmam->ifmam_addrs, msglen);
1636 break;
1637#endif
1638 case RTM_IFANNOUNCE:
1639 REQUIRE(struct if_announcemsghdr);
1640 ifan = (struct if_announcemsghdr *)rtm;
1641 (void)printf("if# %d, what: ", ifan->ifan_index);
1642 switch (ifan->ifan_what) {
1643 case IFAN_ARRIVAL:
1644 (void)printf("arrival");
1645 break;
1646 case IFAN_DEPARTURE:
1647 printf("departure");
1648 break;
1649 default:
1650 printf("#%d", ifan->ifan_what);
1651 break;
1652 }
1653 printf("\n");
1654 fflush(stdout);
1655 break;
1656
1657 default:
1658 printf("pid: %ld, seq %d, errno %d, flags:",
1659 (long)rtm->rtm_pid, rtm->rtm_seq, rtm->rtm_errno);
1660 printb(rtm->rtm_flags, routeflags);
1661 pmsg_common(rtm, msglen);
1662 }
1663
1664 return;
1665
1666badlen:
1667 (void)printf(errfmt, __func__, msglen);
1668#undef REQUIRE
1669}
1670
1671static void
1672print_getmsg(struct rt_msghdr *rtm, int msglen, int fib)
1673{
1674 struct sockaddr *dst = NULL, *gate = NULL, *mask = NULL;
1675 struct sockaddr_dl *ifp = NULL;
1676 struct sockaddr *sa;
1677 char *cp;
1678 int i;
1679
1680 (void)printf(" route to: %s\n",
1681 routename((struct sockaddr *)&so[RTAX_DST]));
1682 if (rtm->rtm_version != RTM_VERSION) {
1683 warnx("routing message version %d not understood",
1684 rtm->rtm_version);
1685 return;
1686 }
1687 if (rtm->rtm_msglen > msglen) {
1688 warnx("message length mismatch, in packet %d, returned %d",
1689 rtm->rtm_msglen, msglen);
--- 40 unchanged lines hidden (view full) ---
1730 if (gate && rtm->rtm_flags & RTF_GATEWAY)
1731 (void)printf(" gateway: %s\n", routename(gate));
1732 if (fib >= 0)
1733 (void)printf(" fib: %u\n", (unsigned int)fib);
1734 if (ifp)
1735 (void)printf(" interface: %.*s\n",
1736 ifp->sdl_nlen, ifp->sdl_data);
1737 (void)printf(" flags: ");
1738 printb(rtm->rtm_flags, routeflags);
1739
1740#define lock(f) ((rtm->rtm_rmx.rmx_locks & __CONCAT(RTV_,f)) ? 'L' : ' ')
1741#define msec(u) (((u) + 500) / 1000) /* usec to msec */
1742
1743 printf("\n%s\n", "\
1744 recvpipe sendpipe ssthresh rtt,msec mtu weight expire");
1745 printf("%8ld%c ", rtm->rtm_rmx.rmx_recvpipe, lock(RPIPE));
1746 printf("%8ld%c ", rtm->rtm_rmx.rmx_sendpipe, lock(SPIPE));
1747 printf("%8ld%c ", rtm->rtm_rmx.rmx_ssthresh, lock(SSTHRESH));
1748 printf("%8ld%c ", msec(rtm->rtm_rmx.rmx_rtt), lock(RTT));
1749 printf("%8ld%c ", rtm->rtm_rmx.rmx_mtu, lock(MTU));
1750 printf("%8ld%c ", rtm->rtm_rmx.rmx_weight, lock(WEIGHT));
1751 if (rtm->rtm_rmx.rmx_expire)
1752 rtm->rtm_rmx.rmx_expire -= time(0);
1753 printf("%8ld%c\n", rtm->rtm_rmx.rmx_expire, lock(EXPIRE));
1754#undef lock
1755#undef msec
1756#define RTA_IGN (RTA_DST|RTA_GATEWAY|RTA_NETMASK|RTA_IFP|RTA_IFA|RTA_BRD)
1757 if (verbose)
1758 pmsg_common(rtm, msglen);
1759 else if (rtm->rtm_addrs &~ RTA_IGN) {
1760 (void)printf("sockaddrs: ");
1761 printb(rtm->rtm_addrs, addrnames);
1762 putchar('\n');
1763 }
1764#undef RTA_IGN
1765}
1766
1767static void
1768pmsg_common(struct rt_msghdr *rtm, size_t msglen)
1769{
1770
1771 (void)printf("\nlocks: ");
1772 printb(rtm->rtm_rmx.rmx_locks, metricnames);
1773 (void)printf(" inits: ");
1774 printb(rtm->rtm_inits, metricnames);
1775 if (msglen > sizeof(struct rt_msghdr))
1776 pmsg_addrs(((char *)(rtm + 1)), rtm->rtm_addrs,
1777 msglen - sizeof(struct rt_msghdr));
1778 else
1779 (void)fflush(stdout);
1780}
1781
1782static void
1783pmsg_addrs(char *cp, int addrs, size_t len)
1784{
1785 struct sockaddr *sa;
1786 int i;
1787
1788 if (addrs == 0) {
1789 (void)putchar('\n');
1790 return;
1791 }
1792 (void)printf("\nsockaddrs: ");
1793 printb(addrs, addrnames);
1794 putchar('\n');
1795 for (i = 1; i != 0; i <<= 1)
1796 if (i & addrs) {
1797 sa = (struct sockaddr *)cp;
1798 if (len == 0 || len < SA_SIZE(sa)) {
1799 (void)printf(errfmt, __func__, len);
1800 break;
1801 }
1802 (void)printf(" %s", routename(sa));
1803 len -= SA_SIZE(sa);
1804 cp += SA_SIZE(sa);
1805 }
1806 (void)putchar('\n');
1807 (void)fflush(stdout);
1808}
1809
1810static void
1811printb(int b, const char *str)
1812{
1813 int i;
1814 int gotsome = 0;
1815
1816 if (b == 0)
1817 return;
1818 while ((i = *str++) != 0) {
1819 if (b & (1 << (i-1))) {
1820 if (gotsome == 0)
1821 i = '<';
1822 else
1823 i = ',';
1824 putchar(i);
1825 gotsome = 1;
1826 for (; (i = *str) > 32; str++)
1827 putchar(i);
1828 } else
1829 while (*str > 32)
1830 str++;
1831 }
1832 if (gotsome)
1833 putchar('>');
1834}
1835
1836int
1837keyword(const char *cp)
1838{
1839 struct keytab *kt = keywords;
1840
1841 while (kt->kt_cp != NULL && strcmp(kt->kt_cp, cp) != 0)
1842 kt++;
1843 return (kt->kt_i);
1844}
1845
1846static void
1847sodump(struct sockaddr *sa, const char *which)
1848{
1849#ifdef INET6
1850 char nbuf[INET6_ADDRSTRLEN];
1851#endif
1852
1853 switch (sa->sa_family) {
1854 case AF_LINK:
1855 (void)printf("%s: link %s; ", which,
1856 link_ntoa((struct sockaddr_dl *)sa));
1857 break;
1858#ifdef INET
1859 case AF_INET:
1860 (void)printf("%s: inet %s; ", which,
1861 inet_ntoa(((struct sockaddr_in *)sa)->sin_addr));
1862 break;
1863#endif
1864#ifdef INET6
1865 case AF_INET6:
1866 (void)printf("%s: inet6 %s; ", which, inet_ntop(sa->sa_family,
1867 &((struct sockaddr_in6 *)sa)->sin6_addr, nbuf,
1868 sizeof(nbuf)));
1869 break;
1870#endif
1871 case AF_APPLETALK:
1872 (void)printf("%s: atalk %s; ", which,
1873 atalk_ntoa(((struct sockaddr_at *)sa)->sat_addr));
1874 break;
1875 }
1876 (void)fflush(stdout);
1877}
1878
1879/* States*/
1880#define VIRGIN 0
1881#define GOTONE 1
1882#define GOTTWO 2
1883/* Inputs */
1884#define DIGIT (4*0)
1885#define END (4*1)
1886#define DELIM (4*2)
1887
1888static void
1889sockaddr(char *addr, struct sockaddr *sa, size_t size)
1890{
1891 char *cp = (char *)sa;
1892 char *cplim = cp + size;
1893 int byte = 0, state = VIRGIN, new = 0 /* foil gcc */;
1894
1895 memset(cp, 0, size);
1896 cp++;
1897 do {
1898 if ((*addr >= '0') && (*addr <= '9')) {
1899 new = *addr - '0';
--- 39 unchanged lines hidden (view full) ---
1939 return(1);
1940}
1941
1942static char *
1943atalk_ntoa(struct at_addr at)
1944{
1945 static char buf[20];
1946
1947 (void)snprintf(buf, sizeof(buf), "%u.%u", ntohs(at.s_net), at.s_node);
1948 buf[sizeof(buf) - 1] = '\0';
1949 return(buf);
1950}