do not clear device state for devices created by proto-up with address-external set
[project/netifd.git] / device.c
index 0efdba5..428d001 100644 (file)
--- a/device.c
+++ b/device.c
 #include <stdio.h>
 #include <assert.h>
 
 #include <stdio.h>
 #include <assert.h>
 
-#include <libubox/uapi.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <net/ethernet.h>
+
+#ifdef linux
+#include <netinet/ether.h>
+#endif
 
 #include "netifd.h"
 #include "system.h"
 
 #include "netifd.h"
 #include "system.h"
+#include "config.h"
 
 static struct avl_tree devices;
 
 static struct avl_tree devices;
+static struct avl_tree aliases;
+
+struct alias_device {
+       struct avl_node avl;
+       struct device dev;
+       struct device_user dep;
+       bool cleanup;
+       char name[];
+};
+
+static const struct device_type alias_device_type;
+
+static const struct blobmsg_policy dev_attrs[__DEV_ATTR_MAX] = {
+       [DEV_ATTR_TYPE] = { "type", BLOBMSG_TYPE_STRING },
+       [DEV_ATTR_IFNAME] = { "ifname", BLOBMSG_TYPE_ARRAY },
+       [DEV_ATTR_MTU] = { "mtu", BLOBMSG_TYPE_INT32 },
+       [DEV_ATTR_MACADDR] = { "macaddr", BLOBMSG_TYPE_STRING },
+       [DEV_ATTR_TXQUEUELEN] = { "txqueuelen", BLOBMSG_TYPE_INT32 },
+};
+
+const struct config_param_list device_attr_list = {
+       .n_params = __DEV_ATTR_MAX,
+       .params = dev_attrs,
+};
+
+static int __devlock = 0;
+
+void device_lock(void)
+{
+       __devlock++;
+}
 
 
-static int avl_strcmp(const void *k1, const void *k2, void *ptr)
+void device_unlock(void)
 {
 {
-       return strcmp(k1, k2);
+       __devlock--;
+       if (!__devlock)
+               device_free_unused(NULL);
 }
 
 }
 
-static void API_CTOR dev_init(void)
+static struct device *
+simple_device_create(const char *name, struct blob_attr *attr)
 {
 {
-       avl_init(&devices, avl_strcmp, false, NULL);
+       struct blob_attr *tb[__DEV_ATTR_MAX];
+       struct device *dev = NULL;
+
+       blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb, blob_data(attr), blob_len(attr));
+       dev = device_get(name, true);
+       if (!dev)
+               return NULL;
+
+       device_init_settings(dev, tb);
+
+       return dev;
 }
 
 }
 
-static void free_device(struct device *dev)
+static void simple_device_free(struct device *dev)
 {
 {
-       cleanup_device(dev);
+       device_cleanup(dev);
        free(dev);
 }
 
        free(dev);
 }
 
-static void broadcast_device_event(struct device *dev, enum device_event ev)
+const struct device_type simple_device_type = {
+       .name = "Network device",
+       .config_params = &device_attr_list,
+
+       .create = simple_device_create,
+       .check_state = system_if_check,
+       .free = simple_device_free,
+};
+
+static int
+alias_device_set_state(struct device *dev, bool state)
+{
+       struct alias_device *alias;
+
+       alias = container_of(dev, struct alias_device, dev);
+       if (!alias->dep.dev)
+               return -1;
+
+       if (state)
+               return device_claim(&alias->dep);
+
+       device_release(&alias->dep);
+       if (alias->cleanup)
+               device_remove_user(&alias->dep);
+       return 0;
+}
+
+static struct device *
+alias_device_create(const char *name, struct blob_attr *attr)
+{
+       struct alias_device *alias;
+
+       alias = calloc(1, sizeof(*alias) + strlen(name) + 1);
+       strcpy(alias->name, name);
+       alias->dev.set_state = alias_device_set_state;
+       device_init_virtual(&alias->dev, &alias_device_type, NULL);
+       alias->avl.key = alias->name;
+       avl_insert(&aliases, &alias->avl);
+
+       return &alias->dev;
+}
+
+static void alias_device_free(struct device *dev)
+{
+       struct alias_device *alias;
+
+       device_cleanup(dev);
+
+       alias = container_of(dev, struct alias_device, dev);
+       avl_delete(&aliases, &alias->avl);
+       free(alias);
+}
+
+static const struct device_type alias_device_type = {
+       .name = "Network alias",
+       .create = alias_device_create,
+       .free = alias_device_free,
+};
+
+void
+device_init_settings(struct device *dev, struct blob_attr **tb)
+{
+       struct blob_attr *cur;
+       struct ether_addr *ea;
+
+       dev->flags = 0;
+
+       if ((cur = tb[DEV_ATTR_MTU])) {
+               dev->mtu = blobmsg_get_u32(cur);
+               dev->flags |= DEV_OPT_MTU;
+       }
+
+       if ((cur = tb[DEV_ATTR_TXQUEUELEN])) {
+               dev->txqueuelen = blobmsg_get_u32(cur);
+               dev->flags |= DEV_OPT_TXQUEUELEN;
+       }
+
+       if ((cur = tb[DEV_ATTR_MACADDR])) {
+               ea = ether_aton(blob_data(cur));
+               if (ea) {
+                       memcpy(dev->macaddr, ea, sizeof(dev->macaddr));
+                       dev->flags |= DEV_OPT_MACADDR;
+               }
+       }
+}
+
+static void __init dev_init(void)
+{
+       avl_init(&devices, avl_strcmp, true, NULL);
+       avl_init(&aliases, avl_strcmp, false, NULL);
+}
+
+static void device_broadcast_event(struct device *dev, enum device_event ev)
 {
        struct device_user *dep, *tmp;
 
 {
        struct device_user *dep, *tmp;
 
@@ -38,6 +181,34 @@ static void broadcast_device_event(struct device *dev, enum device_event ev)
        }
 }
 
        }
 }
 
+void
+alias_notify_device(const char *name, struct device *dev)
+{
+       struct alias_device *alias;
+
+       device_lock();
+
+       alias = avl_find_element(&aliases, name, alias, avl);
+       if (!alias)
+               return;
+
+       alias->cleanup = !dev;
+       if (dev) {
+               if (dev != alias->dep.dev) {
+                       device_remove_user(&alias->dep);
+                       strcpy(alias->dev.ifname, dev->ifname);
+                       device_add_user(&alias->dep, dev);
+               }
+       }
+
+       device_set_present(&alias->dev, !!dev);
+
+       if (!dev && alias->dep.dev && !alias->dep.dev->active)
+               device_remove_user(&alias->dep);
+
+       device_unlock();
+}
+
 static int set_device_state(struct device *dev, bool state)
 {
        if (state)
 static int set_device_state(struct device *dev, bool state)
 {
        if (state)
@@ -48,39 +219,53 @@ static int set_device_state(struct device *dev, bool state)
        return 0;
 }
 
        return 0;
 }
 
-int claim_device(struct device *dev)
+int device_claim(struct device_user *dep)
 {
 {
+       struct device *dev = dep->dev;
        int ret;
 
        int ret;
 
-       DPRINTF("claim device %s, new refcount: %d\n", dev->ifname, dev->active + 1);
+       if (dep->claimed)
+               return 0;
+
+       dep->claimed = true;
+       D(DEVICE, "Claim %s %s, new refcount: %d\n", dev->type->name, dev->ifname, dev->active + 1);
        if (++dev->active != 1)
                return 0;
 
        if (++dev->active != 1)
                return 0;
 
-       broadcast_device_event(dev, DEV_EVENT_SETUP);
+       device_broadcast_event(dev, DEV_EVENT_SETUP);
        ret = dev->set_state(dev, true);
        if (ret == 0)
        ret = dev->set_state(dev, true);
        if (ret == 0)
-               broadcast_device_event(dev, DEV_EVENT_UP);
-       else
+               device_broadcast_event(dev, DEV_EVENT_UP);
+       else {
+               D(DEVICE, "claim device %s failed: %d\n", dev->ifname, ret);
                dev->active = 0;
                dev->active = 0;
+               dep->claimed = false;
+       }
 
        return ret;
 }
 
 
        return ret;
 }
 
-void release_device(struct device *dev)
+void device_release(struct device_user *dep)
 {
 {
+       struct device *dev = dep->dev;
+
+       if (!dep->claimed)
+               return;
+
+       dep->claimed = false;
        dev->active--;
        dev->active--;
-       DPRINTF("release device %s, new refcount: %d\n", dev->ifname, dev->active);
+       D(DEVICE, "Release %s %s, new refcount: %d\n", dev->type->name, dev->ifname, dev->active);
        assert(dev->active >= 0);
 
        if (dev->active)
                return;
 
        assert(dev->active >= 0);
 
        if (dev->active)
                return;
 
-       broadcast_device_event(dev, DEV_EVENT_TEARDOWN);
+       device_broadcast_event(dev, DEV_EVENT_TEARDOWN);
        dev->set_state(dev, false);
        dev->set_state(dev, false);
-       broadcast_device_event(dev, DEV_EVENT_DOWN);
+       device_broadcast_event(dev, DEV_EVENT_DOWN);
 }
 
 }
 
-int check_device_state(struct device *dev)
+int device_check_state(struct device *dev)
 {
        if (!dev->type->check_state)
                return 0;
 {
        if (!dev->type->check_state)
                return 0;
@@ -88,7 +273,7 @@ int check_device_state(struct device *dev)
        return dev->type->check_state(dev);
 }
 
        return dev->type->check_state(dev);
 }
 
-void init_virtual_device(struct device *dev, const struct device_type *type, const char *name)
+void device_init_virtual(struct device *dev, const struct device_type *type, const char *name)
 {
        assert(dev);
        assert(type);
 {
        assert(dev);
        assert(type);
@@ -96,16 +281,16 @@ void init_virtual_device(struct device *dev, const struct device_type *type, con
        if (name)
                strncpy(dev->ifname, name, IFNAMSIZ);
 
        if (name)
                strncpy(dev->ifname, name, IFNAMSIZ);
 
-       fprintf(stderr, "Initialize interface '%s'\n", dev->ifname);
+       D(DEVICE, "Initialize device '%s'\n", dev->ifname);
        INIT_LIST_HEAD(&dev->users);
        dev->type = type;
 }
 
        INIT_LIST_HEAD(&dev->users);
        dev->type = type;
 }
 
-int init_device(struct device *dev, const struct device_type *type, const char *ifname)
+int device_init(struct device *dev, const struct device_type *type, const char *ifname)
 {
        int ret;
 
 {
        int ret;
 
-       init_virtual_device(dev, type, ifname);
+       device_init_virtual(dev, type, ifname);
 
        if (!dev->set_state)
                dev->set_state = set_device_state;
 
        if (!dev->set_state)
                dev->set_state = set_device_state;
@@ -116,24 +301,48 @@ int init_device(struct device *dev, const struct device_type *type, const char *
        if (ret < 0)
                return ret;
 
        if (ret < 0)
                return ret;
 
-       check_device_state(dev);
+       system_if_clear_state(dev);
+       device_check_state(dev);
 
        return 0;
 }
 
 
        return 0;
 }
 
-struct device *get_device(const char *name, bool create)
+static struct device *
+device_create_default(const char *name, bool external)
 {
 {
-       static const struct device_type simple_type = {
-               .name = "Device",
-               .check_state = system_if_check,
-               .free = free_device,
-       };
        struct device *dev;
 
        struct device *dev;
 
+       D(DEVICE, "Create simple device '%s'\n", name);
+       dev = calloc(1, sizeof(*dev));
+       dev->external = external;
+       device_init(dev, &simple_device_type, name);
+       dev->default_config = true;
+       return dev;
+}
+
+static struct device *
+device_alias_get(const char *name)
+{
+       struct alias_device *alias;
+
+       alias = avl_find_element(&aliases, name, alias, avl);
+       if (alias)
+               return &alias->dev;
+
+       return alias_device_create(name, NULL);
+}
+
+struct device *
+device_get(const char *name, int create)
+{
+       struct device *dev;
 
        if (strchr(name, '.'))
                return get_vlan_device_chain(name, create);
 
 
        if (strchr(name, '.'))
                return get_vlan_device_chain(name, create);
 
+       if (name[0] == '@')
+               return device_alias_get(name + 1);
+
        dev = avl_find_element(&devices, name, dev, avl);
        if (dev)
                return dev;
        dev = avl_find_element(&devices, name, dev, avl);
        if (dev)
                return dev;
@@ -141,42 +350,50 @@ struct device *get_device(const char *name, bool create)
        if (!create)
                return NULL;
 
        if (!create)
                return NULL;
 
-       dev = calloc(1, sizeof(*dev));
-       init_device(dev, &simple_type, name);
+       return device_create_default(name, create > 1);
+}
 
 
-       return dev;
+static void
+device_delete(struct device *dev)
+{
+       if (!dev->avl.key)
+               return;
+
+       D(DEVICE, "Delete device '%s' from list\n", dev->ifname);
+       avl_delete(&devices, &dev->avl);
+       dev->avl.key = NULL;
 }
 
 }
 
-void cleanup_device(struct device *dev)
+void device_cleanup(struct device *dev)
 {
        struct device_user *dep, *tmp;
 
 {
        struct device_user *dep, *tmp;
 
-       fprintf(stderr, "Clean up interface '%s'\n", dev->ifname);
+       D(DEVICE, "Clean up device '%s'\n", dev->ifname);
        list_for_each_entry_safe(dep, tmp, &dev->users, list) {
                if (!dep->cb)
                        continue;
 
                dep->cb(dep, DEV_EVENT_REMOVE);
        list_for_each_entry_safe(dep, tmp, &dev->users, list) {
                if (!dep->cb)
                        continue;
 
                dep->cb(dep, DEV_EVENT_REMOVE);
+               device_release(dep);
        }
 
        }
 
-       if (dev->avl.key)
-               avl_delete(&devices, &dev->avl);
+       device_delete(dev);
 }
 
 }
 
-void set_device_present(struct device *dev, bool state)
+void device_set_present(struct device *dev, bool state)
 {
        if (dev->present == state)
                return;
 
 {
        if (dev->present == state)
                return;
 
-       DPRINTF("Device '%s' %s present\n", dev->ifname, state ? "is now" : "is no longer" );
+       D(DEVICE, "%s '%s' %s present\n", dev->type->name, dev->ifname, state ? "is now" : "is no longer" );
        dev->present = state;
        dev->present = state;
-       broadcast_device_event(dev, state ? DEV_EVENT_ADD : DEV_EVENT_REMOVE);
+       device_broadcast_event(dev, state ? DEV_EVENT_ADD : DEV_EVENT_REMOVE);
 }
 
 }
 
-void add_device_user(struct device_user *dep, struct device *dev)
+void device_add_user(struct device_user *dep, struct device *dev)
 {
        dep->dev = dev;
 {
        dep->dev = dev;
-       list_add(&dep->list, &dev->users);
+       list_add_tail(&dep->list, &dev->users);
        if (dep->cb && dev->present) {
                dep->cb(dep, DEV_EVENT_ADD);
                if (dev->active)
        if (dep->cb && dev->present) {
                dep->cb(dep, DEV_EVENT_ADD);
                if (dev->active)
@@ -184,16 +401,219 @@ void add_device_user(struct device_user *dep, struct device *dev)
        }
 }
 
        }
 }
 
-void remove_device_user(struct device_user *dep)
+static void
+__device_free_unused(struct device *dev)
+{
+       if (!list_empty(&dev->users) || dev->current_config || __devlock)
+               return;
+
+       device_free(dev);
+}
+
+void device_remove_user(struct device_user *dep)
 {
        struct device *dev = dep->dev;
 
 {
        struct device *dev = dep->dev;
 
+       if (!dep->dev)
+               return;
+
+       dep->hotplug = false;
+       if (dep->claimed)
+               device_release(dep);
+
        list_del(&dep->list);
        list_del(&dep->list);
+       dep->dev = NULL;
+       __device_free_unused(dev);
+}
+
+void
+device_free_unused(struct device *dev)
+{
+       struct device *tmp;
+
+       if (dev)
+               return __device_free_unused(dev);
 
 
-       if (list_empty(&dev->users)) {
-               /* all references have gone away, remove this interface */
-               dev->type->free(dev);
+       avl_for_each_element_safe(&devices, dev, avl, tmp)
+               __device_free_unused(dev);
+}
+
+void
+device_init_pending(void)
+{
+       struct device *dev, *tmp;
+
+       avl_for_each_element_safe(&devices, dev, avl, tmp) {
+               if (!dev->config_pending)
+                       continue;
+
+               dev->type->config_init(dev);
+               dev->config_pending = false;
        }
        }
+}
 
 
-       dep->dev = NULL;
+static enum dev_change_type
+device_reload_config(struct device *dev, struct blob_attr *attr)
+{
+       struct blob_attr *tb[__DEV_ATTR_MAX];
+       const struct config_param_list *cfg = dev->type->config_params;
+
+       if (config_check_equal(dev->config, attr, cfg))
+               return DEV_CONFIG_NO_CHANGE;
+
+       if (cfg == &device_attr_list) {
+               memset(tb, 0, sizeof(tb));
+
+               if (attr)
+                       blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb,
+                               blob_data(attr), blob_len(attr));
+
+               device_init_settings(dev, tb);
+               return DEV_CONFIG_APPLIED;
+       } else
+               return DEV_CONFIG_RECREATE;
+}
+
+enum dev_change_type
+device_set_config(struct device *dev, const struct device_type *type,
+                 struct blob_attr *attr)
+{
+       if (type != dev->type)
+               return DEV_CONFIG_RECREATE;
+
+       if (dev->type->reload)
+               return dev->type->reload(dev, attr);
+
+       return device_reload_config(dev, attr);
+}
+
+static void
+device_replace(struct device *dev, struct device *odev)
+{
+       struct device_user *dep, *tmp;
+       bool present = odev->present;
+
+       if (present)
+               device_set_present(odev, false);
+
+       list_for_each_entry_safe(dep, tmp, &odev->users, list) {
+               device_release(dep);
+               list_move_tail(&dep->list, &dev->users);
+               dep->dev = dev;
+       }
+       device_free(odev);
+
+       if (present)
+               device_set_present(dev, true);
+}
+
+void
+device_reset_config(void)
+{
+       struct device *dev;
+
+       avl_for_each_element(&devices, dev, avl)
+               dev->current_config = false;
+}
+
+void
+device_reset_old(void)
+{
+       struct device *dev, *tmp, *ndev;
+
+       avl_for_each_element_safe(&devices, dev, avl, tmp) {
+               if (dev->current_config || dev->default_config)
+                       continue;
+
+               if (dev->type != &simple_device_type)
+                       continue;
+
+               ndev = device_create_default(dev->ifname, dev->external);
+               device_replace(ndev, dev);
+       }
+}
+
+struct device *
+device_create(const char *name, const struct device_type *type,
+             struct blob_attr *config)
+{
+       struct device *odev = NULL, *dev;
+       enum dev_change_type change;
+
+       config = config_memdup(config);
+       if (!config)
+               return NULL;
+
+       odev = device_get(name, false);
+       if (odev) {
+               odev->current_config = true;
+               change = device_set_config(odev, type, config);
+               switch (change) {
+               case DEV_CONFIG_APPLIED:
+                       D(DEVICE, "Device '%s': config applied\n", odev->ifname);
+                       free(odev->config);
+                       odev->config = config;
+                       if (odev->present) {
+                               device_set_present(odev, false);
+                               device_set_present(odev, true);
+                       }
+                       return odev;
+               case DEV_CONFIG_NO_CHANGE:
+                       D(DEVICE, "Device '%s': no configuration change\n", odev->ifname);
+                       free(config);
+                       return odev;
+               case DEV_CONFIG_RECREATE:
+                       D(DEVICE, "Device '%s': recreate device\n", odev->ifname);
+                       device_delete(odev);
+                       break;
+               }
+       } else
+               D(DEVICE, "Create new device '%s' (%s)\n", name, type->name);
+
+       dev = type->create(name, config);
+       if (!dev)
+               return NULL;
+
+       dev->current_config = true;
+       dev->config = config;
+       if (odev)
+               device_replace(dev, odev);
+
+       if (!config_init && dev->config_pending)
+               type->config_init(dev);
+
+       return dev;
+}
+
+void
+device_dump_status(struct blob_buf *b, struct device *dev)
+{
+       void *c, *s;
+
+       if (!dev) {
+               avl_for_each_element(&devices, dev, avl) {
+                       if (!dev->present)
+                               continue;
+                       c = blobmsg_open_table(b, dev->ifname);
+                       device_dump_status(b, dev);
+                       blobmsg_close_table(b, c);
+               }
+
+               return;
+       }
+
+       if (!dev->present)
+               return;
+
+       blobmsg_add_string(b, "type", dev->type->name);
+       blobmsg_add_u8(b, "up", !!dev->active);
+       if (dev->type->dump_info)
+               dev->type->dump_info(dev, b);
+
+       s = blobmsg_open_table(b, "statistics");
+       if (dev->type->dump_stats)
+               dev->type->dump_stats(dev, b);
+       else
+               system_if_dump_stats(dev, b);
+       blobmsg_close_table(b, s);
 }
 }