do not reverse method sorting order
[project/ubus.git] / libubus.c
index fa7f5ca..d84e970 100644 (file)
--- a/libubus.c
+++ b/libubus.c
@@ -1,6 +1,7 @@
 #include <sys/types.h>
 #include <sys/uio.h>
 #include <sys/socket.h>
+#include <fcntl.h>
 #include <unistd.h>
 
 #include <libubox/blob.h>
 #include "libubus.h"
 #include "ubusmsg.h"
 
-#define DEBUG 1
-
-#ifdef DEBUG
-#define DPRINTF(_format, ...) fprintf(stderr, "ubus: " _format, ## __VA_ARGS__)
-#else
-#define DPRINTF(...) do {} while(0)
-#endif
-
 #define STATIC_IOV(_var) { .iov_base = (char *) &(_var), .iov_len = sizeof(_var) }
 
 const char *__ubus_strerror[__UBUS_STATUS_LAST] = {
@@ -27,6 +20,8 @@ const char *__ubus_strerror[__UBUS_STATUS_LAST] = {
        [UBUS_STATUS_METHOD_NOT_FOUND] = "Method not found",
        [UBUS_STATUS_NOT_FOUND] = "Not found",
        [UBUS_STATUS_NO_DATA] = "No response",
+       [UBUS_STATUS_PERMISSION_DENIED] = "Permission denied",
+       [UBUS_STATUS_TIMEOUT] = "Request timed out",
 };
 
 static struct blob_buf b;
@@ -55,7 +50,7 @@ static int ubus_cmp_id(const void *k1, const void *k2, void *ptr)
                return *id1 > *id2;
 }
 
-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;
@@ -78,6 +73,38 @@ out:
        return err;
 }
 
+static int writev_retry(int fd, struct iovec *iov, int iov_len)
+{
+       int len = 0;
+
+       do {
+               int cur_len = writev(fd, iov, iov_len);
+               if (cur_len < 0) {
+                       switch(errno) {
+                       case EAGAIN:
+                               /* turn off non-blocking mode */
+                               fcntl(fd, F_SETFL, fcntl(fd, F_GETFL) &
+                                     ~O_NONBLOCK);
+                               break;
+                       case EINTR:
+                               break;
+                       default:
+                               return -1;
+                       }
+                       continue;
+               }
+               len += cur_len;
+               while (cur_len >= iov->iov_len) {
+                       cur_len -= iov->iov_len;
+                       iov_len--;
+                       iov++;
+                       if (!cur_len || !iov_len)
+                               return len;
+               }
+               iov->iov_len -= cur_len;
+       } while (1);
+}
+
 static int ubus_send_msg(struct ubus_context *ctx, uint32_t seq,
                         struct blob_attr *msg, int cmd, uint32_t peer)
 {
@@ -99,14 +126,17 @@ static int ubus_send_msg(struct ubus_context *ctx, uint32_t seq,
        iov[1].iov_base = (char *) msg;
        iov[1].iov_len = blob_raw_len(msg);
 
-       return writev(ctx->sock.fd, iov, 2);
+       return writev_retry(ctx->sock.fd, iov, ARRAY_SIZE(iov));
 }
 
-int ubus_start_request(struct ubus_context *ctx, struct ubus_request *req,
-                      struct blob_attr *msg, int cmd, uint32_t peer)
+static int ubus_start_request(struct ubus_context *ctx, struct ubus_request *req,
+                             struct blob_attr *msg, int cmd, uint32_t peer)
 {
        memset(req, 0, sizeof(*req));
 
+       if (msg && blob_pad_len(msg) > UBUS_MAX_MSGLEN)
+               return -1;
+
        INIT_LIST_HEAD(&req->list);
        INIT_LIST_HEAD(&req->pending);
        req->ctx = ctx;
@@ -123,13 +153,13 @@ static bool recv_retry(int fd, struct iovec *iov, bool wait)
                bytes = read(fd, iov->iov_base, iov->iov_len);
                if (bytes < 0) {
                        bytes = 0;
+                       if (uloop_cancelled)
+                               return false;
                        if (errno == EINTR)
                                continue;
 
-                       if (errno != EAGAIN) {
-                               perror("read");
+                       if (errno != EAGAIN)
                                return false;
-                       }
                }
                if (!wait && !bytes)
                        return false;
@@ -150,19 +180,19 @@ static bool ubus_validate_hdr(struct ubus_msghdr *hdr)
        if (blob_raw_len(hdr->data) < sizeof(*hdr->data))
                return false;
 
-       if (blob_raw_len(hdr->data) + sizeof(*hdr) > UBUS_MAX_MSGLEN)
+       if (blob_pad_len(hdr->data) > UBUS_MAX_MSGLEN)
                return false;
 
        return true;
 }
 
-static bool get_next_msg(struct ubus_context *ctx, bool wait)
+static bool get_next_msg(struct ubus_context *ctx)
 {
        struct iovec iov = STATIC_IOV(ctx->msgbuf.hdr);
 
        /* receive header + start attribute */
        iov.iov_len += sizeof(struct blob_attr);
-       if (!recv_retry(ctx->sock.fd, &iov, wait))
+       if (!recv_retry(ctx->sock.fd, &iov, false))
                return false;
 
        iov.iov_len = blob_len(ctx->msgbuf.hdr.data);
@@ -179,7 +209,7 @@ static bool ubus_get_status(struct ubus_msghdr *hdr, int *ret)
        if (!attrbuf[UBUS_ATTR_STATUS])
                return false;
 
-       *ret = blob_get_int32(attrbuf[UBUS_ATTR_STATUS]);
+       *ret = blob_get_u32(attrbuf[UBUS_ATTR_STATUS]);
        return true;
 }
 
@@ -292,7 +322,7 @@ static void ubus_process_invoke(struct ubus_context *ctx, struct ubus_msghdr *hd
        if (!attrbuf[UBUS_ATTR_OBJID])
                return;
 
-       objid = blob_get_int32(attrbuf[UBUS_ATTR_OBJID]);
+       objid = blob_get_u32(attrbuf[UBUS_ATTR_OBJID]);
 
        if (!attrbuf[UBUS_ATTR_METHOD]) {
                ret = UBUS_STATUS_INVALID_ARGUMENT;
@@ -306,7 +336,8 @@ static void ubus_process_invoke(struct ubus_context *ctx, struct ubus_msghdr *hd
        }
 
        for (method = 0; method < obj->n_methods; method++)
-               if (!strcmp(obj->methods[method].name,
+               if (!obj->methods[method].name ||
+                   !strcmp(obj->methods[method].name,
                            blob_data(attrbuf[UBUS_ATTR_METHOD])))
                        goto found;
 
@@ -319,7 +350,7 @@ found:
        req.peer = hdr->peer;
        req.seq = hdr->seq;
        ret = obj->methods[method].handler(ctx, obj, &req,
-                                          obj->methods[method].name,
+                                          blob_data(attrbuf[UBUS_ATTR_METHOD]),
                                           attrbuf[UBUS_ATTR_DATA]);
 
 send:
@@ -351,9 +382,6 @@ static void ubus_process_msg(struct ubus_context *ctx, struct ubus_msghdr *hdr)
        case UBUS_MSG_INVOKE:
                ubus_process_invoke(ctx, hdr);
                break;
-       default:
-               DPRINTF("unknown message type: %d\n", hdr->type);
-               break;
        }
 }
 
@@ -380,47 +408,151 @@ static void ubus_handle_data(struct uloop_fd *u, unsigned int events)
        struct ubus_context *ctx = container_of(u, struct ubus_context, sock);
        struct ubus_msghdr *hdr = &ctx->msgbuf.hdr;
 
-       while (get_next_msg(ctx, false))
+       while (get_next_msg(ctx)) {
                ubus_process_msg(ctx, hdr);
+               if (uloop_cancelled)
+                       break;
+       }
 
        if (u->eof)
                ctx->connection_lost(ctx);
 }
 
-int ubus_complete_request(struct ubus_context *ctx, struct ubus_request *req)
+static void ubus_sync_req_cb(struct ubus_request *req, int ret)
 {
-       struct ubus_msghdr *hdr = &ctx->msgbuf.hdr;
+       req->status_msg = true;
+       req->status_code = ret;
+       uloop_end();
+}
 
-       if (!list_empty(&req->list))
-               list_del(&req->list);
+struct ubus_sync_req_cb {
+       struct uloop_timeout timeout;
+       struct ubus_request *req;
+};
 
-       while (1) {
-               if (req->status_msg)
-                       return req->status_code;
+static void ubus_sync_req_timeout_cb(struct uloop_timeout *timeout)
+{
+       struct ubus_sync_req_cb *cb;
 
-               if (req->cancelled)
-                       return UBUS_STATUS_NO_DATA;
+       cb = container_of(timeout, struct ubus_sync_req_cb, timeout);
+       ubus_sync_req_cb(cb->req, UBUS_STATUS_TIMEOUT);
+}
 
-               if (!get_next_msg(ctx, true))
-                       return UBUS_STATUS_NO_DATA;
+int ubus_complete_request(struct ubus_context *ctx, struct ubus_request *req,
+                         int timeout)
+{
+       struct ubus_sync_req_cb cb;
+       ubus_complete_handler_t complete_cb = req->complete_cb;
+       bool registered = ctx->sock.registered;
+       bool cancelled = uloop_cancelled;
+       int status = UBUS_STATUS_NO_DATA;
+
+       if (!registered) {
+               uloop_init();
+               ubus_add_uloop(ctx);
+       }
 
-               if (hdr->seq != req->seq || hdr->peer != req->peer)
-                       goto skip;
+       if (timeout) {
+               memset(&cb, 0, sizeof(cb));
+               cb.req = req;
+               cb.timeout.cb = ubus_sync_req_timeout_cb;
+               uloop_timeout_set(&cb.timeout, timeout);
+       }
 
-               switch(hdr->type) {
-               case UBUS_MSG_STATUS:
-                       return ubus_process_req_status(req, hdr);
-               case UBUS_MSG_DATA:
-                       if (req->data_cb || req->raw_data_cb)
-                               ubus_req_data(req, hdr);
-                       continue;
-               default:
-                       goto skip;
-               }
+       ubus_complete_request_async(ctx, req);
+       req->complete_cb = ubus_sync_req_cb;
 
-skip:
-               ubus_process_msg(ctx, hdr);
-       }
+       uloop_run();
+
+       if (timeout)
+               uloop_timeout_cancel(&cb.timeout);
+
+       if (req->status_msg)
+               status = req->status_code;
+
+       req->complete_cb = complete_cb;
+       if (req->complete_cb)
+               req->complete_cb(req, status);
+
+       uloop_cancelled = cancelled;
+       if (!registered)
+               uloop_fd_delete(&ctx->sock);
+
+       return status;
+}
+
+struct ubus_lookup_request {
+       struct ubus_request req;
+       ubus_lookup_handler_t cb;
+};
+
+static void ubus_lookup_cb(struct ubus_request *ureq, int type, struct blob_attr *msg)
+{
+       struct ubus_lookup_request *req;
+       struct ubus_object_data obj;
+       struct blob_attr **attr;
+
+       req = container_of(ureq, struct ubus_lookup_request, req);
+       attr = ubus_parse_msg(msg);
+
+       if (!attr[UBUS_ATTR_OBJID] || !attr[UBUS_ATTR_OBJPATH] ||
+           !attr[UBUS_ATTR_OBJTYPE])
+               return;
+
+       memset(&obj, 0, sizeof(obj));
+       obj.id = blob_get_u32(attr[UBUS_ATTR_OBJID]);
+       obj.path = blob_data(attr[UBUS_ATTR_OBJPATH]);
+       obj.type_id = blob_get_u32(attr[UBUS_ATTR_OBJTYPE]);
+       obj.signature = attr[UBUS_ATTR_SIGNATURE];
+       req->cb(ureq->ctx, &obj, ureq->priv);
+}
+
+int ubus_lookup(struct ubus_context *ctx, const char *path,
+               ubus_lookup_handler_t cb, void *priv)
+{
+       struct ubus_lookup_request lookup;
+
+       blob_buf_init(&b, 0);
+       if (path)
+               blob_put_string(&b, UBUS_ATTR_OBJPATH, path);
+
+       if (ubus_start_request(ctx, &lookup.req, b.head, UBUS_MSG_LOOKUP, 0) < 0)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       lookup.req.raw_data_cb = ubus_lookup_cb;
+       lookup.req.priv = priv;
+       lookup.cb = cb;
+       return ubus_complete_request(ctx, &lookup.req, 0);
+}
+
+static void ubus_lookup_id_cb(struct ubus_request *req, int type, struct blob_attr *msg)
+{
+       struct blob_attr **attr;
+       uint32_t *id = req->priv;
+
+       attr = ubus_parse_msg(msg);
+
+       if (!attr[UBUS_ATTR_OBJID])
+               return;
+
+       *id = blob_get_u32(attr[UBUS_ATTR_OBJID]);
+}
+
+int ubus_lookup_id(struct ubus_context *ctx, const char *path, uint32_t *id)
+{
+       struct ubus_request req;
+
+       blob_buf_init(&b, 0);
+       if (path)
+               blob_put_string(&b, UBUS_ATTR_OBJPATH, path);
+
+       if (ubus_start_request(ctx, &req, b.head, UBUS_MSG_LOOKUP, 0) < 0)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       req.raw_data_cb = ubus_lookup_id_cb;
+       req.priv = id;
+
+       return ubus_complete_request(ctx, &req, 0);
 }
 
 int ubus_send_reply(struct ubus_context *ctx, struct ubus_request_data *req,
@@ -438,7 +570,7 @@ int ubus_send_reply(struct ubus_context *ctx, struct ubus_request_data *req,
        return 0;
 }
 
-void ubus_invoke_async(struct ubus_context *ctx, uint32_t obj, const char *method,
+int ubus_invoke_async(struct ubus_context *ctx, uint32_t obj, const char *method,
                        struct blob_attr *msg, struct ubus_request *req)
 {
        blob_buf_init(&b, 0);
@@ -447,21 +579,25 @@ void ubus_invoke_async(struct ubus_context *ctx, uint32_t obj, const char *metho
        if (msg)
                blob_put(&b, UBUS_ATTR_DATA, blob_data(msg), blob_len(msg));
 
-       ubus_start_request(ctx, req, b.head, UBUS_MSG_INVOKE, obj);
+       if (ubus_start_request(ctx, req, b.head, UBUS_MSG_INVOKE, obj) < 0)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       return 0;
 }
 
 int ubus_invoke(struct ubus_context *ctx, uint32_t obj, const char *method,
-                struct blob_attr *msg, ubus_data_handler_t cb, void *priv)
+                struct blob_attr *msg, ubus_data_handler_t cb, void *priv,
+               int timeout)
 {
        struct ubus_request req;
 
        ubus_invoke_async(ctx, obj, method, msg, &req);
        req.data_cb = cb;
        req.priv = priv;
-       return ubus_complete_request(ctx, &req);
+       return ubus_complete_request(ctx, &req, timeout);
 }
 
-static void ubus_publish_cb(struct ubus_request *req, int type, struct blob_attr *msg)
+static void ubus_add_object_cb(struct ubus_request *req, int type, struct blob_attr *msg)
 {
        struct ubus_object *obj = req->priv;
 
@@ -470,10 +606,10 @@ static void ubus_publish_cb(struct ubus_request *req, int type, struct blob_attr
        if (!attrbuf[UBUS_ATTR_OBJID])
                return;
 
-       obj->id = blob_get_int32(attrbuf[UBUS_ATTR_OBJID]);
+       obj->id = blob_get_u32(attrbuf[UBUS_ATTR_OBJID]);
 
        if (attrbuf[UBUS_ATTR_OBJTYPE])
-               obj->type->id = blob_get_int32(attrbuf[UBUS_ATTR_OBJTYPE]);
+               obj->type->id = blob_get_u32(attrbuf[UBUS_ATTR_OBJTYPE]);
 
        obj->avl.key = &obj->id;
        avl_insert(&req->ctx->objects, &obj->avl);
@@ -537,36 +673,153 @@ static bool ubus_push_object_type(struct ubus_object_type *type)
        return true;
 }
 
-int ubus_publish(struct ubus_context *ctx, struct ubus_object *obj)
+static int __ubus_add_object(struct ubus_context *ctx, struct ubus_object *obj)
 {
        struct ubus_request req;
        int ret;
 
-       if (obj->id || !obj->name || !obj->type)
+       blob_buf_init(&b, 0);
+
+       if (obj->name && obj->type) {
+               blob_put_string(&b, UBUS_ATTR_OBJPATH, obj->name);
+
+               if (obj->type->id)
+                       blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id);
+               else if (!ubus_push_object_type(obj->type))
+                       return UBUS_STATUS_INVALID_ARGUMENT;
+       }
+
+       if (ubus_start_request(ctx, &req, b.head, UBUS_MSG_ADD_OBJECT, 0) < 0)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       req.raw_data_cb = ubus_add_object_cb;
+       req.priv = obj;
+       ret = ubus_complete_request(ctx, &req, 0);
+       if (ret)
+               return ret;
+
+       if (!obj->id)
+               return UBUS_STATUS_NO_DATA;
+
+       return 0;
+}
+
+int ubus_add_object(struct ubus_context *ctx, struct ubus_object *obj)
+{
+       if (!obj->name || !obj->type)
                return UBUS_STATUS_INVALID_ARGUMENT;
 
+       return __ubus_add_object(ctx, obj);
+}
+
+static void ubus_remove_object_cb(struct ubus_request *req, int type, struct blob_attr *msg)
+{
+       struct ubus_object *obj = req->priv;
+
+       ubus_parse_msg(msg);
+
+       if (!attrbuf[UBUS_ATTR_OBJID])
+               return;
+
+       obj->id = 0;
+
+       if (attrbuf[UBUS_ATTR_OBJTYPE] && obj->type)
+               obj->type->id = 0;
+
+       avl_delete(&req->ctx->objects, &obj->avl);
+}
+
+int ubus_remove_object(struct ubus_context *ctx, struct ubus_object *obj)
+{
+       struct ubus_request req;
+       int ret;
+
        blob_buf_init(&b, 0);
-       blob_put_string(&b, UBUS_ATTR_OBJPATH, obj->name);
+       blob_put_int32(&b, UBUS_ATTR_OBJID, obj->id);
 
-       if (obj->type->id)
-               blob_put_int32(&b, UBUS_ATTR_OBJTYPE, obj->type->id);
-       else if (!ubus_push_object_type(obj->type))
+       if (ubus_start_request(ctx, &req, b.head, UBUS_MSG_REMOVE_OBJECT, 0) < 0)
                return UBUS_STATUS_INVALID_ARGUMENT;
 
-       ubus_start_request(ctx, &req, b.head, UBUS_MSG_PUBLISH, 0);
-       req.raw_data_cb = ubus_publish_cb;
+       req.raw_data_cb = ubus_remove_object_cb;
        req.priv = obj;
-       ret = ubus_complete_request(ctx, &req);
+       ret = ubus_complete_request(ctx, &req, 0);
        if (ret)
                return ret;
 
-       if (!obj->id)
+       if (obj->id)
                return UBUS_STATUS_NO_DATA;
 
        return 0;
 }
 
-void ubus_default_connection_lost(struct ubus_context *ctx)
+static int ubus_event_cb(struct ubus_context *ctx, struct ubus_object *obj,
+                        struct ubus_request_data *req,
+                        const char *method, struct blob_attr *msg)
+{
+       struct ubus_event_handler *ev;
+
+       ev = container_of(obj, struct ubus_event_handler, obj);
+       ev->cb(ctx, ev, method, msg);
+       return 0;
+}
+
+static const struct ubus_method event_method = {
+       .name = NULL,
+       .handler = ubus_event_cb,
+};
+
+int ubus_register_event_handler(struct ubus_context *ctx,
+                               struct ubus_event_handler *ev,
+                               const char *pattern)
+{
+       struct ubus_object *obj = &ev->obj;
+       struct blob_buf b2;
+       int ret;
+
+       if (!obj->id) {
+               obj->methods = &event_method;
+               obj->n_methods = 1;
+
+               if (!!obj->name ^ !!obj->type)
+                       return UBUS_STATUS_INVALID_ARGUMENT;
+
+               ret = __ubus_add_object(ctx, obj);
+               if (ret)
+                       return ret;
+       }
+
+       /* use a second buffer, ubus_invoke() overwrites the primary one */
+       memset(&b2, 0, sizeof(b2));
+       blob_buf_init(&b2, 0);
+       blobmsg_add_u32(&b2, "object", obj->id);
+       if (pattern)
+               blobmsg_add_string(&b2, "pattern", pattern);
+
+       return ubus_invoke(ctx, UBUS_SYSTEM_OBJECT_EVENT, "register", b2.head,
+                         NULL, NULL, 0);
+}
+
+int ubus_send_event(struct ubus_context *ctx, const char *id,
+                   struct blob_attr *data)
+{
+       struct ubus_request req;
+       void *s;
+
+       blob_buf_init(&b, 0);
+       blob_put_int32(&b, UBUS_ATTR_OBJID, UBUS_SYSTEM_OBJECT_EVENT);
+       blob_put_string(&b, UBUS_ATTR_METHOD, "send");
+       s = blob_nest_start(&b, UBUS_ATTR_DATA);
+       blobmsg_add_string(&b, "id", id);
+       blobmsg_add_field(&b, BLOBMSG_TYPE_TABLE, "data", blob_data(data), blob_len(data));
+       blob_nest_end(&b, s);
+
+       if (ubus_start_request(ctx, &req, b.head, UBUS_MSG_INVOKE, UBUS_SYSTEM_OBJECT_EVENT) < 0)
+               return UBUS_STATUS_INVALID_ARGUMENT;
+
+       return ubus_complete_request(ctx, &req, 0);
+}
+
+static void ubus_default_connection_lost(struct ubus_context *ctx)
 {
        if (ctx->sock.registered)
                uloop_end();
@@ -589,36 +842,27 @@ struct ubus_context *ubus_connect(const char *path)
                goto error;
 
        ctx->sock.fd = usock(USOCK_UNIX, path, NULL);
-       if (ctx->sock.fd < 0) {
-               DPRINTF("Failed to connect to server\n");
+       if (ctx->sock.fd < 0)
                goto error_free;
-       }
+
        ctx->sock.cb = ubus_handle_data;
 
-       if (read(ctx->sock.fd, &hdr, sizeof(hdr)) != sizeof(hdr)) {
-               DPRINTF("Failed to read initial message data\n");
+       if (read(ctx->sock.fd, &hdr, sizeof(hdr)) != sizeof(hdr))
                goto error_close;
-       }
 
-       if (!ubus_validate_hdr(&hdr.hdr)) {
-               DPRINTF("Failed to validate initial message header\n");
+       if (!ubus_validate_hdr(&hdr.hdr))
                goto error_close;
-       }
 
-       if (hdr.hdr.type != UBUS_MSG_HELLO) {
-               DPRINTF("Unexpected initial message\n");
+       if (hdr.hdr.type != UBUS_MSG_HELLO)
                goto error_close;
-       }
 
        buf = calloc(1, blob_raw_len(&hdr.data));
        if (!buf)
                goto error_close;
 
        memcpy(buf, &hdr.data, sizeof(hdr.data));
-       if (read(ctx->sock.fd, blob_data(buf), blob_len(buf)) != blob_len(buf)) {
-               DPRINTF("Failed to retrieve initial message data\n");
+       if (read(ctx->sock.fd, blob_data(buf), blob_len(buf)) != blob_len(buf))
                goto error_free_buf;
-       }
 
        ctx->local_id = hdr.hdr.peer;
        free(buf);
@@ -628,10 +872,8 @@ struct ubus_context *ubus_connect(const char *path)
        INIT_LIST_HEAD(&ctx->requests);
        avl_init(&ctx->objects, ubus_cmp_id, false, NULL);
 
-       if (!ctx->local_id) {
-               DPRINTF("Failed to get local peer id\n");
+       if (!ctx->local_id)
                goto error_close;
-       }
 
        return ctx;