syslog() is a blocking call on eglibc. as procd provides the actual syslog, weneed...
[project/procd.git] / service.c
index 66ea204..29acc57 100644 (file)
--- a/service.c
+++ b/service.c
@@ -1,7 +1,23 @@
+/*
+ * Copyright (C) 2013 Felix Fietkau <nbd@openwrt.org>
+ * Copyright (C) 2013 John Crispin <blogic@openwrt.org>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License version 2.1
+ * as published by the Free Software Foundation
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ */
+
+#include <libubox/blobmsg_json.h>
 #include <libubox/avl-cmp.h>
 #include "procd.h"
 #include "service.h"
 #include "instance.h"
+#include "rcS.h"
 
 struct avl_tree services;
 static struct blob_buf b;
@@ -10,7 +26,6 @@ static void
 service_instance_add(struct service *s, struct blob_attr *attr)
 {
        struct service_instance *in;
-       const char *name = blobmsg_name(attr);
 
        if (blobmsg_type(attr) != BLOBMSG_TYPE_TABLE)
                return;
@@ -20,7 +35,7 @@ service_instance_add(struct service *s, struct blob_attr *attr)
                return;
 
        instance_init(in, s, attr);
-       vlist_add(&s->instances, &in->node, (void *) name);
+       vlist_add(&s->instances, &in->node, (void *) in->name);
 }
 
 static void
@@ -36,15 +51,15 @@ service_instance_update(struct vlist_tree *tree, struct vlist_node *node_new,
                in_n = container_of(node_new, struct service_instance, node);
 
        if (in_o && in_n) {
-               DPRINTF("Update instance %s::%s\n", in_o->srv->name, in_o->name);
+               DEBUG(1, "Update instance %s::%s\n", in_o->srv->name, in_o->name);
                instance_update(in_o, in_n);
                instance_free(in_n);
        } else if (in_o) {
-               DPRINTF("Free instance %s::%s\n", in_o->srv->name, in_o->name);
-               instance_stop(in_o, false);
+               DEBUG(1, "Free instance %s::%s\n", in_o->srv->name, in_o->name);
+               instance_stop(in_o);
                instance_free(in_o);
        } else if (in_n) {
-               DPRINTF("Create instance %s::%s\n", in_o->srv->name, in_o->name);
+               DEBUG(1, "Create instance %s::%s\n", in_n->srv->name, in_n->name);
                instance_start(in_n);
        }
 }
@@ -53,49 +68,65 @@ static struct service *
 service_alloc(const char *name)
 {
        struct service *s;
+       char *new_name;
+
+       s = calloc_a(sizeof(*s), &new_name, strlen(name) + 1);
+       strcpy(new_name, name);
 
-       s = calloc(1, sizeof(*s));
        vlist_init(&s->instances, avl_strcmp, service_instance_update);
        s->instances.keep_old = true;
+       s->name = new_name;
+       s->avl.key = s->name;
 
        return s;
 }
 
 enum {
-       SERVICE_ATTR_NAME,
-       SERVICE_ATTR_SCRIPT,
-       SERVICE_ATTR_INSTANCES,
-       __SERVICE_ATTR_MAX
+       SERVICE_SET_NAME,
+       SERVICE_SET_SCRIPT,
+       SERVICE_SET_INSTANCES,
+       SERVICE_SET_TRIGGER,
+       __SERVICE_SET_MAX
 };
 
-static const struct blobmsg_policy service_attrs[__SERVICE_ATTR_MAX] = {
-       [SERVICE_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
-       [SERVICE_ATTR_SCRIPT] = { "script", BLOBMSG_TYPE_STRING },
-       [SERVICE_ATTR_INSTANCES] = { "instances", BLOBMSG_TYPE_TABLE },
+static const struct blobmsg_policy service_set_attrs[__SERVICE_SET_MAX] = {
+       [SERVICE_SET_NAME] = { "name", BLOBMSG_TYPE_STRING },
+       [SERVICE_SET_SCRIPT] = { "script", BLOBMSG_TYPE_STRING },
+       [SERVICE_SET_INSTANCES] = { "instances", BLOBMSG_TYPE_TABLE },
+       [SERVICE_SET_TRIGGER] = { "triggers", BLOBMSG_TYPE_ARRAY },
 };
 
-
 static int
-service_update(struct service *s, struct blob_attr *config, struct blob_attr **tb)
+service_update(struct service *s, struct blob_attr *config, struct blob_attr **tb, bool add)
 {
-       struct blob_attr *old_config = s->config;
        struct blob_attr *cur;
        int rem;
 
-       /* only the pointer changes, the content stays the same,
-        * no avl update necessary */
-       s->name = s->avl.key = blobmsg_data(tb[SERVICE_ATTR_NAME]);
-       s->config = config;
+       if (s->trigger) {
+               trigger_del(s);
+               free(s->trigger);
+               s->trigger = NULL;
+       }
+
+       if (tb[SERVICE_SET_TRIGGER] && blobmsg_data_len(tb[SERVICE_SET_TRIGGER])) {
+               s->trigger = malloc(blob_pad_len(tb[SERVICE_SET_TRIGGER]));
+               if (!s->trigger)
+                       return -1;
+               memcpy(s->trigger, tb[SERVICE_SET_TRIGGER], blob_pad_len(tb[SERVICE_SET_TRIGGER]));
+               trigger_add(s->trigger, s);
+       }
 
-       if (tb[SERVICE_ATTR_INSTANCES]) {
-               vlist_update(&s->instances);
-               blobmsg_for_each_attr(cur, tb[SERVICE_ATTR_INSTANCES], rem) {
+       if (tb[SERVICE_SET_INSTANCES]) {
+               if (!add)
+                       vlist_update(&s->instances);
+               blobmsg_for_each_attr(cur, tb[SERVICE_SET_INSTANCES], rem) {
                        service_instance_add(s, cur);
                }
-               vlist_flush(&s->instances);
+               if (!add)
+                       vlist_flush(&s->instances);
        }
 
-       free(old_config);
+       rc(s->name, "running");
 
        return 0;
 }
@@ -105,25 +136,64 @@ service_delete(struct service *s)
 {
        vlist_flush_all(&s->instances);
        avl_delete(&services, &s->avl);
-       free(s->config);
+       trigger_del(s);
+       s->trigger = NULL;
+       free(s->trigger);
        free(s);
 }
 
+enum {
+       SERVICE_ATTR_NAME,
+       __SERVICE_ATTR_MAX,
+};
+
+static const struct blobmsg_policy service_attrs[__SERVICE_ATTR_MAX] = {
+       [SERVICE_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
+};
+
+enum {
+       SERVICE_DEL_ATTR_NAME,
+       SERVICE_DEL_ATTR_INSTANCE,
+       __SERVICE_DEL_ATTR_MAX,
+};
+
+static const struct blobmsg_policy service_del_attrs[__SERVICE_DEL_ATTR_MAX] = {
+       [SERVICE_DEL_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
+       [SERVICE_DEL_ATTR_INSTANCE] = { "instance", BLOBMSG_TYPE_STRING },
+};
+
+enum {
+       SERVICE_LIST_ATTR_VERBOSE,
+       __SERVICE_LIST_ATTR_MAX,
+};
+
+static const struct blobmsg_policy service_list_attrs[__SERVICE_LIST_ATTR_MAX] = {
+       [SERVICE_LIST_ATTR_VERBOSE] = { "verbose", BLOBMSG_TYPE_BOOL },
+};
+
+enum {
+       EVENT_TYPE,
+       EVENT_DATA,
+       __EVENT_MAX
+};
+
+static const struct blobmsg_policy event_policy[__EVENT_MAX] = {
+       [EVENT_TYPE] = { .name = "type", .type = BLOBMSG_TYPE_STRING },
+       [EVENT_DATA] = { .name = "data", .type = BLOBMSG_TYPE_TABLE },
+};
+
 static int
 service_handle_set(struct ubus_context *ctx, struct ubus_object *obj,
                   struct ubus_request_data *req, const char *method,
                   struct blob_attr *msg)
 {
-       struct blob_attr *tb[__SERVICE_ATTR_MAX], *cur;
+       struct blob_attr *tb[__SERVICE_SET_MAX], *cur;
        struct service *s = NULL;
        const char *name;
        int ret = UBUS_STATUS_INVALID_ARGUMENT;
+       bool add = !strcmp(method, "add");
 
-       msg = blob_memdup(msg);
-       if (!msg)
-               return UBUS_STATUS_UNKNOWN_ERROR;
-
-       blobmsg_parse(service_attrs, __SERVICE_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
+       blobmsg_parse(service_set_attrs, __SERVICE_SET_MAX, tb, blob_data(msg), blob_len(msg));
        cur = tb[SERVICE_ATTR_NAME];
        if (!cur)
                goto free;
@@ -132,16 +202,16 @@ service_handle_set(struct ubus_context *ctx, struct ubus_object *obj,
 
        s = avl_find_element(&services, name, s, avl);
        if (s) {
-               DPRINTF("Update service %s\n", name);
-               return service_update(s, msg, tb);
+               DEBUG(1, "Update service %s\n", name);
+               return service_update(s, msg, tb, add);
        }
 
-       DPRINTF("Create service %s\n", name);
+       DEBUG(1, "Create service %s\n", name);
        s = service_alloc(name);
        if (!s)
                return UBUS_STATUS_UNKNOWN_ERROR;
 
-       ret = service_update(s, msg, tb);
+       ret = service_update(s, msg, tb, add);
        if (ret)
                goto free;
 
@@ -155,16 +225,24 @@ free:
 }
 
 static void
-service_dump(struct service *s)
+service_dump(struct service *s, int verbose)
 {
        struct service_instance *in;
        void *c, *i;
 
        c = blobmsg_open_table(&b, s->name);
+
+       if (avl_is_empty(&s->instances.avl)) {
+               blobmsg_close_table(&b, c);
+               return;
+       }
+
        i = blobmsg_open_table(&b, "instances");
        vlist_for_each_element(&s->instances, in, node)
-               instance_dump(&b, in);
+               instance_dump(&b, in, verbose);
        blobmsg_close_table(&b, i);
+       if (verbose && s->trigger)
+               blobmsg_add_blob(&b, s->trigger);
        blobmsg_close_table(&b, c);
 }
 
@@ -173,56 +251,113 @@ service_handle_list(struct ubus_context *ctx, struct ubus_object *obj,
                    struct ubus_request_data *req, const char *method,
                    struct blob_attr *msg)
 {
+       struct blob_attr *tb[__SERVICE_LIST_ATTR_MAX];
        struct service *s;
+       int verbose = 0;
+
+       blobmsg_parse(service_list_attrs, __SERVICE_LIST_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
+
+       if (tb[SERVICE_LIST_ATTR_VERBOSE] && blobmsg_get_bool(tb[SERVICE_LIST_ATTR_VERBOSE]))
+               verbose = 1;
 
        blob_buf_init(&b, 0);
        avl_for_each_element(&services, s, avl)
-               service_dump(s);
+               service_dump(s, verbose);
 
        ubus_send_reply(ctx, req, b.head);
 
        return 0;
 }
 
-enum {
-       SERVICE_DEL_NAME,
-       __SERVICE_DEL_MAX,
-};
-
-static const struct blobmsg_policy service_del_attrs[__SERVICE_DEL_MAX] = {
-       [SERVICE_DEL_NAME] = { "name", BLOBMSG_TYPE_STRING },
-};
-
-
 static int
 service_handle_delete(struct ubus_context *ctx, struct ubus_object *obj,
                    struct ubus_request_data *req, const char *method,
                    struct blob_attr *msg)
 {
-       struct blob_attr *tb[__SERVICE_DEL_MAX], *cur;
-       struct service *s, *tmp;
+       struct blob_attr *tb[__SERVICE_DEL_ATTR_MAX], *cur;
+       struct service *s;
+       struct service_instance *in;
 
-       blobmsg_parse(service_del_attrs, __SERVICE_DEL_MAX, tb, blob_data(msg), blob_len(msg));
+       blobmsg_parse(service_del_attrs, __SERVICE_DEL_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
 
-       cur = tb[SERVICE_ATTR_NAME];
+       cur = tb[SERVICE_DEL_ATTR_NAME];
+       if (!cur)
+               return UBUS_STATUS_NOT_FOUND;
+
+       s = avl_find_element(&services, blobmsg_data(cur), s, avl);
+       if (!s)
+               return UBUS_STATUS_NOT_FOUND;
+
+       cur = tb[SERVICE_DEL_ATTR_INSTANCE];
        if (!cur) {
-               avl_for_each_element_safe(&services, s, avl, tmp)
-                       service_delete(s);
+               service_delete(s);
                return 0;
        }
 
+       in = vlist_find(&s->instances, blobmsg_data(cur), in, node);
+       if (!in) {
+               ERROR("instance %s not found\n", (char *) blobmsg_data(cur));
+               return UBUS_STATUS_NOT_FOUND;
+       }
+
+       vlist_delete(&s->instances, &in->node);
+
+       return 0;
+}
+
+static int
+service_handle_update(struct ubus_context *ctx, struct ubus_object *obj,
+                     struct ubus_request_data *req, const char *method,
+                     struct blob_attr *msg)
+{
+       struct blob_attr *tb[__SERVICE_ATTR_MAX], *cur;
+       struct service *s;
+
+       blobmsg_parse(service_attrs, __SERVICE_ATTR_MAX, tb, blob_data(msg), blob_len(msg));
+
+       cur = tb[SERVICE_ATTR_NAME];
+       if (!cur)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
        s = avl_find_element(&services, blobmsg_data(cur), s, avl);
        if (!s)
                return UBUS_STATUS_NOT_FOUND;
 
-       service_delete(s);
+       if (!strcmp(method, "update_start"))
+               vlist_update(&s->instances);
+       else
+               vlist_flush(&s->instances);
+
+       return 0;
+}
+
+static int
+service_handle_event(struct ubus_context *ctx, struct ubus_object *obj,
+                       struct ubus_request_data *req, const char *method,
+                       struct blob_attr *msg)
+{
+       struct blob_attr *tb[__EVENT_MAX];
+
+       if (!msg)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       blobmsg_parse(event_policy, __EVENT_MAX, tb, blob_data(msg), blob_len(msg));
+       if (!tb[EVENT_TYPE] || !tb[EVENT_DATA])
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       trigger_event(blobmsg_get_string(tb[EVENT_TYPE]), tb[EVENT_DATA]);
+
        return 0;
 }
 
 static struct ubus_method main_object_methods[] = {
-       { .name = "list", .handler = service_handle_list },
-       { .name = "set", .handler = service_handle_set },
-       { .name = "delete", .handler = service_handle_delete },
+       UBUS_METHOD("set", service_handle_set, service_set_attrs),
+       UBUS_METHOD("add", service_handle_set, service_set_attrs),
+       UBUS_METHOD("list", service_handle_list, service_attrs),
+       UBUS_METHOD("delete", service_handle_delete, service_del_attrs),
+       UBUS_METHOD("update_start", service_handle_update, service_attrs),
+       UBUS_METHOD("update_complete", service_handle_update, service_attrs),
+       UBUS_METHOD("event", service_handle_event, event_policy),
 };
 
 static struct ubus_object_type main_object_type =
@@ -235,7 +370,7 @@ static struct ubus_object main_object = {
        .n_methods = ARRAY_SIZE(main_object_methods),
 };
 
-void procd_init_service(struct ubus_context *ctx)
+void ubus_init_service(struct ubus_context *ctx)
 {
        avl_init(&services, avl_strcmp, false, NULL);
        ubus_add_object(ctx, &main_object);