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