allow proto handlers to attach data items in notify
[project/netifd.git] / proto-shell.c
1 #define _GNU_SOURCE
2
3 #include <string.h>
4 #include <stdlib.h>
5 #include <stdio.h>
6 #include <glob.h>
7 #include <unistd.h>
8 #include <fcntl.h>
9 #include <signal.h>
10
11 #include <arpa/inet.h>
12 #include <netinet/in.h>
13
14 #include <libubox/blobmsg_json.h>
15
16 #include "netifd.h"
17 #include "interface.h"
18 #include "interface-ip.h"
19 #include "proto.h"
20
21 static struct netifd_fd proto_fd;
22
23 enum proto_shell_sm {
24 S_IDLE,
25 S_SETUP,
26 S_SETUP_ABORT,
27 S_TEARDOWN,
28 };
29
30 struct proto_shell_handler {
31 struct list_head list;
32 struct proto_handler proto;
33 struct config_param_list config;
34 char *config_buf;
35 bool init_available;
36 char script_name[];
37 };
38
39 struct proto_shell_state {
40 struct interface_proto_state proto;
41 struct proto_shell_handler *handler;
42 struct blob_attr *config;
43
44 struct uloop_timeout teardown_timeout;
45
46 struct netifd_process script_task;
47 struct netifd_process proto_task;
48
49 enum proto_shell_sm sm;
50 bool proto_task_killed;
51
52 int last_error;
53 };
54
55 static int
56 proto_shell_handler(struct interface_proto_state *proto,
57 enum interface_proto_cmd cmd, bool force)
58 {
59 struct proto_shell_state *state;
60 struct proto_shell_handler *handler;
61 struct netifd_process *proc;
62 static char error_buf[32];
63 const char *argv[7];
64 char *envp[2];
65 const char *action;
66 char *config;
67 int ret, i = 0, j = 0;
68
69 state = container_of(proto, struct proto_shell_state, proto);
70 handler = state->handler;
71 proc = &state->script_task;
72
73 if (cmd == PROTO_CMD_SETUP) {
74 action = "setup";
75 state->last_error = -1;
76 } else {
77 if (state->sm == S_TEARDOWN)
78 return 0;
79
80 if (state->script_task.uloop.pending) {
81 if (state->sm != S_SETUP_ABORT) {
82 uloop_timeout_set(&state->teardown_timeout, 1000);
83 kill(state->script_task.uloop.pid, SIGTERM);
84 if (state->proto_task.uloop.pending)
85 kill(state->proto_task.uloop.pid, SIGTERM);
86 state->sm = S_SETUP_ABORT;
87 }
88 return 0;
89 }
90
91 action = "teardown";
92 state->sm = S_TEARDOWN;
93 if (state->last_error >= 0) {
94 snprintf(error_buf, sizeof(error_buf), "ERROR=%d", state->last_error);
95 envp[j++] = error_buf;
96 }
97 uloop_timeout_set(&state->teardown_timeout, 5000);
98 }
99
100 config = blobmsg_format_json(state->config, true);
101 if (!config)
102 return -1;
103
104 argv[i++] = handler->script_name;
105 argv[i++] = handler->proto.name;
106 argv[i++] = action;
107 argv[i++] = proto->iface->name;
108 argv[i++] = config;
109 if (proto->iface->main_dev.dev)
110 argv[i++] = proto->iface->main_dev.dev->ifname;
111 argv[i] = NULL;
112 envp[j] = NULL;
113
114 ret = netifd_start_process(argv, envp, proc);
115 free(config);
116
117 return ret;
118 }
119
120 static void
121 proto_shell_task_finish(struct proto_shell_state *state,
122 struct netifd_process *task)
123 {
124 switch (state->sm) {
125 case S_IDLE:
126 if (task == &state->proto_task)
127 state->proto.proto_event(&state->proto, IFPEV_LINK_LOST);
128 /* fall through */
129 case S_SETUP:
130 if (task == &state->proto_task)
131 proto_shell_handler(&state->proto, PROTO_CMD_TEARDOWN,
132 false);
133 break;
134
135 case S_SETUP_ABORT:
136 if (state->script_task.uloop.pending ||
137 state->proto_task.uloop.pending)
138 break;
139
140 uloop_timeout_cancel(&state->teardown_timeout);
141 state->sm = S_IDLE;
142 proto_shell_handler(&state->proto, PROTO_CMD_TEARDOWN, false);
143 break;
144
145 case S_TEARDOWN:
146 if (state->script_task.uloop.pending)
147 break;
148
149 if (state->proto_task.uloop.pending) {
150 if (!state->proto_task_killed)
151 kill(state->proto_task.uloop.pid, SIGTERM);
152 break;
153 }
154
155 uloop_timeout_cancel(&state->teardown_timeout);
156 state->sm = S_IDLE;
157 state->proto.proto_event(&state->proto, IFPEV_DOWN);
158 break;
159 }
160 }
161
162 static void
163 proto_shell_teardown_timeout_cb(struct uloop_timeout *timeout)
164 {
165 struct proto_shell_state *state;
166
167 state = container_of(timeout, struct proto_shell_state, teardown_timeout);
168
169 netifd_kill_process(&state->script_task);
170 netifd_kill_process(&state->proto_task);
171 proto_shell_task_finish(state, NULL);
172 }
173
174 static void
175 proto_shell_script_cb(struct netifd_process *p, int ret)
176 {
177 struct proto_shell_state *state;
178
179 state = container_of(p, struct proto_shell_state, script_task);
180 proto_shell_task_finish(state, p);
181 }
182
183 static void
184 proto_shell_task_cb(struct netifd_process *p, int ret)
185 {
186 struct proto_shell_state *state;
187
188 state = container_of(p, struct proto_shell_state, proto_task);
189
190 if (state->sm == S_IDLE || state->sm == S_SETUP)
191 state->last_error = WEXITSTATUS(ret);
192
193 proto_shell_task_finish(state, p);
194 }
195
196 static void
197 proto_shell_free(struct interface_proto_state *proto)
198 {
199 struct proto_shell_state *state;
200
201 state = container_of(proto, struct proto_shell_state, proto);
202 netifd_kill_process(&state->script_task);
203 netifd_kill_process(&state->proto_task);
204 free(state->config);
205 free(state);
206 }
207
208 static void
209 proto_shell_parse_route_list(struct interface *iface, struct blob_attr *attr,
210 bool v6)
211 {
212 struct blob_attr *cur;
213 int rem;
214
215 blobmsg_for_each_attr(cur, attr, rem) {
216 if (blobmsg_type(cur) != BLOBMSG_TYPE_TABLE) {
217 DPRINTF("Ignore wrong route type: %d\n", blobmsg_type(cur));
218 continue;
219 }
220
221 interface_ip_add_route(iface, cur, v6);
222 }
223 }
224
225 static void
226 proto_shell_parse_data(struct interface *iface, struct blob_attr *attr)
227 {
228 struct blob_attr *cur;
229 int rem;
230
231 blobmsg_for_each_attr(cur, attr, rem)
232 interface_add_data(iface, cur);
233 }
234
235 static struct device *
236 proto_shell_create_tunnel(const char *name, struct blob_attr *attr)
237 {
238 struct device *dev;
239 struct blob_buf b;
240
241 memset(&b, 0, sizeof(b));
242 blob_buf_init(&b, 0);
243 blob_put(&b, 0, blobmsg_data(attr), blobmsg_data_len(attr));
244 dev = device_create(name, &tunnel_device_type, blob_data(b.head));
245 blob_buf_free(&b);
246
247 return dev;
248 }
249
250 enum {
251 NOTIFY_ACTION,
252 NOTIFY_ERROR,
253 NOTIFY_COMMAND,
254 NOTIFY_ENV,
255 NOTIFY_SIGNAL,
256 NOTIFY_AVAILABLE,
257 NOTIFY_LINK_UP,
258 NOTIFY_IFNAME,
259 NOTIFY_ADDR_EXT,
260 NOTIFY_ROUTES,
261 NOTIFY_ROUTES6,
262 NOTIFY_TUNNEL,
263 NOTIFY_DATA,
264 __NOTIFY_LAST
265 };
266
267 static const struct blobmsg_policy notify_attr[__NOTIFY_LAST] = {
268 [NOTIFY_ACTION] = { .name = "action", .type = BLOBMSG_TYPE_INT32 },
269 [NOTIFY_ERROR] = { .name = "error", .type = BLOBMSG_TYPE_ARRAY },
270 [NOTIFY_COMMAND] = { .name = "command", .type = BLOBMSG_TYPE_ARRAY },
271 [NOTIFY_ENV] = { .name = "env", .type = BLOBMSG_TYPE_ARRAY },
272 [NOTIFY_SIGNAL] = { .name = "signal", .type = BLOBMSG_TYPE_INT32 },
273 [NOTIFY_AVAILABLE] = { .name = "available", .type = BLOBMSG_TYPE_BOOL },
274 [NOTIFY_LINK_UP] = { .name = "link-up", .type = BLOBMSG_TYPE_BOOL },
275 [NOTIFY_IFNAME] = { .name = "ifname", .type = BLOBMSG_TYPE_STRING },
276 [NOTIFY_ADDR_EXT] = { .name = "address-external", .type = BLOBMSG_TYPE_BOOL },
277 [NOTIFY_ROUTES] = { .name = "routes", .type = BLOBMSG_TYPE_ARRAY },
278 [NOTIFY_ROUTES6] = { .name = "routes6", .type = BLOBMSG_TYPE_ARRAY },
279 [NOTIFY_TUNNEL] = { .name = "tunnel", .type = BLOBMSG_TYPE_TABLE },
280 [NOTIFY_DATA] = { .name = "data", .type = BLOBMSG_TYPE_TABLE },
281 };
282
283 static int
284 proto_shell_update_link(struct proto_shell_state *state, struct blob_attr *data, struct blob_attr **tb)
285 {
286 struct interface *iface = state->proto.iface;
287 struct blob_attr *cur;
288 struct device *dev;
289 const char *devname;
290 int dev_create = 1;
291 bool addr_ext = false;
292 bool up;
293
294 if (!tb[NOTIFY_LINK_UP])
295 return UBUS_STATUS_INVALID_ARGUMENT;
296
297 up = blobmsg_get_bool(tb[NOTIFY_LINK_UP]);
298 if (!up) {
299 state->proto.proto_event(&state->proto, IFPEV_LINK_LOST);
300 return 0;
301 }
302
303 if ((cur = tb[NOTIFY_ADDR_EXT]) != NULL) {
304 addr_ext = blobmsg_get_bool(cur);
305 if (addr_ext)
306 dev_create = 2;
307 }
308
309 if (!tb[NOTIFY_IFNAME]) {
310 if (!iface->main_dev.dev)
311 return UBUS_STATUS_INVALID_ARGUMENT;
312 } else {
313 devname = blobmsg_data(tb[NOTIFY_IFNAME]);
314 if (tb[NOTIFY_TUNNEL]) {
315 dev = proto_shell_create_tunnel(devname,
316 tb[NOTIFY_TUNNEL]);
317 if (!dev)
318 return UBUS_STATUS_INVALID_ARGUMENT;
319 } else {
320 dev = device_get(devname, dev_create);
321 if (!dev)
322 return UBUS_STATUS_NOT_FOUND;
323 }
324
325 interface_set_l3_dev(iface, dev);
326 device_claim(&iface->l3_dev);
327 }
328
329 interface_update_start(iface);
330 proto_apply_ip_settings(iface, data, addr_ext);
331
332 if ((cur = tb[NOTIFY_ROUTES]) != NULL)
333 proto_shell_parse_route_list(state->proto.iface, cur, false);
334
335 if ((cur = tb[NOTIFY_ROUTES6]) != NULL)
336 proto_shell_parse_route_list(state->proto.iface, cur, true);
337
338 interface_update_complete(state->proto.iface);
339
340 state->proto.proto_event(&state->proto, IFPEV_UP);
341
342 if ((cur = tb[NOTIFY_DATA]))
343 proto_shell_parse_data(state->proto.iface, cur);
344
345 return 0;
346 }
347
348 static bool
349 fill_string_list(struct blob_attr *attr, char **argv, int max)
350 {
351 struct blob_attr *cur;
352 int argc = 0;
353 int rem;
354
355 if (!attr)
356 goto out;
357
358 blobmsg_for_each_attr(cur, attr, rem) {
359 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
360 return false;
361
362 if (!blobmsg_check_attr(cur, NULL))
363 return false;
364
365 argv[argc++] = blobmsg_data(cur);
366 if (argc == max - 1)
367 return false;
368 }
369
370 out:
371 argv[argc] = NULL;
372 return true;
373 }
374
375 static int
376 proto_shell_run_command(struct proto_shell_state *state, struct blob_attr **tb)
377 {
378 static char *argv[64];
379 static char *env[32];
380
381 if (!tb[NOTIFY_COMMAND])
382 goto error;
383
384 if (!fill_string_list(tb[NOTIFY_COMMAND], argv, ARRAY_SIZE(argv)))
385 goto error;
386
387 if (!fill_string_list(tb[NOTIFY_ENV], env, ARRAY_SIZE(env)))
388 goto error;
389
390 netifd_start_process((const char **) argv, (char **) env, &state->proto_task);
391
392 return 0;
393
394 error:
395 return UBUS_STATUS_INVALID_ARGUMENT;
396 }
397
398 static int
399 proto_shell_kill_command(struct proto_shell_state *state, struct blob_attr **tb)
400 {
401 unsigned int signal = ~0;
402
403 if (tb[NOTIFY_SIGNAL])
404 signal = blobmsg_get_u32(tb[NOTIFY_SIGNAL]);
405
406 if (signal > 31)
407 signal = SIGTERM;
408
409 if (state->proto_task.uloop.pending) {
410 state->proto_task_killed = true;
411 kill(state->proto_task.uloop.pid, signal);
412 }
413
414 return 0;
415 }
416
417 static int
418 proto_shell_notify_error(struct proto_shell_state *state, struct blob_attr **tb)
419 {
420 struct blob_attr *cur;
421 char *data[16];
422 int n_data = 0;
423 int rem;
424
425 if (!tb[NOTIFY_ERROR])
426 return UBUS_STATUS_INVALID_ARGUMENT;
427
428 blobmsg_for_each_attr(cur, tb[NOTIFY_ERROR], rem) {
429 if (n_data + 1 == ARRAY_SIZE(data))
430 goto error;
431
432 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
433 goto error;
434
435 if (!blobmsg_check_attr(cur, NULL))
436 goto error;
437
438 data[n_data++] = blobmsg_data(cur);
439 }
440
441 if (!n_data)
442 goto error;
443
444 interface_add_error(state->proto.iface, state->handler->proto.name,
445 data[0], (const char **) &data[1], n_data - 1);
446
447 return 0;
448
449 error:
450 return UBUS_STATUS_INVALID_ARGUMENT;
451 }
452
453 static int
454 proto_shell_block_restart(struct proto_shell_state *state, struct blob_attr **tb)
455 {
456 state->proto.iface->autostart = false;
457 return 0;
458 }
459
460 static int
461 proto_shell_set_available(struct proto_shell_state *state, struct blob_attr **tb)
462 {
463 if (!tb[NOTIFY_AVAILABLE])
464 return UBUS_STATUS_INVALID_ARGUMENT;
465
466 interface_set_available(state->proto.iface, blobmsg_get_bool(tb[NOTIFY_AVAILABLE]));
467 return 0;
468 }
469
470 static int
471 proto_shell_notify(struct interface_proto_state *proto, struct blob_attr *attr)
472 {
473 struct proto_shell_state *state;
474 struct blob_attr *tb[__NOTIFY_LAST];
475
476 state = container_of(proto, struct proto_shell_state, proto);
477
478 blobmsg_parse(notify_attr, __NOTIFY_LAST, tb, blob_data(attr), blob_len(attr));
479 if (!tb[NOTIFY_ACTION])
480 return UBUS_STATUS_INVALID_ARGUMENT;
481
482 switch(blobmsg_get_u32(tb[NOTIFY_ACTION])) {
483 case 0:
484 return proto_shell_update_link(state, attr, tb);
485 case 1:
486 return proto_shell_run_command(state, tb);
487 case 2:
488 return proto_shell_kill_command(state, tb);
489 case 3:
490 return proto_shell_notify_error(state, tb);
491 case 4:
492 return proto_shell_block_restart(state, tb);
493 case 5:
494 return proto_shell_set_available(state, tb);
495 default:
496 return UBUS_STATUS_INVALID_ARGUMENT;
497 }
498 }
499
500 static struct interface_proto_state *
501 proto_shell_attach(const struct proto_handler *h, struct interface *iface,
502 struct blob_attr *attr)
503 {
504 struct proto_shell_state *state;
505
506 state = calloc(1, sizeof(*state));
507 state->config = malloc(blob_pad_len(attr));
508 if (!state->config)
509 goto error;
510
511 memcpy(state->config, attr, blob_pad_len(attr));
512 state->proto.free = proto_shell_free;
513 state->proto.notify = proto_shell_notify;
514 state->proto.cb = proto_shell_handler;
515 state->teardown_timeout.cb = proto_shell_teardown_timeout_cb;
516 state->script_task.cb = proto_shell_script_cb;
517 state->script_task.dir_fd = proto_fd.fd;
518 state->script_task.log_prefix = iface->name;
519 state->proto_task.cb = proto_shell_task_cb;
520 state->proto_task.dir_fd = proto_fd.fd;
521 state->proto_task.log_prefix = iface->name;
522 state->handler = container_of(h, struct proto_shell_handler, proto);
523
524 return &state->proto;
525
526 error:
527 free(state);
528 return NULL;
529 }
530
531 static json_object *
532 check_type(json_object *obj, json_type type)
533 {
534 if (!obj)
535 return NULL;
536
537 if (json_object_get_type(obj) != type)
538 return NULL;
539
540 return obj;
541 }
542
543 static inline json_object *
544 get_field(json_object *obj, const char *name, json_type type)
545 {
546 return check_type(json_object_object_get(obj, name), type);
547 }
548
549 static char *
550 proto_shell_parse_config(struct config_param_list *config, json_object *obj)
551 {
552 struct blobmsg_policy *attrs;
553 char *str_buf, *str_cur;
554 int str_len = 0;
555 int i;
556
557 config->n_params = json_object_array_length(obj);
558 attrs = calloc(1, sizeof(*attrs) * config->n_params);
559 if (!attrs)
560 return NULL;
561
562 config->params = attrs;
563 for (i = 0; i < config->n_params; i++) {
564 json_object *cur, *name, *type;
565
566 cur = check_type(json_object_array_get_idx(obj, i), json_type_array);
567 if (!cur)
568 goto error;
569
570 name = check_type(json_object_array_get_idx(cur, 0), json_type_string);
571 if (!name)
572 goto error;
573
574 type = check_type(json_object_array_get_idx(cur, 1), json_type_int);
575 if (!type)
576 goto error;
577
578 attrs[i].name = json_object_get_string(name);
579 attrs[i].type = json_object_get_int(type);
580 if (attrs[i].type > BLOBMSG_TYPE_LAST)
581 goto error;
582
583 str_len += strlen(attrs[i].name) + 1;
584 }
585
586 str_buf = malloc(str_len);
587 if (!str_buf)
588 goto error;
589
590 str_cur = str_buf;
591 for (i = 0; i < config->n_params; i++) {
592 const char *name = attrs[i].name;
593
594 attrs[i].name = str_cur;
595 str_cur += sprintf(str_cur, "%s", name) + 1;
596 }
597
598 return str_buf;
599
600 error:
601 free(attrs);
602 config->n_params = 0;
603 return NULL;
604 }
605
606 static void
607 proto_shell_add_handler(const char *script, json_object *obj)
608 {
609 struct proto_shell_handler *handler;
610 struct proto_handler *proto;
611 json_object *config, *tmp;
612 const char *name;
613 char *str;
614
615 if (!check_type(obj, json_type_object))
616 return;
617
618 tmp = get_field(obj, "name", json_type_string);
619 if (!tmp)
620 return;
621
622 name = json_object_get_string(tmp);
623
624 handler = calloc(1, sizeof(*handler) +
625 strlen(script) + 1 +
626 strlen(name) + 1);
627 if (!handler)
628 return;
629
630 strcpy(handler->script_name, script);
631
632 str = handler->script_name + strlen(handler->script_name) + 1;
633 strcpy(str, name);
634
635 proto = &handler->proto;
636 proto->name = str;
637 proto->config_params = &handler->config;
638 proto->attach = proto_shell_attach;
639
640 tmp = get_field(obj, "no-device", json_type_boolean);
641 if (tmp && json_object_get_boolean(tmp))
642 handler->proto.flags |= PROTO_FLAG_NODEV;
643
644 tmp = get_field(obj, "available", json_type_boolean);
645 if (tmp && json_object_get_boolean(tmp))
646 handler->proto.flags |= PROTO_FLAG_INIT_AVAILABLE;
647
648 config = get_field(obj, "config", json_type_array);
649 if (config)
650 handler->config_buf = proto_shell_parse_config(&handler->config, config);
651
652 DPRINTF("Add handler for script %s: %s\n", script, proto->name);
653 add_proto_handler(proto);
654 }
655
656 static void proto_shell_add_script(const char *name)
657 {
658 struct json_tokener *tok = NULL;
659 json_object *obj;
660 static char buf[512];
661 char *start, *cmd;
662 FILE *f;
663 int len;
664
665 #define DUMP_SUFFIX " '' dump"
666
667 cmd = alloca(strlen(name) + 1 + sizeof(DUMP_SUFFIX));
668 sprintf(cmd, "%s" DUMP_SUFFIX, name);
669
670 f = popen(cmd, "r");
671 if (!f)
672 return;
673
674 do {
675 start = fgets(buf, sizeof(buf), f);
676 if (!start)
677 continue;
678
679 len = strlen(start);
680
681 if (!tok)
682 tok = json_tokener_new();
683
684 obj = json_tokener_parse_ex(tok, start, len);
685 if (!is_error(obj)) {
686 proto_shell_add_handler(name, obj);
687 json_object_put(obj);
688 json_tokener_free(tok);
689 tok = NULL;
690 } else if (start[len - 1] == '\n') {
691 json_tokener_free(tok);
692 tok = NULL;
693 }
694 } while (!feof(f) && !ferror(f));
695
696 if (tok)
697 json_tokener_free(tok);
698
699 pclose(f);
700 }
701
702 static void __init proto_shell_init(void)
703 {
704 glob_t g;
705 int main_fd;
706 int i;
707
708 main_fd = open(".", O_RDONLY | O_DIRECTORY);
709 if (main_fd < 0)
710 return;
711
712 if (chdir(main_path)) {
713 perror("chdir(main path)");
714 goto close_cur;
715 }
716
717 if (chdir("./proto"))
718 goto close_cur;
719
720 proto_fd.fd = open(".", O_RDONLY | O_DIRECTORY);
721 if (proto_fd.fd < 0)
722 goto close_cur;
723
724 netifd_fd_add(&proto_fd);
725 glob("./*.sh", 0, NULL, &g);
726 for (i = 0; i < g.gl_pathc; i++)
727 proto_shell_add_script(g.gl_pathv[i]);
728
729 close_cur:
730 fchdir(main_fd);
731 close(main_fd);
732 }