networking/libiproute/iplink.c

   1 /*
   2  * iplink.c             "ip link".
   3  *
   4  *              This program is free software; you can redistribute it and/or
   5  *              modify it under the terms of the GNU General Public License
   6  *              as published by the Free Software Foundation; either version
   7  *              2 of the License, or (at your option) any later version.
   8  *
   9  * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
  10  *
  11  */
  12
  13 #include <sys/ioctl.h>
  14 #include <sys/socket.h>
  15 #include <linux/version.h>
  16
  17 #include <errno.h>
  18 #include <stdlib.h>
  19 #include <string.h>
  20 #include <unistd.h>
  21
  22 #include <net/if.h>
  23 #include <net/if_packet.h>
  24 #include <netpacket/packet.h>
  25
  26 #if __GLIBC__ >=2 && __GLIBC_MINOR >= 1
  27 #include <net/ethernet.h>
  28 #else
  29 #include <linux/if_ether.h>
  30 #endif
  31
  32 #include "rt_names.h"
  33 #include "utils.h"
  34 #include "ip_common.h"
  35
  36 #include "libbb.h"
  37
  38
  39 /* take from linux/sockios.h */
  40 #define SIOCSIFNAME     0x8923          /* set interface name */
  41
  42 static int do_link;
  43
  44 static int on_off(char *msg)
  45 {
  46         bb_error_msg("Error: argument of \"%s\" must be \"on\" or \"off\"", msg);
  47         return -1;
  48 }
  49
  50 static int get_ctl_fd(void)
  51 {
  52         int s_errno;
  53         int fd;
  54
  55         fd = socket(PF_INET, SOCK_DGRAM, 0);
  56         if (fd >= 0)
  57                 return fd;
  58         s_errno = errno;
  59         fd = socket(PF_PACKET, SOCK_DGRAM, 0);
  60         if (fd >= 0)
  61                 return fd;
  62         fd = socket(PF_INET6, SOCK_DGRAM, 0);
  63         if (fd >= 0)
  64                 return fd;
  65         errno = s_errno;
  66         perror("Cannot create control socket");
  67         return -1;
  68 }
  69
  70 static int do_chflags(char *dev, __u32 flags, __u32 mask)
  71 {
  72         struct ifreq ifr;
  73         int fd;
  74         int err;
  75
  76         strcpy(ifr.ifr_name, dev);
  77         fd = get_ctl_fd();
  78         if (fd < 0)
  79                 return -1;
  80         err = ioctl(fd, SIOCGIFFLAGS, &ifr);
  81         if (err) {
  82                 perror("SIOCGIFFLAGS");
  83                 close(fd);
  84                 return -1;
  85         }
  86         if ((ifr.ifr_flags^flags)&mask) {
  87                 ifr.ifr_flags &= ~mask;
  88                 ifr.ifr_flags |= mask&flags;
  89                 err = ioctl(fd, SIOCSIFFLAGS, &ifr);
  90                 if (err)
  91                         perror("SIOCSIFFLAGS");
  92         }
  93         close(fd);
  94         return err;
  95 }
  96
  97 static int do_changename(char *dev, char *newdev)
  98 {
  99 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2, 4, 0)
 100         struct ifreq ifr;
 101         int fd;
 102         int err;
 103
 104         strcpy(ifr.ifr_name, dev);
 105         strcpy(ifr.ifr_newname, newdev);
 106         fd = get_ctl_fd();
 107         if (fd < 0)
 108                 return -1;
 109         err = ioctl(fd, SIOCSIFNAME, &ifr);
 110         if (err) {
 111                 perror("SIOCSIFNAME");
 112                 close(fd);
 113                 return -1;
 114         }
 115         close(fd);
 116         return err;
 117 #endif
 118         return 0;
 119 }
 120
 121 static int set_qlen(char *dev, int qlen)
 122 {
 123         struct ifreq ifr;
 124         int s;
 125
 126         s = get_ctl_fd();
 127         if (s < 0)
 128                 return -1;
 129
 130         memset(&ifr, 0, sizeof(ifr));
 131         strcpy(ifr.ifr_name, dev);
 132         ifr.ifr_qlen = qlen;
 133         if (ioctl(s, SIOCSIFTXQLEN, &ifr) < 0) {
 134                 perror("SIOCSIFXQLEN");
 135                 close(s);
 136                 return -1;
 137         }
 138         close(s);
 139
 140         return 0;
 141 }
 142
 143 static int set_mtu(char *dev, int mtu)
 144 {
 145         struct ifreq ifr;
 146         int s;
 147
 148         s = get_ctl_fd();
 149         if (s < 0)
 150                 return -1;
 151
 152         memset(&ifr, 0, sizeof(ifr));
 153         strcpy(ifr.ifr_name, dev);
 154         ifr.ifr_mtu = mtu;
 155         if (ioctl(s, SIOCSIFMTU, &ifr) < 0) {
 156                 perror("SIOCSIFMTU");
 157                 close(s);
 158                 return -1;
 159         }
 160         close(s);
 161
 162         return 0;
 163 }
 164
 165 static int get_address(char *dev, int *htype)
 166 {
 167         struct ifreq ifr;
 168         struct sockaddr_ll me;
 169         int alen;
 170         int s;
 171
 172         s = socket(PF_PACKET, SOCK_DGRAM, 0);
 173         if (s < 0) {
 174                 perror("socket(PF_PACKET)");
 175                 return -1;
 176         }
 177
 178         memset(&ifr, 0, sizeof(ifr));
 179         strcpy(ifr.ifr_name, dev);
 180         if (ioctl(s, SIOCGIFINDEX, &ifr) < 0) {
 181                 perror("SIOCGIFINDEX");
 182                 close(s);
 183                 return -1;
 184         }
 185
 186         memset(&me, 0, sizeof(me));
 187         me.sll_family = AF_PACKET;
 188         me.sll_ifindex = ifr.ifr_ifindex;
 189         me.sll_protocol = htons(ETH_P_LOOP);
 190         if (bind(s, (struct sockaddr*)&me, sizeof(me)) == -1) {
 191                 perror("bind");
 192                 close(s);
 193                 return -1;
 194         }
 195
 196         alen = sizeof(me);
 197         if (getsockname(s, (struct sockaddr*)&me, &alen) == -1) {
 198                 perror("getsockname");
 199                 close(s);
 200                 return -1;
 201         }
 202         close(s);
 203         *htype = me.sll_hatype;
 204         return me.sll_halen;
 205 }
 206
 207 static int parse_address(char *dev, int hatype, int halen, char *lla, struct ifreq *ifr)
 208 {
 209         int alen;
 210
 211         memset(ifr, 0, sizeof(*ifr));
 212         strcpy(ifr->ifr_name, dev);
 213         ifr->ifr_hwaddr.sa_family = hatype;
 214         alen = ll_addr_a2n(ifr->ifr_hwaddr.sa_data, 14, lla);
 215         if (alen < 0)
 216                 return -1;
 217         if (alen != halen) {
 218                 bb_error_msg("Wrong address (%s) length: expected %d bytes", lla, halen);
 219                 return -1;
 220         }
 221         return 0;
 222 }
 223
 224 static int set_address(struct ifreq *ifr, int brd)
 225 {
 226         int s;
 227
 228         s = get_ctl_fd();
 229         if (s < 0)
 230                 return -1;
 231         if (ioctl(s, brd?SIOCSIFHWBROADCAST:SIOCSIFHWADDR, ifr) < 0) {
 232                 perror(brd?"SIOCSIFHWBROADCAST":"SIOCSIFHWADDR");
 233                 close(s);
 234                 return -1;
 235         }
 236         close(s);
 237         return 0;
 238 }
 239
 240
 241 static int do_set(int argc, char **argv)
 242 {
 243         char *dev = NULL;
 244         __u32 mask = 0;
 245         __u32 flags = 0;
 246         int qlen = -1;
 247         int mtu = -1;
 248         char *newaddr = NULL;
 249         char *newbrd = NULL;
 250         struct ifreq ifr0, ifr1;
 251         char *newname = NULL;
 252         int htype, halen;
 253
 254         while (argc > 0) {
 255                 if (strcmp(*argv, "up") == 0) {
 256                         mask |= IFF_UP;
 257                         flags |= IFF_UP;
 258                 } else if (strcmp(*argv, "down") == 0) {
 259                         mask |= IFF_UP;
 260                         flags &= ~IFF_UP;
 261                 } else if (strcmp(*argv, "name") == 0) {
 262                         NEXT_ARG();
 263                         newname = *argv;
 264                 } else if (strcmp(*argv, "mtu") == 0) {
 265                         NEXT_ARG();
 266                         if (mtu != -1)
 267                                 duparg("mtu", *argv);
 268                         if (get_integer(&mtu, *argv, 0))
 269                                 invarg("Invalid \"mtu\" value\n", *argv);
 270                 } else if (strcmp(*argv, "multicast") == 0) {
 271                         NEXT_ARG();
 272                         mask |= IFF_MULTICAST;
 273                         if (strcmp(*argv, "on") == 0) {
 274                                 flags |= IFF_MULTICAST;
 275                         } else if (strcmp(*argv, "off") == 0) {
 276                                 flags &= ~IFF_MULTICAST;
 277                         } else
 278                                 return on_off("multicast");
 279                 } else if (strcmp(*argv, "arp") == 0) {
 280                         NEXT_ARG();
 281                         mask |= IFF_NOARP;
 282                         if (strcmp(*argv, "on") == 0) {
 283                                 flags &= ~IFF_NOARP;
 284                         } else if (strcmp(*argv, "off") == 0) {
 285                                 flags |= IFF_NOARP;
 286                         } else
 287                                 return on_off("noarp");
 288                 } else {
 289                         if (strcmp(*argv, "dev") == 0) {
 290                                 NEXT_ARG();
 291                         }
 292                         if (dev)
 293                                 duparg2("dev", *argv);
 294                         dev = *argv;
 295                 }
 296                 argc--; argv++;
 297         }
 298
 299         if (!dev) {
 300                 bb_error_msg("Not enough of information: \"dev\" argument is required.");
 301                 exit(-1);
 302         }
 303
 304         if (newaddr || newbrd) {
 305                 halen = get_address(dev, &htype);
 306                 if (halen < 0)
 307                         return -1;
 308                 if (newaddr) {
 309                         if (parse_address(dev, htype, halen, newaddr, &ifr0) < 0)
 310                                 return -1;
 311                 }
 312                 if (newbrd) {
 313                         if (parse_address(dev, htype, halen, newbrd, &ifr1) < 0)
 314                                 return -1;
 315                 }
 316         }
 317
 318         if (newname && strcmp(dev, newname)) {
 319                 if (do_changename(dev, newname) < 0)
 320                         return -1;
 321                 dev = newname;
 322         }
 323         if (qlen != -1) {
 324                 if (set_qlen(dev, qlen) < 0)
 325                         return -1;
 326         }
 327         if (mtu != -1) {
 328                 if (set_mtu(dev, mtu) < 0)
 329                         return -1;
 330         }
 331         if (newaddr || newbrd) {
 332                 if (newbrd) {
 333                         if (set_address(&ifr1, 1) < 0)
 334                                 return -1;
 335                 }
 336                 if (newaddr) {
 337                         if (set_address(&ifr0, 0) < 0)
 338                                 return -1;
 339                 }
 340         }
 341         if (mask)
 342                 return do_chflags(dev, flags, mask);
 343         return 0;
 344 }
 345
 346 static int ipaddr_list_link(int argc, char **argv)
 347 {
 348         preferred_family = AF_PACKET;
 349         do_link = 1;
 350         return ipaddr_list_or_flush(argc, argv, 0);
 351 }
 352
 353 int do_iplink(int argc, char **argv)
 354 {
 355         if (argc > 0) {
 356                 if (matches(*argv, "set") == 0)
 357                         return do_set(argc-1, argv+1);
 358                 if (matches(*argv, "show") == 0 ||
 359                     matches(*argv, "lst") == 0 ||
 360                     matches(*argv, "list") == 0)
 361                         return ipaddr_list_link(argc-1, argv+1);
 362         } else
 363                 return ipaddr_list_link(0, NULL);
 364
 365         bb_error_msg("Command \"%s\" is unknown.", *argv);
 366         exit(-1);
 367 }