aboutsummaryrefslogtreecommitdiffstats
path: root/src/cJSON.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/cJSON.c')
-rw-r--r--src/cJSON.c1404
1 files changed, 1404 insertions, 0 deletions
diff --git a/src/cJSON.c b/src/cJSON.c
new file mode 100644
index 00000000..cf0cb132
--- /dev/null
+++ b/src/cJSON.c
@@ -0,0 +1,1404 @@
+/* cJSON.c - JSON parser in C.
+ * Copyright (c) 2009 Dave Gamble
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ *
+ * SPDX-License-Identifier: MIT
+ *
+ * Note that this code has been modified from the original code taken
+ * from cjson-code-58.zip.
+ */
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+#include <string.h>
+#include <stdio.h>
+#include <math.h>
+#include <stdlib.h>
+#include <float.h>
+#include <limits.h>
+#include <ctype.h>
+#include <errno.h>
+
+#include "cJSON.h"
+
+/* We use malloc function wrappers from gpgrt (aka libgpg-error). */
+#if 1
+# include <gpgrt.h>
+# define xtrymalloc(a) gpgrt_malloc ((a))
+# define xtrycalloc(a,b) gpgrt_calloc ((a), (b))
+# define xtrystrdup(a) gpgrt_strdup ((a))
+# define xfree(a) gpgrt_free ((a))
+#else
+# define xtrymalloc(a) malloc ((a))
+# define xtrycalloc(a,b) calloc ((a), (b))
+# define xtrystrdup(a) strdup ((a))
+# define xfree(a) free ((a))
+#endif
+
+
+static int
+cJSON_strcasecmp (const char *s1, const char *s2)
+{
+ if (!s1)
+ return (s1 == s2) ? 0 : 1;
+ if (!s2)
+ return 1;
+ for (; tolower (*(const unsigned char *)s1)
+ == tolower (*(const unsigned char *) s2); ++s1, ++s2)
+ if (*s1 == 0)
+ return 0;
+ return tolower (*(const unsigned char *) s1) -
+ tolower (*(const unsigned char *) s2);
+}
+
+/* Internal constructor. */
+static cJSON *
+cJSON_New_Item (void)
+{
+ return xtrycalloc (1, sizeof (cJSON));
+}
+
+/* Delete a cJSON structure. (Does not clobber ERRNO). */
+void
+cJSON_Delete (cJSON * c)
+{
+ cJSON *next;
+ int save_errno;
+
+ if (!c)
+ return;
+
+ save_errno = errno;
+ while (c)
+ {
+ next = c->next;
+ if (!(c->type & cJSON_IsReference) && c->child)
+ cJSON_Delete (c->child);
+ if (!(c->type & cJSON_IsReference) && c->valuestring)
+ xfree (c->valuestring);
+ if (c->string)
+ xfree (c->string);
+ xfree (c);
+ c = next;
+ }
+ errno = save_errno;
+}
+
+/* Parse the input text to generate a number, and populate the result
+ * into item. */
+static const char *
+parse_number (cJSON * item, const char *num)
+{
+ double n = 0, sign = 1, scale = 0;
+ int subscale = 0, signsubscale = 1;
+
+ if (*num == '-')
+ sign = -1, num++; /* Has sign? */
+ if (*num == '0')
+ num++; /* is zero */
+ if (*num >= '1' && *num <= '9')
+ do
+ n = (n * 10.0) + (*num++ - '0');
+ while (*num >= '0' && *num <= '9'); /* Number? */
+ if (*num == '.' && num[1] >= '0' && num[1] <= '9')
+ {
+ num++;
+ do
+ n = (n * 10.0) + (*num++ - '0'), scale--;
+ while (*num >= '0' && *num <= '9');
+ } /* Fractional part? */
+ if (*num == 'e' || *num == 'E') /* Exponent? */
+ {
+ num++;
+ if (*num == '+')
+ num++;
+ else if (*num == '-')
+ signsubscale = -1, num++; /* With sign? */
+ while (*num >= '0' && *num <= '9')
+ subscale = (subscale * 10) + (*num++ - '0'); /* Number? */
+ }
+
+ /* number = +/- number.fraction * 10^+/- exponent */
+ n = sign * n * pow (10.0, (scale + subscale * signsubscale));
+
+ item->valuedouble = n;
+ item->valueint = (int) n;
+ item->type = cJSON_Number;
+ return num;
+}
+
+/* Render the number nicely from the given item into a string. */
+static char *
+print_number (cJSON * item)
+{
+ char *str;
+ double d = item->valuedouble;
+ if (fabs (((double) item->valueint) - d) <= DBL_EPSILON && d <= INT_MAX
+ && d >= INT_MIN)
+ {
+ /* 2^64+1 can be represented in 21 chars. */
+ str = xtrymalloc (21);
+ if (str)
+ sprintf (str, "%d", item->valueint);
+ }
+ else
+ {
+ str = xtrymalloc (64); /* This is a nice tradeoff. */
+ if (str)
+ {
+ if (fabs (floor (d) - d) <= DBL_EPSILON && fabs (d) < 1.0e60)
+ sprintf (str, "%.0f", d);
+ else if (fabs (d) < 1.0e-6 || fabs (d) > 1.0e9)
+ sprintf (str, "%e", d);
+ else
+ sprintf (str, "%f", d);
+ }
+ }
+ return str;
+}
+
+static unsigned
+parse_hex4 (const char *str)
+{
+ unsigned h = 0;
+ if (*str >= '0' && *str <= '9')
+ h += (*str) - '0';
+ else if (*str >= 'A' && *str <= 'F')
+ h += 10 + (*str) - 'A';
+ else if (*str >= 'a' && *str <= 'f')
+ h += 10 + (*str) - 'a';
+ else
+ return 0;
+ h = h << 4;
+ str++;
+ if (*str >= '0' && *str <= '9')
+ h += (*str) - '0';
+ else if (*str >= 'A' && *str <= 'F')
+ h += 10 + (*str) - 'A';
+ else if (*str >= 'a' && *str <= 'f')
+ h += 10 + (*str) - 'a';
+ else
+ return 0;
+ h = h << 4;
+ str++;
+ if (*str >= '0' && *str <= '9')
+ h += (*str) - '0';
+ else if (*str >= 'A' && *str <= 'F')
+ h += 10 + (*str) - 'A';
+ else if (*str >= 'a' && *str <= 'f')
+ h += 10 + (*str) - 'a';
+ else
+ return 0;
+ h = h << 4;
+ str++;
+ if (*str >= '0' && *str <= '9')
+ h += (*str) - '0';
+ else if (*str >= 'A' && *str <= 'F')
+ h += 10 + (*str) - 'A';
+ else if (*str >= 'a' && *str <= 'f')
+ h += 10 + (*str) - 'a';
+ else
+ return 0;
+ return h;
+}
+
+/* Parse the input text into an unescaped cstring, and populate item. */
+static const unsigned char firstByteMark[7] =
+ { 0x00, 0x00, 0xC0, 0xE0, 0xF0, 0xF8, 0xFC };
+static const char *
+parse_string (cJSON * item, const char *str, const char **ep)
+{
+ const char *ptr = str + 1;
+ char *ptr2;
+ char *out;
+ int len = 0;
+ unsigned uc, uc2;
+ if (*str != '\"')
+ {
+ *ep = str;
+ return 0;
+ } /* not a string! */
+
+ while (*ptr != '\"' && *ptr && ++len)
+ if (*ptr++ == '\\')
+ ptr++; /* Skip escaped quotes. */
+
+ out = xtrymalloc (len + 1); /* This is how long we need for the
+ string, roughly. */
+ if (!out)
+ return 0;
+
+ ptr = str + 1;
+ ptr2 = out;
+ while (*ptr != '\"' && *ptr)
+ {
+ if (*ptr != '\\')
+ *ptr2++ = *ptr++;
+ else
+ {
+ ptr++;
+ switch (*ptr)
+ {
+ case 'b':
+ *ptr2++ = '\b';
+ break;
+ case 'f':
+ *ptr2++ = '\f';
+ break;
+ case 'n':
+ *ptr2++ = '\n';
+ break;
+ case 'r':
+ *ptr2++ = '\r';
+ break;
+ case 't':
+ *ptr2++ = '\t';
+ break;
+ case 'u': /* transcode utf16 to utf8. */
+ uc = parse_hex4 (ptr + 1);
+ ptr += 4; /* get the unicode char. */
+
+ if ((uc >= 0xDC00 && uc <= 0xDFFF) || uc == 0)
+ break; /* check for invalid. */
+
+ if (uc >= 0xD800 && uc <= 0xDBFF) /* UTF16 surrogate pairs. */
+ {
+ if (ptr[1] != '\\' || ptr[2] != 'u')
+ break; /* missing second-half of surrogate. */
+ uc2 = parse_hex4 (ptr + 3);
+ ptr += 6;
+ if (uc2 < 0xDC00 || uc2 > 0xDFFF)
+ break; /* invalid second-half of surrogate. */
+ uc = 0x10000 + (((uc & 0x3FF) << 10) | (uc2 & 0x3FF));
+ }
+
+ len = 4;
+ if (uc < 0x80)
+ len = 1;
+ else if (uc < 0x800)
+ len = 2;
+ else if (uc < 0x10000)
+ len = 3;
+ ptr2 += len;
+
+ switch (len)
+ {
+ case 4:
+ *--ptr2 = ((uc | 0x80) & 0xBF);
+ uc >>= 6;
+ case 3:
+ *--ptr2 = ((uc | 0x80) & 0xBF);
+ uc >>= 6;
+ case 2:
+ *--ptr2 = ((uc | 0x80) & 0xBF);
+ uc >>= 6;
+ case 1:
+ *--ptr2 = (uc | firstByteMark[len]);
+ }
+ ptr2 += len;
+ break;
+ default:
+ *ptr2++ = *ptr;
+ break;
+ }
+ ptr++;
+ }
+ }
+ *ptr2 = 0;
+ if (*ptr == '\"')
+ ptr++;
+ item->valuestring = out;
+ item->type = cJSON_String;
+ return ptr;
+}
+
+/* Render the cstring provided to an escaped version that can be printed. */
+static char *
+print_string_ptr (const char *str)
+{
+ const char *ptr;
+ char *ptr2, *out;
+ int len = 0;
+ unsigned char token;
+
+ if (!str)
+ return xtrystrdup ("");
+ ptr = str;
+ while ((token = *ptr) && ++len)
+ {
+ if (strchr ("\"\\\b\f\n\r\t", token))
+ len++;
+ else if (token < 32)
+ len += 5;
+ ptr++;
+ }
+
+ out = xtrymalloc (len + 3);
+ if (!out)
+ return 0;
+
+ ptr2 = out;
+ ptr = str;
+ *ptr2++ = '\"';
+ while (*ptr)
+ {
+ if ((unsigned char) *ptr > 31 && *ptr != '\"' && *ptr != '\\')
+ *ptr2++ = *ptr++;
+ else
+ {
+ *ptr2++ = '\\';
+ switch (token = *ptr++)
+ {
+ case '\\':
+ *ptr2++ = '\\';
+ break;
+ case '\"':
+ *ptr2++ = '\"';
+ break;
+ case '\b':
+ *ptr2++ = 'b';
+ break;
+ case '\f':
+ *ptr2++ = 'f';
+ break;
+ case '\n':
+ *ptr2++ = 'n';
+ break;
+ case '\r':
+ *ptr2++ = 'r';
+ break;
+ case '\t':
+ *ptr2++ = 't';
+ break;
+ default:
+ sprintf (ptr2, "u%04x", token);
+ ptr2 += 5;
+ break; /* escape and print */
+ }
+ }
+ }
+ *ptr2++ = '\"';
+ *ptr2++ = 0;
+ return out;
+}
+
+/* Invote print_string_ptr (which is useful) on an item. */
+static char *
+print_string (cJSON * item)
+{
+ return print_string_ptr (item->valuestring);
+}
+
+/* Predeclare these prototypes. */
+static const char *parse_value (cJSON * item, const char *value,
+ const char **ep);
+static char *print_value (cJSON * item, int depth, int fmt);
+static const char *parse_array (cJSON * item, const char *value,
+ const char **ep);
+static char *print_array (cJSON * item, int depth, int fmt);
+static const char *parse_object (cJSON * item, const char *value,
+ const char **ep);
+static char *print_object (cJSON * item, int depth, int fmt);
+
+/* Utility to jump whitespace and cr/lf */
+static const char *
+skip (const char *in)
+{
+ while (in && *in && (unsigned char) *in <= 32)
+ in++;
+ return in;
+}
+
+/* Parse an object - create a new root, and populate. */
+cJSON *
+cJSON_ParseWithOpts (const char *value, const char **return_parse_end,
+ int require_null_terminated, size_t *r_erroff)
+{
+ const char *end = 0;
+ const char *ep = 0;
+ cJSON *c;
+
+ if (r_erroff)
+ *r_erroff = 0;
+
+ c = cJSON_New_Item ();
+ if (!c)
+ return NULL; /* memory fail */
+
+ end = parse_value (c, skip (value), &ep);
+ if (!end)
+ {
+ cJSON_Delete (c);
+ errno = EINVAL;
+ if (r_erroff)
+ *r_erroff = ep - value;
+ return 0;
+ } /* parse failure. ep is set. */
+
+ /* if we require null-terminated JSON without appended garbage, skip
+ and then check for a null terminator */
+ if (require_null_terminated)
+ {
+ end = skip (end);
+ if (*end)
+ {
+ cJSON_Delete (c);
+ ep = end;
+ errno = EINVAL;
+ if (r_erroff)
+ *r_erroff = ep - value;
+ return 0;
+ }
+ }
+ if (return_parse_end)
+ *return_parse_end = end;
+ return c;
+}
+
+/* Default options for cJSON_Parse */
+cJSON *
+cJSON_Parse (const char *value, size_t *r_erroff)
+{
+ return cJSON_ParseWithOpts (value, 0, 0, r_erroff);
+}
+
+/* Render a cJSON item/entity/structure to text. */
+char *
+cJSON_Print (cJSON * item)
+{
+ return print_value (item, 0, 1);
+}
+
+char *
+cJSON_PrintUnformatted (cJSON * item)
+{
+ return print_value (item, 0, 0);
+}
+
+/* Parser core - when encountering text, process appropriately. */
+static const char *
+parse_value (cJSON * item, const char *value, const char **ep)
+{
+ if (!value)
+ return 0; /* Fail on null. */
+ if (!strncmp (value, "null", 4))
+ {
+ item->type = cJSON_NULL;
+ return value + 4;
+ }
+ if (!strncmp (value, "false", 5))
+ {
+ item->type = cJSON_False;
+ return value + 5;
+ }
+ if (!strncmp (value, "true", 4))
+ {
+ item->type = cJSON_True;
+ item->valueint = 1;
+ return value + 4;
+ }
+ if (*value == '\"')
+ {
+ return parse_string (item, value, ep);
+ }
+ if (*value == '-' || (*value >= '0' && *value <= '9'))
+ {
+ return parse_number (item, value);
+ }
+ if (*value == '[')
+ {
+ return parse_array (item, value, ep);
+ }
+ if (*value == '{')
+ {
+ return parse_object (item, value, ep);
+ }
+
+ *ep = value;
+ return 0; /* failure. */
+}
+
+/* Render a value to text. */
+static char *
+print_value (cJSON * item, int depth, int fmt)
+{
+ char *out = 0;
+ if (!item)
+ return 0;
+ switch ((item->type) & 255)
+ {
+ case cJSON_NULL:
+ out = xtrystrdup ("null");
+ break;
+ case cJSON_False:
+ out = xtrystrdup ("false");
+ break;
+ case cJSON_True:
+ out = xtrystrdup ("true");
+ break;
+ case cJSON_Number:
+ out = print_number (item);
+ break;
+ case cJSON_String:
+ out = print_string (item);
+ break;
+ case cJSON_Array:
+ out = print_array (item, depth, fmt);
+ break;
+ case cJSON_Object:
+ out = print_object (item, depth, fmt);
+ break;
+ }
+ return out;
+}
+
+/* Build an array from input text. */
+static const char *
+parse_array (cJSON * item, const char *value, const char **ep)
+{
+ cJSON *child;
+ if (*value != '[')
+ {
+ *ep = value;
+ return 0;
+ } /* not an array! */
+
+ item->type = cJSON_Array;
+ value = skip (value + 1);
+ if (*value == ']')
+ return value + 1; /* empty array. */
+
+ item->child = child = cJSON_New_Item ();
+ if (!item->child)
+ return 0; /* memory fail */
+ /* skip any spacing, get the value. */
+ value = skip (parse_value (child, skip (value), ep));
+ if (!value)
+ return 0;
+
+ while (*value == ',')
+ {
+ cJSON *new_item;
+ if (!(new_item = cJSON_New_Item ()))
+ return 0; /* memory fail */
+ child->next = new_item;
+ new_item->prev = child;
+ child = new_item;
+ value = skip (parse_value (child, skip (value + 1), ep));
+ if (!value)
+ return 0; /* memory fail */
+ }
+
+ if (*value == ']')
+ return value + 1; /* end of array */
+ *ep = value;
+ return 0; /* malformed. */
+}
+
+/* Render an array to text */
+static char *
+print_array (cJSON * item, int depth, int fmt)
+{
+ char **entries;
+ char *out = 0, *ptr, *ret;
+ int len = 5;
+ cJSON *child = item->child;
+ int numentries = 0, i = 0, fail = 0;
+
+ /* How many entries in the array? */
+ while (child)
+ numentries++, child = child->next;
+ /* Explicitly handle numentries==0 */
+ if (!numentries)
+ {
+ out = xtrymalloc (3);
+ if (out)
+ strcpy (out, "[]");
+ return out;
+ }
+ /* Allocate an array to hold the values for each */
+ entries = xtrymalloc (numentries * sizeof (char *));
+ if (!entries)
+ return 0;
+ memset (entries, 0, numentries * sizeof (char *));
+ /* Retrieve all the results: */
+ child = item->child;
+ while (child && !fail)
+ {
+ ret = print_value (child, depth + 1, fmt);
+ entries[i++] = ret;
+ if (ret)
+ len += strlen (ret) + 2 + (fmt ? 1 : 0);
+ else
+ fail = 1;
+ child = child->next;
+ }
+
+ /* If we didn't fail, try to xtrymalloc the output string */
+ if (!fail)
+ out = xtrymalloc (len);
+ /* If that fails, we fail. */
+ if (!out)
+ fail = 1;
+
+ /* Handle failure. */
+ if (fail)
+ {
+ for (i = 0; i < numentries; i++)
+ if (entries[i])
+ xfree (entries[i]);
+ xfree (entries);
+ return 0;
+ }
+
+ /* Compose the output array. */
+ *out = '[';
+ ptr = out + 1;
+ *ptr = 0;
+ for (i = 0; i < numentries; i++)
+ {
+ strcpy (ptr, entries[i]);
+ ptr += strlen (entries[i]);
+ if (i != numentries - 1)
+ {
+ *ptr++ = ',';
+ if (fmt)
+ *ptr++ = ' ';
+ *ptr = 0;
+ }
+ xfree (entries[i]);
+ }
+ xfree (entries);
+ *ptr++ = ']';
+ *ptr++ = 0;
+ return out;
+}
+
+/* Build an object from the text. */
+static const char *
+parse_object (cJSON * item, const char *value, const char **ep)
+{
+ cJSON *child;
+ if (*value != '{')
+ {
+ *ep = value;
+ return 0;
+ } /* not an object! */
+
+ item->type = cJSON_Object;
+ value = skip (value + 1);
+ if (*value == '}')
+ return value + 1; /* empty array. */
+
+ item->child = child = cJSON_New_Item ();
+ if (!item->child)
+ return 0;
+ value = skip (parse_string (child, skip (value), ep));
+ if (!value)
+ return 0;
+ child->string = child->valuestring;
+ child->valuestring = 0;
+ if (*value != ':')
+ {
+ *ep = value;
+ return 0;
+ } /* fail! */
+ /* skip any spacing, get the value. */
+ value = skip (parse_value (child, skip (value + 1), ep));
+ if (!value)
+ return 0;
+
+ while (*value == ',')
+ {
+ cJSON *new_item;
+ if (!(new_item = cJSON_New_Item ()))
+ return 0; /* memory fail */
+ child->next = new_item;
+ new_item->prev = child;
+ child = new_item;
+ value = skip (parse_string (child, skip (value + 1), ep));
+ if (!value)
+ return 0;
+ child->string = child->valuestring;
+ child->valuestring = 0;
+ if (*value != ':')
+ {
+ *ep = value;
+ return 0;
+ } /* fail! */
+ /* skip any spacing, get the value. */
+ value = skip (parse_value (child, skip (value + 1), ep));
+ if (!value)
+ return 0;
+ }
+
+ if (*value == '}')
+ return value + 1; /* end of array */
+ *ep = value;
+ return 0; /* malformed. */
+}
+
+/* Render an object to text. */
+static char *
+print_object (cJSON * item, int depth, int fmt)
+{
+ char **entries = 0, **names = 0;
+ char *out = 0, *ptr, *ret, *str;
+ int len = 7, i = 0, j;
+ cJSON *child = item->child;
+ int numentries = 0, fail = 0;
+ /* Count the number of entries. */
+ while (child)
+ numentries++, child = child->next;
+ /* Explicitly handle empty object case */
+ if (!numentries)
+ {
+ out = xtrymalloc (fmt ? depth + 4 : 3);
+ if (!out)
+ return 0;
+ ptr = out;
+ *ptr++ = '{';
+ if (fmt)
+ {
+ *ptr++ = '\n';
+ for (i = 0; i < depth - 1; i++)
+ *ptr++ = '\t';
+ }
+ *ptr++ = '}';
+ *ptr++ = 0;
+ return out;
+ }
+ /* Allocate space for the names and the objects */
+ entries = xtrymalloc (numentries * sizeof (char *));
+ if (!entries)
+ return 0;
+ names = xtrymalloc (numentries * sizeof (char *));
+ if (!names)
+ {
+ xfree (entries);
+ return 0;
+ }
+ memset (entries, 0, sizeof (char *) * numentries);
+ memset (names, 0, sizeof (char *) * numentries);
+
+ /* Collect all the results into our arrays: */
+ child = item->child;
+ depth++;
+ if (fmt)
+ len += depth;
+ while (child)
+ {
+ names[i] = str = print_string_ptr (child->string);
+ entries[i++] = ret = print_value (child, depth, fmt);
+ if (str && ret)
+ len += strlen (ret) + strlen (str) + 2 + (fmt ? 2 + depth : 0);
+ else
+ fail = 1;
+ child = child->next;
+ }
+
+ /* Try to allocate the output string */
+ if (!fail)
+ out = xtrymalloc (len);
+ if (!out)
+ fail = 1;
+
+ /* Handle failure */
+ if (fail)
+ {
+ for (i = 0; i < numentries; i++)
+ {
+ if (names[i])
+ xfree (names[i]);
+ if (entries[i])
+ xfree (entries[i]);
+ }
+ xfree (names);
+ xfree (entries);
+ return 0;
+ }
+
+ /* Compose the output: */
+ *out = '{';
+ ptr = out + 1;
+ if (fmt)
+ *ptr++ = '\n';
+ *ptr = 0;
+ for (i = 0; i < numentries; i++)
+ {
+ if (fmt)
+ for (j = 0; j < depth; j++)
+ *ptr++ = '\t';
+ strcpy (ptr, names[i]);
+ ptr += strlen (names[i]);
+ *ptr++ = ':';
+ if (fmt)
+ *ptr++ = '\t';
+ strcpy (ptr, entries[i]);
+ ptr += strlen (entries[i]);
+ if (i != numentries - 1)
+ *ptr++ = ',';
+ if (fmt)
+ *ptr++ = '\n';
+ *ptr = 0;
+ xfree (names[i]);
+ xfree (entries[i]);
+ }
+
+ xfree (names);
+ xfree (entries);
+ if (fmt)
+ for (i = 0; i < depth - 1; i++)
+ *ptr++ = '\t';
+ *ptr++ = '}';
+ *ptr++ = 0;
+ return out;
+}
+
+/* Get Array size/item / object item. */
+int
+cJSON_GetArraySize (cJSON * array)
+{
+ cJSON *c = array->child;
+ int i = 0;
+ while (c)
+ i++, c = c->next;
+ return i;
+}
+
+cJSON *
+cJSON_GetArrayItem (cJSON * array, int item)
+{
+ cJSON *c = array->child;
+ while (c && item > 0)
+ item--, c = c->next;
+ return c;
+}
+
+cJSON *
+cJSON_GetObjectItem (cJSON * object, const char *string)
+{
+ cJSON *c = object->child;
+ while (c && cJSON_strcasecmp (c->string, string))
+ c = c->next;
+ return c;
+}
+
+/* Utility for array list handling. */
+static void
+suffix_object (cJSON * prev, cJSON * item)
+{
+ prev->next = item;
+ item->prev = prev;
+}
+
+/* Utility for handling references. */
+static cJSON *
+create_reference (cJSON * item)
+{
+ cJSON *ref = cJSON_New_Item ();
+ if (!ref)
+ return 0;
+ memcpy (ref, item, sizeof (cJSON));
+ ref->string = 0;
+ ref->type |= cJSON_IsReference;
+ ref->next = ref->prev = 0;
+ return ref;
+}
+
+/* Add item to array/object. */
+void
+cJSON_AddItemToArray (cJSON * array, cJSON * item)
+{
+ cJSON *c = array->child;
+ if (!item)
+ return;
+ if (!c)
+ {
+ array->child = item;
+ }
+ else
+ {
+ while (c && c->next)
+ c = c->next;
+ suffix_object (c, item);
+ }
+}
+
+cJSON *
+cJSON_AddItemToObject (cJSON * object, const char *string, cJSON * item)
+{
+ char *tmp;
+
+ if (!item)
+ return 0;
+ tmp = xtrystrdup (string);
+ if (!tmp)
+ return NULL;
+
+ if (item->string)
+ xfree (item->string);
+ item->string = tmp;
+ cJSON_AddItemToArray (object, item);
+ return object;
+}
+
+cJSON *
+cJSON_AddNullToObject (cJSON *object, const char *name)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateNull ();
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+cJSON *
+cJSON_AddTrueToObject (cJSON *object, const char *name)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateTrue ();
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+cJSON *
+cJSON_AddFalseToObject (cJSON *object, const char *name)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateFalse ();
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+cJSON *
+cJSON_AddBoolToObject (cJSON *object, const char *name, int b)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateBool (b);
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+cJSON *
+cJSON_AddNumberToObject (cJSON *object, const char *name, double num)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateNumber (num);
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+cJSON *
+cJSON_AddStringToObject (cJSON *object, const char *name, const char *string)
+{
+ cJSON *obj, *tmp;
+
+ tmp = cJSON_CreateString (string);
+ if (!tmp)
+ return NULL;
+ obj = cJSON_AddItemToObject(object, name, tmp);
+ if (!obj)
+ cJSON_Delete (tmp);
+ return obj;
+}
+
+void
+cJSON_AddItemReferenceToArray (cJSON * array, cJSON * item)
+{
+ cJSON_AddItemToArray (array, create_reference (item));
+}
+
+void
+cJSON_AddItemReferenceToObject (cJSON * object, const char *string,
+ cJSON * item)
+{
+ cJSON_AddItemToObject (object, string, create_reference (item));
+}
+
+cJSON *
+cJSON_DetachItemFromArray (cJSON * array, int which)
+{
+ cJSON *c = array->child;
+ while (c && which > 0)
+ c = c->next, which--;
+ if (!c)
+ return 0;
+ if (c->prev)
+ c->prev->next = c->next;
+ if (c->next)
+ c->next->prev = c->prev;
+ if (c == array->child)
+ array->child = c->next;
+ c->prev = c->next = 0;
+ return c;
+}
+
+void
+cJSON_DeleteItemFromArray (cJSON * array, int which)
+{
+ cJSON_Delete (cJSON_DetachItemFromArray (array, which));
+}
+
+cJSON *
+cJSON_DetachItemFromObject (cJSON * object, const char *string)
+{
+ int i = 0;
+ cJSON *c = object->child;
+ while (c && cJSON_strcasecmp (c->string, string))
+ i++, c = c->next;
+ if (c)
+ return cJSON_DetachItemFromArray (object, i);
+ return 0;
+}
+
+void
+cJSON_DeleteItemFromObject (cJSON * object, const char *string)
+{
+ cJSON_Delete (cJSON_DetachItemFromObject (object, string));
+}
+
+/* Replace array/object items with new ones. */
+void
+cJSON_ReplaceItemInArray (cJSON * array, int which, cJSON * newitem)
+{
+ cJSON *c = array->child;
+ while (c && which > 0)
+ c = c->next, which--;
+ if (!c)
+ return;
+ newitem->next = c->next;
+ newitem->prev = c->prev;
+ if (newitem->next)
+ newitem->next->prev = newitem;
+ if (c == array->child)
+ array->child = newitem;
+ else
+ newitem->prev->next = newitem;
+ c->next = c->prev = 0;
+ cJSON_Delete (c);
+}
+
+void
+cJSON_ReplaceItemInObject (cJSON * object, const char *string,
+ cJSON * newitem)
+{
+ int i = 0;
+ cJSON *c = object->child;
+ while (c && cJSON_strcasecmp (c->string, string))
+ i++, c = c->next;
+ if (c)
+ {
+ newitem->string = xtrystrdup (string);
+ cJSON_ReplaceItemInArray (object, i, newitem);
+ }
+}
+
+/* Create basic types: */
+cJSON *
+cJSON_CreateNull (void)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = cJSON_NULL;
+ return item;
+}
+
+cJSON *
+cJSON_CreateTrue (void)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = cJSON_True;
+ return item;
+}
+
+cJSON *
+cJSON_CreateFalse (void)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = cJSON_False;
+ return item;
+}
+
+cJSON *
+cJSON_CreateBool (int b)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = b ? cJSON_True : cJSON_False;
+ return item;
+}
+
+cJSON *
+cJSON_CreateNumber (double num)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ {
+ item->type = cJSON_Number;
+ item->valuedouble = num;
+ item->valueint = (int) num;
+ }
+ return item;
+}
+
+cJSON *
+cJSON_CreateString (const char *string)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ {
+ item->type = cJSON_String;
+ item->valuestring = xtrystrdup (string);
+ }
+ return item;
+}
+
+cJSON *
+cJSON_CreateStringConvey (char *string)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ {
+ item->type = cJSON_String;
+ item->valuestring = string;
+ }
+ return item;
+}
+
+cJSON *
+cJSON_CreateArray (void)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = cJSON_Array;
+ return item;
+}
+
+cJSON *
+cJSON_CreateObject (void)
+{
+ cJSON *item = cJSON_New_Item ();
+ if (item)
+ item->type = cJSON_Object;
+ return item;
+}
+
+/* Create Arrays: */
+cJSON *
+cJSON_CreateIntArray (const int *numbers, int count)
+{
+ int i;
+ cJSON *n = 0, *p = 0, *a = cJSON_CreateArray ();
+ for (i = 0; a && i < count; i++)
+ {
+ n = cJSON_CreateNumber (numbers[i]);
+ if (!i)
+ a->child = n;
+ else
+ suffix_object (p, n);
+ p = n;
+ }
+ return a;
+}
+
+cJSON *
+cJSON_CreateFloatArray (const float *numbers, int count)
+{
+ int i;
+ cJSON *n = 0, *p = 0, *a = cJSON_CreateArray ();
+ for (i = 0; a && i < count; i++)
+ {
+ n = cJSON_CreateNumber (numbers[i]);
+ if (!i)
+ a->child = n;
+ else
+ suffix_object (p, n);
+ p = n;
+ }
+ return a;
+}
+
+cJSON *
+cJSON_CreateDoubleArray (const double *numbers, int count)
+{
+ int i;
+ cJSON *n = 0, *p = 0, *a = cJSON_CreateArray ();
+ for (i = 0; a && i < count; i++)
+ {
+ n = cJSON_CreateNumber (numbers[i]);
+ if (!i)
+ a->child = n;
+ else
+ suffix_object (p, n);
+ p = n;
+ }
+ return a;
+}
+
+cJSON *
+cJSON_CreateStringArray (const char **strings, int count)
+{
+ int i;
+ cJSON *n = 0, *p = 0, *a = cJSON_CreateArray ();
+ for (i = 0; a && i < count; i++)
+ {
+ n = cJSON_CreateString (strings[i]);
+ if (!i)
+ a->child = n;
+ else
+ suffix_object (p, n);
+ p = n;
+ }
+ return a;
+}
+
+/* Duplication */
+cJSON *
+cJSON_Duplicate (cJSON * item, int recurse)
+{
+ cJSON *newitem, *cptr, *nptr = 0, *newchild;
+ /* Bail on bad ptr */
+ if (!item)
+ return 0;
+ /* Create new item */
+ newitem = cJSON_New_Item ();
+ if (!newitem)
+ return 0;
+ /* Copy over all vars */
+ newitem->type = item->type & (~cJSON_IsReference), newitem->valueint =
+ item->valueint, newitem->valuedouble = item->valuedouble;
+ if (item->valuestring)
+ {
+ newitem->valuestring = xtrystrdup (item->valuestring);
+ if (!newitem->valuestring)
+ {
+ cJSON_Delete (newitem);
+ return 0;
+ }
+ }
+ if (item->string)
+ {
+ newitem->string = xtrystrdup (item->string);
+ if (!newitem->string)
+ {
+ cJSON_Delete (newitem);
+ return 0;
+ }
+ }
+ /* If non-recursive, then we're done! */
+ if (!recurse)
+ return newitem;
+ /* Walk the ->next chain for the child. */
+ cptr = item->child;
+ while (cptr)
+ {
+ /* Duplicate (with recurse) each item in the ->next chain */
+ newchild = cJSON_Duplicate (cptr, 1);
+ if (!newchild)
+ {
+ cJSON_Delete (newitem);
+ return 0;
+ }
+ if (nptr)
+ {
+ /* If newitem->child already set,
+ * then crosswire ->prev and ->next and move on. */
+ nptr->next = newchild, newchild->prev = nptr;
+ nptr = newchild;
+ }
+ else
+ {
+ /* Set newitem->child and move to it. */
+ newitem->child = newchild;
+ nptr = newchild;
+ }
+ cptr = cptr->next;
+ }
+ return newitem;
+}
+
+void
+cJSON_Minify (char *json)
+{
+ char *into = json;
+ while (*json)
+ {
+ if (*json == ' ')
+ json++;
+ else if (*json == '\t')
+ json++; /* Whitespace characters. */
+ else if (*json == '\r')
+ json++;
+ else if (*json == '\n')
+ json++;
+ else if (*json == '/' && json[1] == '/')
+ while (*json && *json != '\n')
+ json++; /* Double-slash comments, to end of line. */
+ else if (*json == '/' && json[1] == '*')
+ {
+ while (*json && !(*json == '*' && json[1] == '/'))
+ json++;
+ json += 2;
+ } /* Multiline comments. */
+ else if (*json == '\"')
+ {
+ *into++ = *json++;
+ while (*json && *json != '\"')
+ {
+ if (*json == '\\')
+ *into++ = *json++;
+ *into++ = *json++;
+ }
+ *into++ = *json++;
+ } /* String literals, which are \" sensitive. */
+ else
+ *into++ = *json++; /* All other characters. */
+ }
+ *into = 0; /* and null-terminate. */
+}
generated by cgit v1.2.3 (git 2.25.1) at 2025-10-31 04:29:21 +0000