- add xsendto and use where appropriate; shrink iplink; sanitize libiproute a bit.
[oweals/busybox.git] / networking / libiproute / iplink.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * iplink.c "ip link".
4  *
5  * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
6  *
7  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
8  */
9
10 #include "libbb.h"
11
12 #include <sys/ioctl.h>
13 #include <sys/socket.h>
14
15 #include <net/if.h>
16 #include <net/if_packet.h>
17 #include <netpacket/packet.h>
18
19 #include <net/ethernet.h>
20
21 #include "rt_names.h"
22 #include "utils.h"
23 #include "ip_common.h"
24
25 /* taken from linux/sockios.h */
26 #define SIOCSIFNAME     0x8923          /* set interface name */
27
28 static void on_off(const char *msg) ATTRIBUTE_NORETURN;
29 static void on_off(const char *msg)
30 {
31         bb_error_msg_and_die("error: argument of \"%s\" must be \"on\" or \"off\"", msg);
32 }
33
34 /* Exits on error */
35 static int get_ctl_fd(void)
36 {
37         int fd;
38
39         fd = socket(PF_INET, SOCK_DGRAM, 0);
40         if (fd >= 0)
41                 return fd;
42         fd = socket(PF_PACKET, SOCK_DGRAM, 0);
43         if (fd >= 0)
44                 return fd;
45         return xsocket(PF_INET6, SOCK_DGRAM, 0);
46 }
47
48 /* Exits on error */
49 static void do_chflags(char *dev, uint32_t flags, uint32_t mask)
50 {
51         struct ifreq ifr;
52         int fd;
53
54         strncpy(ifr.ifr_name, dev, sizeof(ifr.ifr_name));
55         fd = get_ctl_fd();
56         if (ioctl(fd, SIOCGIFFLAGS, &ifr)) {
57                 bb_perror_msg_and_die("SIOCGIFFLAGS");
58         }
59         if ((ifr.ifr_flags ^ flags) & mask) {
60                 ifr.ifr_flags &= ~mask;
61                 ifr.ifr_flags |= mask & flags;
62                 if (ioctl(fd, SIOCSIFFLAGS, &ifr))
63                         bb_perror_msg_and_die("SIOCSIFFLAGS");
64         }
65         close(fd);
66 }
67
68 /* Exits on error */
69 static void do_changename(char *dev, char *newdev)
70 {
71         struct ifreq ifr;
72         int fd;
73         int err;
74
75         strncpy(ifr.ifr_name, dev, sizeof(ifr.ifr_name));
76         strncpy(ifr.ifr_newname, newdev, sizeof(ifr.ifr_newname));
77         fd = get_ctl_fd();
78         err = ioctl(fd, SIOCSIFNAME, &ifr);
79         if (err) {
80                 bb_perror_msg_and_die("SIOCSIFNAME");
81         }
82         close(fd);
83 }
84
85 /* Exits on error */
86 static void set_qlen(char *dev, int qlen)
87 {
88         struct ifreq ifr;
89         int s;
90
91         s = get_ctl_fd();
92         memset(&ifr, 0, sizeof(ifr));
93         strncpy(ifr.ifr_name, dev, sizeof(ifr.ifr_name));
94         ifr.ifr_qlen = qlen;
95         if (ioctl(s, SIOCSIFTXQLEN, &ifr) < 0) {
96                 bb_perror_msg_and_die("SIOCSIFXQLEN");
97         }
98         close(s);
99 }
100
101 /* Exits on error */
102 static void set_mtu(char *dev, int mtu)
103 {
104         struct ifreq ifr;
105         int s;
106
107         s = get_ctl_fd();
108         memset(&ifr, 0, sizeof(ifr));
109         strncpy(ifr.ifr_name, dev, sizeof(ifr.ifr_name));
110         ifr.ifr_mtu = mtu;
111         if (ioctl(s, SIOCSIFMTU, &ifr) < 0) {
112                 bb_perror_msg_and_die("SIOCSIFMTU");
113         }
114         close(s);
115 }
116
117 /* Exits on error */
118 static int get_address(char *dev, int *htype)
119 {
120         struct ifreq ifr;
121         struct sockaddr_ll me;
122         socklen_t alen;
123         int s;
124
125         s = xsocket(PF_PACKET, SOCK_DGRAM, 0);
126
127         memset(&ifr, 0, sizeof(ifr));
128         strncpy(ifr.ifr_name, dev, sizeof(ifr.ifr_name));
129         if (ioctl(s, SIOCGIFINDEX, &ifr) < 0) {
130                 bb_perror_msg_and_die("SIOCGIFINDEX");
131         }
132
133         memset(&me, 0, sizeof(me));
134         me.sll_family = AF_PACKET;
135         me.sll_ifindex = ifr.ifr_ifindex;
136         me.sll_protocol = htons(ETH_P_LOOP);
137         xbind(s, (struct sockaddr*)&me, sizeof(me));
138
139         alen = sizeof(me);
140         if (getsockname(s, (struct sockaddr*)&me, &alen) == -1) {
141                 bb_perror_msg_and_die("getsockname");
142         }
143         close(s);
144         *htype = me.sll_hatype;
145         return me.sll_halen;
146 }
147
148 /* Exits on error */
149 static void parse_address(char *dev, int hatype, int halen, char *lla, struct ifreq *ifr)
150 {
151         int alen;
152
153         memset(ifr, 0, sizeof(*ifr));
154         strncpy(ifr->ifr_name, dev, sizeof(ifr->ifr_name));
155         ifr->ifr_hwaddr.sa_family = hatype;
156         alen = ll_addr_a2n((unsigned char *)(ifr->ifr_hwaddr.sa_data), 14, lla);
157         if (alen < 0)
158                 exit(1);
159         if (alen != halen) {
160                 bb_error_msg_and_die("wrong address (%s) length: expected %d bytes", lla, halen);
161         }
162 }
163
164 /* Exits on error */
165 static void set_address(struct ifreq *ifr, int brd)
166 {
167         int s;
168
169         s = get_ctl_fd();
170         if (ioctl(s, brd ? SIOCSIFHWBROADCAST  :SIOCSIFHWADDR, ifr) < 0) {
171                 bb_perror_msg_and_die(brd ? "SIOCSIFHWBROADCAST" : "SIOCSIFHWADDR");
172         }
173         close(s);
174 }
175
176
177 /* Return value becomes exitcode. It's okay to not return at all */
178 static int do_set(int argc, char **argv)
179 {
180         char *dev = NULL;
181         uint32_t mask = 0;
182         uint32_t flags = 0;
183         int qlen = -1;
184         int mtu = -1;
185         char *newaddr = NULL;
186         char *newbrd = NULL;
187         struct ifreq ifr0, ifr1;
188         char *newname = NULL;
189         int htype, halen;
190         static const char * const keywords[] = {
191                 "up", "down", "name", "mtu", "multicast", "arp", "addr", "dev",
192                 "on", "off", NULL
193         };
194         enum { ARG_up = 1, ARG_down, ARG_name, ARG_mtu, ARG_multicast, ARG_arp,
195                 ARG_addr, ARG_dev, PARM_on, PARM_off };
196         smalluint key;
197
198         while (argc > 0) {
199                 key = index_in_str_array(keywords, *argv) + 1;
200                 if (key == ARG_up) {
201                         mask |= IFF_UP;
202                         flags |= IFF_UP;
203                 } else if (key == ARG_down) {
204                         mask |= IFF_UP;
205                         flags &= ~IFF_UP;
206                 } else if (key == ARG_name) {
207                         NEXT_ARG();
208                         newname = *argv;
209                 } else if (key == ARG_mtu) {
210                         NEXT_ARG();
211                         if (mtu != -1)
212                                 duparg("mtu", *argv);
213                         if (get_integer(&mtu, *argv, 0))
214                                 invarg(*argv, "mtu");
215                 } else if (key == ARG_multicast) {
216                         NEXT_ARG();
217                         mask |= IFF_MULTICAST;
218                         key = index_in_str_array(keywords, *argv) + 1;
219                         if (key == PARM_on) {
220                                 flags |= IFF_MULTICAST;
221                         } else if (key == PARM_off) {
222                                 flags &= ~IFF_MULTICAST;
223                         } else
224                                 on_off("multicast");
225                 } else if (key == ARG_arp) {
226                         NEXT_ARG();
227                         mask |= IFF_NOARP;
228                         key = index_in_str_array(keywords, *argv) + 1;
229                         if (key == PARM_on) {
230                                 flags &= ~IFF_NOARP;
231                         } else if (key == PARM_off) {
232                                 flags |= IFF_NOARP;
233                         } else
234                                 on_off("arp");
235                 } else if (key == ARG_addr) {
236                         NEXT_ARG();
237                         newaddr = *argv;
238                 } else {
239                         if (key == ARG_dev) {
240                                 NEXT_ARG();
241                         }
242                         if (dev)
243                                 duparg2("dev", *argv);
244                         dev = *argv;
245                 }
246                 argc--; argv++;
247         }
248
249         if (!dev) {
250                 bb_error_msg_and_die(bb_msg_requires_arg, "\"dev\"");
251         }
252
253         if (newaddr || newbrd) {
254                 halen = get_address(dev, &htype);
255                 if (newaddr) {
256                         parse_address(dev, htype, halen, newaddr, &ifr0);
257                 }
258                 if (newbrd) {
259                         parse_address(dev, htype, halen, newbrd, &ifr1);
260                 }
261         }
262
263         if (newname && strcmp(dev, newname)) {
264                 do_changename(dev, newname);
265                 dev = newname;
266         }
267         if (qlen != -1) {
268                 set_qlen(dev, qlen);
269         }
270         if (mtu != -1) {
271                 set_mtu(dev, mtu);
272         }
273         if (newaddr || newbrd) {
274                 if (newbrd) {
275                         set_address(&ifr1, 1);
276                 }
277                 if (newaddr) {
278                         set_address(&ifr0, 0);
279                 }
280         }
281         if (mask)
282                 do_chflags(dev, flags, mask);
283         return 0;
284 }
285
286 static int ipaddr_list_link(int argc, char **argv)
287 {
288         preferred_family = AF_PACKET;
289         return ipaddr_list_or_flush(argc, argv, 0);
290 }
291
292 /* Return value becomes exitcode. It's okay to not return at all */
293 int do_iplink(int argc, char **argv)
294 {
295         static const char * const keywords[] = {
296                 "set", "show", "lst", "list", NULL
297         };
298         smalluint key;
299         if (argc <= 0)
300                 return ipaddr_list_link(0, NULL);
301         key = index_in_substr_array(keywords, *argv) + 1;
302         if (key == 0)
303                 bb_error_msg_and_die(bb_msg_invalid_arg, *argv, applet_name);
304         argc--; argv++;
305         if (key == 1) /* set */
306                 return do_set(argc, argv);
307         else /* show, lst, list */
308                 return ipaddr_list_link(argc, argv);
309 }