system-linux.c

   1 #define _GNU_SOURCE
   2
   3 #include <sys/socket.h>
   4 #include <sys/ioctl.h>
   5 #include <sys/stat.h>
   6 #include <sys/syscall.h>
   7
   8 #include <linux/rtnetlink.h>
   9 #include <linux/sockios.h>
  10 #include <linux/if_vlan.h>
  11 #include <linux/if_bridge.h>
  12 #include <linux/ethtool.h>
  13
  14 #include <unistd.h>
  15 #include <string.h>
  16 #include <fcntl.h>
  17 #include <glob.h>
  18 #include <time.h>
  19
  20 #include <netlink/msg.h>
  21 #include <netlink/attr.h>
  22 #include <netlink/socket.h>
  23 #include <libubox/uloop.h>
  24
  25 #include "netifd.h"
  26 #include "device.h"
  27 #include "system.h"
  28
  29 struct event_socket {
  30         struct uloop_fd uloop;
  31         struct nl_sock *sock;
  32         struct nl_cb *cb;
  33 };
  34
  35 static int sock_ioctl = -1;
  36 static struct nl_sock *sock_rtnl = NULL;
  37
  38 static int cb_rtnl_event(struct nl_msg *msg, void *arg);
  39 static void handle_hotplug_event(struct uloop_fd *u, unsigned int events);
  40
  41 static void
  42 handler_nl_event(struct uloop_fd *u, unsigned int events)
  43 {
  44         struct event_socket *ev = container_of(u, struct event_socket, uloop);
  45         nl_recvmsgs(ev->sock, ev->cb);
  46 }
  47
  48 static struct nl_sock *
  49 create_socket(int protocol, int groups)
  50 {
  51         struct nl_sock *sock;
  52
  53         sock = nl_socket_alloc();
  54         if (!sock)
  55                 return NULL;
  56
  57         if (groups)
  58                 nl_join_groups(sock, groups);
  59
  60         if (nl_connect(sock, protocol))
  61                 return NULL;
  62
  63         return sock;
  64 }
  65
  66 static bool
  67 create_raw_event_socket(struct event_socket *ev, int protocol, int groups,
  68                         uloop_fd_handler cb)
  69 {
  70         ev->sock = create_socket(protocol, groups);
  71         if (!ev->sock)
  72                 return false;
  73
  74         ev->uloop.fd = nl_socket_get_fd(ev->sock);
  75         ev->uloop.cb = cb;
  76         uloop_fd_add(&ev->uloop, ULOOP_READ | ULOOP_EDGE_TRIGGER);
  77         return true;
  78 }
  79
  80 static bool
  81 create_event_socket(struct event_socket *ev, int protocol,
  82                     int (*cb)(struct nl_msg *msg, void *arg))
  83 {
  84         // Prepare socket for link events
  85         ev->cb = nl_cb_alloc(NL_CB_DEFAULT);
  86         if (!ev->cb)
  87                 return false;
  88
  89         nl_cb_set(ev->cb, NL_CB_VALID, NL_CB_CUSTOM, cb, NULL);
  90
  91         return create_raw_event_socket(ev, protocol, 0, handler_nl_event);
  92 }
  93
  94 int system_init(void)
  95 {
  96         static struct event_socket rtnl_event;
  97         static struct event_socket hotplug_event;
  98
  99         sock_ioctl = socket(AF_LOCAL, SOCK_DGRAM, 0);
 100         fcntl(sock_ioctl, F_SETFD, fcntl(sock_ioctl, F_GETFD) | FD_CLOEXEC);
 101
 102         // Prepare socket for routing / address control
 103         sock_rtnl = create_socket(NETLINK_ROUTE, 0);
 104         if (!sock_rtnl)
 105                 return -1;
 106
 107         if (!create_event_socket(&rtnl_event, NETLINK_ROUTE, cb_rtnl_event))
 108                 return -1;
 109
 110         if (!create_raw_event_socket(&hotplug_event, NETLINK_KOBJECT_UEVENT, 1,
 111                                      handle_hotplug_event))
 112                 return -1;
 113
 114         // Receive network link events form kernel
 115         nl_socket_add_membership(rtnl_event.sock, RTNLGRP_LINK);
 116
 117         return 0;
 118 }
 119
 120 static void system_set_sysctl(const char *path, const char *val)
 121 {
 122         int fd;
 123
 124         fd = open(path, O_WRONLY);
 125         if (fd < 0)
 126                 return;
 127
 128         write(fd, val, strlen(val));
 129         close(fd);
 130 }
 131
 132 static void system_set_dev_sysctl(const char *path, const char *device, const char *val)
 133 {
 134         static char buf[256];
 135
 136         snprintf(buf, sizeof(buf), path, val);
 137         system_set_sysctl(buf, val);
 138 }
 139
 140 static void system_set_disable_ipv6(struct device *dev, const char *val)
 141 {
 142         system_set_dev_sysctl("/proc/sys/net/ipv6/conf/%s/disable_ipv6", dev->ifname, val);
 143 }
 144
 145 // Evaluate netlink messages
 146 static int cb_rtnl_event(struct nl_msg *msg, void *arg)
 147 {
 148         struct nlmsghdr *nh = nlmsg_hdr(msg);
 149         struct ifinfomsg *ifi = NLMSG_DATA(nh);
 150         struct nlattr *nla[__IFLA_MAX];
 151
 152         if (nh->nlmsg_type != RTM_DELLINK && nh->nlmsg_type != RTM_NEWLINK)
 153                 goto out;
 154
 155         nlmsg_parse(nh, sizeof(*ifi), nla, __IFLA_MAX - 1, NULL);
 156         if (!nla[IFLA_IFNAME])
 157                 goto out;
 158
 159         struct device *dev = device_get(RTA_DATA(nla[IFLA_IFNAME]), false);
 160         if (!dev)
 161                 goto out;
 162
 163         dev->ifindex = ifi->ifi_index;
 164         /* TODO: parse link status */
 165
 166 out:
 167         return 0;
 168 }
 169
 170 static void
 171 handle_hotplug_msg(char *data, int size)
 172 {
 173         const char *subsystem = NULL, *interface = NULL;
 174         char *cur, *end, *sep;
 175         struct device *dev;
 176         int skip;
 177         bool add;
 178
 179         if (!strncmp(data, "add@", 4))
 180                 add = true;
 181         else if (!strncmp(data, "remove@", 7))
 182                 add = false;
 183         else
 184                 return;
 185
 186         skip = strlen(data) + 1;
 187         end = data + size;
 188
 189         for (cur = data + skip; cur < end; cur += skip) {
 190                 skip = strlen(cur) + 1;
 191
 192                 sep = strchr(cur, '=');
 193                 if (!sep)
 194                         continue;
 195
 196                 *sep = 0;
 197                 if (!strcmp(cur, "INTERFACE"))
 198                         interface = sep + 1;
 199                 else if (!strcmp(cur, "SUBSYSTEM")) {
 200                         subsystem = sep + 1;
 201                         if (strcmp(subsystem, "net") != 0)
 202                                 return;
 203                 }
 204                 if (subsystem && interface)
 205                         goto found;
 206         }
 207         return;
 208
 209 found:
 210         dev = device_get(interface, false);
 211         if (!dev)
 212                 return;
 213
 214         if (dev->type != &simple_device_type)
 215                 return;
 216
 217         device_set_present(dev, add);
 218 }
 219
 220 static void
 221 handle_hotplug_event(struct uloop_fd *u, unsigned int events)
 222 {
 223         struct event_socket *ev = container_of(u, struct event_socket, uloop);
 224         struct sockaddr_nl nla;
 225         unsigned char *buf = NULL;
 226         int size;
 227
 228         while ((size = nl_recv(ev->sock, &nla, &buf, NULL)) > 0) {
 229                 if (nla.nl_pid == 0)
 230                         handle_hotplug_msg((char *) buf, size);
 231
 232                 free(buf);
 233         }
 234 }
 235
 236 static int system_rtnl_call(struct nl_msg *msg)
 237 {
 238         int s = -(nl_send_auto_complete(sock_rtnl, msg)
 239                         || nl_wait_for_ack(sock_rtnl));
 240         nlmsg_free(msg);
 241         return s;
 242 }
 243
 244 int system_bridge_delbr(struct device *bridge)
 245 {
 246         return ioctl(sock_ioctl, SIOCBRDELBR, bridge->ifname);
 247 }
 248
 249 static int system_bridge_if(const char *bridge, struct device *dev, int cmd, void *data)
 250 {
 251         struct ifreq ifr;
 252         if (dev)
 253                 ifr.ifr_ifindex = dev->ifindex;
 254         else
 255                 ifr.ifr_data = data;
 256         strncpy(ifr.ifr_name, bridge, sizeof(ifr.ifr_name));
 257         return ioctl(sock_ioctl, cmd, &ifr);
 258 }
 259
 260 int system_bridge_addif(struct device *bridge, struct device *dev)
 261 {
 262         system_set_disable_ipv6(dev, "1");
 263         return system_bridge_if(bridge->ifname, dev, SIOCBRADDIF, NULL);
 264 }
 265
 266 int system_bridge_delif(struct device *bridge, struct device *dev)
 267 {
 268         system_set_disable_ipv6(dev, "0");
 269         return system_bridge_if(bridge->ifname, dev, SIOCBRDELIF, NULL);
 270 }
 271
 272 static bool system_is_bridge(const char *name, char *buf, int buflen)
 273 {
 274         struct stat st;
 275
 276         snprintf(buf, buflen, "/sys/devices/virtual/net/%s/bridge", name);
 277         if (stat(buf, &st) < 0)
 278                 return false;
 279
 280         return true;
 281 }
 282
 283 static char *system_get_bridge(const char *name, char *buf, int buflen)
 284 {
 285         char *path;
 286         ssize_t len;
 287         glob_t gl;
 288
 289         snprintf(buf, buflen, "/sys/devices/virtual/net/*/brif/%s/bridge", name);
 290         if (glob(buf, GLOB_NOSORT, NULL, &gl) < 0)
 291                 return NULL;
 292
 293         if (gl.gl_pathc == 0)
 294                 return NULL;
 295
 296         len = readlink(gl.gl_pathv[0], buf, buflen);
 297         if (len < 0)
 298                 return NULL;
 299
 300         buf[len] = 0;
 301         path = strrchr(buf, '/');
 302         if (!path)
 303                 return NULL;
 304
 305         return path + 1;
 306 }
 307
 308 static int system_if_resolve(struct device *dev)
 309 {
 310         struct ifreq ifr;
 311         strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name));
 312         if (!ioctl(sock_ioctl, SIOCGIFINDEX, &ifr))
 313                 return ifr.ifr_ifindex;
 314         else
 315                 return 0;
 316 }
 317
 318 static int system_if_flags(const char *ifname, unsigned add, unsigned rem)
 319 {
 320         struct ifreq ifr;
 321         strncpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
 322         ioctl(sock_ioctl, SIOCGIFFLAGS, &ifr);
 323         ifr.ifr_flags |= add;
 324         ifr.ifr_flags &= ~rem;
 325         return ioctl(sock_ioctl, SIOCSIFFLAGS, &ifr);
 326 }
 327
 328 struct clear_data {
 329         struct nl_msg *msg;
 330         struct device *dev;
 331         int type;
 332         int size;
 333         int af;
 334 };
 335
 336
 337 static bool check_ifaddr(struct nlmsghdr *hdr, int ifindex)
 338 {
 339         struct ifaddrmsg *ifa = NLMSG_DATA(hdr);
 340
 341         return ifa->ifa_index == ifindex;
 342 }
 343
 344 static bool check_route(struct nlmsghdr *hdr, int ifindex)
 345 {
 346         struct nlattr *tb[__RTA_MAX];
 347
 348         nlmsg_parse(hdr, sizeof(struct rtmsg), tb, __RTA_MAX - 1, NULL);
 349         if (!tb[RTA_OIF])
 350                 return false;
 351
 352         return *(int *)RTA_DATA(tb[RTA_OIF]) == ifindex;
 353 }
 354
 355 static int cb_clear_event(struct nl_msg *msg, void *arg)
 356 {
 357         struct clear_data *clr = arg;
 358         struct nlmsghdr *hdr = nlmsg_hdr(msg);
 359         bool (*cb)(struct nlmsghdr *, int ifindex);
 360         int type;
 361
 362         switch(clr->type) {
 363         case RTM_GETADDR:
 364                 type = RTM_DELADDR;
 365                 if (hdr->nlmsg_type != RTM_NEWADDR)
 366                         return NL_SKIP;
 367
 368                 cb = check_ifaddr;
 369                 break;
 370         case RTM_GETROUTE:
 371                 type = RTM_DELROUTE;
 372                 if (hdr->nlmsg_type != RTM_NEWROUTE)
 373                         return NL_SKIP;
 374
 375                 cb = check_route;
 376                 break;
 377         default:
 378                 return NL_SKIP;
 379         }
 380
 381         if (!cb(hdr, clr->dev->ifindex))
 382                 return NL_SKIP;
 383
 384         D(SYSTEM, "Remove %s from device %s\n",
 385           type == RTM_DELADDR ? "an address" : "a route",
 386           clr->dev->ifname);
 387         memcpy(nlmsg_hdr(clr->msg), hdr, hdr->nlmsg_len);
 388         hdr = nlmsg_hdr(clr->msg);
 389         hdr->nlmsg_type = type;
 390         hdr->nlmsg_flags = NLM_F_REQUEST;
 391
 392         if (!nl_send_auto_complete(sock_rtnl, clr->msg))
 393                 nl_wait_for_ack(sock_rtnl);
 394
 395         return NL_SKIP;
 396 }
 397
 398 static int
 399 cb_finish_event(struct nl_msg *msg, void *arg)
 400 {
 401         int *pending = arg;
 402         *pending = 0;
 403         return NL_STOP;
 404 }
 405
 406 static int
 407 error_handler(struct sockaddr_nl *nla, struct nlmsgerr *err, void *arg)
 408 {
 409         int *pending = arg;
 410         *pending = err->error;
 411         return NL_STOP;
 412 }
 413
 414 static void
 415 system_if_clear_entries(struct device *dev, int type, int af)
 416 {
 417         struct clear_data clr;
 418         struct nl_cb *cb = nl_cb_alloc(NL_CB_DEFAULT);
 419         struct rtmsg rtm = {
 420                 .rtm_family = af,
 421                 .rtm_flags = RTM_F_CLONED,
 422         };
 423         int flags = NLM_F_DUMP;
 424         int pending = 1;
 425
 426         clr.af = af;
 427         clr.dev = dev;
 428         clr.type = type;
 429         switch (type) {
 430         case RTM_GETADDR:
 431                 clr.size = sizeof(struct rtgenmsg);
 432                 break;
 433         case RTM_GETROUTE:
 434                 clr.size = sizeof(struct rtmsg);
 435                 break;
 436         default:
 437                 return;
 438         }
 439
 440         if (!cb)
 441                 return;
 442
 443         clr.msg = nlmsg_alloc_simple(type, flags);
 444         if (!clr.msg)
 445                 goto out;
 446
 447         nlmsg_append(clr.msg, &rtm, clr.size, 0);
 448         nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, cb_clear_event, &clr);
 449         nl_cb_set(cb, NL_CB_FINISH, NL_CB_CUSTOM, cb_finish_event, &pending);
 450         nl_cb_err(cb, NL_CB_CUSTOM, error_handler, &pending);
 451
 452         nl_send_auto_complete(sock_rtnl, clr.msg);
 453         while (pending > 0)
 454                 nl_recvmsgs(sock_rtnl, cb);
 455
 456         nlmsg_free(clr.msg);
 457 out:
 458         nl_cb_put(cb);
 459 }
 460
 461 /*
 462  * Clear bridge (membership) state and bring down device
 463  */
 464 void system_if_clear_state(struct device *dev)
 465 {
 466         static char buf[256];
 467         char *bridge;
 468
 469         if (dev->external)
 470                 return;
 471
 472         dev->ifindex = system_if_resolve(dev);
 473         if (!dev->ifindex)
 474                 return;
 475
 476         system_if_flags(dev->ifname, 0, IFF_UP);
 477
 478         if (system_is_bridge(dev->ifname, buf, sizeof(buf))) {
 479                 D(SYSTEM, "Delete existing bridge named '%s'\n", dev->ifname);
 480                 system_bridge_delbr(dev);
 481                 return;
 482         }
 483
 484         bridge = system_get_bridge(dev->ifname, buf, sizeof(buf));
 485         if (bridge) {
 486                 D(SYSTEM, "Remove device '%s' from bridge '%s'\n", dev->ifname, bridge);
 487                 system_bridge_if(bridge, dev, SIOCBRDELIF, NULL);
 488         }
 489
 490         system_if_clear_entries(dev, RTM_GETROUTE, AF_INET);
 491         system_if_clear_entries(dev, RTM_GETADDR, AF_INET);
 492         system_if_clear_entries(dev, RTM_GETROUTE, AF_INET6);
 493         system_if_clear_entries(dev, RTM_GETADDR, AF_INET6);
 494         system_set_disable_ipv6(dev, "0");
 495 }
 496
 497 static inline unsigned long
 498 sec_to_jiffies(int val)
 499 {
 500         return (unsigned long) val * 100;
 501 }
 502
 503 int system_bridge_addbr(struct device *bridge, struct bridge_config *cfg)
 504 {
 505         unsigned long args[4] = {};
 506
 507         if (ioctl(sock_ioctl, SIOCBRADDBR, bridge->ifname) < 0)
 508                 return -1;
 509
 510         args[0] = BRCTL_SET_BRIDGE_STP_STATE;
 511         args[1] = !!cfg->stp;
 512         system_bridge_if(bridge->ifname, NULL, SIOCDEVPRIVATE, &args);
 513
 514         args[0] = BRCTL_SET_BRIDGE_FORWARD_DELAY;
 515         args[1] = sec_to_jiffies(cfg->forward_delay);
 516         system_bridge_if(bridge->ifname, NULL, SIOCDEVPRIVATE, &args);
 517
 518         system_set_dev_sysctl("/sys/devices/virtual/net/%s/bridge/multicast_snooping",
 519                 bridge->ifname, cfg->igmp_snoop ? "1" : "0");
 520
 521         if (cfg->flags & BRIDGE_OPT_AGEING_TIME) {
 522                 args[0] = BRCTL_SET_AGEING_TIME;
 523                 args[1] = sec_to_jiffies(cfg->ageing_time);
 524                 system_bridge_if(bridge->ifname, NULL, SIOCDEVPRIVATE, &args);
 525         }
 526
 527         if (cfg->flags & BRIDGE_OPT_HELLO_TIME) {
 528                 args[0] = BRCTL_SET_BRIDGE_HELLO_TIME;
 529                 args[1] = sec_to_jiffies(cfg->hello_time);
 530                 system_bridge_if(bridge->ifname, NULL, SIOCDEVPRIVATE, &args);
 531         }
 532
 533         if (cfg->flags & BRIDGE_OPT_MAX_AGE) {
 534                 args[0] = BRCTL_SET_BRIDGE_MAX_AGE;
 535                 args[1] = sec_to_jiffies(cfg->max_age);
 536                 system_bridge_if(bridge->ifname, NULL, SIOCDEVPRIVATE, &args);
 537         }
 538
 539         return 0;
 540 }
 541
 542 static int system_vlan(struct device *dev, int id)
 543 {
 544         struct vlan_ioctl_args ifr = {
 545                 .cmd = SET_VLAN_NAME_TYPE_CMD,
 546                 .u.name_type = VLAN_NAME_TYPE_RAW_PLUS_VID_NO_PAD,
 547         };
 548
 549         ioctl(sock_ioctl, SIOCSIFVLAN, &ifr);
 550
 551         if (id < 0) {
 552                 ifr.cmd = DEL_VLAN_CMD;
 553                 ifr.u.VID = 0;
 554         } else {
 555                 ifr.cmd = ADD_VLAN_CMD;
 556                 ifr.u.VID = id;
 557         }
 558         strncpy(ifr.device1, dev->ifname, sizeof(ifr.device1));
 559         return ioctl(sock_ioctl, SIOCSIFVLAN, &ifr);
 560 }
 561
 562 int system_vlan_add(struct device *dev, int id)
 563 {
 564         return system_vlan(dev, id);
 565 }
 566
 567 int system_vlan_del(struct device *dev)
 568 {
 569         return system_vlan(dev, -1);
 570 }
 571
 572 static void
 573 system_if_apply_settings(struct device *dev)
 574 {
 575         struct ifreq ifr;
 576
 577         memset(&ifr, 0, sizeof(ifr));
 578         strncpy(ifr.ifr_name, dev->ifname, sizeof(ifr.ifr_name));
 579         if (dev->flags & DEV_OPT_MTU) {
 580                 ifr.ifr_mtu = dev->mtu;
 581                 ioctl(sock_ioctl, SIOCSIFMTU, &ifr);
 582         }
 583         if (dev->flags & DEV_OPT_TXQUEUELEN) {
 584                 ifr.ifr_qlen = dev->txqueuelen;
 585                 ioctl(sock_ioctl, SIOCSIFTXQLEN, &ifr);
 586         }
 587         if (dev->flags & DEV_OPT_MACADDR) {
 588                 memcpy(&ifr.ifr_hwaddr, dev->macaddr, sizeof(dev->macaddr));
 589                 ioctl(sock_ioctl, SIOCSIFHWADDR, &ifr);
 590         }
 591
 592         dev->ifindex = system_if_resolve(dev);
 593 }
 594
 595 int system_if_up(struct device *dev)
 596 {
 597         system_if_apply_settings(dev);
 598         return system_if_flags(dev->ifname, IFF_UP, 0);
 599 }
 600
 601 int system_if_down(struct device *dev)
 602 {
 603         return system_if_flags(dev->ifname, 0, IFF_UP);
 604 }
 605
 606 int system_if_check(struct device *dev)
 607 {
 608         device_set_present(dev, (system_if_resolve(dev) > 0));
 609         return 0;
 610 }
 611
 612 struct device *
 613 system_if_get_parent(struct device *dev)
 614 {
 615         char buf[64], *devname;
 616         int ifindex, iflink, len;
 617         FILE *f;
 618
 619         snprintf(buf, sizeof(buf), "/sys/class/net/%s/iflink", dev->ifname);
 620         f = fopen(buf, "r");
 621         if (!f)
 622                 return NULL;
 623
 624         len = fread(buf, 1, sizeof(buf) - 1, f);
 625         fclose(f);
 626
 627         if (len <= 0)
 628                 return NULL;
 629
 630         buf[len] = 0;
 631         iflink = strtoul(buf, NULL, 0);
 632         ifindex = system_if_resolve(dev);
 633         if (!iflink || iflink == ifindex)
 634                 return NULL;
 635
 636         devname = if_indextoname(iflink, buf);
 637         if (!devname)
 638                 return NULL;
 639
 640         return device_get(devname, true);
 641 }
 642
 643 static bool
 644 read_string_file(int dir_fd, const char *file, char *buf, int len)
 645 {
 646         bool ret = false;
 647         char *c;
 648         int fd;
 649
 650         fd = openat(dir_fd, file, O_RDONLY);
 651         if (fd < 0)
 652                 return false;
 653
 654 retry:
 655         len = read(fd, buf, len - 1);
 656         if (len < 0) {
 657                 if (errno == EINTR)
 658                         goto retry;
 659         } else if (len > 0) {
 660                         buf[len] = 0;
 661
 662                         c = strchr(buf, '\n');
 663                         if (c)
 664                                 *c = 0;
 665
 666                         ret = true;
 667         }
 668
 669         close(fd);
 670
 671         return ret;
 672 }
 673
 674 static bool
 675 read_int_file(int dir_fd, const char *file, int *val)
 676 {
 677         char buf[64];
 678         bool ret = false;
 679
 680         ret = read_string_file(dir_fd, file, buf, sizeof(buf));
 681         if (ret)
 682                 *val = strtoul(buf, NULL, 0);
 683
 684         return ret;
 685 }
 686
 687 /* Assume advertised flags == supported flags */
 688 static const struct {
 689         uint32_t mask;
 690         const char *name;
 691 } ethtool_link_modes[] = {
 692         { ADVERTISED_10baseT_Half, "10H" },
 693         { ADVERTISED_10baseT_Full, "10F" },
 694         { ADVERTISED_100baseT_Half, "100H" },
 695         { ADVERTISED_100baseT_Full, "100F" },
 696         { ADVERTISED_1000baseT_Half, "1000H" },
 697         { ADVERTISED_1000baseT_Full, "1000F" },
 698 };
 699
 700 static void system_add_link_modes(struct blob_buf *b, __u32 mask)
 701 {
 702         int i;
 703         for (i = 0; i < ARRAY_SIZE(ethtool_link_modes); i++) {
 704                 if (mask & ethtool_link_modes[i].mask)
 705                         blobmsg_add_string(b, NULL, ethtool_link_modes[i].name);
 706         }
 707 }
 708
 709 int
 710 system_if_dump_info(struct device *dev, struct blob_buf *b)
 711 {
 712         struct ethtool_cmd ecmd;
 713         struct ifreq ifr;
 714         char buf[64], *s;
 715         void *c;
 716         int dir_fd, val = 0;
 717
 718         snprintf(buf, sizeof(buf), "/sys/class/net/%s", dev->ifname);
 719         dir_fd = open(buf, O_DIRECTORY);
 720
 721         if (read_int_file(dir_fd, "carrier", &val))
 722                 blobmsg_add_u8(b, "link", !!val);
 723         if (read_string_file(dir_fd, "address", buf, sizeof(buf)))
 724                 blobmsg_add_string(b, "macaddr", buf);
 725
 726         memset(&ecmd, 0, sizeof(ecmd));
 727         memset(&ifr, 0, sizeof(ifr));
 728         strcpy(ifr.ifr_name, dev->ifname);
 729         ifr.ifr_data = (caddr_t) &ecmd;
 730         ecmd.cmd = ETHTOOL_GSET;
 731
 732         if (ioctl(sock_ioctl, SIOCETHTOOL, &ifr) == 0) {
 733                 c = blobmsg_open_array(b, "link-advertising");
 734                 system_add_link_modes(b, ecmd.advertising);
 735                 blobmsg_close_array(b, c);
 736
 737                 c = blobmsg_open_array(b, "link-supported");
 738                 system_add_link_modes(b, ecmd.supported);
 739                 blobmsg_close_array(b, c);
 740
 741                 s = blobmsg_alloc_string_buffer(b, "speed", 8);
 742                 snprintf(s, 8, "%d%c", ethtool_cmd_speed(&ecmd),
 743                         ecmd.duplex == DUPLEX_HALF ? 'H' : 'F');
 744                 blobmsg_add_string_buffer(b);
 745         }
 746
 747         close(dir_fd);
 748         return 0;
 749 }
 750
 751 int
 752 system_if_dump_stats(struct device *dev, struct blob_buf *b)
 753 {
 754         const char *const counters[] = {
 755                 "collisions",     "rx_frame_errors",   "tx_compressed",
 756                 "multicast",      "rx_length_errors",  "tx_dropped",
 757                 "rx_bytes",       "rx_missed_errors",  "tx_errors",
 758                 "rx_compressed",  "rx_over_errors",    "tx_fifo_errors",
 759                 "rx_crc_errors",  "rx_packets",        "tx_heartbeat_errors",
 760                 "rx_dropped",     "tx_aborted_errors", "tx_packets",
 761                 "rx_errors",      "tx_bytes",          "tx_window_errors",
 762                 "rx_fifo_errors", "tx_carrier_errors",
 763         };
 764         char buf[64];
 765         int stats_dir;
 766         int i, val = 0;
 767
 768         snprintf(buf, sizeof(buf), "/sys/class/net/%s/statistics", dev->ifname);
 769         stats_dir = open(buf, O_DIRECTORY);
 770         if (stats_dir < 0)
 771                 return -1;
 772
 773         for (i = 0; i < ARRAY_SIZE(counters); i++)
 774                 if (read_int_file(stats_dir, counters[i], &val))
 775                         blobmsg_add_u32(b, counters[i], val);
 776
 777         close(stats_dir);
 778         return 0;
 779 }
 780
 781 static int system_addr(struct device *dev, struct device_addr *addr, int cmd)
 782 {
 783         int alen = ((addr->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
 784         struct ifaddrmsg ifa = {
 785                 .ifa_family = (alen == 4) ? AF_INET : AF_INET6,
 786                 .ifa_prefixlen = addr->mask,
 787                 .ifa_index = dev->ifindex,
 788         };
 789
 790         struct nl_msg *msg;
 791
 792         dev = addr->device;
 793         if (dev) {
 794                 if (!dev->ifindex)
 795                         return -1;
 796
 797                 ifa.ifa_index = dev->ifindex;
 798         }
 799
 800         msg = nlmsg_alloc_simple(cmd, 0);
 801         if (!msg)
 802                 return -1;
 803
 804         nlmsg_append(msg, &ifa, sizeof(ifa), 0);
 805         nla_put(msg, IFA_LOCAL, alen, &addr->addr);
 806         return system_rtnl_call(msg);
 807 }
 808
 809 int system_add_address(struct device *dev, struct device_addr *addr)
 810 {
 811         return system_addr(dev, addr, RTM_NEWADDR);
 812 }
 813
 814 int system_del_address(struct device *dev, struct device_addr *addr)
 815 {
 816         return system_addr(dev, addr, RTM_DELADDR);
 817 }
 818
 819 static int system_rt(struct device *dev, struct device_route *route, int cmd)
 820 {
 821         int alen = ((route->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
 822         bool have_gw;
 823         unsigned int flags = 0;
 824         int ifindex = dev->ifindex;
 825
 826         if (alen == 4)
 827                 have_gw = !!route->nexthop.in.s_addr;
 828         else
 829                 have_gw = route->nexthop.in6.s6_addr32[0] ||
 830                         route->nexthop.in6.s6_addr32[1] ||
 831                         route->nexthop.in6.s6_addr32[2] ||
 832                         route->nexthop.in6.s6_addr32[3];
 833
 834         unsigned char scope = (cmd == RTM_DELROUTE) ? RT_SCOPE_NOWHERE :
 835                         (have_gw) ? RT_SCOPE_UNIVERSE : RT_SCOPE_LINK;
 836
 837         struct rtmsg rtm = {
 838                 .rtm_family = (alen == 4) ? AF_INET : AF_INET6,
 839                 .rtm_dst_len = route->mask,
 840                 .rtm_table = RT_TABLE_MAIN,
 841                 .rtm_protocol = RTPROT_BOOT,
 842                 .rtm_scope = scope,
 843                 .rtm_type = (cmd == RTM_DELROUTE) ? 0: RTN_UNICAST,
 844         };
 845         struct nl_msg *msg;
 846
 847         if (cmd == RTM_NEWROUTE)
 848                 flags |= NLM_F_CREATE | NLM_F_REPLACE;
 849
 850         dev = route->device;
 851         if (dev) {
 852                 if (!dev->ifindex)
 853                         return -1;
 854
 855                 ifindex = dev->ifindex;
 856         }
 857
 858         msg = nlmsg_alloc_simple(cmd, flags);
 859         if (!msg)
 860                 return -1;
 861
 862         nlmsg_append(msg, &rtm, sizeof(rtm), 0);
 863
 864         if (route->mask)
 865                 nla_put(msg, RTA_DST, alen, &route->addr);
 866
 867         if (have_gw)
 868                 nla_put(msg, RTA_GATEWAY, alen, &route->nexthop);
 869
 870         if (route->flags & DEVADDR_DEVICE)
 871                 nla_put_u32(msg, RTA_OIF, ifindex);
 872
 873         return system_rtnl_call(msg);
 874 }
 875
 876 int system_add_route(struct device *dev, struct device_route *route)
 877 {
 878         return system_rt(dev, route, RTM_NEWROUTE);
 879 }
 880
 881 int system_del_route(struct device *dev, struct device_route *route)
 882 {
 883         return system_rt(dev, route, RTM_DELROUTE);
 884 }
 885
 886 int system_flush_routes(void)
 887 {
 888         const char *names[] = {
 889                 "/proc/sys/net/ipv4/route/flush",
 890                 "/proc/sys/net/ipv6/route/flush"
 891         };
 892         int fd, i;
 893
 894         for (i = 0; i < ARRAY_SIZE(names); i++) {
 895                 fd = open(names[i], O_WRONLY);
 896                 if (fd < 0)
 897                         continue;
 898
 899                 write(fd, "-1", 2);
 900                 close(fd);
 901         }
 902         return 0;
 903 }
 904
 905 time_t system_get_rtime(void)
 906 {
 907         struct timespec ts;
 908         struct timeval tv;
 909
 910         if (syscall(__NR_clock_gettime, CLOCK_MONOTONIC, &ts) == 0)
 911                 return ts.tv_sec;
 912
 913         if (gettimeofday(&tv, NULL) == 0)
 914                 return tv.tv_sec;
 915
 916         return 0;
 917 }