relay: do forward data if the http request type was HEAD
[project/uhttpd.git] / ubus.c
diff --git a/ubus.c b/ubus.c
index 80af76a..39dca35 100644 (file)
--- a/ubus.c
+++ b/ubus.c
@@ -26,7 +26,6 @@
 
 #include "uhttpd.h"
 #include "plugin.h"
-#include "ubus-session.h"
 
 static const struct uhttpd_ops *ops;
 static struct config *_conf;
@@ -36,6 +35,7 @@ static struct ubus_context *ctx;
 static struct blob_buf buf;
 
 #define UH_UBUS_MAX_POST_SIZE  4096
+#define UH_UBUS_DEFAULT_SID    "00000000000000000000000000000000"
 
 enum {
        RPC_JSONRPC,
@@ -52,12 +52,28 @@ static const struct blobmsg_policy rpc_policy[__RPC_MAX] = {
        [RPC_ID] = { .name = "id", .type = BLOBMSG_TYPE_UNSPEC },
 };
 
+enum {
+       SES_ACCESS,
+       __SES_MAX,
+};
+
+static const struct blobmsg_policy ses_policy[__SES_MAX] = {
+       [SES_ACCESS] = { .name = "access", .type = BLOBMSG_TYPE_BOOL },
+};
+
 struct rpc_data {
        struct blob_attr *id;
+       const char *sid;
        const char *method;
        const char *object;
        const char *function;
        struct blob_attr *data;
+       struct blob_attr *params;
+};
+
+struct list_data {
+       bool verbose;
+       struct blob_buf *buf;
 };
 
 enum rpc_error {
@@ -111,19 +127,17 @@ static void uh_ubus_send_response(struct client *cl)
        char *str;
 
        if (du->array && du->array_idx > 1)
-               sep = ", ";
+               sep = ",";
 
-       str = blobmsg_format_json_indent(buf.head, true, du->array);
+       str = blobmsg_format_json(buf.head, true);
        ops->chunk_printf(cl, "%s%s", sep, str);
        free(str);
 
        du->jsobj_cur = NULL;
        if (du->array)
                uh_ubus_next_batched_request(cl);
-       else {
-               ops->chunk_printf(cl, "\n");
+       else
                return ops->request_done(cl);
-       }
 }
 
 static void uh_ubus_init_response(struct client *cl)
@@ -206,7 +220,7 @@ static void uh_ubus_request_free(struct client *cl)
        struct dispatch_ubus *du = &cl->dispatch.ubus;
 
        blob_buf_free(&du->buf);
-       uloop_timeout_cancel(&cl->timeout);
+       uloop_timeout_cancel(&du->timeout);
 
        if (du->jsobj)
                json_object_put(du->jsobj);
@@ -225,15 +239,26 @@ static void uh_ubus_single_error(struct client *cl, enum rpc_error type)
        ops->request_done(cl);
 }
 
-static void uh_ubus_send_request(struct client *cl, json_object *obj)
+static void uh_ubus_send_request(struct client *cl, json_object *obj, const char *sid, struct blob_attr *args)
 {
        struct dispatch *d = &cl->dispatch;
        struct dispatch_ubus *du = &d->ubus;
-       int ret;
+       struct blob_attr *cur;
+       static struct blob_buf req;
+       int ret, rem;
+
+       blob_buf_init(&req, 0);
+       blobmsg_for_each_attr(cur, args, rem) {
+               if (!strcmp(blobmsg_name(cur), "ubus_rpc_session"))
+                       return uh_ubus_json_error(cl, ERROR_PARAMS);
+               blobmsg_add_blob(&req, cur);
+       }
+
+       blobmsg_add_string(&req, "ubus_rpc_session", sid);
 
        blob_buf_init(&du->buf, 0);
        memset(&du->req, 0, sizeof(du->req));
-       ret = ubus_invoke_async(ctx, du->obj, du->func, buf.head, &du->req);
+       ret = ubus_invoke_async(ctx, du->obj, du->func, req.head, &du->req);
        if (ret)
                return uh_ubus_json_error(cl, ERROR_INTERNAL);
 
@@ -242,20 +267,107 @@ static void uh_ubus_send_request(struct client *cl, json_object *obj)
        ubus_complete_request_async(ctx, &du->req);
 
        du->timeout.cb = uh_ubus_timeout_cb;
-       uloop_timeout_set(&du->timeout, conf.script_timeout);
+       uloop_timeout_set(&du->timeout, conf.script_timeout * 1000);
 
        du->req_pending = true;
 }
 
+static void uh_ubus_list_cb(struct ubus_context *ctx, struct ubus_object_data *obj, void *priv)
+{
+       struct blob_attr *sig, *attr;
+       struct list_data *data = priv;
+       int rem, rem2;
+       void *t, *o;
+
+       if (!data->verbose) {
+               blobmsg_add_string(data->buf, NULL, obj->path);
+               return;
+       }
+
+       if (!obj->signature)
+               return;
+
+       o = blobmsg_open_table(data->buf, obj->path);
+       blob_for_each_attr(sig, obj->signature, rem) {
+               t = blobmsg_open_table(data->buf, blobmsg_name(sig));
+               rem2 = blobmsg_data_len(sig);
+               __blob_for_each_attr(attr, blobmsg_data(sig), rem2) {
+                       if (blob_id(attr) != BLOBMSG_TYPE_INT32)
+                               continue;
+
+                       switch (blobmsg_get_u32(attr)) {
+                       case BLOBMSG_TYPE_INT8:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "boolean");
+                               break;
+                       case BLOBMSG_TYPE_INT32:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "number");
+                               break;
+                       case BLOBMSG_TYPE_STRING:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "string");
+                               break;
+                       case BLOBMSG_TYPE_ARRAY:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "array");
+                               break;
+                       case BLOBMSG_TYPE_TABLE:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "object");
+                               break;
+                       default:
+                               blobmsg_add_string(data->buf, blobmsg_name(attr), "unknown");
+                               break;
+                       }
+               }
+               blobmsg_close_table(data->buf, t);
+       }
+       blobmsg_close_table(data->buf, o);
+}
+
+static void uh_ubus_send_list(struct client *cl, json_object *obj, struct blob_attr *params)
+{
+       struct blob_attr *cur, *dup;
+       struct list_data data = { .buf = &cl->dispatch.ubus.buf, .verbose = false };
+       void *r;
+       int rem;
+
+       blob_buf_init(data.buf, 0);
+
+       uh_client_ref(cl);
+
+       if (!params || blob_id(params) != BLOBMSG_TYPE_ARRAY) {
+               r = blobmsg_open_array(data.buf, "result");
+               ubus_lookup(ctx, NULL, uh_ubus_list_cb, &data);
+               blobmsg_close_array(data.buf, r);
+       }
+       else {
+               r = blobmsg_open_table(data.buf, "result");
+               dup = blob_memdup(params);
+               if (dup)
+               {
+                       rem = blobmsg_data_len(dup);
+                       data.verbose = true;
+                       __blob_for_each_attr(cur, blobmsg_data(dup), rem)
+                               ubus_lookup(ctx, blobmsg_data(cur), uh_ubus_list_cb, &data);
+                       free(dup);
+               }
+               blobmsg_close_table(data.buf, r);
+       }
+
+       uh_client_unref(cl);
+
+       uh_ubus_init_response(cl);
+       blobmsg_add_blob(&buf, blob_data(data.buf->head));
+       uh_ubus_send_response(cl);
+}
+
 static bool parse_json_rpc(struct rpc_data *d, struct blob_attr *data)
 {
        const struct blobmsg_policy data_policy[] = {
                { .type = BLOBMSG_TYPE_STRING },
                { .type = BLOBMSG_TYPE_STRING },
+               { .type = BLOBMSG_TYPE_STRING },
                { .type = BLOBMSG_TYPE_TABLE },
        };
        struct blob_attr *tb[__RPC_MAX];
-       struct blob_attr *tb2[3];
+       struct blob_attr *tb2[4];
        struct blob_attr *cur;
 
        blobmsg_parse(rpc_policy, __RPC_MAX, tb, blob_data(data), blob_len(data));
@@ -273,17 +385,29 @@ static bool parse_json_rpc(struct rpc_data *d, struct blob_attr *data)
 
        cur = tb[RPC_PARAMS];
        if (!cur)
+               return true;
+
+       d->params = blob_memdup(cur);
+       if (!d->params)
                return false;
 
        blobmsg_parse_array(data_policy, ARRAY_SIZE(data_policy), tb2,
-                           blobmsg_data(cur), blobmsg_data_len(cur));
+                           blobmsg_data(d->params), blobmsg_data_len(d->params));
 
-       if (!tb2[0] || !tb2[1] || !tb2[2])
-               return false;
+       if (tb2[0])
+               d->sid = blobmsg_data(tb2[0]);
+
+       if (conf.ubus_noauth && (!d->sid || !*d->sid))
+               d->sid = UH_UBUS_DEFAULT_SID;
+
+       if (tb2[1])
+               d->object = blobmsg_data(tb2[1]);
+
+       if (tb2[2])
+               d->function = blobmsg_data(tb2[2]);
+
+       d->data = tb2[3];
 
-       d->object = blobmsg_data(tb2[0]);
-       d->function = blobmsg_data(tb2[1]);
-       d->data = tb2[2];
        return true;
 }
 
@@ -293,22 +417,56 @@ static void uh_ubus_init_batch(struct client *cl)
 
        du->array = true;
        uh_ubus_send_header(cl);
-       ops->chunk_printf(cl, "[\n\t");
+       ops->chunk_printf(cl, "[");
 }
 
 static void uh_ubus_complete_batch(struct client *cl)
 {
-       ops->chunk_printf(cl, "\n]\n");
+       ops->chunk_printf(cl, "]");
        ops->request_done(cl);
 }
 
+static void uh_ubus_allowed_cb(struct ubus_request *req, int type, struct blob_attr *msg)
+{
+       struct blob_attr *tb[__SES_MAX];
+       bool *allow = (bool *)req->priv;
+
+       if (!msg)
+               return;
+
+       blobmsg_parse(ses_policy, __SES_MAX, tb, blob_data(msg), blob_len(msg));
+
+       if (tb[SES_ACCESS])
+               *allow = blobmsg_get_bool(tb[SES_ACCESS]);
+}
+
+static bool uh_ubus_allowed(const char *sid, const char *obj, const char *fun)
+{
+       uint32_t id;
+       bool allow = false;
+       static struct blob_buf req;
+
+       if (ubus_lookup_id(ctx, "session", &id))
+               return false;
+
+       blob_buf_init(&req, 0);
+       blobmsg_add_string(&req, "ubus_rpc_session", sid);
+       blobmsg_add_string(&req, "object", obj);
+       blobmsg_add_string(&req, "function", fun);
+
+       ubus_invoke(ctx, id, "access", req.head, uh_ubus_allowed_cb, &allow, conf.script_timeout * 500);
+
+       return allow;
+}
+
 static void uh_ubus_handle_request_object(struct client *cl, struct json_object *obj)
 {
        struct dispatch_ubus *du = &cl->dispatch.ubus;
-       struct uh_ubus_session *ses;
        struct rpc_data data = {};
        enum rpc_error err = ERROR_PARSE;
 
+       uh_client_ref(cl);
+
        if (json_object_get_type(obj) != json_type_object)
                goto error;
 
@@ -320,33 +478,40 @@ static void uh_ubus_handle_request_object(struct client *cl, struct json_object
        if (!parse_json_rpc(&data, buf.head))
                goto error;
 
-       if (strcmp(data.method, "call") != 0) {
-               err = ERROR_METHOD;
-               goto error;
-       }
+       if (!strcmp(data.method, "call")) {
+               if (!data.sid || !data.object || !data.function || !data.data)
+                       goto error;
 
-       ses = uh_ubus_session_get(du->sid);
-       if (!ses) {
-               err = ERROR_SESSION;
-               goto error;
-       }
+               du->func = data.function;
+               if (ubus_lookup_id(ctx, data.object, &du->obj)) {
+                       err = ERROR_OBJECT;
+                       goto error;
+               }
 
-       if (!uh_ubus_session_acl_allowed(ses, data.object, data.function)) {
-               err = ERROR_ACCESS;
-               goto error;
-       }
+               if (!conf.ubus_noauth && !uh_ubus_allowed(data.sid, data.object, data.function)) {
+                       err = ERROR_ACCESS;
+                       goto error;
+               }
 
-       du->func = data.function;
-       if (ubus_lookup_id(ctx, data.object, &du->obj)) {
-               err = ERROR_OBJECT;
+               uh_ubus_send_request(cl, obj, data.sid, data.data);
+               goto out;
+       }
+       else if (!strcmp(data.method, "list")) {
+               uh_ubus_send_list(cl, obj, data.params);
+               goto out;
+       }
+       else {
+               err = ERROR_METHOD;
                goto error;
        }
 
-       uh_ubus_send_request(cl, obj);
-       return;
-
 error:
        uh_ubus_json_error(cl, err);
+out:
+       if (data.params)
+               free(data.params);
+
+       uh_client_unref(cl);
 }
 
 static void __uh_ubus_next_batched_request(struct uloop_timeout *timeout)
@@ -375,9 +540,7 @@ static void uh_ubus_data_done(struct client *cl)
                return uh_ubus_handle_request_object(cl, obj);
        case json_type_array:
                uh_ubus_init_batch(cl);
-               if (json_object_array_length(obj) > 0)
-                       return uh_ubus_next_batched_request(cl);
-               /* fall through */
+               return uh_ubus_next_batched_request(cl);
        default:
                return uh_ubus_single_error(cl, ERROR_PARSE);
        }
@@ -405,21 +568,10 @@ error:
 static void uh_ubus_handle_request(struct client *cl, char *url, struct path_info *pi)
 {
        struct dispatch *d = &cl->dispatch;
-       char *sid, *sep;
 
        blob_buf_init(&buf, 0);
 
-       url += strlen(conf.ubus_prefix);
-       while (*url == '/')
-               url++;
-
-       sep = strchr(url, '/');
-       if (sep)
-               *sep = 0;
-
-       sid = url;
-       if (strlen(sid) != 32 ||
-           cl->request.method != UH_HTTP_MSG_POST)
+       if (cl->request.method != UH_HTTP_MSG_POST)
                return ops->client_error(cl, 400, "Bad Request", "Invalid Request");
 
        d->close_fds = uh_ubus_close_fds;
@@ -427,7 +579,6 @@ static void uh_ubus_handle_request(struct client *cl, char *url, struct path_inf
        d->data_send = uh_ubus_data_send;
        d->data_done = uh_ubus_data_done;
        d->ubus.jstok = json_tokener_new();
-       d->ubus.sid = sid;
 }
 
 static bool
@@ -451,10 +602,6 @@ uh_ubus_init(void)
        }
 
        ops->dispatch_add(&ubus_dispatch);
-       if (ubus_session_api_init(ctx)) {
-               fprintf(stderr, "Unable to initialize ubus session API\n");
-               exit(1);
-       }
 
        uloop_done();
        return 0;