interface, system: clean up netns functionality
[project/netifd.git] / system-linux.c
1 /*
2 * netifd - network interface daemon
3 * Copyright (C) 2012 Felix Fietkau <nbd@openwrt.org>
4 * Copyright (C) 2013 Jo-Philipp Wich <jow@openwrt.org>
5 * Copyright (C) 2013 Steven Barth <steven@midlink.org>
6 * Copyright (C) 2014 Gioacchino Mazzurco <gio@eigenlab.org>
7 * Copyright (C) 2017 Matthias Schiffer <mschiffer@universe-factory.net>
8 * Copyright (C) 2018 Hans Dedecker <dedeckeh@gmail.com>
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License version 2
12 * as published by the Free Software Foundation
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 */
19 #define _GNU_SOURCE
20
21 #include <sys/socket.h>
22 #include <sys/ioctl.h>
23 #include <sys/stat.h>
24 #include <sys/syscall.h>
25
26 #include <net/if.h>
27 #include <net/if_arp.h>
28
29 #include <limits.h>
30 #include <arpa/inet.h>
31 #include <netinet/ether.h>
32 #include <netinet/in.h>
33
34 #include <linux/rtnetlink.h>
35 #include <linux/neighbour.h>
36 #include <linux/sockios.h>
37 #include <linux/ip.h>
38 #include <linux/if_addr.h>
39 #include <linux/if_link.h>
40 #include <linux/if_vlan.h>
41 #include <linux/if_bridge.h>
42 #include <linux/if_tunnel.h>
43 #include <linux/ip6_tunnel.h>
44 #include <linux/ethtool.h>
45 #include <linux/fib_rules.h>
46 #include <linux/veth.h>
47 #include <linux/version.h>
48
49 #include <sched.h>
50
51 #ifndef RTN_FAILED_POLICY
52 #define RTN_FAILED_POLICY 12
53 #endif
54
55 #ifndef IFA_F_NOPREFIXROUTE
56 #define IFA_F_NOPREFIXROUTE 0x200
57 #endif
58
59 #ifndef IFA_FLAGS
60 #define IFA_FLAGS (IFA_MULTICAST + 1)
61 #endif
62
63 #include <string.h>
64 #include <fcntl.h>
65 #include <glob.h>
66 #include <time.h>
67 #include <unistd.h>
68
69 #include <netlink/msg.h>
70 #include <netlink/attr.h>
71 #include <netlink/socket.h>
72 #include <libubox/uloop.h>
73
74 #include "netifd.h"
75 #include "device.h"
76 #include "system.h"
77
78 struct event_socket {
79 struct uloop_fd uloop;
80 struct nl_sock *sock;
81 int bufsize;
82 };
83
84 static int sock_ioctl = -1;
85 static struct nl_sock *sock_rtnl = NULL;
86
87 static int cb_rtnl_event(struct nl_msg *msg, void *arg);
88 static void handle_hotplug_event(struct uloop_fd *u, unsigned int events);
89 static int system_add_proto_tunnel(const char *name, const uint8_t proto,
90 const unsigned int link, struct blob_attr **tb);
91 static int __system_del_ip_tunnel(const char *name, struct blob_attr **tb);
92
93 static char dev_buf[256];
94
95 static void
96 handler_nl_event(struct uloop_fd *u, unsigned int events)
97 {
98 struct event_socket *ev = container_of(u, struct event_socket, uloop);
99 int err;
100 socklen_t errlen = sizeof(err);
101
102 if (!u->error) {
103 nl_recvmsgs_default(ev->sock);
104 return;
105 }
106
107 if (getsockopt(u->fd, SOL_SOCKET, SO_ERROR, (void *)&err, &errlen))
108 goto abort;
109
110 switch(err) {
111 case ENOBUFS:
112 /* Increase rx buffer size on netlink socket */
113 ev->bufsize *= 2;
114 if (nl_socket_set_buffer_size(ev->sock, ev->bufsize, 0))
115 goto abort;
116
117 /* Request full dump since some info got dropped */
118 struct rtgenmsg msg = { .rtgen_family = AF_UNSPEC };
119 nl_send_simple(ev->sock, RTM_GETLINK, NLM_F_DUMP, &msg, sizeof(msg));
120 break;
121
122 default:
123 goto abort;
124 }
125 u->error = false;
126 return;
127
128 abort:
129 uloop_fd_delete(&ev->uloop);
130 return;
131 }
132
133 static struct nl_sock *
134 create_socket(int protocol, int groups)
135 {
136 struct nl_sock *sock;
137
138 sock = nl_socket_alloc();
139 if (!sock)
140 return NULL;
141
142 if (groups)
143 nl_join_groups(sock, groups);
144
145 if (nl_connect(sock, protocol)) {
146 nl_socket_free(sock);
147 return NULL;
148 }
149
150 return sock;
151 }
152
153 static bool
154 create_raw_event_socket(struct event_socket *ev, int protocol, int groups,
155 uloop_fd_handler cb, int flags)
156 {
157 ev->sock = create_socket(protocol, groups);
158 if (!ev->sock)
159 return false;
160
161 ev->uloop.fd = nl_socket_get_fd(ev->sock);
162 ev->uloop.cb = cb;
163 if (uloop_fd_add(&ev->uloop, ULOOP_READ|flags))
164 return false;
165
166 return true;
167 }
168
169 static bool
170 create_event_socket(struct event_socket *ev, int protocol,
171 int (*cb)(struct nl_msg *msg, void *arg))
172 {
173 if (!create_raw_event_socket(ev, protocol, 0, handler_nl_event, ULOOP_ERROR_CB))
174 return false;
175
176 /* Install the valid custom callback handler */
177 nl_socket_modify_cb(ev->sock, NL_CB_VALID, NL_CB_CUSTOM, cb, NULL);
178
179 /* Disable sequence number checking on event sockets */
180 nl_socket_disable_seq_check(ev->sock);
181
182 /* Increase rx buffer size to 65K on event sockets */
183 ev->bufsize = 65535;
184 if (nl_socket_set_buffer_size(ev->sock, ev->bufsize, 0))
185 return false;
186
187 return true;
188 }
189
190 static bool
191 create_hotplug_event_socket(struct event_socket *ev, int protocol,
192 void (*cb)(struct uloop_fd *u, unsigned int events))
193 {
194 if (!create_raw_event_socket(ev, protocol, 1, cb, ULOOP_ERROR_CB))
195 return false;
196
197 /* Increase rx buffer size to 65K on event sockets */
198 ev->bufsize = 65535;
199 if (nl_socket_set_buffer_size(ev->sock, ev->bufsize, 0))
200 return false;
201
202 return true;
203 }
204
205 static bool
206 system_rtn_aton(const char *src, unsigned int *dst)
207 {
208 char *e;
209 unsigned int n;
210
211 if (!strcmp(src, "local"))
212 n = RTN_LOCAL;
213 else if (!strcmp(src, "nat"))
214 n = RTN_NAT;
215 else if (!strcmp(src, "broadcast"))
216 n = RTN_BROADCAST;
217 else if (!strcmp(src, "anycast"))
218 n = RTN_ANYCAST;
219 else if (!strcmp(src, "multicast"))
220 n = RTN_MULTICAST;
221 else if (!strcmp(src, "prohibit"))
222 n = RTN_PROHIBIT;
223 else if (!strcmp(src, "unreachable"))
224 n = RTN_UNREACHABLE;
225 else if (!strcmp(src, "blackhole"))
226 n = RTN_BLACKHOLE;
227 else if (!strcmp(src, "xresolve"))
228 n = RTN_XRESOLVE;
229 else if (!strcmp(src, "unicast"))
230 n = RTN_UNICAST;
231 else if (!strcmp(src, "throw"))
232 n = RTN_THROW;
233 else if (!strcmp(src, "failed_policy"))
234 n = RTN_FAILED_POLICY;
235 else {
236 n = strtoul(src, &e, 0);
237 if (!e || *e || e == src || n > 255)
238 return false;
239 }
240
241 *dst = n;
242 return true;
243 }
244
245 static bool
246 system_tos_aton(const char *src, unsigned *dst)
247 {
248 char *e;
249
250 *dst = strtoul(src, &e, 16);
251 if (e == src || *e || *dst > 255)
252 return false;
253
254 return true;
255 }
256
257 int system_init(void)
258 {
259 static struct event_socket rtnl_event;
260 static struct event_socket hotplug_event;
261
262 sock_ioctl = socket(AF_LOCAL, SOCK_DGRAM, 0);
263 system_fd_set_cloexec(sock_ioctl);
264
265 /* Prepare socket for routing / address control */
266 sock_rtnl = create_socket(NETLINK_ROUTE, 0);
267 if (!sock_rtnl)
268 return -1;
269
270 if (!create_event_socket(&rtnl_event, NETLINK_ROUTE, cb_rtnl_event))
271 return -1;
272
273 if (!create_hotplug_event_socket(&hotplug_event, NETLINK_KOBJECT_UEVENT,
274 handle_hotplug_event))
275 return -1;
276
277 /* Receive network link events form kernel */
278 nl_socket_add_membership(rtnl_event.sock, RTNLGRP_LINK);
279
280 return 0;
281 }
282
283 static void system_set_sysctl(const char *path, const char *val)
284 {
285 int fd;
286
287 fd = open(path, O_WRONLY);
288 if (fd < 0)
289 return;
290
291 if (write(fd, val, strlen(val))) {}
292 close(fd);
293 }
294
295 static void system_set_dev_sysctl(const char *path, const char *device, const char *val)
296 {
297 snprintf(dev_buf, sizeof(dev_buf), path, device);
298 system_set_sysctl(dev_buf, val);
299 }
300
301 static void system_set_disable_ipv6(struct device *dev, const char *val)
302 {
303 system_set_dev_sysctl("/proc/sys/net/ipv6/conf/%s/disable_ipv6", dev->ifname, val);
304 }
305
306 static void system_set_rpfilter(struct device *dev, const char *val)
307 {
308 system_set_dev_sysctl("/proc/sys/net/ipv4/conf/%s/rp_filter", dev->ifname, val);
309 }
310
311 static void system_set_acceptlocal(struct device *dev, const char *val)
312 {
313 system_set_dev_sysctl("/proc/sys/net/ipv4/conf/%s/accept_local", dev->ifname, val);
314 }
315
316 static void system_set_igmpversion(struct device *dev, const char *val)
317 {
318 system_set_dev_sysctl("/proc/sys/net/ipv4/conf/%s/force_igmp_version", dev->ifname, val);
319 }
320
321 static void system_set_mldversion(struct device *dev, const char *val)
322 {
323 system_set_dev_sysctl("/proc/sys/net/ipv6/conf/%s/force_mld_version", dev->ifname, val);
324 }
325
326 static void system_set_neigh4reachabletime(struct device *dev, const char *val)
327 {
328 system_set_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/base_reachable_time_ms", dev->ifname, val);
329 }
330
331 static void system_set_neigh6reachabletime(struct device *dev, const char *val)
332 {
333 system_set_dev_sysctl("/proc/sys/net/ipv6/neigh/%s/base_reachable_time_ms", dev->ifname, val);
334 }
335
336 static void system_set_neigh4gcstaletime(struct device *dev, const char *val)
337 {
338 system_set_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/gc_stale_time", dev->ifname, val);
339 }
340
341 static void system_set_neigh6gcstaletime(struct device *dev, const char *val)
342 {
343 system_set_dev_sysctl("/proc/sys/net/ipv6/neigh/%s/gc_stale_time", dev->ifname, val);
344 }
345
346 static void system_set_neigh4locktime(struct device *dev, const char *val)
347 {
348 system_set_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/locktime", dev->ifname, val);
349 }
350
351 static void system_set_dadtransmits(struct device *dev, const char *val)
352 {
353 system_set_dev_sysctl("/proc/sys/net/ipv6/conf/%s/dad_transmits", dev->ifname, val);
354 }
355
356 static void system_bridge_set_multicast_to_unicast(struct device *dev, const char *val)
357 {
358 system_set_dev_sysctl("/sys/class/net/%s/brport/multicast_to_unicast", dev->ifname, val);
359 }
360
361 static void system_bridge_set_multicast_fast_leave(struct device *dev, const char *val)
362 {
363 system_set_dev_sysctl("/sys/class/net/%s/brport/multicast_fast_leave", dev->ifname, val);
364 }
365
366 static void system_bridge_set_hairpin_mode(struct device *dev, const char *val)
367 {
368 system_set_dev_sysctl("/sys/class/net/%s/brport/hairpin_mode", dev->ifname, val);
369 }
370
371 static void system_bridge_set_isolated(struct device *dev, const char *val)
372 {
373 system_set_dev_sysctl("/sys/class/net/%s/brport/isolated", dev->ifname, val);
374 }
375
376 static void system_bridge_set_multicast_router(struct device *dev, const char *val, bool bridge)
377 {
378 system_set_dev_sysctl(bridge ? "/sys/class/net/%s/bridge/multicast_router" :
379 "/sys/class/net/%s/brport/multicast_router",
380 dev->ifname, val);
381 }
382
383 static void system_bridge_set_robustness(struct device *dev, const char *val)
384 {
385 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_startup_query_count",
386 dev->ifname, val);
387 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_last_member_count",
388 dev->ifname, val);
389 }
390
391 static void system_bridge_set_query_interval(struct device *dev, const char *val)
392 {
393 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_query_interval",
394 dev->ifname, val);
395 }
396
397 static void system_bridge_set_query_response_interval(struct device *dev, const char *val)
398 {
399 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_query_response_interval",
400 dev->ifname, val);
401 }
402
403 static void system_bridge_set_last_member_interval(struct device *dev, const char *val)
404 {
405 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_last_member_interval",
406 dev->ifname, val);
407 }
408
409 static void system_bridge_set_membership_interval(struct device *dev, const char *val)
410 {
411 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_membership_interval",
412 dev->ifname, val);
413 }
414
415 static void system_bridge_set_other_querier_timeout(struct device *dev, const char *val)
416 {
417 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_querier_interval",
418 dev->ifname, val);
419 }
420
421 static void system_bridge_set_startup_query_interval(struct device *dev, const char *val)
422 {
423 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_startup_query_interval",
424 dev->ifname, val);
425 }
426
427 static void system_bridge_set_stp_state(struct device *dev, const char *val)
428 {
429 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/stp_state", dev->ifname, val);
430 }
431
432 static void system_bridge_set_forward_delay(struct device *dev, const char *val)
433 {
434 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/forward_delay", dev->ifname, val);
435 }
436
437 static void system_bridge_set_priority(struct device *dev, const char *val)
438 {
439 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/priority", dev->ifname, val);
440 }
441
442 static void system_bridge_set_ageing_time(struct device *dev, const char *val)
443 {
444 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/ageing_time", dev->ifname, val);
445 }
446
447 static void system_bridge_set_hello_time(struct device *dev, const char *val)
448 {
449 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/hello_time", dev->ifname, val);
450 }
451
452 static void system_bridge_set_max_age(struct device *dev, const char *val)
453 {
454 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/max_age", dev->ifname, val);
455 }
456
457 static void system_bridge_set_learning(struct device *dev, const char *val)
458 {
459 system_set_dev_sysctl("/sys/class/net/%s/brport/learning", dev->ifname, val);
460 }
461
462 static void system_bridge_set_unicast_flood(struct device *dev, const char *val)
463 {
464 system_set_dev_sysctl("/sys/class/net/%s/brport/unicast_flood", dev->ifname, val);
465 }
466
467 static void system_set_sendredirects(struct device *dev, const char *val)
468 {
469 system_set_dev_sysctl("/proc/sys/net/ipv4/conf/%s/send_redirects", dev->ifname, val);
470 }
471
472 static int system_get_sysctl(const char *path, char *buf, const size_t buf_sz)
473 {
474 int fd = -1, ret = -1;
475
476 fd = open(path, O_RDONLY);
477 if (fd < 0)
478 goto out;
479
480 ssize_t len = read(fd, buf, buf_sz - 1);
481 if (len < 0)
482 goto out;
483
484 ret = buf[len] = 0;
485
486 out:
487 if (fd >= 0)
488 close(fd);
489
490 return ret;
491 }
492
493 static int
494 system_get_dev_sysctl(const char *path, const char *device, char *buf, const size_t buf_sz)
495 {
496 snprintf(dev_buf, sizeof(dev_buf), path, device);
497 return system_get_sysctl(dev_buf, buf, buf_sz);
498 }
499
500 static int system_get_disable_ipv6(struct device *dev, char *buf, const size_t buf_sz)
501 {
502 return system_get_dev_sysctl("/proc/sys/net/ipv6/conf/%s/disable_ipv6",
503 dev->ifname, buf, buf_sz);
504 }
505
506 static int system_get_rpfilter(struct device *dev, char *buf, const size_t buf_sz)
507 {
508 return system_get_dev_sysctl("/proc/sys/net/ipv4/conf/%s/rp_filter",
509 dev->ifname, buf, buf_sz);
510 }
511
512 static int system_get_acceptlocal(struct device *dev, char *buf, const size_t buf_sz)
513 {
514 return system_get_dev_sysctl("/proc/sys/net/ipv4/conf/%s/accept_local",
515 dev->ifname, buf, buf_sz);
516 }
517
518 static int system_get_igmpversion(struct device *dev, char *buf, const size_t buf_sz)
519 {
520 return system_get_dev_sysctl("/proc/sys/net/ipv4/conf/%s/force_igmp_version",
521 dev->ifname, buf, buf_sz);
522 }
523
524 static int system_get_mldversion(struct device *dev, char *buf, const size_t buf_sz)
525 {
526 return system_get_dev_sysctl("/proc/sys/net/ipv6/conf/%s/force_mld_version",
527 dev->ifname, buf, buf_sz);
528 }
529
530 static int system_get_neigh4reachabletime(struct device *dev, char *buf, const size_t buf_sz)
531 {
532 return system_get_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/base_reachable_time_ms",
533 dev->ifname, buf, buf_sz);
534 }
535
536 static int system_get_neigh6reachabletime(struct device *dev, char *buf, const size_t buf_sz)
537 {
538 return system_get_dev_sysctl("/proc/sys/net/ipv6/neigh/%s/base_reachable_time_ms",
539 dev->ifname, buf, buf_sz);
540 }
541
542 static int system_get_neigh4gcstaletime(struct device *dev, char *buf, const size_t buf_sz)
543 {
544 return system_get_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/gc_stale_time",
545 dev->ifname, buf, buf_sz);
546 }
547
548 static int system_get_neigh6gcstaletime(struct device *dev, char *buf, const size_t buf_sz)
549 {
550 return system_get_dev_sysctl("/proc/sys/net/ipv6/neigh/%s/gc_stale_time",
551 dev->ifname, buf, buf_sz);
552 }
553
554 static int system_get_neigh4locktime(struct device *dev, char *buf, const size_t buf_sz)
555 {
556 return system_get_dev_sysctl("/proc/sys/net/ipv4/neigh/%s/locktime",
557 dev->ifname, buf, buf_sz);
558 }
559
560 static int system_get_dadtransmits(struct device *dev, char *buf, const size_t buf_sz)
561 {
562 return system_get_dev_sysctl("/proc/sys/net/ipv6/conf/%s/dad_transmits",
563 dev->ifname, buf, buf_sz);
564 }
565
566 static int system_get_sendredirects(struct device *dev, char *buf, const size_t buf_sz)
567 {
568 return system_get_dev_sysctl("/proc/sys/net/ipv4/conf/%s/send_redirects",
569 dev->ifname, buf, buf_sz);
570 }
571
572 /* Evaluate netlink messages */
573 static int cb_rtnl_event(struct nl_msg *msg, void *arg)
574 {
575 struct nlmsghdr *nh = nlmsg_hdr(msg);
576 struct nlattr *nla[__IFLA_MAX];
577 int link_state = 0;
578 char buf[10];
579
580 if (nh->nlmsg_type != RTM_NEWLINK)
581 goto out;
582
583 nlmsg_parse(nh, sizeof(struct ifinfomsg), nla, __IFLA_MAX - 1, NULL);
584 if (!nla[IFLA_IFNAME])
585 goto out;
586
587 struct device *dev = device_find(nla_data(nla[IFLA_IFNAME]));
588 if (!dev)
589 goto out;
590
591 if (!system_get_dev_sysctl("/sys/class/net/%s/carrier", dev->ifname, buf, sizeof(buf)))
592 link_state = strtoul(buf, NULL, 0);
593
594 device_set_link(dev, link_state ? true : false);
595
596 out:
597 return 0;
598 }
599
600 static void
601 handle_hotplug_msg(char *data, int size)
602 {
603 const char *subsystem = NULL, *interface = NULL, *interface_old = NULL;
604 char *cur, *end, *sep;
605 struct device *dev;
606 int skip;
607 bool add, move = false;
608
609 if (!strncmp(data, "add@", 4))
610 add = true;
611 else if (!strncmp(data, "remove@", 7))
612 add = false;
613 else if (!strncmp(data, "move@", 5)) {
614 add = true;
615 move = true;
616 }
617 else
618 return;
619
620 skip = strlen(data) + 1;
621 end = data + size;
622
623 for (cur = data + skip; cur < end; cur += skip) {
624 skip = strlen(cur) + 1;
625
626 sep = strchr(cur, '=');
627 if (!sep)
628 continue;
629
630 *sep = 0;
631 if (!strcmp(cur, "INTERFACE"))
632 interface = sep + 1;
633 else if (!strcmp(cur, "SUBSYSTEM")) {
634 subsystem = sep + 1;
635 if (strcmp(subsystem, "net") != 0)
636 return;
637 } else if (!strcmp(cur, "DEVPATH_OLD")) {
638 interface_old = strrchr(sep + 1, '/');
639 if (interface_old)
640 interface_old++;
641 }
642 }
643
644 if (subsystem && interface) {
645 if (move && interface_old)
646 goto move;
647 else
648 goto found;
649 }
650
651 return;
652
653 move:
654 dev = device_find(interface_old);
655 if (!dev)
656 goto found;
657
658 if (dev->type != &simple_device_type)
659 goto found;
660
661 device_set_present(dev, false);
662
663 found:
664 dev = device_find(interface);
665 if (!dev)
666 return;
667
668 if (dev->type != &simple_device_type)
669 return;
670
671 if (add && system_if_force_external(dev->ifname))
672 return;
673
674 device_set_present(dev, add);
675 }
676
677 static void
678 handle_hotplug_event(struct uloop_fd *u, unsigned int events)
679 {
680 struct event_socket *ev = container_of(u, struct event_socket, uloop);
681 struct sockaddr_nl nla;
682 unsigned char *buf = NULL;
683 int size;
684 int err;
685 socklen_t errlen = sizeof(err);
686
687 if (!u->error) {
688 while ((size = nl_recv(ev->sock, &nla, &buf, NULL)) > 0) {
689 if (nla.nl_pid == 0)
690 handle_hotplug_msg((char *) buf, size);
691
692 free(buf);
693 }
694 return;
695 }
696
697 if (getsockopt(u->fd, SOL_SOCKET, SO_ERROR, (void *)&err, &errlen))
698 goto abort;
699
700 switch(err) {
701 case ENOBUFS:
702 /* Increase rx buffer size on netlink socket */
703 ev->bufsize *= 2;
704 if (nl_socket_set_buffer_size(ev->sock, ev->bufsize, 0))
705 goto abort;
706 break;
707
708 default:
709 goto abort;
710 }
711 u->error = false;
712 return;
713
714 abort:
715 uloop_fd_delete(&ev->uloop);
716 return;
717 }
718
719 static int system_rtnl_call(struct nl_msg *msg)
720 {
721 int ret;
722
723 ret = nl_send_auto_complete(sock_rtnl, msg);
724 nlmsg_free(msg);
725
726 if (ret < 0)
727 return ret;
728
729 return nl_wait_for_ack(sock_rtnl);
730 }
731
732 int system_bridge_delbr(struct device *bridge)
733 {
734 return ioctl(sock_ioctl, SIOCBRDELBR, bridge->ifname);
735 }
736
737 static int system_bridge_if(const char *bridge, struct device *dev, int cmd, void *data)
738 {
739 struct ifreq ifr;
740
741 memset(&ifr, 0, sizeof(ifr));
742 if (dev)
743 ifr.ifr_ifindex = dev->ifindex;
744 else
745 ifr.ifr_data = data;
746 strncpy(ifr.ifr_name, bridge, sizeof(ifr.ifr_name) - 1);
747 return ioctl(sock_ioctl, cmd, &ifr);
748 }
749
750 static bool system_is_bridge(const char *name, char *buf, int buflen)
751 {
752 struct stat st;
753
754 snprintf(buf, buflen, "/sys/devices/virtual/net/%s/bridge", name);
755 if (stat(buf, &st) < 0)
756 return false;
757
758 return true;
759 }
760
761 static char *system_get_bridge(const char *name, char *buf, int buflen)
762 {
763 char *path;
764 ssize_t len = -1;
765 glob_t gl;
766
767 snprintf(buf, buflen, "/sys/devices/virtual/net/*/brif/%s/bridge", name);
768 if (glob(buf, GLOB_NOSORT, NULL, &gl) < 0)
769 return NULL;
770
771 if (gl.gl_pathc > 0)
772 len = readlink(gl.gl_pathv[0], buf, buflen);
773
774 globfree(&gl);
775
776 if (len < 0)
777 return NULL;
778
779 buf[len] = 0;
780 path = strrchr(buf, '/');
781 if (!path)
782 return NULL;
783
784 return path + 1;
785 }
786
787 static void
788 system_bridge_set_wireless(struct device *bridge, struct device *dev)
789 {
790 bool mcast_to_ucast = dev->wireless_ap;
791 bool hairpin = true;
792
793 if (bridge->settings.flags & DEV_OPT_MULTICAST_TO_UNICAST &&
794 !bridge->settings.multicast_to_unicast)
795 mcast_to_ucast = false;
796
797 if (!mcast_to_ucast || dev->wireless_isolate)
798 hairpin = false;
799
800 system_bridge_set_multicast_to_unicast(dev, mcast_to_ucast ? "1" : "0");
801 system_bridge_set_hairpin_mode(dev, hairpin ? "1" : "0");
802 }
803
804 int system_bridge_addif(struct device *bridge, struct device *dev)
805 {
806 char buf[64];
807 char *oldbr;
808 int ret = 0;
809
810 oldbr = system_get_bridge(dev->ifname, dev_buf, sizeof(dev_buf));
811 if (!oldbr || strcmp(oldbr, bridge->ifname) != 0)
812 ret = system_bridge_if(bridge->ifname, dev, SIOCBRADDIF, NULL);
813
814 if (dev->wireless)
815 system_bridge_set_wireless(bridge, dev);
816
817 if (dev->settings.flags & DEV_OPT_MULTICAST_ROUTER) {
818 snprintf(buf, sizeof(buf), "%u", dev->settings.multicast_router);
819 system_bridge_set_multicast_router(dev, buf, false);
820 }
821
822 if (dev->settings.flags & DEV_OPT_MULTICAST_FAST_LEAVE &&
823 dev->settings.multicast_fast_leave)
824 system_bridge_set_multicast_fast_leave(dev, "1");
825
826 if (dev->settings.flags & DEV_OPT_LEARNING &&
827 !dev->settings.learning)
828 system_bridge_set_learning(dev, "0");
829
830 if (dev->settings.flags & DEV_OPT_UNICAST_FLOOD &&
831 !dev->settings.unicast_flood)
832 system_bridge_set_unicast_flood(dev, "0");
833
834 if (dev->settings.flags & DEV_OPT_ISOLATE &&
835 dev->settings.isolate)
836 system_bridge_set_isolated(dev, "1");
837
838 return ret;
839 }
840
841 int system_bridge_delif(struct device *bridge, struct device *dev)
842 {
843 return system_bridge_if(bridge->ifname, dev, SIOCBRDELIF, NULL);
844 }
845
846 int system_if_resolve(struct device *dev)
847 {
848 struct ifreq ifr;
849 strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name) - 1);
850 if (!ioctl(sock_ioctl, SIOCGIFINDEX, &ifr))
851 return ifr.ifr_ifindex;
852 else
853 return 0;
854 }
855
856 static int system_if_flags(const char *ifname, unsigned add, unsigned rem)
857 {
858 struct ifreq ifr;
859
860 memset(&ifr, 0, sizeof(ifr));
861 strncpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name) - 1);
862 if (ioctl(sock_ioctl, SIOCGIFFLAGS, &ifr) < 0)
863 return -1;
864
865 ifr.ifr_flags |= add;
866 ifr.ifr_flags &= ~rem;
867 return ioctl(sock_ioctl, SIOCSIFFLAGS, &ifr);
868 }
869
870 struct clear_data {
871 struct nl_msg *msg;
872 struct device *dev;
873 int type;
874 int size;
875 int af;
876 };
877
878
879 static bool check_ifaddr(struct nlmsghdr *hdr, int ifindex)
880 {
881 struct ifaddrmsg *ifa = NLMSG_DATA(hdr);
882
883 return ifa->ifa_index == ifindex;
884 }
885
886 static bool check_route(struct nlmsghdr *hdr, int ifindex)
887 {
888 struct rtmsg *r = NLMSG_DATA(hdr);
889 struct nlattr *tb[__RTA_MAX];
890
891 if (r->rtm_protocol == RTPROT_KERNEL &&
892 r->rtm_family == AF_INET6)
893 return false;
894
895 nlmsg_parse(hdr, sizeof(struct rtmsg), tb, __RTA_MAX - 1, NULL);
896 if (!tb[RTA_OIF])
897 return false;
898
899 return *(int *)RTA_DATA(tb[RTA_OIF]) == ifindex;
900 }
901
902 static bool check_rule(struct nlmsghdr *hdr, int ifindex)
903 {
904 return true;
905 }
906
907 static int cb_clear_event(struct nl_msg *msg, void *arg)
908 {
909 struct clear_data *clr = arg;
910 struct nlmsghdr *hdr = nlmsg_hdr(msg);
911 bool (*cb)(struct nlmsghdr *, int ifindex);
912 int type, ret;
913
914 switch(clr->type) {
915 case RTM_GETADDR:
916 type = RTM_DELADDR;
917 if (hdr->nlmsg_type != RTM_NEWADDR)
918 return NL_SKIP;
919
920 cb = check_ifaddr;
921 break;
922 case RTM_GETROUTE:
923 type = RTM_DELROUTE;
924 if (hdr->nlmsg_type != RTM_NEWROUTE)
925 return NL_SKIP;
926
927 cb = check_route;
928 break;
929 case RTM_GETRULE:
930 type = RTM_DELRULE;
931 if (hdr->nlmsg_type != RTM_NEWRULE)
932 return NL_SKIP;
933
934 cb = check_rule;
935 break;
936 default:
937 return NL_SKIP;
938 }
939
940 if (!cb(hdr, clr->dev ? clr->dev->ifindex : 0))
941 return NL_SKIP;
942
943 if (type == RTM_DELRULE)
944 D(SYSTEM, "Remove a rule\n");
945 else
946 D(SYSTEM, "Remove %s from device %s\n",
947 type == RTM_DELADDR ? "an address" : "a route",
948 clr->dev->ifname);
949
950 memcpy(nlmsg_hdr(clr->msg), hdr, hdr->nlmsg_len);
951 hdr = nlmsg_hdr(clr->msg);
952 hdr->nlmsg_type = type;
953 hdr->nlmsg_flags = NLM_F_REQUEST;
954
955 nl_socket_disable_auto_ack(sock_rtnl);
956 ret = nl_send_auto_complete(sock_rtnl, clr->msg);
957 if (ret < 0) {
958 if (type == RTM_DELRULE)
959 D(SYSTEM, "Error deleting a rule: %d\n", ret);
960 else
961 D(SYSTEM, "Error deleting %s from device '%s': %d\n",
962 type == RTM_DELADDR ? "an address" : "a route",
963 clr->dev->ifname, ret);
964 }
965
966 nl_socket_enable_auto_ack(sock_rtnl);
967
968 return NL_SKIP;
969 }
970
971 static int
972 cb_finish_event(struct nl_msg *msg, void *arg)
973 {
974 int *pending = arg;
975 *pending = 0;
976 return NL_STOP;
977 }
978
979 static int
980 error_handler(struct sockaddr_nl *nla, struct nlmsgerr *err, void *arg)
981 {
982 int *pending = arg;
983 *pending = err->error;
984 return NL_STOP;
985 }
986
987 static void
988 system_if_clear_entries(struct device *dev, int type, int af)
989 {
990 struct clear_data clr;
991 struct nl_cb *cb;
992 struct rtmsg rtm = {
993 .rtm_family = af,
994 .rtm_flags = RTM_F_CLONED,
995 };
996 int flags = NLM_F_DUMP;
997 int pending = 1;
998
999 clr.af = af;
1000 clr.dev = dev;
1001 clr.type = type;
1002 switch (type) {
1003 case RTM_GETADDR:
1004 case RTM_GETRULE:
1005 clr.size = sizeof(struct rtgenmsg);
1006 break;
1007 case RTM_GETROUTE:
1008 clr.size = sizeof(struct rtmsg);
1009 break;
1010 default:
1011 return;
1012 }
1013
1014 cb = nl_cb_alloc(NL_CB_DEFAULT);
1015 if (!cb)
1016 return;
1017
1018 clr.msg = nlmsg_alloc_simple(type, flags);
1019 if (!clr.msg)
1020 goto out;
1021
1022 nlmsg_append(clr.msg, &rtm, clr.size, 0);
1023 nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, cb_clear_event, &clr);
1024 nl_cb_set(cb, NL_CB_FINISH, NL_CB_CUSTOM, cb_finish_event, &pending);
1025 nl_cb_err(cb, NL_CB_CUSTOM, error_handler, &pending);
1026
1027 if (nl_send_auto_complete(sock_rtnl, clr.msg) < 0)
1028 goto free;
1029
1030 while (pending > 0)
1031 nl_recvmsgs(sock_rtnl, cb);
1032
1033 free:
1034 nlmsg_free(clr.msg);
1035 out:
1036 nl_cb_put(cb);
1037 }
1038
1039 /*
1040 * Clear bridge (membership) state and bring down device
1041 */
1042 void system_if_clear_state(struct device *dev)
1043 {
1044 static char buf[256];
1045 char *bridge;
1046 device_set_ifindex(dev, system_if_resolve(dev));
1047
1048 if (dev->external || !dev->ifindex)
1049 return;
1050
1051 system_if_flags(dev->ifname, 0, IFF_UP);
1052
1053 if (system_is_bridge(dev->ifname, buf, sizeof(buf))) {
1054 D(SYSTEM, "Delete existing bridge named '%s'\n", dev->ifname);
1055 system_bridge_delbr(dev);
1056 return;
1057 }
1058
1059 bridge = system_get_bridge(dev->ifname, buf, sizeof(buf));
1060 if (bridge) {
1061 D(SYSTEM, "Remove device '%s' from bridge '%s'\n", dev->ifname, bridge);
1062 system_bridge_if(bridge, dev, SIOCBRDELIF, NULL);
1063 }
1064
1065 system_if_clear_entries(dev, RTM_GETROUTE, AF_INET);
1066 system_if_clear_entries(dev, RTM_GETADDR, AF_INET);
1067 system_if_clear_entries(dev, RTM_GETROUTE, AF_INET6);
1068 system_if_clear_entries(dev, RTM_GETADDR, AF_INET6);
1069 system_if_clear_entries(dev, RTM_GETNEIGH, AF_INET);
1070 system_if_clear_entries(dev, RTM_GETNEIGH, AF_INET6);
1071 system_set_disable_ipv6(dev, "0");
1072 }
1073
1074 static inline unsigned long
1075 sec_to_jiffies(int val)
1076 {
1077 return (unsigned long) val * 100;
1078 }
1079
1080 static void system_bridge_conf_multicast_deps(struct device *bridge,
1081 struct bridge_config *cfg,
1082 char *buf,
1083 int buf_len)
1084 {
1085 int val;
1086
1087 if (cfg->flags & BRIDGE_OPT_ROBUSTNESS ||
1088 cfg->flags & BRIDGE_OPT_QUERY_INTERVAL ||
1089 cfg->flags & BRIDGE_OPT_QUERY_RESPONSE_INTERVAL) {
1090 val = cfg->robustness * cfg->query_interval +
1091 cfg->query_response_interval;
1092
1093 snprintf(buf, buf_len, "%i", val);
1094 system_bridge_set_membership_interval(bridge, buf);
1095
1096 val = cfg->robustness * cfg->query_interval +
1097 cfg->query_response_interval / 2;
1098
1099 snprintf(buf, buf_len, "%i", val);
1100 system_bridge_set_other_querier_timeout(bridge, buf);
1101 }
1102
1103 if (cfg->flags & BRIDGE_OPT_QUERY_INTERVAL) {
1104 val = cfg->query_interval / 4;
1105
1106 snprintf(buf, buf_len, "%i", val);
1107 system_bridge_set_startup_query_interval(bridge, buf);
1108 }
1109 }
1110
1111 static void system_bridge_conf_multicast(struct device *bridge,
1112 struct bridge_config *cfg,
1113 char *buf,
1114 int buf_len)
1115 {
1116 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_snooping",
1117 bridge->ifname, cfg->igmp_snoop ? "1" : "0");
1118
1119 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_querier",
1120 bridge->ifname, cfg->multicast_querier ? "1" : "0");
1121
1122 snprintf(buf, buf_len, "%i", cfg->hash_max);
1123 system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/hash_max",
1124 bridge->ifname, buf);
1125
1126 if (bridge->settings.flags & DEV_OPT_MULTICAST_ROUTER) {
1127 snprintf(buf, buf_len, "%u", bridge->settings.multicast_router);
1128 system_bridge_set_multicast_router(bridge, buf, true);
1129 }
1130
1131 if (cfg->flags & BRIDGE_OPT_ROBUSTNESS) {
1132 snprintf(buf, buf_len, "%i", cfg->robustness);
1133 system_bridge_set_robustness(bridge, buf);
1134 }
1135
1136 if (cfg->flags & BRIDGE_OPT_QUERY_INTERVAL) {
1137 snprintf(buf, buf_len, "%i", cfg->query_interval);
1138 system_bridge_set_query_interval(bridge, buf);
1139 }
1140
1141 if (cfg->flags & BRIDGE_OPT_QUERY_RESPONSE_INTERVAL) {
1142 snprintf(buf, buf_len, "%i", cfg->query_response_interval);
1143 system_bridge_set_query_response_interval(bridge, buf);
1144 }
1145
1146 if (cfg->flags & BRIDGE_OPT_LAST_MEMBER_INTERVAL) {
1147 snprintf(buf, buf_len, "%i", cfg->last_member_interval);
1148 system_bridge_set_last_member_interval(bridge, buf);
1149 }
1150
1151 system_bridge_conf_multicast_deps(bridge, cfg, buf, buf_len);
1152 }
1153
1154 int system_bridge_addbr(struct device *bridge, struct bridge_config *cfg)
1155 {
1156 char buf[64];
1157
1158 if (ioctl(sock_ioctl, SIOCBRADDBR, bridge->ifname) < 0)
1159 return -1;
1160
1161 system_bridge_set_stp_state(bridge, cfg->stp ? "1" : "0");
1162
1163 snprintf(buf, sizeof(buf), "%lu", sec_to_jiffies(cfg->forward_delay));
1164 system_bridge_set_forward_delay(bridge, buf);
1165
1166 system_bridge_conf_multicast(bridge, cfg, buf, sizeof(buf));
1167
1168 snprintf(buf, sizeof(buf), "%d", cfg->priority);
1169 system_bridge_set_priority(bridge, buf);
1170
1171 if (cfg->flags & BRIDGE_OPT_AGEING_TIME) {
1172 snprintf(buf, sizeof(buf), "%lu", sec_to_jiffies(cfg->ageing_time));
1173 system_bridge_set_ageing_time(bridge, buf);
1174 }
1175
1176 if (cfg->flags & BRIDGE_OPT_HELLO_TIME) {
1177 snprintf(buf, sizeof(buf), "%lu", sec_to_jiffies(cfg->hello_time));
1178 system_bridge_set_hello_time(bridge, buf);
1179 }
1180
1181 if (cfg->flags & BRIDGE_OPT_MAX_AGE) {
1182 snprintf(buf, sizeof(buf), "%lu", sec_to_jiffies(cfg->max_age));
1183 system_bridge_set_max_age(bridge, buf);
1184 }
1185
1186 return 0;
1187 }
1188
1189 int system_macvlan_add(struct device *macvlan, struct device *dev, struct macvlan_config *cfg)
1190 {
1191 struct nl_msg *msg;
1192 struct nlattr *linkinfo, *data;
1193 struct ifinfomsg iim = { .ifi_family = AF_UNSPEC, };
1194 int i, rv;
1195 static const struct {
1196 const char *name;
1197 enum macvlan_mode val;
1198 } modes[] = {
1199 { "private", MACVLAN_MODE_PRIVATE },
1200 { "vepa", MACVLAN_MODE_VEPA },
1201 { "bridge", MACVLAN_MODE_BRIDGE },
1202 { "passthru", MACVLAN_MODE_PASSTHRU },
1203 };
1204
1205 msg = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_CREATE | NLM_F_EXCL);
1206
1207 if (!msg)
1208 return -1;
1209
1210 nlmsg_append(msg, &iim, sizeof(iim), 0);
1211
1212 if (cfg->flags & MACVLAN_OPT_MACADDR)
1213 nla_put(msg, IFLA_ADDRESS, sizeof(cfg->macaddr), cfg->macaddr);
1214 nla_put_string(msg, IFLA_IFNAME, macvlan->ifname);
1215 nla_put_u32(msg, IFLA_LINK, dev->ifindex);
1216
1217 if (!(linkinfo = nla_nest_start(msg, IFLA_LINKINFO)))
1218 goto nla_put_failure;
1219
1220 nla_put_string(msg, IFLA_INFO_KIND, "macvlan");
1221
1222 if (!(data = nla_nest_start(msg, IFLA_INFO_DATA)))
1223 goto nla_put_failure;
1224
1225 if (cfg->mode) {
1226 for (i = 0; i < ARRAY_SIZE(modes); i++) {
1227 if (strcmp(cfg->mode, modes[i].name) != 0)
1228 continue;
1229
1230 nla_put_u32(msg, IFLA_MACVLAN_MODE, modes[i].val);
1231 break;
1232 }
1233 }
1234
1235 nla_nest_end(msg, data);
1236 nla_nest_end(msg, linkinfo);
1237
1238 rv = system_rtnl_call(msg);
1239 if (rv)
1240 D(SYSTEM, "Error adding macvlan '%s' over '%s': %d\n", macvlan->ifname, dev->ifname, rv);
1241
1242 return rv;
1243
1244 nla_put_failure:
1245 nlmsg_free(msg);
1246 return -ENOMEM;
1247 }
1248
1249 int system_link_netns_move(struct device *dev, int netns_fd, const char *target_ifname)
1250 {
1251 struct nl_msg *msg;
1252 struct ifinfomsg iim = {
1253 .ifi_family = AF_UNSPEC,
1254 };
1255
1256 if (!dev)
1257 return -1;
1258
1259 iim.ifi_index = system_if_resolve(dev);
1260 msg = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST);
1261
1262 if (!msg)
1263 return -1;
1264
1265 nlmsg_append(msg, &iim, sizeof(iim), 0);
1266 if (target_ifname)
1267 nla_put_string(msg, IFLA_IFNAME, target_ifname);
1268
1269 nla_put_u32(msg, IFLA_NET_NS_FD, netns_fd);
1270 return system_rtnl_call(msg);
1271 }
1272
1273 static int system_link_del(const char *ifname)
1274 {
1275 struct nl_msg *msg;
1276 struct ifinfomsg iim = {
1277 .ifi_family = AF_UNSPEC,
1278 .ifi_index = 0,
1279 };
1280
1281 msg = nlmsg_alloc_simple(RTM_DELLINK, NLM_F_REQUEST);
1282
1283 if (!msg)
1284 return -1;
1285
1286 nlmsg_append(msg, &iim, sizeof(iim), 0);
1287 nla_put_string(msg, IFLA_IFNAME, ifname);
1288 return system_rtnl_call(msg);
1289 }
1290
1291 int system_macvlan_del(struct device *macvlan)
1292 {
1293 return system_link_del(macvlan->ifname);
1294 }
1295
1296 int system_netns_open(const pid_t target_ns)
1297 {
1298 char pid_net_path[PATH_MAX];
1299
1300 snprintf(pid_net_path, sizeof(pid_net_path), "/proc/%u/ns/net", target_ns);
1301
1302 return open(pid_net_path, O_RDONLY);
1303 }
1304
1305 int system_netns_set(int netns_fd)
1306 {
1307 return setns(netns_fd, CLONE_NEWNET);
1308 }
1309
1310 int system_veth_add(struct device *veth, struct veth_config *cfg)
1311 {
1312 struct nl_msg *msg;
1313 struct ifinfomsg empty_iim = {};
1314 struct nlattr *linkinfo, *data, *veth_info;
1315 int rv;
1316
1317 msg = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_CREATE | NLM_F_EXCL);
1318
1319 if (!msg)
1320 return -1;
1321
1322 nlmsg_append(msg, &empty_iim, sizeof(empty_iim), 0);
1323
1324 if (cfg->flags & VETH_OPT_MACADDR)
1325 nla_put(msg, IFLA_ADDRESS, sizeof(cfg->macaddr), cfg->macaddr);
1326 nla_put_string(msg, IFLA_IFNAME, veth->ifname);
1327
1328 if (!(linkinfo = nla_nest_start(msg, IFLA_LINKINFO)))
1329 goto nla_put_failure;
1330
1331 nla_put_string(msg, IFLA_INFO_KIND, "veth");
1332
1333 if (!(data = nla_nest_start(msg, IFLA_INFO_DATA)))
1334 goto nla_put_failure;
1335
1336 if (!(veth_info = nla_nest_start(msg, VETH_INFO_PEER)))
1337 goto nla_put_failure;
1338
1339 nlmsg_append(msg, &empty_iim, sizeof(empty_iim), 0);
1340
1341 if (cfg->flags & VETH_OPT_PEER_NAME)
1342 nla_put_string(msg, IFLA_IFNAME, cfg->peer_name);
1343 if (cfg->flags & VETH_OPT_PEER_MACADDR)
1344 nla_put(msg, IFLA_ADDRESS, sizeof(cfg->peer_macaddr), cfg->peer_macaddr);
1345
1346 nla_nest_end(msg, veth_info);
1347 nla_nest_end(msg, data);
1348 nla_nest_end(msg, linkinfo);
1349
1350 rv = system_rtnl_call(msg);
1351 if (rv) {
1352 if (cfg->flags & VETH_OPT_PEER_NAME)
1353 D(SYSTEM, "Error adding veth '%s' with peer '%s': %d\n", veth->ifname, cfg->peer_name, rv);
1354 else
1355 D(SYSTEM, "Error adding veth '%s': %d\n", veth->ifname, rv);
1356 }
1357
1358 return rv;
1359
1360 nla_put_failure:
1361 nlmsg_free(msg);
1362 return -ENOMEM;
1363 }
1364
1365 int system_veth_del(struct device *veth)
1366 {
1367 return system_link_del(veth->ifname);
1368 }
1369
1370 static int system_vlan(struct device *dev, int id)
1371 {
1372 struct vlan_ioctl_args ifr = {
1373 .cmd = SET_VLAN_NAME_TYPE_CMD,
1374 .u.name_type = VLAN_NAME_TYPE_RAW_PLUS_VID_NO_PAD,
1375 };
1376
1377 if (ioctl(sock_ioctl, SIOCSIFVLAN, &ifr) < 0)
1378 return -1;
1379
1380 if (id < 0) {
1381 ifr.cmd = DEL_VLAN_CMD;
1382 ifr.u.VID = 0;
1383 } else {
1384 ifr.cmd = ADD_VLAN_CMD;
1385 ifr.u.VID = id;
1386 }
1387 strncpy(ifr.device1, dev->ifname, sizeof(ifr.device1));
1388 return ioctl(sock_ioctl, SIOCSIFVLAN, &ifr);
1389 }
1390
1391 int system_vlan_add(struct device *dev, int id)
1392 {
1393 return system_vlan(dev, id);
1394 }
1395
1396 int system_vlan_del(struct device *dev)
1397 {
1398 return system_vlan(dev, -1);
1399 }
1400
1401 int system_vlandev_add(struct device *vlandev, struct device *dev, struct vlandev_config *cfg)
1402 {
1403 struct nl_msg *msg;
1404 struct nlattr *linkinfo, *data;
1405 struct ifinfomsg iim = { .ifi_family = AF_UNSPEC };
1406 int rv;
1407
1408 msg = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_CREATE | NLM_F_EXCL);
1409
1410 if (!msg)
1411 return -1;
1412
1413 nlmsg_append(msg, &iim, sizeof(iim), 0);
1414 nla_put_string(msg, IFLA_IFNAME, vlandev->ifname);
1415 nla_put_u32(msg, IFLA_LINK, dev->ifindex);
1416
1417 if (!(linkinfo = nla_nest_start(msg, IFLA_LINKINFO)))
1418 goto nla_put_failure;
1419
1420 nla_put_string(msg, IFLA_INFO_KIND, "vlan");
1421
1422 if (!(data = nla_nest_start(msg, IFLA_INFO_DATA)))
1423 goto nla_put_failure;
1424
1425 nla_put_u16(msg, IFLA_VLAN_ID, cfg->vid);
1426
1427 #if LINUX_VERSION_CODE >= KERNEL_VERSION(3,10,0)
1428 nla_put_u16(msg, IFLA_VLAN_PROTOCOL, htons(cfg->proto));
1429 #else
1430 if(cfg->proto == VLAN_PROTO_8021AD)
1431 netifd_log_message(L_WARNING, "%s Your kernel is older than linux 3.10.0, 802.1ad is not supported defaulting to 802.1q", vlandev->type->name);
1432 #endif
1433
1434 nla_nest_end(msg, data);
1435 nla_nest_end(msg, linkinfo);
1436
1437 rv = system_rtnl_call(msg);
1438 if (rv)
1439 D(SYSTEM, "Error adding vlandev '%s' over '%s': %d\n", vlandev->ifname, dev->ifname, rv);
1440
1441 return rv;
1442
1443 nla_put_failure:
1444 nlmsg_free(msg);
1445 return -ENOMEM;
1446 }
1447
1448 int system_vlandev_del(struct device *vlandev)
1449 {
1450 return system_link_del(vlandev->ifname);
1451 }
1452
1453 void
1454 system_if_get_settings(struct device *dev, struct device_settings *s)
1455 {
1456 struct ifreq ifr;
1457 char buf[10];
1458
1459 memset(&ifr, 0, sizeof(ifr));
1460 strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name) - 1);
1461
1462 if (ioctl(sock_ioctl, SIOCGIFMTU, &ifr) == 0) {
1463 s->mtu = ifr.ifr_mtu;
1464 s->flags |= DEV_OPT_MTU;
1465 }
1466
1467 s->mtu6 = system_update_ipv6_mtu(dev, 0);
1468 if (s->mtu6 > 0)
1469 s->flags |= DEV_OPT_MTU6;
1470
1471 if (ioctl(sock_ioctl, SIOCGIFTXQLEN, &ifr) == 0) {
1472 s->txqueuelen = ifr.ifr_qlen;
1473 s->flags |= DEV_OPT_TXQUEUELEN;
1474 }
1475
1476 if (ioctl(sock_ioctl, SIOCGIFHWADDR, &ifr) == 0) {
1477 memcpy(s->macaddr, &ifr.ifr_hwaddr.sa_data, sizeof(s->macaddr));
1478 s->flags |= DEV_OPT_MACADDR;
1479 }
1480
1481 if (!system_get_disable_ipv6(dev, buf, sizeof(buf))) {
1482 s->ipv6 = !strtoul(buf, NULL, 0);
1483 s->flags |= DEV_OPT_IPV6;
1484 }
1485
1486 if (ioctl(sock_ioctl, SIOCGIFFLAGS, &ifr) == 0) {
1487 s->promisc = ifr.ifr_flags & IFF_PROMISC;
1488 s->flags |= DEV_OPT_PROMISC;
1489
1490 s->multicast = ifr.ifr_flags & IFF_MULTICAST;
1491 s->flags |= DEV_OPT_MULTICAST;
1492 }
1493
1494 if (!system_get_rpfilter(dev, buf, sizeof(buf))) {
1495 s->rpfilter = strtoul(buf, NULL, 0);
1496 s->flags |= DEV_OPT_RPFILTER;
1497 }
1498
1499 if (!system_get_acceptlocal(dev, buf, sizeof(buf))) {
1500 s->acceptlocal = strtoul(buf, NULL, 0);
1501 s->flags |= DEV_OPT_ACCEPTLOCAL;
1502 }
1503
1504 if (!system_get_igmpversion(dev, buf, sizeof(buf))) {
1505 s->igmpversion = strtoul(buf, NULL, 0);
1506 s->flags |= DEV_OPT_IGMPVERSION;
1507 }
1508
1509 if (!system_get_mldversion(dev, buf, sizeof(buf))) {
1510 s->mldversion = strtoul(buf, NULL, 0);
1511 s->flags |= DEV_OPT_MLDVERSION;
1512 }
1513
1514 if (!system_get_neigh4reachabletime(dev, buf, sizeof(buf))) {
1515 s->neigh4reachabletime = strtoul(buf, NULL, 0);
1516 s->flags |= DEV_OPT_NEIGHREACHABLETIME;
1517 }
1518
1519 if (!system_get_neigh6reachabletime(dev, buf, sizeof(buf))) {
1520 s->neigh6reachabletime = strtoul(buf, NULL, 0);
1521 s->flags |= DEV_OPT_NEIGHREACHABLETIME;
1522 }
1523
1524 if (!system_get_neigh4locktime(dev, buf, sizeof(buf))) {
1525 s->neigh4locktime = strtol(buf, NULL, 0);
1526 s->flags |= DEV_OPT_NEIGHLOCKTIME;
1527 }
1528
1529 if (!system_get_neigh4gcstaletime(dev, buf, sizeof(buf))) {
1530 s->neigh4gcstaletime = strtoul(buf, NULL, 0);
1531 s->flags |= DEV_OPT_NEIGHGCSTALETIME;
1532 }
1533
1534 if (!system_get_neigh6gcstaletime(dev, buf, sizeof(buf))) {
1535 s->neigh6gcstaletime = strtoul(buf, NULL, 0);
1536 s->flags |= DEV_OPT_NEIGHGCSTALETIME;
1537 }
1538
1539 if (!system_get_dadtransmits(dev, buf, sizeof(buf))) {
1540 s->dadtransmits = strtoul(buf, NULL, 0);
1541 s->flags |= DEV_OPT_DADTRANSMITS;
1542 }
1543
1544 if (!system_get_sendredirects(dev, buf, sizeof(buf))) {
1545 s->sendredirects = strtoul(buf, NULL, 0);
1546 s->flags |= DEV_OPT_SENDREDIRECTS;
1547 }
1548 }
1549
1550 void
1551 system_if_apply_settings(struct device *dev, struct device_settings *s, unsigned int apply_mask)
1552 {
1553 struct ifreq ifr;
1554 char buf[12];
1555
1556 memset(&ifr, 0, sizeof(ifr));
1557 strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name) - 1);
1558 if (s->flags & DEV_OPT_MTU & apply_mask) {
1559 ifr.ifr_mtu = s->mtu;
1560 if (ioctl(sock_ioctl, SIOCSIFMTU, &ifr) < 0)
1561 s->flags &= ~DEV_OPT_MTU;
1562 }
1563 if (s->flags & DEV_OPT_MTU6 & apply_mask) {
1564 system_update_ipv6_mtu(dev, s->mtu6);
1565 }
1566 if (s->flags & DEV_OPT_TXQUEUELEN & apply_mask) {
1567 ifr.ifr_qlen = s->txqueuelen;
1568 if (ioctl(sock_ioctl, SIOCSIFTXQLEN, &ifr) < 0)
1569 s->flags &= ~DEV_OPT_TXQUEUELEN;
1570 }
1571 if ((s->flags & DEV_OPT_MACADDR & apply_mask) && !dev->external) {
1572 ifr.ifr_hwaddr.sa_family = ARPHRD_ETHER;
1573 memcpy(&ifr.ifr_hwaddr.sa_data, s->macaddr, sizeof(s->macaddr));
1574 if (ioctl(sock_ioctl, SIOCSIFHWADDR, &ifr) < 0)
1575 s->flags &= ~DEV_OPT_MACADDR;
1576 }
1577 if (s->flags & DEV_OPT_IPV6 & apply_mask)
1578 system_set_disable_ipv6(dev, s->ipv6 ? "0" : "1");
1579 if (s->flags & DEV_OPT_PROMISC & apply_mask) {
1580 if (system_if_flags(dev->ifname, s->promisc ? IFF_PROMISC : 0,
1581 !s->promisc ? IFF_PROMISC : 0) < 0)
1582 s->flags &= ~DEV_OPT_PROMISC;
1583 }
1584 if (s->flags & DEV_OPT_RPFILTER & apply_mask) {
1585 snprintf(buf, sizeof(buf), "%u", s->rpfilter);
1586 system_set_rpfilter(dev, buf);
1587 }
1588 if (s->flags & DEV_OPT_ACCEPTLOCAL & apply_mask)
1589 system_set_acceptlocal(dev, s->acceptlocal ? "1" : "0");
1590 if (s->flags & DEV_OPT_IGMPVERSION & apply_mask) {
1591 snprintf(buf, sizeof(buf), "%u", s->igmpversion);
1592 system_set_igmpversion(dev, buf);
1593 }
1594 if (s->flags & DEV_OPT_MLDVERSION & apply_mask) {
1595 snprintf(buf, sizeof(buf), "%u", s->mldversion);
1596 system_set_mldversion(dev, buf);
1597 }
1598 if (s->flags & DEV_OPT_NEIGHREACHABLETIME & apply_mask) {
1599 snprintf(buf, sizeof(buf), "%u", s->neigh4reachabletime);
1600 system_set_neigh4reachabletime(dev, buf);
1601 snprintf(buf, sizeof(buf), "%u", s->neigh6reachabletime);
1602 system_set_neigh6reachabletime(dev, buf);
1603 }
1604 if (s->flags & DEV_OPT_NEIGHLOCKTIME & apply_mask) {
1605 snprintf(buf, sizeof(buf), "%d", s->neigh4locktime);
1606 system_set_neigh4locktime(dev, buf);
1607 }
1608 if (s->flags & DEV_OPT_NEIGHGCSTALETIME & apply_mask) {
1609 snprintf(buf, sizeof(buf), "%u", s->neigh4gcstaletime);
1610 system_set_neigh4gcstaletime(dev, buf);
1611 snprintf(buf, sizeof(buf), "%u", s->neigh6gcstaletime);
1612 system_set_neigh6gcstaletime(dev, buf);
1613 }
1614 if (s->flags & DEV_OPT_DADTRANSMITS & apply_mask) {
1615 snprintf(buf, sizeof(buf), "%u", s->dadtransmits);
1616 system_set_dadtransmits(dev, buf);
1617 }
1618 if (s->flags & DEV_OPT_MULTICAST & apply_mask) {
1619 if (system_if_flags(dev->ifname, s->multicast ? IFF_MULTICAST : 0,
1620 !s->multicast ? IFF_MULTICAST : 0) < 0)
1621 s->flags &= ~DEV_OPT_MULTICAST;
1622 }
1623 if (s->flags & DEV_OPT_SENDREDIRECTS & apply_mask)
1624 system_set_sendredirects(dev, s->sendredirects ? "1" : "0");
1625 }
1626
1627 int system_if_up(struct device *dev)
1628 {
1629 system_if_get_settings(dev, &dev->orig_settings);
1630 /* Only keep orig settings based on what needs to be set */
1631 dev->orig_settings.valid_flags = dev->orig_settings.flags;
1632 dev->orig_settings.flags &= dev->settings.flags;
1633 system_if_apply_settings(dev, &dev->settings, dev->settings.flags);
1634 return system_if_flags(dev->ifname, IFF_UP, 0);
1635 }
1636
1637 int system_if_down(struct device *dev)
1638 {
1639 int ret = system_if_flags(dev->ifname, 0, IFF_UP);
1640 system_if_apply_settings(dev, &dev->orig_settings, dev->orig_settings.flags);
1641 return ret;
1642 }
1643
1644 struct if_check_data {
1645 struct device *dev;
1646 int pending;
1647 int ret;
1648 };
1649
1650 #ifndef IFF_LOWER_UP
1651 #define IFF_LOWER_UP 0x10000
1652 #endif
1653
1654 static int cb_if_check_valid(struct nl_msg *msg, void *arg)
1655 {
1656 struct nlmsghdr *nh = nlmsg_hdr(msg);
1657 struct ifinfomsg *ifi = NLMSG_DATA(nh);
1658 struct if_check_data *chk = (struct if_check_data *)arg;
1659
1660 if (nh->nlmsg_type != RTM_NEWLINK)
1661 return NL_SKIP;
1662
1663 device_set_present(chk->dev, ifi->ifi_index > 0 ? true : false);
1664 device_set_link(chk->dev, ifi->ifi_flags & IFF_LOWER_UP ? true : false);
1665
1666 return NL_OK;
1667 }
1668
1669 static int cb_if_check_ack(struct nl_msg *msg, void *arg)
1670 {
1671 struct if_check_data *chk = (struct if_check_data *)arg;
1672 chk->pending = 0;
1673 return NL_STOP;
1674 }
1675
1676 static int cb_if_check_error(struct sockaddr_nl *nla, struct nlmsgerr *err, void *arg)
1677 {
1678 struct if_check_data *chk = (struct if_check_data *)arg;
1679
1680 device_set_present(chk->dev, false);
1681 device_set_link(chk->dev, false);
1682 chk->pending = err->error;
1683
1684 return NL_STOP;
1685 }
1686
1687 int system_if_check(struct device *dev)
1688 {
1689 struct nl_cb *cb = nl_cb_alloc(NL_CB_DEFAULT);
1690 struct nl_msg *msg;
1691 struct ifinfomsg ifi = {
1692 .ifi_family = AF_UNSPEC,
1693 .ifi_index = 0,
1694 };
1695 struct if_check_data chk = {
1696 .dev = dev,
1697 .pending = 1,
1698 };
1699 int ret = 1;
1700
1701 if (!cb)
1702 return ret;
1703
1704 msg = nlmsg_alloc_simple(RTM_GETLINK, 0);
1705 if (!msg)
1706 goto out;
1707
1708 if (nlmsg_append(msg, &ifi, sizeof(ifi), 0) ||
1709 nla_put_string(msg, IFLA_IFNAME, dev->ifname))
1710 goto free;
1711
1712 nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, cb_if_check_valid, &chk);
1713 nl_cb_set(cb, NL_CB_ACK, NL_CB_CUSTOM, cb_if_check_ack, &chk);
1714 nl_cb_err(cb, NL_CB_CUSTOM, cb_if_check_error, &chk);
1715
1716 ret = nl_send_auto_complete(sock_rtnl, msg);
1717 if (ret < 0)
1718 goto free;
1719
1720 while (chk.pending > 0)
1721 nl_recvmsgs(sock_rtnl, cb);
1722
1723 ret = chk.pending;
1724
1725 free:
1726 nlmsg_free(msg);
1727 out:
1728 nl_cb_put(cb);
1729 return ret;
1730 }
1731
1732 struct device *
1733 system_if_get_parent(struct device *dev)
1734 {
1735 char buf[64], *devname;
1736 int ifindex, iflink, len;
1737 FILE *f;
1738
1739 snprintf(buf, sizeof(buf), "/sys/class/net/%s/iflink", dev->ifname);
1740 f = fopen(buf, "r");
1741 if (!f)
1742 return NULL;
1743
1744 len = fread(buf, 1, sizeof(buf) - 1, f);
1745 fclose(f);
1746
1747 if (len <= 0)
1748 return NULL;
1749
1750 buf[len] = 0;
1751 iflink = strtoul(buf, NULL, 0);
1752 ifindex = system_if_resolve(dev);
1753 if (!iflink || iflink == ifindex)
1754 return NULL;
1755
1756 devname = if_indextoname(iflink, buf);
1757 if (!devname)
1758 return NULL;
1759
1760 return device_get(devname, true);
1761 }
1762
1763 static bool
1764 read_string_file(int dir_fd, const char *file, char *buf, int len)
1765 {
1766 bool ret = false;
1767 char *c;
1768 int fd;
1769
1770 fd = openat(dir_fd, file, O_RDONLY);
1771 if (fd < 0)
1772 return false;
1773
1774 retry:
1775 len = read(fd, buf, len - 1);
1776 if (len < 0) {
1777 if (errno == EINTR)
1778 goto retry;
1779 } else if (len > 0) {
1780 buf[len] = 0;
1781
1782 c = strchr(buf, '\n');
1783 if (c)
1784 *c = 0;
1785
1786 ret = true;
1787 }
1788
1789 close(fd);
1790
1791 return ret;
1792 }
1793
1794 static bool
1795 read_uint64_file(int dir_fd, const char *file, uint64_t *val)
1796 {
1797 char buf[64];
1798 bool ret = false;
1799
1800 ret = read_string_file(dir_fd, file, buf, sizeof(buf));
1801 if (ret)
1802 *val = strtoull(buf, NULL, 0);
1803
1804 return ret;
1805 }
1806
1807 /* Assume advertised flags == supported flags */
1808 static const struct {
1809 uint32_t mask;
1810 const char *name;
1811 } ethtool_link_modes[] = {
1812 { ADVERTISED_10baseT_Half, "10baseT-H" },
1813 { ADVERTISED_10baseT_Full, "10baseT-F" },
1814 { ADVERTISED_100baseT_Half, "100baseT-H" },
1815 { ADVERTISED_100baseT_Full, "100baseT-F" },
1816 { ADVERTISED_1000baseT_Half, "1000baseT-H" },
1817 { ADVERTISED_1000baseT_Full, "1000baseT-F" },
1818 { ADVERTISED_1000baseKX_Full, "1000baseKX-F" },
1819 { ADVERTISED_2500baseX_Full, "2500baseX-F" },
1820 { ADVERTISED_10000baseT_Full, "10000baseT-F" },
1821 { ADVERTISED_10000baseKX4_Full, "10000baseKX4-F" },
1822 { ADVERTISED_10000baseKR_Full, "10000baseKR-F" },
1823 { ADVERTISED_20000baseMLD2_Full, "20000baseMLD2-F" },
1824 { ADVERTISED_20000baseKR2_Full, "20000baseKR2-F" },
1825 { ADVERTISED_40000baseKR4_Full, "40000baseKR4-F" },
1826 { ADVERTISED_40000baseCR4_Full, "40000baseCR4-F" },
1827 { ADVERTISED_40000baseSR4_Full, "40000baseSR4-F" },
1828 { ADVERTISED_40000baseLR4_Full, "40000baseLR4-F" },
1829 #ifdef ADVERTISED_56000baseKR4_Full
1830 { ADVERTISED_56000baseKR4_Full, "56000baseKR4-F" },
1831 { ADVERTISED_56000baseCR4_Full, "56000baseCR4-F" },
1832 { ADVERTISED_56000baseSR4_Full, "56000baseSR4-F" },
1833 { ADVERTISED_56000baseLR4_Full, "56000baseLR4-F" },
1834 #endif
1835 };
1836
1837 static void system_add_link_modes(struct blob_buf *b, __u32 mask)
1838 {
1839 int i;
1840 for (i = 0; i < ARRAY_SIZE(ethtool_link_modes); i++) {
1841 if (mask & ethtool_link_modes[i].mask)
1842 blobmsg_add_string(b, NULL, ethtool_link_modes[i].name);
1843 }
1844 }
1845
1846 bool
1847 system_if_force_external(const char *ifname)
1848 {
1849 char buf[64];
1850 struct stat s;
1851
1852 snprintf(buf, sizeof(buf), "/sys/class/net/%s/phy80211", ifname);
1853 return stat(buf, &s) == 0;
1854 }
1855
1856 int
1857 system_if_dump_info(struct device *dev, struct blob_buf *b)
1858 {
1859 struct ethtool_cmd ecmd;
1860 struct ifreq ifr;
1861 char *s;
1862 void *c;
1863
1864 memset(&ecmd, 0, sizeof(ecmd));
1865 memset(&ifr, 0, sizeof(ifr));
1866 strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name) - 1);
1867 ifr.ifr_data = (caddr_t) &ecmd;
1868 ecmd.cmd = ETHTOOL_GSET;
1869
1870 if (ioctl(sock_ioctl, SIOCETHTOOL, &ifr) == 0) {
1871 c = blobmsg_open_array(b, "link-advertising");
1872 system_add_link_modes(b, ecmd.advertising);
1873 blobmsg_close_array(b, c);
1874
1875 c = blobmsg_open_array(b, "link-partner-advertising");
1876 system_add_link_modes(b, ecmd.lp_advertising);
1877 blobmsg_close_array(b, c);
1878
1879 c = blobmsg_open_array(b, "link-supported");
1880 system_add_link_modes(b, ecmd.supported);
1881 blobmsg_close_array(b, c);
1882
1883 s = blobmsg_alloc_string_buffer(b, "speed", 8);
1884 snprintf(s, 8, "%d%c", ethtool_cmd_speed(&ecmd),
1885 ecmd.duplex == DUPLEX_HALF ? 'H' : 'F');
1886 blobmsg_add_string_buffer(b);
1887
1888 blobmsg_add_u8(b, "autoneg", !!ecmd.autoneg);
1889 }
1890
1891 return 0;
1892 }
1893
1894 int
1895 system_if_dump_stats(struct device *dev, struct blob_buf *b)
1896 {
1897 const char *const counters[] = {
1898 "collisions", "rx_frame_errors", "tx_compressed",
1899 "multicast", "rx_length_errors", "tx_dropped",
1900 "rx_bytes", "rx_missed_errors", "tx_errors",
1901 "rx_compressed", "rx_over_errors", "tx_fifo_errors",
1902 "rx_crc_errors", "rx_packets", "tx_heartbeat_errors",
1903 "rx_dropped", "tx_aborted_errors", "tx_packets",
1904 "rx_errors", "tx_bytes", "tx_window_errors",
1905 "rx_fifo_errors", "tx_carrier_errors",
1906 };
1907 char buf[64];
1908 int stats_dir;
1909 int i;
1910 uint64_t val = 0;
1911
1912 snprintf(buf, sizeof(buf), "/sys/class/net/%s/statistics", dev->ifname);
1913 stats_dir = open(buf, O_DIRECTORY);
1914 if (stats_dir < 0)
1915 return -1;
1916
1917 for (i = 0; i < ARRAY_SIZE(counters); i++)
1918 if (read_uint64_file(stats_dir, counters[i], &val))
1919 blobmsg_add_u64(b, counters[i], val);
1920
1921 close(stats_dir);
1922 return 0;
1923 }
1924
1925 static int system_addr(struct device *dev, struct device_addr *addr, int cmd)
1926 {
1927 bool v4 = ((addr->flags & DEVADDR_FAMILY) == DEVADDR_INET4);
1928 int alen = v4 ? 4 : 16;
1929 unsigned int flags = 0;
1930 struct ifaddrmsg ifa = {
1931 .ifa_family = (alen == 4) ? AF_INET : AF_INET6,
1932 .ifa_prefixlen = addr->mask,
1933 .ifa_index = dev->ifindex,
1934 };
1935
1936 struct nl_msg *msg;
1937 if (cmd == RTM_NEWADDR)
1938 flags |= NLM_F_CREATE | NLM_F_REPLACE;
1939
1940 msg = nlmsg_alloc_simple(cmd, flags);
1941 if (!msg)
1942 return -1;
1943
1944 nlmsg_append(msg, &ifa, sizeof(ifa), 0);
1945 nla_put(msg, IFA_LOCAL, alen, &addr->addr);
1946 if (v4) {
1947 if (addr->broadcast)
1948 nla_put_u32(msg, IFA_BROADCAST, addr->broadcast);
1949 if (addr->point_to_point)
1950 nla_put_u32(msg, IFA_ADDRESS, addr->point_to_point);
1951 } else {
1952 time_t now = system_get_rtime();
1953 struct ifa_cacheinfo cinfo = {0xffffffffU, 0xffffffffU, 0, 0};
1954
1955 if (addr->preferred_until) {
1956 int64_t preferred = addr->preferred_until - now;
1957 if (preferred < 0)
1958 preferred = 0;
1959 else if (preferred > UINT32_MAX)
1960 preferred = UINT32_MAX;
1961
1962 cinfo.ifa_prefered = preferred;
1963 }
1964
1965 if (addr->valid_until) {
1966 int64_t valid = addr->valid_until - now;
1967 if (valid <= 0) {
1968 nlmsg_free(msg);
1969 return -1;
1970 }
1971 else if (valid > UINT32_MAX)
1972 valid = UINT32_MAX;
1973
1974 cinfo.ifa_valid = valid;
1975 }
1976
1977 nla_put(msg, IFA_CACHEINFO, sizeof(cinfo), &cinfo);
1978
1979 if (cmd == RTM_NEWADDR && (addr->flags & DEVADDR_OFFLINK))
1980 nla_put_u32(msg, IFA_FLAGS, IFA_F_NOPREFIXROUTE);
1981 }
1982
1983 return system_rtnl_call(msg);
1984 }
1985
1986 int system_add_address(struct device *dev, struct device_addr *addr)
1987 {
1988 return system_addr(dev, addr, RTM_NEWADDR);
1989 }
1990
1991 int system_del_address(struct device *dev, struct device_addr *addr)
1992 {
1993 return system_addr(dev, addr, RTM_DELADDR);
1994 }
1995
1996 static int system_neigh(struct device *dev, struct device_neighbor *neighbor, int cmd)
1997 {
1998 int alen = ((neighbor->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
1999 unsigned int flags = 0;
2000 struct ndmsg ndm = {
2001 .ndm_family = (alen == 4) ? AF_INET : AF_INET6,
2002 .ndm_ifindex = dev->ifindex,
2003 .ndm_state = NUD_PERMANENT,
2004 .ndm_flags = (neighbor->proxy ? NTF_PROXY : 0) | (neighbor->router ? NTF_ROUTER : 0),
2005 };
2006 struct nl_msg *msg;
2007
2008 if (cmd == RTM_NEWNEIGH)
2009 flags |= NLM_F_CREATE | NLM_F_REPLACE;
2010
2011 msg = nlmsg_alloc_simple(cmd, flags);
2012
2013 if (!msg)
2014 return -1;
2015
2016 nlmsg_append(msg, &ndm, sizeof(ndm), 0);
2017
2018 nla_put(msg, NDA_DST, alen, &neighbor->addr);
2019 if (neighbor->flags & DEVNEIGH_MAC)
2020 nla_put(msg, NDA_LLADDR, sizeof(neighbor->macaddr), &neighbor->macaddr);
2021
2022
2023 return system_rtnl_call(msg);
2024 }
2025
2026 int system_add_neighbor(struct device *dev, struct device_neighbor *neighbor)
2027 {
2028 return system_neigh(dev, neighbor, RTM_NEWNEIGH);
2029 }
2030
2031 int system_del_neighbor(struct device *dev, struct device_neighbor *neighbor)
2032 {
2033 return system_neigh(dev, neighbor, RTM_DELNEIGH);
2034 }
2035
2036 static int system_rt(struct device *dev, struct device_route *route, int cmd)
2037 {
2038 int alen = ((route->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
2039 bool have_gw;
2040 unsigned int flags = 0;
2041
2042 if (alen == 4)
2043 have_gw = !!route->nexthop.in.s_addr;
2044 else
2045 have_gw = route->nexthop.in6.s6_addr32[0] ||
2046 route->nexthop.in6.s6_addr32[1] ||
2047 route->nexthop.in6.s6_addr32[2] ||
2048 route->nexthop.in6.s6_addr32[3];
2049
2050 unsigned int table = (route->flags & (DEVROUTE_TABLE | DEVROUTE_SRCTABLE))
2051 ? route->table : RT_TABLE_MAIN;
2052
2053 struct rtmsg rtm = {
2054 .rtm_family = (alen == 4) ? AF_INET : AF_INET6,
2055 .rtm_dst_len = route->mask,
2056 .rtm_src_len = route->sourcemask,
2057 .rtm_table = (table < 256) ? table : RT_TABLE_UNSPEC,
2058 .rtm_protocol = (route->flags & DEVROUTE_PROTO) ? route->proto : RTPROT_STATIC,
2059 .rtm_scope = RT_SCOPE_NOWHERE,
2060 .rtm_type = (cmd == RTM_DELROUTE) ? 0: RTN_UNICAST,
2061 .rtm_flags = (route->flags & DEVROUTE_ONLINK) ? RTNH_F_ONLINK : 0,
2062 };
2063 struct nl_msg *msg;
2064
2065 if (cmd == RTM_NEWROUTE) {
2066 flags |= NLM_F_CREATE | NLM_F_REPLACE;
2067
2068 if (!dev) { /* Add null-route */
2069 rtm.rtm_scope = RT_SCOPE_UNIVERSE;
2070 rtm.rtm_type = RTN_UNREACHABLE;
2071 }
2072 else
2073 rtm.rtm_scope = (have_gw) ? RT_SCOPE_UNIVERSE : RT_SCOPE_LINK;
2074 }
2075
2076 if (route->flags & DEVROUTE_TYPE) {
2077 rtm.rtm_type = route->type;
2078 if (!(route->flags & (DEVROUTE_TABLE | DEVROUTE_SRCTABLE))) {
2079 if (rtm.rtm_type == RTN_LOCAL || rtm.rtm_type == RTN_BROADCAST ||
2080 rtm.rtm_type == RTN_NAT || rtm.rtm_type == RTN_ANYCAST)
2081 rtm.rtm_table = RT_TABLE_LOCAL;
2082 }
2083
2084 if (rtm.rtm_type == RTN_LOCAL || rtm.rtm_type == RTN_NAT) {
2085 rtm.rtm_scope = RT_SCOPE_HOST;
2086 } else if (rtm.rtm_type == RTN_BROADCAST || rtm.rtm_type == RTN_MULTICAST ||
2087 rtm.rtm_type == RTN_ANYCAST) {
2088 rtm.rtm_scope = RT_SCOPE_LINK;
2089 } else if (rtm.rtm_type == RTN_BLACKHOLE || rtm.rtm_type == RTN_UNREACHABLE ||
2090 rtm.rtm_type == RTN_PROHIBIT || rtm.rtm_type == RTN_FAILED_POLICY ||
2091 rtm.rtm_type == RTN_THROW) {
2092 rtm.rtm_scope = RT_SCOPE_UNIVERSE;
2093 dev = NULL;
2094 }
2095 }
2096
2097 msg = nlmsg_alloc_simple(cmd, flags);
2098 if (!msg)
2099 return -1;
2100
2101 nlmsg_append(msg, &rtm, sizeof(rtm), 0);
2102
2103 if (route->mask)
2104 nla_put(msg, RTA_DST, alen, &route->addr);
2105
2106 if (route->sourcemask) {
2107 if (rtm.rtm_family == AF_INET)
2108 nla_put(msg, RTA_PREFSRC, alen, &route->source);
2109 else
2110 nla_put(msg, RTA_SRC, alen, &route->source);
2111 }
2112
2113 if (route->metric > 0)
2114 nla_put_u32(msg, RTA_PRIORITY, route->metric);
2115
2116 if (have_gw)
2117 nla_put(msg, RTA_GATEWAY, alen, &route->nexthop);
2118
2119 if (dev)
2120 nla_put_u32(msg, RTA_OIF, dev->ifindex);
2121
2122 if (table >= 256)
2123 nla_put_u32(msg, RTA_TABLE, table);
2124
2125 if (route->flags & DEVROUTE_MTU) {
2126 struct nlattr *metrics;
2127
2128 if (!(metrics = nla_nest_start(msg, RTA_METRICS)))
2129 goto nla_put_failure;
2130
2131 nla_put_u32(msg, RTAX_MTU, route->mtu);
2132
2133 nla_nest_end(msg, metrics);
2134 }
2135
2136 return system_rtnl_call(msg);
2137
2138 nla_put_failure:
2139 nlmsg_free(msg);
2140 return -ENOMEM;
2141 }
2142
2143 int system_add_route(struct device *dev, struct device_route *route)
2144 {
2145 return system_rt(dev, route, RTM_NEWROUTE);
2146 }
2147
2148 int system_del_route(struct device *dev, struct device_route *route)
2149 {
2150 return system_rt(dev, route, RTM_DELROUTE);
2151 }
2152
2153 int system_flush_routes(void)
2154 {
2155 const char *names[] = {
2156 "/proc/sys/net/ipv4/route/flush",
2157 "/proc/sys/net/ipv6/route/flush"
2158 };
2159 int fd, i;
2160
2161 for (i = 0; i < ARRAY_SIZE(names); i++) {
2162 fd = open(names[i], O_WRONLY);
2163 if (fd < 0)
2164 continue;
2165
2166 if (write(fd, "-1", 2)) {}
2167 close(fd);
2168 }
2169 return 0;
2170 }
2171
2172 bool system_resolve_rt_type(const char *type, unsigned int *id)
2173 {
2174 return system_rtn_aton(type, id);
2175 }
2176
2177 bool system_resolve_rt_proto(const char *type, unsigned int *id)
2178 {
2179 FILE *f;
2180 char *e, buf[128];
2181 unsigned int n, proto = 256;
2182 n = strtoul(type, &e, 0);
2183 if (!*e && e != type)
2184 proto = n;
2185 else if (!strcmp(type, "unspec"))
2186 proto = RTPROT_UNSPEC;
2187 else if (!strcmp(type, "kernel"))
2188 proto = RTPROT_KERNEL;
2189 else if (!strcmp(type, "boot"))
2190 proto = RTPROT_BOOT;
2191 else if (!strcmp(type, "static"))
2192 proto = RTPROT_STATIC;
2193 else if ((f = fopen("/etc/iproute2/rt_protos", "r")) != NULL) {
2194 while (fgets(buf, sizeof(buf) - 1, f) != NULL) {
2195 if ((e = strtok(buf, " \t\n")) == NULL || *e == '#')
2196 continue;
2197
2198 n = strtoul(e, NULL, 10);
2199 e = strtok(NULL, " \t\n");
2200
2201 if (e && !strcmp(e, type)) {
2202 proto = n;
2203 break;
2204 }
2205 }
2206 fclose(f);
2207 }
2208
2209 if (proto > 255)
2210 return false;
2211
2212 *id = proto;
2213 return true;
2214 }
2215
2216 bool system_resolve_rt_table(const char *name, unsigned int *id)
2217 {
2218 FILE *f;
2219 char *e, buf[128];
2220 unsigned int n, table = RT_TABLE_UNSPEC;
2221
2222 /* first try to parse table as number */
2223 if ((n = strtoul(name, &e, 0)) > 0 && !*e)
2224 table = n;
2225
2226 /* handle well known aliases */
2227 else if (!strcmp(name, "default"))
2228 table = RT_TABLE_DEFAULT;
2229 else if (!strcmp(name, "main"))
2230 table = RT_TABLE_MAIN;
2231 else if (!strcmp(name, "local"))
2232 table = RT_TABLE_LOCAL;
2233
2234 /* try to look up name in /etc/iproute2/rt_tables */
2235 else if ((f = fopen("/etc/iproute2/rt_tables", "r")) != NULL)
2236 {
2237 while (fgets(buf, sizeof(buf) - 1, f) != NULL)
2238 {
2239 if ((e = strtok(buf, " \t\n")) == NULL || *e == '#')
2240 continue;
2241
2242 n = strtoul(e, NULL, 10);
2243 e = strtok(NULL, " \t\n");
2244
2245 if (e && !strcmp(e, name))
2246 {
2247 table = n;
2248 break;
2249 }
2250 }
2251
2252 fclose(f);
2253 }
2254
2255 if (table == RT_TABLE_UNSPEC)
2256 return false;
2257
2258 *id = table;
2259 return true;
2260 }
2261
2262 bool system_is_default_rt_table(unsigned int id)
2263 {
2264 return (id == RT_TABLE_MAIN);
2265 }
2266
2267 bool system_resolve_rpfilter(const char *filter, unsigned int *id)
2268 {
2269 char *e;
2270 unsigned int n;
2271
2272 if (!strcmp(filter, "strict"))
2273 n = 1;
2274 else if (!strcmp(filter, "loose"))
2275 n = 2;
2276 else {
2277 n = strtoul(filter, &e, 0);
2278 if (*e || e == filter || n > 2)
2279 return false;
2280 }
2281
2282 *id = n;
2283 return true;
2284 }
2285
2286 static int system_iprule(struct iprule *rule, int cmd)
2287 {
2288 int alen = ((rule->flags & IPRULE_FAMILY) == IPRULE_INET4) ? 4 : 16;
2289
2290 struct nl_msg *msg;
2291 struct rtmsg rtm = {
2292 .rtm_family = (alen == 4) ? AF_INET : AF_INET6,
2293 .rtm_protocol = RTPROT_STATIC,
2294 .rtm_scope = RT_SCOPE_UNIVERSE,
2295 .rtm_table = RT_TABLE_UNSPEC,
2296 .rtm_type = RTN_UNSPEC,
2297 .rtm_flags = 0,
2298 };
2299
2300 if (cmd == RTM_NEWRULE)
2301 rtm.rtm_type = RTN_UNICAST;
2302
2303 if (rule->invert)
2304 rtm.rtm_flags |= FIB_RULE_INVERT;
2305
2306 if (rule->flags & IPRULE_SRC)
2307 rtm.rtm_src_len = rule->src_mask;
2308
2309 if (rule->flags & IPRULE_DEST)
2310 rtm.rtm_dst_len = rule->dest_mask;
2311
2312 if (rule->flags & IPRULE_TOS)
2313 rtm.rtm_tos = rule->tos;
2314
2315 if (rule->flags & IPRULE_LOOKUP) {
2316 if (rule->lookup < 256)
2317 rtm.rtm_table = rule->lookup;
2318 }
2319
2320 if (rule->flags & IPRULE_ACTION)
2321 rtm.rtm_type = rule->action;
2322 else if (rule->flags & IPRULE_GOTO)
2323 rtm.rtm_type = FR_ACT_GOTO;
2324 else if (!(rule->flags & (IPRULE_LOOKUP | IPRULE_ACTION | IPRULE_GOTO)))
2325 rtm.rtm_type = FR_ACT_NOP;
2326
2327 msg = nlmsg_alloc_simple(cmd, NLM_F_REQUEST);
2328
2329 if (!msg)
2330 return -1;
2331
2332 nlmsg_append(msg, &rtm, sizeof(rtm), 0);
2333
2334 if (rule->flags & IPRULE_IN)
2335 nla_put(msg, FRA_IFNAME, strlen(rule->in_dev) + 1, rule->in_dev);
2336
2337 if (rule->flags & IPRULE_OUT)
2338 nla_put(msg, FRA_OIFNAME, strlen(rule->out_dev) + 1, rule->out_dev);
2339
2340 if (rule->flags & IPRULE_SRC)
2341 nla_put(msg, FRA_SRC, alen, &rule->src_addr);
2342
2343 if (rule->flags & IPRULE_DEST)
2344 nla_put(msg, FRA_DST, alen, &rule->dest_addr);
2345
2346 if (rule->flags & IPRULE_PRIORITY)
2347 nla_put_u32(msg, FRA_PRIORITY, rule->priority);
2348 else if (cmd == RTM_NEWRULE)
2349 nla_put_u32(msg, FRA_PRIORITY, rule->order);
2350
2351 if (rule->flags & IPRULE_FWMARK)
2352 nla_put_u32(msg, FRA_FWMARK, rule->fwmark);
2353
2354 if (rule->flags & IPRULE_FWMASK)
2355 nla_put_u32(msg, FRA_FWMASK, rule->fwmask);
2356
2357 if (rule->flags & IPRULE_LOOKUP) {
2358 if (rule->lookup >= 256)
2359 nla_put_u32(msg, FRA_TABLE, rule->lookup);
2360 }
2361
2362 if (rule->flags & IPRULE_SUP_PREFIXLEN)
2363 nla_put_u32(msg, FRA_SUPPRESS_PREFIXLEN, rule->sup_prefixlen);
2364
2365 if (rule->flags & IPRULE_GOTO)
2366 nla_put_u32(msg, FRA_GOTO, rule->gotoid);
2367
2368 return system_rtnl_call(msg);
2369 }
2370
2371 int system_add_iprule(struct iprule *rule)
2372 {
2373 return system_iprule(rule, RTM_NEWRULE);
2374 }
2375
2376 int system_del_iprule(struct iprule *rule)
2377 {
2378 return system_iprule(rule, RTM_DELRULE);
2379 }
2380
2381 int system_flush_iprules(void)
2382 {
2383 int rv = 0;
2384 struct iprule rule;
2385
2386 system_if_clear_entries(NULL, RTM_GETRULE, AF_INET);
2387 system_if_clear_entries(NULL, RTM_GETRULE, AF_INET6);
2388
2389 memset(&rule, 0, sizeof(rule));
2390
2391
2392 rule.flags = IPRULE_INET4 | IPRULE_PRIORITY | IPRULE_LOOKUP;
2393
2394 rule.priority = 0;
2395 rule.lookup = RT_TABLE_LOCAL;
2396 rv |= system_iprule(&rule, RTM_NEWRULE);
2397
2398 rule.priority = 32766;
2399 rule.lookup = RT_TABLE_MAIN;
2400 rv |= system_iprule(&rule, RTM_NEWRULE);
2401
2402 rule.priority = 32767;
2403 rule.lookup = RT_TABLE_DEFAULT;
2404 rv |= system_iprule(&rule, RTM_NEWRULE);
2405
2406
2407 rule.flags = IPRULE_INET6 | IPRULE_PRIORITY | IPRULE_LOOKUP;
2408
2409 rule.priority = 0;
2410 rule.lookup = RT_TABLE_LOCAL;
2411 rv |= system_iprule(&rule, RTM_NEWRULE);
2412
2413 rule.priority = 32766;
2414 rule.lookup = RT_TABLE_MAIN;
2415 rv |= system_iprule(&rule, RTM_NEWRULE);
2416
2417 return rv;
2418 }
2419
2420 bool system_resolve_iprule_action(const char *action, unsigned int *id)
2421 {
2422 return system_rtn_aton(action, id);
2423 }
2424
2425 time_t system_get_rtime(void)
2426 {
2427 struct timespec ts;
2428 struct timeval tv;
2429
2430 if (clock_gettime(CLOCK_MONOTONIC, &ts) == 0)
2431 return ts.tv_sec;
2432
2433 if (gettimeofday(&tv, NULL) == 0)
2434 return tv.tv_sec;
2435
2436 return 0;
2437 }
2438
2439 #ifndef IP_DF
2440 #define IP_DF 0x4000
2441 #endif
2442
2443 static int tunnel_ioctl(const char *name, int cmd, void *p)
2444 {
2445 struct ifreq ifr;
2446
2447 memset(&ifr, 0, sizeof(ifr));
2448 strncpy(ifr.ifr_name, name, sizeof(ifr.ifr_name) - 1);
2449 ifr.ifr_ifru.ifru_data = p;
2450 return ioctl(sock_ioctl, cmd, &ifr);
2451 }
2452
2453 #ifdef IFLA_IPTUN_MAX
2454 static int system_add_ip6_tunnel(const char *name, const unsigned int link,
2455 struct blob_attr **tb)
2456 {
2457 struct nl_msg *nlm = nlmsg_alloc_simple(RTM_NEWLINK,
2458 NLM_F_REQUEST | NLM_F_REPLACE | NLM_F_CREATE);
2459 struct ifinfomsg ifi = { .ifi_family = AF_UNSPEC };
2460 struct blob_attr *cur;
2461 int ret = 0, ttl = 0;
2462
2463 if (!nlm)
2464 return -1;
2465
2466 nlmsg_append(nlm, &ifi, sizeof(ifi), 0);
2467 nla_put_string(nlm, IFLA_IFNAME, name);
2468
2469 if (link)
2470 nla_put_u32(nlm, IFLA_LINK, link);
2471
2472 struct nlattr *linkinfo = nla_nest_start(nlm, IFLA_LINKINFO);
2473 if (!linkinfo) {
2474 ret = -ENOMEM;
2475 goto failure;
2476 }
2477
2478 nla_put_string(nlm, IFLA_INFO_KIND, "ip6tnl");
2479 struct nlattr *infodata = nla_nest_start(nlm, IFLA_INFO_DATA);
2480 if (!infodata) {
2481 ret = -ENOMEM;
2482 goto failure;
2483 }
2484
2485 if (link)
2486 nla_put_u32(nlm, IFLA_IPTUN_LINK, link);
2487
2488 if ((cur = tb[TUNNEL_ATTR_TTL]))
2489 ttl = blobmsg_get_u32(cur);
2490
2491 nla_put_u8(nlm, IFLA_IPTUN_PROTO, IPPROTO_IPIP);
2492 nla_put_u8(nlm, IFLA_IPTUN_TTL, (ttl) ? ttl : 64);
2493
2494 struct in6_addr in6buf;
2495 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
2496 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2497 ret = -EINVAL;
2498 goto failure;
2499 }
2500 nla_put(nlm, IFLA_IPTUN_LOCAL, sizeof(in6buf), &in6buf);
2501 }
2502
2503 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
2504 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2505 ret = -EINVAL;
2506 goto failure;
2507 }
2508 nla_put(nlm, IFLA_IPTUN_REMOTE, sizeof(in6buf), &in6buf);
2509 }
2510
2511 if ((cur = tb[TUNNEL_ATTR_DATA])) {
2512 struct blob_attr *tb_data[__IPIP6_DATA_ATTR_MAX];
2513 uint32_t tun_flags = IP6_TNL_F_IGN_ENCAP_LIMIT;
2514
2515 blobmsg_parse(ipip6_data_attr_list.params, __IPIP6_DATA_ATTR_MAX, tb_data,
2516 blobmsg_data(cur), blobmsg_len(cur));
2517
2518 if ((cur = tb_data[IPIP6_DATA_ENCAPLIMIT])) {
2519 char *str = blobmsg_get_string(cur);
2520
2521 if (strcmp(str, "ignore")) {
2522 char *e;
2523 unsigned encap_limit = strtoul(str, &e, 0);
2524
2525 if (e == str || *e || encap_limit > 255) {
2526 ret = -EINVAL;
2527 goto failure;
2528 }
2529
2530 nla_put_u8(nlm, IFLA_IPTUN_ENCAP_LIMIT, encap_limit);
2531 tun_flags &= ~IP6_TNL_F_IGN_ENCAP_LIMIT;
2532 }
2533 }
2534
2535 #ifdef IFLA_IPTUN_FMR_MAX
2536 if ((cur = tb_data[IPIP6_DATA_FMRS])) {
2537 struct blob_attr *rcur;
2538 unsigned rrem, fmrcnt = 0;
2539 struct nlattr *fmrs = nla_nest_start(nlm, IFLA_IPTUN_FMRS);
2540
2541 if (!fmrs) {
2542 ret = -ENOMEM;
2543 goto failure;
2544 }
2545
2546 blobmsg_for_each_attr(rcur, cur, rrem) {
2547 struct blob_attr *tb_fmr[__FMR_DATA_ATTR_MAX], *tb_cur;
2548 struct in6_addr ip6prefix;
2549 struct in_addr ip4prefix;
2550 unsigned ip4len, ip6len, ealen, offset;
2551
2552 blobmsg_parse(fmr_data_attr_list.params, __FMR_DATA_ATTR_MAX, tb_fmr,
2553 blobmsg_data(rcur), blobmsg_len(rcur));
2554
2555 if (!(tb_cur = tb_fmr[FMR_DATA_PREFIX6]) ||
2556 !parse_ip_and_netmask(AF_INET6,
2557 blobmsg_data(tb_cur), &ip6prefix,
2558 &ip6len)) {
2559 ret = -EINVAL;
2560 goto failure;
2561 }
2562
2563 if (!(tb_cur = tb_fmr[FMR_DATA_PREFIX4]) ||
2564 !parse_ip_and_netmask(AF_INET,
2565 blobmsg_data(tb_cur), &ip4prefix,
2566 &ip4len)) {
2567 ret = -EINVAL;
2568 goto failure;
2569 }
2570
2571 if (!(tb_cur = tb_fmr[FMR_DATA_EALEN])) {
2572 ret = -EINVAL;
2573 goto failure;
2574 }
2575 ealen = blobmsg_get_u32(tb_cur);
2576
2577 if (!(tb_cur = tb_fmr[FMR_DATA_OFFSET])) {
2578 ret = -EINVAL;
2579 goto failure;
2580 }
2581 offset = blobmsg_get_u32(tb_cur);
2582
2583 struct nlattr *rule = nla_nest_start(nlm, ++fmrcnt);
2584 if (!rule) {
2585 ret = -ENOMEM;
2586 goto failure;
2587 }
2588
2589 nla_put(nlm, IFLA_IPTUN_FMR_IP6_PREFIX, sizeof(ip6prefix), &ip6prefix);
2590 nla_put(nlm, IFLA_IPTUN_FMR_IP4_PREFIX, sizeof(ip4prefix), &ip4prefix);
2591 nla_put_u8(nlm, IFLA_IPTUN_FMR_IP6_PREFIX_LEN, ip6len);
2592 nla_put_u8(nlm, IFLA_IPTUN_FMR_IP4_PREFIX_LEN, ip4len);
2593 nla_put_u8(nlm, IFLA_IPTUN_FMR_EA_LEN, ealen);
2594 nla_put_u8(nlm, IFLA_IPTUN_FMR_OFFSET, offset);
2595
2596 nla_nest_end(nlm, rule);
2597 }
2598
2599 nla_nest_end(nlm, fmrs);
2600 }
2601 #endif
2602 if (tun_flags)
2603 nla_put_u32(nlm, IFLA_IPTUN_FLAGS, tun_flags);
2604 }
2605
2606 nla_nest_end(nlm, infodata);
2607 nla_nest_end(nlm, linkinfo);
2608
2609 return system_rtnl_call(nlm);
2610
2611 failure:
2612 nlmsg_free(nlm);
2613 return ret;
2614 }
2615 #endif
2616
2617 #ifdef IFLA_IPTUN_MAX
2618 #define IP6_FLOWINFO_TCLASS htonl(0x0FF00000)
2619 static int system_add_gre_tunnel(const char *name, const char *kind,
2620 const unsigned int link, struct blob_attr **tb, bool v6)
2621 {
2622 struct nl_msg *nlm;
2623 struct ifinfomsg ifi = { .ifi_family = AF_UNSPEC, };
2624 struct blob_attr *cur;
2625 uint32_t ikey = 0, okey = 0, flowinfo = 0, flags6 = IP6_TNL_F_IGN_ENCAP_LIMIT;
2626 uint16_t iflags = 0, oflags = 0;
2627 uint8_t tos = 0;
2628 int ret = 0, ttl = 0;
2629 unsigned encap_limit = 0;
2630
2631 nlm = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_REPLACE | NLM_F_CREATE);
2632 if (!nlm)
2633 return -1;
2634
2635 nlmsg_append(nlm, &ifi, sizeof(ifi), 0);
2636 nla_put_string(nlm, IFLA_IFNAME, name);
2637
2638 struct nlattr *linkinfo = nla_nest_start(nlm, IFLA_LINKINFO);
2639 if (!linkinfo) {
2640 ret = -ENOMEM;
2641 goto failure;
2642 }
2643
2644 nla_put_string(nlm, IFLA_INFO_KIND, kind);
2645 struct nlattr *infodata = nla_nest_start(nlm, IFLA_INFO_DATA);
2646 if (!infodata) {
2647 ret = -ENOMEM;
2648 goto failure;
2649 }
2650
2651 if (link)
2652 nla_put_u32(nlm, IFLA_GRE_LINK, link);
2653
2654 if ((cur = tb[TUNNEL_ATTR_TTL]))
2655 ttl = blobmsg_get_u32(cur);
2656
2657 if ((cur = tb[TUNNEL_ATTR_TOS])) {
2658 char *str = blobmsg_get_string(cur);
2659 if (strcmp(str, "inherit")) {
2660 unsigned uval;
2661
2662 if (!system_tos_aton(str, &uval)) {
2663 ret = -EINVAL;
2664 goto failure;
2665 }
2666
2667 if (v6)
2668 flowinfo |= htonl(uval << 20) & IP6_FLOWINFO_TCLASS;
2669 else
2670 tos = uval;
2671 } else {
2672 if (v6)
2673 flags6 |= IP6_TNL_F_USE_ORIG_TCLASS;
2674 else
2675 tos = 1;
2676 }
2677 }
2678
2679 if ((cur = tb[TUNNEL_ATTR_DATA])) {
2680 struct blob_attr *tb_data[__GRE_DATA_ATTR_MAX];
2681
2682 blobmsg_parse(gre_data_attr_list.params, __GRE_DATA_ATTR_MAX, tb_data,
2683 blobmsg_data(cur), blobmsg_len(cur));
2684
2685 if ((cur = tb_data[GRE_DATA_IKEY])) {
2686 if ((ikey = blobmsg_get_u32(cur)))
2687 iflags |= GRE_KEY;
2688 }
2689
2690 if ((cur = tb_data[GRE_DATA_OKEY])) {
2691 if ((okey = blobmsg_get_u32(cur)))
2692 oflags |= GRE_KEY;
2693 }
2694
2695 if ((cur = tb_data[GRE_DATA_ICSUM])) {
2696 if (blobmsg_get_bool(cur))
2697 iflags |= GRE_CSUM;
2698 }
2699
2700 if ((cur = tb_data[GRE_DATA_OCSUM])) {
2701 if (blobmsg_get_bool(cur))
2702 oflags |= GRE_CSUM;
2703 }
2704
2705 if ((cur = tb_data[GRE_DATA_ISEQNO])) {
2706 if (blobmsg_get_bool(cur))
2707 iflags |= GRE_SEQ;
2708 }
2709
2710 if ((cur = tb_data[GRE_DATA_OSEQNO])) {
2711 if (blobmsg_get_bool(cur))
2712 oflags |= GRE_SEQ;
2713 }
2714
2715 if ((cur = tb_data[GRE_DATA_ENCAPLIMIT])) {
2716 char *str = blobmsg_get_string(cur);
2717
2718 if (strcmp(str, "ignore")) {
2719 char *e;
2720
2721 encap_limit = strtoul(str, &e, 0);
2722
2723 if (e == str || *e || encap_limit > 255) {
2724 ret = -EINVAL;
2725 goto failure;
2726 }
2727
2728 flags6 &= ~IP6_TNL_F_IGN_ENCAP_LIMIT;
2729 }
2730 }
2731 }
2732
2733 if (v6) {
2734 struct in6_addr in6buf;
2735 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
2736 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2737 ret = -EINVAL;
2738 goto failure;
2739 }
2740 nla_put(nlm, IFLA_GRE_LOCAL, sizeof(in6buf), &in6buf);
2741 }
2742
2743 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
2744 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2745 ret = -EINVAL;
2746 goto failure;
2747 }
2748 nla_put(nlm, IFLA_GRE_REMOTE, sizeof(in6buf), &in6buf);
2749 }
2750
2751 if (!(flags6 & IP6_TNL_F_IGN_ENCAP_LIMIT))
2752 nla_put_u8(nlm, IFLA_GRE_ENCAP_LIMIT, encap_limit);
2753
2754 if (flowinfo)
2755 nla_put_u32(nlm, IFLA_GRE_FLOWINFO, flowinfo);
2756
2757 if (flags6)
2758 nla_put_u32(nlm, IFLA_GRE_FLAGS, flags6);
2759
2760 if (!ttl)
2761 ttl = 64;
2762 } else {
2763 struct in_addr inbuf;
2764 bool set_df = true;
2765
2766 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
2767 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
2768 ret = -EINVAL;
2769 goto failure;
2770 }
2771 nla_put(nlm, IFLA_GRE_LOCAL, sizeof(inbuf), &inbuf);
2772 }
2773
2774 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
2775 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
2776 ret = -EINVAL;
2777 goto failure;
2778 }
2779 nla_put(nlm, IFLA_GRE_REMOTE, sizeof(inbuf), &inbuf);
2780
2781 if (IN_MULTICAST(ntohl(inbuf.s_addr))) {
2782 if (!okey) {
2783 okey = inbuf.s_addr;
2784 oflags |= GRE_KEY;
2785 }
2786
2787 if (!ikey) {
2788 ikey = inbuf.s_addr;
2789 iflags |= GRE_KEY;
2790 }
2791 }
2792 }
2793
2794 if ((cur = tb[TUNNEL_ATTR_DF]))
2795 set_df = blobmsg_get_bool(cur);
2796
2797 if (!set_df) {
2798 /* ttl != 0 and nopmtudisc are incompatible */
2799 if (ttl) {
2800 ret = -EINVAL;
2801 goto failure;
2802 }
2803 } else if (!ttl)
2804 ttl = 64;
2805
2806 nla_put_u8(nlm, IFLA_GRE_PMTUDISC, set_df ? 1 : 0);
2807
2808 nla_put_u8(nlm, IFLA_GRE_TOS, tos);
2809 }
2810
2811 if (ttl)
2812 nla_put_u8(nlm, IFLA_GRE_TTL, ttl);
2813
2814 if (oflags)
2815 nla_put_u16(nlm, IFLA_GRE_OFLAGS, oflags);
2816
2817 if (iflags)
2818 nla_put_u16(nlm, IFLA_GRE_IFLAGS, iflags);
2819
2820 if (okey)
2821 nla_put_u32(nlm, IFLA_GRE_OKEY, htonl(okey));
2822
2823 if (ikey)
2824 nla_put_u32(nlm, IFLA_GRE_IKEY, htonl(ikey));
2825
2826 nla_nest_end(nlm, infodata);
2827 nla_nest_end(nlm, linkinfo);
2828
2829 return system_rtnl_call(nlm);
2830
2831 failure:
2832 nlmsg_free(nlm);
2833 return ret;
2834 }
2835 #endif
2836
2837 #ifdef IFLA_VTI_MAX
2838 static int system_add_vti_tunnel(const char *name, const char *kind,
2839 const unsigned int link, struct blob_attr **tb, bool v6)
2840 {
2841 struct nl_msg *nlm;
2842 struct ifinfomsg ifi = { .ifi_family = AF_UNSPEC, };
2843 struct blob_attr *cur;
2844 int ret = 0;
2845
2846 nlm = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_REPLACE | NLM_F_CREATE);
2847 if (!nlm)
2848 return -1;
2849
2850 nlmsg_append(nlm, &ifi, sizeof(ifi), 0);
2851 nla_put_string(nlm, IFLA_IFNAME, name);
2852
2853 struct nlattr *linkinfo = nla_nest_start(nlm, IFLA_LINKINFO);
2854 if (!linkinfo) {
2855 ret = -ENOMEM;
2856 goto failure;
2857 }
2858
2859 nla_put_string(nlm, IFLA_INFO_KIND, kind);
2860 struct nlattr *infodata = nla_nest_start(nlm, IFLA_INFO_DATA);
2861 if (!infodata) {
2862 ret = -ENOMEM;
2863 goto failure;
2864 }
2865
2866 if (link)
2867 nla_put_u32(nlm, IFLA_VTI_LINK, link);
2868
2869 if (v6) {
2870 struct in6_addr in6buf;
2871 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
2872 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2873 ret = -EINVAL;
2874 goto failure;
2875 }
2876 nla_put(nlm, IFLA_VTI_LOCAL, sizeof(in6buf), &in6buf);
2877 }
2878
2879 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
2880 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
2881 ret = -EINVAL;
2882 goto failure;
2883 }
2884 nla_put(nlm, IFLA_VTI_REMOTE, sizeof(in6buf), &in6buf);
2885 }
2886
2887 } else {
2888 struct in_addr inbuf;
2889
2890 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
2891 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
2892 ret = -EINVAL;
2893 goto failure;
2894 }
2895 nla_put(nlm, IFLA_VTI_LOCAL, sizeof(inbuf), &inbuf);
2896 }
2897
2898 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
2899 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
2900 ret = -EINVAL;
2901 goto failure;
2902 }
2903 nla_put(nlm, IFLA_VTI_REMOTE, sizeof(inbuf), &inbuf);
2904 }
2905
2906 }
2907
2908 if ((cur = tb[TUNNEL_ATTR_DATA])) {
2909 struct blob_attr *tb_data[__VTI_DATA_ATTR_MAX];
2910 uint32_t ikey = 0, okey = 0;
2911
2912 blobmsg_parse(vti_data_attr_list.params, __VTI_DATA_ATTR_MAX, tb_data,
2913 blobmsg_data(cur), blobmsg_len(cur));
2914
2915 if ((cur = tb_data[VTI_DATA_IKEY])) {
2916 if ((ikey = blobmsg_get_u32(cur)))
2917 nla_put_u32(nlm, IFLA_VTI_IKEY, htonl(ikey));
2918 }
2919
2920 if ((cur = tb_data[VTI_DATA_OKEY])) {
2921 if ((okey = blobmsg_get_u32(cur)))
2922 nla_put_u32(nlm, IFLA_VTI_OKEY, htonl(okey));
2923 }
2924 }
2925
2926 nla_nest_end(nlm, infodata);
2927 nla_nest_end(nlm, linkinfo);
2928
2929 return system_rtnl_call(nlm);
2930
2931 failure:
2932 nlmsg_free(nlm);
2933 return ret;
2934 }
2935 #endif
2936
2937 #ifdef IFLA_XFRM_MAX
2938 static int system_add_xfrm_tunnel(const char *name, const char *kind,
2939 const unsigned int link, struct blob_attr **tb)
2940 {
2941 struct nl_msg *nlm;
2942 struct ifinfomsg ifi = { .ifi_family = AF_UNSPEC, };
2943 struct blob_attr *cur;
2944 int ret = 0;
2945
2946 nlm = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_REPLACE | NLM_F_CREATE);
2947 if (!nlm)
2948 return -1;
2949
2950 nlmsg_append(nlm, &ifi, sizeof(ifi), 0);
2951 nla_put_string(nlm, IFLA_IFNAME, name);
2952
2953 struct nlattr *linkinfo = nla_nest_start(nlm, IFLA_LINKINFO);
2954 if (!linkinfo) {
2955 ret = -ENOMEM;
2956 goto failure;
2957 }
2958
2959 nla_put_string(nlm, IFLA_INFO_KIND, kind);
2960 struct nlattr *infodata = nla_nest_start(nlm, IFLA_INFO_DATA);
2961 if (!infodata) {
2962 ret = -ENOMEM;
2963 goto failure;
2964 }
2965
2966 if (link)
2967 nla_put_u32(nlm, IFLA_XFRM_LINK, link);
2968
2969 if ((cur = tb[TUNNEL_ATTR_DATA])) {
2970 struct blob_attr *tb_data[__XFRM_DATA_ATTR_MAX];
2971 uint32_t if_id = 0;
2972
2973 blobmsg_parse(xfrm_data_attr_list.params, __XFRM_DATA_ATTR_MAX, tb_data,
2974 blobmsg_data(cur), blobmsg_len(cur));
2975
2976 if ((cur = tb_data[XFRM_DATA_IF_ID])) {
2977 if ((if_id = blobmsg_get_u32(cur)))
2978 nla_put_u32(nlm, IFLA_XFRM_IF_ID, if_id);
2979 }
2980
2981 }
2982
2983 nla_nest_end(nlm, infodata);
2984 nla_nest_end(nlm, linkinfo);
2985
2986 return system_rtnl_call(nlm);
2987
2988 failure:
2989 nlmsg_free(nlm);
2990 return ret;
2991 }
2992 #endif
2993
2994 #ifdef IFLA_VXLAN_MAX
2995 static int system_add_vxlan(const char *name, const unsigned int link, struct blob_attr **tb, bool v6)
2996 {
2997 struct blob_attr *tb_data[__VXLAN_DATA_ATTR_MAX];
2998 struct nl_msg *msg;
2999 struct nlattr *linkinfo, *data;
3000 struct ifinfomsg iim = { .ifi_family = AF_UNSPEC, };
3001 struct blob_attr *cur;
3002 int ret = 0;
3003
3004 if ((cur = tb[TUNNEL_ATTR_DATA]))
3005 blobmsg_parse(vxlan_data_attr_list.params, __VXLAN_DATA_ATTR_MAX, tb_data,
3006 blobmsg_data(cur), blobmsg_len(cur));
3007 else
3008 return -EINVAL;
3009
3010 msg = nlmsg_alloc_simple(RTM_NEWLINK, NLM_F_REQUEST | NLM_F_CREATE | NLM_F_EXCL);
3011
3012 if (!msg)
3013 return -1;
3014
3015 nlmsg_append(msg, &iim, sizeof(iim), 0);
3016
3017 nla_put_string(msg, IFLA_IFNAME, name);
3018
3019 if ((cur = tb_data[VXLAN_DATA_ATTR_MACADDR])) {
3020 struct ether_addr *ea = ether_aton(blobmsg_get_string(cur));
3021 if (!ea) {
3022 ret = -EINVAL;
3023 goto failure;
3024 }
3025
3026 nla_put(msg, IFLA_ADDRESS, ETH_ALEN, ea);
3027 }
3028
3029 if ((cur = tb[TUNNEL_ATTR_MTU])) {
3030 uint32_t mtu = blobmsg_get_u32(cur);
3031 nla_put_u32(msg, IFLA_MTU, mtu);
3032 }
3033
3034 if (!(linkinfo = nla_nest_start(msg, IFLA_LINKINFO))) {
3035 ret = -ENOMEM;
3036 goto failure;
3037 }
3038
3039 nla_put_string(msg, IFLA_INFO_KIND, "vxlan");
3040
3041 if (!(data = nla_nest_start(msg, IFLA_INFO_DATA))) {
3042 ret = -ENOMEM;
3043 goto failure;
3044 }
3045
3046 if (link)
3047 nla_put_u32(msg, IFLA_VXLAN_LINK, link);
3048
3049 if ((cur = tb_data[VXLAN_DATA_ATTR_ID])) {
3050 uint32_t id = blobmsg_get_u32(cur);
3051 if (id >= (1u << 24) - 1) {
3052 ret = -EINVAL;
3053 goto failure;
3054 }
3055
3056 nla_put_u32(msg, IFLA_VXLAN_ID, id);
3057 }
3058
3059 if (v6) {
3060 struct in6_addr in6buf;
3061 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
3062 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
3063 ret = -EINVAL;
3064 goto failure;
3065 }
3066 nla_put(msg, IFLA_VXLAN_LOCAL6, sizeof(in6buf), &in6buf);
3067 }
3068
3069 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
3070 if (inet_pton(AF_INET6, blobmsg_data(cur), &in6buf) < 1) {
3071 ret = -EINVAL;
3072 goto failure;
3073 }
3074 nla_put(msg, IFLA_VXLAN_GROUP6, sizeof(in6buf), &in6buf);
3075 }
3076 } else {
3077 struct in_addr inbuf;
3078
3079 if ((cur = tb[TUNNEL_ATTR_LOCAL])) {
3080 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
3081 ret = -EINVAL;
3082 goto failure;
3083 }
3084 nla_put(msg, IFLA_VXLAN_LOCAL, sizeof(inbuf), &inbuf);
3085 }
3086
3087 if ((cur = tb[TUNNEL_ATTR_REMOTE])) {
3088 if (inet_pton(AF_INET, blobmsg_data(cur), &inbuf) < 1) {
3089 ret = -EINVAL;
3090 goto failure;
3091 }
3092 nla_put(msg, IFLA_VXLAN_GROUP, sizeof(inbuf), &inbuf);
3093 }
3094 }
3095
3096 uint32_t port = 4789;
3097 if ((cur = tb_data[VXLAN_DATA_ATTR_PORT])) {
3098 port = blobmsg_get_u32(cur);
3099 if (port < 1 || port > 65535) {
3100 ret = -EINVAL;
3101 goto failure;
3102 }
3103 }
3104 nla_put_u16(msg, IFLA_VXLAN_PORT, htons(port));
3105
3106 if ((cur = tb_data[VXLAN_DATA_ATTR_RXCSUM])) {
3107 bool rxcsum = blobmsg_get_bool(cur);
3108 nla_put_u8(msg, IFLA_VXLAN_UDP_ZERO_CSUM6_RX, !rxcsum);
3109 }
3110
3111 if ((cur = tb_data[VXLAN_DATA_ATTR_TXCSUM])) {
3112 bool txcsum = blobmsg_get_bool(cur);
3113 nla_put_u8(msg, IFLA_VXLAN_UDP_CSUM, txcsum);
3114 nla_put_u8(msg, IFLA_VXLAN_UDP_ZERO_CSUM6_TX, !txcsum);
3115 }
3116
3117 if ((cur = tb[TUNNEL_ATTR_TOS])) {
3118 char *str = blobmsg_get_string(cur);
3119 unsigned tos = 1;
3120
3121 if (strcmp(str, "inherit")) {
3122 if (!system_tos_aton(str, &tos)) {
3123 ret = -EINVAL;
3124 goto failure;
3125 }
3126 }
3127
3128 nla_put_u8(msg, IFLA_VXLAN_TOS, tos);
3129 }
3130
3131 if ((cur = tb[TUNNEL_ATTR_TTL])) {
3132 uint32_t ttl = blobmsg_get_u32(cur);
3133 if (ttl < 1 || ttl > 255) {
3134 ret = -EINVAL;
3135 goto failure;
3136 }
3137
3138 nla_put_u8(msg, IFLA_VXLAN_TTL, ttl);
3139 }
3140
3141 nla_nest_end(msg, data);
3142 nla_nest_end(msg, linkinfo);
3143
3144 ret = system_rtnl_call(msg);
3145 if (ret)
3146 D(SYSTEM, "Error adding vxlan '%s': %d\n", name, ret);
3147
3148 return ret;
3149
3150 failure:
3151 nlmsg_free(msg);
3152 return ret;
3153 }
3154 #endif
3155
3156 static int system_add_sit_tunnel(const char *name, const unsigned int link, struct blob_attr **tb)
3157 {
3158 struct blob_attr *cur;
3159 int ret = 0;
3160
3161 if (system_add_proto_tunnel(name, IPPROTO_IPV6, link, tb) < 0)
3162 return -1;
3163
3164 #ifdef SIOCADD6RD
3165 if ((cur = tb[TUNNEL_ATTR_DATA])) {
3166 struct blob_attr *tb_data[__SIXRD_DATA_ATTR_MAX];
3167 unsigned int mask;
3168 struct ip_tunnel_6rd p6;
3169
3170 blobmsg_parse(sixrd_data_attr_list.params, __SIXRD_DATA_ATTR_MAX, tb_data,
3171 blobmsg_data(cur), blobmsg_len(cur));
3172
3173 memset(&p6, 0, sizeof(p6));
3174
3175 if ((cur = tb_data[SIXRD_DATA_PREFIX])) {
3176 if (!parse_ip_and_netmask(AF_INET6, blobmsg_data(cur),
3177 &p6.prefix, &mask) || mask > 128) {
3178 ret = -EINVAL;
3179 goto failure;
3180 }
3181
3182 p6.prefixlen = mask;
3183 }
3184
3185 if ((cur = tb_data[SIXRD_DATA_RELAY_PREFIX])) {
3186 if (!parse_ip_and_netmask(AF_INET, blobmsg_data(cur),
3187 &p6.relay_prefix, &mask) || mask > 32) {
3188 ret = -EINVAL;
3189 goto failure;
3190 }
3191
3192 p6.relay_prefixlen = mask;
3193 }
3194
3195 if (tunnel_ioctl(name, SIOCADD6RD, &p6) < 0) {
3196 ret = -1;
3197 goto failure;
3198 }
3199 }
3200 #endif
3201
3202 return ret;
3203
3204 failure:
3205 __system_del_ip_tunnel(name, tb);
3206 return ret;
3207 }
3208
3209 static int system_add_proto_tunnel(const char *name, const uint8_t proto, const unsigned int link, struct blob_attr **tb)
3210 {
3211 struct blob_attr *cur;
3212 bool set_df = true;
3213 struct ip_tunnel_parm p = {
3214 .link = link,
3215 .iph = {
3216 .version = 4,
3217 .ihl = 5,
3218 .protocol = proto,
3219 }
3220 };
3221
3222 if ((cur = tb[TUNNEL_ATTR_LOCAL]) &&
3223 inet_pton(AF_INET, blobmsg_data(cur), &p.iph.saddr) < 1)
3224 return -EINVAL;
3225
3226 if ((cur = tb[TUNNEL_ATTR_REMOTE]) &&
3227 inet_pton(AF_INET, blobmsg_data(cur), &p.iph.daddr) < 1)
3228 return -EINVAL;
3229
3230 if ((cur = tb[TUNNEL_ATTR_DF]))
3231 set_df = blobmsg_get_bool(cur);
3232
3233 if ((cur = tb[TUNNEL_ATTR_TTL]))
3234 p.iph.ttl = blobmsg_get_u32(cur);
3235
3236 if ((cur = tb[TUNNEL_ATTR_TOS])) {
3237 char *str = blobmsg_get_string(cur);
3238 if (strcmp(str, "inherit")) {
3239 unsigned uval;
3240
3241 if (!system_tos_aton(str, &uval))
3242 return -EINVAL;
3243
3244 p.iph.tos = uval;
3245 } else
3246 p.iph.tos = 1;
3247 }
3248
3249 p.iph.frag_off = set_df ? htons(IP_DF) : 0;
3250 /* ttl !=0 and nopmtudisc are incompatible */
3251 if (p.iph.ttl && p.iph.frag_off == 0)
3252 return -EINVAL;
3253
3254 strncpy(p.name, name, sizeof(p.name) - 1);
3255
3256 switch (p.iph.protocol) {
3257 case IPPROTO_IPIP:
3258 return tunnel_ioctl("tunl0", SIOCADDTUNNEL, &p);
3259 case IPPROTO_IPV6:
3260 return tunnel_ioctl("sit0", SIOCADDTUNNEL, &p);
3261 default:
3262 break;
3263 }
3264 return -1;
3265 }
3266
3267 static int __system_del_ip_tunnel(const char *name, struct blob_attr **tb)
3268 {
3269 struct blob_attr *cur;
3270 const char *str;
3271
3272 if (!(cur = tb[TUNNEL_ATTR_TYPE]))
3273 return -EINVAL;
3274 str = blobmsg_data(cur);
3275
3276 if (!strcmp(str, "greip") || !strcmp(str, "gretapip") ||
3277 !strcmp(str, "greip6") || !strcmp(str, "gretapip6") ||
3278 !strcmp(str, "vtiip") || !strcmp(str, "vtiip6") ||
3279 !strcmp(str, "vxlan") || !strcmp(str, "vxlan6") ||
3280 !strcmp(str, "xfrm"))
3281 return system_link_del(name);
3282 else
3283 return tunnel_ioctl(name, SIOCDELTUNNEL, NULL);
3284 }
3285
3286 int system_del_ip_tunnel(const char *name, struct blob_attr *attr)
3287 {
3288 struct blob_attr *tb[__TUNNEL_ATTR_MAX];
3289
3290 blobmsg_parse(tunnel_attr_list.params, __TUNNEL_ATTR_MAX, tb,
3291 blob_data(attr), blob_len(attr));
3292
3293 return __system_del_ip_tunnel(name, tb);
3294 }
3295
3296 int system_update_ipv6_mtu(struct device *dev, int mtu)
3297 {
3298 int ret = -1;
3299 char buf[64];
3300 int fd;
3301
3302 snprintf(buf, sizeof(buf), "/proc/sys/net/ipv6/conf/%s/mtu",
3303 dev->ifname);
3304
3305 fd = open(buf, O_RDWR);
3306 if (fd < 0)
3307 return ret;
3308
3309 if (!mtu) {
3310 ssize_t len = read(fd, buf, sizeof(buf) - 1);
3311 if (len < 0)
3312 goto out;
3313
3314 buf[len] = 0;
3315 ret = atoi(buf);
3316 } else {
3317 if (write(fd, buf, snprintf(buf, sizeof(buf), "%i", mtu)) > 0)
3318 ret = mtu;
3319 }
3320
3321 out:
3322 close(fd);
3323 return ret;
3324 }
3325
3326 int system_add_ip_tunnel(const char *name, struct blob_attr *attr)
3327 {
3328 struct blob_attr *tb[__TUNNEL_ATTR_MAX];
3329 struct blob_attr *cur;
3330 const char *str;
3331
3332 blobmsg_parse(tunnel_attr_list.params, __TUNNEL_ATTR_MAX, tb,
3333 blob_data(attr), blob_len(attr));
3334
3335 __system_del_ip_tunnel(name, tb);
3336
3337 if (!(cur = tb[TUNNEL_ATTR_TYPE]))
3338 return -EINVAL;
3339 str = blobmsg_data(cur);
3340
3341 unsigned int ttl = 0;
3342 if ((cur = tb[TUNNEL_ATTR_TTL])) {
3343 ttl = blobmsg_get_u32(cur);
3344 if (ttl > 255)
3345 return -EINVAL;
3346 }
3347
3348 unsigned int link = 0;
3349 if ((cur = tb[TUNNEL_ATTR_LINK])) {
3350 struct interface *iface = vlist_find(&interfaces, blobmsg_data(cur), iface, node);
3351 if (!iface)
3352 return -EINVAL;
3353
3354 if (iface->l3_dev.dev)
3355 link = iface->l3_dev.dev->ifindex;
3356 }
3357
3358 if (!strcmp(str, "sit"))
3359 return system_add_sit_tunnel(name, link, tb);
3360 #ifdef IFLA_IPTUN_MAX
3361 else if (!strcmp(str, "ipip6")) {
3362 return system_add_ip6_tunnel(name, link, tb);
3363 } else if (!strcmp(str, "greip")) {
3364 return system_add_gre_tunnel(name, "gre", link, tb, false);
3365 } else if (!strcmp(str, "gretapip")) {
3366 return system_add_gre_tunnel(name, "gretap", link, tb, false);
3367 } else if (!strcmp(str, "greip6")) {
3368 return system_add_gre_tunnel(name, "ip6gre", link, tb, true);
3369 } else if (!strcmp(str, "gretapip6")) {
3370 return system_add_gre_tunnel(name, "ip6gretap", link, tb, true);
3371 #ifdef IFLA_VTI_MAX
3372 } else if (!strcmp(str, "vtiip")) {
3373 return system_add_vti_tunnel(name, "vti", link, tb, false);
3374 } else if (!strcmp(str, "vtiip6")) {
3375 return system_add_vti_tunnel(name, "vti6", link, tb, true);
3376 #endif
3377 #ifdef IFLA_XFRM_MAX
3378 } else if (!strcmp(str, "xfrm")) {
3379 return system_add_xfrm_tunnel(name, "xfrm", link, tb);
3380 #endif
3381 #ifdef IFLA_VXLAN_MAX
3382 } else if(!strcmp(str, "vxlan")) {
3383 return system_add_vxlan(name, link, tb, false);
3384 } else if(!strcmp(str, "vxlan6")) {
3385 return system_add_vxlan(name, link, tb, true);
3386 #endif
3387 #endif
3388 } else if (!strcmp(str, "ipip")) {
3389 return system_add_proto_tunnel(name, IPPROTO_IPIP, link, tb);
3390 }
3391 else
3392 return -EINVAL;
3393
3394 return 0;
3395 }