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