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, struct device_settings *s)
 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 (s->flags & DEV_OPT_MTU) {
 580                 ifr.ifr_mtu = s->mtu;
 581                 ioctl(sock_ioctl, SIOCSIFMTU, &ifr);
 582         }
 583         if (s->flags & DEV_OPT_TXQUEUELEN) {
 584                 ifr.ifr_qlen = s->txqueuelen;
 585                 ioctl(sock_ioctl, SIOCSIFTXQLEN, &ifr);
 586         }
 587         if (s->flags & DEV_OPT_MACADDR) {
 588                 memcpy(&ifr.ifr_hwaddr, s->macaddr, sizeof(s->macaddr));
 589                 ioctl(sock_ioctl, SIOCSIFHWADDR, &ifr);
 590         }
 591 }
 592
 593 int system_if_up(struct device *dev)
 594 {
 595         system_if_apply_settings(dev, &dev->settings);
 596         dev->ifindex = system_if_resolve(dev);
 597         return system_if_flags(dev->ifname, IFF_UP, 0);
 598 }
 599
 600 int system_if_down(struct device *dev)
 601 {
 602         return system_if_flags(dev->ifname, 0, IFF_UP);
 603 }
 604
 605 int system_if_check(struct device *dev)
 606 {
 607         device_set_present(dev, (system_if_resolve(dev) > 0));
 608         return 0;
 609 }
 610
 611 struct device *
 612 system_if_get_parent(struct device *dev)
 613 {
 614         char buf[64], *devname;
 615         int ifindex, iflink, len;
 616         FILE *f;
 617
 618         snprintf(buf, sizeof(buf), "/sys/class/net/%s/iflink", dev->ifname);
 619         f = fopen(buf, "r");
 620         if (!f)
 621                 return NULL;
 622
 623         len = fread(buf, 1, sizeof(buf) - 1, f);
 624         fclose(f);
 625
 626         if (len <= 0)
 627                 return NULL;
 628
 629         buf[len] = 0;
 630         iflink = strtoul(buf, NULL, 0);
 631         ifindex = system_if_resolve(dev);
 632         if (!iflink || iflink == ifindex)
 633                 return NULL;
 634
 635         devname = if_indextoname(iflink, buf);
 636         if (!devname)
 637                 return NULL;
 638
 639         return device_get(devname, true);
 640 }
 641
 642 static bool
 643 read_string_file(int dir_fd, const char *file, char *buf, int len)
 644 {
 645         bool ret = false;
 646         char *c;
 647         int fd;
 648
 649         fd = openat(dir_fd, file, O_RDONLY);
 650         if (fd < 0)
 651                 return false;
 652
 653 retry:
 654         len = read(fd, buf, len - 1);
 655         if (len < 0) {
 656                 if (errno == EINTR)
 657                         goto retry;
 658         } else if (len > 0) {
 659                         buf[len] = 0;
 660
 661                         c = strchr(buf, '\n');
 662                         if (c)
 663                                 *c = 0;
 664
 665                         ret = true;
 666         }
 667
 668         close(fd);
 669
 670         return ret;
 671 }
 672
 673 static bool
 674 read_int_file(int dir_fd, const char *file, int *val)
 675 {
 676         char buf[64];
 677         bool ret = false;
 678
 679         ret = read_string_file(dir_fd, file, buf, sizeof(buf));
 680         if (ret)
 681                 *val = strtoul(buf, NULL, 0);
 682
 683         return ret;
 684 }
 685
 686 /* Assume advertised flags == supported flags */
 687 static const struct {
 688         uint32_t mask;
 689         const char *name;
 690 } ethtool_link_modes[] = {
 691         { ADVERTISED_10baseT_Half, "10H" },
 692         { ADVERTISED_10baseT_Full, "10F" },
 693         { ADVERTISED_100baseT_Half, "100H" },
 694         { ADVERTISED_100baseT_Full, "100F" },
 695         { ADVERTISED_1000baseT_Half, "1000H" },
 696         { ADVERTISED_1000baseT_Full, "1000F" },
 697 };
 698
 699 static void system_add_link_modes(struct blob_buf *b, __u32 mask)
 700 {
 701         int i;
 702         for (i = 0; i < ARRAY_SIZE(ethtool_link_modes); i++) {
 703                 if (mask & ethtool_link_modes[i].mask)
 704                         blobmsg_add_string(b, NULL, ethtool_link_modes[i].name);
 705         }
 706 }
 707
 708 int
 709 system_if_dump_info(struct device *dev, struct blob_buf *b)
 710 {
 711         struct ethtool_cmd ecmd;
 712         struct ifreq ifr;
 713         char buf[64], *s;
 714         void *c;
 715         int dir_fd, val = 0;
 716
 717         snprintf(buf, sizeof(buf), "/sys/class/net/%s", dev->ifname);
 718         dir_fd = open(buf, O_DIRECTORY);
 719
 720         if (read_int_file(dir_fd, "carrier", &val))
 721                 blobmsg_add_u8(b, "link", !!val);
 722         if (read_string_file(dir_fd, "address", buf, sizeof(buf)))
 723                 blobmsg_add_string(b, "macaddr", buf);
 724
 725         memset(&ecmd, 0, sizeof(ecmd));
 726         memset(&ifr, 0, sizeof(ifr));
 727         strcpy(ifr.ifr_name, dev->ifname);
 728         ifr.ifr_data = (caddr_t) &ecmd;
 729         ecmd.cmd = ETHTOOL_GSET;
 730
 731         if (ioctl(sock_ioctl, SIOCETHTOOL, &ifr) == 0) {
 732                 c = blobmsg_open_array(b, "link-advertising");
 733                 system_add_link_modes(b, ecmd.advertising);
 734                 blobmsg_close_array(b, c);
 735
 736                 c = blobmsg_open_array(b, "link-supported");
 737                 system_add_link_modes(b, ecmd.supported);
 738                 blobmsg_close_array(b, c);
 739
 740                 s = blobmsg_alloc_string_buffer(b, "speed", 8);
 741                 snprintf(s, 8, "%d%c", ethtool_cmd_speed(&ecmd),
 742                         ecmd.duplex == DUPLEX_HALF ? 'H' : 'F');
 743                 blobmsg_add_string_buffer(b);
 744         }
 745
 746         close(dir_fd);
 747         return 0;
 748 }
 749
 750 int
 751 system_if_dump_stats(struct device *dev, struct blob_buf *b)
 752 {
 753         const char *const counters[] = {
 754                 "collisions",     "rx_frame_errors",   "tx_compressed",
 755                 "multicast",      "rx_length_errors",  "tx_dropped",
 756                 "rx_bytes",       "rx_missed_errors",  "tx_errors",
 757                 "rx_compressed",  "rx_over_errors",    "tx_fifo_errors",
 758                 "rx_crc_errors",  "rx_packets",        "tx_heartbeat_errors",
 759                 "rx_dropped",     "tx_aborted_errors", "tx_packets",
 760                 "rx_errors",      "tx_bytes",          "tx_window_errors",
 761                 "rx_fifo_errors", "tx_carrier_errors",
 762         };
 763         char buf[64];
 764         int stats_dir;
 765         int i, val = 0;
 766
 767         snprintf(buf, sizeof(buf), "/sys/class/net/%s/statistics", dev->ifname);
 768         stats_dir = open(buf, O_DIRECTORY);
 769         if (stats_dir < 0)
 770                 return -1;
 771
 772         for (i = 0; i < ARRAY_SIZE(counters); i++)
 773                 if (read_int_file(stats_dir, counters[i], &val))
 774                         blobmsg_add_u32(b, counters[i], val);
 775
 776         close(stats_dir);
 777         return 0;
 778 }
 779
 780 static int system_addr(struct device *dev, struct device_addr *addr, int cmd)
 781 {
 782         int alen = ((addr->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
 783         struct ifaddrmsg ifa = {
 784                 .ifa_family = (alen == 4) ? AF_INET : AF_INET6,
 785                 .ifa_prefixlen = addr->mask,
 786                 .ifa_index = dev->ifindex,
 787         };
 788
 789         struct nl_msg *msg;
 790
 791         dev = addr->device;
 792         if (dev) {
 793                 if (!dev->ifindex)
 794                         return -1;
 795
 796                 ifa.ifa_index = dev->ifindex;
 797         }
 798
 799         msg = nlmsg_alloc_simple(cmd, 0);
 800         if (!msg)
 801                 return -1;
 802
 803         nlmsg_append(msg, &ifa, sizeof(ifa), 0);
 804         nla_put(msg, IFA_LOCAL, alen, &addr->addr);
 805         return system_rtnl_call(msg);
 806 }
 807
 808 int system_add_address(struct device *dev, struct device_addr *addr)
 809 {
 810         return system_addr(dev, addr, RTM_NEWADDR);
 811 }
 812
 813 int system_del_address(struct device *dev, struct device_addr *addr)
 814 {
 815         return system_addr(dev, addr, RTM_DELADDR);
 816 }
 817
 818 static int system_rt(struct device *dev, struct device_route *route, int cmd)
 819 {
 820         int alen = ((route->flags & DEVADDR_FAMILY) == DEVADDR_INET4) ? 4 : 16;
 821         bool have_gw;
 822         unsigned int flags = 0;
 823         int ifindex = dev->ifindex;
 824
 825         if (alen == 4)
 826                 have_gw = !!route->nexthop.in.s_addr;
 827         else
 828                 have_gw = route->nexthop.in6.s6_addr32[0] ||
 829                         route->nexthop.in6.s6_addr32[1] ||
 830                         route->nexthop.in6.s6_addr32[2] ||
 831                         route->nexthop.in6.s6_addr32[3];
 832
 833         unsigned char scope = (cmd == RTM_DELROUTE) ? RT_SCOPE_NOWHERE :
 834                         (have_gw) ? RT_SCOPE_UNIVERSE : RT_SCOPE_LINK;
 835
 836         struct rtmsg rtm = {
 837                 .rtm_family = (alen == 4) ? AF_INET : AF_INET6,
 838                 .rtm_dst_len = route->mask,
 839                 .rtm_table = RT_TABLE_MAIN,
 840                 .rtm_protocol = RTPROT_BOOT,
 841                 .rtm_scope = scope,
 842                 .rtm_type = (cmd == RTM_DELROUTE) ? 0: RTN_UNICAST,
 843         };
 844         struct nl_msg *msg;
 845
 846         if (cmd == RTM_NEWROUTE)
 847                 flags |= NLM_F_CREATE | NLM_F_REPLACE;
 848
 849         dev = route->device;
 850         if (dev) {
 851                 if (!dev->ifindex)
 852                         return -1;
 853
 854                 ifindex = dev->ifindex;
 855         }
 856
 857         msg = nlmsg_alloc_simple(cmd, flags);
 858         if (!msg)
 859                 return -1;
 860
 861         nlmsg_append(msg, &rtm, sizeof(rtm), 0);
 862
 863         if (route->mask)
 864                 nla_put(msg, RTA_DST, alen, &route->addr);
 865
 866         if (have_gw)
 867                 nla_put(msg, RTA_GATEWAY, alen, &route->nexthop);
 868
 869         if (route->flags & DEVADDR_DEVICE)
 870                 nla_put_u32(msg, RTA_OIF, ifindex);
 871
 872         return system_rtnl_call(msg);
 873 }
 874
 875 int system_add_route(struct device *dev, struct device_route *route)
 876 {
 877         return system_rt(dev, route, RTM_NEWROUTE);
 878 }
 879
 880 int system_del_route(struct device *dev, struct device_route *route)
 881 {
 882         return system_rt(dev, route, RTM_DELROUTE);
 883 }
 884
 885 int system_flush_routes(void)
 886 {
 887         const char *names[] = {
 888                 "/proc/sys/net/ipv4/route/flush",
 889                 "/proc/sys/net/ipv6/route/flush"
 890         };
 891         int fd, i;
 892
 893         for (i = 0; i < ARRAY_SIZE(names); i++) {
 894                 fd = open(names[i], O_WRONLY);
 895                 if (fd < 0)
 896                         continue;
 897
 898                 write(fd, "-1", 2);
 899                 close(fd);
 900         }
 901         return 0;
 902 }
 903
 904 time_t system_get_rtime(void)
 905 {
 906         struct timespec ts;
 907         struct timeval tv;
 908
 909         if (syscall(__NR_clock_gettime, CLOCK_MONOTONIC, &ts) == 0)
 910                 return ts.tv_sec;
 911
 912         if (gettimeofday(&tv, NULL) == 0)
 913                 return tv.tv_sec;
 914
 915         return 0;
 916 }