pass ubus_msg_buf to callback of internal object
[project/ubus.git] / ubusd_proto.c
index 7d6e01a..caede10 100644 (file)
@@ -1,9 +1,25 @@
+/*
+ * Copyright (C) 2011-2014 Felix Fietkau <nbd@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 <arpa/inet.h>
+#include <unistd.h>
+
 #include "ubusd.h"
 
 struct blob_buf b;
 static struct ubus_msg_buf *retmsg;
 static int *retmsg_data;
+static struct avl_tree clients;
 
 static struct blob_attr *attrbuf[UBUS_ATTR_MAX];
 
@@ -15,14 +31,24 @@ static const struct blob_attr_info ubus_policy[UBUS_ATTR_MAX] = {
        [UBUS_ATTR_OBJPATH] = { .type = BLOB_ATTR_STRING },
        [UBUS_ATTR_OBJID] = { .type = BLOB_ATTR_INT32 },
        [UBUS_ATTR_STATUS] = { .type = BLOB_ATTR_INT32 },
+       [UBUS_ATTR_METHOD] = { .type = BLOB_ATTR_STRING },
 };
 
-struct blob_attr **ubus_parse_msg(struct blob_attr *msg)
+static struct blob_attr **ubus_parse_msg(struct blob_attr *msg)
 {
        blob_parse(msg, attrbuf, ubus_policy, UBUS_ATTR_MAX);
        return attrbuf;
 }
 
+static void ubus_msg_close_fd(struct ubus_msg_buf *ub)
+{
+       if (ub->fd < 0)
+               return;
+
+       close(ub->fd);
+       ub->fd = -1;
+}
+
 static void ubus_msg_init(struct ubus_msg_buf *ub, uint8_t type, uint16_t seq, uint32_t peer)
 {
        ub->hdr.version = 0;
@@ -40,7 +66,7 @@ static struct ubus_msg_buf *ubus_reply_from_blob(struct ubus_msg_buf *ub, bool s
 {
        struct ubus_msg_buf *new;
 
-       new = ubus_msg_new(b.head, blob_raw_len(b.head), shared);
+       new = ubus_msg_from_blob(shared);
        if (!new)
                return NULL;
 
@@ -48,7 +74,19 @@ static struct ubus_msg_buf *ubus_reply_from_blob(struct ubus_msg_buf *ub, bool s
        return new;
 }
 
-bool ubusd_send_hello(struct ubus_client *cl)
+static void
+ubus_send_msg_from_blob(struct ubus_client *cl, struct ubus_msg_buf *ub,
+                       uint8_t type)
+{
+       ub = ubus_reply_from_blob(ub, true);
+       if (!ub)
+               return;
+
+       ub->hdr.type = type;
+       ubus_msg_send(cl, ub, true);
+}
+
+static bool ubusd_send_hello(struct ubus_client *cl)
 {
        struct ubus_msg_buf *ub;
 
@@ -91,12 +129,8 @@ static int ubusd_handle_remove_object(struct ubus_client *cl, struct ubus_msg_bu
                blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id.id);
 
        ubusd_free_object(obj);
+       ubus_send_msg_from_blob(cl, ub, UBUS_MSG_DATA);
 
-       ub = ubus_reply_from_blob(ub, true);
-       if (!ub)
-               return UBUS_STATUS_NO_DATA;
-
-       ubus_msg_send(cl, ub, true);
        return 0;
 }
 
@@ -113,11 +147,7 @@ static int ubusd_handle_add_object(struct ubus_client *cl, struct ubus_msg_buf *
        if (attr[UBUS_ATTR_SIGNATURE])
                blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id.id);
 
-       ub = ubus_reply_from_blob(ub, true);
-       if (!ub)
-               return UBUS_STATUS_NO_DATA;
-
-       ubus_msg_send(cl, ub, true);
+       ubus_send_msg_from_blob(cl, ub, UBUS_MSG_DATA);
        return 0;
 }
 
@@ -128,28 +158,22 @@ static void ubusd_send_obj(struct ubus_client *cl, struct ubus_msg_buf *ub, stru
 
        blob_buf_init(&b, 0);
 
-       if (obj->path.key)
-               blob_put_string(&b, UBUS_ATTR_OBJPATH, obj->path.key);
+       blob_put_string(&b, UBUS_ATTR_OBJPATH, obj->path.key);
        blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
        blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id.id);
 
        s = blob_nest_start(&b, UBUS_ATTR_SIGNATURE);
        list_for_each_entry(m, &obj->type->methods, list)
-               blob_put(&b, blob_id(m->data), blob_data(m->data), blob_len(m->data));
+               blobmsg_add_blob(&b, m->data);
        blob_nest_end(&b, s);
 
-       ub = ubus_reply_from_blob(ub, true);
-       if (!ub)
-               return;
-
-       ubus_msg_send(cl, ub, true);
+       ubus_send_msg_from_blob(cl, ub, UBUS_MSG_DATA);
 }
 
 static int ubusd_handle_lookup(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
 {
        struct ubus_object *obj;
        char *objpath;
-       bool wildcard = false;
        bool found = false;
        int len;
 
@@ -171,7 +195,6 @@ static int ubusd_handle_lookup(struct ubus_client *cl, struct ubus_msg_buf *ub,
        }
 
        objpath[--len] = 0;
-       wildcard = true;
 
        obj = avl_find_ge_element(&path, objpath, obj, path);
        if (!obj)
@@ -191,6 +214,18 @@ static int ubusd_handle_lookup(struct ubus_client *cl, struct ubus_msg_buf *ub,
        return 0;
 }
 
+static void
+ubusd_forward_invoke(struct ubus_object *obj, const char *method,
+                    struct ubus_msg_buf *ub, struct blob_attr *data)
+{
+       blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
+       blob_put_string(&b, UBUS_ATTR_METHOD, method);
+       if (data)
+               blob_put(&b, UBUS_ATTR_DATA, blob_data(data), blob_len(data));
+
+       ubus_send_msg_from_blob(obj->client, ub, UBUS_MSG_INVOKE);
+}
+
 static int ubusd_handle_invoke(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
 {
        struct ubus_object *obj = NULL;
@@ -209,28 +244,75 @@ static int ubusd_handle_invoke(struct ubus_client *cl, struct ubus_msg_buf *ub,
        method = blob_data(attr[UBUS_ATTR_METHOD]);
 
        if (!obj->client)
-               return obj->recv_msg(cl, method, attr[UBUS_ATTR_DATA]);
+               return obj->recv_msg(cl, ub, method, attr[UBUS_ATTR_DATA]);
 
+       ub->hdr.peer = cl->id.id;
        blob_buf_init(&b, 0);
-       blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
-       blob_put_string(&b, UBUS_ATTR_METHOD, method);
-       if (attr[UBUS_ATTR_DATA])
-               blob_put(&b, UBUS_ATTR_DATA, blob_data(attr[UBUS_ATTR_DATA]),
-                        blob_len(attr[UBUS_ATTR_DATA]));
-
+       ubusd_forward_invoke(obj, method, ub, attr[UBUS_ATTR_DATA]);
        ubus_msg_free(ub);
 
-       ub = ubus_reply_from_blob(ub, true);
-       if (!ub)
-               return UBUS_STATUS_NO_DATA;
+       return -1;
+}
+
+static int ubusd_handle_notify(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
+{
+       struct ubus_object *obj = NULL;
+       struct ubus_subscription *s;
+       struct ubus_id *id;
+       const char *method;
+       bool no_reply = false;
+       void *c;
+
+       if (!attr[UBUS_ATTR_METHOD] || !attr[UBUS_ATTR_OBJID])
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       if (attr[UBUS_ATTR_NO_REPLY])
+               no_reply = blob_get_int8(attr[UBUS_ATTR_NO_REPLY]);
+
+       id = ubus_find_id(&objects, blob_get_u32(attr[UBUS_ATTR_OBJID]));
+       if (!id)
+               return UBUS_STATUS_NOT_FOUND;
+
+       obj = container_of(id, struct ubus_object, id);
+       if (obj->client != cl)
+               return UBUS_STATUS_PERMISSION_DENIED;
+
+       if (!no_reply) {
+               blob_buf_init(&b, 0);
+               blob_put_int32(&b, UBUS_ATTR_OBJID, id->id);
+               c = blob_nest_start(&b, UBUS_ATTR_SUBSCRIBERS);
+               list_for_each_entry(s, &obj->subscribers, list) {
+                       blob_put_int32(&b, 0, s->subscriber->id.id);
+               }
+               blob_nest_end(&b, c);
+               blob_put_int32(&b, UBUS_ATTR_STATUS, 0);
+               ubus_send_msg_from_blob(cl, ub, UBUS_MSG_STATUS);
+       }
 
-       ub->hdr.type = UBUS_MSG_INVOKE;
        ub->hdr.peer = cl->id.id;
-       ubus_msg_send(obj->client, ub, true);
+       method = blob_data(attr[UBUS_ATTR_METHOD]);
+       list_for_each_entry(s, &obj->subscribers, list) {
+               blob_buf_init(&b, 0);
+               if (no_reply)
+                       blob_put_int8(&b, UBUS_ATTR_NO_REPLY, 1);
+               ubusd_forward_invoke(s->subscriber, method, ub, attr[UBUS_ATTR_DATA]);
+       }
+       ubus_msg_free(ub);
 
        return -1;
 }
 
+static struct ubus_client *ubusd_get_client_by_id(uint32_t id)
+{
+       struct ubus_id *clid;
+
+       clid = ubus_find_id(&clients, id);
+       if (!clid)
+               return NULL;
+
+       return container_of(clid, struct ubus_client, id);
+}
+
 static int ubusd_handle_response(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
 {
        struct ubus_object *obj;
@@ -260,6 +342,59 @@ error:
        return -1;
 }
 
+static int ubusd_handle_add_watch(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
+{
+       struct ubus_object *obj, *target;
+
+       if (!attr[UBUS_ATTR_OBJID] || !attr[UBUS_ATTR_TARGET])
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       obj = ubusd_find_object(blob_get_u32(attr[UBUS_ATTR_OBJID]));
+       if (!obj)
+               return UBUS_STATUS_NOT_FOUND;
+
+       if (cl != obj->client)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       target = ubusd_find_object(blob_get_u32(attr[UBUS_ATTR_TARGET]));
+       if (!target)
+               return UBUS_STATUS_NOT_FOUND;
+
+       if (cl == target->client)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       ubus_subscribe(obj, target);
+       return 0;
+}
+
+static int ubusd_handle_remove_watch(struct ubus_client *cl, struct ubus_msg_buf *ub, struct blob_attr **attr)
+{
+       struct ubus_object *obj;
+       struct ubus_subscription *s;
+       uint32_t id;
+
+       if (!attr[UBUS_ATTR_OBJID] || !attr[UBUS_ATTR_TARGET])
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       obj = ubusd_find_object(blob_get_u32(attr[UBUS_ATTR_OBJID]));
+       if (!obj)
+               return UBUS_STATUS_NOT_FOUND;
+
+       if (cl != obj->client)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       id = blob_get_u32(attr[UBUS_ATTR_TARGET]);
+       list_for_each_entry(s, &obj->target_list, target_list) {
+               if (s->target->id.id != id)
+                       continue;
+
+               ubus_unsubscribe(s);
+               return 0;
+       }
+
+       return UBUS_STATUS_NOT_FOUND;
+}
+
 static const ubus_cmd_cb handlers[__UBUS_MSG_LAST] = {
        [UBUS_MSG_PING] = ubusd_send_pong,
        [UBUS_MSG_ADD_OBJECT] = ubusd_handle_add_object,
@@ -268,9 +403,12 @@ static const ubus_cmd_cb handlers[__UBUS_MSG_LAST] = {
        [UBUS_MSG_INVOKE] = ubusd_handle_invoke,
        [UBUS_MSG_STATUS] = ubusd_handle_response,
        [UBUS_MSG_DATA] = ubusd_handle_response,
+       [UBUS_MSG_SUBSCRIBE] = ubusd_handle_add_watch,
+       [UBUS_MSG_UNSUBSCRIBE] = ubusd_handle_remove_watch,
+       [UBUS_MSG_NOTIFY] = ubusd_handle_notify,
 };
 
-void ubusd_receive_message(struct ubus_client *cl, struct ubus_msg_buf *ub)
+void ubusd_proto_receive_message(struct ubus_client *cl, struct ubus_msg_buf *ub)
 {
        ubus_cmd_cb cb = NULL;
        int ret;
@@ -281,6 +419,9 @@ void ubusd_receive_message(struct ubus_client *cl, struct ubus_msg_buf *ub)
        if (ub->hdr.type < __UBUS_MSG_LAST)
                cb = handlers[ub->hdr.type];
 
+       if (ub->hdr.type != UBUS_MSG_STATUS)
+               ubus_msg_close_fd(ub);
+
        if (cb)
                ret = cb(cl, ub, ubus_parse_msg(ub->data));
        else
@@ -295,8 +436,84 @@ void ubusd_receive_message(struct ubus_client *cl, struct ubus_msg_buf *ub)
        ubus_msg_send(cl, retmsg, false);
 }
 
-static void __init ubusd_proto_init(void)
+struct ubus_client *ubusd_proto_new_client(int fd, uloop_fd_handler cb)
+{
+       struct ubus_client *cl;
+
+       cl = calloc(1, sizeof(*cl));
+       if (!cl)
+               return NULL;
+
+       INIT_LIST_HEAD(&cl->objects);
+       cl->sock.fd = fd;
+       cl->sock.cb = cb;
+       cl->pending_msg_fd = -1;
+
+       if (!ubus_alloc_id(&clients, &cl->id, 0))
+               goto free;
+
+       if (!ubusd_send_hello(cl))
+               goto delete;
+
+       return cl;
+
+delete:
+       ubus_free_id(&clients, &cl->id);
+free:
+       free(cl);
+       return NULL;
+}
+
+void ubusd_proto_free_client(struct ubus_client *cl)
 {
+       struct ubus_object *obj;
+
+       while (!list_empty(&cl->objects)) {
+               obj = list_first_entry(&cl->objects, struct ubus_object, list);
+               ubusd_free_object(obj);
+       }
+
+       ubus_free_id(&clients, &cl->id);
+}
+
+void ubus_notify_subscription(struct ubus_object *obj)
+{
+       bool active = !list_empty(&obj->subscribers);
+       struct ubus_msg_buf *ub;
+
+       blob_buf_init(&b, 0);
+       blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id.id);
+       blob_put_int8(&b, UBUS_ATTR_ACTIVE, active);
+
+       ub = ubus_msg_from_blob(false);
+       if (!ub)
+               return;
+
+       ubus_msg_init(ub, UBUS_MSG_NOTIFY, ++obj->invoke_seq, 0);
+       ubus_msg_send(obj->client, ub, true);
+}
+
+void ubus_notify_unsubscribe(struct ubus_subscription *s)
+{
+       struct ubus_msg_buf *ub;
+
+       blob_buf_init(&b, 0);
+       blob_put_int32(&b, UBUS_ATTR_OBJID, s->subscriber->id.id);
+       blob_put_int32(&b, UBUS_ATTR_TARGET, s->target->id.id);
+
+       ub = ubus_msg_from_blob(false);
+       if (ub != NULL) {
+               ubus_msg_init(ub, UBUS_MSG_UNSUBSCRIBE, ++s->subscriber->invoke_seq, 0);
+               ubus_msg_send(s->subscriber->client, ub, true);
+       }
+
+       ubus_unsubscribe(s);
+}
+
+static void __constructor ubusd_proto_init(void)
+{
+       ubus_init_id_tree(&clients);
+
        blob_buf_init(&b, 0);
        blob_put_int32(&b, UBUS_ATTR_STATUS, 0);