libiproute: handle table ids larger than 255
[oweals/busybox.git] / networking / libiproute / iplink.c
index 1cfaf6d6a05621920d376cd261c3c3087ff4a6f3..ae3ef0ceb2cc7f630da1093c385975027086f9c4 100644 (file)
+/* vi: set sw=4 ts=4: */
 /*
- * iplink.c            "ip link".
- *
- *             This program is free software; you can redistribute it and/or
- *             modify it under the terms of the GNU General Public License
- *             as published by the Free Software Foundation; either version
- *             2 of the License, or (at your option) any later version.
- *
- * Authors:    Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
+ * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
+ *                     Patrick McHardy <kaber@trash.net>
  *
+ * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  */
-
-#include <sys/ioctl.h>
-#include <sys/socket.h>
-
-#include <errno.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-
 #include <net/if.h>
-#include <net/if_packet.h>
+/*#include <net/if_packet.h> - not needed? */
 #include <netpacket/packet.h>
+#include <netinet/if_ether.h>
 
-#if __GLIBC__ >=2 && __GLIBC_MINOR >= 1
-#include <net/ethernet.h>
-#else
-#include <linux/if_ether.h>
-#endif
-
+#include <linux/if_vlan.h>
+#include "ip_common.h"  /* #include "libbb.h" is inside */
 #include "rt_names.h"
 #include "utils.h"
-#include "ip_common.h"
-
-#include "libbb.h"
 
+#undef  ETH_P_8021AD
+#define ETH_P_8021AD            0x88A8
+#undef  VLAN_FLAG_REORDER_HDR
+#define VLAN_FLAG_REORDER_HDR   0x1
+#undef  VLAN_FLAG_GVRP
+#define VLAN_FLAG_GVRP          0x2
+#undef  VLAN_FLAG_LOOSE_BINDING
+#define VLAN_FLAG_LOOSE_BINDING 0x4
+#undef  VLAN_FLAG_MVRP
+#define VLAN_FLAG_MVRP          0x8
+#undef  IFLA_VLAN_PROTOCOL
+#define IFLA_VLAN_PROTOCOL      5
+
+#ifndef IFLA_LINKINFO
+# define IFLA_LINKINFO 18
+# define IFLA_INFO_KIND 1
+# define IFLA_INFO_DATA 2
+#endif
 
-/* take from linux/sockios.h */
-#define SIOCSIFNAME    0x8923          /* set interface name */
+#ifndef IFLA_VLAN_MAX
+# define IFLA_VLAN_ID 1
+# define IFLA_VLAN_FLAGS 2
+struct ifla_vlan_flags {
+       uint32_t        flags;
+       uint32_t        mask;
+};
+#endif
 
-static int do_link;
+/* taken from linux/sockios.h */
+#define SIOCSIFNAME  0x8923  /* set interface name */
 
-static int on_off(char *msg)
-{
-       error_msg("Error: argument of \"%s\" must be \"on\" or \"off\"", msg);
-       return -1;
-}
+#if 0
+# define dbg(...) bb_error_msg(__VA_ARGS__)
+#else
+# define dbg(...) ((void)0)
+#endif
 
+/* Exits on error */
 static int get_ctl_fd(void)
 {
-       int s_errno;
        int fd;
 
        fd = socket(PF_INET, SOCK_DGRAM, 0);
        if (fd >= 0)
                return fd;
-       s_errno = errno;
        fd = socket(PF_PACKET, SOCK_DGRAM, 0);
        if (fd >= 0)
                return fd;
-       fd = socket(PF_INET6, SOCK_DGRAM, 0);
-       if (fd >= 0)
-               return fd;
-       errno = s_errno;
-       perror("Cannot create control socket");
-       return -1;
+       return xsocket(PF_INET6, SOCK_DGRAM, 0);
 }
 
-static int do_chflags(char *dev, __u32 flags, __u32 mask)
+/* Exits on error */
+static void do_chflags(char *dev, uint32_t flags, uint32_t mask)
 {
        struct ifreq ifr;
        int fd;
-       int err;
 
-       strcpy(ifr.ifr_name, dev);
+       strncpy_IFNAMSIZ(ifr.ifr_name, dev);
        fd = get_ctl_fd();
-       if (fd < 0)
-               return -1;
-       err = ioctl(fd, SIOCGIFFLAGS, &ifr);
-       if (err) {
-               perror("SIOCGIFFLAGS");
-               close(fd);
-               return -1;
-       }
-       if ((ifr.ifr_flags^flags)&mask) {
+       xioctl(fd, SIOCGIFFLAGS, &ifr);
+       if ((ifr.ifr_flags ^ flags) & mask) {
                ifr.ifr_flags &= ~mask;
-               ifr.ifr_flags |= mask&flags;
-               err = ioctl(fd, SIOCSIFFLAGS, &ifr);
-               if (err)
-                       perror("SIOCSIFFLAGS");
+               ifr.ifr_flags |= mask & flags;
+               xioctl(fd, SIOCSIFFLAGS, &ifr);
        }
        close(fd);
-       return err;
 }
 
-static int do_changename(char *dev, char *newdev)
+/* Exits on error */
+static void do_changename(char *dev, char *newdev)
 {
        struct ifreq ifr;
        int fd;
-       int err;
 
-       strcpy(ifr.ifr_name, dev);
-       strcpy(ifr.ifr_newname, newdev);
+       strncpy_IFNAMSIZ(ifr.ifr_name, dev);
+       strncpy_IFNAMSIZ(ifr.ifr_newname, newdev);
        fd = get_ctl_fd();
-       if (fd < 0)
-               return -1;
-       err = ioctl(fd, SIOCSIFNAME, &ifr);
-       if (err) {
-               perror("SIOCSIFNAME");
-               close(fd);
-               return -1;
-       }
+       xioctl(fd, SIOCSIFNAME, &ifr);
        close(fd);
-       return err;
 }
 
-static int set_qlen(char *dev, int qlen)
+/* Exits on error */
+static void set_qlen(char *dev, int qlen)
 {
        struct ifreq ifr;
        int s;
 
        s = get_ctl_fd();
-       if (s < 0)
-               return -1;
-
        memset(&ifr, 0, sizeof(ifr));
-       strcpy(ifr.ifr_name, dev); 
-       ifr.ifr_qlen = qlen; 
-       if (ioctl(s, SIOCSIFTXQLEN, &ifr) < 0) {
-               perror("SIOCSIFXQLEN");
-               close(s);
-               return -1;
-       }
+       strncpy_IFNAMSIZ(ifr.ifr_name, dev);
+       ifr.ifr_qlen = qlen;
+       xioctl(s, SIOCSIFTXQLEN, &ifr);
        close(s);
-
-       return 0; 
 }
 
-static int set_mtu(char *dev, int mtu)
+/* Exits on error */
+static void set_mtu(char *dev, int mtu)
 {
        struct ifreq ifr;
        int s;
 
        s = get_ctl_fd();
-       if (s < 0)
-               return -1;
-
        memset(&ifr, 0, sizeof(ifr));
-       strcpy(ifr.ifr_name, dev); 
-       ifr.ifr_mtu = mtu; 
-       if (ioctl(s, SIOCSIFMTU, &ifr) < 0) {
-               perror("SIOCSIFMTU");
-               close(s);
-               return -1;
-       }
+       strncpy_IFNAMSIZ(ifr.ifr_name, dev);
+       ifr.ifr_mtu = mtu;
+       xioctl(s, SIOCSIFMTU, &ifr);
        close(s);
-
-       return 0; 
 }
 
+/* Exits on error */
 static int get_address(char *dev, int *htype)
 {
        struct ifreq ifr;
        struct sockaddr_ll me;
-       int alen;
+       socklen_t alen;
        int s;
 
-       s = socket(PF_PACKET, SOCK_DGRAM, 0);
-       if (s < 0) { 
-               perror("socket(PF_PACKET)");
-               return -1;
-       }
+       s = xsocket(PF_PACKET, SOCK_DGRAM, 0);
 
        memset(&ifr, 0, sizeof(ifr));
-       strcpy(ifr.ifr_name, dev);
-       if (ioctl(s, SIOCGIFINDEX, &ifr) < 0) {
-               perror("SIOCGIFINDEX");
-               close(s);
-               return -1;
-       }
+       strncpy_IFNAMSIZ(ifr.ifr_name, dev);
+       xioctl(s, SIOCGIFINDEX, &ifr);
 
        memset(&me, 0, sizeof(me));
        me.sll_family = AF_PACKET;
        me.sll_ifindex = ifr.ifr_ifindex;
        me.sll_protocol = htons(ETH_P_LOOP);
-       if (bind(s, (struct sockaddr*)&me, sizeof(me)) == -1) {
-               perror("bind");
-               close(s);
-               return -1;
-       }
-
+       xbind(s, (struct sockaddr*)&me, sizeof(me));
        alen = sizeof(me);
-       if (getsockname(s, (struct sockaddr*)&me, &alen) == -1) {
-               perror("getsockname");
-               close(s);
-               return -1;
-       }
+       getsockname(s, (struct sockaddr*)&me, &alen);
+       //never happens:
+       //if (getsockname(s, (struct sockaddr*)&me, &alen) == -1)
+       //      bb_perror_msg_and_die("getsockname");
        close(s);
        *htype = me.sll_hatype;
        return me.sll_halen;
 }
 
-static int parse_address(char *dev, int hatype, int halen, char *lla, struct ifreq *ifr)
+/* Exits on error */
+static void parse_address(char *dev, int hatype, int halen, char *lla, struct ifreq *ifr)
 {
        int alen;
 
        memset(ifr, 0, sizeof(*ifr));
-       strcpy(ifr->ifr_name, dev);
+       strncpy_IFNAMSIZ(ifr->ifr_name, dev);
        ifr->ifr_hwaddr.sa_family = hatype;
-       alen = ll_addr_a2n(ifr->ifr_hwaddr.sa_data, 14, lla);
+
+       alen = hatype == 1/*ARPHRD_ETHER*/ ? 14/*ETH_HLEN*/ : 19/*INFINIBAND_HLEN*/;
+       alen = ll_addr_a2n((unsigned char *)(ifr->ifr_hwaddr.sa_data), alen, lla);
        if (alen < 0)
-               return -1;
+               exit(EXIT_FAILURE);
        if (alen != halen) {
-               error_msg("Wrong address (%s) length: expected %d bytes", lla, halen);
-               return -1;
+               bb_error_msg_and_die("wrong address (%s) length: expected %d bytes", lla, halen);
        }
-       return 0; 
 }
 
-static int set_address(struct ifreq *ifr, int brd)
+/* Exits on error */
+static void set_address(struct ifreq *ifr, int brd)
 {
        int s;
 
        s = get_ctl_fd();
-       if (s < 0)
-               return -1;
-       if (ioctl(s, brd?SIOCSIFHWBROADCAST:SIOCSIFHWADDR, ifr) < 0) {
-               perror(brd?"SIOCSIFHWBROADCAST":"SIOCSIFHWADDR");
-               close(s);
-               return -1;
-       }
+       if (brd)
+               xioctl(s, SIOCSIFHWBROADCAST, ifr);
+       else
+               xioctl(s, SIOCSIFHWADDR, ifr);
        close(s);
-       return 0; 
 }
 
 
-static int do_set(int argc, char **argv)
+static void die_must_be_on_off(const char *msg) NORETURN;
+static void die_must_be_on_off(const char *msg)
+{
+       bb_error_msg_and_die("argument of \"%s\" must be \"on\" or \"off\"", msg);
+}
+
+/* Return value becomes exitcode. It's okay to not return at all */
+static int do_set(char **argv)
 {
        char *dev = NULL;
-       __u32 mask = 0;
-       __u32 flags = 0;
+       uint32_t mask = 0;
+       uint32_t flags = 0;
        int qlen = -1;
        int mtu = -1;
        char *newaddr = NULL;
@@ -246,118 +204,495 @@ static int do_set(int argc, char **argv)
        struct ifreq ifr0, ifr1;
        char *newname = NULL;
        int htype, halen;
-
-       while (argc > 0) {
-               if (strcmp(*argv, "up") == 0) {
+       static const char keywords[] ALIGN1 =
+               "up\0""down\0""name\0""mtu\0""qlen\0""multicast\0"
+               "arp\0""address\0""dev\0";
+       enum { ARG_up = 0, ARG_down, ARG_name, ARG_mtu, ARG_qlen, ARG_multicast,
+               ARG_arp, ARG_addr, ARG_dev };
+       static const char str_on_off[] ALIGN1 = "on\0""off\0";
+       enum { PARM_on = 0, PARM_off };
+       smalluint key;
+
+       while (*argv) {
+               /* substring search ensures that e.g. "addr" and "address"
+                * are both accepted */
+               key = index_in_substrings(keywords, *argv);
+               if (key == ARG_up) {
                        mask |= IFF_UP;
                        flags |= IFF_UP;
-               } else if (strcmp(*argv, "down") == 0) {
+               } else if (key == ARG_down) {
                        mask |= IFF_UP;
                        flags &= ~IFF_UP;
-               } else if (strcmp(*argv, "name") == 0) {
+               } else if (key == ARG_name) {
                        NEXT_ARG();
                        newname = *argv;
-               } else if (strcmp(*argv, "mtu") == 0) {
+               } else if (key == ARG_mtu) {
                        NEXT_ARG();
                        if (mtu != -1)
                                duparg("mtu", *argv);
-                       if (get_integer(&mtu, *argv, 0))
-                               invarg("Invalid \"mtu\" value\n", *argv);
-               } else if (strcmp(*argv, "multicast") == 0) {
+                       mtu = get_unsigned(*argv, "mtu");
+               } else if (key == ARG_qlen) {
                        NEXT_ARG();
-                       mask |= IFF_MULTICAST;
-                       if (strcmp(*argv, "on") == 0) {
-                               flags |= IFF_MULTICAST;
-                       } else if (strcmp(*argv, "off") == 0) {
-                               flags &= ~IFF_MULTICAST;
-                       } else
-                               return on_off("multicast");
-               } else if (strcmp(*argv, "arp") == 0) {
+                       if (qlen != -1)
+                               duparg("qlen", *argv);
+                       qlen = get_unsigned(*argv, "qlen");
+               } else if (key == ARG_addr) {
                        NEXT_ARG();
-                       mask |= IFF_NOARP;
-                       if (strcmp(*argv, "on") == 0) {
-                               flags &= ~IFF_NOARP;
-                       } else if (strcmp(*argv, "off") == 0) {
-                               flags |= IFF_NOARP;
-                       } else
-                               return on_off("noarp");
-               } else {
-                        if (strcmp(*argv, "dev") == 0) {
+                       newaddr = *argv;
+               } else if (key >= ARG_dev) {
+                       if (key == ARG_dev) {
                                NEXT_ARG();
                        }
                        if (dev)
                                duparg2("dev", *argv);
                        dev = *argv;
+               } else {
+                       int param;
+                       NEXT_ARG();
+                       param = index_in_strings(str_on_off, *argv);
+                       if (key == ARG_multicast) {
+                               if (param < 0)
+                                       die_must_be_on_off("multicast");
+                               mask |= IFF_MULTICAST;
+                               if (param == PARM_on)
+                                       flags |= IFF_MULTICAST;
+                               else
+                                       flags &= ~IFF_MULTICAST;
+                       } else if (key == ARG_arp) {
+                               if (param < 0)
+                                       die_must_be_on_off("arp");
+                               mask |= IFF_NOARP;
+                               if (param == PARM_on)
+                                       flags &= ~IFF_NOARP;
+                               else
+                                       flags |= IFF_NOARP;
+                       }
                }
-               argc--; argv++;
+               argv++;
        }
 
        if (!dev) {
-               error_msg("Not enough of information: \"dev\" argument is required.");
-               exit(-1);
+               bb_error_msg_and_die(bb_msg_requires_arg, "\"dev\"");
        }
 
        if (newaddr || newbrd) {
                halen = get_address(dev, &htype);
-               if (halen < 0)
-                       return -1;
                if (newaddr) {
-                       if (parse_address(dev, htype, halen, newaddr, &ifr0) < 0)
-                               return -1;
+                       parse_address(dev, htype, halen, newaddr, &ifr0);
+                       set_address(&ifr0, 0);
                }
                if (newbrd) {
-                       if (parse_address(dev, htype, halen, newbrd, &ifr1) < 0)
-                               return -1; 
+                       parse_address(dev, htype, halen, newbrd, &ifr1);
+                       set_address(&ifr1, 1);
                }
        }
 
        if (newname && strcmp(dev, newname)) {
-               if (do_changename(dev, newname) < 0)
-                       return -1;
+               do_changename(dev, newname);
                dev = newname;
        }
-       if (qlen != -1) { 
-               if (set_qlen(dev, qlen) < 0)
-                       return -1; 
+       if (qlen != -1) {
+               set_qlen(dev, qlen);
        }
-       if (mtu != -1) { 
-               if (set_mtu(dev, mtu) < 0)
-                       return -1; 
-       }
-       if (newaddr || newbrd) {
-               if (newbrd) {
-                       if (set_address(&ifr1, 1) < 0)
-                               return -1; 
-               }
-               if (newaddr) {
-                       if (set_address(&ifr0, 0) < 0)
-                               return -1;
-               }
+       if (mtu != -1) {
+               set_mtu(dev, mtu);
        }
        if (mask)
-               return do_chflags(dev, flags, mask);
+               do_chflags(dev, flags, mask);
        return 0;
 }
 
-static int ipaddr_list_link(int argc, char **argv)
+static int ipaddr_list_link(char **argv)
 {
        preferred_family = AF_PACKET;
-       do_link = 1;
-       return ipaddr_list_or_flush(argc, argv, 0);
+       return ipaddr_list_or_flush(argv, 0);
+}
+
+static void vlan_parse_opt(char **argv, struct nlmsghdr *n, unsigned int size)
+{
+       static const char keywords[] ALIGN1 =
+               "id\0"
+               "protocol\0"
+               "reorder_hdr\0"
+               "gvrp\0"
+               "mvrp\0"
+               "loose_binding\0"
+       ;
+       static const char protocols[] ALIGN1 =
+               "802.1q\0"
+               "802.1ad\0"
+       ;
+       static const char str_on_off[] ALIGN1 =
+               "on\0"
+               "off\0"
+       ;
+       enum {
+               ARG_id = 0,
+               ARG_reorder_hdr,
+               ARG_gvrp,
+               ARG_mvrp,
+               ARG_loose_binding,
+               ARG_protocol,
+       };
+       enum {
+               PROTO_8021Q = 0,
+               PROTO_8021AD,
+       };
+       enum {
+               PARM_on = 0,
+               PARM_off
+       };
+       int arg;
+       uint16_t id, proto;
+       struct ifla_vlan_flags flags = {};
+
+       while (*argv) {
+               arg = index_in_substrings(keywords, *argv);
+               if (arg < 0)
+                       invarg_1_to_2(*argv, "type vlan");
+
+               NEXT_ARG();
+               if (arg == ARG_id) {
+                       id = get_u16(*argv, "id");
+                       addattr_l(n, size, IFLA_VLAN_ID, &id, sizeof(id));
+               } else if (arg == ARG_protocol) {
+                       arg = index_in_substrings(protocols, *argv);
+                       if (arg == PROTO_8021Q)
+                               proto = ETH_P_8021Q;
+                       else if (arg == PROTO_8021AD)
+                               proto = ETH_P_8021AD;
+                       else
+                               bb_error_msg_and_die("unknown VLAN encapsulation protocol '%s'",
+                                                                    *argv);
+                       addattr_l(n, size, IFLA_VLAN_PROTOCOL, &proto, sizeof(proto));
+               } else {
+                       int param = index_in_strings(str_on_off, *argv);
+                       if (param < 0)
+                               die_must_be_on_off(nth_string(keywords, arg));
+
+                       if (arg == ARG_reorder_hdr) {
+                               flags.mask |= VLAN_FLAG_REORDER_HDR;
+                               flags.flags &= ~VLAN_FLAG_REORDER_HDR;
+                               if (param == PARM_on)
+                                       flags.flags |= VLAN_FLAG_REORDER_HDR;
+                       } else if (arg == ARG_gvrp) {
+                               flags.mask |= VLAN_FLAG_GVRP;
+                               flags.flags &= ~VLAN_FLAG_GVRP;
+                               if (param == PARM_on)
+                                       flags.flags |= VLAN_FLAG_GVRP;
+                       } else if (arg == ARG_mvrp) {
+                               flags.mask |= VLAN_FLAG_MVRP;
+                               flags.flags &= ~VLAN_FLAG_MVRP;
+                               if (param == PARM_on)
+                                       flags.flags |= VLAN_FLAG_MVRP;
+                       } else { /*if (arg == ARG_loose_binding) */
+                               flags.mask |= VLAN_FLAG_LOOSE_BINDING;
+                               flags.flags &= ~VLAN_FLAG_LOOSE_BINDING;
+                               if (param == PARM_on)
+                                       flags.flags |= VLAN_FLAG_LOOSE_BINDING;
+                       }
+               }
+               argv++;
+       }
+
+       if (flags.mask)
+               addattr_l(n, size, IFLA_VLAN_FLAGS, &flags, sizeof(flags));
+}
+
+#ifndef NLMSG_TAIL
+#define NLMSG_TAIL(nmsg) \
+       ((struct rtattr *) (((void *) (nmsg)) + NLMSG_ALIGN((nmsg)->nlmsg_len)))
+#endif
+/* Return value becomes exitcode. It's okay to not return at all */
+static int do_add_or_delete(char **argv, const unsigned rtm)
+{
+       static const char keywords[] ALIGN1 =
+               "link\0""name\0""type\0""dev\0""address\0";
+       enum {
+               ARG_link,
+               ARG_name,
+               ARG_type,
+               ARG_dev,
+               ARG_address,
+       };
+       struct rtnl_handle rth;
+       struct {
+               struct nlmsghdr  n;
+               struct ifinfomsg i;
+               char             buf[1024];
+       } req;
+       smalluint arg;
+       char *name_str = NULL;
+       char *link_str = NULL;
+       char *type_str = NULL;
+       char *dev_str = NULL;
+       char *address_str = NULL;
+
+       memset(&req, 0, sizeof(req));
+
+       req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ifinfomsg));
+       req.n.nlmsg_flags = NLM_F_REQUEST;
+       req.n.nlmsg_type = rtm;
+       req.i.ifi_family = preferred_family;
+       if (rtm == RTM_NEWLINK)
+               req.n.nlmsg_flags |= NLM_F_CREATE|NLM_F_EXCL;
+
+       while (*argv) {
+               arg = index_in_substrings(keywords, *argv);
+               if (arg == ARG_type) {
+                       NEXT_ARG();
+                       type_str = *argv++;
+                       dbg("type_str:'%s'", type_str);
+                       break;
+               }
+               if (arg == ARG_link) {
+                       NEXT_ARG();
+                       link_str = *argv;
+                       dbg("link_str:'%s'", link_str);
+               } else if (arg == ARG_name) {
+                       NEXT_ARG();
+                       name_str = *argv;
+                       dbg("name_str:'%s'", name_str);
+               } else if (arg == ARG_address) {
+                       NEXT_ARG();
+                       address_str = *argv;
+                       dbg("address_str:'%s'", name_str);
+               } else {
+                       if (arg == ARG_dev) {
+                               if (dev_str)
+                                       duparg(*argv, "dev");
+                               NEXT_ARG();
+                       }
+                       dev_str = *argv;
+                       dbg("dev_str:'%s'", dev_str);
+               }
+               argv++;
+       }
+       xrtnl_open(&rth);
+       ll_init_map(&rth);
+       if (type_str) {
+               struct rtattr *linkinfo = NLMSG_TAIL(&req.n);
+
+               addattr_l(&req.n, sizeof(req), IFLA_LINKINFO, NULL, 0);
+               addattr_l(&req.n, sizeof(req), IFLA_INFO_KIND, type_str,
+                               strlen(type_str));
+
+               if (*argv) {
+                       struct rtattr *data = NLMSG_TAIL(&req.n);
+                       addattr_l(&req.n, sizeof(req), IFLA_INFO_DATA, NULL, 0);
+
+                       if (strcmp(type_str, "vlan") == 0)
+                               vlan_parse_opt(argv, &req.n, sizeof(req));
+
+                       data->rta_len = (void *)NLMSG_TAIL(&req.n) - (void *)data;
+               }
+
+               linkinfo->rta_len = (void *)NLMSG_TAIL(&req.n) - (void *)linkinfo;
+       }
+       if (rtm != RTM_NEWLINK) {
+               if (!dev_str)
+                       return 1; /* Need a device to delete */
+               req.i.ifi_index = xll_name_to_index(dev_str);
+       } else {
+               if (!name_str)
+                       name_str = dev_str;
+               if (link_str) {
+                       int idx = xll_name_to_index(link_str);
+                       addattr_l(&req.n, sizeof(req), IFLA_LINK, &idx, 4);
+               }
+               if (address_str) {
+                       unsigned char abuf[32];
+                       int len = ll_addr_a2n(abuf, sizeof(abuf), address_str);
+                       dbg("address len:%d", len);
+                       if (len < 0)
+                               return -1;
+                       addattr_l(&req.n, sizeof(req), IFLA_ADDRESS, abuf, len);
+               }
+       }
+       if (name_str) {
+               const size_t name_len = strlen(name_str) + 1;
+               if (name_len < 2 || name_len > IFNAMSIZ)
+                       invarg_1_to_2(name_str, "name");
+               addattr_l(&req.n, sizeof(req), IFLA_IFNAME, name_str, name_len);
+       }
+       if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0)
+               return 2;
+       return 0;
 }
 
-int do_iplink(int argc, char **argv)
+/* Other keywords recognized by iproute2-3.12.0: */
+#if 0
+               } else if (matches(*argv, "broadcast") == 0 ||
+                               strcmp(*argv, "brd") == 0) {
+                       NEXT_ARG();
+                       len = ll_addr_a2n(abuf, sizeof(abuf), *argv);
+                       if (len < 0)
+                               return -1;
+                       addattr_l(&req->n, sizeof(*req), IFLA_BROADCAST, abuf, len);
+               } else if (matches(*argv, "txqueuelen") == 0 ||
+                               strcmp(*argv, "qlen") == 0 ||
+                               matches(*argv, "txqlen") == 0) {
+                       NEXT_ARG();
+                       if (qlen != -1)
+                               duparg("txqueuelen", *argv);
+                       if (get_integer(&qlen,  *argv, 0))
+                               invarg_1_to_2(*argv, "txqueuelen");
+                       addattr_l(&req->n, sizeof(*req), IFLA_TXQLEN, &qlen, 4);
+               } else if (strcmp(*argv, "mtu") == 0) {
+                       NEXT_ARG();
+                       if (mtu != -1)
+                               duparg("mtu", *argv);
+                       if (get_integer(&mtu, *argv, 0))
+                               invarg_1_to_2(*argv, "mtu");
+                       addattr_l(&req->n, sizeof(*req), IFLA_MTU, &mtu, 4);
+                } else if (strcmp(*argv, "netns") == 0) {
+                        NEXT_ARG();
+                        if (netns != -1)
+                                duparg("netns", *argv);
+                       if ((netns = get_netns_fd(*argv)) >= 0)
+                               addattr_l(&req->n, sizeof(*req), IFLA_NET_NS_FD, &netns, 4);
+                       else if (get_integer(&netns, *argv, 0) == 0)
+                               addattr_l(&req->n, sizeof(*req), IFLA_NET_NS_PID, &netns, 4);
+                       else
+                                invarg_1_to_2(*argv, "netns");
+               } else if (strcmp(*argv, "multicast") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_MULTICAST;
+                       if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags |= IFF_MULTICAST;
+                       } else if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags &= ~IFF_MULTICAST;
+                       } else
+                               return on_off("multicast", *argv);
+               } else if (strcmp(*argv, "allmulticast") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_ALLMULTI;
+                       if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags |= IFF_ALLMULTI;
+                       } else if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags &= ~IFF_ALLMULTI;
+                       } else
+                               return on_off("allmulticast", *argv);
+               } else if (strcmp(*argv, "promisc") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_PROMISC;
+                       if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags |= IFF_PROMISC;
+                       } else if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags &= ~IFF_PROMISC;
+                       } else
+                               return on_off("promisc", *argv);
+               } else if (strcmp(*argv, "trailers") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_NOTRAILERS;
+                       if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags |= IFF_NOTRAILERS;
+                       } else if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags &= ~IFF_NOTRAILERS;
+                       } else
+                               return on_off("trailers", *argv);
+               } else if (strcmp(*argv, "arp") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_NOARP;
+                       if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags &= ~IFF_NOARP;
+                       } else if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags |= IFF_NOARP;
+                       } else
+                               return on_off("noarp", *argv);
+               } else if (strcmp(*argv, "vf") == 0) {
+                       struct rtattr *vflist;
+                       NEXT_ARG();
+                       if (get_integer(&vf,  *argv, 0)) {
+                               invarg_1_to_2(*argv, "vf");
+                       }
+                       vflist = addattr_nest(&req->n, sizeof(*req),
+                                             IFLA_VFINFO_LIST);
+                       len = iplink_parse_vf(vf, &argc, &argv, req);
+                       if (len < 0)
+                               return -1;
+                       addattr_nest_end(&req->n, vflist);
+               } else if (matches(*argv, "master") == 0) {
+                       int ifindex;
+                       NEXT_ARG();
+                       ifindex = ll_name_to_index(*argv);
+                       if (!ifindex)
+                               invarg_1_to_2(*argv, "master");
+                       addattr_l(&req->n, sizeof(*req), IFLA_MASTER,
+                                 &ifindex, 4);
+               } else if (matches(*argv, "nomaster") == 0) {
+                       int ifindex = 0;
+                       addattr_l(&req->n, sizeof(*req), IFLA_MASTER,
+                                 &ifindex, 4);
+               } else if (matches(*argv, "dynamic") == 0) {
+                       NEXT_ARG();
+                       req->i.ifi_change |= IFF_DYNAMIC;
+                       if (strcmp(*argv, "on") == 0) {
+                               req->i.ifi_flags |= IFF_DYNAMIC;
+                       } else if (strcmp(*argv, "off") == 0) {
+                               req->i.ifi_flags &= ~IFF_DYNAMIC;
+                       } else
+                               return on_off("dynamic", *argv);
+               } else if (matches(*argv, "alias") == 0) {
+                       NEXT_ARG();
+                       addattr_l(&req->n, sizeof(*req), IFLA_IFALIAS,
+                                 *argv, strlen(*argv));
+                       argc--; argv++;
+                       break;
+               } else if (strcmp(*argv, "group") == 0) {
+                       NEXT_ARG();
+                       if (*group != -1)
+                               duparg("group", *argv);
+                       if (rtnl_group_a2n(group, *argv))
+                               invarg_1_to_2(*argv, "group");
+               } else if (strcmp(*argv, "mode") == 0) {
+                       int mode;
+                       NEXT_ARG();
+                       mode = get_link_mode(*argv);
+                       if (mode < 0)
+                               invarg_1_to_2(*argv, "mode");
+                       addattr8(&req->n, sizeof(*req), IFLA_LINKMODE, mode);
+               } else if (strcmp(*argv, "state") == 0) {
+                       int state;
+                       NEXT_ARG();
+                       state = get_operstate(*argv);
+                       if (state < 0)
+                               invarg_1_to_2(*argv, "state");
+                       addattr8(&req->n, sizeof(*req), IFLA_OPERSTATE, state);
+               } else if (matches(*argv, "numtxqueues") == 0) {
+                       NEXT_ARG();
+                       if (numtxqueues != -1)
+                               duparg("numtxqueues", *argv);
+                       if (get_integer(&numtxqueues, *argv, 0))
+                               invarg_1_to_2(*argv, "numtxqueues");
+                       addattr_l(&req->n, sizeof(*req), IFLA_NUM_TX_QUEUES,
+                                 &numtxqueues, 4);
+               } else if (matches(*argv, "numrxqueues") == 0) {
+                       NEXT_ARG();
+                       if (numrxqueues != -1)
+                               duparg("numrxqueues", *argv);
+                       if (get_integer(&numrxqueues, *argv, 0))
+                               invarg_1_to_2(*argv, "numrxqueues");
+                       addattr_l(&req->n, sizeof(*req), IFLA_NUM_RX_QUEUES,
+                                 &numrxqueues, 4);
+               }
+#endif
+
+/* Return value becomes exitcode. It's okay to not return at all */
+int FAST_FUNC do_iplink(char **argv)
 {
-       if (argc > 0) {
-               if (matches(*argv, "set") == 0)
-                       return do_set(argc-1, argv+1);
-               if (matches(*argv, "show") == 0 ||
-                   matches(*argv, "lst") == 0 ||
-                   matches(*argv, "list") == 0)
-                       return ipaddr_list_link(argc-1, argv+1);
-       } else
-               return ipaddr_list_link(0, NULL);
-
-       error_msg("Command \"%s\" is unknown, try \"ip link help\".", *argv);
-       exit(-1);
+       static const char keywords[] ALIGN1 =
+               "add\0""delete\0""set\0""show\0""lst\0""list\0";
+       if (*argv) {
+               int key = index_in_substrings(keywords, *argv);
+               if (key < 0) /* invalid argument */
+                       invarg_1_to_2(*argv, applet_name);
+               argv++;
+               if (key <= 1) /* add/delete */
+                       return do_add_or_delete(argv, key ? RTM_DELLINK : RTM_NEWLINK);
+               if (key == 2) /* set */
+                       return do_set(argv);
+       }
+       /* show, lst, list */
+       return ipaddr_list_link(argv);
 }