]> CyberLeo.Net >> Repos - FreeBSD/stable/8.git/blob - sbin/ifconfig/ifconfig.c
MFC r362623:
[FreeBSD/stable/8.git] / sbin / ifconfig / ifconfig.c
1 /*
2  * Copyright (c) 1983, 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
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.
13  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29
30 #ifndef lint
31 static const char copyright[] =
32 "@(#) Copyright (c) 1983, 1993\n\
33         The Regents of the University of California.  All rights reserved.\n";
34 #endif /* not lint */
35
36 #ifndef lint
37 #if 0
38 static char sccsid[] = "@(#)ifconfig.c  8.2 (Berkeley) 2/16/94";
39 #endif
40 static const char rcsid[] =
41   "$FreeBSD$";
42 #endif /* not lint */
43
44 #include <sys/param.h>
45 #include <sys/ioctl.h>
46 #include <sys/socket.h>
47 #include <sys/time.h>
48 #include <sys/module.h>
49 #include <sys/linker.h>
50
51 #include <net/ethernet.h>
52 #include <net/if.h>
53 #include <net/if_var.h>
54 #include <net/if_dl.h>
55 #include <net/if_types.h>
56 #include <net/route.h>
57
58 /* IP */
59 #include <netinet/in.h>
60 #include <netinet/in_var.h>
61 #include <arpa/inet.h>
62 #include <netdb.h>
63
64 #include <ifaddrs.h>
65 #include <ctype.h>
66 #include <err.h>
67 #include <errno.h>
68 #include <fcntl.h>
69 #include <jail.h>
70 #include <stdio.h>
71 #include <stdlib.h>
72 #include <string.h>
73 #include <unistd.h>
74
75 #include "ifconfig.h"
76
77 /*
78  * Since "struct ifreq" is composed of various union members, callers
79  * should pay special attention to interprete the value.
80  * (.e.g. little/big endian difference in the structure.)
81  */
82 struct  ifreq ifr;
83
84 char    name[IFNAMSIZ];
85 char    *descr = NULL;
86 size_t  descrlen = 64;
87 int     setaddr;
88 int     setmask;
89 int     doalias;
90 int     clearaddr;
91 int     newaddr = 1;
92 int     verbose;
93 int     noload;
94
95 int     supmedia = 0;
96 int     printkeys = 0;          /* Print keying material for interfaces. */
97
98 static  int ifconfig(int argc, char *const *argv, int iscreate,
99                 const struct afswtch *afp);
100 static  void status(const struct afswtch *afp, const struct sockaddr_dl *sdl,
101                 struct ifaddrs *ifa);
102 static  void tunnel_status(int s);
103 static  void usage(void);
104
105 static struct afswtch *af_getbyname(const char *name);
106 static struct afswtch *af_getbyfamily(int af);
107 static void af_other_status(int);
108
109 static struct option *opts = NULL;
110
111 void
112 opt_register(struct option *p)
113 {
114         p->next = opts;
115         opts = p;
116 }
117
118 static void
119 usage(void)
120 {
121         char options[1024];
122         struct option *p;
123
124         /* XXX not right but close enough for now */
125         options[0] = '\0';
126         for (p = opts; p != NULL; p = p->next) {
127                 strlcat(options, p->opt_usage, sizeof(options));
128                 strlcat(options, " ", sizeof(options));
129         }
130
131         fprintf(stderr,
132         "usage: ifconfig %sinterface address_family [address [dest_address]]\n"
133         "                [parameters]\n"
134         "       ifconfig interface create\n"
135         "       ifconfig -a %s[-d] [-m] [-u] [-v] [address_family]\n"
136         "       ifconfig -l [-d] [-u] [address_family]\n"
137         "       ifconfig %s[-d] [-m] [-u] [-v]\n",
138                 options, options, options);
139         exit(1);
140 }
141
142 int
143 main(int argc, char *argv[])
144 {
145         int c, all, namesonly, downonly, uponly;
146         const struct afswtch *afp = NULL;
147         int ifindex;
148         struct ifaddrs *ifap, *ifa;
149         struct ifreq paifr;
150         const struct sockaddr_dl *sdl;
151         char options[1024], *cp;
152         const char *ifname;
153         struct option *p;
154         size_t iflen;
155
156         all = downonly = uponly = namesonly = noload = verbose = 0;
157
158         /* Parse leading line options */
159         strlcpy(options, "adklmnuv", sizeof(options));
160         for (p = opts; p != NULL; p = p->next)
161                 strlcat(options, p->opt, sizeof(options));
162         while ((c = getopt(argc, argv, options)) != -1) {
163                 switch (c) {
164                 case 'a':       /* scan all interfaces */
165                         all++;
166                         break;
167                 case 'd':       /* restrict scan to "down" interfaces */
168                         downonly++;
169                         break;
170                 case 'k':
171                         printkeys++;
172                         break;
173                 case 'l':       /* scan interface names only */
174                         namesonly++;
175                         break;
176                 case 'm':       /* show media choices in status */
177                         supmedia = 1;
178                         break;
179                 case 'n':       /* suppress module loading */
180                         noload++;
181                         break;
182                 case 'u':       /* restrict scan to "up" interfaces */
183                         uponly++;
184                         break;
185                 case 'v':
186                         verbose++;
187                         break;
188                 default:
189                         for (p = opts; p != NULL; p = p->next)
190                                 if (p->opt[0] == c) {
191                                         p->cb(optarg);
192                                         break;
193                                 }
194                         if (p == NULL)
195                                 usage();
196                         break;
197                 }
198         }
199         argc -= optind;
200         argv += optind;
201
202         /* -l cannot be used with -a or -m */
203         if (namesonly && (all || supmedia))
204                 usage();
205
206         /* nonsense.. */
207         if (uponly && downonly)
208                 usage();
209
210         /* no arguments is equivalent to '-a' */
211         if (!namesonly && argc < 1)
212                 all = 1;
213
214         /* -a and -l allow an address family arg to limit the output */
215         if (all || namesonly) {
216                 if (argc > 1)
217                         usage();
218
219                 ifname = NULL;
220                 ifindex = 0;
221                 if (argc == 1) {
222                         afp = af_getbyname(*argv);
223                         if (afp == NULL)
224                                 usage();
225                         if (afp->af_name != NULL)
226                                 argc--, argv++;
227                         /* leave with afp non-zero */
228                 }
229         } else {
230                 /* not listing, need an argument */
231                 if (argc < 1)
232                         usage();
233
234                 ifname = *argv;
235                 argc--, argv++;
236
237                 /* check and maybe load support for this interface */
238                 ifmaybeload(ifname);
239
240                 ifindex = if_nametoindex(ifname);
241                 if (ifindex == 0) {
242                         /*
243                          * NOTE:  We must special-case the `create' command
244                          * right here as we would otherwise fail when trying
245                          * to find the interface.
246                          */
247                         if (argc > 0 && (strcmp(argv[0], "create") == 0 ||
248                             strcmp(argv[0], "plumb") == 0)) {
249                                 iflen = strlcpy(name, ifname, sizeof(name));
250                                 if (iflen >= sizeof(name))
251                                         errx(1, "%s: cloning name too long",
252                                             ifname);
253                                 ifconfig(argc, argv, 1, NULL);
254                                 exit(0);
255                         }
256                         /*
257                          * NOTE:  We have to special-case the `-vnet' command
258                          * right here as we would otherwise fail when trying
259                          * to find the interface as it lives in another vnet.
260                          */
261                         if (argc > 0 && (strcmp(argv[0], "-vnet") == 0)) {
262                                 iflen = strlcpy(name, ifname, sizeof(name));
263                                 if (iflen >= sizeof(name))
264                                         errx(1, "%s: interface name too long",
265                                             ifname);
266                                 ifconfig(argc, argv, 0, NULL);
267                                 exit(0);
268                         }
269                         errx(1, "interface %s does not exist", ifname);
270                 }
271         }
272
273         /* Check for address family */
274         if (argc > 0) {
275                 afp = af_getbyname(*argv);
276                 if (afp != NULL)
277                         argc--, argv++;
278         }
279
280         if (getifaddrs(&ifap) != 0)
281                 err(EXIT_FAILURE, "getifaddrs");
282         cp = NULL;
283         ifindex = 0;
284         for (ifa = ifap; ifa; ifa = ifa->ifa_next) {
285                 memset(&paifr, 0, sizeof(paifr));
286                 strncpy(paifr.ifr_name, ifa->ifa_name, sizeof(paifr.ifr_name));
287                 if (sizeof(paifr.ifr_addr) >= ifa->ifa_addr->sa_len) {
288                         memcpy(&paifr.ifr_addr, ifa->ifa_addr,
289                             ifa->ifa_addr->sa_len);
290                 }
291
292                 if (ifname != NULL && strcmp(ifname, ifa->ifa_name) != 0)
293                         continue;
294                 if (ifa->ifa_addr->sa_family == AF_LINK)
295                         sdl = (const struct sockaddr_dl *) ifa->ifa_addr;
296                 else
297                         sdl = NULL;
298                 if (cp != NULL && strcmp(cp, ifa->ifa_name) == 0)
299                         continue;
300                 iflen = strlcpy(name, ifa->ifa_name, sizeof(name));
301                 if (iflen >= sizeof(name)) {
302                         warnx("%s: interface name too long, skipping",
303                             ifa->ifa_name);
304                         continue;
305                 }
306                 cp = ifa->ifa_name;
307
308                 if ((ifa->ifa_flags & IFF_CANTCONFIG) != 0)
309                         continue;
310                 if (downonly && (ifa->ifa_flags & IFF_UP) != 0)
311                         continue;
312                 if (uponly && (ifa->ifa_flags & IFF_UP) == 0)
313                         continue;
314                 ifindex++;
315                 /*
316                  * Are we just listing the interfaces?
317                  */
318                 if (namesonly) {
319                         if (ifindex > 1)
320                                 printf(" ");
321                         fputs(name, stdout);
322                         continue;
323                 }
324
325                 if (argc > 0)
326                         ifconfig(argc, argv, 0, afp);
327                 else
328                         status(afp, sdl, ifa);
329         }
330         if (namesonly)
331                 printf("\n");
332         freeifaddrs(ifap);
333
334         exit(0);
335 }
336
337 static struct afswtch *afs = NULL;
338
339 void
340 af_register(struct afswtch *p)
341 {
342         p->af_next = afs;
343         afs = p;
344 }
345
346 static struct afswtch *
347 af_getbyname(const char *name)
348 {
349         struct afswtch *afp;
350
351         for (afp = afs; afp !=  NULL; afp = afp->af_next)
352                 if (strcmp(afp->af_name, name) == 0)
353                         return afp;
354         return NULL;
355 }
356
357 static struct afswtch *
358 af_getbyfamily(int af)
359 {
360         struct afswtch *afp;
361
362         for (afp = afs; afp != NULL; afp = afp->af_next)
363                 if (afp->af_af == af)
364                         return afp;
365         return NULL;
366 }
367
368 static void
369 af_other_status(int s)
370 {
371         struct afswtch *afp;
372         uint8_t afmask[howmany(AF_MAX, NBBY)];
373
374         memset(afmask, 0, sizeof(afmask));
375         for (afp = afs; afp != NULL; afp = afp->af_next) {
376                 if (afp->af_other_status == NULL)
377                         continue;
378                 if (afp->af_af != AF_UNSPEC && isset(afmask, afp->af_af))
379                         continue;
380                 afp->af_other_status(s);
381                 setbit(afmask, afp->af_af);
382         }
383 }
384
385 static void
386 af_all_tunnel_status(int s)
387 {
388         struct afswtch *afp;
389         uint8_t afmask[howmany(AF_MAX, NBBY)];
390
391         memset(afmask, 0, sizeof(afmask));
392         for (afp = afs; afp != NULL; afp = afp->af_next) {
393                 if (afp->af_status_tunnel == NULL)
394                         continue;
395                 if (afp->af_af != AF_UNSPEC && isset(afmask, afp->af_af))
396                         continue;
397                 afp->af_status_tunnel(s);
398                 setbit(afmask, afp->af_af);
399         }
400 }
401
402 static struct cmd *cmds = NULL;
403
404 void
405 cmd_register(struct cmd *p)
406 {
407         p->c_next = cmds;
408         cmds = p;
409 }
410
411 static const struct cmd *
412 cmd_lookup(const char *name, int iscreate)
413 {
414 #define N(a)    (sizeof(a)/sizeof(a[0]))
415         const struct cmd *p;
416
417         for (p = cmds; p != NULL; p = p->c_next)
418                 if (strcmp(name, p->c_name) == 0) {
419                         if (iscreate) {
420                                 if (p->c_iscloneop)
421                                         return p;
422                         } else {
423                                 if (!p->c_iscloneop)
424                                         return p;
425                         }
426                 }
427         return NULL;
428 #undef N
429 }
430
431 struct callback {
432         callback_func *cb_func;
433         void    *cb_arg;
434         struct callback *cb_next;
435 };
436 static struct callback *callbacks = NULL;
437
438 void
439 callback_register(callback_func *func, void *arg)
440 {
441         struct callback *cb;
442
443         cb = malloc(sizeof(struct callback));
444         if (cb == NULL)
445                 errx(1, "unable to allocate memory for callback");
446         cb->cb_func = func;
447         cb->cb_arg = arg;
448         cb->cb_next = callbacks;
449         callbacks = cb;
450 }
451
452 /* specially-handled commands */
453 static void setifaddr(const char *, int, int, const struct afswtch *);
454 static const struct cmd setifaddr_cmd = DEF_CMD("ifaddr", 0, setifaddr);
455
456 static void setifdstaddr(const char *, int, int, const struct afswtch *);
457 static const struct cmd setifdstaddr_cmd =
458         DEF_CMD("ifdstaddr", 0, setifdstaddr);
459
460 static int
461 ifconfig(int argc, char *const *argv, int iscreate, const struct afswtch *uafp)
462 {
463         const struct afswtch *afp, *nafp;
464         const struct cmd *p;
465         struct callback *cb;
466         int s;
467
468         strncpy(ifr.ifr_name, name, sizeof ifr.ifr_name);
469         afp = uafp != NULL ? uafp : af_getbyname("inet");
470 top:
471         ifr.ifr_addr.sa_family =
472                 afp->af_af == AF_LINK || afp->af_af == AF_UNSPEC ?
473                 AF_LOCAL : afp->af_af;
474
475         if ((s = socket(ifr.ifr_addr.sa_family, SOCK_DGRAM, 0)) < 0 &&
476             (uafp != NULL || errno != EPROTONOSUPPORT ||
477              (s = socket(AF_LOCAL, SOCK_DGRAM, 0)) < 0))
478                 err(1, "socket(family %u,SOCK_DGRAM", ifr.ifr_addr.sa_family);
479
480         while (argc > 0) {
481                 p = cmd_lookup(*argv, iscreate);
482                 if (iscreate && p == NULL) {
483                         /*
484                          * Push the clone create callback so the new
485                          * device is created and can be used for any
486                          * remaining arguments.
487                          */
488                         cb = callbacks;
489                         if (cb == NULL)
490                                 errx(1, "internal error, no callback");
491                         callbacks = cb->cb_next;
492                         cb->cb_func(s, cb->cb_arg);
493                         iscreate = 0;
494                         /*
495                          * Handle any address family spec that
496                          * immediately follows and potentially
497                          * recreate the socket.
498                          */
499                         nafp = af_getbyname(*argv);
500                         if (nafp != NULL) {
501                                 argc--, argv++;
502                                 if (nafp != afp) {
503                                         close(s);
504                                         afp = nafp;
505                                         goto top;
506                                 }
507                         }
508                         /*
509                          * Look for a normal parameter.
510                          */
511                         continue;
512                 }
513                 if (p == NULL) {
514                         /*
515                          * Not a recognized command, choose between setting
516                          * the interface address and the dst address.
517                          */
518                         p = (setaddr ? &setifdstaddr_cmd : &setifaddr_cmd);
519                 }
520                 if (p->c_u.c_func || p->c_u.c_func2) {
521                         if (p->c_parameter == NEXTARG) {
522                                 if (argv[1] == NULL)
523                                         errx(1, "'%s' requires argument",
524                                             p->c_name);
525                                 p->c_u.c_func(argv[1], 0, s, afp);
526                                 argc--, argv++;
527                         } else if (p->c_parameter == OPTARG) {
528                                 p->c_u.c_func(argv[1], 0, s, afp);
529                                 if (argv[1] != NULL)
530                                         argc--, argv++;
531                         } else if (p->c_parameter == NEXTARG2) {
532                                 if (argc < 3)
533                                         errx(1, "'%s' requires 2 arguments",
534                                             p->c_name);
535                                 p->c_u.c_func2(argv[1], argv[2], s, afp);
536                                 argc -= 2, argv += 2;
537                         } else
538                                 p->c_u.c_func(*argv, p->c_parameter, s, afp);
539                 }
540                 argc--, argv++;
541         }
542
543         /*
544          * Do any post argument processing required by the address family.
545          */
546         if (afp->af_postproc != NULL)
547                 afp->af_postproc(s, afp);
548         /*
549          * Do deferred callbacks registered while processing
550          * command-line arguments.
551          */
552         for (cb = callbacks; cb != NULL; cb = cb->cb_next)
553                 cb->cb_func(s, cb->cb_arg);
554         /*
555          * Do deferred operations.
556          */
557         if (clearaddr) {
558                 if (afp->af_ridreq == NULL || afp->af_difaddr == 0) {
559                         warnx("interface %s cannot change %s addresses!",
560                               name, afp->af_name);
561                         clearaddr = 0;
562                 }
563         }
564         if (clearaddr) {
565                 int ret;
566                 strncpy(afp->af_ridreq, name, sizeof ifr.ifr_name);
567                 ret = ioctl(s, afp->af_difaddr, afp->af_ridreq);
568                 if (ret < 0) {
569                         if (errno == EADDRNOTAVAIL && (doalias >= 0)) {
570                                 /* means no previous address for interface */
571                         } else
572                                 Perror("ioctl (SIOCDIFADDR)");
573                 }
574         }
575         if (newaddr) {
576                 if (afp->af_addreq == NULL || afp->af_aifaddr == 0) {
577                         warnx("interface %s cannot change %s addresses!",
578                               name, afp->af_name);
579                         newaddr = 0;
580                 }
581         }
582         if (newaddr && (setaddr || setmask)) {
583                 strncpy(afp->af_addreq, name, sizeof ifr.ifr_name);
584                 if (ioctl(s, afp->af_aifaddr, afp->af_addreq) < 0)
585                         Perror("ioctl (SIOCAIFADDR)");
586         }
587
588         close(s);
589         return(0);
590 }
591
592 /*ARGSUSED*/
593 static void
594 setifaddr(const char *addr, int param, int s, const struct afswtch *afp)
595 {
596         if (afp->af_getaddr == NULL)
597                 return;
598         /*
599          * Delay the ioctl to set the interface addr until flags are all set.
600          * The address interpretation may depend on the flags,
601          * and the flags may change when the address is set.
602          */
603         setaddr++;
604         if (doalias == 0 && afp->af_af != AF_LINK)
605                 clearaddr = 1;
606         afp->af_getaddr(addr, (doalias >= 0 ? ADDR : RIDADDR));
607 }
608
609 static void
610 settunnel(const char *src, const char *dst, int s, const struct afswtch *afp)
611 {
612         struct addrinfo *srcres, *dstres;
613         int ecode;
614
615         if (afp->af_settunnel == NULL) {
616                 warn("address family %s does not support tunnel setup",
617                         afp->af_name);
618                 return;
619         }
620
621         if ((ecode = getaddrinfo(src, NULL, NULL, &srcres)) != 0)
622                 errx(1, "error in parsing address string: %s",
623                     gai_strerror(ecode));
624
625         if ((ecode = getaddrinfo(dst, NULL, NULL, &dstres)) != 0)  
626                 errx(1, "error in parsing address string: %s",
627                     gai_strerror(ecode));
628
629         if (srcres->ai_addr->sa_family != dstres->ai_addr->sa_family)
630                 errx(1,
631                     "source and destination address families do not match");
632
633         afp->af_settunnel(s, srcres, dstres);
634
635         freeaddrinfo(srcres);
636         freeaddrinfo(dstres);
637 }
638
639 /* ARGSUSED */
640 static void
641 deletetunnel(const char *vname, int param, int s, const struct afswtch *afp)
642 {
643
644         if (ioctl(s, SIOCDIFPHYADDR, &ifr) < 0)
645                 err(1, "SIOCDIFPHYADDR");
646 }
647
648 static void
649 setifvnet(const char *jname, int dummy __unused, int s,
650     const struct afswtch *afp)
651 {
652         struct ifreq my_ifr;
653
654         memcpy(&my_ifr, &ifr, sizeof(my_ifr));
655         my_ifr.ifr_jid = jail_getid(jname);
656         if (my_ifr.ifr_jid < 0)
657                 errx(1, "%s", jail_errmsg);
658         if (ioctl(s, SIOCSIFVNET, &my_ifr) < 0)
659                 err(1, "SIOCSIFVNET");
660 }
661
662 static void
663 setifrvnet(const char *jname, int dummy __unused, int s,
664     const struct afswtch *afp)
665 {
666         struct ifreq my_ifr;
667
668         memcpy(&my_ifr, &ifr, sizeof(my_ifr));
669         my_ifr.ifr_jid = jail_getid(jname);
670         if (my_ifr.ifr_jid < 0)
671                 errx(1, "%s", jail_errmsg);
672         if (ioctl(s, SIOCSIFRVNET, &my_ifr) < 0)
673                 err(1, "SIOCSIFRVNET(%d, %s)", my_ifr.ifr_jid, my_ifr.ifr_name);
674 }
675
676 static void
677 setifnetmask(const char *addr, int dummy __unused, int s,
678     const struct afswtch *afp)
679 {
680         if (afp->af_getaddr != NULL) {
681                 setmask++;
682                 afp->af_getaddr(addr, MASK);
683         }
684 }
685
686 static void
687 setifbroadaddr(const char *addr, int dummy __unused, int s,
688     const struct afswtch *afp)
689 {
690         if (afp->af_getaddr != NULL)
691                 afp->af_getaddr(addr, DSTADDR);
692 }
693
694 static void
695 setifipdst(const char *addr, int dummy __unused, int s,
696     const struct afswtch *afp)
697 {
698         const struct afswtch *inet;
699
700         inet = af_getbyname("inet");
701         if (inet == NULL)
702                 return;
703         inet->af_getaddr(addr, DSTADDR);
704         clearaddr = 0;
705         newaddr = 0;
706 }
707
708 static void
709 notealias(const char *addr, int param, int s, const struct afswtch *afp)
710 {
711 #define rqtosa(x) (&(((struct ifreq *)(afp->x))->ifr_addr))
712         if (setaddr && doalias == 0 && param < 0)
713                 if (afp->af_addreq != NULL && afp->af_ridreq != NULL)
714                         bcopy((caddr_t)rqtosa(af_addreq),
715                               (caddr_t)rqtosa(af_ridreq),
716                               rqtosa(af_addreq)->sa_len);
717         doalias = param;
718         if (param < 0) {
719                 clearaddr = 1;
720                 newaddr = 0;
721         } else
722                 clearaddr = 0;
723 #undef rqtosa
724 }
725
726 /*ARGSUSED*/
727 static void
728 setifdstaddr(const char *addr, int param __unused, int s, 
729     const struct afswtch *afp)
730 {
731         if (afp->af_getaddr != NULL)
732                 afp->af_getaddr(addr, DSTADDR);
733 }
734
735 /*
736  * Note: doing an SIOCIGIFFLAGS scribbles on the union portion
737  * of the ifreq structure, which may confuse other parts of ifconfig.
738  * Make a private copy so we can avoid that.
739  */
740 static void
741 setifflags(const char *vname, int value, int s, const struct afswtch *afp)
742 {
743         struct ifreq            my_ifr;
744         int flags;
745
746         memset(&my_ifr, 0, sizeof(my_ifr));
747         (void) strlcpy(my_ifr.ifr_name, name, sizeof(my_ifr.ifr_name));
748
749         if (ioctl(s, SIOCGIFFLAGS, (caddr_t)&my_ifr) < 0) {
750                 Perror("ioctl (SIOCGIFFLAGS)");
751                 exit(1);
752         }
753         flags = (my_ifr.ifr_flags & 0xffff) | (my_ifr.ifr_flagshigh << 16);
754
755         if (value < 0) {
756                 value = -value;
757                 flags &= ~value;
758         } else
759                 flags |= value;
760         my_ifr.ifr_flags = flags & 0xffff;
761         my_ifr.ifr_flagshigh = flags >> 16;
762         if (ioctl(s, SIOCSIFFLAGS, (caddr_t)&my_ifr) < 0)
763                 Perror(vname);
764 }
765
766 void
767 setifcap(const char *vname, int value, int s, const struct afswtch *afp)
768 {
769         int flags;
770
771         if (ioctl(s, SIOCGIFCAP, (caddr_t)&ifr) < 0) {
772                 Perror("ioctl (SIOCGIFCAP)");
773                 exit(1);
774         }
775         flags = ifr.ifr_curcap;
776         if (value < 0) {
777                 value = -value;
778                 flags &= ~value;
779         } else
780                 flags |= value;
781         flags &= ifr.ifr_reqcap;
782         ifr.ifr_reqcap = flags;
783         if (ioctl(s, SIOCSIFCAP, (caddr_t)&ifr) < 0)
784                 Perror(vname);
785 }
786
787 static void
788 setifmetric(const char *val, int dummy __unused, int s, 
789     const struct afswtch *afp)
790 {
791         strncpy(ifr.ifr_name, name, sizeof (ifr.ifr_name));
792         ifr.ifr_metric = atoi(val);
793         if (ioctl(s, SIOCSIFMETRIC, (caddr_t)&ifr) < 0)
794                 warn("ioctl (set metric)");
795 }
796
797 static void
798 setifmtu(const char *val, int dummy __unused, int s, 
799     const struct afswtch *afp)
800 {
801         strncpy(ifr.ifr_name, name, sizeof (ifr.ifr_name));
802         ifr.ifr_mtu = atoi(val);
803         if (ioctl(s, SIOCSIFMTU, (caddr_t)&ifr) < 0)
804                 warn("ioctl (set mtu)");
805 }
806
807 static void
808 setifname(const char *val, int dummy __unused, int s, 
809     const struct afswtch *afp)
810 {
811         char *newname;
812
813         newname = strdup(val);
814         if (newname == NULL) {
815                 warn("no memory to set ifname");
816                 return;
817         }
818         ifr.ifr_data = newname;
819         if (ioctl(s, SIOCSIFNAME, (caddr_t)&ifr) < 0) {
820                 warn("ioctl (set name)");
821                 free(newname);
822                 return;
823         }
824         strlcpy(name, newname, sizeof(name));
825         free(newname);
826 }
827
828 /* ARGSUSED */
829 static void
830 setifdescr(const char *val, int dummy __unused, int s, 
831     const struct afswtch *afp)
832 {
833         char *newdescr;
834
835         ifr.ifr_buffer.length = strlen(val) + 1;
836         if (ifr.ifr_buffer.length == 1) {
837                 ifr.ifr_buffer.buffer = newdescr = NULL;
838                 ifr.ifr_buffer.length = 0;
839         } else {
840                 newdescr = strdup(val);
841                 ifr.ifr_buffer.buffer = newdescr;
842                 if (newdescr == NULL) {
843                         warn("no memory to set ifdescr");
844                         return;
845                 }
846         }
847
848         if (ioctl(s, SIOCSIFDESCR, (caddr_t)&ifr) < 0)
849                 warn("ioctl (set descr)");
850
851         free(newdescr);
852 }
853
854 /* ARGSUSED */
855 static void
856 unsetifdescr(const char *val, int value, int s, const struct afswtch *afp)
857 {
858
859         setifdescr("", 0, s, 0);
860 }
861
862 #define IFFBITS \
863 "\020\1UP\2BROADCAST\3DEBUG\4LOOPBACK\5POINTOPOINT\6SMART\7RUNNING" \
864 "\10NOARP\11PROMISC\12ALLMULTI\13OACTIVE\14SIMPLEX\15LINK0\16LINK1\17LINK2" \
865 "\20MULTICAST\22PPROMISC\23MONITOR\24STATICARP"
866
867 #define IFCAPBITS \
868 "\020\1RXCSUM\2TXCSUM\3NETCONS\4VLAN_MTU\5VLAN_HWTAGGING\6JUMBO_MTU\7POLLING" \
869 "\10VLAN_HWCSUM\11TSO4\12TSO6\13LRO\14WOL_UCAST\15WOL_MCAST\16WOL_MAGIC" \
870 "\21VLAN_HWFILTER\23VLAN_HWTSO\24LINKSTATE\25NETMAP"
871
872 /*
873  * Print the status of the interface.  If an address family was
874  * specified, show only it; otherwise, show them all.
875  */
876 static void
877 status(const struct afswtch *afp, const struct sockaddr_dl *sdl,
878         struct ifaddrs *ifa)
879 {
880         struct ifaddrs *ift;
881         int allfamilies, s;
882         struct ifstat ifs;
883
884         if (afp == NULL) {
885                 allfamilies = 1;
886                 ifr.ifr_addr.sa_family = AF_LOCAL;
887         } else {
888                 allfamilies = 0;
889                 ifr.ifr_addr.sa_family =
890                     afp->af_af == AF_LINK ? AF_LOCAL : afp->af_af;
891         }
892         strncpy(ifr.ifr_name, name, sizeof(ifr.ifr_name));
893
894         s = socket(ifr.ifr_addr.sa_family, SOCK_DGRAM, 0);
895         if (s < 0)
896                 err(1, "socket(family %u,SOCK_DGRAM)", ifr.ifr_addr.sa_family);
897
898         printf("%s: ", name);
899         printb("flags", ifa->ifa_flags, IFFBITS);
900         if (ioctl(s, SIOCGIFMETRIC, &ifr) != -1)
901                 printf(" metric %d", ifr.ifr_metric);
902         if (ioctl(s, SIOCGIFMTU, &ifr) != -1)
903                 printf(" mtu %d", ifr.ifr_mtu);
904         putchar('\n');
905
906         for (;;) {
907                 if ((descr = reallocf(descr, descrlen)) != NULL) {
908                         ifr.ifr_buffer.buffer = descr;
909                         ifr.ifr_buffer.length = descrlen;
910                         if (ioctl(s, SIOCGIFDESCR, &ifr) == 0) {
911                                 if (ifr.ifr_buffer.buffer == descr) {
912                                         if (strlen(descr) > 0)
913                                                 printf("\tdescription: %s\n",
914                                                     descr);
915                                 } else if (ifr.ifr_buffer.length > descrlen) {
916                                         descrlen = ifr.ifr_buffer.length;
917                                         continue;
918                                 }
919                         }
920                 } else
921                         warn("unable to allocate memory for interface"
922                             "description");
923                 break;
924         }
925
926         if (ioctl(s, SIOCGIFCAP, (caddr_t)&ifr) == 0) {
927                 if (ifr.ifr_curcap != 0) {
928                         printb("\toptions", ifr.ifr_curcap, IFCAPBITS);
929                         putchar('\n');
930                 }
931                 if (supmedia && ifr.ifr_reqcap != 0) {
932                         printb("\tcapabilities", ifr.ifr_reqcap, IFCAPBITS);
933                         putchar('\n');
934                 }
935         }
936
937         tunnel_status(s);
938
939         for (ift = ifa; ift != NULL; ift = ift->ifa_next) {
940                 if (ift->ifa_addr == NULL)
941                         continue;
942                 if (strcmp(ifa->ifa_name, ift->ifa_name) != 0)
943                         continue;
944                 if (allfamilies) {
945                         const struct afswtch *p;
946                         p = af_getbyfamily(ift->ifa_addr->sa_family);
947                         if (p != NULL && p->af_status != NULL)
948                                 p->af_status(s, ift);
949                 } else if (afp->af_af == ift->ifa_addr->sa_family)
950                         afp->af_status(s, ift);
951         }
952 #if 0
953         if (allfamilies || afp->af_af == AF_LINK) {
954                 const struct afswtch *lafp;
955
956                 /*
957                  * Hack; the link level address is received separately
958                  * from the routing information so any address is not
959                  * handled above.  Cobble together an entry and invoke
960                  * the status method specially.
961                  */
962                 lafp = af_getbyname("lladdr");
963                 if (lafp != NULL) {
964                         info.rti_info[RTAX_IFA] = (struct sockaddr *)sdl;
965                         lafp->af_status(s, &info);
966                 }
967         }
968 #endif
969         if (allfamilies)
970                 af_other_status(s);
971         else if (afp->af_other_status != NULL)
972                 afp->af_other_status(s);
973
974         strncpy(ifs.ifs_name, name, sizeof ifs.ifs_name);
975         if (ioctl(s, SIOCGIFSTATUS, &ifs) == 0) 
976                 printf("%s", ifs.ascii);
977
978         close(s);
979         return;
980 }
981
982 static void
983 tunnel_status(int s)
984 {
985         af_all_tunnel_status(s);
986 }
987
988 void
989 Perror(const char *cmd)
990 {
991         switch (errno) {
992
993         case ENXIO:
994                 errx(1, "%s: no such interface", cmd);
995                 break;
996
997         case EPERM:
998                 errx(1, "%s: permission denied", cmd);
999                 break;
1000
1001         default:
1002                 err(1, "%s", cmd);
1003         }
1004 }
1005
1006 /*
1007  * Print a value a la the %b format of the kernel's printf
1008  */
1009 void
1010 printb(const char *s, unsigned v, const char *bits)
1011 {
1012         int i, any = 0;
1013         char c;
1014
1015         if (bits && *bits == 8)
1016                 printf("%s=%o", s, v);
1017         else
1018                 printf("%s=%x", s, v);
1019         bits++;
1020         if (bits) {
1021                 putchar('<');
1022                 while ((i = *bits++) != '\0') {
1023                         if (v & (1 << (i-1))) {
1024                                 if (any)
1025                                         putchar(',');
1026                                 any = 1;
1027                                 for (; (c = *bits) > 32; bits++)
1028                                         putchar(c);
1029                         } else
1030                                 for (; *bits > 32; bits++)
1031                                         ;
1032                 }
1033                 putchar('>');
1034         }
1035 }
1036
1037 void
1038 ifmaybeload(const char *name)
1039 {
1040 #define MOD_PREFIX_LEN          3       /* "if_" */
1041         struct module_stat mstat;
1042         int fileid, modid;
1043         char ifkind[IFNAMSIZ + MOD_PREFIX_LEN], ifname[IFNAMSIZ], *dp;
1044         const char *cp;
1045
1046         /* loading suppressed by the user */
1047         if (noload)
1048                 return;
1049
1050         /* trim the interface number off the end */
1051         strlcpy(ifname, name, sizeof(ifname));
1052         for (dp = ifname; *dp != 0; dp++)
1053                 if (isdigit(*dp)) {
1054                         *dp = 0;
1055                         break;
1056                 }
1057
1058         /* turn interface and unit into module name */
1059         strcpy(ifkind, "if_");
1060         strlcpy(ifkind + MOD_PREFIX_LEN, ifname,
1061             sizeof(ifkind) - MOD_PREFIX_LEN);
1062
1063         /* scan files in kernel */
1064         mstat.version = sizeof(struct module_stat);
1065         for (fileid = kldnext(0); fileid > 0; fileid = kldnext(fileid)) {
1066                 /* scan modules in file */
1067                 for (modid = kldfirstmod(fileid); modid > 0;
1068                      modid = modfnext(modid)) {
1069                         if (modstat(modid, &mstat) < 0)
1070                                 continue;
1071                         /* strip bus name if present */
1072                         if ((cp = strchr(mstat.name, '/')) != NULL) {
1073                                 cp++;
1074                         } else {
1075                                 cp = mstat.name;
1076                         }
1077                         /* already loaded? */
1078                         if (strncmp(ifname, cp, strlen(ifname) + 1) == 0 ||
1079                             strncmp(ifkind, cp, strlen(ifkind) + 1) == 0)
1080                                 return;
1081                 }
1082         }
1083
1084         /* not present, we should try to load it */
1085         kldload(ifkind);
1086 }
1087
1088 static struct cmd basic_cmds[] = {
1089         DEF_CMD("up",           IFF_UP,         setifflags),
1090         DEF_CMD("down",         -IFF_UP,        setifflags),
1091         DEF_CMD("arp",          -IFF_NOARP,     setifflags),
1092         DEF_CMD("-arp",         IFF_NOARP,      setifflags),
1093         DEF_CMD("debug",        IFF_DEBUG,      setifflags),
1094         DEF_CMD("-debug",       -IFF_DEBUG,     setifflags),
1095         DEF_CMD_ARG("description",              setifdescr),
1096         DEF_CMD_ARG("descr",                    setifdescr),
1097         DEF_CMD("-description", 0,              unsetifdescr),
1098         DEF_CMD("-descr",       0,              unsetifdescr),
1099         DEF_CMD("promisc",      IFF_PPROMISC,   setifflags),
1100         DEF_CMD("-promisc",     -IFF_PPROMISC,  setifflags),
1101         DEF_CMD("add",          IFF_UP,         notealias),
1102         DEF_CMD("alias",        IFF_UP,         notealias),
1103         DEF_CMD("-alias",       -IFF_UP,        notealias),
1104         DEF_CMD("delete",       -IFF_UP,        notealias),
1105         DEF_CMD("remove",       -IFF_UP,        notealias),
1106 #ifdef notdef
1107 #define EN_SWABIPS      0x1000
1108         DEF_CMD("swabips",      EN_SWABIPS,     setifflags),
1109         DEF_CMD("-swabips",     -EN_SWABIPS,    setifflags),
1110 #endif
1111         DEF_CMD_ARG("netmask",                  setifnetmask),
1112         DEF_CMD_ARG("metric",                   setifmetric),
1113         DEF_CMD_ARG("broadcast",                setifbroadaddr),
1114         DEF_CMD_ARG("ipdst",                    setifipdst),
1115         DEF_CMD_ARG2("tunnel",                  settunnel),
1116         DEF_CMD("-tunnel", 0,                   deletetunnel),
1117         DEF_CMD("deletetunnel", 0,              deletetunnel),
1118         DEF_CMD_ARG("vnet",                     setifvnet),
1119         DEF_CMD_ARG("-vnet",                    setifrvnet),
1120         DEF_CMD("link0",        IFF_LINK0,      setifflags),
1121         DEF_CMD("-link0",       -IFF_LINK0,     setifflags),
1122         DEF_CMD("link1",        IFF_LINK1,      setifflags),
1123         DEF_CMD("-link1",       -IFF_LINK1,     setifflags),
1124         DEF_CMD("link2",        IFF_LINK2,      setifflags),
1125         DEF_CMD("-link2",       -IFF_LINK2,     setifflags),
1126         DEF_CMD("monitor",      IFF_MONITOR,    setifflags),
1127         DEF_CMD("-monitor",     -IFF_MONITOR,   setifflags),
1128         DEF_CMD("staticarp",    IFF_STATICARP,  setifflags),
1129         DEF_CMD("-staticarp",   -IFF_STATICARP, setifflags),
1130         DEF_CMD("rxcsum",       IFCAP_RXCSUM,   setifcap),
1131         DEF_CMD("-rxcsum",      -IFCAP_RXCSUM,  setifcap),
1132         DEF_CMD("txcsum",       IFCAP_TXCSUM,   setifcap),
1133         DEF_CMD("-txcsum",      -IFCAP_TXCSUM,  setifcap),
1134         DEF_CMD("netcons",      IFCAP_NETCONS,  setifcap),
1135         DEF_CMD("-netcons",     -IFCAP_NETCONS, setifcap),
1136         DEF_CMD("polling",      IFCAP_POLLING,  setifcap),
1137         DEF_CMD("-polling",     -IFCAP_POLLING, setifcap),
1138         DEF_CMD("tso",          IFCAP_TSO,      setifcap),
1139         DEF_CMD("-tso",         -IFCAP_TSO,     setifcap),
1140         DEF_CMD("lro",          IFCAP_LRO,      setifcap),
1141         DEF_CMD("-lro",         -IFCAP_LRO,     setifcap),
1142         DEF_CMD("wol",          IFCAP_WOL,      setifcap),
1143         DEF_CMD("-wol",         -IFCAP_WOL,     setifcap),
1144         DEF_CMD("wol_ucast",    IFCAP_WOL_UCAST,        setifcap),
1145         DEF_CMD("-wol_ucast",   -IFCAP_WOL_UCAST,       setifcap),
1146         DEF_CMD("wol_mcast",    IFCAP_WOL_MCAST,        setifcap),
1147         DEF_CMD("-wol_mcast",   -IFCAP_WOL_MCAST,       setifcap),
1148         DEF_CMD("wol_magic",    IFCAP_WOL_MAGIC,        setifcap),
1149         DEF_CMD("-wol_magic",   -IFCAP_WOL_MAGIC,       setifcap),
1150         DEF_CMD("normal",       -IFF_LINK0,     setifflags),
1151         DEF_CMD("compress",     IFF_LINK0,      setifflags),
1152         DEF_CMD("noicmp",       IFF_LINK1,      setifflags),
1153         DEF_CMD_ARG("mtu",                      setifmtu),
1154         DEF_CMD_ARG("name",                     setifname),
1155 };
1156
1157 static __constructor void
1158 ifconfig_ctor(void)
1159 {
1160 #define N(a)    (sizeof(a) / sizeof(a[0]))
1161         size_t i;
1162
1163         for (i = 0; i < N(basic_cmds);  i++)
1164                 cmd_register(&basic_cmds[i]);
1165 #undef N
1166 }