Patch from David McCullough <davidm@snapgear.com>
[oweals/busybox.git] / libbb / interface.c
1 /*
2  * stolen from net-tools-1.59 and stripped down for busybox by 
3  *                      Erik Andersen <andersee@debian.org>
4  *
5  * Heavily modified by Manuel Novoa III       Mar 12, 2001
6  *
7  * Pruned unused code using KEEP_UNUSED define.
8  * Added print_bytes_scaled function to reduce code size.
9  * Added some (potentially) missing defines.
10  * Improved display support for -a and for a named interface.
11  *
12  * -----------------------------------------------------------
13  *
14  * ifconfig   This file contains an implementation of the command
15  *              that either displays or sets the characteristics of
16  *              one or more of the system's networking interfaces.
17  *
18  * Version:     $Id: interface.c,v 1.10 2002/09/17 06:36:02 andersen Exp $
19  *
20  * Author:      Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org>
21  *              and others.  Copyright 1993 MicroWalt Corporation
22  *
23  *              This program is free software; you can redistribute it
24  *              and/or  modify it under  the terms of  the GNU General
25  *              Public  License as  published  by  the  Free  Software
26  *              Foundation;  either  version 2 of the License, or  (at
27  *              your option) any later version.
28  *
29  * Patched to support 'add' and 'del' keywords for INET(4) addresses
30  * by Mrs. Brisby <mrs.brisby@nimh.org>
31  *
32  * {1.34} - 19980630 - Arnaldo Carvalho de Melo <acme@conectiva.com.br>
33  *                     - gettext instead of catgets for i18n
34  *          10/1998  - Andi Kleen. Use interface list primitives.       
35  *          20001008 - Bernd Eckenfels, Patch from RH for setting mtu 
36  *                      (default AF was wrong)
37  */
38
39 /* #define KEEP_UNUSED */
40
41 /* 
42  * 
43  * Protocol Families.
44  * 
45  */
46 #define HAVE_AFINET 1
47 #undef HAVE_AFINET6
48 #undef HAVE_AFIPX
49 #undef HAVE_AFATALK
50 #undef HAVE_AFNETROM
51 #undef HAVE_AFX25
52 #undef HAVE_AFECONET
53 #undef HAVE_AFASH
54
55 #if CONFIG_FEATURE_IPV6
56 #define HAVE_AFINET6 1
57 #endif
58
59 /* 
60  * 
61  * Device Hardware types.
62  * 
63  */
64 #define HAVE_HWETHER    1
65 #define HAVE_HWPPP      1
66 #undef HAVE_HWSLIP
67
68
69 #include "inet_common.h"
70 #include <stdio.h>
71 #include <errno.h>
72 #include <stdlib.h>
73 #include <string.h>
74 #include <unistd.h>
75 #include <fcntl.h>
76 #include <ctype.h>
77 #include <sys/ioctl.h>
78 #include <net/if.h>
79 #include <net/if_arp.h>
80 #include "libbb.h"
81
82 #define _(x) x
83 #define _PATH_PROCNET_DEV               "/proc/net/dev"
84 #define _PATH_PROCNET_IFINET6           "/proc/net/if_inet6"
85 #define new(p) ((p) = xcalloc(1,sizeof(*(p))))
86 #define KRELEASE(maj,min,patch) ((maj) * 65536 + (min)*256 + (patch))
87
88 static int procnetdev_vsn = 1;
89
90 /* Ugh.  But libc5 doesn't provide POSIX types.  */
91 #include <asm/types.h>
92
93
94 #ifdef HAVE_HWSLIP
95 #include <linux/if_slip.h>
96 #endif
97
98 #if HAVE_AFINET6
99
100 #ifndef _LINUX_IN6_H
101 /*
102  *    This is in linux/include/net/ipv6.h.
103  */
104
105 struct in6_ifreq {
106         struct in6_addr ifr6_addr;
107         __u32 ifr6_prefixlen;
108         unsigned int ifr6_ifindex;
109 };
110
111 #endif
112
113 #endif                                                  /* HAVE_AFINET6 */
114
115 #if HAVE_AFIPX
116 #if (__GLIBC__ >= 2) && (__GLIBC_MINOR__ >= 1)
117 #include <netipx/ipx.h>
118 #else
119 #include "ipx.h"
120 #endif
121 #endif
122
123 /* Defines for glibc2.0 users. */
124 #ifndef SIOCSIFTXQLEN
125 #define SIOCSIFTXQLEN      0x8943
126 #define SIOCGIFTXQLEN      0x8942
127 #endif
128
129 /* ifr_qlen is ifru_ivalue, but it isn't present in 2.0 kernel headers */
130 #ifndef ifr_qlen
131 #define ifr_qlen        ifr_ifru.ifru_mtu
132 #endif
133
134 #ifndef HAVE_TXQUEUELEN
135 #define HAVE_TXQUEUELEN 1
136 #endif
137
138 #ifndef IFF_DYNAMIC
139 #define IFF_DYNAMIC     0x8000  /* dialup device with changing addresses */
140 #endif
141
142 /* This structure defines protocol families and their handlers. */
143 struct aftype {
144         const char *name;
145         const char *title;
146         int af;
147         int alen;
148         char *(*print) (unsigned char *);
149         char *(*sprint) (struct sockaddr *, int numeric);
150         int (*input) (int type, char *bufp, struct sockaddr *);
151         void (*herror) (char *text);
152         int (*rprint) (int options);
153         int (*rinput) (int typ, int ext, char **argv);
154
155         /* may modify src */
156         int (*getmask) (char *src, struct sockaddr * mask, char *name);
157
158         int fd;
159         char *flag_file;
160 };
161
162 #ifdef KEEP_UNUSED
163
164 static int flag_unx;
165
166 #ifdef HAVE_AFIPX
167 static int flag_ipx;
168 #endif
169 #ifdef HAVE_AFX25
170 static int flag_ax25;
171 #endif
172 #ifdef HAVE_AFATALK
173 static int flag_ddp;
174 #endif
175 #ifdef HAVE_AFNETROM
176 static int flag_netrom;
177 #endif
178 static int flag_inet;
179
180 #ifdef HAVE_AFINET6
181 static int flag_inet6;
182 #endif
183 #ifdef HAVE_AFECONET
184 static int flag_econet;
185 #endif
186 #ifdef HAVE_AFX25
187 static int flag_x25 = 0;
188 #endif
189 #ifdef HAVE_AFASH
190 static int flag_ash;
191 #endif
192
193
194 static struct aftrans_t {
195         char *alias;
196         char *name;
197         int *flag;
198 } aftrans[] = {
199
200 #ifdef HAVE_AFX25
201         {
202         "ax25", "ax25", &flag_ax25},
203 #endif
204         {
205         "ip", "inet", &flag_inet},
206 #ifdef HAVE_AFINET6
207         {
208         "ip6", "inet6", &flag_inet6},
209 #endif
210 #ifdef HAVE_AFIPX
211         {
212         "ipx", "ipx", &flag_ipx},
213 #endif
214 #ifdef HAVE_AFATALK
215         {
216         "appletalk", "ddp", &flag_ddp},
217 #endif
218 #ifdef HAVE_AFNETROM
219         {
220         "netrom", "netrom", &flag_netrom},
221 #endif
222         {
223         "inet", "inet", &flag_inet},
224 #ifdef HAVE_AFINET6
225         {
226         "inet6", "inet6", &flag_inet6},
227 #endif
228 #ifdef HAVE_AFATALK
229         {
230         "ddp", "ddp", &flag_ddp},
231 #endif
232         {
233         "unix", "unix", &flag_unx}, {
234         "tcpip", "inet", &flag_inet},
235 #ifdef HAVE_AFECONET
236         {
237         "econet", "ec", &flag_econet},
238 #endif
239 #ifdef HAVE_AFX25
240         {
241         "x25", "x25", &flag_x25},
242 #endif
243 #ifdef HAVE_AFASH
244         {
245         "ash", "ash", &flag_ash},
246 #endif
247         {
248         0, 0, 0}
249 };
250
251 static char afname[256] = "";
252 #endif                                                  /* KEEP_UNUSED */
253
254 #if HAVE_AFUNIX
255
256 /* Display a UNIX domain address. */
257 static char *UNIX_print(unsigned char *ptr)
258 {
259         return (ptr);
260 }
261
262
263 /* Display a UNIX domain address. */
264 static char *UNIX_sprint(struct sockaddr *sap, int numeric)
265 {
266         static char buf[64];
267
268         if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
269                 return safe_strncpy(buf, _("[NONE SET]"), sizeof(buf));
270         return (UNIX_print(sap->sa_data));
271 }
272
273
274 static struct aftype unix_aftype = {
275         "unix", "UNIX Domain", AF_UNIX, 0,
276         UNIX_print, UNIX_sprint, NULL, NULL,
277         NULL, NULL, NULL,
278         -1,
279         "/proc/net/unix"
280 };
281 #endif                                                  /* HAVE_AFUNIX */
282
283 #if HAVE_AFINET
284
285 #ifdef KEEP_UNUSED
286 static void INET_reserror(char *text)
287 {
288         herror(text);
289 }
290
291 /* Display an Internet socket address. */
292 static char *INET_print(unsigned char *ptr)
293 {
294         return (inet_ntoa((*(struct in_addr *) ptr)));
295 }
296 #endif                                                  /* KEEP_UNUSED */
297
298 /* Display an Internet socket address. */
299 static char *INET_sprint(struct sockaddr *sap, int numeric)
300 {
301         static char buff[128];
302
303         if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
304                 return safe_strncpy(buff, _("[NONE SET]"), sizeof(buff));
305
306         if (INET_rresolve(buff, sizeof(buff), (struct sockaddr_in *) sap,
307                                           numeric, 0xffffff00) != 0)
308                 return (NULL);
309
310         return (buff);
311 }
312
313 #ifdef KEEP_UNUSED
314 static char *INET_sprintmask(struct sockaddr *sap, int numeric,
315                                                          unsigned int netmask)
316 {
317         static char buff[128];
318
319         if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
320                 return safe_strncpy(buff, _("[NONE SET]"), sizeof(buff));
321         if (INET_rresolve(buff, sizeof(buff), (struct sockaddr_in *) sap,
322                                           numeric, netmask) != 0)
323                 return (NULL);
324         return (buff);
325 }
326
327 static int INET_getsock(char *bufp, struct sockaddr *sap)
328 {
329         char *sp = bufp, *bp;
330         unsigned int i;
331         unsigned val;
332         struct sockaddr_in *sin;
333
334         sin = (struct sockaddr_in *) sap;
335         sin->sin_family = AF_INET;
336         sin->sin_port = 0;
337
338         val = 0;
339         bp = (char *) &val;
340         for (i = 0; i < sizeof(sin->sin_addr.s_addr); i++) {
341                 *sp = toupper(*sp);
342
343                 if ((*sp >= 'A') && (*sp <= 'F'))
344                         bp[i] |= (int) (*sp - 'A') + 10;
345                 else if ((*sp >= '0') && (*sp <= '9'))
346                         bp[i] |= (int) (*sp - '0');
347                 else
348                         return (-1);
349
350                 bp[i] <<= 4;
351                 sp++;
352                 *sp = toupper(*sp);
353
354                 if ((*sp >= 'A') && (*sp <= 'F'))
355                         bp[i] |= (int) (*sp - 'A') + 10;
356                 else if ((*sp >= '0') && (*sp <= '9'))
357                         bp[i] |= (int) (*sp - '0');
358                 else
359                         return (-1);
360
361                 sp++;
362         }
363         sin->sin_addr.s_addr = htonl(val);
364
365         return (sp - bufp);
366 }
367
368 static int INET_input(int type, char *bufp, struct sockaddr *sap)
369 {
370         switch (type) {
371         case 1:
372                 return (INET_getsock(bufp, sap));
373         case 256:
374                 return (INET_resolve(bufp, (struct sockaddr_in *) sap, 1));
375         default:
376                 return (INET_resolve(bufp, (struct sockaddr_in *) sap, 0));
377         }
378 }
379
380 static int INET_getnetmask(char *adr, struct sockaddr *m, char *name)
381 {
382         struct sockaddr_in *mask = (struct sockaddr_in *) m;
383         char *slash, *end;
384         int prefix;
385
386         if ((slash = strchr(adr, '/')) == NULL)
387                 return 0;
388
389         *slash++ = '\0';
390         prefix = strtoul(slash, &end, 0);
391         if (*end != '\0')
392                 return -1;
393
394         if (name) {
395                 sprintf(name, "/%d", prefix);
396         }
397         mask->sin_family = AF_INET;
398         mask->sin_addr.s_addr = htonl(~(0xffffffffU >> prefix));
399         return 1;
400 }
401 #endif                                                  /* KEEP_UNUSED */
402
403 static struct aftype inet_aftype = {
404         "inet", "DARPA Internet", AF_INET, sizeof(unsigned long),
405         NULL /* UNUSED INET_print */ , INET_sprint,
406         NULL /* UNUSED INET_input */ , NULL /* UNUSED INET_reserror */ ,
407         NULL /*INET_rprint */ , NULL /*INET_rinput */ ,
408         NULL /* UNUSED INET_getnetmask */ ,
409         -1,
410         NULL
411 };
412
413 #endif                                                  /* HAVE_AFINET */
414
415 #if HAVE_AFINET6
416
417 #ifdef KEEP_UNUSED
418 static void INET6_reserror(char *text)
419 {
420         herror(text);
421 }
422
423 /* Display an Internet socket address. */
424 static char *INET6_print(unsigned char *ptr)
425 {
426         static char name[80];
427
428         inet_ntop(AF_INET6, (struct in6_addr *) ptr, name, 80);
429         return name;
430 }
431 #endif                                                  /* KEEP_UNUSED */
432
433 /* Display an Internet socket address. */
434 /* dirty! struct sockaddr usually doesn't suffer for inet6 addresses, fst. */
435 static char *INET6_sprint(struct sockaddr *sap, int numeric)
436 {
437         static char buff[128];
438
439         if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
440                 return safe_strncpy(buff, _("[NONE SET]"), sizeof(buff));
441         if (INET6_rresolve
442                 (buff, sizeof(buff), (struct sockaddr_in6 *) sap, numeric) != 0)
443                 return safe_strncpy(buff, _("[UNKNOWN]"), sizeof(buff));
444         return (buff);
445 }
446
447 #ifdef KEEP_UNUSED
448 static int INET6_getsock(char *bufp, struct sockaddr *sap)
449 {
450         struct sockaddr_in6 *sin6;
451
452         sin6 = (struct sockaddr_in6 *) sap;
453         sin6->sin6_family = AF_INET6;
454         sin6->sin6_port = 0;
455
456         if (inet_pton(AF_INET6, bufp, sin6->sin6_addr.s6_addr) <= 0)
457                 return (-1);
458
459         return 16;                      /* ?;) */
460 }
461
462 static int INET6_input(int type, char *bufp, struct sockaddr *sap)
463 {
464         switch (type) {
465         case 1:
466                 return (INET6_getsock(bufp, sap));
467         default:
468                 return (INET6_resolve(bufp, (struct sockaddr_in6 *) sap));
469         }
470 }
471 #endif                                                  /* KEEP_UNUSED */
472
473 static struct aftype inet6_aftype = {
474         "inet6", "IPv6", AF_INET6, sizeof(struct in6_addr),
475         NULL /* UNUSED INET6_print */ , INET6_sprint,
476         NULL /* UNUSED INET6_input */ , NULL /* UNUSED INET6_reserror */ ,
477         NULL /*INET6_rprint */ , NULL /*INET6_rinput */ ,
478         NULL /* UNUSED INET6_getnetmask */ ,
479         -1,
480         NULL
481 };
482
483 #endif                                                  /* HAVE_AFINET6 */
484
485 /* Display an UNSPEC address. */
486 static char *UNSPEC_print(unsigned char *ptr)
487 {
488         static char buff[sizeof(struct sockaddr) * 3 + 1];
489         char *pos;
490         unsigned int i;
491
492         pos = buff;
493         for (i = 0; i < sizeof(struct sockaddr); i++) {
494                 /* careful -- not every libc's sprintf returns # bytes written */
495                 sprintf(pos, "%02X-", (*ptr++ & 0377));
496                 pos += 3;
497         }
498         /* Erase trailing "-".  Works as long as sizeof(struct sockaddr) != 0 */
499         *--pos = '\0';
500         return (buff);
501 }
502
503 /* Display an UNSPEC socket address. */
504 static char *UNSPEC_sprint(struct sockaddr *sap, int numeric)
505 {
506         static char buf[64];
507
508         if (sap->sa_family == 0xFFFF || sap->sa_family == 0)
509                 return safe_strncpy(buf, _("[NONE SET]"), sizeof(buf));
510         return (UNSPEC_print(sap->sa_data));
511 }
512
513 static struct aftype unspec_aftype = {
514         "unspec", "UNSPEC", AF_UNSPEC, 0,
515         UNSPEC_print, UNSPEC_sprint, NULL, NULL,
516         NULL,
517 };
518
519 static struct aftype *aftypes[] = {
520 #if HAVE_AFUNIX
521         &unix_aftype,
522 #endif
523 #if HAVE_AFINET
524         &inet_aftype,
525 #endif
526 #if HAVE_AFINET6
527         &inet6_aftype,
528 #endif
529 #if HAVE_AFAX25
530         &ax25_aftype,
531 #endif
532 #if HAVE_AFNETROM
533         &netrom_aftype,
534 #endif
535 #if HAVE_AFROSE
536         &rose_aftype,
537 #endif
538 #if HAVE_AFIPX
539         &ipx_aftype,
540 #endif
541 #if HAVE_AFATALK
542         &ddp_aftype,
543 #endif
544 #if HAVE_AFECONET
545         &ec_aftype,
546 #endif
547 #if HAVE_AFASH
548         &ash_aftype,
549 #endif
550 #if HAVE_AFX25
551         &x25_aftype,
552 #endif
553         &unspec_aftype,
554         NULL
555 };
556
557 #ifdef KEEP_UNUSED
558 static short sVafinit = 0;
559
560 static void afinit()
561 {
562         unspec_aftype.title = _("UNSPEC");
563 #if HAVE_AFUNIX
564         unix_aftype.title = _("UNIX Domain");
565 #endif
566 #if HAVE_AFINET
567         inet_aftype.title = _("DARPA Internet");
568 #endif
569 #if HAVE_AFINET6
570         inet6_aftype.title = _("IPv6");
571 #endif
572 #if HAVE_AFAX25
573         ax25_aftype.title = _("AMPR AX.25");
574 #endif
575 #if HAVE_AFNETROM
576         netrom_aftype.title = _("AMPR NET/ROM");
577 #endif
578 #if HAVE_AFIPX
579         ipx_aftype.title = _("Novell IPX");
580 #endif
581 #if HAVE_AFATALK
582         ddp_aftype.title = _("Appletalk DDP");
583 #endif
584 #if HAVE_AFECONET
585         ec_aftype.title = _("Econet");
586 #endif
587 #if HAVE_AFX25
588         x25_aftype.title = _("CCITT X.25");
589 #endif
590 #if HAVE_AFROSE
591         rose_aftype.title = _("AMPR ROSE");
592 #endif
593 #if HAVE_AFASH
594         ash_aftype.title = _("Ash");
595 #endif
596         sVafinit = 1;
597 }
598
599 static int aftrans_opt(const char *arg)
600 {
601         struct aftrans_t *paft;
602         char *tmp1, *tmp2;
603         char buf[256];
604
605         safe_strncpy(buf, arg, sizeof(buf));
606
607         tmp1 = buf;
608
609         while (tmp1) {
610
611                 tmp2 = strchr(tmp1, ',');
612
613                 if (tmp2)
614                         *(tmp2++) = '\0';
615
616                 paft = aftrans;
617                 for (paft = aftrans; paft->alias; paft++) {
618                         if (strcmp(tmp1, paft->alias))
619                                 continue;
620                         if (strlen(paft->name) + strlen(afname) + 1 >= sizeof(afname)) {
621                                 fprintf(stderr, _("Too much address family arguments.\n"));
622                                 return (0);
623                         }
624                         if (paft->flag)
625                                 (*paft->flag)++;
626                         if (afname[0])
627                                 strcat(afname, ",");
628                         strcat(afname, paft->name);
629                         break;
630                 }
631                 if (!paft->alias) {
632                         fprintf(stderr, _("Unknown address family `%s'.\n"), tmp1);
633                         return (1);
634                 }
635                 tmp1 = tmp2;
636         }
637
638         return (0);
639 }
640
641 /* set the default AF list from the program name or a constant value    */
642 static void aftrans_def(char *tool, char *argv0, char *dflt)
643 {
644         char *tmp;
645         char *buf;
646
647         strcpy(afname, dflt);
648
649         if (!(tmp = strrchr(argv0, '/')))
650                 tmp = argv0;    /* no slash?! */
651         else
652                 tmp++;
653
654         if (!(buf = strdup(tmp)))
655                 return;
656
657         if (strlen(tool) >= strlen(tmp)) {
658                 free(buf);
659                 return;
660         }
661         tmp = buf + (strlen(tmp) - strlen(tool));
662
663         if (strcmp(tmp, tool) != 0) {
664                 free(buf);
665                 return;
666         }
667         *tmp = '\0';
668         if ((tmp = strchr(buf, '_')))
669                 *tmp = '\0';
670
671         afname[0] = '\0';
672         if (aftrans_opt(buf))
673                 strcpy(afname, buf);
674
675         free(buf);
676 }
677
678 /* Check our protocol family table for this family. */
679 static struct aftype *get_aftype(const char *name)
680 {
681         struct aftype **afp;
682
683 #ifdef KEEP_UNUSED
684         if (!sVafinit)
685                 afinit();
686 #endif                                                  /* KEEP_UNUSED */
687
688         afp = aftypes;
689         while (*afp != NULL) {
690                 if (!strcmp((*afp)->name, name))
691                         return (*afp);
692                 afp++;
693         }
694         if (strchr(name, ','))
695                 fprintf(stderr,
696                                 _("Please don't supply more than one address family.\n"));
697         return (NULL);
698 }
699 #endif                                                  /* KEEP_UNUSED */
700
701 /* Check our protocol family table for this family. */
702 static struct aftype *get_afntype(int af)
703 {
704         struct aftype **afp;
705
706 #ifdef KEEP_UNUSED
707         if (!sVafinit)
708                 afinit();
709 #endif                                                  /* KEEP_UNUSED */
710
711         afp = aftypes;
712         while (*afp != NULL) {
713                 if ((*afp)->af == af)
714                         return (*afp);
715                 afp++;
716         }
717         return (NULL);
718 }
719
720 /* Check our protocol family table for this family and return its socket */
721 static int get_socket_for_af(int af)
722 {
723         struct aftype **afp;
724
725 #ifdef KEEP_UNUSED
726         if (!sVafinit)
727                 afinit();
728 #endif                                                  /* KEEP_UNUSED */
729
730         afp = aftypes;
731         while (*afp != NULL) {
732                 if ((*afp)->af == af)
733                         return (*afp)->fd;
734                 afp++;
735         }
736         return -1;
737 }
738
739 #ifdef KEEP_UNUSED
740 /* type: 0=all, 1=getroute */
741 static void print_aflist(int type)
742 {
743         int count = 0;
744         char *txt;
745         struct aftype **afp;
746
747 #ifdef KEEP_UNUSED
748         if (!sVafinit)
749                 afinit();
750 #endif                                                  /* KEEP_UNUSED */
751
752         afp = aftypes;
753         while (*afp != NULL) {
754                 if ((type == 1 && ((*afp)->rprint == NULL)) || ((*afp)->af == 0)) {
755                         afp++;
756                         continue;
757                 }
758                 if ((count % 3) == 0)
759                         fprintf(stderr, count ? "\n    " : "    ");
760                 txt = (*afp)->name;
761                 if (!txt)
762                         txt = "..";
763                 fprintf(stderr, "%s (%s) ", txt, _((*afp)->title));
764                 count++;
765                 afp++;
766         }
767         fprintf(stderr, "\n");
768 }
769 #endif                                                  /* KEEP_UNUSED */
770
771 struct user_net_device_stats {
772         unsigned long long rx_packets;  /* total packets received       */
773         unsigned long long tx_packets;  /* total packets transmitted    */
774         unsigned long long rx_bytes;    /* total bytes received         */
775         unsigned long long tx_bytes;    /* total bytes transmitted      */
776         unsigned long rx_errors;        /* bad packets received         */
777         unsigned long tx_errors;        /* packet transmit problems     */
778         unsigned long rx_dropped;       /* no space in linux buffers    */
779         unsigned long tx_dropped;       /* no space available in linux  */
780         unsigned long rx_multicast;     /* multicast packets received   */
781         unsigned long rx_compressed;
782         unsigned long tx_compressed;
783         unsigned long collisions;
784
785         /* detailed rx_errors: */
786         unsigned long rx_length_errors;
787         unsigned long rx_over_errors;   /* receiver ring buff overflow  */
788         unsigned long rx_crc_errors;    /* recved pkt with crc error    */
789         unsigned long rx_frame_errors;  /* recv'd frame alignment error */
790         unsigned long rx_fifo_errors;   /* recv'r fifo overrun          */
791         unsigned long rx_missed_errors; /* receiver missed packet     */
792         /* detailed tx_errors */
793         unsigned long tx_aborted_errors;
794         unsigned long tx_carrier_errors;
795         unsigned long tx_fifo_errors;
796         unsigned long tx_heartbeat_errors;
797         unsigned long tx_window_errors;
798 };
799
800 struct interface {
801         struct interface *next, *prev;
802         char name[IFNAMSIZ];    /* interface name        */
803         short type;                     /* if type               */
804         short flags;            /* various flags         */
805         int metric;                     /* routing metric        */
806         int mtu;                        /* MTU value             */
807         int tx_queue_len;       /* transmit queue length */
808         struct ifmap map;       /* hardware setup        */
809         struct sockaddr addr;   /* IP address            */
810         struct sockaddr dstaddr;        /* P-P IP address        */
811         struct sockaddr broadaddr;      /* IP broadcast address  */
812         struct sockaddr netmask;        /* IP network mask       */
813         struct sockaddr ipxaddr_bb;     /* IPX network address   */
814         struct sockaddr ipxaddr_sn;     /* IPX network address   */
815         struct sockaddr ipxaddr_e3;     /* IPX network address   */
816         struct sockaddr ipxaddr_e2;     /* IPX network address   */
817         struct sockaddr ddpaddr;        /* Appletalk DDP address */
818         struct sockaddr ecaddr; /* Econet address        */
819         int has_ip;
820         int has_ipx_bb;
821         int has_ipx_sn;
822         int has_ipx_e3;
823         int has_ipx_e2;
824         int has_ax25;
825         int has_ddp;
826         int has_econet;
827         char hwaddr[32];        /* HW address            */
828         int statistics_valid;
829         struct user_net_device_stats stats;     /* statistics            */
830         int keepalive;          /* keepalive value for SLIP */
831         int outfill;            /* outfill value for SLIP */
832 };
833
834
835 int interface_opt_a = 0;        /* show all interfaces          */
836
837 #ifdef KEEP_UNUSED
838 static int opt_i = 0;   /* show the statistics          */
839 static int opt_v = 0;   /* debugging output flag        */
840
841 static int addr_family = 0;     /* currently selected AF        */
842 #endif                                                  /* KEEP_UNUSED */
843
844 static struct interface *int_list, *int_last;
845 static int skfd = -1;   /* generic raw socket desc.     */
846
847
848 static int sockets_open(int family)
849 {
850         struct aftype **aft;
851         int sfd = -1;
852         static int force = -1;
853
854         if (force < 0) {
855                 force = 0;
856                 if (get_kernel_revision() < KRELEASE(2, 1, 0))
857                         force = 1;
858                 if (access("/proc/net", R_OK))
859                         force = 1;
860         }
861         for (aft = aftypes; *aft; aft++) {
862                 struct aftype *af = *aft;
863                 int type = SOCK_DGRAM;
864
865                 if (af->af == AF_UNSPEC)
866                         continue;
867                 if (family && family != af->af)
868                         continue;
869                 if (af->fd != -1) {
870                         sfd = af->fd;
871                         continue;
872                 }
873                 /* Check some /proc file first to not stress kmod */
874                 if (!family && !force && af->flag_file) {
875                         if (access(af->flag_file, R_OK))
876                                 continue;
877                 }
878 #if HAVE_AFNETROM
879                 if (af->af == AF_NETROM)
880                         type = SOCK_SEQPACKET;
881 #endif
882 #if HAVE_AFX25
883                 if (af->af == AF_X25)
884                         type = SOCK_SEQPACKET;
885 #endif
886                 af->fd = socket(af->af, type, 0);
887                 if (af->fd >= 0)
888                         sfd = af->fd;
889         }
890         if (sfd < 0)
891                 fprintf(stderr, _("No usable address families found.\n"));
892         return sfd;
893 }
894
895 /* like strcmp(), but knows about numbers */
896 static int nstrcmp(const char *astr, const char *b)
897 {
898         const char *a = astr;
899
900         while (*a == *b) {
901                 if (*a == '\0')
902                         return 0;
903                 a++;
904                 b++;
905         }
906         if (isdigit(*a)) {
907                 if (!isdigit(*b))
908                         return -1;
909                 while (a > astr) {
910                         a--;
911                         if (!isdigit(*a)) {
912                                 a++;
913                                 break;
914                         }
915                         if (!isdigit(*b))
916                                 return -1;
917                         b--;
918                 }
919                 return atoi(a) > atoi(b) ? 1 : -1;
920         }
921         return *a - *b;
922 }
923
924 static struct interface *add_interface(char *name)
925 {
926         struct interface *ife, **nextp, *new;
927
928         for (ife = int_last; ife; ife = ife->prev) {
929                 int n = nstrcmp(ife->name, name);
930
931                 if (n == 0)
932                         return ife;
933                 if (n < 0)
934                         break;
935         }
936         new(new);
937         safe_strncpy(new->name, name, IFNAMSIZ);
938         nextp = ife ? &ife->next : &int_list;
939         new->prev = ife;
940         new->next = *nextp;
941         if (new->next)
942                 new->next->prev = new;
943         else
944                 int_last = new;
945         *nextp = new;
946         return new;
947 }
948
949
950 static int if_readconf(void)
951 {
952         int numreqs = 30;
953         struct ifconf ifc;
954         struct ifreq *ifr;
955         int n, err = -1;
956         int skfd2;
957
958         /* SIOCGIFCONF currently seems to only work properly on AF_INET sockets
959            (as of 2.1.128) */
960         skfd2 = get_socket_for_af(AF_INET);
961         if (skfd2 < 0) {
962                 fprintf(stderr, _("warning: no inet socket available: %s\n"),
963                                 strerror(errno));
964                 /* Try to soldier on with whatever socket we can get hold of.  */
965                 skfd2 = sockets_open(0);
966                 if (skfd2 < 0)
967                         return -1;
968         }
969
970         ifc.ifc_buf = NULL;
971         for (;;) {
972                 ifc.ifc_len = sizeof(struct ifreq) * numreqs;
973                 ifc.ifc_buf = xrealloc(ifc.ifc_buf, ifc.ifc_len);
974
975                 if (ioctl(skfd2, SIOCGIFCONF, &ifc) < 0) {
976                         perror("SIOCGIFCONF");
977                         goto out;
978                 }
979                 if (ifc.ifc_len == sizeof(struct ifreq) * numreqs) {
980                         /* assume it overflowed and try again */
981                         numreqs += 10;
982                         continue;
983                 }
984                 break;
985         }
986
987         ifr = ifc.ifc_req;
988         for (n = 0; n < ifc.ifc_len; n += sizeof(struct ifreq)) {
989                 add_interface(ifr->ifr_name);
990                 ifr++;
991         }
992         err = 0;
993
994   out:
995         free(ifc.ifc_buf);
996         return err;
997 }
998
999 static char *get_name(char *name, char *p)
1000 {
1001         while (isspace(*p))
1002                 p++;
1003         while (*p) {
1004                 if (isspace(*p))
1005                         break;
1006                 if (*p == ':') {        /* could be an alias */
1007                         char *dot = p, *dotname = name;
1008
1009                         *name++ = *p++;
1010                         while (isdigit(*p))
1011                                 *name++ = *p++;
1012                         if (*p != ':') {        /* it wasn't, backup */
1013                                 p = dot;
1014                                 name = dotname;
1015                         }
1016                         if (*p == '\0')
1017                                 return NULL;
1018                         p++;
1019                         break;
1020                 }
1021                 *name++ = *p++;
1022         }
1023         *name++ = '\0';
1024         return p;
1025 }
1026
1027 static int get_dev_fields(char *bp, struct interface *ife)
1028 {
1029         switch (procnetdev_vsn) {
1030         case 3:
1031                 sscanf(bp,
1032                            "%Lu %Lu %lu %lu %lu %lu %lu %lu %Lu %Lu %lu %lu %lu %lu %lu %lu",
1033                            &ife->stats.rx_bytes,
1034                            &ife->stats.rx_packets,
1035                            &ife->stats.rx_errors,
1036                            &ife->stats.rx_dropped,
1037                            &ife->stats.rx_fifo_errors,
1038                            &ife->stats.rx_frame_errors,
1039                            &ife->stats.rx_compressed,
1040                            &ife->stats.rx_multicast,
1041                            &ife->stats.tx_bytes,
1042                            &ife->stats.tx_packets,
1043                            &ife->stats.tx_errors,
1044                            &ife->stats.tx_dropped,
1045                            &ife->stats.tx_fifo_errors,
1046                            &ife->stats.collisions,
1047                            &ife->stats.tx_carrier_errors, &ife->stats.tx_compressed);
1048                 break;
1049         case 2:
1050                 sscanf(bp, "%Lu %Lu %lu %lu %lu %lu %Lu %Lu %lu %lu %lu %lu %lu",
1051                            &ife->stats.rx_bytes,
1052                            &ife->stats.rx_packets,
1053                            &ife->stats.rx_errors,
1054                            &ife->stats.rx_dropped,
1055                            &ife->stats.rx_fifo_errors,
1056                            &ife->stats.rx_frame_errors,
1057                            &ife->stats.tx_bytes,
1058                            &ife->stats.tx_packets,
1059                            &ife->stats.tx_errors,
1060                            &ife->stats.tx_dropped,
1061                            &ife->stats.tx_fifo_errors,
1062                            &ife->stats.collisions, &ife->stats.tx_carrier_errors);
1063                 ife->stats.rx_multicast = 0;
1064                 break;
1065         case 1:
1066                 sscanf(bp, "%Lu %lu %lu %lu %lu %Lu %lu %lu %lu %lu %lu",
1067                            &ife->stats.rx_packets,
1068                            &ife->stats.rx_errors,
1069                            &ife->stats.rx_dropped,
1070                            &ife->stats.rx_fifo_errors,
1071                            &ife->stats.rx_frame_errors,
1072                            &ife->stats.tx_packets,
1073                            &ife->stats.tx_errors,
1074                            &ife->stats.tx_dropped,
1075                            &ife->stats.tx_fifo_errors,
1076                            &ife->stats.collisions, &ife->stats.tx_carrier_errors);
1077                 ife->stats.rx_bytes = 0;
1078                 ife->stats.tx_bytes = 0;
1079                 ife->stats.rx_multicast = 0;
1080                 break;
1081         }
1082         return 0;
1083 }
1084
1085 static inline int procnetdev_version(char *buf)
1086 {
1087         if (strstr(buf, "compressed"))
1088                 return 3;
1089         if (strstr(buf, "bytes"))
1090                 return 2;
1091         return 1;
1092 }
1093
1094 static int if_readlist_proc(char *target)
1095 {
1096         static int proc_read;
1097         FILE *fh;
1098         char buf[512];
1099         struct interface *ife;
1100         int err;
1101
1102         if (proc_read)
1103                 return 0;
1104         if (!target)
1105                 proc_read = 1;
1106
1107         fh = fopen(_PATH_PROCNET_DEV, "r");
1108         if (!fh) {
1109                 fprintf(stderr, _("Warning: cannot open %s (%s). Limited output.\n"),
1110                                 _PATH_PROCNET_DEV, strerror(errno));
1111                 return if_readconf();
1112         }
1113         fgets(buf, sizeof buf, fh);     /* eat line */
1114         fgets(buf, sizeof buf, fh);
1115
1116 #if 0                                   /* pretty, but can't cope with missing fields */
1117         fmt = proc_gen_fmt(_PATH_PROCNET_DEV, 1, fh, "face", "",        /* parsed separately */
1118                                            "bytes", "%lu",
1119                                            "packets", "%lu",
1120                                            "errs", "%lu",
1121                                            "drop", "%lu",
1122                                            "fifo", "%lu",
1123                                            "frame", "%lu",
1124                                            "compressed", "%lu",
1125                                            "multicast", "%lu",
1126                                            "bytes", "%lu",
1127                                            "packets", "%lu",
1128                                            "errs", "%lu",
1129                                            "drop", "%lu",
1130                                            "fifo", "%lu",
1131                                            "colls", "%lu",
1132                                            "carrier", "%lu", "compressed", "%lu", NULL);
1133         if (!fmt)
1134                 return -1;
1135 #else
1136         procnetdev_vsn = procnetdev_version(buf);
1137 #endif
1138
1139         err = 0;
1140         while (fgets(buf, sizeof buf, fh)) {
1141                 char *s, name[IFNAMSIZ];
1142
1143                 s = get_name(name, buf);
1144                 ife = add_interface(name);
1145                 get_dev_fields(s, ife);
1146                 ife->statistics_valid = 1;
1147                 if (target && !strcmp(target, name))
1148                         break;
1149         }
1150         if (ferror(fh)) {
1151                 perror(_PATH_PROCNET_DEV);
1152                 err = -1;
1153                 proc_read = 0;
1154         }
1155 #if 0
1156         free(fmt);
1157 #endif
1158         fclose(fh);
1159         return err;
1160 }
1161
1162 static int if_readlist(void)
1163 {
1164         int err = if_readlist_proc(NULL);
1165
1166         if (!err)
1167                 err = if_readconf();
1168         return err;
1169 }
1170
1171 static int for_all_interfaces(int (*doit) (struct interface *, void *),
1172                                                           void *cookie)
1173 {
1174         struct interface *ife;
1175
1176         if (!int_list && (if_readlist() < 0))
1177                 return -1;
1178         for (ife = int_list; ife; ife = ife->next) {
1179                 int err = doit(ife, cookie);
1180
1181                 if (err)
1182                         return err;
1183         }
1184         return 0;
1185 }
1186
1187 /* Support for fetching an IPX address */
1188
1189 #if HAVE_AFIPX
1190 static int ipx_getaddr(int sock, int ft, struct ifreq *ifr)
1191 {
1192         ((struct sockaddr_ipx *) &ifr->ifr_addr)->sipx_type = ft;
1193         return ioctl(sock, SIOCGIFADDR, ifr);
1194 }
1195 #endif
1196
1197
1198 /* Fetch the interface configuration from the kernel. */
1199 static int if_fetch(struct interface *ife)
1200 {
1201         struct ifreq ifr;
1202         int fd;
1203         char *ifname = ife->name;
1204
1205         strcpy(ifr.ifr_name, ifname);
1206         if (ioctl(skfd, SIOCGIFFLAGS, &ifr) < 0)
1207                 return (-1);
1208         ife->flags = ifr.ifr_flags;
1209
1210         strcpy(ifr.ifr_name, ifname);
1211         if (ioctl(skfd, SIOCGIFHWADDR, &ifr) < 0)
1212                 memset(ife->hwaddr, 0, 32);
1213         else
1214                 memcpy(ife->hwaddr, ifr.ifr_hwaddr.sa_data, 8);
1215
1216         ife->type = ifr.ifr_hwaddr.sa_family;
1217
1218         strcpy(ifr.ifr_name, ifname);
1219         if (ioctl(skfd, SIOCGIFMETRIC, &ifr) < 0)
1220                 ife->metric = 0;
1221         else
1222                 ife->metric = ifr.ifr_metric;
1223
1224         strcpy(ifr.ifr_name, ifname);
1225         if (ioctl(skfd, SIOCGIFMTU, &ifr) < 0)
1226                 ife->mtu = 0;
1227         else
1228                 ife->mtu = ifr.ifr_mtu;
1229
1230 #ifdef HAVE_HWSLIP
1231         if (ife->type == ARPHRD_SLIP || ife->type == ARPHRD_CSLIP ||
1232                 ife->type == ARPHRD_SLIP6 || ife->type == ARPHRD_CSLIP6 ||
1233                 ife->type == ARPHRD_ADAPT) {
1234 #ifdef SIOCGOUTFILL
1235                 strcpy(ifr.ifr_name, ifname);
1236                 if (ioctl(skfd, SIOCGOUTFILL, &ifr) < 0)
1237                         ife->outfill = 0;
1238                 else
1239                         ife->outfill = (unsigned int) ifr.ifr_data;
1240 #endif
1241 #ifdef SIOCGKEEPALIVE
1242                 strcpy(ifr.ifr_name, ifname);
1243                 if (ioctl(skfd, SIOCGKEEPALIVE, &ifr) < 0)
1244                         ife->keepalive = 0;
1245                 else
1246                         ife->keepalive = (unsigned int) ifr.ifr_data;
1247 #endif
1248         }
1249 #endif
1250
1251         strcpy(ifr.ifr_name, ifname);
1252         if (ioctl(skfd, SIOCGIFMAP, &ifr) < 0)
1253                 memset(&ife->map, 0, sizeof(struct ifmap));
1254         else
1255                 memcpy(&ife->map, &ifr.ifr_map, sizeof(struct ifmap));
1256
1257         strcpy(ifr.ifr_name, ifname);
1258         if (ioctl(skfd, SIOCGIFMAP, &ifr) < 0)
1259                 memset(&ife->map, 0, sizeof(struct ifmap));
1260         else
1261                 ife->map = ifr.ifr_map;
1262
1263 #ifdef HAVE_TXQUEUELEN
1264         strcpy(ifr.ifr_name, ifname);
1265         if (ioctl(skfd, SIOCGIFTXQLEN, &ifr) < 0)
1266                 ife->tx_queue_len = -1; /* unknown value */
1267         else
1268                 ife->tx_queue_len = ifr.ifr_qlen;
1269 #else
1270         ife->tx_queue_len = -1; /* unknown value */
1271 #endif
1272
1273 #if HAVE_AFINET
1274         /* IPv4 address? */
1275         fd = get_socket_for_af(AF_INET);
1276         if (fd >= 0) {
1277                 strcpy(ifr.ifr_name, ifname);
1278                 ifr.ifr_addr.sa_family = AF_INET;
1279                 if (ioctl(fd, SIOCGIFADDR, &ifr) == 0) {
1280                         ife->has_ip = 1;
1281                         ife->addr = ifr.ifr_addr;
1282                         strcpy(ifr.ifr_name, ifname);
1283                         if (ioctl(fd, SIOCGIFDSTADDR, &ifr) < 0)
1284                                 memset(&ife->dstaddr, 0, sizeof(struct sockaddr));
1285                         else
1286                                 ife->dstaddr = ifr.ifr_dstaddr;
1287
1288                         strcpy(ifr.ifr_name, ifname);
1289                         if (ioctl(fd, SIOCGIFBRDADDR, &ifr) < 0)
1290                                 memset(&ife->broadaddr, 0, sizeof(struct sockaddr));
1291                         else
1292                                 ife->broadaddr = ifr.ifr_broadaddr;
1293
1294                         strcpy(ifr.ifr_name, ifname);
1295                         if (ioctl(fd, SIOCGIFNETMASK, &ifr) < 0)
1296                                 memset(&ife->netmask, 0, sizeof(struct sockaddr));
1297                         else
1298                                 ife->netmask = ifr.ifr_netmask;
1299                 } else
1300                         memset(&ife->addr, 0, sizeof(struct sockaddr));
1301         }
1302 #endif
1303
1304 #if HAVE_AFATALK
1305         /* DDP address maybe ? */
1306         fd = get_socket_for_af(AF_APPLETALK);
1307         if (fd >= 0) {
1308                 strcpy(ifr.ifr_name, ifname);
1309                 if (ioctl(fd, SIOCGIFADDR, &ifr) == 0) {
1310                         ife->ddpaddr = ifr.ifr_addr;
1311                         ife->has_ddp = 1;
1312                 }
1313         }
1314 #endif
1315
1316 #if HAVE_AFIPX
1317         /* Look for IPX addresses with all framing types */
1318         fd = get_socket_for_af(AF_IPX);
1319         if (fd >= 0) {
1320                 strcpy(ifr.ifr_name, ifname);
1321                 if (!ipx_getaddr(fd, IPX_FRAME_ETHERII, &ifr)) {
1322                         ife->has_ipx_bb = 1;
1323                         ife->ipxaddr_bb = ifr.ifr_addr;
1324                 }
1325                 strcpy(ifr.ifr_name, ifname);
1326                 if (!ipx_getaddr(fd, IPX_FRAME_SNAP, &ifr)) {
1327                         ife->has_ipx_sn = 1;
1328                         ife->ipxaddr_sn = ifr.ifr_addr;
1329                 }
1330                 strcpy(ifr.ifr_name, ifname);
1331                 if (!ipx_getaddr(fd, IPX_FRAME_8023, &ifr)) {
1332                         ife->has_ipx_e3 = 1;
1333                         ife->ipxaddr_e3 = ifr.ifr_addr;
1334                 }
1335                 strcpy(ifr.ifr_name, ifname);
1336                 if (!ipx_getaddr(fd, IPX_FRAME_8022, &ifr)) {
1337                         ife->has_ipx_e2 = 1;
1338                         ife->ipxaddr_e2 = ifr.ifr_addr;
1339                 }
1340         }
1341 #endif
1342
1343 #if HAVE_AFECONET
1344         /* Econet address maybe? */
1345         fd = get_socket_for_af(AF_ECONET);
1346         if (fd >= 0) {
1347                 strcpy(ifr.ifr_name, ifname);
1348                 if (ioctl(fd, SIOCGIFADDR, &ifr) == 0) {
1349                         ife->ecaddr = ifr.ifr_addr;
1350                         ife->has_econet = 1;
1351                 }
1352         }
1353 #endif
1354
1355         return 0;
1356 }
1357
1358
1359 static int do_if_fetch(struct interface *ife)
1360 {
1361         if (if_fetch(ife) < 0) {
1362                 char *errmsg;
1363
1364                 if (errno == ENODEV) {
1365                         /* Give better error message for this case. */
1366                         errmsg = _("Device not found");
1367                 } else {
1368                         errmsg = strerror(errno);
1369                 }
1370                 fprintf(stderr, _("%s: error fetching interface information: %s\n"),
1371                                 ife->name, errmsg);
1372                 return -1;
1373         }
1374         return 0;
1375 }
1376
1377 /* This structure defines hardware protocols and their handlers. */
1378 struct hwtype {
1379         const char *name;
1380         const char *title;
1381         int type;
1382         int alen;
1383         char *(*print) (unsigned char *);
1384         int (*input) (char *, struct sockaddr *);
1385         int (*activate) (int fd);
1386         int suppress_null_addr;
1387 };
1388
1389 static struct hwtype unspec_hwtype = {
1390         "unspec", "UNSPEC", -1, 0,
1391         UNSPEC_print, NULL, NULL
1392 };
1393
1394 static struct hwtype loop_hwtype = {
1395         "loop", "Local Loopback", ARPHRD_LOOPBACK, 0,
1396         NULL, NULL, NULL
1397 };
1398
1399 #if HAVE_HWETHER
1400 #include <net/if_arp.h>
1401 #include <linux/if_ether.h>
1402
1403 /* Display an Ethernet address in readable format. */
1404 static char *pr_ether(unsigned char *ptr)
1405 {
1406         static char buff[64];
1407
1408         snprintf(buff, sizeof(buff), "%02X:%02X:%02X:%02X:%02X:%02X",
1409                          (ptr[0] & 0377), (ptr[1] & 0377), (ptr[2] & 0377),
1410                          (ptr[3] & 0377), (ptr[4] & 0377), (ptr[5] & 0377)
1411                 );
1412         return (buff);
1413 }
1414
1415 #ifdef KEEP_UNUSED
1416 /* Input an Ethernet address and convert to binary. */
1417 static int in_ether(char *bufp, struct sockaddr *sap)
1418 {
1419         unsigned char *ptr;
1420         char c, *orig;
1421         int i;
1422         unsigned val;
1423
1424         sap->sa_family = ether_hwtype.type;
1425         ptr = sap->sa_data;
1426
1427         i = 0;
1428         orig = bufp;
1429         while ((*bufp != '\0') && (i < ETH_ALEN)) {
1430                 val = 0;
1431                 c = *bufp++;
1432                 if (isdigit(c))
1433                         val = c - '0';
1434                 else if (c >= 'a' && c <= 'f')
1435                         val = c - 'a' + 10;
1436                 else if (c >= 'A' && c <= 'F')
1437                         val = c - 'A' + 10;
1438                 else {
1439 #ifdef DEBUG
1440                         fprintf(stderr, _("in_ether(%s): invalid ether address!\n"),
1441                                         orig);
1442 #endif
1443                         errno = EINVAL;
1444                         return (-1);
1445                 }
1446                 val <<= 4;
1447                 c = *bufp;
1448                 if (isdigit(c))
1449                         val |= c - '0';
1450                 else if (c >= 'a' && c <= 'f')
1451                         val |= c - 'a' + 10;
1452                 else if (c >= 'A' && c <= 'F')
1453                         val |= c - 'A' + 10;
1454                 else if (c == ':' || c == 0)
1455                         val >>= 4;
1456                 else {
1457 #ifdef DEBUG
1458                         fprintf(stderr, _("in_ether(%s): invalid ether address!\n"),
1459                                         orig);
1460 #endif
1461                         errno = EINVAL;
1462                         return (-1);
1463                 }
1464                 if (c != 0)
1465                         bufp++;
1466                 *ptr++ = (unsigned char) (val & 0377);
1467                 i++;
1468
1469                 /* We might get a semicolon here - not required. */
1470                 if (*bufp == ':') {
1471                         if (i == ETH_ALEN) {
1472 #ifdef DEBUG
1473                                 fprintf(stderr, _("in_ether(%s): trailing : ignored!\n"),
1474                                                 orig)
1475 #endif
1476                                         ;       /* nothing */
1477                         }
1478                         bufp++;
1479                 }
1480         }
1481
1482         /* That's it.  Any trailing junk? */
1483         if ((i == ETH_ALEN) && (*bufp != '\0')) {
1484 #ifdef DEBUG
1485                 fprintf(stderr, _("in_ether(%s): trailing junk!\n"), orig);
1486                 errno = EINVAL;
1487                 return (-1);
1488 #endif
1489         }
1490 #ifdef DEBUG
1491         fprintf(stderr, "in_ether(%s): %s\n", orig, pr_ether(sap->sa_data));
1492 #endif
1493
1494         return (0);
1495 }
1496 #endif                                                  /* KEEP_UNUSED */
1497
1498
1499 static struct hwtype ether_hwtype = {
1500         "ether", "Ethernet", ARPHRD_ETHER, ETH_ALEN,
1501         pr_ether, NULL /* UNUSED in_ether */ , NULL
1502 };
1503
1504
1505 #endif                                                  /* HAVE_HWETHER */
1506
1507
1508 #if HAVE_HWPPP
1509
1510 #include <net/if_arp.h>
1511
1512 #ifdef KEEP_UNUSED
1513 /* Start the PPP encapsulation on the file descriptor. */
1514 static int do_ppp(int fd)
1515 {
1516         fprintf(stderr, _("You cannot start PPP with this program.\n"));
1517         return -1;
1518 }
1519 #endif                                                  /* KEEP_UNUSED */
1520
1521 static struct hwtype ppp_hwtype = {
1522         "ppp", "Point-Point Protocol", ARPHRD_PPP, 0,
1523         NULL, NULL, NULL /* UNUSED do_ppp */ , 0
1524 };
1525
1526
1527 #endif                                                  /* HAVE_PPP */
1528
1529 static struct hwtype *hwtypes[] = {
1530
1531         &loop_hwtype,
1532
1533 #if HAVE_HWSLIP
1534         &slip_hwtype,
1535         &cslip_hwtype,
1536         &slip6_hwtype,
1537         &cslip6_hwtype,
1538         &adaptive_hwtype,
1539 #endif
1540 #if HAVE_HWSTRIP
1541         &strip_hwtype,
1542 #endif
1543 #if HAVE_HWASH
1544         &ash_hwtype,
1545 #endif
1546 #if HAVE_HWETHER
1547         &ether_hwtype,
1548 #endif
1549 #if HAVE_HWTR
1550         &tr_hwtype,
1551 #ifdef ARPHRD_IEEE802_TR
1552         &tr_hwtype1,
1553 #endif
1554 #endif
1555 #if HAVE_HWAX25
1556         &ax25_hwtype,
1557 #endif
1558 #if HAVE_HWNETROM
1559         &netrom_hwtype,
1560 #endif
1561 #if HAVE_HWROSE
1562         &rose_hwtype,
1563 #endif
1564 #if HAVE_HWTUNNEL
1565         &tunnel_hwtype,
1566 #endif
1567 #if HAVE_HWPPP
1568         &ppp_hwtype,
1569 #endif
1570 #if HAVE_HWHDLCLAPB
1571         &hdlc_hwtype,
1572         &lapb_hwtype,
1573 #endif
1574 #if HAVE_HWARC
1575         &arcnet_hwtype,
1576 #endif
1577 #if HAVE_HWFR
1578         &dlci_hwtype,
1579         &frad_hwtype,
1580 #endif
1581 #if HAVE_HWSIT
1582         &sit_hwtype,
1583 #endif
1584 #if HAVE_HWFDDI
1585         &fddi_hwtype,
1586 #endif
1587 #if HAVE_HWHIPPI
1588         &hippi_hwtype,
1589 #endif
1590 #if HAVE_HWIRDA
1591         &irda_hwtype,
1592 #endif
1593 #if HAVE_HWEC
1594         &ec_hwtype,
1595 #endif
1596 #if HAVE_HWX25
1597         &x25_hwtype,
1598 #endif
1599         &unspec_hwtype,
1600         NULL
1601 };
1602
1603 #ifdef KEEP_UNUSED
1604 static short sVhwinit = 0;
1605
1606 static void hwinit()
1607 {
1608         loop_hwtype.title = _("Local Loopback");
1609         unspec_hwtype.title = _("UNSPEC");
1610 #if HAVE_HWSLIP
1611         slip_hwtype.title = _("Serial Line IP");
1612         cslip_hwtype.title = _("VJ Serial Line IP");
1613         slip6_hwtype.title = _("6-bit Serial Line IP");
1614         cslip6_hwtype.title = _("VJ 6-bit Serial Line IP");
1615         adaptive_hwtype.title = _("Adaptive Serial Line IP");
1616 #endif
1617 #if HAVE_HWETHER
1618         ether_hwtype.title = _("Ethernet");
1619 #endif
1620 #if HAVE_HWASH
1621         ash_hwtype.title = _("Ash");
1622 #endif
1623 #if HAVE_HWFDDI
1624         fddi_hwtype.title = _("Fiber Distributed Data Interface");
1625 #endif
1626 #if HAVE_HWHIPPI
1627         hippi_hwtype.title = _("HIPPI");
1628 #endif
1629 #if HAVE_HWAX25
1630         ax25_hwtype.title = _("AMPR AX.25");
1631 #endif
1632 #if HAVE_HWROSE
1633         rose_hwtype.title = _("AMPR ROSE");
1634 #endif
1635 #if HAVE_HWNETROM
1636         netrom_hwtype.title = _("AMPR NET/ROM");
1637 #endif
1638 #if HAVE_HWX25
1639         x25_hwtype.title = _("generic X.25");
1640 #endif
1641 #if HAVE_HWTUNNEL
1642         tunnel_hwtype.title = _("IPIP Tunnel");
1643 #endif
1644 #if HAVE_HWPPP
1645         ppp_hwtype.title = _("Point-to-Point Protocol");
1646 #endif
1647 #if HAVE_HWHDLCLAPB
1648         hdlc_hwtype.title = _("(Cisco)-HDLC");
1649         lapb_hwtype.title = _("LAPB");
1650 #endif
1651 #if HAVE_HWARC
1652         arcnet_hwtype.title = _("ARCnet");
1653 #endif
1654 #if HAVE_HWFR
1655         dlci_hwtype.title = _("Frame Relay DLCI");
1656         frad_hwtype.title = _("Frame Relay Access Device");
1657 #endif
1658 #if HAVE_HWSIT
1659         sit_hwtype.title = _("IPv6-in-IPv4");
1660 #endif
1661 #if HAVE_HWIRDA
1662         irda_hwtype.title = _("IrLAP");
1663 #endif
1664 #if HAVE_HWTR
1665         tr_hwtype.title = _("16/4 Mbps Token Ring");
1666 #ifdef ARPHRD_IEEE802_TR
1667         tr_hwtype1.title = _("16/4 Mbps Token Ring (New)");
1668 #endif
1669 #endif
1670 #if HAVE_HWEC
1671         ec_hwtype.title = _("Econet");
1672 #endif
1673         sVhwinit = 1;
1674 }
1675 #endif                                                  /* KEEP_UNUSED */
1676
1677 #ifdef IFF_PORTSEL
1678 static const char *if_port_text[][4] = {
1679         /* Keep in step with <linux/netdevice.h> */
1680         {"unknown", NULL, NULL, NULL},
1681         {"10base2", "bnc", "coax", NULL},
1682         {"10baseT", "utp", "tpe", NULL},
1683         {"AUI", "thick", "db15", NULL},
1684         {"100baseT", NULL, NULL, NULL},
1685         {"100baseTX", NULL, NULL, NULL},
1686         {"100baseFX", NULL, NULL, NULL},
1687         {NULL, NULL, NULL, NULL},
1688 };
1689 #endif
1690
1691 /* Check our hardware type table for this type. */
1692 static struct hwtype *get_hwntype(int type)
1693 {
1694         struct hwtype **hwp;
1695
1696 #ifdef KEEP_UNUSED
1697         if (!sVhwinit)
1698                 hwinit();
1699 #endif                                                  /* KEEP_UNUSED */
1700
1701         hwp = hwtypes;
1702         while (*hwp != NULL) {
1703                 if ((*hwp)->type == type)
1704                         return (*hwp);
1705                 hwp++;
1706         }
1707         return (NULL);
1708 }
1709
1710 /* return 1 if address is all zeros */
1711 static int hw_null_address(struct hwtype *hw, void *ap)
1712 {
1713         unsigned int i;
1714         unsigned char *address = (unsigned char *) ap;
1715
1716         for (i = 0; i < hw->alen; i++)
1717                 if (address[i])
1718                         return 0;
1719         return 1;
1720 }
1721
1722 static const char TRext[] = "\0\0k\0M";
1723
1724 static void print_bytes_scaled(unsigned long long ull, const char *end)
1725 {
1726         unsigned long long int_part;
1727         unsigned long frac_part;
1728         const char *ext;
1729         int i;
1730
1731         frac_part = 0;
1732         ext = TRext;
1733         int_part = ull;
1734         for (i = 0; i < 2; i++) {
1735                 if (int_part >= 1024) {
1736                         frac_part = ((int_part % 1024) * 10) / 1024;
1737                         int_part /= 1024;
1738                         ext += 2;       /* Kb, Mb */
1739                 }
1740         }
1741
1742         printf("X bytes:%Lu (%Lu.%lu %siB)%s", ull, int_part, frac_part, ext, end);
1743 }
1744
1745 static void ife_print(struct interface *ptr)
1746 {
1747         struct aftype *ap;
1748         struct hwtype *hw;
1749         int hf;
1750         int can_compress = 0;
1751
1752 #if HAVE_AFIPX
1753         static struct aftype *ipxtype = NULL;
1754 #endif
1755 #if HAVE_AFECONET
1756         static struct aftype *ectype = NULL;
1757 #endif
1758 #if HAVE_AFATALK
1759         static struct aftype *ddptype = NULL;
1760 #endif
1761 #if HAVE_AFINET6
1762         FILE *f;
1763         char addr6[40], devname[20];
1764         struct sockaddr_in6 sap;
1765         int plen, scope, dad_status, if_idx;
1766         char addr6p[8][5];
1767 #endif
1768
1769         ap = get_afntype(ptr->addr.sa_family);
1770         if (ap == NULL)
1771                 ap = get_afntype(0);
1772
1773         hf = ptr->type;
1774
1775         if (hf == ARPHRD_CSLIP || hf == ARPHRD_CSLIP6)
1776                 can_compress = 1;
1777
1778         hw = get_hwntype(hf);
1779         if (hw == NULL)
1780                 hw = get_hwntype(-1);
1781
1782         printf(_("%-9.9s Link encap:%s  "), ptr->name, _(hw->title));
1783         /* For some hardware types (eg Ash, ATM) we don't print the 
1784            hardware address if it's null.  */
1785         if (hw->print != NULL && (!(hw_null_address(hw, ptr->hwaddr) &&
1786                                                                 hw->suppress_null_addr)))
1787                 printf(_("HWaddr %s  "), hw->print(ptr->hwaddr));
1788 #ifdef IFF_PORTSEL
1789         if (ptr->flags & IFF_PORTSEL) {
1790                 printf(_("Media:%s"), if_port_text[ptr->map.port][0]);
1791                 if (ptr->flags & IFF_AUTOMEDIA)
1792                         printf(_("(auto)"));
1793         }
1794 #endif
1795         printf("\n");
1796
1797 #if HAVE_AFINET
1798         if (ptr->has_ip) {
1799                 printf(_("          %s addr:%s "), ap->name,
1800                            ap->sprint(&ptr->addr, 1));
1801                 if (ptr->flags & IFF_POINTOPOINT) {
1802                         printf(_(" P-t-P:%s "), ap->sprint(&ptr->dstaddr, 1));
1803                 }
1804                 if (ptr->flags & IFF_BROADCAST) {
1805                         printf(_(" Bcast:%s "), ap->sprint(&ptr->broadaddr, 1));
1806                 }
1807                 printf(_(" Mask:%s\n"), ap->sprint(&ptr->netmask, 1));
1808         }
1809 #endif
1810
1811 #if HAVE_AFINET6
1812
1813 #define IPV6_ADDR_ANY           0x0000U
1814
1815 #define IPV6_ADDR_UNICAST       0x0001U
1816 #define IPV6_ADDR_MULTICAST     0x0002U
1817 #define IPV6_ADDR_ANYCAST       0x0004U
1818
1819 #define IPV6_ADDR_LOOPBACK      0x0010U
1820 #define IPV6_ADDR_LINKLOCAL     0x0020U
1821 #define IPV6_ADDR_SITELOCAL     0x0040U
1822
1823 #define IPV6_ADDR_COMPATv4      0x0080U
1824
1825 #define IPV6_ADDR_SCOPE_MASK    0x00f0U
1826
1827 #define IPV6_ADDR_MAPPED        0x1000U
1828 #define IPV6_ADDR_RESERVED      0x2000U /* reserved address space */
1829
1830         if ((f = fopen(_PATH_PROCNET_IFINET6, "r")) != NULL) {
1831                 while (fscanf
1832                            (f, "%4s%4s%4s%4s%4s%4s%4s%4s %02x %02x %02x %02x %20s\n",
1833                                 addr6p[0], addr6p[1], addr6p[2], addr6p[3], addr6p[4],
1834                                 addr6p[5], addr6p[6], addr6p[7], &if_idx, &plen, &scope,
1835                                 &dad_status, devname) != EOF) {
1836                         if (!strcmp(devname, ptr->name)) {
1837                                 sprintf(addr6, "%s:%s:%s:%s:%s:%s:%s:%s",
1838                                                 addr6p[0], addr6p[1], addr6p[2], addr6p[3],
1839                                                 addr6p[4], addr6p[5], addr6p[6], addr6p[7]);
1840                                 inet_pton(AF_INET6, addr6,
1841                                                   (struct sockaddr *) &sap.sin6_addr);
1842                                 sap.sin6_family = AF_INET6;
1843                                 printf(_("          inet6 addr: %s/%d"),
1844                                            inet6_aftype.sprint((struct sockaddr *) &sap, 1),
1845                                            plen);
1846                                 printf(_(" Scope:"));
1847                                 switch (scope & IPV6_ADDR_SCOPE_MASK) {
1848                                 case 0:
1849                                         printf(_("Global"));
1850                                         break;
1851                                 case IPV6_ADDR_LINKLOCAL:
1852                                         printf(_("Link"));
1853                                         break;
1854                                 case IPV6_ADDR_SITELOCAL:
1855                                         printf(_("Site"));
1856                                         break;
1857                                 case IPV6_ADDR_COMPATv4:
1858                                         printf(_("Compat"));
1859                                         break;
1860                                 case IPV6_ADDR_LOOPBACK:
1861                                         printf(_("Host"));
1862                                         break;
1863                                 default:
1864                                         printf(_("Unknown"));
1865                                 }
1866                                 printf("\n");
1867                         }
1868                 }
1869                 fclose(f);
1870         }
1871 #endif
1872
1873 #if HAVE_AFIPX
1874         if (ipxtype == NULL)
1875                 ipxtype = get_afntype(AF_IPX);
1876
1877         if (ipxtype != NULL) {
1878                 if (ptr->has_ipx_bb)
1879                         printf(_("          IPX/Ethernet II addr:%s\n"),
1880                                    ipxtype->sprint(&ptr->ipxaddr_bb, 1));
1881                 if (ptr->has_ipx_sn)
1882                         printf(_("          IPX/Ethernet SNAP addr:%s\n"),
1883                                    ipxtype->sprint(&ptr->ipxaddr_sn, 1));
1884                 if (ptr->has_ipx_e2)
1885                         printf(_("          IPX/Ethernet 802.2 addr:%s\n"),
1886                                    ipxtype->sprint(&ptr->ipxaddr_e2, 1));
1887                 if (ptr->has_ipx_e3)
1888                         printf(_("          IPX/Ethernet 802.3 addr:%s\n"),
1889                                    ipxtype->sprint(&ptr->ipxaddr_e3, 1));
1890         }
1891 #endif
1892
1893 #if HAVE_AFATALK
1894         if (ddptype == NULL)
1895                 ddptype = get_afntype(AF_APPLETALK);
1896         if (ddptype != NULL) {
1897                 if (ptr->has_ddp)
1898                         printf(_("          EtherTalk Phase 2 addr:%s\n"),
1899                                    ddptype->sprint(&ptr->ddpaddr, 1));
1900         }
1901 #endif
1902
1903 #if HAVE_AFECONET
1904         if (ectype == NULL)
1905                 ectype = get_afntype(AF_ECONET);
1906         if (ectype != NULL) {
1907                 if (ptr->has_econet)
1908                         printf(_("          econet addr:%s\n"),
1909                                    ectype->sprint(&ptr->ecaddr, 1));
1910         }
1911 #endif
1912
1913         printf("          ");
1914         /* DONT FORGET TO ADD THE FLAGS IN ife_print_short, too */
1915         if (ptr->flags == 0)
1916                 printf(_("[NO FLAGS] "));
1917         if (ptr->flags & IFF_UP)
1918                 printf(_("UP "));
1919         if (ptr->flags & IFF_BROADCAST)
1920                 printf(_("BROADCAST "));
1921         if (ptr->flags & IFF_DEBUG)
1922                 printf(_("DEBUG "));
1923         if (ptr->flags & IFF_LOOPBACK)
1924                 printf(_("LOOPBACK "));
1925         if (ptr->flags & IFF_POINTOPOINT)
1926                 printf(_("POINTOPOINT "));
1927         if (ptr->flags & IFF_NOTRAILERS)
1928                 printf(_("NOTRAILERS "));
1929         if (ptr->flags & IFF_RUNNING)
1930                 printf(_("RUNNING "));
1931         if (ptr->flags & IFF_NOARP)
1932                 printf(_("NOARP "));
1933         if (ptr->flags & IFF_PROMISC)
1934                 printf(_("PROMISC "));
1935         if (ptr->flags & IFF_ALLMULTI)
1936                 printf(_("ALLMULTI "));
1937         if (ptr->flags & IFF_SLAVE)
1938                 printf(_("SLAVE "));
1939         if (ptr->flags & IFF_MASTER)
1940                 printf(_("MASTER "));
1941         if (ptr->flags & IFF_MULTICAST)
1942                 printf(_("MULTICAST "));
1943 #ifdef HAVE_DYNAMIC
1944         if (ptr->flags & IFF_DYNAMIC)
1945                 printf(_("DYNAMIC "));
1946 #endif
1947         /* DONT FORGET TO ADD THE FLAGS IN ife_print_short */
1948         printf(_(" MTU:%d  Metric:%d"), ptr->mtu, ptr->metric ? ptr->metric : 1);
1949 #ifdef SIOCSKEEPALIVE
1950         if (ptr->outfill || ptr->keepalive)
1951                 printf(_("  Outfill:%d  Keepalive:%d"), ptr->outfill, ptr->keepalive);
1952 #endif
1953         printf("\n");
1954
1955         /* If needed, display the interface statistics. */
1956
1957         if (ptr->statistics_valid) {
1958                 /* XXX: statistics are currently only printed for the primary address,
1959                  *      not for the aliases, although strictly speaking they're shared
1960                  *      by all addresses.
1961                  */
1962                 printf("          ");
1963
1964                 printf(_
1965                            ("RX packets:%Lu errors:%lu dropped:%lu overruns:%lu frame:%lu\n"),
1966                            ptr->stats.rx_packets, ptr->stats.rx_errors,
1967                            ptr->stats.rx_dropped, ptr->stats.rx_fifo_errors,
1968                            ptr->stats.rx_frame_errors);
1969                 if (can_compress)
1970                         printf(_("             compressed:%lu\n"),
1971                                    ptr->stats.rx_compressed);
1972                 printf("          ");
1973                 printf(_
1974                            ("TX packets:%Lu errors:%lu dropped:%lu overruns:%lu carrier:%lu\n"),
1975                            ptr->stats.tx_packets, ptr->stats.tx_errors,
1976                            ptr->stats.tx_dropped, ptr->stats.tx_fifo_errors,
1977                            ptr->stats.tx_carrier_errors);
1978                 printf(_("          collisions:%lu "), ptr->stats.collisions);
1979                 if (can_compress)
1980                         printf(_("compressed:%lu "), ptr->stats.tx_compressed);
1981                 if (ptr->tx_queue_len != -1)
1982                         printf(_("txqueuelen:%d "), ptr->tx_queue_len);
1983                 printf("\n          R");
1984                 print_bytes_scaled(ptr->stats.rx_bytes, "  T");
1985                 print_bytes_scaled(ptr->stats.tx_bytes, "\n");
1986
1987         }
1988
1989         if ((ptr->map.irq || ptr->map.mem_start || ptr->map.dma ||
1990                  ptr->map.base_addr)) {
1991                 printf("          ");
1992                 if (ptr->map.irq)
1993                         printf(_("Interrupt:%d "), ptr->map.irq);
1994                 if (ptr->map.base_addr >= 0x100)        /* Only print devices using it for 
1995                                                                                            I/O maps */
1996                         printf(_("Base address:0x%lx "),
1997                                    (unsigned long) ptr->map.base_addr);
1998                 if (ptr->map.mem_start) {
1999                         printf(_("Memory:%lx-%lx "), ptr->map.mem_start,
2000                                    ptr->map.mem_end);
2001                 }
2002                 if (ptr->map.dma)
2003                         printf(_("DMA chan:%x "), ptr->map.dma);
2004                 printf("\n");
2005         }
2006         printf("\n");
2007 }
2008
2009
2010 static int do_if_print(struct interface *ife, void *cookie)
2011 {
2012         int *opt_a = (int *) cookie;
2013         int res;
2014
2015         res = do_if_fetch(ife);
2016         if (res >= 0) {
2017                 if ((ife->flags & IFF_UP) || *opt_a)
2018                         ife_print(ife);
2019         }
2020         return res;
2021 }
2022
2023 static struct interface *lookup_interface(char *name)
2024 {
2025         struct interface *ife = NULL;
2026
2027         if (if_readlist_proc(name) < 0)
2028                 return NULL;
2029         ife = add_interface(name);
2030         return ife;
2031 }
2032
2033 /* for ipv4 add/del modes */
2034 static int if_print(char *ifname)
2035 {
2036         int res;
2037
2038         if (!ifname) {
2039                 res = for_all_interfaces(do_if_print, &interface_opt_a);
2040         } else {
2041                 struct interface *ife;
2042
2043                 ife = lookup_interface(ifname);
2044                 res = do_if_fetch(ife);
2045                 if (res >= 0)
2046                         ife_print(ife);
2047         }
2048         return res;
2049 }
2050
2051 int display_interfaces(char *ifname)
2052 {
2053         int status;
2054
2055         /* Create a channel to the NET kernel. */
2056         if ((skfd = sockets_open(0)) < 0) {
2057                 perror_msg_and_die("socket");
2058         }
2059
2060         /* Do we have to show the current setup? */
2061         status = if_print(ifname);
2062         close(skfd);
2063         exit(status < 0);
2064 }