2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * Copyright (c) 1998 Brian Somers <brian@Awfulhak.org>
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 #include <sys/param.h>
32 #include <sys/socket.h>
33 #include <netinet/in.h>
35 #include <net/if_dl.h>
36 #include <net/route.h>
37 #include <netinet/in_systm.h>
38 #include <netinet/in_var.h>
39 #include <netinet/ip.h>
41 #include <netinet6/nd6.h>
50 #include <sys/ioctl.h>
51 #include <sys/sysctl.h>
66 #include "throughput.h"
67 #include "slcompress.h"
68 #include "descriptor.h"
85 #define IN6MASK128 {{{ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, \
86 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }}}
87 static const struct in6_addr in6mask128 = IN6MASK128;
91 iface_Create(const char *name)
93 int mib[6], maxtries, err;
94 size_t needed, namelen;
95 char *buf, *ptr, *end;
96 struct if_msghdr *ifm;
97 struct ifa_msghdr *ifam;
98 struct sockaddr_dl *dl;
99 struct sockaddr *sa[RTAX_MAX];
101 struct iface_addr *addr;
107 mib[4] = NET_RT_IFLIST;
113 if (maxtries-- == 0 || (err && err != ENOMEM)) {
114 fprintf(stderr, "iface_Create: sysctl: %s\n", strerror(err));
118 if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0) {
119 fprintf(stderr, "iface_Create: sysctl: estimate: %s\n",
124 if ((buf = (char *)malloc(needed)) == NULL) {
125 fprintf(stderr, "iface_Create: malloc failed: %s\n", strerror(errno));
129 if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0) {
134 } while (buf == NULL);
139 namelen = strlen(name);
141 while (ptr < end && iface == NULL) {
142 ifm = (struct if_msghdr *)ptr; /* On if_msghdr */
143 if (ifm->ifm_type != RTM_IFINFO)
145 dl = (struct sockaddr_dl *)(ifm + 1); /* Single _dl at end */
146 if (dl->sdl_nlen == namelen && !strncmp(name, dl->sdl_data, namelen)) {
147 iface = (struct iface *)malloc(sizeof *iface);
149 fprintf(stderr, "iface_Create: malloc: %s\n", strerror(errno));
152 iface->name = strdup(name);
154 iface->index = ifm->ifm_index;
155 iface->flags = ifm->ifm_flags;
160 ptr += ifm->ifm_msglen; /* First ifa_msghdr */
161 for (; ptr < end; ptr += ifam->ifam_msglen) {
162 ifam = (struct ifa_msghdr *)ptr; /* Next if address */
164 if (ifam->ifam_type != RTM_NEWADDR) /* finished this if */
167 if (iface != NULL && ifam->ifam_addrs & RTA_IFA) {
168 /* Found a configured interface ! */
169 iface_ParseHdr(ifam, sa);
171 if (sa[RTAX_IFA] && (sa[RTAX_IFA]->sa_family == AF_INET
173 || sa[RTAX_IFA]->sa_family == AF_INET6
176 /* Record the address */
178 addr = (struct iface_addr *)
179 realloc(iface->addr, (iface->addrs + 1) * sizeof iface->addr[0]);
184 addr += iface->addrs;
187 ncprange_setsa(&addr->ifa, sa[RTAX_IFA], sa[RTAX_NETMASK]);
189 ncpaddr_setsa(&addr->peer, sa[RTAX_BRD]);
191 ncpaddr_init(&addr->peer);
203 iface_addr_Zap(const char *name, struct iface_addr *addr, int s)
205 struct ifaliasreq ifra;
207 struct in6_aliasreq ifra6;
209 struct sockaddr_in *me4, *msk4, *peer4;
210 struct sockaddr_storage ssme, sspeer, ssmsk;
211 int res, saved_errno;
213 ncprange_getsa(&addr->ifa, &ssme, &ssmsk);
214 ncpaddr_getsa(&addr->peer, &sspeer);
217 switch (ncprange_family(&addr->ifa)) {
219 memset(&ifra, '\0', sizeof ifra);
220 strncpy(ifra.ifra_name, name, sizeof ifra.ifra_name - 1);
222 me4 = (struct sockaddr_in *)&ifra.ifra_addr;
223 memcpy(me4, &ssme, sizeof *me4);
225 msk4 = (struct sockaddr_in *)&ifra.ifra_mask;
226 memcpy(msk4, &ssmsk, sizeof *msk4);
228 peer4 = (struct sockaddr_in *)&ifra.ifra_broadaddr;
229 if (ncpaddr_family(&addr->peer) == AF_UNSPEC) {
230 peer4->sin_family = AF_INET;
231 peer4->sin_len = sizeof(*peer4);
232 peer4->sin_addr.s_addr = INADDR_NONE;
234 memcpy(peer4, &sspeer, sizeof *peer4);
236 res = ID0ioctl(s, SIOCDIFADDR, &ifra);
238 if (log_IsKept(LogDEBUG)) {
239 char buf[NCP_ASCIIBUFFERSIZE];
241 snprintf(buf, sizeof buf, "%s", ncprange_ntoa(&addr->ifa));
242 log_Printf(LogWARN, "%s: DIFADDR %s -> %s returns %d\n",
243 ifra.ifra_name, buf, ncpaddr_ntoa(&addr->peer), res);
249 memset(&ifra6, '\0', sizeof ifra6);
250 strncpy(ifra6.ifra_name, name, sizeof ifra6.ifra_name - 1);
252 memcpy(&ifra6.ifra_addr, &ssme, sizeof ifra6.ifra_addr);
253 memcpy(&ifra6.ifra_prefixmask, &ssmsk, sizeof ifra6.ifra_prefixmask);
254 ifra6.ifra_prefixmask.sin6_family = AF_UNSPEC;
255 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
256 ifra6.ifra_dstaddr.sin6_family = AF_UNSPEC;
258 memcpy(&ifra6.ifra_dstaddr, &sspeer, sizeof ifra6.ifra_dstaddr);
259 ifra6.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
260 ifra6.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
262 res = ID0ioctl(s, SIOCDIFADDR_IN6, &ifra6);
269 char dst[NCP_ASCIIBUFFERSIZE];
272 ncprange_family(&addr->ifa) == AF_INET6 ? "_IN6" :
276 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
277 log_Printf(LogWARN, "iface rm: ioctl(SIOCDIFADDR%s, %s): %s\n",
278 end, ncprange_ntoa(&addr->ifa), strerror(saved_errno));
280 snprintf(dst, sizeof dst, "%s", ncpaddr_ntoa(&addr->peer));
281 log_Printf(LogWARN, "iface rm: ioctl(SIOCDIFADDR%s, %s -> %s): %s\n",
282 end, ncprange_ntoa(&addr->ifa), dst, strerror(saved_errno));
290 iface_addr_Add(const char *name, struct iface_addr *addr, int s)
292 struct ifaliasreq ifra;
294 struct in6_aliasreq ifra6;
296 struct sockaddr_in *me4, *msk4, *peer4;
297 struct sockaddr_storage ssme, sspeer, ssmsk;
298 int res, saved_errno;
300 ncprange_getsa(&addr->ifa, &ssme, &ssmsk);
301 ncpaddr_getsa(&addr->peer, &sspeer);
304 switch (ncprange_family(&addr->ifa)) {
306 memset(&ifra, '\0', sizeof ifra);
307 strncpy(ifra.ifra_name, name, sizeof ifra.ifra_name - 1);
309 me4 = (struct sockaddr_in *)&ifra.ifra_addr;
310 memcpy(me4, &ssme, sizeof *me4);
312 msk4 = (struct sockaddr_in *)&ifra.ifra_mask;
313 memcpy(msk4, &ssmsk, sizeof *msk4);
315 peer4 = (struct sockaddr_in *)&ifra.ifra_broadaddr;
316 if (ncpaddr_family(&addr->peer) == AF_UNSPEC) {
317 peer4->sin_family = AF_INET;
318 peer4->sin_len = sizeof(*peer4);
319 peer4->sin_addr.s_addr = INADDR_NONE;
321 memcpy(peer4, &sspeer, sizeof *peer4);
323 res = ID0ioctl(s, SIOCAIFADDR, &ifra);
325 if (log_IsKept(LogDEBUG)) {
326 char buf[NCP_ASCIIBUFFERSIZE];
328 snprintf(buf, sizeof buf, "%s", ncprange_ntoa(&addr->ifa));
329 log_Printf(LogWARN, "%s: AIFADDR %s -> %s returns %d\n",
330 ifra.ifra_name, buf, ncpaddr_ntoa(&addr->peer), res);
336 memset(&ifra6, '\0', sizeof ifra6);
337 strncpy(ifra6.ifra_name, name, sizeof ifra6.ifra_name - 1);
339 memcpy(&ifra6.ifra_addr, &ssme, sizeof ifra6.ifra_addr);
340 memcpy(&ifra6.ifra_prefixmask, &ssmsk, sizeof ifra6.ifra_prefixmask);
341 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
342 ifra6.ifra_dstaddr.sin6_family = AF_UNSPEC;
343 else if (memcmp(&((struct sockaddr_in6 *)&ssmsk)->sin6_addr, &in6mask128,
344 sizeof in6mask128) == 0)
345 memcpy(&ifra6.ifra_dstaddr, &sspeer, sizeof ifra6.ifra_dstaddr);
346 ifra6.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
347 ifra6.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
349 res = ID0ioctl(s, SIOCAIFADDR_IN6, &ifra6);
356 char dst[NCP_ASCIIBUFFERSIZE];
359 ncprange_family(&addr->ifa) == AF_INET6 ? "_IN6" :
363 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
364 log_Printf(LogWARN, "iface add: ioctl(SIOCAIFADDR%s, %s): %s\n",
365 end, ncprange_ntoa(&addr->ifa), strerror(saved_errno));
367 snprintf(dst, sizeof dst, "%s", ncpaddr_ntoa(&addr->peer));
368 log_Printf(LogWARN, "iface add: ioctl(SIOCAIFADDR%s, %s -> %s): %s\n",
369 end, ncprange_ntoa(&addr->ifa), dst, strerror(saved_errno));
377 iface_Name(struct iface *iface, const char *name)
383 if ((newname = strdup(name)) == NULL) {
384 log_Printf(LogWARN, "iface name: strdup failed: %s\n", strerror(errno));
388 if ((s = ID0socket(PF_INET, SOCK_DGRAM, 0)) == -1) {
389 log_Printf(LogERROR, "iface name: socket(): %s\n", strerror(errno));
394 strlcpy(ifr.ifr_name, iface->name, sizeof(ifr.ifr_name));
395 ifr.ifr_data = newname;
396 if (ID0ioctl(s, SIOCSIFNAME, (caddr_t)&ifr) < 0) {
397 log_Printf(LogWARN, "iface name: ioctl(SIOCSIFNAME, %s -> %s): %s\n",
398 name, newname, strerror(errno));
404 iface->name = newname;
410 iface_Descr(struct cmdargs const *arg)
415 int s, n, ifdescr_maxlen;
419 if (sysctlbyname("net.ifdescr_maxlen", &ifdescr_maxlen, &sz, NULL, 0) < 0) {
420 log_Printf(LogERROR, "iface descr: sysctl failed: %s\n", strerror(errno));
424 if (ifdescr_maxlen < 1) {
425 log_Printf(LogERROR, "iface descr: sysctl net.ifdescr_maxlen < 1\n");
429 sz = sizeof(char) * ifdescr_maxlen;
430 if ((descr = malloc(sz)) == NULL) {
431 log_Printf(LogERROR, "iface descr: malloc failed: %s\n", strerror(errno));
437 while (n < arg->argc) {
438 if (n > arg->argn && (len = strlcat(descr, " ", sz)) >= sz)
440 if ((len = strlcat(descr, arg->argv[n], sz)) >= sz)
445 log_Printf(LogERROR, "iface descr: description exceeds maximum (%d)\n",
451 if ((s = ID0socket(PF_INET, SOCK_DGRAM, 0)) == -1) {
452 log_Printf(LogERROR, "iface descr: socket(): %s\n", strerror(errno));
457 iface = arg->bundle->iface;
458 strlcpy(ifr.ifr_name, iface->name, sizeof(ifr.ifr_name));
459 ifr.ifr_buffer.length = strlen(descr) + 1;
460 ifr.ifr_buffer.buffer = descr;
461 if (ID0ioctl(s, SIOCSIFDESCR, (caddr_t)&ifr) < 0) {
462 log_Printf(LogWARN, "iface descr: ioctl(SIOCSIFDESCR, %s): %s\n",
463 descr, strerror(errno));
469 iface->descr = descr;
475 iface_Clear(struct iface *iface, struct ncp *ncp, int family, int how)
477 int af, inskip, in6skip, s4 = -1, s6 = -1, *s;
481 inskip = in6skip = how == IFACE_CLEAR_ALL ? 0 : 1;
483 for (n = 0; n < iface->addrs; n++) {
484 af = ncprange_family(&iface->addr[n].ifa);
485 if (family == 0 || family == af) {
486 if (!iface->addr[n].system && (how & IFACE_SYSTEM))
510 if (*s == -1 && (*s = ID0socket(af, SOCK_DGRAM, 0)) == -1)
511 log_Printf(LogERROR, "iface_Clear: socket(): %s\n", strerror(errno));
512 else if (iface_addr_Zap(iface->name, iface->addr + n, *s)) {
513 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
514 bcopy(iface->addr + n + 1, iface->addr + n,
515 (iface->addrs - n - 1) * sizeof *iface->addr);
522 /* Don't bother realloc()ing - we have little to gain */
532 iface_Add(struct iface *iface, struct ncp *ncp, const struct ncprange *ifa,
533 const struct ncpaddr *peer, int how)
537 struct ncpaddr ncplocal;
538 struct iface_addr *addr, newaddr;
540 af = ncprange_family(ifa);
541 if ((s = ID0socket(af, SOCK_DGRAM, 0)) == -1) {
542 log_Printf(LogERROR, "iface_Add: socket(): %s\n", strerror(errno));
545 ncprange_getaddr(ifa, &ncplocal);
547 for (n = 0; n < iface->addrs; n++) {
548 if (ncprange_contains(&iface->addr[n].ifa, &ncplocal) ||
549 ncpaddr_equal(&iface->addr[n].peer, peer)) {
550 /* Replace this sockaddr */
551 if (!(how & IFACE_FORCE_ADD)) {
553 return 0; /* errno = EEXIST; */
556 if (ncprange_equal(&iface->addr[n].ifa, ifa) &&
557 ncpaddr_equal(&iface->addr[n].peer, peer)) {
559 ncp_IfaceAddrAdded(ncp, iface->addr + n);
560 return 1; /* Already there */
563 removed = iface_addr_Zap(iface->name, iface->addr + n, s);
565 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
566 ncprange_copy(&iface->addr[n].ifa, ifa);
567 ncpaddr_copy(&iface->addr[n].peer, peer);
568 if (!iface_addr_Add(iface->name, iface->addr + n, s)) {
570 bcopy(iface->addr + n + 1, iface->addr + n,
571 (iface->addrs - n - 1) * sizeof *iface->addr);
579 ncp_IfaceAddrAdded(ncp, iface->addr + n);
584 addr = (struct iface_addr *)realloc
585 (iface->addr, (iface->addrs + 1) * sizeof iface->addr[0]);
587 log_Printf(LogERROR, "iface_inAdd: realloc: %s\n", strerror(errno));
593 ncprange_copy(&newaddr.ifa, ifa);
594 ncpaddr_copy(&newaddr.peer, peer);
595 newaddr.system = !!(how & IFACE_SYSTEM);
596 if (!iface_addr_Add(iface->name, &newaddr, s)) {
601 if (how & IFACE_ADD_FIRST) {
602 /* Stuff it at the start of our list */
604 bcopy(iface->addr, iface->addr + 1, iface->addrs * sizeof *iface->addr);
609 memcpy(iface->addr + n, &newaddr, sizeof(*iface->addr));
612 ncp_IfaceAddrAdded(ncp, iface->addr + n);
618 iface_Delete(struct iface *iface, struct ncp *ncp, const struct ncpaddr *del)
620 struct ncpaddr found;
624 if ((s = ID0socket(ncpaddr_family(del), SOCK_DGRAM, 0)) == -1) {
625 log_Printf(LogERROR, "iface_Delete: socket(): %s\n", strerror(errno));
629 for (n = res = 0; n < iface->addrs; n++) {
630 ncprange_getaddr(&iface->addr[n].ifa, &found);
631 if (ncpaddr_equal(&found, del)) {
632 if (iface_addr_Zap(iface->name, iface->addr + n, s)) {
633 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
634 bcopy(iface->addr + n + 1, iface->addr + n,
635 (iface->addrs - n - 1) * sizeof *iface->addr);
648 #define IFACE_ADDFLAGS 1
649 #define IFACE_DELFLAGS 2
652 iface_ChangeFlags(const char *ifname, int flags, int how)
657 s = ID0socket(PF_INET, SOCK_DGRAM, 0);
659 log_Printf(LogERROR, "iface_ChangeFlags: socket: %s\n", strerror(errno));
663 memset(&ifrq, '\0', sizeof ifrq);
664 strncpy(ifrq.ifr_name, ifname, sizeof ifrq.ifr_name - 1);
665 ifrq.ifr_name[sizeof ifrq.ifr_name - 1] = '\0';
666 if (ID0ioctl(s, SIOCGIFFLAGS, &ifrq) < 0) {
667 log_Printf(LogERROR, "iface_ChangeFlags: ioctl(SIOCGIFFLAGS): %s\n",
673 new_flags = (ifrq.ifr_flags & 0xffff) | (ifrq.ifr_flagshigh << 16);
675 new_flags = ifrq.ifr_flags & 0xffff;
678 if (how == IFACE_ADDFLAGS)
682 ifrq.ifr_flags = new_flags & 0xffff;
684 ifrq.ifr_flagshigh = new_flags >> 16;
687 if (ID0ioctl(s, SIOCSIFFLAGS, &ifrq) < 0) {
688 log_Printf(LogERROR, "iface_ChangeFlags: ioctl(SIOCSIFFLAGS): %s\n",
695 return 1; /* Success */
699 iface_SetFlags(const char *ifname, int flags)
701 return iface_ChangeFlags(ifname, flags, IFACE_ADDFLAGS);
705 iface_ClearFlags(const char *ifname, int flags)
707 return iface_ChangeFlags(ifname, flags, IFACE_DELFLAGS);
711 iface_Free(struct iface *iface)
720 iface_Destroy(struct iface *iface)
726 if ((s = ID0socket(PF_INET, SOCK_DGRAM, 0)) == -1) {
727 log_Printf(LogERROR, "iface_Destroy: socket(): %s\n", strerror(errno));
729 strlcpy(ifr.ifr_name, iface->name, sizeof(ifr.ifr_name));
730 if (ID0ioctl(s, SIOCIFDESTROY, (caddr_t)&ifr) < 0)
731 log_Printf(LogWARN, "iface_Destroy: ioctl(SIOCIFDESTROY, %s): %s\n",
732 iface->name, strerror(errno));
738 #define if_entry(x) { IFF_##x, #x }
748 if_entry(POINTOPOINT),
763 iface_Show(struct cmdargs const *arg)
765 struct ncpaddr ncpaddr;
766 struct iface *iface = arg->bundle->iface, *current;
774 current = iface_Create(iface->name);
775 flags = iface->flags = current->flags;
778 prompt_Printf(arg->prompt, "%s (idx %d) <", iface->name, iface->index);
779 for (f = 0; f < sizeof if_flags / sizeof if_flags[0]; f++)
780 if ((if_flags[f].flag & flags)) {
781 prompt_Printf(arg->prompt, "%s%s", flags == iface->flags ? "" : ",",
783 flags &= ~if_flags[f].flag;
788 prompt_Printf(arg->prompt, "%s0x%x", flags == iface->flags ? "" : ",",
792 prompt_Printf(arg->prompt, "> mtu %lu has %d address%s:\n", iface->mtu,
793 iface->addrs, iface->addrs == 1 ? "" : "es");
795 for (f = 0; f < iface->addrs; f++) {
796 ncprange_getaddr(&iface->addr[f].ifa, &ncpaddr);
797 switch (ncprange_family(&iface->addr[f].ifa)) {
799 prompt_Printf(arg->prompt, " inet %s --> ", ncpaddr_ntoa(&ncpaddr));
800 if (ncpaddr_family(&iface->addr[f].peer) == AF_UNSPEC)
801 prompt_Printf(arg->prompt, "255.255.255.255");
803 prompt_Printf(arg->prompt, "%s", ncpaddr_ntoa(&iface->addr[f].peer));
804 ncprange_getip4mask(&iface->addr[f].ifa, &mask);
805 prompt_Printf(arg->prompt, " netmask 0x%08lx", (long)ntohl(mask.s_addr));
810 prompt_Printf(arg->prompt, " inet6 %s", ncpaddr_ntoa(&ncpaddr));
811 if (ncpaddr_family(&iface->addr[f].peer) != AF_UNSPEC)
812 prompt_Printf(arg->prompt, " --> %s",
813 ncpaddr_ntoa(&iface->addr[f].peer));
814 ncprange_getwidth(&iface->addr[f].ifa, &width);
815 if (ncpaddr_family(&iface->addr[f].peer) == AF_UNSPEC)
816 prompt_Printf(arg->prompt, " prefixlen %d", width);
817 if ((scopeid = ncprange_scopeid(&iface->addr[f].ifa)) != -1)
818 prompt_Printf(arg->prompt, " scopeid 0x%x", (unsigned)scopeid);
822 prompt_Printf(arg->prompt, "\n");
829 iface_ParseHdr(struct ifa_msghdr *ifam, struct sockaddr *sa[RTAX_MAX])
834 wp = (char *)(ifam + 1);
836 for (rtax = 0; rtax < RTAX_MAX; rtax++)
837 if (ifam->ifam_addrs & (1 << rtax)) {
838 sa[rtax] = (struct sockaddr *)wp;
839 wp += ROUNDUP(sa[rtax]->sa_len);