2 * Copyright (c) 1998 Brian Somers <brian@Awfulhak.org>
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 #include <sys/param.h>
30 #include <sys/socket.h>
31 #include <netinet/in.h>
33 #include <net/if_dl.h>
35 #include <net/if_var.h>
37 #include <net/route.h>
38 #include <netinet/in_systm.h>
39 #include <netinet/in_var.h>
40 #include <netinet/ip.h>
42 #include <netinet6/nd6.h>
51 #include <sys/ioctl.h>
52 #include <sys/sysctl.h>
67 #include "throughput.h"
68 #include "slcompress.h"
69 #include "descriptor.h"
88 iface_Create(const char *name)
90 int mib[6], maxtries, err;
91 size_t needed, namelen;
92 char *buf, *ptr, *end;
93 struct if_msghdr *ifm;
94 struct ifa_msghdr *ifam;
95 struct sockaddr_dl *dl;
96 struct sockaddr *sa[RTAX_MAX];
98 struct iface_addr *addr;
104 mib[4] = NET_RT_IFLIST;
110 if (maxtries-- == 0 || (err && err != ENOMEM)) {
111 fprintf(stderr, "iface_Create: sysctl: %s\n", strerror(err));
115 if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0) {
116 fprintf(stderr, "iface_Create: sysctl: estimate: %s\n",
121 if ((buf = (char *)malloc(needed)) == NULL) {
122 fprintf(stderr, "iface_Create: malloc failed: %s\n", strerror(errno));
126 if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0) {
131 } while (buf == NULL);
136 namelen = strlen(name);
138 while (ptr < end && iface == NULL) {
139 ifm = (struct if_msghdr *)ptr; /* On if_msghdr */
140 if (ifm->ifm_type != RTM_IFINFO)
142 dl = (struct sockaddr_dl *)(ifm + 1); /* Single _dl at end */
143 if (dl->sdl_nlen == namelen && !strncmp(name, dl->sdl_data, namelen)) {
144 iface = (struct iface *)malloc(sizeof *iface);
146 fprintf(stderr, "iface_Create: malloc: %s\n", strerror(errno));
149 iface->name = strdup(name);
150 iface->index = ifm->ifm_index;
151 iface->flags = ifm->ifm_flags;
156 ptr += ifm->ifm_msglen; /* First ifa_msghdr */
157 for (; ptr < end; ptr += ifam->ifam_msglen) {
158 ifam = (struct ifa_msghdr *)ptr; /* Next if address */
160 if (ifam->ifam_type != RTM_NEWADDR) /* finished this if */
163 if (iface != NULL && ifam->ifam_addrs & RTA_IFA) {
164 /* Found a configured interface ! */
165 iface_ParseHdr(ifam, sa);
167 if (sa[RTAX_IFA] && (sa[RTAX_IFA]->sa_family == AF_INET
169 || sa[RTAX_IFA]->sa_family == AF_INET6
172 /* Record the address */
174 addr = (struct iface_addr *)
175 realloc(iface->addr, (iface->addrs + 1) * sizeof iface->addr[0]);
180 addr += iface->addrs;
183 ncprange_setsa(&addr->ifa, sa[RTAX_IFA], sa[RTAX_NETMASK]);
185 ncpaddr_setsa(&addr->peer, sa[RTAX_BRD]);
187 ncpaddr_init(&addr->peer);
199 iface_addr_Zap(const char *name, struct iface_addr *addr, int s)
201 struct ifaliasreq ifra;
203 struct in6_aliasreq ifra6;
205 struct sockaddr_in *me4, *msk4, *peer4;
206 struct sockaddr_storage ssme, sspeer, ssmsk;
209 ncprange_getsa(&addr->ifa, &ssme, &ssmsk);
210 ncpaddr_getsa(&addr->peer, &sspeer);
213 switch (ncprange_family(&addr->ifa)) {
215 memset(&ifra, '\0', sizeof ifra);
216 strncpy(ifra.ifra_name, name, sizeof ifra.ifra_name - 1);
218 me4 = (struct sockaddr_in *)&ifra.ifra_addr;
219 memcpy(me4, &ssme, sizeof *me4);
221 msk4 = (struct sockaddr_in *)&ifra.ifra_mask;
222 memcpy(msk4, &ssmsk, sizeof *msk4);
224 peer4 = (struct sockaddr_in *)&ifra.ifra_broadaddr;
225 if (ncpaddr_family(&addr->peer) == AF_UNSPEC) {
226 peer4->sin_family = AF_INET;
227 peer4->sin_len = sizeof(*peer4);
228 peer4->sin_addr.s_addr = INADDR_NONE;
230 memcpy(peer4, &sspeer, sizeof *peer4);
232 res = ID0ioctl(s, SIOCDIFADDR, &ifra);
233 if (log_IsKept(LogDEBUG)) {
236 snprintf(buf, sizeof buf, "%s", ncprange_ntoa(&addr->ifa));
237 log_Printf(LogWARN, "%s: DIFADDR %s -> %s returns %d\n",
238 ifra.ifra_name, buf, ncpaddr_ntoa(&addr->peer), res);
244 memset(&ifra6, '\0', sizeof ifra6);
245 strncpy(ifra6.ifra_name, name, sizeof ifra6.ifra_name - 1);
247 memcpy(&ifra6.ifra_addr, &ssme, sizeof ifra6.ifra_addr);
248 memcpy(&ifra6.ifra_prefixmask, &ssmsk, sizeof ifra6.ifra_prefixmask);
249 ifra6.ifra_prefixmask.sin6_family = AF_UNSPEC;
250 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
251 ifra6.ifra_dstaddr.sin6_family = AF_UNSPEC;
253 memcpy(&ifra6.ifra_dstaddr, &sspeer, sizeof ifra6.ifra_dstaddr);
254 ifra6.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
255 ifra6.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
257 res = ID0ioctl(s, SIOCDIFADDR_IN6, &ifra6);
266 ncprange_family(&addr->ifa) == AF_INET6 ? "_IN6" :
270 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
271 log_Printf(LogWARN, "iface rm: ioctl(SIOCDIFADDR%s, %s): %s\n",
272 end, ncprange_ntoa(&addr->ifa), strerror(errno));
274 snprintf(dst, sizeof dst, "%s", ncpaddr_ntoa(&addr->peer));
275 log_Printf(LogWARN, "iface rm: ioctl(SIOCDIFADDR%s, %s -> %s): %s\n",
276 end, ncprange_ntoa(&addr->ifa), dst, strerror(errno));
284 iface_addr_Add(const char *name, struct iface_addr *addr, int s)
286 struct ifaliasreq ifra;
288 struct in6_aliasreq ifra6;
290 struct sockaddr_in *me4, *msk4, *peer4;
291 struct sockaddr_storage ssme, sspeer, ssmsk;
294 ncprange_getsa(&addr->ifa, &ssme, &ssmsk);
295 ncpaddr_getsa(&addr->peer, &sspeer);
298 switch (ncprange_family(&addr->ifa)) {
300 memset(&ifra, '\0', sizeof ifra);
301 strncpy(ifra.ifra_name, name, sizeof ifra.ifra_name - 1);
303 me4 = (struct sockaddr_in *)&ifra.ifra_addr;
304 memcpy(me4, &ssme, sizeof *me4);
306 msk4 = (struct sockaddr_in *)&ifra.ifra_mask;
307 memcpy(msk4, &ssmsk, sizeof *msk4);
309 peer4 = (struct sockaddr_in *)&ifra.ifra_broadaddr;
310 if (ncpaddr_family(&addr->peer) == AF_UNSPEC) {
311 peer4->sin_family = AF_INET;
312 peer4->sin_len = sizeof(*peer4);
313 peer4->sin_addr.s_addr = INADDR_NONE;
315 memcpy(peer4, &sspeer, sizeof *peer4);
317 res = ID0ioctl(s, SIOCAIFADDR, &ifra);
318 if (log_IsKept(LogDEBUG)) {
321 snprintf(buf, sizeof buf, "%s", ncprange_ntoa(&addr->ifa));
322 log_Printf(LogWARN, "%s: AIFADDR %s -> %s returns %d\n",
323 ifra.ifra_name, buf, ncpaddr_ntoa(&addr->peer), res);
329 memset(&ifra6, '\0', sizeof ifra6);
330 strncpy(ifra6.ifra_name, name, sizeof ifra6.ifra_name - 1);
332 memcpy(&ifra6.ifra_addr, &ssme, sizeof ifra6.ifra_addr);
333 memcpy(&ifra6.ifra_prefixmask, &ssmsk, sizeof ifra6.ifra_prefixmask);
334 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
335 ifra6.ifra_dstaddr.sin6_family = AF_UNSPEC;
337 memcpy(&ifra6.ifra_dstaddr, &sspeer, sizeof ifra6.ifra_dstaddr);
338 ifra6.ifra_lifetime.ia6t_vltime = ND6_INFINITE_LIFETIME;
339 ifra6.ifra_lifetime.ia6t_pltime = ND6_INFINITE_LIFETIME;
341 res = ID0ioctl(s, SIOCAIFADDR_IN6, &ifra6);
350 ncprange_family(&addr->ifa) == AF_INET6 ? "_IN6" :
354 if (ncpaddr_family(&addr->peer) == AF_UNSPEC)
355 log_Printf(LogWARN, "iface add: ioctl(SIOCAIFADDR%s, %s): %s\n",
356 end, ncprange_ntoa(&addr->ifa), strerror(errno));
358 snprintf(dst, sizeof dst, "%s", ncpaddr_ntoa(&addr->peer));
359 log_Printf(LogWARN, "iface add: ioctl(SIOCAIFADDR%s, %s -> %s): %s\n",
360 end, ncprange_ntoa(&addr->ifa), dst, strerror(errno));
369 iface_Clear(struct iface *iface, struct ncp *ncp, int family, int how)
371 int addrs, af, inskip, in6skip, n, s4 = -1, s6 = -1, *s;
374 inskip = in6skip = how == IFACE_CLEAR_ALL ? 0 : 1;
377 for (n = 0; n < iface->addrs; n++) {
378 af = ncprange_family(&iface->addr[n].ifa);
379 if (family == 0 || family == af) {
380 if (!iface->addr[n].system && (how & IFACE_SYSTEM))
404 if (*s == -1 && (*s = ID0socket(af, SOCK_DGRAM, 0)) == -1)
405 log_Printf(LogERROR, "iface_Clear: socket(): %s\n", strerror(errno));
406 else if (iface_addr_Zap(iface->name, iface->addr + n, *s)) {
407 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
408 bcopy(iface->addr + n + 1, iface->addr + n,
409 (iface->addrs - n - 1) * sizeof *iface->addr);
416 /* Don't bother realloc()ing - we have little to gain */
426 iface_Add(struct iface *iface, struct ncp *ncp, const struct ncprange *ifa,
427 const struct ncpaddr *peer, int how)
429 int af, n, removed, s, width;
430 struct ncpaddr ncplocal;
431 struct iface_addr *addr, newaddr;
433 af = ncprange_family(ifa);
434 if ((s = ID0socket(af, SOCK_DGRAM, 0)) == -1) {
435 log_Printf(LogERROR, "iface_Add: socket(): %s\n", strerror(errno));
438 ncprange_getaddr(ifa, &ncplocal);
440 for (n = 0; n < iface->addrs; n++) {
441 if (ncprange_contains(&iface->addr[n].ifa, &ncplocal) ||
442 ncpaddr_equal(&iface->addr[n].peer, peer)) {
443 /* Replace this sockaddr */
444 if (!(how & IFACE_FORCE_ADD)) {
446 return 0; /* errno = EEXIST; */
449 if (ncprange_equal(&iface->addr[n].ifa, ifa) &&
450 ncpaddr_equal(&iface->addr[n].peer, peer)) {
452 return 1; /* Already there */
457 (af == AF_INET6) ? 128 :
460 removed = iface_addr_Zap(iface->name, iface->addr + n, s);
462 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
463 ncprange_copy(&iface->addr[n].ifa, ifa);
464 ncpaddr_copy(&iface->addr[n].peer, peer);
465 if (!iface_addr_Add(iface->name, iface->addr + n, s)) {
467 bcopy(iface->addr + n + 1, iface->addr + n,
468 (iface->addrs - n - 1) * sizeof *iface->addr);
476 ncp_IfaceAddrAdded(ncp, iface->addr + n);
481 addr = (struct iface_addr *)realloc
482 (iface->addr, (iface->addrs + 1) * sizeof iface->addr[0]);
484 log_Printf(LogERROR, "iface_inAdd: realloc: %s\n", strerror(errno));
490 ncprange_copy(&newaddr.ifa, ifa);
491 ncpaddr_copy(&newaddr.peer, peer);
492 newaddr.system = !!(how & IFACE_SYSTEM);
493 if (!iface_addr_Add(iface->name, &newaddr, s)) {
498 if (how & IFACE_ADD_FIRST) {
499 /* Stuff it at the start of our list */
501 bcopy(iface->addr, iface->addr + 1, iface->addrs * sizeof *iface->addr);
506 memcpy(iface->addr + n, &newaddr, sizeof(*iface->addr));
509 ncp_IfaceAddrAdded(ncp, iface->addr + n);
515 iface_Delete(struct iface *iface, struct ncp *ncp, const struct ncpaddr *del)
517 struct ncpaddr found;
520 if ((s = ID0socket(ncpaddr_family(del), SOCK_DGRAM, 0)) == -1) {
521 log_Printf(LogERROR, "iface_Delete: socket(): %s\n", strerror(errno));
525 for (n = res = 0; n < iface->addrs; n++) {
526 ncprange_getaddr(&iface->addr[n].ifa, &found);
527 if (ncpaddr_equal(&found, del)) {
528 if (iface_addr_Zap(iface->name, iface->addr + n, s)) {
529 ncp_IfaceAddrDeleted(ncp, iface->addr + n);
530 bcopy(iface->addr + n + 1, iface->addr + n,
531 (iface->addrs - n - 1) * sizeof *iface->addr);
544 #define IFACE_ADDFLAGS 1
545 #define IFACE_DELFLAGS 2
548 iface_ChangeFlags(const char *ifname, int flags, int how)
553 s = ID0socket(PF_INET, SOCK_DGRAM, 0);
555 log_Printf(LogERROR, "iface_ChangeFlags: socket: %s\n", strerror(errno));
559 memset(&ifrq, '\0', sizeof ifrq);
560 strncpy(ifrq.ifr_name, ifname, sizeof ifrq.ifr_name - 1);
561 ifrq.ifr_name[sizeof ifrq.ifr_name - 1] = '\0';
562 if (ID0ioctl(s, SIOCGIFFLAGS, &ifrq) < 0) {
563 log_Printf(LogERROR, "iface_ChangeFlags: ioctl(SIOCGIFFLAGS): %s\n",
568 new_flags = (ifrq.ifr_flags & 0xffff) | (ifrq.ifr_flagshigh << 16);
570 if (how == IFACE_ADDFLAGS)
574 ifrq.ifr_flags = new_flags & 0xffff;
575 ifrq.ifr_flagshigh = new_flags >> 16;
577 if (ID0ioctl(s, SIOCSIFFLAGS, &ifrq) < 0) {
578 log_Printf(LogERROR, "iface_ChangeFlags: ioctl(SIOCSIFFLAGS): %s\n",
585 return 1; /* Success */
589 iface_SetFlags(const char *ifname, int flags)
591 return iface_ChangeFlags(ifname, flags, IFACE_ADDFLAGS);
595 iface_ClearFlags(const char *ifname, int flags)
597 return iface_ChangeFlags(ifname, flags, IFACE_DELFLAGS);
601 iface_Destroy(struct iface *iface)
604 * iface_Clear(iface, IFACE_CLEAR_ALL) must be called manually
605 * if that's what the user wants. It's better to leave the interface
606 * allocated so that existing connections can continue to work.
616 #define if_entry(x) { IFF_##x, #x }
626 if_entry(POINTOPOINT),
641 iface_Show(struct cmdargs const *arg)
643 struct ncpaddr ncpaddr;
644 struct iface *iface = arg->bundle->iface, *current;
651 current = iface_Create(iface->name);
652 flags = iface->flags = current->flags;
653 iface_Destroy(current);
655 prompt_Printf(arg->prompt, "%s (idx %d) <", iface->name, iface->index);
656 for (f = 0; f < sizeof if_flags / sizeof if_flags[0]; f++)
657 if ((if_flags[f].flag & flags)) {
658 prompt_Printf(arg->prompt, "%s%s", flags == iface->flags ? "" : ",",
660 flags &= ~if_flags[f].flag;
665 prompt_Printf(arg->prompt, "%s0x%x", flags == iface->flags ? "" : ",",
669 prompt_Printf(arg->prompt, "> mtu %d has %d address%s:\n", iface->mtu,
670 iface->addrs, iface->addrs == 1 ? "" : "es");
672 for (f = 0; f < iface->addrs; f++) {
673 ncprange_getaddr(&iface->addr[f].ifa, &ncpaddr);
674 switch (ncprange_family(&iface->addr[f].ifa)) {
676 prompt_Printf(arg->prompt, " inet %s --> ", ncpaddr_ntoa(&ncpaddr));
677 if (ncpaddr_family(&iface->addr[f].peer) == AF_UNSPEC)
678 prompt_Printf(arg->prompt, "255.255.255.255");
680 prompt_Printf(arg->prompt, "%s", ncpaddr_ntoa(&iface->addr[f].peer));
681 ncprange_getip4mask(&iface->addr[f].ifa, &mask);
682 prompt_Printf(arg->prompt, " netmask 0x%08lx", (long)ntohl(mask.s_addr));
687 prompt_Printf(arg->prompt, " inet6 %s", ncpaddr_ntoa(&ncpaddr));
688 if (ncpaddr_family(&iface->addr[f].peer) != AF_UNSPEC)
689 prompt_Printf(arg->prompt, " --> %s",
690 ncpaddr_ntoa(&iface->addr[f].peer));
691 ncprange_getwidth(&iface->addr[f].ifa, &width);
692 if (ncpaddr_family(&iface->addr[f].peer) == AF_UNSPEC)
693 prompt_Printf(arg->prompt, " prefixlen %d", width);
694 if ((scopeid = ncprange_scopeid(&iface->addr[f].ifa)) != -1)
695 prompt_Printf(arg->prompt, " scopeid 0x%x", (unsigned)scopeid);
699 prompt_Printf(arg->prompt, "\n");
706 iface_ParseHdr(struct ifa_msghdr *ifam, struct sockaddr *sa[RTAX_MAX])
711 wp = (char *)(ifam + 1);
713 for (rtax = 0; rtax < RTAX_MAX; rtax++)
714 if (ifam->ifam_addrs & (1 << rtax)) {
715 sa[rtax] = (struct sockaddr *)wp;
716 wp += ROUNDUP(sa[rtax]->sa_len);