1 /* $FreeBSD: src/usr.sbin/gifconfig/gifconfig.c,v 1.2.2.4 2002/08/30 14:23:39 sobomax Exp $ */
2 /* $DragonFly: src/usr.sbin/gifconfig/gifconfig.c,v 1.6 2004/03/24 18:23:46 cpressey Exp $ */
3 /* $KAME: gifconfig.c,v 1.14 2001/01/01 04:04:56 jinmei Exp $ */
6 * Copyright (c) 1983, 1993
7 * The Regents of the University of California. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by the University of
20 * California, Berkeley and its contributors.
21 * 4. Neither the name of the University nor the names of its contributors
22 * may be used to endorse or promote products derived from this software
23 * without specific prior written permission.
25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 * gifconfig, derived from ifconfig
41 * @(#) Copyright (c) 1983, 1993\n\
42 * The Regents of the University of California. All rights reserved.\n
44 * @(#)ifconfig.c 8.2 (Berkeley) 2/16/94
48 * 951109 - Andrew@pubnix.net - Changed to iterative buffer growing mechanism
49 * for ifconfig -a so all interfaces are queried.
51 * 960101 - peter@freebsd.org - Blow away the SIOCGIFCONF code and use
52 * sysctl() to get the structured interface conf
53 * and parse the messages in there. REALLY UGLY!
56 #include <sys/param.h>
57 #include <sys/socket.h>
58 #include <sys/ioctl.h>
59 #include <sys/sysctl.h>
62 #if defined(__DragonFly__)
63 #include <net/if_var.h>
64 #endif /* __DragonFly__ */
65 #include <net/if_dl.h>
66 #include <net/if_types.h>
67 #include <net/route.h>
68 #include <netinet/in.h>
69 #include <netinet/in_var.h>
70 #include <arpa/inet.h>
73 #include <sys/protosw.h>
87 struct ifaliasreq addreq;
89 struct in6_ifreq in6_ifr;
90 struct in6_aliasreq in6_addreq;
103 char ntop_buf[INET6_ADDRSTRLEN]; /*inet_ntop()*/
106 void setifpsrc(char *, int);
107 void setifpdst(char *, int);
108 void setifflags(char *, int);
109 #ifdef SIOCDIFPHYADDR
110 void delifaddrs(char *, int);
113 #define NEXTARG 0xffffff
117 int c_parameter; /* NEXTARG means next argv */
118 void (*c_func)(char *, int);
120 { "up", IFF_UP, setifflags } ,
121 { "down", -IFF_UP, setifflags },
122 #ifdef SIOCDIFPHYADDR
123 { "delete", 0, delifaddrs },
130 * XNS support liberally adapted from code written at the University of
131 * Maryland principally by James O'Toole and Chris Torek.
133 int main(int, char *[]);
135 void phys_status(int);
138 void in6_status(int);
140 void ether_status(int);
142 void in_getaddr(char *, int);
144 void in6_getaddr(char *, int);
145 void in6_getprefix(char *, int);
147 void printb(char *, unsigned int, char *);
148 int prefix(void *, int);
150 char ntop_buf[INET6_ADDRSTRLEN];
152 /* Known address families */
156 void (*af_status)(int);
157 void (*af_getaddr)(char *, int);
158 void (*af_getprefix)(char *, int);
163 #define C(x) ((caddr_t) &x)
164 { "inet", AF_INET, in_status, in_getaddr, 0,
165 SIOCSIFPHYADDR, C(addreq), C(ifr) },
167 { "inet6", AF_INET6, in6_status, in6_getaddr, in6_getprefix,
168 SIOCSIFPHYADDR_IN6, C(in6_addreq), C(in6_ifr) },
170 { "ether", AF_INET, ether_status, NULL, NULL }, /* XXX not real!! */
174 struct afswtch *afp = NULL; /*the address family being set or asked about*/
176 void rt_xaddrs(caddr_t, caddr_t, struct rt_addrinfo *);
177 int ifconfig(int argc, char *argv[], int af, struct afswtch *rafp);
182 * Expand the compacted form of addresses as returned via the
183 * configuration read via sysctl().
187 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long))
188 #define ADVANCE(x, n) (x += ROUNDUP((n)->sa_len))
191 rt_xaddrs(caddr_t cp, caddr_t cplim, struct rt_addrinfo *rtinfo)
196 memset(rtinfo->rti_info, 0, sizeof(rtinfo->rti_info));
197 for (i = 0; (i < RTAX_MAX) && (cp < cplim); i++) {
198 if ((rtinfo->rti_addrs & (1 << i)) == 0)
200 rtinfo->rti_info[i] = sa = (struct sockaddr *)cp;
207 * Grunge for new-style sysctl() decoding.. :-(
208 * Apologies to the world for committing gross things like this in 1996..
210 struct if_msghdr *ifm;
211 struct ifa_msghdr *ifam;
212 struct sockaddr_dl *sdl;
213 struct rt_addrinfo info;
214 char *buf, *lim, *next;
218 main(int argc, char **argv)
221 struct afswtch *rafp = NULL;
228 "usage: gifconfig interface [af] [physsrc physdst]\n");
229 #ifdef SIOCDIFPHYADDR
231 " gifconfig interface delete\n");
238 strncpy(name, *argv, sizeof(name));
239 strncpy(ifr.ifr_name, name, sizeof(ifr.ifr_name));
242 for (afp = rafp = afs; rafp->af_name; rafp++)
243 if (strcmp(rafp->af_name, *argv) == 0) {
244 afp = rafp; argc--; argv++;
248 af = ifr.ifr_addr.sa_family = rafp->af_af;
254 mib[3] = 0; /* address family */
255 mib[4] = NET_RT_IFLIST;
258 /* if particular family specified, only ask about it */
263 if (sysctl(mib, 6, NULL, &needed, NULL, 0) < 0)
264 errx(1, "iflist-sysctl-estimate");
265 if ((buf = malloc(needed)) == NULL)
267 if (sysctl(mib, 6, buf, &needed, NULL, 0) < 0)
268 errx(1, "actual retrieval of interface table");
272 if (strcmp(name, "-a") == 0)
273 all = 1; /* All interfaces */
274 else if (strcmp(name, "-au") == 0)
275 all = 2; /* All IFF_UPinterfaces */
276 else if (strcmp(name, "-ad") == 0)
277 all = 3; /* All !IFF_UP interfaces */
279 for (next = buf; next < lim; next += ifm->ifm_msglen) {
281 ifm = (struct if_msghdr *)next;
283 /* XXX: Swallow up leftover NEWADDR messages */
284 if (ifm->ifm_type == RTM_NEWADDR)
287 if (ifm->ifm_type == RTM_IFINFO) {
288 sdl = (struct sockaddr_dl *)(ifm + 1);
289 flags = ifm->ifm_flags;
291 errx(1, "out of sync parsing NET_RT_IFLIST");
297 if (strlen(name) != sdl->sdl_nlen)
298 continue; /* not same len */
299 if (strncmp(name, sdl->sdl_data, sdl->sdl_nlen) != 0)
300 continue; /* not same name */
303 break; /* always do it */
305 if ((flags & IFF_UP) == 0)
306 continue; /* not up */
310 continue; /* not down */
315 * Let's just do it for gif only
317 if (sdl->sdl_type != IFT_GIF) {
321 fprintf(stderr, "gifconfig: %s is not gif.\n",
327 strncpy(name, sdl->sdl_data, sdl->sdl_nlen);
328 name[sdl->sdl_nlen] = '\0';
331 if ((s = socket(af, SOCK_DGRAM, 0)) < 0) {
332 perror("gifconfig: socket");
336 ifconfig(argc,argv,af,rafp);
341 all = -1; /* flag it as 'done' */
348 errx(1, "interface %s does not exist", name);
356 ifconfig(int argc, char **argv, int af, struct afswtch *rafp)
361 strncpy(ifr.ifr_name, name, sizeof ifr.ifr_name);
363 strncpy(in6_ifr.ifr_name, name, sizeof in6_ifr.ifr_name);
366 if (ioctl(s, SIOCGIFMETRIC, (caddr_t)&ifr) < 0)
367 perror("ioctl (SIOCGIFMETRIC)");
369 metric = ifr.ifr_metric;
371 #if defined(SIOCGIFMTU) && !defined(__OpenBSD__)
372 if (ioctl(s, SIOCGIFMTU, (caddr_t)&ifr) < 0)
373 perror("ioctl (SIOCGIFMTU)");
388 for (p = cmds; p->c_name; p++)
389 if (strcmp(*argv, p->c_name) == 0)
391 if (p->c_name == 0 && setpsrc)
392 p++; /* got src, do dst */
394 if (p->c_parameter == NEXTARG) {
396 errx(1, "'%s' requires argument",
398 (*p->c_func)(argv[1], 0);
401 (*p->c_func)(*argv, p->c_parameter);
406 strncpy(rafp->af_addreq, name, sizeof ifr.ifr_name);
407 if (ioctl(s, rafp->af_pifaddr, rafp->af_addreq) < 0)
408 Perror("ioctl (SIOCSIFPHYADDR)");
411 errx(1, "destination is not specified");
420 setifpsrc(char *addr, int param)
422 param = 0; /*fool gcc*/
423 (*afp->af_getaddr)(addr, PSRC);
429 setifpdst(char *addr, int param)
431 param = 0; /*fool gcc*/
432 (*afp->af_getaddr)(addr, PDST);
437 setifflags(char *vname, int value)
439 if (ioctl(s, SIOCGIFFLAGS, (caddr_t)&ifr) < 0) {
440 Perror("ioctl (SIOCGIFFLAGS)");
443 strncpy(ifr.ifr_name, name, sizeof (ifr.ifr_name));
444 flags = (ifr.ifr_flags & 0xffff) | (ifr.ifr_flagshigh << 16);
451 ifr.ifr_flags = flags & 0xffff;
452 ifr.ifr_flagshigh = flags >> 16;
453 if (ioctl(s, SIOCSIFFLAGS, (caddr_t)&ifr) < 0)
457 #ifdef SIOCDIFPHYADDR
460 delifaddrs(char *vname, int param)
462 param = 0; /* fool gcc */
463 vname = NULL; /* ditto */
465 if (ioctl(s, SIOCDIFPHYADDR, (caddr_t)&ifr) < 0)
466 err(1, "ioctl(SIOCDIFPHYADDR)");
471 "\020\1UP\2BROADCAST\3DEBUG\4LOOPBACK\5POINTOPOINT\6NOTRAILERS\7RUNNING\10NOARP\
472 \11PROMISC\12ALLMULTI\13OACTIVE\14SIMPLEX\15LINK0\16LINK1\17LINK2\20MULTICAST"
475 * Print the status of the interface. If an address family was
476 * specified, show it and it only; otherwise, show them all.
481 struct afswtch *p = NULL;
483 struct if_msghdr *myifm;
485 printf("%s: ", name);
486 printb("flags", flags, IFFBITS);
488 printf(" metric %d", metric);
490 printf(" mtu %d", mtu);
494 * XXX: Sigh. This is bad, I know. At this point, we may have
495 * *zero* RTM_NEWADDR's, so we have to "feel the water" before
496 * incrementing the loop. One day, I might feel inspired enough
497 * to get the top level loop to pass a count down here so we
498 * dont have to mess with this. -Peter
504 mynext = next + ifm->ifm_msglen;
509 myifm = (struct if_msghdr *)mynext;
511 if (myifm->ifm_type != RTM_NEWADDR)
516 ifm = (struct if_msghdr *)next;
518 ifam = (struct ifa_msghdr *)myifm;
519 info.rti_addrs = ifam->ifam_addrs;
521 /* Expand the compacted addresses */
522 rt_xaddrs((char *)(ifam + 1), ifam->ifam_msglen + (char *)ifam,
526 if (afp->af_af == info.rti_info[RTAX_IFA]->sa_family &&
527 afp->af_status != ether_status) {
529 if (p->af_status != ether_status)
532 } else for (p = afs; p->af_name; p++) {
533 if (p->af_af == info.rti_info[RTAX_IFA]->sa_family &&
534 p->af_status != ether_status)
538 if (afp == NULL || afp->af_status == ether_status)
540 else if (afp && !p) {
541 warnx("%s has no %s IFA address!", name, afp->af_name);
548 phys_status(int force)
552 int flags = NI_NUMERICHOST;
554 #ifndef SIOCGLIFPHYADDR
555 u_long srccmd, dstcmd;
561 force = 0; /*fool gcc*/
563 psrcaddr[0] = pdstaddr[0] = '\0';
566 s6 = socket(AF_INET6, SOCK_DGRAM, 0);
569 srccmd = SIOCGIFPSRCADDR;
570 dstcmd = SIOCGIFPDSTADDR;
573 srccmd = SIOCGIFPSRCADDR_IN6;
574 dstcmd = SIOCGIFPDSTADDR_IN6;
575 ifrp = (struct ifreq *)&in6_ifr;
579 srccmd = SIOCGIFPSRCADDR;
580 dstcmd = SIOCGIFPDSTADDR;
583 if (0 <= ioctl(s, srccmd, (caddr_t)ifrp)) {
585 if (ifrp->ifr_addr.sa_family == AF_INET6)
592 if (getnameinfo(&ifrp->ifr_addr, ifrp->ifr_addr.sa_len,
593 psrcaddr, sizeof(psrcaddr), 0, 0, flags) != 0)
596 if (0 <= ioctl(s, dstcmd, (caddr_t)ifrp)) {
597 if (getnameinfo(&ifrp->ifr_addr, ifrp->ifr_addr.sa_len,
598 pdstaddr, sizeof(pdstaddr), 0, 0, flags) != 0)
601 printf("\tphysical address %s %s --> %s\n", af, psrcaddr, pdstaddr);
603 struct if_laddrreq iflr;
605 force = 0; /*fool gcc*/
607 psrcaddr[0] = pdstaddr[0] = '\0';
609 memset(&iflr, 0, sizeof(iflr));
610 memcpy(iflr.iflr_name, ifr.ifr_name, sizeof(iflr.iflr_name));
612 if (0 <= ioctl(s, SIOCGLIFPHYADDR, (caddr_t)&iflr)) {
613 switch (iflr.addr.ss_family) {
623 if (getnameinfo((struct sockaddr *)&iflr.addr, iflr.addr.ss_len,
624 psrcaddr, sizeof(psrcaddr), 0, 0, flags) != 0)
626 if (getnameinfo((struct sockaddr *)&iflr.dstaddr,
627 iflr.dstaddr.ss_len, pdstaddr, sizeof(pdstaddr), 0, 0,
631 printf("\tphysical address %s %s --> %s\n", af, psrcaddr, pdstaddr);
638 struct sockaddr_in *sin, null_sin;
643 memset(&null_sin, 0, sizeof(null_sin));
645 sin = (struct sockaddr_in *)info.rti_info[RTAX_IFA];
646 if (!sin || sin->sin_family != AF_INET) {
649 /* warnx("%s has no AF_INET IFA address!", name); */
652 printf("\tinet %s ", inet_ntoa(sin->sin_addr));
654 if (flags & IFF_POINTOPOINT) {
655 /* note RTAX_BRD overlap with IFF_BROADCAST */
656 sin = (struct sockaddr_in *)info.rti_info[RTAX_BRD];
659 printf("--> %s ", inet_ntoa(sin->sin_addr));
662 sin = (struct sockaddr_in *)info.rti_info[RTAX_NETMASK];
665 printf("netmask 0x%x ", (u_int32_t)ntohl(sin->sin_addr.s_addr));
667 if (flags & IFF_BROADCAST) {
668 /* note RTAX_BRD overlap with IFF_POINTOPOINT */
669 sin = (struct sockaddr_in *)info.rti_info[RTAX_BRD];
670 if (sin && sin->sin_addr.s_addr != 0)
671 printf("broadcast %s", inet_ntoa(sin->sin_addr));
678 in6_status(int force)
680 struct sockaddr_in6 *sin, null_sin;
681 char hostname[NI_MAXHOST];
682 int niflags = NI_NUMERICHOST;
684 memset(&null_sin, 0, sizeof(null_sin));
685 #ifdef NI_WITHSCOPEID
686 niflags |= NI_WITHSCOPEID;
689 sin = (struct sockaddr_in6 *)info.rti_info[RTAX_IFA];
690 if (!sin || sin->sin6_family != AF_INET6) {
693 /* warnx("%s has no AF_INET6 IFA address!", name); */
697 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr)) {
699 ntohs(*(u_int16_t *)&sin->sin6_addr.s6_addr[2]);
700 sin->sin6_addr.s6_addr[2] = 0;
701 sin->sin6_addr.s6_addr[3] = 0;
704 getnameinfo((struct sockaddr *)sin, sin->sin6_len,
705 hostname, sizeof(hostname), 0, 0, niflags);
706 printf("\tinet6 %s ", hostname);
708 if (flags & IFF_POINTOPOINT) {
709 /* note RTAX_BRD overlap with IFF_BROADCAST */
710 sin = (struct sockaddr_in6 *)info.rti_info[RTAX_BRD];
712 * some of ther interfaces do not have valid destination
715 if (sin->sin6_family == AF_INET6) {
717 if (IN6_IS_ADDR_LINKLOCAL(&sin->sin6_addr)) {
719 ntohs(*(u_int16_t *)&sin->sin6_addr.s6_addr[2]);
720 sin->sin6_addr.s6_addr[2] = 0;
721 sin->sin6_addr.s6_addr[3] = 0;
724 getnameinfo((struct sockaddr *)sin, sin->sin6_len,
725 hostname, sizeof(hostname), 0, 0, niflags);
726 printf("--> %s ", hostname);
730 sin = (struct sockaddr_in6 *)info.rti_info[RTAX_NETMASK];
733 printf(" prefixlen %d ", prefix(&sin->sin6_addr,
734 sizeof(struct in6_addr)));
742 ether_status(int dummy)
747 dummy = 0; /*fool gcc*/
749 cp = (char *)LLADDR(sdl);
750 if ((n = sdl->sdl_alen) > 0) {
751 if (sdl->sdl_type == IFT_ETHER)
754 printf ("\tlladdr ");
756 printf("%02x%c",*cp++ & 0xff, n>0? ':' : ' ');
767 errx(1, "%s: no such interface", cmd);
771 errx(1, "%s: permission denied", cmd);
779 #define SIN(x) ((struct sockaddr_in *) &(x))
780 struct sockaddr_in *sintab[] = {
781 SIN(addreq.ifra_addr), SIN(addreq.ifra_dstaddr)};
784 in_getaddr(char *s, int which)
786 struct sockaddr_in *sin = sintab[which];
790 sin->sin_len = sizeof(*sin);
791 sin->sin_family = AF_INET;
793 if (inet_aton(s, &sin->sin_addr))
795 else if ((hp = gethostbyname(s)) != NULL)
796 bcopy(hp->h_addr, (char *)&sin->sin_addr, hp->h_length);
797 else if ((np = getnetbyname(s)) != NULL)
798 sin->sin_addr = inet_makeaddr(np->n_net, INADDR_ANY);
800 errx(1, "%s: bad value", s);
804 #define SIN6(x) ((struct sockaddr_in6 *) &(x))
805 struct sockaddr_in6 *sin6tab[] = {
806 SIN6(in6_addreq.ifra_addr), SIN6(in6_addreq.ifra_dstaddr)};
809 in6_getaddr(char *s, int which)
811 struct sockaddr_in6 *sin = sin6tab[which];
813 sin->sin6_len = sizeof(*sin);
814 sin->sin6_family = AF_INET6;
816 if (inet_pton(AF_INET6, s, &sin->sin6_addr) != 1)
817 errx(1, "%s: bad value", s);
821 in6_getprefix(char *plen, int which)
823 struct sockaddr_in6 *sin = sin6tab[which];
825 int len = atoi(plen);
827 if ((len < 0) || (len > 128))
828 errx(1, "%s: bad value", plen);
829 sin->sin6_len = sizeof(*sin);
830 sin->sin6_family = AF_INET6;
831 if ((len == 0) || (len == 128)) {
832 memset(&sin->sin6_addr, -1, sizeof(struct in6_addr));
835 for (cp = (u_char *)&sin->sin6_addr; len > 7; len -= 8)
837 *cp = (-1) << (8 - len);
842 * Print a value a la the %b format of the kernel's printf
845 printb(char *s, unsigned int v, char *bits)
850 if (bits && *bits == 8)
851 printf("%s=%o", s, v & 0xffff);
853 printf("%s=%x", s, v & 0xffff);
857 while ((i = *bits++) != 0) {
858 if ((v & (1 << (i-1))) != 0) {
862 for (; (c = *bits) > 32; bits++)
865 for (; *bits > 32; bits++)
874 prefix(void *val, int size)
876 u_char *name = (u_char *)val;
877 int byte, bit, plen = 0;
879 for (byte = 0; byte < size; byte++, plen += 8)
880 if (name[byte] != 0xff)
884 for (bit = 7; bit != 0; bit--, plen++)
885 if (!(name[byte] & (1 << bit)))
887 for (; bit != 0; bit--)
888 if (name[byte] & (1 << bit))
891 for (; byte < size; byte++)