only free unused devices after the final config init
[project/netifd.git] / device.c
1 #include <string.h>
2 #include <stdlib.h>
3 #include <stdio.h>
4 #include <assert.h>
5
6 #include <sys/types.h>
7 #include <sys/socket.h>
8 #include <net/ethernet.h>
9
10 #ifdef linux
11 #include <netinet/ether.h>
12 #endif
13
14 #include "netifd.h"
15 #include "system.h"
16 #include "config.h"
17
18 static struct avl_tree devices;
19
20 static const struct blobmsg_policy dev_attrs[__DEV_ATTR_MAX] = {
21         [DEV_ATTR_TYPE] = { "type", BLOBMSG_TYPE_STRING },
22         [DEV_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
23         [DEV_ATTR_IFNAME] = { "ifname", BLOBMSG_TYPE_ARRAY },
24         [DEV_ATTR_MTU] = { "mtu", BLOBMSG_TYPE_INT32 },
25         [DEV_ATTR_MACADDR] = { "macaddr", BLOBMSG_TYPE_STRING },
26         [DEV_ATTR_TXQUEUELEN] = { "txqueuelen", BLOBMSG_TYPE_INT32 },
27 };
28
29 const struct config_param_list device_attr_list = {
30         .n_params = __DEV_ATTR_MAX,
31         .params = dev_attrs,
32 };
33
34 static struct device *
35 simple_device_create(struct blob_attr *attr)
36 {
37         struct blob_attr *tb[__DEV_ATTR_MAX];
38         struct device *dev = NULL;
39         const char *name;
40
41         blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb, blob_data(attr), blob_len(attr));
42         if (!tb[DEV_ATTR_NAME])
43                 return NULL;
44
45         name = blobmsg_data(tb[DEV_ATTR_NAME]);
46         if (!name)
47                 return NULL;
48
49         dev = device_get(name, true);
50         if (!dev)
51                 return NULL;
52
53         device_init_settings(dev, tb);
54
55         return dev;
56 }
57
58 static void simple_device_free(struct device *dev)
59 {
60         device_cleanup(dev);
61         free(dev);
62 }
63
64 const struct device_type simple_device_type = {
65         .name = "Network device",
66         .config_params = &device_attr_list,
67
68         .create = simple_device_create,
69         .check_state = system_if_check,
70         .free = simple_device_free,
71 };
72
73 void
74 device_init_settings(struct device *dev, struct blob_attr **tb)
75 {
76         struct blob_attr *cur;
77         struct ether_addr *ea;
78
79         dev->flags = 0;
80
81         if ((cur = tb[DEV_ATTR_MTU])) {
82                 dev->mtu = blobmsg_get_u32(cur);
83                 dev->flags |= DEV_OPT_MTU;
84         }
85
86         if ((cur = tb[DEV_ATTR_TXQUEUELEN])) {
87                 dev->txqueuelen = blobmsg_get_u32(cur);
88                 dev->flags |= DEV_OPT_TXQUEUELEN;
89         }
90
91         if ((cur = tb[DEV_ATTR_MACADDR])) {
92                 ea = ether_aton(blob_data(cur));
93                 if (ea) {
94                         memcpy(dev->macaddr, ea, sizeof(dev->macaddr));
95                         dev->flags |= DEV_OPT_MACADDR;
96                 }
97         }
98 }
99
100 static void __init dev_init(void)
101 {
102         avl_init(&devices, avl_strcmp, true, NULL);
103 }
104
105 static void device_broadcast_event(struct device *dev, enum device_event ev)
106 {
107         struct device_user *dep, *tmp;
108
109         list_for_each_entry_safe(dep, tmp, &dev->users, list) {
110                 if (!dep->cb)
111                         continue;
112
113                 dep->cb(dep, ev);
114         }
115 }
116
117 static int set_device_state(struct device *dev, bool state)
118 {
119         if (state)
120                 system_if_up(dev);
121         else
122                 system_if_down(dev);
123
124         return 0;
125 }
126
127 int device_claim(struct device_user *dep)
128 {
129         struct device *dev = dep->dev;
130         int ret;
131
132         if (dep->claimed)
133                 return 0;
134
135         dep->claimed = true;
136         D(DEVICE, "claim device %s, new refcount: %d\n", dev->ifname, dev->active + 1);
137         if (++dev->active != 1)
138                 return 0;
139
140         device_broadcast_event(dev, DEV_EVENT_SETUP);
141         ret = dev->set_state(dev, true);
142         if (ret == 0)
143                 device_broadcast_event(dev, DEV_EVENT_UP);
144         else {
145                 D(DEVICE, "claim device %s failed: %d\n", dev->ifname, ret);
146                 dev->active = 0;
147                 dep->claimed = false;
148         }
149
150         return ret;
151 }
152
153 void device_release(struct device_user *dep)
154 {
155         struct device *dev = dep->dev;
156
157         if (!dep->claimed)
158                 return;
159
160         dep->claimed = false;
161         dev->active--;
162         D(DEVICE, "release device %s, new refcount: %d\n", dev->ifname, dev->active);
163         assert(dev->active >= 0);
164
165         if (dev->active)
166                 return;
167
168         device_broadcast_event(dev, DEV_EVENT_TEARDOWN);
169         dev->set_state(dev, false);
170         device_broadcast_event(dev, DEV_EVENT_DOWN);
171 }
172
173 int device_check_state(struct device *dev)
174 {
175         if (!dev->type->check_state)
176                 return 0;
177
178         return dev->type->check_state(dev);
179 }
180
181 void device_init_virtual(struct device *dev, const struct device_type *type, const char *name)
182 {
183         assert(dev);
184         assert(type);
185
186         if (name)
187                 strncpy(dev->ifname, name, IFNAMSIZ);
188
189         D(DEVICE, "Initialize device '%s'\n", dev->ifname);
190         INIT_LIST_HEAD(&dev->users);
191         dev->type = type;
192 }
193
194 int device_init(struct device *dev, const struct device_type *type, const char *ifname)
195 {
196         int ret;
197
198         device_init_virtual(dev, type, ifname);
199
200         if (!dev->set_state)
201                 dev->set_state = set_device_state;
202
203         dev->avl.key = dev->ifname;
204
205         ret = avl_insert(&devices, &dev->avl);
206         if (ret < 0)
207                 return ret;
208
209         device_check_state(dev);
210
211         return 0;
212 }
213
214 static struct device *
215 device_create_default(const char *name)
216 {
217         struct device *dev;
218
219         D(DEVICE, "Create simple device '%s'\n", name);
220         dev = calloc(1, sizeof(*dev));
221         device_init(dev, &simple_device_type, name);
222         dev->default_config = true;
223         return dev;
224 }
225
226 struct device *
227 device_get(const char *name, bool create)
228 {
229         struct device *dev;
230
231         if (strchr(name, '.'))
232                 return get_vlan_device_chain(name, create);
233
234         dev = avl_find_element(&devices, name, dev, avl);
235         if (dev)
236                 return dev;
237
238         if (!create)
239                 return NULL;
240
241         return device_create_default(name);
242 }
243
244 static void
245 device_delete(struct device *dev)
246 {
247         if (!dev->avl.key)
248                 return;
249
250         D(DEVICE, "Delete device '%s' from list\n", dev->ifname);
251         avl_delete(&devices, &dev->avl);
252         dev->avl.key = NULL;
253 }
254
255 void device_cleanup(struct device *dev)
256 {
257         struct device_user *dep, *tmp;
258
259         D(DEVICE, "Clean up device '%s'\n", dev->ifname);
260         list_for_each_entry_safe(dep, tmp, &dev->users, list) {
261                 if (!dep->cb)
262                         continue;
263
264                 dep->cb(dep, DEV_EVENT_REMOVE);
265                 device_release(dep);
266         }
267
268         device_delete(dev);
269 }
270
271 void device_set_present(struct device *dev, bool state)
272 {
273         if (dev->present == state)
274                 return;
275
276         D(DEVICE, "Device '%s' %s present\n", dev->ifname, state ? "is now" : "is no longer" );
277         dev->present = state;
278         device_broadcast_event(dev, state ? DEV_EVENT_ADD : DEV_EVENT_REMOVE);
279 }
280
281 void device_add_user(struct device_user *dep, struct device *dev)
282 {
283         dep->dev = dev;
284         list_add_tail(&dep->list, &dev->users);
285         if (dep->cb && dev->present) {
286                 dep->cb(dep, DEV_EVENT_ADD);
287                 if (dev->active)
288                         dep->cb(dep, DEV_EVENT_UP);
289         }
290 }
291
292 static void
293 __device_free_unused(struct device *dev)
294 {
295         if (!list_empty(&dev->users) || dev->current_config || config_init)
296                 return;
297
298         device_free(dev);
299 }
300
301 void device_remove_user(struct device_user *dep)
302 {
303         struct device *dev = dep->dev;
304
305         if (dep->claimed)
306                 device_release(dep);
307
308         list_del(&dep->list);
309         dep->dev = NULL;
310         __device_free_unused(dev);
311 }
312
313 void
314 device_free_unused(struct device *dev)
315 {
316         struct device *tmp;
317
318         if (dev)
319                 return __device_free_unused(dev);
320
321         avl_for_each_element_safe(&devices, dev, avl, tmp)
322                 __device_free_unused(dev);
323 }
324
325 void
326 device_init_pending(void)
327 {
328         struct device *dev, *tmp;
329
330         avl_for_each_element_safe(&devices, dev, avl, tmp) {
331                 if (!dev->config_pending)
332                         continue;
333
334                 dev->type->config_init(dev);
335                 dev->config_pending = false;
336         }
337 }
338
339 enum dev_change_type
340 device_reload_config(struct device *dev, struct blob_attr *attr)
341 {
342         struct blob_attr *tb[__DEV_ATTR_MAX];
343         const struct config_param_list *cfg = dev->type->config_params;
344
345         if (config_check_equal(dev->config, attr, cfg))
346                 return DEV_CONFIG_NO_CHANGE;
347
348         if (cfg == &device_attr_list) {
349                 memset(tb, 0, sizeof(tb));
350
351                 if (dev->config)
352                         blobmsg_parse(dev_attrs, __DEV_ATTR_MAX, tb,
353                                 blob_data(attr), blob_len(attr));
354
355                 device_init_settings(dev, tb);
356                 return DEV_CONFIG_APPLIED;
357         } else
358                 return DEV_CONFIG_RECREATE;
359 }
360
361 static enum dev_change_type
362 device_check_config(struct device *dev, const struct device_type *type,
363                     struct blob_attr *attr)
364 {
365         if (type != dev->type)
366                 return DEV_CONFIG_RECREATE;
367
368         if (dev->type->reload)
369                 return dev->type->reload(dev, attr);
370
371         return device_reload_config(dev, attr);
372 }
373
374 static void
375 device_replace(struct device *dev, struct device *odev)
376 {
377         struct device_user *dep, *tmp;
378         bool present = odev->present;
379
380         if (present)
381                 device_set_present(odev, false);
382
383         list_for_each_entry_safe(dep, tmp, &odev->users, list) {
384                 device_release(dep);
385                 list_move_tail(&dep->list, &dev->users);
386                 dep->dev = dev;
387         }
388         device_free(odev);
389
390         if (present)
391                 device_set_present(dev, true);
392 }
393
394 void
395 device_reset_config(void)
396 {
397         struct device *dev;
398
399         avl_for_each_element(&devices, dev, avl)
400                 dev->current_config = false;
401 }
402
403 void
404 device_reset_old(void)
405 {
406         struct device *dev, *tmp, *ndev;
407
408         avl_for_each_element_safe(&devices, dev, avl, tmp) {
409                 if (dev->current_config || dev->default_config)
410                         continue;
411
412                 if (dev->type != &simple_device_type)
413                         continue;
414
415                 ndev = device_create_default(dev->ifname);
416                 device_replace(ndev, dev);
417         }
418 }
419
420 struct device *
421 device_create(const char *name, const struct device_type *type,
422               struct blob_attr *config)
423 {
424         struct device *odev = NULL, *dev;
425         enum dev_change_type change;
426
427         config = config_memdup(config);
428         if (!config)
429                 return NULL;
430
431         odev = device_get(name, false);
432         if (odev) {
433                 odev->current_config = true;
434                 change = device_check_config(odev, type, config);
435                 switch (change) {
436                 case DEV_CONFIG_APPLIED:
437                         D(DEVICE, "Device '%s': config applied\n", odev->ifname);
438                         free(odev->config);
439                         odev->config = config;
440                         if (odev->present) {
441                                 device_set_present(odev, false);
442                                 device_set_present(odev, true);
443                         }
444                         return odev;
445                 case DEV_CONFIG_NO_CHANGE:
446                         D(DEVICE, "Device '%s': no configuration change\n", odev->ifname);
447                         free(config);
448                         return odev;
449                 case DEV_CONFIG_RECREATE:
450                         D(DEVICE, "Device '%s': recreate device\n", odev->ifname);
451                         device_delete(odev);
452                         break;
453                 }
454         } else
455                 D(DEVICE, "Create new device '%s' (%s)\n", name, type->name);
456
457         dev = type->create(config);
458         if (!dev)
459                 return NULL;
460
461         dev->current_config = true;
462         dev->config = config;
463         if (odev)
464                 device_replace(dev, odev);
465
466         if (!config_init && dev->config_pending)
467                 type->config_init(dev);
468
469         return dev;
470 }