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