uloop: Fix race condition in SIGCHLD handling
[project/libubox.git] / blobmsg.c
index 742a93b..c2bb717 100644 (file)
--- a/blobmsg.c
+++ b/blobmsg.c
 /*
- * blobmsg - library for generating/parsing structured blob messages
+ * Copyright (C) 2010-2012 Felix Fietkau <nbd@openwrt.org>
  *
- * Copyright (C) 2010 Felix Fietkau <nbd@openwrt.org>
+ * Permission to use, copy, modify, and/or distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
  *
- * 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.
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */
-
 #include "blobmsg.h"
 
-struct strbuf {
-       int len;
-       int pos;
-       char *buf;
+static const int blob_type[__BLOBMSG_TYPE_LAST] = {
+       [BLOBMSG_TYPE_INT8] = BLOB_ATTR_INT8,
+       [BLOBMSG_TYPE_INT16] = BLOB_ATTR_INT16,
+       [BLOBMSG_TYPE_INT32] = BLOB_ATTR_INT32,
+       [BLOBMSG_TYPE_INT64] = BLOB_ATTR_INT64,
+       [BLOBMSG_TYPE_DOUBLE] = BLOB_ATTR_DOUBLE,
+       [BLOBMSG_TYPE_STRING] = BLOB_ATTR_STRING,
+       [BLOBMSG_TYPE_UNSPEC] = BLOB_ATTR_BINARY,
 };
 
-static bool blobmsg_puts(struct strbuf *s, char *c, int len)
+static uint16_t
+blobmsg_namelen(const struct blobmsg_hdr *hdr)
 {
-       if (len <= 0)
-               return true;
-
-       if (s->pos + len >= s->len) {
-               s->len += 16;
-               s->buf = realloc(s->buf, s->len);
-               if (!s->buf)
-                       return false;
-       }
-       memcpy(s->buf + s->pos, c, len);
-       s->pos += len;
-       return true;
+       return be16_to_cpu(hdr->namelen);
 }
 
-static void blobmsg_format_string(struct strbuf *s, char *str)
+bool blobmsg_check_attr(const struct blob_attr *attr, bool name)
 {
-       char *p, *last = str, *end = str + strlen(str);
-       char buf[8] = "\\u00";
+       const struct blobmsg_hdr *hdr;
+       const char *data;
+       int id, len;
 
-       blobmsg_puts(s, "\"", 1);
-       for (p = str; *p; p++) {
-               char escape = '\0';
-               int len;
+       if (blob_len(attr) < sizeof(struct blobmsg_hdr))
+               return false;
 
-               switch(*p) {
-               case '\b':
-                       escape = 'b';
-                       break;
-               case '\n':
-                       escape = 'n';
-                       break;
-               case '\t':
-                       escape = 't';
-                       break;
-               case '\r':
-                       escape = 'r';
-                       break;
-               case '"':
-               case '\\':
-               case '/':
-                       escape = *p;
-                       break;
-               default:
-                       if (*p < ' ')
-                               escape = 'u';
-                       break;
-               }
+       hdr = (void *) attr->data;
+       if (!hdr->namelen && name)
+               return false;
 
-               if (!escape)
-                       continue;
+       if (blobmsg_namelen(hdr) > blob_len(attr) - sizeof(struct blobmsg_hdr))
+               return false;
 
-               if (p > last)
-                       blobmsg_puts(s, last, p - last);
-               last = p + 1;
-               buf[1] = escape;
+       if (hdr->name[blobmsg_namelen(hdr)] != 0)
+               return false;
 
-               if (escape == 'u') {
-                       sprintf(buf + 4, "%02x", (unsigned char) *p);
-                       len = 4;
-               } else {
-                       len = 2;
-               }
-               blobmsg_puts(s, buf, len);
-       }
+       id = blob_id(attr);
+       len = blobmsg_data_len(attr);
+       data = blobmsg_data(attr);
 
-       blobmsg_puts(s, last, end - last);
-       blobmsg_puts(s, "\"", 1);
-}
+       if (id > BLOBMSG_TYPE_LAST)
+               return false;
 
-static void blobmsg_format_json_list(struct strbuf *s, struct blob_attr *attr, int len, bool array);
+       if (!blob_type[id])
+               return true;
 
-static void blobmsg_format_element(struct strbuf *s, struct blob_attr *attr, bool array, bool head)
-{
-       char buf[32];
-       void *data;
-       int len;
+       return blob_check_type(data, len, blob_type[id]);
+}
 
-       if (!array && blobmsg_name(attr)[0]) {
-               blobmsg_format_string(s, blobmsg_name(attr));
-               blobmsg_puts(s, ":", 1);
-       }
-       if (head) {
-               data = blob_data(attr);
-               len = blob_len(attr);
-       } else {
-               data = blobmsg_data(attr);
-               len = blobmsg_data_len(attr);
-       }
+int blobmsg_check_array(const struct blob_attr *attr, int type)
+{
+       struct blob_attr *cur;
+       bool name;
+       int rem;
+       int size = 0;
 
-       switch(blob_id(attr)) {
-       case BLOBMSG_TYPE_INT8:
-               sprintf(buf, "%d", *(uint8_t *)data);
-               break;
-       case BLOBMSG_TYPE_INT16:
-               sprintf(buf, "%d", *(uint16_t *)data);
-               break;
-       case BLOBMSG_TYPE_INT32:
-               sprintf(buf, "%d", *(uint32_t *)data);
-               break;
-       case BLOBMSG_TYPE_INT64:
-               sprintf(buf, "%lld", *(uint64_t *)data);
+       switch (blobmsg_type(attr)) {
+       case BLOBMSG_TYPE_TABLE:
+               name = true;
                break;
-       case BLOBMSG_TYPE_STRING:
-               blobmsg_puts(s, data, strlen(data));
-               return;
        case BLOBMSG_TYPE_ARRAY:
-               blobmsg_format_json_list(s, data, len, true);
-               return;
-       case BLOBMSG_TYPE_TABLE:
-               blobmsg_format_json_list(s, data, len, false);
-               return;
+               name = false;
+               break;
+       default:
+               return -1;
        }
-       blobmsg_puts(s, buf, strlen(buf));
-}
 
-static void blobmsg_format_json_list(struct strbuf *s, struct blob_attr *attr, int len, bool array)
-{
-       struct blob_attr *pos;
-       bool first = true;
-       int rem = len;
+       blobmsg_for_each_attr(cur, attr, rem) {
+               if (type != BLOBMSG_TYPE_UNSPEC && blobmsg_type(cur) != type)
+                       return -1;
 
-       blobmsg_puts(s, (array ? "[ " : "{ "), 2);
-       __blob_for_each_attr(pos, attr, rem) {
-               if (!first)
-                       blobmsg_puts(s, ", ", 2);
+               if (!blobmsg_check_attr(cur, name))
+                       return -1;
 
-               blobmsg_format_element(s, pos, array, false);
-               first = false;
+               size++;
        }
-       blobmsg_puts(s, (array ? " ]" : " }"), 2);
+
+       return size;
 }
 
-char *blobmsg_format_json(struct blob_attr *attr, bool list)
+bool blobmsg_check_attr_list(const struct blob_attr *attr, int type)
 {
-       struct strbuf s;
-
-       s.len = blob_len(attr);
-       s.buf = malloc(s.len);
-       s.pos = 0;
-
-       if (list)
-               blobmsg_format_json_list(&s, blob_data(attr), blob_len(attr), false);
-       else
-               blobmsg_format_element(&s, attr, false, false);
-
-       if (!s.len)
-               return NULL;
-
-       s.buf = realloc(s.buf, s.pos + 1);
-       return s.buf;
+       return blobmsg_check_array(attr, type) >= 0;
 }
 
-bool blobmsg_check_attr(const struct blob_attr *attr, bool name)
+int blobmsg_parse_array(const struct blobmsg_policy *policy, int policy_len,
+                       struct blob_attr **tb, void *data, unsigned int len)
 {
-       const struct blobmsg_hdr *hdr;
+       struct blob_attr *attr;
+       int i = 0;
 
-       if (blob_len(attr) < sizeof(struct blobmsg_hdr))
-               return false;
+       memset(tb, 0, policy_len * sizeof(*tb));
+       __blob_for_each_attr(attr, data, len) {
+               if (policy[i].type != BLOBMSG_TYPE_UNSPEC &&
+                   blob_id(attr) != policy[i].type)
+                       continue;
 
-       hdr = (void *) attr->data;
-       if (!hdr->namelen && name)
-               return false;
+               if (!blobmsg_check_attr(attr, false))
+                       return -1;
 
-       if (hdr->namelen > blob_len(attr) - sizeof(struct blobmsg_hdr))
-               return false;
+               if (tb[i])
+                       continue;
 
-       if (hdr->name[hdr->namelen] != 0)
-               return false;
+               tb[i++] = attr;
+               if (i == policy_len)
+                       break;
+       }
 
-       return true;
+       return 0;
 }
 
+
 int blobmsg_parse(const struct blobmsg_policy *policy, int policy_len,
-                  struct blob_attr **tb, void *data, int len)
+                  struct blob_attr **tb, void *data, unsigned int len)
 {
        struct blobmsg_hdr *hdr;
        struct blob_attr *attr;
@@ -222,14 +153,14 @@ int blobmsg_parse(const struct blobmsg_policy *policy, int policy_len,
                            blob_id(attr) != policy[i].type)
                                continue;
 
-                       if (hdr->namelen != pslen[i])
+                       if (blobmsg_namelen(hdr) != pslen[i])
                                continue;
 
                        if (!blobmsg_check_attr(attr, true))
                                return -1;
 
                        if (tb[i])
-                               return -1;
+                               continue;
 
                        if (strcmp(policy[i].name, (char *) hdr->name) != 0)
                                continue;
@@ -248,6 +179,7 @@ blobmsg_new(struct blob_buf *buf, int type, const char *name, int payload_len, v
        struct blob_attr *attr;
        struct blobmsg_hdr *hdr;
        int attrlen, namelen;
+       char *pad_start, *pad_end;
 
        if (!name)
                name = "";
@@ -258,10 +190,14 @@ blobmsg_new(struct blob_buf *buf, int type, const char *name, int payload_len, v
        if (!attr)
                return NULL;
 
+       attr->id_len |= be32_to_cpu(BLOB_ATTR_EXTENDED);
        hdr = blob_data(attr);
-       hdr->namelen = namelen;
+       hdr->namelen = cpu_to_be16(namelen);
        strcpy((char *) hdr->name, (const char *)name);
-       *data = blobmsg_data(attr);
+       pad_end = *data = blobmsg_data(attr);
+       pad_start = (char *) &hdr->name[namelen];
+       if (pad_start < pad_end)
+               memset(pad_start, 0, pad_end - pad_start);
 
        return attr;
 }
@@ -269,14 +205,14 @@ blobmsg_new(struct blob_buf *buf, int type, const char *name, int payload_len, v
 static inline int
 attr_to_offset(struct blob_buf *buf, struct blob_attr *attr)
 {
-       return (char *)attr - (char *) buf->buf;
+       return (char *)attr - (char *) buf->buf + BLOB_COOKIE;
 }
 
 
 void *
 blobmsg_open_nested(struct blob_buf *buf, const char *name, bool array)
 {
-       struct blob_attr *head = buf->head;
+       struct blob_attr *head;
        int type = array ? BLOBMSG_TYPE_ARRAY : BLOBMSG_TYPE_TABLE;
        unsigned long offset = attr_to_offset(buf, buf->head);
        void *data;
@@ -285,21 +221,103 @@ blobmsg_open_nested(struct blob_buf *buf, const char *name, bool array)
                name = "";
 
        head = blobmsg_new(buf, type, name, 0, &data);
+       if (!head)
+               return NULL;
        blob_set_raw_len(buf->head, blob_pad_len(buf->head) - blobmsg_hdrlen(strlen(name)));
        buf->head = head;
        return (void *)offset;
 }
 
 int
-blobmsg_add_field(struct blob_buf *buf, int type, const char *name,
-                  const void *data, int len)
+blobmsg_vprintf(struct blob_buf *buf, const char *name, const char *format, va_list arg)
+{
+       va_list arg2;
+       char cbuf;
+       char *sbuf;
+       int len, ret;
+
+       va_copy(arg2, arg);
+       len = vsnprintf(&cbuf, sizeof(cbuf), format, arg2);
+       va_end(arg2);
+
+       sbuf = blobmsg_alloc_string_buffer(buf, name, len + 1);
+       if (!sbuf)
+               return -1;
+       ret = vsprintf(sbuf, format, arg);
+       blobmsg_add_string_buffer(buf);
+
+       return ret;
+}
+
+int
+blobmsg_printf(struct blob_buf *buf, const char *name, const char *format, ...)
+{
+       va_list ap;
+       int ret;
+
+       va_start(ap, format);
+       ret = blobmsg_vprintf(buf, name, format, ap);
+       va_end(ap);
+
+       return ret;
+}
+
+void *
+blobmsg_alloc_string_buffer(struct blob_buf *buf, const char *name, unsigned int maxlen)
 {
        struct blob_attr *attr;
        void *data_dest;
 
-       if (type == BLOBMSG_TYPE_ARRAY ||
-           type == BLOBMSG_TYPE_TABLE)
-               return -1;
+       attr = blobmsg_new(buf, BLOBMSG_TYPE_STRING, name, maxlen, &data_dest);
+       if (!attr)
+               return NULL;
+
+       blob_set_raw_len(buf->head, blob_pad_len(buf->head) - blob_pad_len(attr));
+       blob_set_raw_len(attr, blob_raw_len(attr) - maxlen);
+
+       return data_dest;
+}
+
+void *
+blobmsg_realloc_string_buffer(struct blob_buf *buf, unsigned int maxlen)
+{
+       struct blob_attr *attr = blob_next(buf->head);
+       int offset = attr_to_offset(buf, blob_next(buf->head)) + blob_pad_len(attr) - BLOB_COOKIE;
+       int required = maxlen - (buf->buflen - offset);
+
+       if (required <= 0)
+               goto out;
+
+       if (!blob_buf_grow(buf, required))
+               return NULL;
+       attr = blob_next(buf->head);
+
+out:
+       return blobmsg_data(attr);
+}
+
+void
+blobmsg_add_string_buffer(struct blob_buf *buf)
+{
+       struct blob_attr *attr;
+       int len, attrlen;
+
+       attr = blob_next(buf->head);
+       len = strlen(blobmsg_data(attr)) + 1;
+
+       attrlen = blob_raw_len(attr) + len;
+       blob_set_raw_len(attr, attrlen);
+       blob_fill_pad(attr);
+
+       blob_set_raw_len(buf->head, blob_raw_len(buf->head) + blob_pad_len(attr));
+}
+
+int
+blobmsg_add_field(struct blob_buf *buf, int type, const char *name,
+                  const void *data, unsigned int len)
+{
+       struct blob_attr *attr;
+       void *data_dest;
 
        attr = blobmsg_new(buf, type, name, len, &data_dest);
        if (!attr)