device.c

   1 /*
   2  * netifd - network interface daemon
   3  * Copyright (C) 2012 Felix Fietkau <nbd@openwrt.org>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License version 2
   7  * as published by the Free Software Foundation
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  */
  14 #include <string.h>
  15 #include <stdlib.h>
  16 #include <stdio.h>
  17 #include <assert.h>
  18
  19 #include <sys/types.h>
  20 #include <sys/socket.h>
  21 #include <net/ethernet.h>
  22
  23 #ifdef linux
  24 #include <netinet/ether.h>
  25 #endif
  26
  27 #include "netifd.h"
  28 #include "system.h"
  29 #include "config.h"
  30
  31 static struct avl_tree devices;
  32
  33 static const struct blobmsg_policy dev_attrs[__DEV_ATTR_MAX] = {
  34         [DEV_ATTR_TYPE] = { .name = "type", .type = BLOBMSG_TYPE_STRING },
  35         [DEV_ATTR_IFNAME] = { .name = "ifname", .type = BLOBMSG_TYPE_ARRAY },
  36         [DEV_ATTR_MTU] = { .name = "mtu", .type = BLOBMSG_TYPE_INT32 },
  37         [DEV_ATTR_MACADDR] = { .name = "macaddr", .type = BLOBMSG_TYPE_STRING },
  38         [DEV_ATTR_TXQUEUELEN] = { .name = "txqueuelen", .type = BLOBMSG_TYPE_INT32 },
  39         [DEV_ATTR_ENABLED] = { .name = "enabled", .type = BLOBMSG_TYPE_BOOL },
  40         [DEV_ATTR_IPV6] = { .name = "ipv6", .type = BLOBMSG_TYPE_BOOL },
  41 };
  42
  43 const struct uci_blob_param_list device_attr_list = {
  44         .n_params = __DEV_ATTR_MAX,
  45         .params = dev_attrs,
  46 };
  47
  48 static int __devlock = 0;
  49
  50 void device_lock(void)
  51 {
  52         __devlock++;
  53 }
  54
  55 void device_unlock(void)
  56 {
  57         __devlock--;
  58         if (!__devlock)
  59                 device_free_unused(NULL);
  60 }
  61
  62 static int set_device_state(struct device *dev, bool state)
  63 {
  64         if (dev->external)
  65                 return 0;
  66
  67         if (state)
  68                 system_if_up(dev);
  69         else
  70                 system_if_down(dev);
  71
  72         return 0;
  73 }
  74
  75 static int
  76 simple_device_set_state(struct device *dev, bool state)
  77 {
  78         struct device *pdev;
  79         int ret = 0;
  80
  81         pdev = dev->parent.dev;
  82         if (state && !pdev) {
  83                 pdev = system_if_get_parent(dev);
  84                 if (pdev)
  85                         device_add_user(&dev->parent, pdev);
  86         }
  87
  88         if (pdev) {
  89                 if (state)
  90                         ret = device_claim(&dev->parent);
  91                 else
  92                         device_release(&dev->parent);
  93
  94                 if (ret < 0)
  95                         return ret;
  96         }
  97         return set_device_state(dev, state);
  98 }
  99
 100 static struct device *
 101 simple_device_create(const char *name, struct blob_attr *attr)
 102 {
 103         struct blob_attr *tb[__DEV_ATTR_MAX];
 104         struct device *dev = NULL;
 105
 106         blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb, blob_data(attr), blob_len(attr));
 107         dev = device_get(name, true);
 108         if (!dev)
 109                 return NULL;
 110
 111         dev->set_state = simple_device_set_state;
 112         device_init_settings(dev, tb);
 113
 114         return dev;
 115 }
 116
 117 static void simple_device_free(struct device *dev)
 118 {
 119         if (dev->parent.dev)
 120                 device_remove_user(&dev->parent);
 121         free(dev);
 122 }
 123
 124 const struct device_type simple_device_type = {
 125         .name = "Network device",
 126         .config_params = &device_attr_list,
 127
 128         .create = simple_device_create,
 129         .check_state = system_if_check,
 130         .free = simple_device_free,
 131 };
 132
 133 static void
 134 device_merge_settings(struct device *dev, struct device_settings *n)
 135 {
 136         struct device_settings *os = &dev->orig_settings;
 137         struct device_settings *s = &dev->settings;
 138
 139         memset(n, 0, sizeof(*n));
 140         n->mtu = s->flags & DEV_OPT_MTU ? s->mtu : os->mtu;
 141         n->txqueuelen = s->flags & DEV_OPT_TXQUEUELEN ?
 142                 s->txqueuelen : os->txqueuelen;
 143         memcpy(n->macaddr,
 144                 (s->flags & DEV_OPT_MACADDR ? s->macaddr : os->macaddr),
 145                 sizeof(n->macaddr));
 146         n->ipv6 = s->flags & DEV_OPT_IPV6 ? s->ipv6 : os->ipv6;
 147         n->flags = s->flags | os->flags;
 148 }
 149
 150 void
 151 device_init_settings(struct device *dev, struct blob_attr **tb)
 152 {
 153         struct device_settings *s = &dev->settings;
 154         struct blob_attr *cur;
 155         struct ether_addr *ea;
 156         bool disabled = false;
 157
 158         s->flags = 0;
 159         if ((cur = tb[DEV_ATTR_ENABLED]))
 160                 disabled = !blobmsg_get_bool(cur);
 161
 162         if ((cur = tb[DEV_ATTR_MTU])) {
 163                 s->mtu = blobmsg_get_u32(cur);
 164                 s->flags |= DEV_OPT_MTU;
 165         }
 166
 167         if ((cur = tb[DEV_ATTR_TXQUEUELEN])) {
 168                 s->txqueuelen = blobmsg_get_u32(cur);
 169                 s->flags |= DEV_OPT_TXQUEUELEN;
 170         }
 171
 172         if ((cur = tb[DEV_ATTR_MACADDR])) {
 173                 ea = ether_aton(blobmsg_data(cur));
 174                 if (ea) {
 175                         memcpy(s->macaddr, ea, 6);
 176                         s->flags |= DEV_OPT_MACADDR;
 177                 }
 178         }
 179
 180         if ((cur = tb[DEV_ATTR_IPV6])) {
 181                 s->ipv6 = blobmsg_get_bool(cur);
 182                 s->flags |= DEV_OPT_IPV6;
 183         }
 184
 185         device_set_disabled(dev, disabled);
 186 }
 187
 188 static void __init dev_init(void)
 189 {
 190         avl_init(&devices, avl_strcmp, true, NULL);
 191 }
 192
 193 static int device_broadcast_cb(void *ctx, struct safe_list *list)
 194 {
 195         struct device_user *dep = container_of(list, struct device_user, list);
 196         int *ev = ctx;
 197
 198         /* device might have been removed by an earlier callback */
 199         if (!dep->dev)
 200                 return 0;
 201
 202         if (dep->cb)
 203                 dep->cb(dep, *ev);
 204         return 0;
 205 }
 206
 207 void device_broadcast_event(struct device *dev, enum device_event ev)
 208 {
 209         int dev_ev = ev;
 210
 211         safe_list_for_each(&dev->aliases, device_broadcast_cb, &dev_ev);
 212         safe_list_for_each(&dev->users, device_broadcast_cb, &dev_ev);
 213 }
 214
 215 int device_claim(struct device_user *dep)
 216 {
 217         struct device *dev = dep->dev;
 218         int ret;
 219
 220         if (dep->claimed)
 221                 return 0;
 222
 223         dep->claimed = true;
 224         D(DEVICE, "Claim %s %s, new active count: %d\n", dev->type->name, dev->ifname, dev->active + 1);
 225         if (++dev->active != 1)
 226                 return 0;
 227
 228         device_broadcast_event(dev, DEV_EVENT_SETUP);
 229         ret = dev->set_state(dev, true);
 230         if (ret == 0)
 231                 device_broadcast_event(dev, DEV_EVENT_UP);
 232         else {
 233                 D(DEVICE, "claim %s %s failed: %d\n", dev->type->name, dev->ifname, ret);
 234                 dev->active = 0;
 235                 dep->claimed = false;
 236         }
 237
 238         return ret;
 239 }
 240
 241 void device_release(struct device_user *dep)
 242 {
 243         struct device *dev = dep->dev;
 244
 245         if (!dep->claimed)
 246                 return;
 247
 248         dep->claimed = false;
 249         dev->active--;
 250         D(DEVICE, "Release %s %s, new active count: %d\n", dev->type->name, dev->ifname, dev->active);
 251         assert(dev->active >= 0);
 252
 253         if (dev->active)
 254                 return;
 255
 256         device_broadcast_event(dev, DEV_EVENT_TEARDOWN);
 257         if (!dev->external)
 258                 dev->set_state(dev, false);
 259         device_broadcast_event(dev, DEV_EVENT_DOWN);
 260 }
 261
 262 int device_check_state(struct device *dev)
 263 {
 264         if (!dev->type->check_state)
 265                 return simple_device_type.check_state(dev);
 266
 267         return dev->type->check_state(dev);
 268 }
 269
 270 void device_init_virtual(struct device *dev, const struct device_type *type, const char *name)
 271 {
 272         assert(dev);
 273         assert(type);
 274
 275         if (name)
 276                 strncpy(dev->ifname, name, IFNAMSIZ);
 277
 278         D(DEVICE, "Initialize device '%s'\n", dev->ifname);
 279         INIT_SAFE_LIST(&dev->users);
 280         INIT_SAFE_LIST(&dev->aliases);
 281         dev->type = type;
 282
 283         if (!dev->set_state)
 284                 dev->set_state = set_device_state;
 285 }
 286
 287 int device_init(struct device *dev, const struct device_type *type, const char *ifname)
 288 {
 289         int ret;
 290
 291         device_init_virtual(dev, type, ifname);
 292
 293         dev->avl.key = dev->ifname;
 294
 295         ret = avl_insert(&devices, &dev->avl);
 296         if (ret < 0)
 297                 return ret;
 298
 299         system_if_clear_state(dev);
 300         device_check_state(dev);
 301
 302         return 0;
 303 }
 304
 305 static struct device *
 306 device_create_default(const char *name, bool external)
 307 {
 308         struct device *dev;
 309
 310         if (!external && system_if_force_external(name))
 311                 return NULL;
 312
 313         D(DEVICE, "Create simple device '%s'\n", name);
 314         dev = calloc(1, sizeof(*dev));
 315         dev->external = external;
 316         dev->set_state = simple_device_set_state;
 317         device_init(dev, &simple_device_type, name);
 318         dev->default_config = true;
 319         return dev;
 320 }
 321
 322 struct device *
 323 device_get(const char *name, int create)
 324 {
 325         struct device *dev;
 326
 327         if (strchr(name, '.'))
 328                 return get_vlan_device_chain(name, create);
 329
 330         if (name[0] == '@')
 331                 return device_alias_get(name + 1);
 332
 333         dev = avl_find_element(&devices, name, dev, avl);
 334         if (dev) {
 335                 if (create > 1 && !dev->external) {
 336                         dev->external = true;
 337                         device_set_present(dev, true);
 338                 }
 339                 return dev;
 340         }
 341
 342         if (!create)
 343                 return NULL;
 344
 345         return device_create_default(name, create > 1);
 346 }
 347
 348 static void
 349 device_delete(struct device *dev)
 350 {
 351         if (!dev->avl.key)
 352                 return;
 353
 354         D(DEVICE, "Delete device '%s' from list\n", dev->ifname);
 355         avl_delete(&devices, &dev->avl);
 356         dev->avl.key = NULL;
 357 }
 358
 359 static int device_cleanup_cb(void *ctx, struct safe_list *list)
 360 {
 361         struct device_user *dep = container_of(list, struct device_user, list);
 362         if (dep->cb)
 363                 dep->cb(dep, DEV_EVENT_REMOVE);
 364
 365         device_release(dep);
 366         return 0;
 367 }
 368
 369 void device_cleanup(struct device *dev)
 370 {
 371         D(DEVICE, "Clean up device '%s'\n", dev->ifname);
 372         safe_list_for_each(&dev->users, device_cleanup_cb, NULL);
 373         safe_list_for_each(&dev->aliases, device_cleanup_cb, NULL);
 374         device_delete(dev);
 375 }
 376
 377 static void __device_set_present(struct device *dev, bool state)
 378 {
 379         if (dev->present == state)
 380                 return;
 381
 382         dev->present = state;
 383         device_broadcast_event(dev, state ? DEV_EVENT_ADD : DEV_EVENT_REMOVE);
 384 }
 385
 386 void
 387 device_refresh_present(struct device *dev)
 388 {
 389         bool state = dev->sys_present;
 390
 391         if (dev->disabled || dev->deferred)
 392                 state = false;
 393
 394         __device_set_present(dev, state);
 395 }
 396
 397 void device_set_present(struct device *dev, bool state)
 398 {
 399         if (dev->sys_present == state)
 400                 return;
 401
 402         D(DEVICE, "%s '%s' %s present\n", dev->type->name, dev->ifname, state ? "is now" : "is no longer" );
 403         dev->sys_present = state;
 404         device_refresh_present(dev);
 405 }
 406
 407 void device_set_link(struct device *dev, bool state)
 408 {
 409         if (dev->link_active == state)
 410                 return;
 411
 412         netifd_log_message(L_NOTICE, "%s '%s' link is %s\n", dev->type->name, dev->ifname, state ? "up" : "down" );
 413
 414         dev->link_active = state;
 415         device_broadcast_event(dev, state ? DEV_EVENT_LINK_UP : DEV_EVENT_LINK_DOWN);
 416 }
 417
 418 void device_set_ifindex(struct device *dev, int ifindex)
 419 {
 420         if (dev->ifindex == ifindex)
 421                 return;
 422
 423         dev->ifindex = ifindex;
 424         device_broadcast_event(dev, DEV_EVENT_UPDATE_IFINDEX);
 425 }
 426
 427 static int device_refcount(struct device *dev)
 428 {
 429         struct list_head *list;
 430         int count = 0;
 431
 432         list_for_each(list, &dev->users.list)
 433                 count++;
 434
 435         list_for_each(list, &dev->aliases.list)
 436                 count++;
 437
 438         return count;
 439 }
 440
 441 void device_add_user(struct device_user *dep, struct device *dev)
 442 {
 443         struct safe_list *head;
 444
 445         if (dep->dev == dev)
 446                 return;
 447
 448         if (dep->dev)
 449                 device_remove_user(dep);
 450
 451         if (!dev)
 452                 return;
 453
 454         dep->dev = dev;
 455
 456         if (dep->alias)
 457                 head = &dev->aliases;
 458         else
 459                 head = &dev->users;
 460
 461         safe_list_add(&dep->list, head);
 462         D(DEVICE, "Add user for device '%s', refcount=%d\n", dev->ifname, device_refcount(dev));
 463
 464         if (dep->cb && dev->present) {
 465                 dep->cb(dep, DEV_EVENT_ADD);
 466                 if (dev->active)
 467                         dep->cb(dep, DEV_EVENT_UP);
 468
 469                 if (dev->link_active)
 470                         dep->cb(dep, DEV_EVENT_LINK_UP);
 471         }
 472 }
 473
 474 void
 475 device_free(struct device *dev)
 476 {
 477         __devlock++;
 478         free(dev->config);
 479         device_cleanup(dev);
 480         dev->type->free(dev);
 481         __devlock--;
 482 }
 483
 484 static void
 485 __device_free_unused(struct device *dev)
 486 {
 487         if (!safe_list_empty(&dev->users) ||
 488                 !safe_list_empty(&dev->aliases) ||
 489             dev->current_config || __devlock)
 490                 return;
 491
 492         device_free(dev);
 493 }
 494
 495 void device_remove_user(struct device_user *dep)
 496 {
 497         struct device *dev = dep->dev;
 498
 499         if (!dep->dev)
 500                 return;
 501
 502         dep->hotplug = false;
 503         if (dep->claimed)
 504                 device_release(dep);
 505
 506         safe_list_del(&dep->list);
 507         dep->dev = NULL;
 508         D(DEVICE, "Remove user for device '%s', refcount=%d\n", dev->ifname, device_refcount(dev));
 509         __device_free_unused(dev);
 510 }
 511
 512 void
 513 device_free_unused(struct device *dev)
 514 {
 515         struct device *tmp;
 516
 517         if (dev)
 518                 return __device_free_unused(dev);
 519
 520         avl_for_each_element_safe(&devices, dev, avl, tmp)
 521                 __device_free_unused(dev);
 522 }
 523
 524 void
 525 device_init_pending(void)
 526 {
 527         struct device *dev, *tmp;
 528
 529         avl_for_each_element_safe(&devices, dev, avl, tmp) {
 530                 if (!dev->config_pending)
 531                         continue;
 532
 533                 dev->type->config_init(dev);
 534                 dev->config_pending = false;
 535         }
 536 }
 537
 538 static enum dev_change_type
 539 device_reload_config(struct device *dev, struct blob_attr *attr)
 540 {
 541         struct blob_attr *tb[__DEV_ATTR_MAX];
 542         const struct uci_blob_param_list *cfg = dev->type->config_params;
 543
 544         if (uci_blob_check_equal(dev->config, attr, cfg))
 545                 return DEV_CONFIG_NO_CHANGE;
 546
 547         if (cfg == &device_attr_list) {
 548                 memset(tb, 0, sizeof(tb));
 549
 550                 if (attr)
 551                         blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb,
 552                                 blob_data(attr), blob_len(attr));
 553
 554                 device_init_settings(dev, tb);
 555                 return DEV_CONFIG_RESTART;
 556         } else
 557                 return DEV_CONFIG_RECREATE;
 558 }
 559
 560 enum dev_change_type
 561 device_set_config(struct device *dev, const struct device_type *type,
 562                   struct blob_attr *attr)
 563 {
 564         if (type != dev->type)
 565                 return DEV_CONFIG_RECREATE;
 566
 567         if (dev->type->reload)
 568                 return dev->type->reload(dev, attr);
 569
 570         return device_reload_config(dev, attr);
 571 }
 572
 573 static void
 574 device_replace(struct device *dev, struct device *odev)
 575 {
 576         struct device_user *dep, *tmp;
 577         bool present = odev->present;
 578
 579         if (present)
 580                 device_set_present(odev, false);
 581
 582         list_for_each_entry_safe(dep, tmp, &odev->users.list, list.list) {
 583                 device_release(dep);
 584                 safe_list_del(&dep->list);
 585                 safe_list_add(&dep->list, &dev->users);
 586                 dep->dev = dev;
 587         }
 588         device_free(odev);
 589
 590         if (present)
 591                 device_set_present(dev, true);
 592 }
 593
 594 void
 595 device_reset_config(void)
 596 {
 597         struct device *dev;
 598
 599         avl_for_each_element(&devices, dev, avl)
 600                 dev->current_config = false;
 601 }
 602
 603 void
 604 device_reset_old(void)
 605 {
 606         struct device *dev, *tmp, *ndev;
 607
 608         avl_for_each_element_safe(&devices, dev, avl, tmp) {
 609                 if (dev->current_config || dev->default_config)
 610                         continue;
 611
 612                 if (dev->type != &simple_device_type)
 613                         continue;
 614
 615                 ndev = device_create_default(dev->ifname, dev->external);
 616                 device_replace(ndev, dev);
 617         }
 618 }
 619
 620 struct device *
 621 device_create(const char *name, const struct device_type *type,
 622               struct blob_attr *config)
 623 {
 624         struct device *odev = NULL, *dev;
 625         enum dev_change_type change;
 626
 627         config = blob_memdup(config);
 628         if (!config)
 629                 return NULL;
 630
 631         odev = device_get(name, false);
 632         if (odev) {
 633                 odev->current_config = true;
 634                 change = device_set_config(odev, type, config);
 635                 if (odev->external) {
 636                         system_if_apply_settings(odev, &odev->settings, odev->settings.flags);
 637                         change = DEV_CONFIG_APPLIED;
 638                 }
 639                 switch (change) {
 640                 case DEV_CONFIG_RESTART:
 641                 case DEV_CONFIG_APPLIED:
 642                         D(DEVICE, "Device '%s': config applied\n", odev->ifname);
 643                         free(odev->config);
 644                         odev->config = config;
 645                         if (change == DEV_CONFIG_RESTART && odev->present) {
 646                                 device_set_present(odev, false);
 647                                 device_set_present(odev, true);
 648                         }
 649                         return odev;
 650                 case DEV_CONFIG_NO_CHANGE:
 651                         D(DEVICE, "Device '%s': no configuration change\n", odev->ifname);
 652                         free(config);
 653                         return odev;
 654                 case DEV_CONFIG_RECREATE:
 655                         D(DEVICE, "Device '%s': recreate device\n", odev->ifname);
 656                         device_delete(odev);
 657                         break;
 658                 }
 659         } else
 660                 D(DEVICE, "Create new device '%s' (%s)\n", name, type->name);
 661
 662         dev = type->create(name, config);
 663         if (!dev)
 664                 return NULL;
 665
 666         dev->current_config = true;
 667         dev->config = config;
 668         if (odev)
 669                 device_replace(dev, odev);
 670
 671         if (!config_init && dev->config_pending)
 672                 type->config_init(dev);
 673
 674         return dev;
 675 }
 676
 677 void
 678 device_dump_status(struct blob_buf *b, struct device *dev)
 679 {
 680         struct device_settings st;
 681         void *c, *s;
 682
 683         if (!dev) {
 684                 avl_for_each_element(&devices, dev, avl) {
 685                         if (!dev->present)
 686                                 continue;
 687                         c = blobmsg_open_table(b, dev->ifname);
 688                         device_dump_status(b, dev);
 689                         blobmsg_close_table(b, c);
 690                 }
 691
 692                 return;
 693         }
 694
 695         blobmsg_add_u8(b, "external", dev->external);
 696         blobmsg_add_u8(b, "present", dev->present);
 697         blobmsg_add_string(b, "type", dev->type->name);
 698
 699         if (!dev->present)
 700                 return;
 701
 702         blobmsg_add_u8(b, "up", !!dev->active);
 703         blobmsg_add_u8(b, "carrier", !!dev->link_active);
 704
 705         if (dev->type->dump_info)
 706                 dev->type->dump_info(dev, b);
 707         else
 708                 system_if_dump_info(dev, b);
 709
 710         if (dev->active) {
 711                 device_merge_settings(dev, &st);
 712                 if (st.flags & DEV_OPT_MTU)
 713                         blobmsg_add_u32(b, "mtu", st.mtu);
 714                 if (st.flags & DEV_OPT_MACADDR)
 715                         blobmsg_add_string(b, "macaddr", format_macaddr(st.macaddr));
 716                 if (st.flags & DEV_OPT_TXQUEUELEN)
 717                         blobmsg_add_u32(b, "txqueuelen", st.txqueuelen);
 718                 if (st.flags & DEV_OPT_IPV6)
 719                         blobmsg_add_u8(b, "ipv6", st.ipv6);
 720         }
 721
 722         s = blobmsg_open_table(b, "statistics");
 723         if (dev->type->dump_stats)
 724                 dev->type->dump_stats(dev, b);
 725         else
 726                 system_if_dump_stats(dev, b);
 727         blobmsg_close_table(b, s);
 728 }