service/service.c

   1 /*
   2  * Copyright (C) 2013 Felix Fietkau <nbd@openwrt.org>
   3  * Copyright (C) 2013 John Crispin <blogic@openwrt.org>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU Lesser General Public License version 2.1
   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
  15 #include <libubox/blobmsg_json.h>
  16 #include <libubox/avl-cmp.h>
  17
  18 #include "../procd.h"
  19
  20 #include "service.h"
  21 #include "instance.h"
  22
  23 #include "../rcS.h"
  24
  25 struct avl_tree services;
  26 static struct blob_buf b;
  27 static struct ubus_context *ctx;
  28
  29 static void
  30 service_instance_add(struct service *s, struct blob_attr *attr)
  31 {
  32         struct service_instance *in;
  33
  34         if (blobmsg_type(attr) != BLOBMSG_TYPE_TABLE)
  35                 return;
  36
  37         in = calloc(1, sizeof(*in));
  38         if (!in)
  39                 return;
  40
  41         instance_init(in, s, attr);
  42         vlist_add(&s->instances, &in->node, (void *) in->name);
  43 }
  44
  45 static void
  46 service_instance_update(struct vlist_tree *tree, struct vlist_node *node_new,
  47                         struct vlist_node *node_old)
  48 {
  49         struct service_instance *in_o = NULL, *in_n = NULL;
  50
  51         if (node_old)
  52                 in_o = container_of(node_old, struct service_instance, node);
  53
  54         if (node_new)
  55                 in_n = container_of(node_new, struct service_instance, node);
  56
  57         if (in_o && in_n) {
  58                 DEBUG(2, "Update instance %s::%s\n", in_o->srv->name, in_o->name);
  59                 instance_update(in_o, in_n);
  60                 instance_free(in_n);
  61         } else if (in_o) {
  62                 DEBUG(2, "Free instance %s::%s\n", in_o->srv->name, in_o->name);
  63                 instance_stop(in_o);
  64                 instance_free(in_o);
  65         } else if (in_n) {
  66                 DEBUG(2, "Create instance %s::%s\n", in_n->srv->name, in_n->name);
  67                 instance_start(in_n);
  68         }
  69 }
  70
  71 static struct service *
  72 service_alloc(const char *name)
  73 {
  74         struct service *s;
  75         char *new_name;
  76
  77         s = calloc_a(sizeof(*s), &new_name, strlen(name) + 1);
  78         strcpy(new_name, name);
  79
  80         vlist_init(&s->instances, avl_strcmp, service_instance_update);
  81         s->instances.keep_old = true;
  82         s->name = new_name;
  83         s->avl.key = s->name;
  84         INIT_LIST_HEAD(&s->validators);
  85
  86         return s;
  87 }
  88
  89 enum {
  90         SERVICE_SET_NAME,
  91         SERVICE_SET_SCRIPT,
  92         SERVICE_SET_INSTANCES,
  93         SERVICE_SET_TRIGGER,
  94         SERVICE_SET_VALIDATE,
  95         __SERVICE_SET_MAX
  96 };
  97
  98 static const struct blobmsg_policy service_set_attrs[__SERVICE_SET_MAX] = {
  99         [SERVICE_SET_NAME] = { "name", BLOBMSG_TYPE_STRING },
 100         [SERVICE_SET_SCRIPT] = { "script", BLOBMSG_TYPE_STRING },
 101         [SERVICE_SET_INSTANCES] = { "instances", BLOBMSG_TYPE_TABLE },
 102         [SERVICE_SET_TRIGGER] = { "triggers", BLOBMSG_TYPE_ARRAY },
 103         [SERVICE_SET_VALIDATE] = { "validate", BLOBMSG_TYPE_ARRAY },
 104 };
 105
 106 static int
 107 service_update(struct service *s, struct blob_attr **tb, bool add)
 108 {
 109         struct blob_attr *cur;
 110         int rem;
 111
 112         if (s->trigger) {
 113                 trigger_del(s);
 114                 free(s->trigger);
 115                 s->trigger = NULL;
 116         }
 117
 118         service_validate_del(s);
 119
 120         if (tb[SERVICE_SET_TRIGGER] && blobmsg_data_len(tb[SERVICE_SET_TRIGGER])) {
 121                 s->trigger = blob_memdup(tb[SERVICE_SET_TRIGGER]);
 122                 if (!s->trigger)
 123                         return -1;
 124                 trigger_add(s->trigger, s);
 125         }
 126
 127         if (tb[SERVICE_SET_VALIDATE] && blobmsg_data_len(tb[SERVICE_SET_VALIDATE])) {
 128                 blobmsg_for_each_attr(cur, tb[SERVICE_SET_VALIDATE], rem)
 129                         service_validate_add(s, cur);
 130         }
 131
 132         if (tb[SERVICE_SET_INSTANCES]) {
 133                 if (!add)
 134                         vlist_update(&s->instances);
 135                 blobmsg_for_each_attr(cur, tb[SERVICE_SET_INSTANCES], rem) {
 136                         service_instance_add(s, cur);
 137                 }
 138                 if (!add)
 139                         vlist_flush(&s->instances);
 140         }
 141
 142         rc(s->name, "running");
 143
 144         return 0;
 145 }
 146
 147 static void
 148 service_delete(struct service *s)
 149 {
 150         service_event("service.stop", s->name, NULL);
 151         vlist_flush_all(&s->instances);
 152         avl_delete(&services, &s->avl);
 153         trigger_del(s);
 154         free(s->trigger);
 155         free(s);
 156         service_validate_del(s);
 157 }
 158
 159 enum {
 160         SERVICE_ATTR_NAME,
 161         __SERVICE_ATTR_MAX,
 162 };
 163
 164 static const struct blobmsg_policy service_attrs[__SERVICE_ATTR_MAX] = {
 165         [SERVICE_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
 166 };
 167
 168 enum {
 169         SERVICE_DEL_ATTR_NAME,
 170         SERVICE_DEL_ATTR_INSTANCE,
 171         __SERVICE_DEL_ATTR_MAX,
 172 };
 173
 174 static const struct blobmsg_policy service_del_attrs[__SERVICE_DEL_ATTR_MAX] = {
 175         [SERVICE_DEL_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
 176         [SERVICE_DEL_ATTR_INSTANCE] = { "instance", BLOBMSG_TYPE_STRING },
 177 };
 178
 179 enum {
 180         SERVICE_LIST_ATTR_VERBOSE,
 181         __SERVICE_LIST_ATTR_MAX,
 182 };
 183
 184 static const struct blobmsg_policy service_list_attrs[__SERVICE_LIST_ATTR_MAX] = {
 185         [SERVICE_LIST_ATTR_VERBOSE] = { "verbose", BLOBMSG_TYPE_BOOL },
 186 };
 187
 188 enum {
 189         EVENT_TYPE,
 190         EVENT_DATA,
 191         __EVENT_MAX
 192 };
 193
 194 static const struct blobmsg_policy event_policy[__EVENT_MAX] = {
 195         [EVENT_TYPE] = { .name = "type", .type = BLOBMSG_TYPE_STRING },
 196         [EVENT_DATA] = { .name = "data", .type = BLOBMSG_TYPE_TABLE },
 197 };
 198
 199 enum {
 200         VALIDATE_PACKAGE,
 201         VALIDATE_TYPE,
 202         VALIDATE_SERVICE,
 203         __VALIDATE_MAX
 204 };
 205
 206 static const struct blobmsg_policy validate_policy[__VALIDATE_MAX] = {
 207         [VALIDATE_PACKAGE] = { .name = "package", .type = BLOBMSG_TYPE_STRING },
 208         [VALIDATE_TYPE] = { .name = "type", .type = BLOBMSG_TYPE_STRING },
 209         [VALIDATE_SERVICE] = { .name = "service", .type = BLOBMSG_TYPE_STRING },
 210 };
 211
 212 static int
 213 service_handle_set(struct ubus_context *ctx, struct ubus_object *obj,
 214                    struct ubus_request_data *req, const char *method,
 215                    struct blob_attr *msg)
 216 {
 217         struct blob_attr *tb[__SERVICE_SET_MAX], *cur;
 218         struct service *s = NULL;
 219         const char *name;
 220         bool add = !strcmp(method, "add");
 221         int ret;
 222
 223         blobmsg_parse(service_set_attrs, __SERVICE_SET_MAX, tb, blob_data(msg), blob_len(msg));
 224         cur = tb[SERVICE_ATTR_NAME];
 225         if (!cur)
 226                 return UBUS_STATUS_INVALID_ARGUMENT;
 227
 228         name = blobmsg_data(cur);
 229
 230         s = avl_find_element(&services, name, s, avl);
 231         if (s) {
 232                 DEBUG(2, "Update service %s\n", name);
 233                 return service_update(s, tb, add);
 234         }
 235
 236         DEBUG(2, "Create service %s\n", name);
 237         s = service_alloc(name);
 238         if (!s)
 239                 return UBUS_STATUS_UNKNOWN_ERROR;
 240
 241         ret = service_update(s, tb, add);
 242         if (ret)
 243                 return ret;
 244
 245         avl_insert(&services, &s->avl);
 246
 247         service_event("service.start", s->name, NULL);
 248
 249         return 0;
 250 }
 251
 252 static void
 253 service_dump(struct service *s, int verbose)
 254 {
 255         struct service_instance *in;
 256         void *c, *i;
 257
 258         c = blobmsg_open_table(&b, s->name);
 259
 260         if (!avl_is_empty(&s->instances.avl)) {
 261                 i = blobmsg_open_table(&b, "instances");
 262                 vlist_for_each_element(&s->instances, in, node)
 263                         instance_dump(&b, in, verbose);
 264                 blobmsg_close_table(&b, i);
 265         }
 266         if (verbose && s->trigger)
 267                 blobmsg_add_blob(&b, s->trigger);
 268         if (verbose && !list_empty(&s->validators))
 269                 service_validate_dump(&b, s);
 270         blobmsg_close_table(&b, c);
 271 }
 272
 273 static int
 274 service_handle_list(struct ubus_context *ctx, struct ubus_object *obj,
 275                     struct ubus_request_data *req, const char *method,
 276                     struct blob_attr *msg)
 277 {
 278         struct blob_attr *tb[__SERVICE_LIST_ATTR_MAX];
 279         struct service *s;
 280         int verbose = 0;
 281
 282         blobmsg_parse(service_list_attrs, __SERVICE_LIST_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
 283
 284         if (tb[SERVICE_LIST_ATTR_VERBOSE] && blobmsg_get_bool(tb[SERVICE_LIST_ATTR_VERBOSE]))
 285                 verbose = 1;
 286
 287         blob_buf_init(&b, 0);
 288         avl_for_each_element(&services, s, avl)
 289                 service_dump(s, verbose);
 290
 291         ubus_send_reply(ctx, req, b.head);
 292
 293         return 0;
 294 }
 295
 296 static int
 297 service_handle_delete(struct ubus_context *ctx, struct ubus_object *obj,
 298                     struct ubus_request_data *req, const char *method,
 299                     struct blob_attr *msg)
 300 {
 301         struct blob_attr *tb[__SERVICE_DEL_ATTR_MAX], *cur;
 302         struct service *s;
 303         struct service_instance *in;
 304
 305         blobmsg_parse(service_del_attrs, __SERVICE_DEL_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
 306
 307         cur = tb[SERVICE_DEL_ATTR_NAME];
 308         if (!cur)
 309                 return UBUS_STATUS_NOT_FOUND;
 310
 311         s = avl_find_element(&services, blobmsg_data(cur), s, avl);
 312         if (!s)
 313                 return UBUS_STATUS_NOT_FOUND;
 314
 315         cur = tb[SERVICE_DEL_ATTR_INSTANCE];
 316         if (!cur) {
 317                 service_delete(s);
 318                 return 0;
 319         }
 320
 321         in = vlist_find(&s->instances, blobmsg_data(cur), in, node);
 322         if (!in) {
 323                 ERROR("instance %s not found\n", (char *) blobmsg_data(cur));
 324                 return UBUS_STATUS_NOT_FOUND;
 325         }
 326
 327         vlist_delete(&s->instances, &in->node);
 328
 329         return 0;
 330 }
 331
 332 static int
 333 service_handle_update(struct ubus_context *ctx, struct ubus_object *obj,
 334                       struct ubus_request_data *req, const char *method,
 335                       struct blob_attr *msg)
 336 {
 337         struct blob_attr *tb[__SERVICE_ATTR_MAX], *cur;
 338         struct service *s;
 339
 340         blobmsg_parse(service_attrs, __SERVICE_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
 341
 342         cur = tb[SERVICE_ATTR_NAME];
 343         if (!cur)
 344                 return UBUS_STATUS_INVALID_ARGUMENT;
 345
 346         s = avl_find_element(&services, blobmsg_data(cur), s, avl);
 347         if (!s)
 348                 return UBUS_STATUS_NOT_FOUND;
 349
 350         if (!strcmp(method, "update_start"))
 351                 vlist_update(&s->instances);
 352         else
 353                 vlist_flush(&s->instances);
 354
 355         return 0;
 356 }
 357
 358 static int
 359 service_handle_event(struct ubus_context *ctx, struct ubus_object *obj,
 360                         struct ubus_request_data *req, const char *method,
 361                         struct blob_attr *msg)
 362 {
 363         struct blob_attr *tb[__EVENT_MAX];
 364
 365         if (!msg)
 366                 return UBUS_STATUS_INVALID_ARGUMENT;
 367
 368         blobmsg_parse(event_policy, __EVENT_MAX, tb, blob_data(msg), blob_len(msg));
 369         if (!tb[EVENT_TYPE] || !tb[EVENT_DATA])
 370                 return UBUS_STATUS_INVALID_ARGUMENT;
 371
 372         trigger_event(blobmsg_get_string(tb[EVENT_TYPE]), tb[EVENT_DATA]);
 373
 374         return 0;
 375 }
 376
 377 static int
 378 service_handle_validate(struct ubus_context *ctx, struct ubus_object *obj,
 379                         struct ubus_request_data *req, const char *method,
 380                         struct blob_attr *msg)
 381 {
 382         struct blob_attr *tb[__VALIDATE_MAX];
 383         char *p = NULL, *t = NULL;
 384
 385         if (!msg)
 386                 return UBUS_STATUS_INVALID_ARGUMENT;
 387
 388         blobmsg_parse(validate_policy, __VALIDATE_MAX, tb, blob_data(msg), blob_len(msg));
 389         if (tb[VALIDATE_SERVICE]) {
 390                 return 0;
 391         }
 392         if (tb[VALIDATE_PACKAGE])
 393                 p = blobmsg_get_string(tb[VALIDATE_PACKAGE]);
 394
 395         if (tb[VALIDATE_TYPE])
 396                 t = blobmsg_get_string(tb[VALIDATE_TYPE]);
 397
 398         blob_buf_init(&b, 0);
 399         service_validate_dump_all(&b, p, t);
 400         ubus_send_reply(ctx, req, b.head);
 401
 402         return 0;
 403 }
 404
 405 static struct ubus_method main_object_methods[] = {
 406         UBUS_METHOD("set", service_handle_set, service_set_attrs),
 407         UBUS_METHOD("add", service_handle_set, service_set_attrs),
 408         UBUS_METHOD("list", service_handle_list, service_attrs),
 409         UBUS_METHOD("delete", service_handle_delete, service_del_attrs),
 410         UBUS_METHOD("update_start", service_handle_update, service_attrs),
 411         UBUS_METHOD("update_complete", service_handle_update, service_attrs),
 412         UBUS_METHOD("event", service_handle_event, event_policy),
 413         UBUS_METHOD("validate", service_handle_validate, validate_policy),
 414 };
 415
 416 static struct ubus_object_type main_object_type =
 417         UBUS_OBJECT_TYPE("service", main_object_methods);
 418
 419 static struct ubus_object main_object = {
 420         .name = "service",
 421         .type = &main_object_type,
 422         .methods = main_object_methods,
 423         .n_methods = ARRAY_SIZE(main_object_methods),
 424 };
 425
 426 int
 427 service_start_early(char *name, char *cmdline)
 428 {
 429         void *instances, *instance, *command, *respawn;
 430         char *t;
 431
 432         blob_buf_init(&b, 0);
 433         blobmsg_add_string(&b, "name", name);
 434         instances = blobmsg_open_table(&b, "instances");
 435         instance = blobmsg_open_table(&b, "instance1");
 436         command = blobmsg_open_array(&b, "command");
 437         t = strtok(cmdline, " ");
 438         while (t) {
 439                 blobmsg_add_string(&b, NULL, t);
 440                 t = strtok(NULL, " ");
 441         }
 442         blobmsg_close_array(&b, command);
 443         respawn = blobmsg_open_array(&b, "respawn");
 444         blobmsg_add_string(&b, NULL, "3600");
 445         blobmsg_add_string(&b, NULL, "1");
 446         blobmsg_add_string(&b, NULL, "0");
 447         blobmsg_close_array(&b, respawn);
 448         blobmsg_close_table(&b, instance);
 449         blobmsg_close_table(&b, instances);
 450
 451         return service_handle_set(NULL, NULL, NULL, "add", b.head);
 452 }
 453
 454 void service_event(const char *type, const char *service, const char *instance)
 455 {
 456         if (!ctx)
 457                 return;
 458
 459         blob_buf_init(&b, 0);
 460         blobmsg_add_string(&b, "service", service);
 461         if (instance)
 462                 blobmsg_add_string(&b, "instance", instance);
 463         ubus_notify(ctx, &main_object, type, b.head, -1);
 464 }
 465
 466 void ubus_init_service(struct ubus_context *_ctx)
 467 {
 468         ctx = _ctx;
 469         ubus_add_object(ctx, &main_object);
 470 }
 471
 472 void
 473 service_init(void)
 474 {
 475         avl_init(&services, avl_strcmp, false, NULL);
 476         service_validate_init();
 477 }
 478