diff --git a/Makefile.am b/Makefile.am index 0c55f61b6d..f6d91b9880 100644 --- a/Makefile.am +++ b/Makefile.am @@ -299,6 +299,8 @@ library_include_HEADERS = \ src/include/switch_xml_config.h \ src/include/switch_cpp.h \ src/include/switch_curl.h \ + src/include/switch_cJSON.h \ + src/include/switch_cJSON_Utils.h \ src/include/switch_json.h \ src/include/switch_utf8.h \ src/include/switch_msrp.h \ @@ -379,6 +381,8 @@ libfreeswitch_la_SOURCES = \ src/switch_pcm.c \ src/switch_speex.c \ src/switch_profile.c \ + src/cJSON.c \ + src/cJSON_Utils.c \ src/switch_json.c \ src/switch_curl.c \ src/switch_hashtable.c\ @@ -422,7 +426,7 @@ bin_PROGRAMS = freeswitch fs_cli fs_ivrd tone2wav fs_encode ## fs_cli () ## fs_cli_SOURCES = libs/esl/src/esl.c libs/esl/src/esl_config.c libs/esl/src/esl_event.c \ - libs/esl/src/esl_threadmutex.c libs/esl/fs_cli.c libs/esl/src/esl_json.c libs/esl/src/esl_buffer.c + libs/esl/src/esl_threadmutex.c libs/esl/fs_cli.c libs/esl/src/esl_json.c libs/esl/src/esl_buffer.c libs/esl/src/cJSON.c libs/esl/src/cJSON_Utils.c fs_cli_CFLAGS = $(AM_CFLAGS) -I$(switch_srcdir)/libs/esl/src/include $(LIBEDIT_CFLAGS) fs_cli_LDFLAGS = $(AM_LDFLAGS) -lpthread $(ESL_LDFLAGS) -lm $(LIBEDIT_LIBS) @@ -460,7 +464,7 @@ endif ## fs_ivrd () ## fs_ivrd_SOURCES = libs/esl/src/esl.c libs/esl/src/esl_config.c libs/esl/src/esl_event.c \ - libs/esl/src/esl_threadmutex.c libs/esl/ivrd.c libs/esl/src/esl_json.c libs/esl/src/esl_buffer.c + libs/esl/src/esl_threadmutex.c libs/esl/ivrd.c libs/esl/src/esl_json.c libs/esl/src/esl_buffer.c libs/esl/src/cJSON.c libs/esl/src/cJSON_Utils.c fs_ivrd_CFLAGS = $(AM_CFLAGS) -I$(switch_srcdir)/libs/esl/src/include fs_ivrd_LDFLAGS = $(AM_LDFLAGS) -lpthread $(ESL_LDFLAGS) -lm diff --git a/configure.ac b/configure.ac index 2064ad8b72..7e34024b10 100644 --- a/configure.ac +++ b/configure.ac @@ -496,8 +496,8 @@ if test "x${enable_visibility}" != "xno" ; then )], [AC_MSG_RESULT([yes]) - APR_ADDTO([SWITCH_AM_CFLAGS], [-fvisibility=hidden -DSWITCH_API_VISIBILITY=1 -DHAVE_VISIBILITY=1]) - APR_ADDTO([SWITCH_AM_CXXFLAGS], [-fvisibility=hidden -DSWITCH_API_VISIBILITY=1 -DHAVE_VISIBILITY=1]) + APR_ADDTO([SWITCH_AM_CFLAGS], [-fvisibility=hidden -DSWITCH_API_VISIBILITY=1 -DCJSON_API_VISIBILITY=1 -DHAVE_VISIBILITY=1]) + APR_ADDTO([SWITCH_AM_CXXFLAGS], [-fvisibility=hidden -DSWITCH_API_VISIBILITY=1 -DCJSON_API_VISIBILITY=1 -DHAVE_VISIBILITY=1]) HAVE_VISIBILITY="yes"], [AC_MSG_RESULT([no])] diff --git a/libs/esl/Makefile.am b/libs/esl/Makefile.am index b59c7f24f1..b946712311 100644 --- a/libs/esl/Makefile.am +++ b/libs/esl/Makefile.am @@ -10,7 +10,7 @@ libesl_la_CFLAGS = $(SWITCH_AM_CFLAGS) $(PICKY) $(SYSTEM_CFLAGS) libesl_la_CXXFLAGS = $(SWITCH_AM_CXXFLAGS) libesl_la_CPPFLAGS = -I$(switch_srcdir)/libs/esl/src/include libesl_la_LDFLAGS = -version-info 1:0:0 $(AM_LDFLAGS) -static -no-undefined -L. $(SYSTEM_LDFLAGS) -libesl_la_SOURCES = src/esl.c src/esl_event.c src/esl_threadmutex.c src/esl_config.c src/esl_json.c src/esl_buffer.c +libesl_la_SOURCES = src/esl.c src/esl_event.c src/esl_threadmutex.c src/esl_config.c src/esl_json.c src/esl_buffer.c src/cJSON.c src/cJSON_Utils.c if ENABLE_CPP libesl_la_SOURCES += src/esl_oop.cpp endif diff --git a/libs/esl/src/cJSON.c b/libs/esl/src/cJSON.c new file mode 100644 index 0000000000..7f9ecb3b4c --- /dev/null +++ b/libs/esl/src/cJSON.c @@ -0,0 +1,2152 @@ +/* + 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. +*/ + +/* cJSON */ +/* JSON parser in C. */ + +#include +#include +#include +#include +#include +#include +#include +#include "esl_cJSON.h" + +/* define our own boolean type */ +typedef int cjbool; +#define true ((cjbool)1) +#define false ((cjbool)0) + +static const unsigned char *global_ep = NULL; + +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void) +{ + return (const char*) global_ep; +} + +/* This is a safeguard to prevent copy-pasters from using incompatible C and header files */ +#if (CJSON_VERSION_MAJOR != 1) || (CJSON_VERSION_MINOR != 3) || (CJSON_VERSION_PATCH != 0) + #error cJSON.h and cJSON.c have different versions. Make sure that both have the same. +#endif + +CJSON_PUBLIC(const char*) cJSON_Version(void) +{ + static char version[15]; + sprintf(version, "%i.%i.%i", CJSON_VERSION_MAJOR, CJSON_VERSION_MINOR, CJSON_VERSION_PATCH); + + return version; +} + +/* case insensitive strcmp */ +static int cJSON_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if (*s1 == '\0') + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +typedef struct internal_hooks +{ + void *(*allocate)(size_t size); + void (*deallocate)(void *pointer); + void *(*reallocate)(void *pointer, size_t size); +} internal_hooks; + +static internal_hooks global_hooks = { malloc, free, realloc }; + +static unsigned char* cJSON_strdup(const unsigned char* str, const internal_hooks * const hooks) +{ + size_t len = 0; + unsigned char *copy = NULL; + + if (str == NULL) + { + return NULL; + } + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)hooks->allocate(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks) +{ + if (hooks == NULL) + { + /* Reset hooks */ + global_hooks.allocate = malloc; + global_hooks.deallocate = free; + global_hooks.reallocate = realloc; + return; + } + + global_hooks.allocate = malloc; + if (hooks->malloc_fn != NULL) + { + global_hooks.allocate = hooks->malloc_fn; + } + + global_hooks.deallocate = free; + if (hooks->free_fn != NULL) + { + global_hooks.deallocate = hooks->free_fn; + } + + /* use realloc only if both free and malloc are used */ + global_hooks.reallocate = NULL; + if ((global_hooks.allocate == malloc) && (global_hooks.deallocate == free)) + { + global_hooks.reallocate = realloc; + } +} + +/* Internal constructor. */ +static cJSON *cJSON_New_Item(const internal_hooks * const hooks) +{ + cJSON* node = (cJSON*)hooks->allocate(sizeof(cJSON)); + if (node) + { + memset(node, '\0', sizeof(cJSON)); + } + + return node; +} + +/* Delete a cJSON structure. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c) +{ + cJSON *next = NULL; + while (c) + { + next = c->next; + if (!(c->type & cJSON_IsReference) && c->child) + { + cJSON_Delete(c->child); + } + if (!(c->type & cJSON_IsReference) && c->valuestring) + { + global_hooks.deallocate(c->valuestring); + } + if (!(c->type & cJSON_StringIsConst) && c->string) + { + global_hooks.deallocate(c->string); + } + global_hooks.deallocate(c); + c = next; + } +} + +/* Parse the input text to generate a number, and populate the result into item. */ +static const unsigned char *parse_number(cJSON * const item, const unsigned char * const input) +{ + double number = 0; + unsigned char *after_end = NULL; + + if (input == NULL) + { + return NULL; + } + + number = strtod((const char*)input, (char**)&after_end); + if (input == after_end) + { + return NULL; /* parse_error */ + } + + item->valuedouble = number; + + /* use saturation in case of overflow */ + if (number >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)number; + } + + item->type = cJSON_Number; + + return after_end; +} + +/* don't ask me, but the original cJSON_SetNumberValue returns an integer or double */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number) +{ + if (number >= INT_MAX) + { + object->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + object->valueint = INT_MIN; + } + else + { + object->valueint = cJSON_Number; + } + + return object->valuedouble = number; +} + +typedef struct +{ + unsigned char *buffer; + size_t length; + size_t offset; + cjbool noalloc; +} printbuffer; + +/* realloc printbuffer if necessary to have at least "needed" bytes more */ +static unsigned char* ensure(printbuffer * const p, size_t needed, const internal_hooks * const hooks) +{ + unsigned char *newbuffer = NULL; + size_t newsize = 0; + + if ((p == NULL) || (p->buffer == NULL)) + { + return NULL; + } + + if (needed > INT_MAX) + { + /* sizes bigger than INT_MAX are currently not supported */ + return NULL; + } + + needed += p->offset; + if (needed <= p->length) + { + return p->buffer + p->offset; + } + + if (p->noalloc) { + return NULL; + } + + /* calculate new buffer size */ + newsize = needed * 2; + if (newsize > INT_MAX) + { + /* overflow of int, use INT_MAX if possible */ + if (needed <= INT_MAX) + { + newsize = INT_MAX; + } + else + { + return NULL; + } + } + + if (hooks->reallocate != NULL) + { + /* reallocate with realloc if available */ + newbuffer = (unsigned char*)hooks->reallocate(p->buffer, newsize); + } + else + { + /* otherwise reallocate manually */ + newbuffer = (unsigned char*)hooks->allocate(newsize); + if (!newbuffer) + { + hooks->deallocate(p->buffer); + p->length = 0; + p->buffer = NULL; + + return NULL; + } + if (newbuffer) + { + memcpy(newbuffer, p->buffer, p->offset + 1); + } + hooks->deallocate(p->buffer); + } + p->length = newsize; + p->buffer = newbuffer; + + return newbuffer + p->offset; +} + +/* calculate the new length of the string in a printbuffer and update the offset */ +static void update_offset(printbuffer * const buffer) +{ + const unsigned char *buffer_pointer = NULL; + if ((buffer == NULL) || (buffer->buffer == NULL)) + { + return; + } + buffer_pointer = buffer->buffer + buffer->offset; + + buffer->offset += strlen((const char*)buffer_pointer); +} + +/* Render the number nicely from the given item into a string. */ +static unsigned char *print_number(const cJSON * const item, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output_pointer = NULL; + double d = item->valuedouble; + + if (output_buffer == NULL) + { + return NULL; + } + + /* value is an int */ + if ((fabs(((double)item->valueint) - d) <= DBL_EPSILON) && (d <= INT_MAX) && (d >= INT_MIN)) + { + /* 2^64+1 can be represented in 21 chars. */ + output_pointer = ensure(output_buffer, 21, hooks); + if (output_pointer != NULL) + { + sprintf((char*)output_pointer, "%d", item->valueint); + } + } + /* value is a floating point number */ + else + { + /* This is a nice tradeoff. */ + output_pointer = ensure(output_buffer, 64, hooks); + if (output_pointer != NULL) + { + /* This checks for NaN and Infinity */ + if ((d * 0) != 0) + { + sprintf((char*)output_pointer, "null"); + } + else if ((fabs(floor(d) - d) <= DBL_EPSILON) && (fabs(d) < 1.0e60)) + { + sprintf((char*)output_pointer, "%.0f", d); + } + else if ((fabs(d) < 1.0e-6) || (fabs(d) > 1.0e9)) + { + sprintf((char*)output_pointer, "%e", d); + } + else + { + sprintf((char*)output_pointer, "%f", d); + } + } + } + + return output_pointer; +} + +/* parse 4 digit hexadecimal number */ +static unsigned parse_hex4(const unsigned char * const input) +{ + unsigned int h = 0; + size_t i = 0; + + for (i = 0; i < 4; i++) + { + /* parse digit */ + if ((input[i] >= '0') && (input[i] <= '9')) + { + h += (unsigned int) input[i] - '0'; + } + else if ((input[i] >= 'A') && (input[i] <= 'F')) + { + h += (unsigned int) 10 + input[i] - 'A'; + } + else if ((input[i] >= 'a') && (input[i] <= 'f')) + { + h += (unsigned int) 10 + input[i] - 'a'; + } + else /* invalid */ + { + return 0; + } + + if (i < 3) + { + /* shift left to make place for the next nibble */ + h = h << 4; + } + } + + return h; +} + +/* converts a UTF-16 literal to UTF-8 + * A literal can be one or two sequences of the form \uXXXX */ +static unsigned char utf16_literal_to_utf8(const unsigned char * const input_pointer, const unsigned char * const input_end, unsigned char **output_pointer, const unsigned char **error_pointer) +{ + /* first bytes of UTF8 encoding for a given length in bytes */ + static const unsigned char firstByteMark[5] = + { + 0x00, /* should never happen */ + 0x00, /* 0xxxxxxx */ + 0xC0, /* 110xxxxx */ + 0xE0, /* 1110xxxx */ + 0xF0 /* 11110xxx */ + }; + + long unsigned int codepoint = 0; + unsigned int first_code = 0; + const unsigned char *first_sequence = input_pointer; + unsigned char utf8_length = 0; + unsigned char sequence_length = 0; + + if ((input_end - first_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the first utf16 sequence */ + first_code = parse_hex4(first_sequence + 2); + + /* check that the code is valid */ + if (((first_code >= 0xDC00) && (first_code <= 0xDFFF)) || (first_code == 0)) + { + *error_pointer = first_sequence; + goto fail; + } + + /* UTF16 surrogate pair */ + if ((first_code >= 0xD800) && (first_code <= 0xDBFF)) + { + const unsigned char *second_sequence = first_sequence + 6; + unsigned int second_code = 0; + sequence_length = 12; /* \uXXXX\uXXXX */ + + if ((input_end - second_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + if ((second_sequence[0] != '\\') || (second_sequence[1] != 'u')) + { + /* missing second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the second utf16 sequence */ + second_code = parse_hex4(second_sequence + 2); + /* check that the code is valid */ + if ((second_code < 0xDC00) || (second_code > 0xDFFF)) + { + /* invalid second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + + /* calculate the unicode codepoint from the surrogate pair */ + codepoint = 0x10000 + (((first_code & 0x3FF) << 10) | (second_code & 0x3FF)); + } + else + { + sequence_length = 6; /* \uXXXX */ + codepoint = first_code; + } + + /* encode as UTF-8 + * takes at maximum 4 bytes to encode: + * 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */ + if (codepoint < 0x80) + { + /* normal ascii, encoding 0xxxxxxx */ + utf8_length = 1; + } + else if (codepoint < 0x800) + { + /* two bytes, encoding 110xxxxx 10xxxxxx */ + utf8_length = 2; + } + else if (codepoint < 0x10000) + { + /* three bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx */ + utf8_length = 3; + } + else if (codepoint <= 0x10FFFF) + { + /* four bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx 10xxxxxx */ + utf8_length = 4; + } + else + { + /* invalid unicode codepoint */ + *error_pointer = first_sequence; + goto fail; + } + + /* encode as utf8 */ + switch (utf8_length) + { + case 4: + /* 10xxxxxx */ + (*output_pointer)[3] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 3: + /* 10xxxxxx */ + (*output_pointer)[2] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 2: + (*output_pointer)[1] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 1: + /* depending on the length in bytes this determines the + encoding of the first UTF8 byte */ + (*output_pointer)[0] = (unsigned char)((codepoint | firstByteMark[utf8_length]) & 0xFF); + break; + default: + *error_pointer = first_sequence; + goto fail; + } + *output_pointer += utf8_length; + + return sequence_length; + +fail: + return 0; +} + +/* Parse the input text into an unescaped cinput, and populate item. */ +static const unsigned char *parse_string(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = input + 1; + const unsigned char *input_end = input + 1; + unsigned char *output_pointer = NULL; + unsigned char *output = NULL; + + /* not a string */ + if (*input != '\"') + { + *error_pointer = input; + goto fail; + } + + { + /* calculate approximate size of the output (overestimate) */ + size_t allocation_length = 0; + size_t skipped_bytes = 0; + while ((*input_end != '\"') && (*input_end != '\0')) + { + /* is escape sequence */ + if (input_end[0] == '\\') + { + if (input_end[1] == '\0') + { + /* prevent buffer overflow when last input character is a backslash */ + goto fail; + } + skipped_bytes++; + input_end++; + } + input_end++; + } + if (*input_end == '\0') + { + goto fail; /* string ended unexpectedly */ + } + + /* This is at most how much we need for the output */ + allocation_length = (size_t) (input_end - input) - skipped_bytes; + output = (unsigned char*)hooks->allocate(allocation_length + sizeof('\0')); + if (output == NULL) + { + goto fail; /* allocation failure */ + } + } + + output_pointer = output; + /* loop through the string literal */ + while (input_pointer < input_end) + { + if (*input_pointer != '\\') + { + *output_pointer++ = *input_pointer++; + } + /* escape sequence */ + else + { + unsigned char sequence_length = 2; + switch (input_pointer[1]) + { + case 'b': + *output_pointer++ = '\b'; + break; + case 'f': + *output_pointer++ = '\f'; + break; + case 'n': + *output_pointer++ = '\n'; + break; + case 'r': + *output_pointer++ = '\r'; + break; + case 't': + *output_pointer++ = '\t'; + break; + case '\"': + case '\\': + case '/': + *output_pointer++ = input_pointer[1]; + break; + + /* UTF-16 literal */ + case 'u': + sequence_length = utf16_literal_to_utf8(input_pointer, input_end, &output_pointer, error_pointer); + if (sequence_length == 0) + { + /* failed to convert UTF16-literal to UTF-8 */ + goto fail; + } + break; + + default: + *error_pointer = input_pointer; + goto fail; + } + input_pointer += sequence_length; + } + } + + /* zero terminate the output */ + *output_pointer = '\0'; + + item->type = cJSON_String; + item->valuestring = (char*)output; + + return input_end + 1; + +fail: + if (output != NULL) + { + hooks->deallocate(output); + } + + return NULL; +} + +/* Render the cstring provided to an escaped version that can be printed. */ +static unsigned char *print_string_ptr(const unsigned char * const input, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = NULL; + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t output_length = 0; + /* numbers of additional characters needed for escaping */ + size_t escape_characters = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* empty string */ + if (input == NULL) + { + output = ensure(output_buffer, sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + strcpy((char*)output, "\"\""); + + return output; + } + + /* set "flag" to 1 if something needs to be escaped */ + for (input_pointer = input; *input_pointer; input_pointer++) + { + if (strchr("\"\\\b\f\n\r\t", *input_pointer)) + { + /* one character escape sequence */ + escape_characters++; + } + else if (*input_pointer < 32) + { + /* UTF-16 escape sequence uXXXX */ + escape_characters += 5; + } + } + output_length = (size_t)(input_pointer - input) + escape_characters; + + output = ensure(output_buffer, output_length + sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + + /* no characters have to be escaped */ + if (escape_characters == 0) + { + output[0] = '\"'; + memcpy(output + 1, input, output_length); + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; + } + + output[0] = '\"'; + output_pointer = output + 1; + /* copy the string */ + for (input_pointer = input; *input_pointer != '\0'; input_pointer++, output_pointer++) + { + if ((*input_pointer > 31) && (*input_pointer != '\"') && (*input_pointer != '\\')) + { + /* normal character, copy */ + *output_pointer = *input_pointer; + } + else + { + /* character needs to be escaped */ + *output_pointer++ = '\\'; + switch (*input_pointer) + { + case '\\': + *output_pointer = '\\'; + break; + case '\"': + *output_pointer = '\"'; + break; + case '\b': + *output_pointer = 'b'; + break; + case '\f': + *output_pointer = 'f'; + break; + case '\n': + *output_pointer = 'n'; + break; + case '\r': + *output_pointer = 'r'; + break; + case '\t': + *output_pointer = 't'; + break; + default: + /* escape and print as unicode codepoint */ + sprintf((char*)output_pointer, "u%04x", *input_pointer); + output_pointer += 4; + break; + } + } + } + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; +} + +/* Invoke print_string_ptr (which is useful) on an item. */ +static unsigned char *print_string(const cJSON * const item, printbuffer * const p, const internal_hooks * const hooks) +{ + return print_string_ptr((unsigned char*)item->valuestring, p, hooks); +} + +/* Predeclare these prototypes. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); + +/* Utility to jump whitespace and cr/lf */ +static const unsigned char *skip_whitespace(const unsigned char *in) +{ + while (in && *in && (*in <= 32)) + { + in++; + } + + return in; +} + +/* Parse an object - create a new root, and populate. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, cjbool require_null_terminated) +{ + const unsigned char *end = NULL; + /* use global error pointer if no specific one was given */ + const unsigned char **ep = return_parse_end ? (const unsigned char**)return_parse_end : &global_ep; + cJSON *c = cJSON_New_Item(&global_hooks); + *ep = NULL; + if (!c) /* memory fail */ + { + return NULL; + } + + end = parse_value(c, skip_whitespace((const unsigned char*)value), ep, &global_hooks); + if (!end) + { + /* parse failure. ep is set. */ + cJSON_Delete(c); + return NULL; + } + + /* if we require null-terminated JSON without appended garbage, skip and then check for a null terminator */ + if (require_null_terminated) + { + end = skip_whitespace(end); + if (*end) + { + cJSON_Delete(c); + *ep = end; + return NULL; + } + } + if (return_parse_end) + { + *return_parse_end = (const char*)end; + } + + return c; +} + +/* Default options for cJSON_Parse */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value) +{ + return cJSON_ParseWithOpts(value, 0, 0); +} + +#define min(a, b) ((a < b) ? a : b) + +static unsigned char *print(const cJSON * const item, cjbool format, const internal_hooks * const hooks) +{ + printbuffer buffer[1]; + unsigned char *printed = NULL; + + memset(buffer, 0, sizeof(buffer)); + + /* create buffer */ + buffer->buffer = (unsigned char*) hooks->allocate(256); + if (buffer->buffer == NULL) + { + goto fail; + } + + /* print the value */ + if (print_value(item, 0, format, buffer, hooks) == NULL) + { + goto fail; + } + update_offset(buffer); + + /* copy the buffer over to a new one */ + printed = (unsigned char*) hooks->allocate(buffer->offset + 1); + if (printed == NULL) + { + goto fail; + } + strncpy((char*)printed, (char*)buffer->buffer, min(buffer->length, buffer->offset + 1)); + printed[buffer->offset] = '\0'; /* just to be sure */ + + /* free the buffer */ + hooks->deallocate(buffer->buffer); + + return printed; + +fail: + if (buffer->buffer != NULL) + { + hooks->deallocate(buffer->buffer); + } + + if (printed != NULL) + { + hooks->deallocate(printed); + } + + return NULL; +} + +/* Render a cJSON item/entity/structure to text. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item) +{ + return (char*)print(item, true, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item) +{ + return (char*)print(item, false, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, cjbool fmt) +{ + printbuffer p; + + if (prebuffer < 0) + { + return NULL; + } + + p.buffer = (unsigned char*)global_hooks.allocate((size_t)prebuffer); + if (!p.buffer) + { + return NULL; + } + + p.length = (size_t)prebuffer; + p.offset = 0; + p.noalloc = false; + + return (char*)print_value(item, 0, fmt, &p, &global_hooks); +} + +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const cjbool fmt) +{ + printbuffer p; + + if (len < 0) + { + return false; + } + + p.buffer = (unsigned char*)buf; + p.length = (size_t)len; + p.offset = 0; + p.noalloc = true; + return print_value(item, 0, fmt, &p, &global_hooks) != NULL; +} + +/* Parser core - when encountering text, process appropriately. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + if (input == NULL) + { + return NULL; /* no input */ + } + + /* parse the different types of values */ + /* null */ + if (!strncmp((const char*)input, "null", 4)) + { + item->type = cJSON_NULL; + return input + 4; + } + /* false */ + if (!strncmp((const char*)input, "false", 5)) + { + item->type = cJSON_False; + return input + 5; + } + /* true */ + if (!strncmp((const char*)input, "true", 4)) + { + item->type = cJSON_True; + item->valueint = 1; + return input + 4; + } + /* string */ + if (*input == '\"') + { + return parse_string(item, input, error_pointer, hooks); + } + /* number */ + if ((*input == '-') || ((*input >= '0') && (*input <= '9'))) + { + return parse_number(item, input); + } + /* array */ + if (*input == '[') + { + return parse_array(item, input, error_pointer, hooks); + } + /* object */ + if (*input == '{') + { + return parse_object(item, input, error_pointer, hooks); + } + + /* failure. */ + *error_pointer = input; + return NULL; +} + +/* Render a value to text. */ +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + + if ((item == NULL) || (output_buffer == NULL)) + { + return NULL; + } + + switch ((item->type) & 0xFF) + { + case cJSON_NULL: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "null"); + } + break; + case cJSON_False: + output = ensure(output_buffer, 6, hooks); + if (output != NULL) + { + strcpy((char*)output, "false"); + } + break; + case cJSON_True: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "true"); + } + break; + case cJSON_Number: + output = print_number(item, output_buffer, hooks); + break; + case cJSON_Raw: + { + size_t raw_length = 0; + if (item->valuestring == NULL) + { + if (!output_buffer->noalloc) + { + hooks->deallocate(output_buffer->buffer); + } + output = NULL; + break; + } + + raw_length = strlen(item->valuestring) + sizeof('\0'); + output = ensure(output_buffer, raw_length, hooks); + if (output != NULL) + { + memcpy(output, item->valuestring, raw_length); + } + break; + } + case cJSON_String: + output = print_string(item, output_buffer, hooks); + break; + case cJSON_Array: + output = print_array(item, depth, format, output_buffer, hooks); + break; + case cJSON_Object: + output = print_object(item, depth, format, output_buffer, hooks); + break; + default: + output = NULL; + break; + } + + return output; +} + +/* Build an array from input text. */ +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* head of the linked list */ + cJSON *current_item = NULL; + + if (*input != '[') + { + /* not an array */ + *error_pointer = input; + goto fail; + } + + input = skip_whitespace(input + 1); + if (*input == ']') + { + /* empty array */ + goto success; + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse next value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != ']') + { + *error_pointer = input; + goto fail; /* expected end of array */ + } + +success: + item->type = cJSON_Array; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an array to text */ +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + cJSON *current_element = item->child; + size_t output_offset = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output array. */ + /* opening square bracket */ + output_offset = output_buffer->offset; + output_pointer = ensure(output_buffer, 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer = '['; + output_buffer->offset++; + + while (current_element != NULL) + { + if (print_value(current_element, depth + 1, format, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + if (current_element->next) + { + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ','; + if(format) + { + *output_pointer++ = ' '; + } + *output_pointer = '\0'; + output_buffer->offset += length; + } + current_element = current_element->next; + } + + output_pointer = ensure(output_buffer, 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ']'; + *output_pointer = '\0'; + output = output_buffer->buffer + output_offset; + + return output; +} + +/* Build an object from the text. */ +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* linked list head */ + cJSON *current_item = NULL; + + if (*input != '{') + { + *error_pointer = input; + goto fail; /* not an object */ + } + + input = skip_whitespace(input + 1); + if (*input == '}') + { + goto success; /* empty object */ + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse the name of the child */ + input = skip_whitespace(input + 1); + input = parse_string(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* faile to parse name */ + } + + /* swap valuestring and string, because we parsed the name */ + current_item->string = current_item->valuestring; + current_item->valuestring = NULL; + + if (*input != ':') + { + *error_pointer = input; + goto fail; /* invalid object */ + } + + /* parse the value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != '}') + { + *error_pointer = input; + goto fail; /* expected end of object */ + } + +success: + item->type = cJSON_Object; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an object to text. */ +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + size_t output_offset = 0; + cJSON *current_item = item->child; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output: */ + output_offset = output_buffer->offset; + length = format ? 2 : 1; /* fmt: {\n */ + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer++ = '{'; + if (format) + { + *output_pointer++ = '\n'; + } + output_buffer->offset += length; + + while (current_item) + { + if (format) + { + size_t i; + output_pointer = ensure(output_buffer, depth + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + for (i = 0; i < depth + 1; i++) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += depth + 1; + } + + /* print key */ + if (print_string_ptr((unsigned char*)current_item->string, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ':'; + if (format) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += length; + + /* print value */ + if (!print_value(current_item, depth + 1, format, output_buffer, hooks)) + { + return NULL; + } + update_offset(output_buffer); + + /* print comma if not last */ + length = (size_t) (format ? 1 : 0) + (current_item->next ? 1 : 0); + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (current_item->next) + { + *output_pointer++ = ','; + } + + if (format) + { + *output_pointer++ = '\n'; + } + *output_pointer = '\0'; + output_buffer->offset += length; + + current_item = current_item->next; + } + + output_pointer = ensure(output_buffer, format ? (depth + 2) : 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (format) + { + size_t i; + for (i = 0; i < (depth); i++) + { + *output_pointer++ = '\t'; + } + } + *output_pointer++ = '}'; + *output_pointer = '\0'; + output = (output_buffer->buffer) + output_offset; + + return output; +} + +/* Get Array size/item / object item. */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array) +{ + cJSON *c = array->child; + size_t i = 0; + while(c) + { + i++; + c = c->next; + } + + /* FIXME: Can overflow here. Cannot be fixed without breaking the API */ + + return (int)i; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item) +{ + cJSON *c = array ? array->child : NULL; + while (c && item > 0) + { + item--; + c = c->next; + } + + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string) +{ + cJSON *c = object ? object->child : NULL; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + c = c->next; + } + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON * const object, const char * const string) +{ + cJSON *current_element = NULL; + + if ((object == NULL) || (string == NULL)) + { + return NULL; + } + + current_element = object->child; + while ((current_element != NULL) && (strcmp(string, current_element->string) != 0)) + { + current_element = current_element->next; + } + + return current_element; +} + +CJSON_PUBLIC(cjbool) cJSON_HasObjectItem(const cJSON *object, const char *string) +{ + return cJSON_GetObjectItem(object, string) ? 1 : 0; +} + +/* 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(const cJSON *item, const internal_hooks * const hooks) +{ + cJSON *ref = cJSON_New_Item(hooks); + if (!ref) + { + return NULL; + } + memcpy(ref, item, sizeof(cJSON)); + ref->string = NULL; + ref->type |= cJSON_IsReference; + ref->next = ref->prev = NULL; + return ref; +} + +/* Add item to array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item) +{ + cJSON *child = NULL; + + if ((item == NULL) || (array == NULL)) + { + return; + } + + child = array->child; + + if (child == NULL) + { + /* list is empty, start new one */ + array->child = item; + } + else + { + /* append to the end */ + while (child->next) + { + child = child->next; + } + suffix_object(child, item); + } +} + +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item) +{ + /* call cJSON_AddItemToObjectCS for code reuse */ + cJSON_AddItemToObjectCS(object, (char*)cJSON_strdup((const unsigned char*)string, &global_hooks), item); + /* remove cJSON_StringIsConst flag */ + item->type &= ~cJSON_StringIsConst; +} + +/* Add an item to an object with constant string as key */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item) +{ + if (!item) + { + return; + } + if (!(item->type & cJSON_StringIsConst) && item->string) + { + global_hooks.deallocate(item->string); + } +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wcast-qual" + item->string = (char*)string; +#pragma GCC diagnostic pop + item->type |= cJSON_StringIsConst; + cJSON_AddItemToArray(object, item); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) +{ + cJSON_AddItemToArray(array, create_reference(item, &global_hooks)); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item) +{ + cJSON_AddItemToObject(object, string, create_reference(item, &global_hooks)); +} + +static cJSON *DetachItemFromArray(cJSON *array, size_t which) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + /* item doesn't exist */ + return NULL; + } + if (c->prev) + { + /* not the first element */ + c->prev->next = c->next; + } + if (c->next) + { + c->next->prev = c->prev; + } + if (c==array->child) + { + array->child = c->next; + } + /* make sure the detached item doesn't point anywhere anymore */ + c->prev = c->next = NULL; + + return c; +} +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which) +{ + if (which < 0) + { + return NULL; + } + + return DetachItemFromArray(array, (size_t)which); +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which) +{ + cJSON_Delete(cJSON_DetachItemFromArray(array, which)); +} + +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string) +{ + size_t i = 0; + cJSON *c = object->child; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if (c) + { + return DetachItemFromArray(object, i); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string) +{ + cJSON_Delete(cJSON_DetachItemFromObject(object, string)); +} + +/* Replace array/object items with new ones. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + cJSON_AddItemToArray(array, newitem); + return; + } + newitem->next = c; + newitem->prev = c->prev; + c->prev = newitem; + if (c == array->child) + { + array->child = newitem; + } + else + { + newitem->prev->next = newitem; + } +} + +static void ReplaceItemInArray(cJSON *array, size_t 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 = NULL; + cJSON_Delete(c); +} +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem) +{ + if (which < 0) + { + return; + } + + ReplaceItemInArray(array, (size_t)which, newitem); +} + +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object, const char *string, cJSON *newitem) +{ + size_t i = 0; + cJSON *c = object->child; + while(c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if(c) + { + /* free the old string if not const */ + if (!(newitem->type & cJSON_StringIsConst) && newitem->string) + { + global_hooks.deallocate(newitem->string); + } + + newitem->string = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + ReplaceItemInArray(object, i, newitem); + } +} + +/* Create basic types: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_NULL; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_True; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(cjbool b) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = b ? cJSON_True : cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Number; + item->valuedouble = num; + + /* use saturation in case of overflow */ + if (num >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (num <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)num; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_String; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Raw; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)raw, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type=cJSON_Array; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if (item) + { + item->type = cJSON_Object; + } + + return item; +} + +/* Create Arrays: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if (!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0;a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for (i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateString(strings[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p,n); + } + p = n; + } + + return a; +} + +/* Duplication */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, cjbool recurse) +{ + cJSON *newitem = NULL; + cJSON *child = NULL; + cJSON *next = NULL; + cJSON *newchild = NULL; + + /* Bail on bad ptr */ + if (!item) + { + goto fail; + } + /* Create new item */ + newitem = cJSON_New_Item(&global_hooks); + if (!newitem) + { + goto fail; + } + /* Copy over all vars */ + newitem->type = item->type & (~cJSON_IsReference); + newitem->valueint = item->valueint; + newitem->valuedouble = item->valuedouble; + if (item->valuestring) + { + newitem->valuestring = (char*)cJSON_strdup((unsigned char*)item->valuestring, &global_hooks); + if (!newitem->valuestring) + { + goto fail; + } + } + if (item->string) + { + newitem->string = (item->type&cJSON_StringIsConst) ? item->string : (char*)cJSON_strdup((unsigned char*)item->string, &global_hooks); + if (!newitem->string) + { + goto fail; + } + } + /* If non-recursive, then we're done! */ + if (!recurse) + { + return newitem; + } + /* Walk the ->next chain for the child. */ + child = item->child; + while (child != NULL) + { + newchild = cJSON_Duplicate(child, true); /* Duplicate (with recurse) each item in the ->next chain */ + if (!newchild) + { + goto fail; + } + if (next != NULL) + { + /* If newitem->child already set, then crosswire ->prev and ->next and move on */ + next->next = newchild; + newchild->prev = next; + next = newchild; + } + else + { + /* Set newitem->child and move to it */ + newitem->child = newchild; + next = newchild; + } + child = child->next; + } + + return newitem; + +fail: + if (newitem != NULL) + { + cJSON_Delete(newitem); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_Minify(char *json) +{ + unsigned char *into = (unsigned char*)json; + while (*json) + { + if (*json == ' ') + { + json++; + } + else if (*json == '\t') + { + /* Whitespace characters. */ + json++; + } + else if (*json == '\r') + { + json++; + } + else if (*json=='\n') + { + json++; + } + else if ((*json == '/') && (json[1] == '/')) + { + /* double-slash comments, to end of line. */ + while (*json && (*json != '\n')) + { + json++; + } + } + else if ((*json == '/') && (json[1] == '*')) + { + /* multiline comments. */ + while (*json && !((*json == '*') && (json[1] == '/'))) + { + json++; + } + json += 2; + } + else if (*json == '\"') + { + /* string literals, which are \" sensitive. */ + *into++ = (unsigned char)*json++; + while (*json && (*json != '\"')) + { + if (*json == '\\') + { + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + else + { + /* All other characters. */ + *into++ = (unsigned char)*json++; + } + } + + /* and null-terminate. */ + *into = '\0'; +} diff --git a/libs/esl/src/cJSON_Utils.c b/libs/esl/src/cJSON_Utils.c new file mode 100644 index 0000000000..0a9fabd1be --- /dev/null +++ b/libs/esl/src/cJSON_Utils.c @@ -0,0 +1,881 @@ +#include +#include +#include +#include +#include + +#include "esl_cJSON_Utils.h" + +static unsigned char* cJSONUtils_strdup(const unsigned char* str) +{ + size_t len = 0; + unsigned char *copy = NULL; + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)malloc(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +static int cJSONUtils_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if(*s1 == 0) + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +/* JSON Pointer implementation: */ +static int cJSONUtils_Pstrcasecmp(const unsigned char *a, const unsigned char *e) +{ + if (!a || !e) + { + return (a == e) ? 0 : 1; /* both NULL? */ + } + for (; *a && *e && (*e != '/'); a++, e++) /* compare until next '/' */ + { + if (*e == '~') + { + /* check for escaped '~' (~0) and '/' (~1) */ + if (!((e[1] == '0') && (*a == '~')) && !((e[1] == '1') && (*a == '/'))) + { + /* invalid escape sequence or wrong character in *a */ + return 1; + } + else + { + e++; + } + } + else if (tolower(*a) != tolower(*e)) + { + return 1; + } + } + if (((*e != 0) && (*e != '/')) != (*a != 0)) + { + /* one string has ended, the other not */ + return 1; + } + + return 0; +} + +static size_t cJSONUtils_PointerEncodedstrlen(const unsigned char *s) +{ + size_t l = 0; + for (; *s; s++, l++) + { + if ((*s == '~') || (*s == '/')) + { + l++; + } + } + + return l; +} + +static void cJSONUtils_PointerEncodedstrcpy(unsigned char *d, const unsigned char *s) +{ + for (; *s; s++) + { + if (*s == '/') + { + *d++ = '~'; + *d++ = '1'; + } + else if (*s == '~') + { + *d++ = '~'; + *d++ = '0'; + } + else + { + *d++ = *s; + } + } + + *d = '\0'; +} + +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target) +{ + int type = object->type; + size_t c = 0; + cJSON *obj = 0; + + if (object == target) + { + /* found */ + return (char*)cJSONUtils_strdup((const unsigned char*)""); + } + + /* recursively search all children of the object */ + for (obj = object->child; obj; obj = obj->next, c++) + { + unsigned char *found = (unsigned char*)cJSONUtils_FindPointerFromObjectTo(obj, target); + if (found) + { + if ((type & 0xFF) == cJSON_Array) + { + /* reserve enough memory for a 64 bit integer + '/' and '\0' */ + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + 23); + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(found); + return NULL; + } + sprintf((char*)ret, "/%lu%s", (unsigned long)c, found); /* / */ + free(found); + + return (char*)ret; + } + else if ((type & 0xFF) == cJSON_Object) + { + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + cJSONUtils_PointerEncodedstrlen((unsigned char*)obj->string) + 2); + *ret = '/'; + cJSONUtils_PointerEncodedstrcpy(ret + 1, (unsigned char*)obj->string); + strcat((char*)ret, (char*)found); + free(found); + + return (char*)ret; + } + + /* reached leaf of the tree, found nothing */ + free(found); + return NULL; + } + } + + /* not found */ + return NULL; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer) +{ + /* follow path of the pointer */ + while ((*pointer++ == '/') && object) + { + if ((object->type & 0xFF) == cJSON_Array) + { + size_t which = 0; + /* parse array index */ + while ((*pointer >= '0') && (*pointer <= '9')) + { + which = (10 * which) + (size_t)(*pointer++ - '0'); + } + if (*pointer && (*pointer != '/')) + { + /* not end of string or new path token */ + return NULL; + } + if (which > INT_MAX) + { + return NULL; + } + object = cJSON_GetArrayItem(object, (int)which); + } + else if ((object->type & 0xFF) == cJSON_Object) + { + object = object->child; + /* GetObjectItem. */ + while (object && cJSONUtils_Pstrcasecmp((unsigned char*)object->string, (const unsigned char*)pointer)) + { + object = object->next; + } + /* skip to the next path token or end of string */ + while (*pointer && (*pointer != '/')) + { + pointer++; + } + } + else + { + return NULL; + } + } + + return object; +} + +/* JSON Patch implementation. */ +static void cJSONUtils_InplaceDecodePointerString(unsigned char *string) +{ + unsigned char *s2 = string; + + if (string == NULL) { + return; + } + + for (; *string; s2++, string++) + { + *s2 = (*string != '~') + ? (*string) + : ((*(++string) == '0') + ? '~' + : '/'); + } + + *s2 = '\0'; +} + +static cJSON *cJSONUtils_PatchDetach(cJSON *object, const unsigned char *path) +{ + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + cJSON *parent = NULL; + cJSON *ret = NULL; + + /* copy path and split it in parent and child */ + parentptr = cJSONUtils_strdup(path); + if (parentptr == NULL) { + return NULL; + } + + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); /* last '/' */ + if (childptr == NULL) + { + free(parentptr); + return NULL; + } + /* split strings */ + *childptr++ = '\0'; + + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + if (!parent) + { + /* Couldn't find object to remove child from. */ + ret = NULL; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + ret = cJSON_DetachItemFromArray(parent, atoi((char*)childptr)); + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + ret = cJSON_DetachItemFromObject(parent, (char*)childptr); + } + free(parentptr); + + /* return the detachted item */ + return ret; +} + +static int cJSONUtils_Compare(cJSON *a, cJSON *b) +{ + if ((a == NULL) || (b == NULL) || ((a->type & 0xFF) != (b->type & 0xFF))) + { + /* mismatched type. */ + return -1; + } + switch (a->type & 0xFF) + { + case cJSON_Number: + /* numeric mismatch. */ + return ((a->valueint != b->valueint) || (a->valuedouble != b->valuedouble)) ? -2 : 0; + case cJSON_String: + /* string mismatch. */ + return (strcmp(a->valuestring, b->valuestring) != 0) ? -3 : 0; + case cJSON_Array: + for (a = a->child, b = b->child; a && b; a = a->next, b = b->next) + { + int err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + } + /* array size mismatch? (one of both children is not NULL) */ + return (a || b) ? -4 : 0; + case cJSON_Object: + cJSONUtils_SortObject(a); + cJSONUtils_SortObject(b); + a = a->child; + b = b->child; + while (a && b) + { + int err = 0; + /* compare object keys */ + if (cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)) + { + /* missing member */ + return -6; + } + err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + a = a->next; + b = b->next; + } + /* object length mismatch (one of both children is not null) */ + return (a || b) ? -5 : 0; + + default: + break; + } + /* null, true or false */ + return 0; +} + +static int cJSONUtils_ApplyPatch(cJSON *object, cJSON *patch) +{ + cJSON *op = NULL; + cJSON *path = NULL; + cJSON *value = NULL; + cJSON *parent = NULL; + int opcode = 0; + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + + op = cJSON_GetObjectItem(patch, "op"); + path = cJSON_GetObjectItem(patch, "path"); + if (!op || !path) + { + /* malformed patch. */ + return 2; + } + + /* decode operation */ + if (!strcmp(op->valuestring, "add")) + { + opcode = 0; + } + else if (!strcmp(op->valuestring, "remove")) + { + opcode = 1; + } + else if (!strcmp(op->valuestring, "replace")) + { + opcode = 2; + } + else if (!strcmp(op->valuestring, "move")) + { + opcode = 3; + } + else if (!strcmp(op->valuestring, "copy")) + { + opcode = 4; + } + else if (!strcmp(op->valuestring, "test")) + { + /* compare value: {...} with the given path */ + return cJSONUtils_Compare(cJSONUtils_GetPointer(object, path->valuestring), cJSON_GetObjectItem(patch, "value")); + } + else + { + /* unknown opcode. */ + return 3; + } + + /* Remove/Replace */ + if ((opcode == 1) || (opcode == 2)) + { + /* Get rid of old. */ + cJSON_Delete(cJSONUtils_PatchDetach(object, (unsigned char*)path->valuestring)); + if (opcode == 1) + { + /* For Remove, this is job done. */ + return 0; + } + } + + /* Copy/Move uses "from". */ + if ((opcode == 3) || (opcode == 4)) + { + cJSON *from = cJSON_GetObjectItem(patch, "from"); + if (!from) + { + /* missing "from" for copy/move. */ + return 4; + } + + if (opcode == 3) + { + /* move */ + value = cJSONUtils_PatchDetach(object, (unsigned char*)from->valuestring); + } + if (opcode == 4) + { + /* copy */ + value = cJSONUtils_GetPointer(object, from->valuestring); + } + if (!value) + { + /* missing "from" for copy/move. */ + return 5; + } + if (opcode == 4) + { + value = cJSON_Duplicate(value, 1); + } + if (!value) + { + /* out of memory for copy/move. */ + return 6; + } + } + else /* Add/Replace uses "value". */ + { + value = cJSON_GetObjectItem(patch, "value"); + if (!value) + { + /* missing "value" for add/replace. */ + return 7; + } + value = cJSON_Duplicate(value, 1); + if (!value) + { + /* out of memory for add/replace. */ + return 8; + } + } + + /* Now, just add "value" to "path". */ + + /* split pointer in parent and child */ + parentptr = cJSONUtils_strdup((unsigned char*)path->valuestring); + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); + if (childptr) + { + *childptr++ = '\0'; + } + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + /* add, remove, replace, move, copy, test. */ + if (!parent) + { + /* Couldn't find object to add to. */ + free(parentptr); + cJSON_Delete(value); + return 9; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + if (!strcmp((char*)childptr, "-")) + { + cJSON_AddItemToArray(parent, value); + } + else + { + cJSON_InsertItemInArray(parent, atoi((char*)childptr), value); + } + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + cJSON_DeleteItemFromObject(parent, (char*)childptr); + cJSON_AddItemToObject(parent, (char*)childptr, value); + } + else + { + cJSON_Delete(value); + } + free(parentptr); + + return 0; +} + +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches) +{ + int err = 0; + + if (patches == NULL) + { + return 1; + } + + if ((patches->type & 0xFF) != cJSON_Array) + { + /* malformed patches. */ + return 1; + } + if (patches) + { + patches = patches->child; + } + while (patches) + { + if ((err = cJSONUtils_ApplyPatch(object, patches))) + { + return err; + } + patches = patches->next; + } + + return 0; +} + +static void cJSONUtils_GeneratePatch(cJSON *patches, const unsigned char *op, const unsigned char *path, const unsigned char *suffix, cJSON *val) +{ + cJSON *patch = cJSON_CreateObject(); + cJSON_AddItemToObject(patch, "op", cJSON_CreateString((const char*)op)); + if (suffix) + { + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen(suffix) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", (const char*)path), suffix); + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)newpath)); + free(newpath); + } + else + { + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)path)); + } + if (val) + { + cJSON_AddItemToObject(patch, "value", cJSON_Duplicate(val, 1)); + } + cJSON_AddItemToArray(patches, patch); +} + +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val) +{ + cJSONUtils_GeneratePatch(array, (const unsigned char*)op, (const unsigned char*)path, 0, val); +} + +static void cJSONUtils_CompareToPatch(cJSON *patches, const unsigned char *path, cJSON *from, cJSON *to) +{ + if ((from == NULL) || (to == NULL)) + { + return; + } + + if ((from->type & 0xFF) != (to->type & 0xFF)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + return; + } + + switch ((from->type & 0xFF)) + { + case cJSON_Number: + if ((from->valueint != to->valueint) || (from->valuedouble != to->valuedouble)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_String: + if (strcmp(from->valuestring, to->valuestring) != 0) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_Array: + { + size_t c = 0; + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + 23); /* Allow space for 64bit int. */ + /* generate patches for all array elements that exist in "from" and "to" */ + for (c = 0, from = from->child, to = to->child; from && to; from = from->next, to = to->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%s/%lu", path, (unsigned long)c); /* path of the current array element */ + cJSONUtils_CompareToPatch(patches, newpath, from, to); + } + /* remove leftover elements from 'from' that are not in 'to' */ + for (; from; from = from->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%lu", (unsigned long)c); + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, newpath, 0); + } + /* add new elements in 'to' that were not in 'from' */ + for (; to; to = to->next, c++) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (const unsigned char*)"-", to); + } + free(newpath); + return; + } + + case cJSON_Object: + { + cJSON *a = NULL; + cJSON *b = NULL; + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + a = from->child; + b = to->child; + /* for all object values in the object with more of them */ + while (a || b) + { + int diff = (!a) ? 1 : ((!b) ? -1 : cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)); + if (!diff) + { + /* both object keys are the same */ + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen((unsigned char*)a->string) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", path), (unsigned char*)a->string); + /* create a patch for the element */ + cJSONUtils_CompareToPatch(patches, newpath, a, b); + free(newpath); + a = a->next; + b = b->next; + } + else if (diff < 0) + { + /* object element doesn't exist in 'to' --> remove it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, (unsigned char*)a->string, 0); + a = a->next; + } + else + { + /* object element doesn't exist in 'from' --> add it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (unsigned char*)b->string, b); + b = b->next; + } + } + return; + } + + default: + break; + } +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to) +{ + cJSON *patches = cJSON_CreateArray(); + cJSONUtils_CompareToPatch(patches, (const unsigned char*)"", from, to); + + return patches; +} + +/* sort lists using mergesort */ +static cJSON *cJSONUtils_SortList(cJSON *list) +{ + cJSON *first = list; + cJSON *second = list; + cJSON *ptr = list; + + if (!list || !list->next) + { + /* One entry is sorted already. */ + return list; + } + + while (ptr && ptr->next && (cJSONUtils_strcasecmp((unsigned char*)ptr->string, (unsigned char*)ptr->next->string) < 0)) + { + /* Test for list sorted. */ + ptr = ptr->next; + } + if (!ptr || !ptr->next) + { + /* Leave sorted lists unmodified. */ + return list; + } + + /* reset ptr to the beginning */ + ptr = list; + while (ptr) + { + /* Walk two pointers to find the middle. */ + second = second->next; + ptr = ptr->next; + /* advances ptr two steps at a time */ + if (ptr) + { + ptr = ptr->next; + } + } + if (second && second->prev) + { + /* Split the lists */ + second->prev->next = NULL; + } + + /* Recursively sort the sub-lists. */ + first = cJSONUtils_SortList(first); + second = cJSONUtils_SortList(second); + list = ptr = NULL; + + while (first && second) /* Merge the sub-lists */ + { + if (cJSONUtils_strcasecmp((unsigned char*)first->string, (unsigned char*)second->string) < 0) + { + if (!list) + { + /* start merged list with the first element of the first list */ + list = ptr = first; + } + else + { + /* add first element of first list to merged list */ + ptr->next = first; + first->prev = ptr; + ptr = first; + } + first = first->next; + } + else + { + if (!list) + { + /* start merged list with the first element of the second list */ + list = ptr = second; + } + else + { + /* add first element of second list to merged list */ + ptr->next = second; + second->prev = ptr; + ptr = second; + } + second = second->next; + } + } + if (first) + { + /* Append rest of first list. */ + if (!list) + { + return first; + } + ptr->next = first; + first->prev = ptr; + } + if (second) + { + /* Append rest of second list */ + if (!list) + { + return second; + } + ptr->next = second; + second->prev = ptr; + } + + return list; +} + +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object) +{ + object->child = cJSONUtils_SortList(object->child); +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch) +{ + if (!patch || ((patch->type & 0xFF) != cJSON_Object)) + { + /* scalar value, array or NULL, just duplicate */ + cJSON_Delete(target); + return cJSON_Duplicate(patch, 1); + } + + if (!target || ((target->type & 0xFF) != cJSON_Object)) + { + cJSON_Delete(target); + target = cJSON_CreateObject(); + } + + patch = patch->child; + while (patch) + { + if ((patch->type & 0xFF) == cJSON_NULL) + { + /* NULL is the indicator to remove a value, see RFC7396 */ + cJSON_DeleteItemFromObject(target, patch->string); + } + else + { + cJSON *replaceme = cJSON_DetachItemFromObject(target, patch->string); + cJSON_AddItemToObject(target, patch->string, cJSONUtils_MergePatch(replaceme, patch)); + } + patch = patch->next; + } + return target; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to) +{ + cJSON *patch = NULL; + if (!to) + { + /* patch to delete everything */ + return cJSON_CreateNull(); + } + if (((to->type & 0xFF) != cJSON_Object) || !from || ((from->type & 0xFF) != cJSON_Object)) + { + return cJSON_Duplicate(to, 1); + } + + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + from = from->child; + to = to->child; + patch = cJSON_CreateObject(); + while (from || to) + { + int compare = from ? (to ? strcmp(from->string, to->string) : -1) : 1; + if (compare < 0) + { + /* from has a value that to doesn't have -> remove */ + cJSON_AddItemToObject(patch, from->string, cJSON_CreateNull()); + from = from->next; + } + else if (compare > 0) + { + /* to has a value that from doesn't have -> add to patch */ + cJSON_AddItemToObject(patch, to->string, cJSON_Duplicate(to, 1)); + to = to->next; + } + else + { + /* object key exists in both objects */ + if (cJSONUtils_Compare(from, to)) + { + /* not identical --> generate a patch */ + cJSON_AddItemToObject(patch, to->string, cJSONUtils_GenerateMergePatch(from, to)); + } + /* next key in the object */ + from = from->next; + to = to->next; + } + } + if (!patch->child) + { + cJSON_Delete(patch); + return NULL; + } + + return patch; +} diff --git a/libs/esl/src/esl_json.c b/libs/esl/src/esl_json.c index 02270a7f71..12ff334176 100644 --- a/libs/esl/src/esl_json.c +++ b/libs/esl/src/esl_json.c @@ -1,539 +1,14 @@ -/* - 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. -*/ - -/* cJSON */ -/* JSON parser in C. */ - -#include -#include -#include -#include -#include -#include -#include -#include "esl_json.h" #include "esl.h" -static const char *ep; - -ESL_DECLARE(const char *)cJSON_GetErrorPtr(void) {return ep;} - -static int cJSON_strcasecmp(const char *s1,const char *s2) +ESL_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string) { - 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); + cJSON *cj = cJSON_GetObjectItem(object, string); + + if (!cj || cj->type != cJSON_String || !cj->valuestring) return NULL; + + return cj->valuestring; } -static void *glue_malloc(size_t theSize) -{ - return(malloc(theSize)); -} - -static void glue_free(void *thePtr) -{ - free(thePtr); -} - -static void *(*cJSON_malloc)(size_t sz) = glue_malloc; -static void (*cJSON_free)(void *ptr) = glue_free; - -static char* cJSON_strdup(const char* str) -{ - size_t len; - char* copy; - const char *s = str ? str : ""; - - len = strlen(s) + 1; - if (!(copy = (char*)cJSON_malloc(len))) return 0; - memcpy(copy,s,len); - return copy; -} - -ESL_DECLARE(void)cJSON_InitHooks(cJSON_Hooks* hooks) -{ - if (!hooks) { /* Reset hooks */ - cJSON_malloc = malloc; - cJSON_free = free; - return; - } - - cJSON_malloc = (hooks->malloc_fn)?hooks->malloc_fn:malloc; - cJSON_free = (hooks->free_fn)?hooks->free_fn:free; -} - -/* Internal constructor. */ -static cJSON *cJSON_New_Item(void) -{ - cJSON* node = (cJSON*)cJSON_malloc(sizeof(cJSON)); - if (node) memset(node,0,sizeof(cJSON)); - return node; -} - -/* Delete a cJSON structure. */ -ESL_DECLARE(void)cJSON_Delete(cJSON *c) -{ - cJSON *next; - while (c) - { - next=c->next; - if (!(c->type&cJSON_IsReference) && c->child) cJSON_Delete(c->child); - if (!(c->type&cJSON_IsReference) && c->valuestring) cJSON_free(c->valuestring); - if (c->string) cJSON_free(c->string); - cJSON_free(c); - c=next; - } -} - -/* 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; - - /* Could use sscanf for this? */ - 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? */ - } - - n=sign*n*pow(10.0,(scale+subscale*signsubscale)); /* number = +/- number.fraction * 10^+/- exponent */ - - 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) - { - str=(char*)cJSON_malloc(21); /* 2^64+1 can be represented in 21 chars. */ - if (str) sprintf(str,"%d",item->valueint); - } - else - { - str=(char*)cJSON_malloc(64); /* This is a nice tradeoff. */ - if (str) - { - if (fabs(floor(d)-d)<=DBL_EPSILON) 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; -} - -#define is_hexdigit(c) ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F')) -static int scan_unicode(const char *ptr, unsigned int *uc) -{ - if (!is_hexdigit(*(ptr)) || !is_hexdigit(*(ptr+1)) || !is_hexdigit(*(ptr+2)) || !is_hexdigit(*(ptr+3))) return -1; - return sscanf(ptr, "%4x", uc); -} - -/* 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 *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=(char*)cJSON_malloc(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. */ - if (scan_unicode(ptr+1, &uc) < 1) break; - 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. - if (scan_unicode(ptr+3,&uc2) < 1) break; - 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 =(char)(uc | firstByteMark[len]); - } - ptr2+=len; - break; - default: *ptr2++=*ptr; break; - } - if (*ptr) 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 cJSON_strdup(""); - ptr=str;while ((token=*ptr) && ++len) {if (strchr("\"\\\b\f\n\r\t",token)) len++; else if (token<32) len+=5;ptr++;} - - out=(char*)cJSON_malloc(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); -static char *print_value(cJSON *item,int depth,int fmt); -static const char *parse_array(cJSON *item,const char *value); -static char *print_array(cJSON *item,int depth,int fmt); -static const char *parse_object(cJSON *item,const char *value); -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. */ -ESL_DECLARE(cJSON *)cJSON_Parse(const char *value) -{ - cJSON *c=cJSON_New_Item(); - ep=0; - if (!c) return 0; /* memory fail */ - - if (!parse_value(c,skip(value))) {cJSON_Delete(c);return 0;} - return c; -} - -/* Render a cJSON item/entity/structure to text. */ -ESL_DECLARE(char *) cJSON_Print(cJSON *item) {return print_value(item,0,1);} -ESL_DECLARE(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) -{ - 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); } - if (*value=='-' || (*value>='0' && *value<='9')) { return parse_number(item,value); } - if (*value=='[') { return parse_array(item,value); } - if (*value=='{') { return parse_object(item,value); } - - 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=cJSON_strdup("null"); break; - case cJSON_False: out=cJSON_strdup("false");break; - case cJSON_True: out=cJSON_strdup("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) -{ - 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 */ - value=skip(parse_value(child,skip(value))); /* skip any spacing, get the value. */ - 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))); - 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; - /* Allocate an array to hold the values for each */ - entries=(char**)cJSON_malloc(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 malloc the output string */ - if (!fail) out=(char*)cJSON_malloc(len); - /* If that fails, we fail. */ - if (!out) fail=1; - - /* Handle failure. */ - if (fail) - { - for (i=0;itype=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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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; - /* Allocate space for the names and the objects */ - entries=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!entries) return 0; - names=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!names) {cJSON_free(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=(char*)cJSON_malloc(len); - if (!out) fail=1; - - /* Handle failure */ - if (fail) - { - for (i=0;ichild;int i=0;while(c)i++,c=c->next;return i;} -ESL_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item) {cJSON *c=array->child; while (c && item>0) item--,c=c->next; return c;} -ESL_DECLARE(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. */ -ESL_DECLARE(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);}} -ESL_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item) {if (!item) return; if (item->string) cJSON_free(item->string);item->string=cJSON_strdup(string);cJSON_AddItemToArray(object,item);} -ESL_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) {cJSON_AddItemToArray(array,create_reference(item));} -ESL_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item) {cJSON_AddItemToObject(object,string,create_reference(item));} - -ESL_DECLARE(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;} -ESL_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which) {cJSON_Delete(cJSON_DetachItemFromArray(array,which));} -ESL_DECLARE(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;} -ESL_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string) {cJSON_Delete(cJSON_DetachItemFromObject(object,string));} - -/* Replace array/object items with new ones. */ -ESL_DECLARE(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);} -ESL_DECLARE(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=cJSON_strdup(string);cJSON_ReplaceItemInArray(object,i,newitem);}} - -/* Create basic types: */ -ESL_DECLARE(cJSON *)cJSON_CreateNull(void) {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_NULL;return item;} -ESL_DECLARE(cJSON *)cJSON_CreateTrue(void) {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_True;return item;} -ESL_DECLARE(cJSON *)cJSON_CreateFalse(void) {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_False;return item;} -ESL_DECLARE(cJSON *)cJSON_CreateBool(int b) {cJSON *item=cJSON_New_Item();if(item)item->type=b?cJSON_True:cJSON_False;return item;} -ESL_DECLARE(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;} -ESL_DECLARE(cJSON *)cJSON_CreateString(const char *string) {cJSON *item=cJSON_New_Item();if(item){item->type=cJSON_String;item->valuestring=cJSON_strdup(string);}return item;} -ESL_DECLARE(cJSON *)cJSON_CreateArray(void) {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Array;return item;} -ESL_DECLARE(cJSON *)cJSON_CreateObject(void) {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Object;return item;} - -/* Create Arrays: */ -ESL_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a!=0 && ichild=n;else suffix_object(p,n);p=n;}return a;} -ESL_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a!=0 && ichild=n;else suffix_object(p,n);p=n;}return a;} -ESL_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a!=0 && ichild=n;else suffix_object(p,n);p=n;}return a;} -ESL_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a!=0 && ichild=n;else suffix_object(p,n);p=n;}return a;} - /* For Emacs: * Local Variables: * mode:c diff --git a/libs/esl/src/include/esl_cJSON.h b/libs/esl/src/include/esl_cJSON.h new file mode 100644 index 0000000000..79dbb98157 --- /dev/null +++ b/libs/esl/src/include/esl_cJSON.h @@ -0,0 +1,223 @@ +/* + 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. +*/ + +#ifndef cJSON__h +#define cJSON__h + +#ifdef __cplusplus +extern "C" +{ +#endif + +/* project version */ +#define CJSON_VERSION_MAJOR 1 +#define CJSON_VERSION_MINOR 3 +#define CJSON_VERSION_PATCH 0 + +#include + +/* cJSON Types: */ +#define cJSON_Invalid (0) +#define cJSON_False (1 << 0) +#define cJSON_True (1 << 1) +#define cJSON_NULL (1 << 2) +#define cJSON_Number (1 << 3) +#define cJSON_String (1 << 4) +#define cJSON_Array (1 << 5) +#define cJSON_Object (1 << 6) +#define cJSON_Raw (1 << 7) /* raw json */ + +#define cJSON_IsReference 256 +#define cJSON_StringIsConst 512 + +/* The cJSON structure: */ +typedef struct cJSON +{ + /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ + struct cJSON *next; + struct cJSON *prev; + /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ + struct cJSON *child; + + /* The type of the item, as above. */ + int type; + + /* The item's string, if type==cJSON_String and type == cJSON_Raw */ + char *valuestring; + /* The item's number, if type==cJSON_Number */ + int valueint; + /* The item's number, if type==cJSON_Number */ + double valuedouble; + + /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ + char *string; +} cJSON; + +typedef struct cJSON_Hooks +{ + void *(*malloc_fn)(size_t sz); + void (*free_fn)(void *ptr); +} cJSON_Hooks; + +#if !defined(__WINDOWS__) && (defined(WIN32) || defined(WIN64) || defined(_MSC_VER) || defined(_WIN32)) +#define __WINDOWS__ +#endif +#ifdef __WINDOWS__ + +/* When compiling for windows, we specify a specific calling convention to avoid issues where we are being called from a project with a different default calling convention. For windows you have 2 define options: + +CJSON_HIDE_SYMBOLS - Define this in the case where you don't want to ever dllexport symbols +CJSON_EXPORT_SYMBOLS - Define this on library build when you want to dllexport symbols + +For *nix builds that support visibility attribute, you can define similar behavior by + +setting default visibility to hidden by adding +-fvisibility=hidden (for gcc) +or +-xldscope=hidden (for sun cc) +to CFLAGS + +then using the CJSON_API_VISIBILITY flag to "export" the same symbols the way CJSON_EXPORT_SYMBOLS does + +*/ + +#if defined(CJSON_HIDE_SYMBOLS) +#define CJSON_PUBLIC(type) type __stdcall +#elif defined(CJSON_EXPORT_SYMBOLS) +#define CJSON_PUBLIC(type) __declspec(dllexport) type __stdcall +#else +#define CJSON_PUBLIC(type) __declspec(dllimport) type __stdcall +#endif +#else /* !WIN32 */ +#if (defined(__GNUC__) || defined(__SUNPRO_CC) || defined (__SUNPRO_C)) && defined(CJSON_API_VISIBILITY) +#define CJSON_PUBLIC(type) __attribute__((visibility("default"))) type +#else +#define CJSON_PUBLIC(type) type +#endif +#endif + +/* returns the version of cJSON as a string */ +CJSON_PUBLIC(const char*) cJSON_Version(void); + +/* Supply malloc, realloc and free functions to cJSON */ +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks); + + +/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value); +/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item); +/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item); +/* Render a cJSON entity to text using a buffered strategy. prebuffer is a guess at the final size. guessing well reduces reallocation. fmt=0 gives unformatted, =1 gives formatted */ +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, int fmt); +/* Render a cJSON entity to text using a buffer already allocated in memory with length buf_len. Returns 1 on success and 0 on failure. */ +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const int fmt); +/* Delete a cJSON entity and all subentities. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c); + +/* Returns the number of items in an array (or object). */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array); +/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item); +/* Get item "string" from object. Case insensitive. */ +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string); +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON *object, const char *string); +CJSON_PUBLIC(int) cJSON_HasObjectItem(const cJSON *object, const char *string); +/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void); + +/* These calls create a cJSON item of the appropriate type. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(int b); +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num); +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string); +/* raw json */ +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw); +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void); + +/* These utilities create an Array of count items. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count); + +/* Append item to the specified array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item); +/* Use this when string is definitely const (i.e. a literal, or as good as), and will definitely survive the cJSON object. + * WARNING: When this function was used, make sure to always check that (item->type & cJSON_StringIsConst) is zero before + * writing to `item->string` */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item); +/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item); + +/* Remove/Detatch items from Arrays/Objects. */ +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string); +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string); + +/* Update array items. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem); /* Shifts pre-existing items to the right. */ +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem); +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); + +/* Duplicate a cJSON item */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, int recurse); +/* Duplicate will create a new, identical cJSON item to the one you pass, in new memory that will +need to be released. With recurse!=0, it will duplicate any children connected to the item. +The item->next and ->prev pointers are always zero on return from Duplicate. */ + +/* ParseWithOpts allows you to require (and check) that the JSON is null terminated, and to retrieve the pointer to the final byte parsed. */ +/* If you supply a ptr in return_parse_end and parsing fails, then return_parse_end will contain a pointer to the error. If not, then cJSON_GetErrorPtr() does the job. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, int require_null_terminated); + +CJSON_PUBLIC(void) cJSON_Minify(char *json); + +/* Macros for creating things quickly. */ +#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) +#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) +#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) +#define cJSON_AddBoolToObject(object,name,b) cJSON_AddItemToObject(object, name, cJSON_CreateBool(b)) +#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) +#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) +#define cJSON_AddRawToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateRaw(s)) + +/* When assigning an integer value, it needs to be propagated to valuedouble too. */ +#define cJSON_SetIntValue(object, number) ((object) ? (object)->valueint = (object)->valuedouble = (number) : (number)) +/* helper for the cJSON_SetNumberValue macro */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number); +#define cJSON_SetNumberValue(object, number) ((object != NULL) ? cJSON_SetNumberHelper(object, (double)number) : (number)) + +/* Macro for iterating over an array */ +#define cJSON_ArrayForEach(element, array) for(element = (array != NULL) ? (array)->child : NULL; element != NULL; element = element->next) + +#ifdef __cplusplus +} +#endif + +#endif diff --git a/libs/esl/src/include/esl_cJSON_Utils.h b/libs/esl/src/include/esl_cJSON_Utils.h new file mode 100644 index 0000000000..358145e4c2 --- /dev/null +++ b/libs/esl/src/include/esl_cJSON_Utils.h @@ -0,0 +1,44 @@ +#include "switch_cJSON.h" + +/* Implement RFC6901 (https://tools.ietf.org/html/rfc6901) JSON Pointer spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer); + +/* Implement RFC6902 (https://tools.ietf.org/html/rfc6902) JSON Patch spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to); +/* Utility for generating patch array entries. */ +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val); +/* Returns 0 for success. */ +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches); + +/* +// Note that ApplyPatches is NOT atomic on failure. To implement an atomic ApplyPatches, use: +//int cJSONUtils_AtomicApplyPatches(cJSON **object, cJSON *patches) +//{ +// cJSON *modme = cJSON_Duplicate(*object, 1); +// int error = cJSONUtils_ApplyPatches(modme, patches); +// if (!error) +// { +// cJSON_Delete(*object); +// *object = modme; +// } +// else +// { +// cJSON_Delete(modme); +// } +// +// return error; +//} +// Code not added to library since this strategy is a LOT slower. +*/ + +/* Implement RFC7386 (https://tools.ietf.org/html/rfc7396) JSON Merge Patch spec. */ +/* target will be modified by patch. return value is new ptr for target. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch); +/* generates a patch to move from -> to */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to); + +/* Given a root object and a target object, construct a pointer from one to the other. */ +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target); + +/* Sorts the members of the object into alphabetical order. */ +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object); diff --git a/libs/esl/src/include/esl_json.h b/libs/esl/src/include/esl_json.h index 632ce5a684..ec6c9acc83 100644 --- a/libs/esl/src/include/esl_json.h +++ b/libs/esl/src/include/esl_json.h @@ -1,16 +1,16 @@ /* 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 @@ -20,119 +20,80 @@ THE SOFTWARE. */ #include "esl.h" -#ifndef cJSON__h -#define cJSON__h +#ifndef ESL_JSON__h +#define ESL_JSON__h + +#ifdef ESL_EXPORTS +#ifndef CJSON_EXPORT_SYMBOLS +#define CJSON_EXPORT_SYMBOLS 1 +#endif +#endif + +#ifdef SWITCH_API_VISIBILITY +#ifndef CJSON_API_VISIBILITY +#define CJSON_API_VISIBILITY 1 +#endif +#endif #ifdef __cplusplus extern "C" { #endif -/* cJSON Types: */ -#define cJSON_False 0 -#define cJSON_True 1 -#define cJSON_NULL 2 -#define cJSON_Number 3 -#define cJSON_String 4 -#define cJSON_Array 5 -#define cJSON_Object 6 +#include "esl_cJSON.h" +#include "esl_cJSON_Utils.h" -#define cJSON_IsReference 256 +ESL_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string); -/* The cJSON structure: */ -typedef struct cJSON { - struct cJSON *next,*prev; /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ - struct cJSON *child; /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ +static inline cJSON *esl_json_add_child_obj(cJSON *json, const char *name, cJSON *obj) +{ + cJSON *new_json = NULL; - int type; /* The type of the item, as above. */ + esl_assert(json); - char *valuestring; /* The item's string, if type==cJSON_String */ - int valueint; /* The item's number, if type==cJSON_Number */ - double valuedouble; /* The item's number, if type==cJSON_Number */ + if (obj) { + new_json = obj; + } else { + new_json = cJSON_CreateObject(); + } - char *string; /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ -} cJSON; + esl_assert(new_json); -typedef struct cJSON_Hooks { - void *(*malloc_fn)(size_t sz); - void (*free_fn)(void *ptr); -} cJSON_Hooks; + cJSON_AddItemToObject(json, name, new_json); -/* Supply malloc, realloc and free functions to cJSON */ -ESL_DECLARE(void) cJSON_InitHooks(cJSON_Hooks* hooks); + return new_json; +} +static inline cJSON *esl_json_add_child_array(cJSON *json, const char *name) +{ + cJSON *new_json = NULL; -/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ -ESL_DECLARE(cJSON *)cJSON_Parse(const char *value); -/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ -ESL_DECLARE(char *)cJSON_Print(cJSON *item); -/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ -ESL_DECLARE(char *)cJSON_PrintUnformatted(cJSON *item); -/* Delete a cJSON entity and all subentities. */ -ESL_DECLARE(void) cJSON_Delete(cJSON *c); + esl_assert(json); -/* Returns the number of items in an array (or object). */ -ESL_DECLARE(int) cJSON_GetArraySize(cJSON *array); -/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ -ESL_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item); -/* Get item "string" from object. Case insensitive. */ -ESL_DECLARE(cJSON *)cJSON_GetObjectItem(cJSON *object,const char *string); + new_json = cJSON_CreateArray(); + esl_assert(new_json); -/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ -ESL_DECLARE(const char *)cJSON_GetErrorPtr(void); - -/* These calls create a cJSON item of the appropriate type. */ -ESL_DECLARE(cJSON *)cJSON_CreateNull(void); -ESL_DECLARE(cJSON *)cJSON_CreateTrue(void); -ESL_DECLARE(cJSON *)cJSON_CreateFalse(void); -ESL_DECLARE(cJSON *)cJSON_CreateBool(int b); -ESL_DECLARE(cJSON *)cJSON_CreateNumber(double num); -ESL_DECLARE(cJSON *)cJSON_CreateString(const char *string); -ESL_DECLARE(cJSON *)cJSON_CreateArray(void); -ESL_DECLARE(cJSON *)cJSON_CreateObject(void); + cJSON_AddItemToObject(json, name, new_json); -/* These utilities create an Array of count items. */ -ESL_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count); -ESL_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count); -ESL_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count); -ESL_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count); + return new_json; +} -/* Append item to the specified array/object. */ -ESL_DECLARE(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); -ESL_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item); -/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ -ESL_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); -ESL_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item); +static inline cJSON *esl_json_add_child_string(cJSON *json, const char *name, const char *val) +{ + cJSON *new_json = NULL; -/* Remove/Detatch items from Arrays/Objects. */ -ESL_DECLARE(cJSON *)cJSON_DetachItemFromArray(cJSON *array,int which); -ESL_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which); -ESL_DECLARE(cJSON *)cJSON_DetachItemFromObject(cJSON *object,const char *string); -ESL_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string); - -/* Update array items. */ -ESL_DECLARE(void) cJSON_ReplaceItemInArray(cJSON *array,int which,cJSON *newitem); -ESL_DECLARE(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); + esl_assert(json); -#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) -#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) -#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) -#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) -#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) + new_json = cJSON_CreateString(val); + esl_assert(new_json); + + cJSON_AddItemToObject(json, name, new_json); + + return new_json; +} #ifdef __cplusplus } #endif #endif - -/* For Emacs: - * Local Variables: - * mode:c - * indent-tabs-mode:t - * tab-width:4 - * c-basic-offset:4 - * End: - * For VIM: - * vim:set softtabstop=4 shiftwidth=4 tabstop=4 noet: - */ diff --git a/libs/libks/Makefile.am b/libs/libks/Makefile.am index f49cb238d2..48a66c5ff4 100644 --- a/libs/libks/Makefile.am +++ b/libs/libks/Makefile.am @@ -7,7 +7,7 @@ AM_CFLAGS += -I$(top_srcdir)/src -I$(top_srcdir)/src/include -I$(top_srcdir)/ AM_CPPFLAGS = $(AM_CFLAGS) lib_LTLIBRARIES = libks.la -libks_la_SOURCES = src/ks.c src/ks_string.c src/ks_json.c src/ks_thread.c src/ks_thread_pool.c src/ks_mutex.c src/ks_config.c +libks_la_SOURCES = src/ks.c src/ks_string.c src/ks_json.c src/cJSON.c src/cJSON_Utils.c src/ks_thread.c src/ks_thread_pool.c src/ks_mutex.c src/ks_config.c libks_la_SOURCES += src/ks_log.c src/ks_socket.c src/ks_buffer.c src/ks_pool.c src/simclist.c libks_la_SOURCES += src/ks_time.c src/ks_printf.c src/ks_hash.c src/ks_q.c src/ks_dso.c # src/ks_dht.c libks_la_SOURCES += src/ks_ssl.c src/kws.c src/ks_rng.c @@ -26,7 +26,7 @@ libks_la_LDFLAGS = $(AM_LDFLAGS) -version-info 0:1:0 -lncurses -lpthread -lm library_includedir = $(prefix)/include library_include_HEADERS = src/include/ks_config.h src/include/ks.h src/include/ks_threadmutex.h src/include/ks_json.h src/include/ks_buffer.h -library_include_HEADERS += src/include/ks_thread_pool.h +library_include_HEADERS += src/include/ks_thread_pool.h src/include/ks_cJSON.h src/include/ks_cJSON_Utils.h library_include_HEADERS += src/include/ks_pool.h src/include/simclist.h src/include/ks_time.h src/include/ks_q.h src/include/ks_socket.h library_include_HEADERS += src/include/ks_dso.h src/include/ks_platform.h src/include/ks_types.h # src/include/ks_rng.h src/include/ks_dht.h library_include_HEADERS += src/include/ks_printf.h src/include/ks_hash.h src/include/ks_ssl.h src/include/kws.h diff --git a/libs/libks/configure.ac b/libs/libks/configure.ac index 3683e3b481..ef8bce7134 100644 --- a/libs/libks/configure.ac +++ b/libs/libks/configure.ac @@ -124,7 +124,7 @@ if test "x${enable_visibility}" != "xno" ; then )], [AC_MSG_RESULT([yes]) - AM_CFLAGS="${AM_CFLAGS} -DKS_API_VISIBILITY=1 -fvisibility=hidden" + AM_CFLAGS="${AM_CFLAGS} -DKS_API_VISIBILITY=1 -DCJSON_API_VISIBILITY=1 -fvisibility=hidden" AC_DEFINE([HAVE_VISIBILITY], [1], [GCC visibility support available]) HAVE_VISIBILITY="yes"], @@ -144,7 +144,7 @@ if test "x${enable_visibility}" != "xno" ; then )], [AC_MSG_RESULT([yes]) - AM_CFLAGS="${AM_CFLAGS} -DKS_API_VISIBILITY=1 -xldscope=hidden" + AM_CFLAGS="${AM_CFLAGS} -DKS_API_VISIBILITY=1 -DCJSON_API_VISIBILITY=1 -xldscope=hidden" AC_DEFINE([HAVE_VISIBILITY], [1], [SUNCC visibility support available]) HAVE_VISIBILITY="yes"], diff --git a/libs/libks/src/cJSON.c b/libs/libks/src/cJSON.c new file mode 100644 index 0000000000..b5c2ef0100 --- /dev/null +++ b/libs/libks/src/cJSON.c @@ -0,0 +1,2152 @@ +/* + 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. +*/ + +/* cJSON */ +/* JSON parser in C. */ + +#include +#include +#include +#include +#include +#include +#include +#include "ks_cJSON.h" + +/* define our own boolean type */ +typedef int cjbool; +#define true ((cjbool)1) +#define false ((cjbool)0) + +static const unsigned char *global_ep = NULL; + +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void) +{ + return (const char*) global_ep; +} + +/* This is a safeguard to prevent copy-pasters from using incompatible C and header files */ +#if (CJSON_VERSION_MAJOR != 1) || (CJSON_VERSION_MINOR != 3) || (CJSON_VERSION_PATCH != 0) + #error cJSON.h and cJSON.c have different versions. Make sure that both have the same. +#endif + +CJSON_PUBLIC(const char*) cJSON_Version(void) +{ + static char version[15]; + sprintf(version, "%i.%i.%i", CJSON_VERSION_MAJOR, CJSON_VERSION_MINOR, CJSON_VERSION_PATCH); + + return version; +} + +/* case insensitive strcmp */ +static int cJSON_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if (*s1 == '\0') + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +typedef struct internal_hooks +{ + void *(*allocate)(size_t size); + void (*deallocate)(void *pointer); + void *(*reallocate)(void *pointer, size_t size); +} internal_hooks; + +static internal_hooks global_hooks = { malloc, free, realloc }; + +static unsigned char* cJSON_strdup(const unsigned char* str, const internal_hooks * const hooks) +{ + size_t len = 0; + unsigned char *copy = NULL; + + if (str == NULL) + { + return NULL; + } + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)hooks->allocate(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks) +{ + if (hooks == NULL) + { + /* Reset hooks */ + global_hooks.allocate = malloc; + global_hooks.deallocate = free; + global_hooks.reallocate = realloc; + return; + } + + global_hooks.allocate = malloc; + if (hooks->malloc_fn != NULL) + { + global_hooks.allocate = hooks->malloc_fn; + } + + global_hooks.deallocate = free; + if (hooks->free_fn != NULL) + { + global_hooks.deallocate = hooks->free_fn; + } + + /* use realloc only if both free and malloc are used */ + global_hooks.reallocate = NULL; + if ((global_hooks.allocate == malloc) && (global_hooks.deallocate == free)) + { + global_hooks.reallocate = realloc; + } +} + +/* Internal constructor. */ +static cJSON *cJSON_New_Item(const internal_hooks * const hooks) +{ + cJSON* node = (cJSON*)hooks->allocate(sizeof(cJSON)); + if (node) + { + memset(node, '\0', sizeof(cJSON)); + } + + return node; +} + +/* Delete a cJSON structure. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c) +{ + cJSON *next = NULL; + while (c) + { + next = c->next; + if (!(c->type & cJSON_IsReference) && c->child) + { + cJSON_Delete(c->child); + } + if (!(c->type & cJSON_IsReference) && c->valuestring) + { + global_hooks.deallocate(c->valuestring); + } + if (!(c->type & cJSON_StringIsConst) && c->string) + { + global_hooks.deallocate(c->string); + } + global_hooks.deallocate(c); + c = next; + } +} + +/* Parse the input text to generate a number, and populate the result into item. */ +static const unsigned char *parse_number(cJSON * const item, const unsigned char * const input) +{ + double number = 0; + unsigned char *after_end = NULL; + + if (input == NULL) + { + return NULL; + } + + number = strtod((const char*)input, (char**)&after_end); + if (input == after_end) + { + return NULL; /* parse_error */ + } + + item->valuedouble = number; + + /* use saturation in case of overflow */ + if (number >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)number; + } + + item->type = cJSON_Number; + + return after_end; +} + +/* don't ask me, but the original cJSON_SetNumberValue returns an integer or double */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number) +{ + if (number >= INT_MAX) + { + object->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + object->valueint = INT_MIN; + } + else + { + object->valueint = cJSON_Number; + } + + return object->valuedouble = number; +} + +typedef struct +{ + unsigned char *buffer; + size_t length; + size_t offset; + cjbool noalloc; +} printbuffer; + +/* realloc printbuffer if necessary to have at least "needed" bytes more */ +static unsigned char* ensure(printbuffer * const p, size_t needed, const internal_hooks * const hooks) +{ + unsigned char *newbuffer = NULL; + size_t newsize = 0; + + if ((p == NULL) || (p->buffer == NULL)) + { + return NULL; + } + + if (needed > INT_MAX) + { + /* sizes bigger than INT_MAX are currently not supported */ + return NULL; + } + + needed += p->offset; + if (needed <= p->length) + { + return p->buffer + p->offset; + } + + if (p->noalloc) { + return NULL; + } + + /* calculate new buffer size */ + newsize = needed * 2; + if (newsize > INT_MAX) + { + /* overflow of int, use INT_MAX if possible */ + if (needed <= INT_MAX) + { + newsize = INT_MAX; + } + else + { + return NULL; + } + } + + if (hooks->reallocate != NULL) + { + /* reallocate with realloc if available */ + newbuffer = (unsigned char*)hooks->reallocate(p->buffer, newsize); + } + else + { + /* otherwise reallocate manually */ + newbuffer = (unsigned char*)hooks->allocate(newsize); + if (!newbuffer) + { + hooks->deallocate(p->buffer); + p->length = 0; + p->buffer = NULL; + + return NULL; + } + if (newbuffer) + { + memcpy(newbuffer, p->buffer, p->offset + 1); + } + hooks->deallocate(p->buffer); + } + p->length = newsize; + p->buffer = newbuffer; + + return newbuffer + p->offset; +} + +/* calculate the new length of the string in a printbuffer and update the offset */ +static void update_offset(printbuffer * const buffer) +{ + const unsigned char *buffer_pointer = NULL; + if ((buffer == NULL) || (buffer->buffer == NULL)) + { + return; + } + buffer_pointer = buffer->buffer + buffer->offset; + + buffer->offset += strlen((const char*)buffer_pointer); +} + +/* Render the number nicely from the given item into a string. */ +static unsigned char *print_number(const cJSON * const item, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output_pointer = NULL; + double d = item->valuedouble; + + if (output_buffer == NULL) + { + return NULL; + } + + /* value is an int */ + if ((fabs(((double)item->valueint) - d) <= DBL_EPSILON) && (d <= INT_MAX) && (d >= INT_MIN)) + { + /* 2^64+1 can be represented in 21 chars. */ + output_pointer = ensure(output_buffer, 21, hooks); + if (output_pointer != NULL) + { + sprintf((char*)output_pointer, "%d", item->valueint); + } + } + /* value is a floating point number */ + else + { + /* This is a nice tradeoff. */ + output_pointer = ensure(output_buffer, 64, hooks); + if (output_pointer != NULL) + { + /* This checks for NaN and Infinity */ + if ((d * 0) != 0) + { + sprintf((char*)output_pointer, "null"); + } + else if ((fabs(floor(d) - d) <= DBL_EPSILON) && (fabs(d) < 1.0e60)) + { + sprintf((char*)output_pointer, "%.0f", d); + } + else if ((fabs(d) < 1.0e-6) || (fabs(d) > 1.0e9)) + { + sprintf((char*)output_pointer, "%e", d); + } + else + { + sprintf((char*)output_pointer, "%f", d); + } + } + } + + return output_pointer; +} + +/* parse 4 digit hexadecimal number */ +static unsigned parse_hex4(const unsigned char * const input) +{ + unsigned int h = 0; + size_t i = 0; + + for (i = 0; i < 4; i++) + { + /* parse digit */ + if ((input[i] >= '0') && (input[i] <= '9')) + { + h += (unsigned int) input[i] - '0'; + } + else if ((input[i] >= 'A') && (input[i] <= 'F')) + { + h += (unsigned int) 10 + input[i] - 'A'; + } + else if ((input[i] >= 'a') && (input[i] <= 'f')) + { + h += (unsigned int) 10 + input[i] - 'a'; + } + else /* invalid */ + { + return 0; + } + + if (i < 3) + { + /* shift left to make place for the next nibble */ + h = h << 4; + } + } + + return h; +} + +/* converts a UTF-16 literal to UTF-8 + * A literal can be one or two sequences of the form \uXXXX */ +static unsigned char utf16_literal_to_utf8(const unsigned char * const input_pointer, const unsigned char * const input_end, unsigned char **output_pointer, const unsigned char **error_pointer) +{ + /* first bytes of UTF8 encoding for a given length in bytes */ + static const unsigned char firstByteMark[5] = + { + 0x00, /* should never happen */ + 0x00, /* 0xxxxxxx */ + 0xC0, /* 110xxxxx */ + 0xE0, /* 1110xxxx */ + 0xF0 /* 11110xxx */ + }; + + long unsigned int codepoint = 0; + unsigned int first_code = 0; + const unsigned char *first_sequence = input_pointer; + unsigned char utf8_length = 0; + unsigned char sequence_length = 0; + + if ((input_end - first_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the first utf16 sequence */ + first_code = parse_hex4(first_sequence + 2); + + /* check that the code is valid */ + if (((first_code >= 0xDC00) && (first_code <= 0xDFFF)) || (first_code == 0)) + { + *error_pointer = first_sequence; + goto fail; + } + + /* UTF16 surrogate pair */ + if ((first_code >= 0xD800) && (first_code <= 0xDBFF)) + { + const unsigned char *second_sequence = first_sequence + 6; + unsigned int second_code = 0; + sequence_length = 12; /* \uXXXX\uXXXX */ + + if ((input_end - second_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + if ((second_sequence[0] != '\\') || (second_sequence[1] != 'u')) + { + /* missing second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the second utf16 sequence */ + second_code = parse_hex4(second_sequence + 2); + /* check that the code is valid */ + if ((second_code < 0xDC00) || (second_code > 0xDFFF)) + { + /* invalid second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + + /* calculate the unicode codepoint from the surrogate pair */ + codepoint = 0x10000 + (((first_code & 0x3FF) << 10) | (second_code & 0x3FF)); + } + else + { + sequence_length = 6; /* \uXXXX */ + codepoint = first_code; + } + + /* encode as UTF-8 + * takes at maximum 4 bytes to encode: + * 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */ + if (codepoint < 0x80) + { + /* normal ascii, encoding 0xxxxxxx */ + utf8_length = 1; + } + else if (codepoint < 0x800) + { + /* two bytes, encoding 110xxxxx 10xxxxxx */ + utf8_length = 2; + } + else if (codepoint < 0x10000) + { + /* three bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx */ + utf8_length = 3; + } + else if (codepoint <= 0x10FFFF) + { + /* four bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx 10xxxxxx */ + utf8_length = 4; + } + else + { + /* invalid unicode codepoint */ + *error_pointer = first_sequence; + goto fail; + } + + /* encode as utf8 */ + switch (utf8_length) + { + case 4: + /* 10xxxxxx */ + (*output_pointer)[3] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 3: + /* 10xxxxxx */ + (*output_pointer)[2] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 2: + (*output_pointer)[1] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 1: + /* depending on the length in bytes this determines the + encoding of the first UTF8 byte */ + (*output_pointer)[0] = (unsigned char)((codepoint | firstByteMark[utf8_length]) & 0xFF); + break; + default: + *error_pointer = first_sequence; + goto fail; + } + *output_pointer += utf8_length; + + return sequence_length; + +fail: + return 0; +} + +/* Parse the input text into an unescaped cinput, and populate item. */ +static const unsigned char *parse_string(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = input + 1; + const unsigned char *input_end = input + 1; + unsigned char *output_pointer = NULL; + unsigned char *output = NULL; + + /* not a string */ + if (*input != '\"') + { + *error_pointer = input; + goto fail; + } + + { + /* calculate approximate size of the output (overestimate) */ + size_t allocation_length = 0; + size_t skipped_bytes = 0; + while ((*input_end != '\"') && (*input_end != '\0')) + { + /* is escape sequence */ + if (input_end[0] == '\\') + { + if (input_end[1] == '\0') + { + /* prevent buffer overflow when last input character is a backslash */ + goto fail; + } + skipped_bytes++; + input_end++; + } + input_end++; + } + if (*input_end == '\0') + { + goto fail; /* string ended unexpectedly */ + } + + /* This is at most how much we need for the output */ + allocation_length = (size_t) (input_end - input) - skipped_bytes; + output = (unsigned char*)hooks->allocate(allocation_length + sizeof('\0')); + if (output == NULL) + { + goto fail; /* allocation failure */ + } + } + + output_pointer = output; + /* loop through the string literal */ + while (input_pointer < input_end) + { + if (*input_pointer != '\\') + { + *output_pointer++ = *input_pointer++; + } + /* escape sequence */ + else + { + unsigned char sequence_length = 2; + switch (input_pointer[1]) + { + case 'b': + *output_pointer++ = '\b'; + break; + case 'f': + *output_pointer++ = '\f'; + break; + case 'n': + *output_pointer++ = '\n'; + break; + case 'r': + *output_pointer++ = '\r'; + break; + case 't': + *output_pointer++ = '\t'; + break; + case '\"': + case '\\': + case '/': + *output_pointer++ = input_pointer[1]; + break; + + /* UTF-16 literal */ + case 'u': + sequence_length = utf16_literal_to_utf8(input_pointer, input_end, &output_pointer, error_pointer); + if (sequence_length == 0) + { + /* failed to convert UTF16-literal to UTF-8 */ + goto fail; + } + break; + + default: + *error_pointer = input_pointer; + goto fail; + } + input_pointer += sequence_length; + } + } + + /* zero terminate the output */ + *output_pointer = '\0'; + + item->type = cJSON_String; + item->valuestring = (char*)output; + + return input_end + 1; + +fail: + if (output != NULL) + { + hooks->deallocate(output); + } + + return NULL; +} + +/* Render the cstring provided to an escaped version that can be printed. */ +static unsigned char *print_string_ptr(const unsigned char * const input, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = NULL; + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t output_length = 0; + /* numbers of additional characters needed for escaping */ + size_t escape_characters = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* empty string */ + if (input == NULL) + { + output = ensure(output_buffer, sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + strcpy((char*)output, "\"\""); + + return output; + } + + /* set "flag" to 1 if something needs to be escaped */ + for (input_pointer = input; *input_pointer; input_pointer++) + { + if (strchr("\"\\\b\f\n\r\t", *input_pointer)) + { + /* one character escape sequence */ + escape_characters++; + } + else if (*input_pointer < 32) + { + /* UTF-16 escape sequence uXXXX */ + escape_characters += 5; + } + } + output_length = (size_t)(input_pointer - input) + escape_characters; + + output = ensure(output_buffer, output_length + sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + + /* no characters have to be escaped */ + if (escape_characters == 0) + { + output[0] = '\"'; + memcpy(output + 1, input, output_length); + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; + } + + output[0] = '\"'; + output_pointer = output + 1; + /* copy the string */ + for (input_pointer = input; *input_pointer != '\0'; input_pointer++, output_pointer++) + { + if ((*input_pointer > 31) && (*input_pointer != '\"') && (*input_pointer != '\\')) + { + /* normal character, copy */ + *output_pointer = *input_pointer; + } + else + { + /* character needs to be escaped */ + *output_pointer++ = '\\'; + switch (*input_pointer) + { + case '\\': + *output_pointer = '\\'; + break; + case '\"': + *output_pointer = '\"'; + break; + case '\b': + *output_pointer = 'b'; + break; + case '\f': + *output_pointer = 'f'; + break; + case '\n': + *output_pointer = 'n'; + break; + case '\r': + *output_pointer = 'r'; + break; + case '\t': + *output_pointer = 't'; + break; + default: + /* escape and print as unicode codepoint */ + sprintf((char*)output_pointer, "u%04x", *input_pointer); + output_pointer += 4; + break; + } + } + } + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; +} + +/* Invoke print_string_ptr (which is useful) on an item. */ +static unsigned char *print_string(const cJSON * const item, printbuffer * const p, const internal_hooks * const hooks) +{ + return print_string_ptr((unsigned char*)item->valuestring, p, hooks); +} + +/* Predeclare these prototypes. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); + +/* Utility to jump whitespace and cr/lf */ +static const unsigned char *skip_whitespace(const unsigned char *in) +{ + while (in && *in && (*in <= 32)) + { + in++; + } + + return in; +} + +/* Parse an object - create a new root, and populate. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, cjbool require_null_terminated) +{ + const unsigned char *end = NULL; + /* use global error pointer if no specific one was given */ + const unsigned char **ep = return_parse_end ? (const unsigned char**)return_parse_end : &global_ep; + cJSON *c = cJSON_New_Item(&global_hooks); + *ep = NULL; + if (!c) /* memory fail */ + { + return NULL; + } + + end = parse_value(c, skip_whitespace((const unsigned char*)value), ep, &global_hooks); + if (!end) + { + /* parse failure. ep is set. */ + cJSON_Delete(c); + return NULL; + } + + /* if we require null-terminated JSON without appended garbage, skip and then check for a null terminator */ + if (require_null_terminated) + { + end = skip_whitespace(end); + if (*end) + { + cJSON_Delete(c); + *ep = end; + return NULL; + } + } + if (return_parse_end) + { + *return_parse_end = (const char*)end; + } + + return c; +} + +/* Default options for cJSON_Parse */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value) +{ + return cJSON_ParseWithOpts(value, 0, 0); +} + +#define min(a, b) ((a < b) ? a : b) + +static unsigned char *print(const cJSON * const item, cjbool format, const internal_hooks * const hooks) +{ + printbuffer buffer[1]; + unsigned char *printed = NULL; + + memset(buffer, 0, sizeof(buffer)); + + /* create buffer */ + buffer->buffer = (unsigned char*) hooks->allocate(256); + if (buffer->buffer == NULL) + { + goto fail; + } + + /* print the value */ + if (print_value(item, 0, format, buffer, hooks) == NULL) + { + goto fail; + } + update_offset(buffer); + + /* copy the buffer over to a new one */ + printed = (unsigned char*) hooks->allocate(buffer->offset + 1); + if (printed == NULL) + { + goto fail; + } + strncpy((char*)printed, (char*)buffer->buffer, min(buffer->length, buffer->offset + 1)); + printed[buffer->offset] = '\0'; /* just to be sure */ + + /* free the buffer */ + hooks->deallocate(buffer->buffer); + + return printed; + +fail: + if (buffer->buffer != NULL) + { + hooks->deallocate(buffer->buffer); + } + + if (printed != NULL) + { + hooks->deallocate(printed); + } + + return NULL; +} + +/* Render a cJSON item/entity/structure to text. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item) +{ + return (char*)print(item, true, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item) +{ + return (char*)print(item, false, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, cjbool fmt) +{ + printbuffer p; + + if (prebuffer < 0) + { + return NULL; + } + + p.buffer = (unsigned char*)global_hooks.allocate((size_t)prebuffer); + if (!p.buffer) + { + return NULL; + } + + p.length = (size_t)prebuffer; + p.offset = 0; + p.noalloc = false; + + return (char*)print_value(item, 0, fmt, &p, &global_hooks); +} + +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const cjbool fmt) +{ + printbuffer p; + + if (len < 0) + { + return false; + } + + p.buffer = (unsigned char*)buf; + p.length = (size_t)len; + p.offset = 0; + p.noalloc = true; + return print_value(item, 0, fmt, &p, &global_hooks) != NULL; +} + +/* Parser core - when encountering text, process appropriately. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + if (input == NULL) + { + return NULL; /* no input */ + } + + /* parse the different types of values */ + /* null */ + if (!strncmp((const char*)input, "null", 4)) + { + item->type = cJSON_NULL; + return input + 4; + } + /* false */ + if (!strncmp((const char*)input, "false", 5)) + { + item->type = cJSON_False; + return input + 5; + } + /* true */ + if (!strncmp((const char*)input, "true", 4)) + { + item->type = cJSON_True; + item->valueint = 1; + return input + 4; + } + /* string */ + if (*input == '\"') + { + return parse_string(item, input, error_pointer, hooks); + } + /* number */ + if ((*input == '-') || ((*input >= '0') && (*input <= '9'))) + { + return parse_number(item, input); + } + /* array */ + if (*input == '[') + { + return parse_array(item, input, error_pointer, hooks); + } + /* object */ + if (*input == '{') + { + return parse_object(item, input, error_pointer, hooks); + } + + /* failure. */ + *error_pointer = input; + return NULL; +} + +/* Render a value to text. */ +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + + if ((item == NULL) || (output_buffer == NULL)) + { + return NULL; + } + + switch ((item->type) & 0xFF) + { + case cJSON_NULL: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "null"); + } + break; + case cJSON_False: + output = ensure(output_buffer, 6, hooks); + if (output != NULL) + { + strcpy((char*)output, "false"); + } + break; + case cJSON_True: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "true"); + } + break; + case cJSON_Number: + output = print_number(item, output_buffer, hooks); + break; + case cJSON_Raw: + { + size_t raw_length = 0; + if (item->valuestring == NULL) + { + if (!output_buffer->noalloc) + { + hooks->deallocate(output_buffer->buffer); + } + output = NULL; + break; + } + + raw_length = strlen(item->valuestring) + sizeof('\0'); + output = ensure(output_buffer, raw_length, hooks); + if (output != NULL) + { + memcpy(output, item->valuestring, raw_length); + } + break; + } + case cJSON_String: + output = print_string(item, output_buffer, hooks); + break; + case cJSON_Array: + output = print_array(item, depth, format, output_buffer, hooks); + break; + case cJSON_Object: + output = print_object(item, depth, format, output_buffer, hooks); + break; + default: + output = NULL; + break; + } + + return output; +} + +/* Build an array from input text. */ +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* head of the linked list */ + cJSON *current_item = NULL; + + if (*input != '[') + { + /* not an array */ + *error_pointer = input; + goto fail; + } + + input = skip_whitespace(input + 1); + if (*input == ']') + { + /* empty array */ + goto success; + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse next value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != ']') + { + *error_pointer = input; + goto fail; /* expected end of array */ + } + +success: + item->type = cJSON_Array; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an array to text */ +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + cJSON *current_element = item->child; + size_t output_offset = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output array. */ + /* opening square bracket */ + output_offset = output_buffer->offset; + output_pointer = ensure(output_buffer, 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer = '['; + output_buffer->offset++; + + while (current_element != NULL) + { + if (print_value(current_element, depth + 1, format, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + if (current_element->next) + { + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ','; + if(format) + { + *output_pointer++ = ' '; + } + *output_pointer = '\0'; + output_buffer->offset += length; + } + current_element = current_element->next; + } + + output_pointer = ensure(output_buffer, 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ']'; + *output_pointer = '\0'; + output = output_buffer->buffer + output_offset; + + return output; +} + +/* Build an object from the text. */ +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* linked list head */ + cJSON *current_item = NULL; + + if (*input != '{') + { + *error_pointer = input; + goto fail; /* not an object */ + } + + input = skip_whitespace(input + 1); + if (*input == '}') + { + goto success; /* empty object */ + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse the name of the child */ + input = skip_whitespace(input + 1); + input = parse_string(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* faile to parse name */ + } + + /* swap valuestring and string, because we parsed the name */ + current_item->string = current_item->valuestring; + current_item->valuestring = NULL; + + if (*input != ':') + { + *error_pointer = input; + goto fail; /* invalid object */ + } + + /* parse the value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != '}') + { + *error_pointer = input; + goto fail; /* expected end of object */ + } + +success: + item->type = cJSON_Object; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an object to text. */ +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + size_t output_offset = 0; + cJSON *current_item = item->child; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output: */ + output_offset = output_buffer->offset; + length = format ? 2 : 1; /* fmt: {\n */ + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer++ = '{'; + if (format) + { + *output_pointer++ = '\n'; + } + output_buffer->offset += length; + + while (current_item) + { + if (format) + { + size_t i; + output_pointer = ensure(output_buffer, depth + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + for (i = 0; i < depth + 1; i++) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += depth + 1; + } + + /* print key */ + if (print_string_ptr((unsigned char*)current_item->string, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ':'; + if (format) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += length; + + /* print value */ + if (!print_value(current_item, depth + 1, format, output_buffer, hooks)) + { + return NULL; + } + update_offset(output_buffer); + + /* print comma if not last */ + length = (size_t) (format ? 1 : 0) + (current_item->next ? 1 : 0); + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (current_item->next) + { + *output_pointer++ = ','; + } + + if (format) + { + *output_pointer++ = '\n'; + } + *output_pointer = '\0'; + output_buffer->offset += length; + + current_item = current_item->next; + } + + output_pointer = ensure(output_buffer, format ? (depth + 2) : 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (format) + { + size_t i; + for (i = 0; i < (depth); i++) + { + *output_pointer++ = '\t'; + } + } + *output_pointer++ = '}'; + *output_pointer = '\0'; + output = (output_buffer->buffer) + output_offset; + + return output; +} + +/* Get Array size/item / object item. */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array) +{ + cJSON *c = array->child; + size_t i = 0; + while(c) + { + i++; + c = c->next; + } + + /* FIXME: Can overflow here. Cannot be fixed without breaking the API */ + + return (int)i; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item) +{ + cJSON *c = array ? array->child : NULL; + while (c && item > 0) + { + item--; + c = c->next; + } + + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string) +{ + cJSON *c = object ? object->child : NULL; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + c = c->next; + } + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON * const object, const char * const string) +{ + cJSON *current_element = NULL; + + if ((object == NULL) || (string == NULL)) + { + return NULL; + } + + current_element = object->child; + while ((current_element != NULL) && (strcmp(string, current_element->string) != 0)) + { + current_element = current_element->next; + } + + return current_element; +} + +CJSON_PUBLIC(cjbool) cJSON_HasObjectItem(const cJSON *object, const char *string) +{ + return cJSON_GetObjectItem(object, string) ? 1 : 0; +} + +/* 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(const cJSON *item, const internal_hooks * const hooks) +{ + cJSON *ref = cJSON_New_Item(hooks); + if (!ref) + { + return NULL; + } + memcpy(ref, item, sizeof(cJSON)); + ref->string = NULL; + ref->type |= cJSON_IsReference; + ref->next = ref->prev = NULL; + return ref; +} + +/* Add item to array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item) +{ + cJSON *child = NULL; + + if ((item == NULL) || (array == NULL)) + { + return; + } + + child = array->child; + + if (child == NULL) + { + /* list is empty, start new one */ + array->child = item; + } + else + { + /* append to the end */ + while (child->next) + { + child = child->next; + } + suffix_object(child, item); + } +} + +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item) +{ + /* call cJSON_AddItemToObjectCS for code reuse */ + cJSON_AddItemToObjectCS(object, (char*)cJSON_strdup((const unsigned char*)string, &global_hooks), item); + /* remove cJSON_StringIsConst flag */ + item->type &= ~cJSON_StringIsConst; +} + +/* Add an item to an object with constant string as key */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item) +{ + if (!item) + { + return; + } + if (!(item->type & cJSON_StringIsConst) && item->string) + { + global_hooks.deallocate(item->string); + } +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wcast-qual" + item->string = (char*)string; +#pragma GCC diagnostic pop + item->type |= cJSON_StringIsConst; + cJSON_AddItemToArray(object, item); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) +{ + cJSON_AddItemToArray(array, create_reference(item, &global_hooks)); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item) +{ + cJSON_AddItemToObject(object, string, create_reference(item, &global_hooks)); +} + +static cJSON *DetachItemFromArray(cJSON *array, size_t which) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + /* item doesn't exist */ + return NULL; + } + if (c->prev) + { + /* not the first element */ + c->prev->next = c->next; + } + if (c->next) + { + c->next->prev = c->prev; + } + if (c==array->child) + { + array->child = c->next; + } + /* make sure the detached item doesn't point anywhere anymore */ + c->prev = c->next = NULL; + + return c; +} +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which) +{ + if (which < 0) + { + return NULL; + } + + return DetachItemFromArray(array, (size_t)which); +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which) +{ + cJSON_Delete(cJSON_DetachItemFromArray(array, which)); +} + +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string) +{ + size_t i = 0; + cJSON *c = object->child; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if (c) + { + return DetachItemFromArray(object, i); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string) +{ + cJSON_Delete(cJSON_DetachItemFromObject(object, string)); +} + +/* Replace array/object items with new ones. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + cJSON_AddItemToArray(array, newitem); + return; + } + newitem->next = c; + newitem->prev = c->prev; + c->prev = newitem; + if (c == array->child) + { + array->child = newitem; + } + else + { + newitem->prev->next = newitem; + } +} + +static void ReplaceItemInArray(cJSON *array, size_t 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 = NULL; + cJSON_Delete(c); +} +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem) +{ + if (which < 0) + { + return; + } + + ReplaceItemInArray(array, (size_t)which, newitem); +} + +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object, const char *string, cJSON *newitem) +{ + size_t i = 0; + cJSON *c = object->child; + while(c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if(c) + { + /* free the old string if not const */ + if (!(newitem->type & cJSON_StringIsConst) && newitem->string) + { + global_hooks.deallocate(newitem->string); + } + + newitem->string = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + ReplaceItemInArray(object, i, newitem); + } +} + +/* Create basic types: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_NULL; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_True; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(cjbool b) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = b ? cJSON_True : cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Number; + item->valuedouble = num; + + /* use saturation in case of overflow */ + if (num >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (num <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)num; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_String; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Raw; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)raw, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type=cJSON_Array; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if (item) + { + item->type = cJSON_Object; + } + + return item; +} + +/* Create Arrays: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if (!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0;a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for (i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateString(strings[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p,n); + } + p = n; + } + + return a; +} + +/* Duplication */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, cjbool recurse) +{ + cJSON *newitem = NULL; + cJSON *child = NULL; + cJSON *next = NULL; + cJSON *newchild = NULL; + + /* Bail on bad ptr */ + if (!item) + { + goto fail; + } + /* Create new item */ + newitem = cJSON_New_Item(&global_hooks); + if (!newitem) + { + goto fail; + } + /* Copy over all vars */ + newitem->type = item->type & (~cJSON_IsReference); + newitem->valueint = item->valueint; + newitem->valuedouble = item->valuedouble; + if (item->valuestring) + { + newitem->valuestring = (char*)cJSON_strdup((unsigned char*)item->valuestring, &global_hooks); + if (!newitem->valuestring) + { + goto fail; + } + } + if (item->string) + { + newitem->string = (item->type&cJSON_StringIsConst) ? item->string : (char*)cJSON_strdup((unsigned char*)item->string, &global_hooks); + if (!newitem->string) + { + goto fail; + } + } + /* If non-recursive, then we're done! */ + if (!recurse) + { + return newitem; + } + /* Walk the ->next chain for the child. */ + child = item->child; + while (child != NULL) + { + newchild = cJSON_Duplicate(child, true); /* Duplicate (with recurse) each item in the ->next chain */ + if (!newchild) + { + goto fail; + } + if (next != NULL) + { + /* If newitem->child already set, then crosswire ->prev and ->next and move on */ + next->next = newchild; + newchild->prev = next; + next = newchild; + } + else + { + /* Set newitem->child and move to it */ + newitem->child = newchild; + next = newchild; + } + child = child->next; + } + + return newitem; + +fail: + if (newitem != NULL) + { + cJSON_Delete(newitem); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_Minify(char *json) +{ + unsigned char *into = (unsigned char*)json; + while (*json) + { + if (*json == ' ') + { + json++; + } + else if (*json == '\t') + { + /* Whitespace characters. */ + json++; + } + else if (*json == '\r') + { + json++; + } + else if (*json=='\n') + { + json++; + } + else if ((*json == '/') && (json[1] == '/')) + { + /* double-slash comments, to end of line. */ + while (*json && (*json != '\n')) + { + json++; + } + } + else if ((*json == '/') && (json[1] == '*')) + { + /* multiline comments. */ + while (*json && !((*json == '*') && (json[1] == '/'))) + { + json++; + } + json += 2; + } + else if (*json == '\"') + { + /* string literals, which are \" sensitive. */ + *into++ = (unsigned char)*json++; + while (*json && (*json != '\"')) + { + if (*json == '\\') + { + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + else + { + /* All other characters. */ + *into++ = (unsigned char)*json++; + } + } + + /* and null-terminate. */ + *into = '\0'; +} diff --git a/libs/libks/src/cJSON_Utils.c b/libs/libks/src/cJSON_Utils.c new file mode 100644 index 0000000000..24454b5d45 --- /dev/null +++ b/libs/libks/src/cJSON_Utils.c @@ -0,0 +1,881 @@ +#include +#include +#include +#include +#include + +#include "ks_cJSON_Utils.h" + +static unsigned char* cJSONUtils_strdup(const unsigned char* str) +{ + size_t len = 0; + unsigned char *copy = NULL; + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)malloc(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +static int cJSONUtils_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if(*s1 == 0) + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +/* JSON Pointer implementation: */ +static int cJSONUtils_Pstrcasecmp(const unsigned char *a, const unsigned char *e) +{ + if (!a || !e) + { + return (a == e) ? 0 : 1; /* both NULL? */ + } + for (; *a && *e && (*e != '/'); a++, e++) /* compare until next '/' */ + { + if (*e == '~') + { + /* check for escaped '~' (~0) and '/' (~1) */ + if (!((e[1] == '0') && (*a == '~')) && !((e[1] == '1') && (*a == '/'))) + { + /* invalid escape sequence or wrong character in *a */ + return 1; + } + else + { + e++; + } + } + else if (tolower(*a) != tolower(*e)) + { + return 1; + } + } + if (((*e != 0) && (*e != '/')) != (*a != 0)) + { + /* one string has ended, the other not */ + return 1; + } + + return 0; +} + +static size_t cJSONUtils_PointerEncodedstrlen(const unsigned char *s) +{ + size_t l = 0; + for (; *s; s++, l++) + { + if ((*s == '~') || (*s == '/')) + { + l++; + } + } + + return l; +} + +static void cJSONUtils_PointerEncodedstrcpy(unsigned char *d, const unsigned char *s) +{ + for (; *s; s++) + { + if (*s == '/') + { + *d++ = '~'; + *d++ = '1'; + } + else if (*s == '~') + { + *d++ = '~'; + *d++ = '0'; + } + else + { + *d++ = *s; + } + } + + *d = '\0'; +} + +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target) +{ + int type = object->type; + size_t c = 0; + cJSON *obj = 0; + + if (object == target) + { + /* found */ + return (char*)cJSONUtils_strdup((const unsigned char*)""); + } + + /* recursively search all children of the object */ + for (obj = object->child; obj; obj = obj->next, c++) + { + unsigned char *found = (unsigned char*)cJSONUtils_FindPointerFromObjectTo(obj, target); + if (found) + { + if ((type & 0xFF) == cJSON_Array) + { + /* reserve enough memory for a 64 bit integer + '/' and '\0' */ + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + 23); + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(found); + return NULL; + } + sprintf((char*)ret, "/%lu%s", (unsigned long)c, found); /* / */ + free(found); + + return (char*)ret; + } + else if ((type & 0xFF) == cJSON_Object) + { + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + cJSONUtils_PointerEncodedstrlen((unsigned char*)obj->string) + 2); + *ret = '/'; + cJSONUtils_PointerEncodedstrcpy(ret + 1, (unsigned char*)obj->string); + strcat((char*)ret, (char*)found); + free(found); + + return (char*)ret; + } + + /* reached leaf of the tree, found nothing */ + free(found); + return NULL; + } + } + + /* not found */ + return NULL; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer) +{ + /* follow path of the pointer */ + while ((*pointer++ == '/') && object) + { + if ((object->type & 0xFF) == cJSON_Array) + { + size_t which = 0; + /* parse array index */ + while ((*pointer >= '0') && (*pointer <= '9')) + { + which = (10 * which) + (size_t)(*pointer++ - '0'); + } + if (*pointer && (*pointer != '/')) + { + /* not end of string or new path token */ + return NULL; + } + if (which > INT_MAX) + { + return NULL; + } + object = cJSON_GetArrayItem(object, (int)which); + } + else if ((object->type & 0xFF) == cJSON_Object) + { + object = object->child; + /* GetObjectItem. */ + while (object && cJSONUtils_Pstrcasecmp((unsigned char*)object->string, (const unsigned char*)pointer)) + { + object = object->next; + } + /* skip to the next path token or end of string */ + while (*pointer && (*pointer != '/')) + { + pointer++; + } + } + else + { + return NULL; + } + } + + return object; +} + +/* JSON Patch implementation. */ +static void cJSONUtils_InplaceDecodePointerString(unsigned char *string) +{ + unsigned char *s2 = string; + + if (string == NULL) { + return; + } + + for (; *string; s2++, string++) + { + *s2 = (*string != '~') + ? (*string) + : ((*(++string) == '0') + ? '~' + : '/'); + } + + *s2 = '\0'; +} + +static cJSON *cJSONUtils_PatchDetach(cJSON *object, const unsigned char *path) +{ + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + cJSON *parent = NULL; + cJSON *ret = NULL; + + /* copy path and split it in parent and child */ + parentptr = cJSONUtils_strdup(path); + if (parentptr == NULL) { + return NULL; + } + + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); /* last '/' */ + if (childptr == NULL) + { + free(parentptr); + return NULL; + } + /* split strings */ + *childptr++ = '\0'; + + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + if (!parent) + { + /* Couldn't find object to remove child from. */ + ret = NULL; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + ret = cJSON_DetachItemFromArray(parent, atoi((char*)childptr)); + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + ret = cJSON_DetachItemFromObject(parent, (char*)childptr); + } + free(parentptr); + + /* return the detachted item */ + return ret; +} + +static int cJSONUtils_Compare(cJSON *a, cJSON *b) +{ + if ((a == NULL) || (b == NULL) || ((a->type & 0xFF) != (b->type & 0xFF))) + { + /* mismatched type. */ + return -1; + } + switch (a->type & 0xFF) + { + case cJSON_Number: + /* numeric mismatch. */ + return ((a->valueint != b->valueint) || (a->valuedouble != b->valuedouble)) ? -2 : 0; + case cJSON_String: + /* string mismatch. */ + return (strcmp(a->valuestring, b->valuestring) != 0) ? -3 : 0; + case cJSON_Array: + for (a = a->child, b = b->child; a && b; a = a->next, b = b->next) + { + int err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + } + /* array size mismatch? (one of both children is not NULL) */ + return (a || b) ? -4 : 0; + case cJSON_Object: + cJSONUtils_SortObject(a); + cJSONUtils_SortObject(b); + a = a->child; + b = b->child; + while (a && b) + { + int err = 0; + /* compare object keys */ + if (cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)) + { + /* missing member */ + return -6; + } + err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + a = a->next; + b = b->next; + } + /* object length mismatch (one of both children is not null) */ + return (a || b) ? -5 : 0; + + default: + break; + } + /* null, true or false */ + return 0; +} + +static int cJSONUtils_ApplyPatch(cJSON *object, cJSON *patch) +{ + cJSON *op = NULL; + cJSON *path = NULL; + cJSON *value = NULL; + cJSON *parent = NULL; + int opcode = 0; + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + + op = cJSON_GetObjectItem(patch, "op"); + path = cJSON_GetObjectItem(patch, "path"); + if (!op || !path) + { + /* malformed patch. */ + return 2; + } + + /* decode operation */ + if (!strcmp(op->valuestring, "add")) + { + opcode = 0; + } + else if (!strcmp(op->valuestring, "remove")) + { + opcode = 1; + } + else if (!strcmp(op->valuestring, "replace")) + { + opcode = 2; + } + else if (!strcmp(op->valuestring, "move")) + { + opcode = 3; + } + else if (!strcmp(op->valuestring, "copy")) + { + opcode = 4; + } + else if (!strcmp(op->valuestring, "test")) + { + /* compare value: {...} with the given path */ + return cJSONUtils_Compare(cJSONUtils_GetPointer(object, path->valuestring), cJSON_GetObjectItem(patch, "value")); + } + else + { + /* unknown opcode. */ + return 3; + } + + /* Remove/Replace */ + if ((opcode == 1) || (opcode == 2)) + { + /* Get rid of old. */ + cJSON_Delete(cJSONUtils_PatchDetach(object, (unsigned char*)path->valuestring)); + if (opcode == 1) + { + /* For Remove, this is job done. */ + return 0; + } + } + + /* Copy/Move uses "from". */ + if ((opcode == 3) || (opcode == 4)) + { + cJSON *from = cJSON_GetObjectItem(patch, "from"); + if (!from) + { + /* missing "from" for copy/move. */ + return 4; + } + + if (opcode == 3) + { + /* move */ + value = cJSONUtils_PatchDetach(object, (unsigned char*)from->valuestring); + } + if (opcode == 4) + { + /* copy */ + value = cJSONUtils_GetPointer(object, from->valuestring); + } + if (!value) + { + /* missing "from" for copy/move. */ + return 5; + } + if (opcode == 4) + { + value = cJSON_Duplicate(value, 1); + } + if (!value) + { + /* out of memory for copy/move. */ + return 6; + } + } + else /* Add/Replace uses "value". */ + { + value = cJSON_GetObjectItem(patch, "value"); + if (!value) + { + /* missing "value" for add/replace. */ + return 7; + } + value = cJSON_Duplicate(value, 1); + if (!value) + { + /* out of memory for add/replace. */ + return 8; + } + } + + /* Now, just add "value" to "path". */ + + /* split pointer in parent and child */ + parentptr = cJSONUtils_strdup((unsigned char*)path->valuestring); + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); + if (childptr) + { + *childptr++ = '\0'; + } + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + /* add, remove, replace, move, copy, test. */ + if (!parent) + { + /* Couldn't find object to add to. */ + free(parentptr); + cJSON_Delete(value); + return 9; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + if (!strcmp((char*)childptr, "-")) + { + cJSON_AddItemToArray(parent, value); + } + else + { + cJSON_InsertItemInArray(parent, atoi((char*)childptr), value); + } + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + cJSON_DeleteItemFromObject(parent, (char*)childptr); + cJSON_AddItemToObject(parent, (char*)childptr, value); + } + else + { + cJSON_Delete(value); + } + free(parentptr); + + return 0; +} + +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches) +{ + int err = 0; + + if (patches == NULL) + { + return 1; + } + + if ((patches->type & 0xFF) != cJSON_Array) + { + /* malformed patches. */ + return 1; + } + if (patches) + { + patches = patches->child; + } + while (patches) + { + if ((err = cJSONUtils_ApplyPatch(object, patches))) + { + return err; + } + patches = patches->next; + } + + return 0; +} + +static void cJSONUtils_GeneratePatch(cJSON *patches, const unsigned char *op, const unsigned char *path, const unsigned char *suffix, cJSON *val) +{ + cJSON *patch = cJSON_CreateObject(); + cJSON_AddItemToObject(patch, "op", cJSON_CreateString((const char*)op)); + if (suffix) + { + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen(suffix) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", (const char*)path), suffix); + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)newpath)); + free(newpath); + } + else + { + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)path)); + } + if (val) + { + cJSON_AddItemToObject(patch, "value", cJSON_Duplicate(val, 1)); + } + cJSON_AddItemToArray(patches, patch); +} + +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val) +{ + cJSONUtils_GeneratePatch(array, (const unsigned char*)op, (const unsigned char*)path, 0, val); +} + +static void cJSONUtils_CompareToPatch(cJSON *patches, const unsigned char *path, cJSON *from, cJSON *to) +{ + if ((from == NULL) || (to == NULL)) + { + return; + } + + if ((from->type & 0xFF) != (to->type & 0xFF)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + return; + } + + switch ((from->type & 0xFF)) + { + case cJSON_Number: + if ((from->valueint != to->valueint) || (from->valuedouble != to->valuedouble)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_String: + if (strcmp(from->valuestring, to->valuestring) != 0) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_Array: + { + size_t c = 0; + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + 23); /* Allow space for 64bit int. */ + /* generate patches for all array elements that exist in "from" and "to" */ + for (c = 0, from = from->child, to = to->child; from && to; from = from->next, to = to->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%s/%lu", path, (unsigned long)c); /* path of the current array element */ + cJSONUtils_CompareToPatch(patches, newpath, from, to); + } + /* remove leftover elements from 'from' that are not in 'to' */ + for (; from; from = from->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%lu", (unsigned long)c); + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, newpath, 0); + } + /* add new elements in 'to' that were not in 'from' */ + for (; to; to = to->next, c++) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (const unsigned char*)"-", to); + } + free(newpath); + return; + } + + case cJSON_Object: + { + cJSON *a = NULL; + cJSON *b = NULL; + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + a = from->child; + b = to->child; + /* for all object values in the object with more of them */ + while (a || b) + { + int diff = (!a) ? 1 : ((!b) ? -1 : cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)); + if (!diff) + { + /* both object keys are the same */ + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen((unsigned char*)a->string) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", path), (unsigned char*)a->string); + /* create a patch for the element */ + cJSONUtils_CompareToPatch(patches, newpath, a, b); + free(newpath); + a = a->next; + b = b->next; + } + else if (diff < 0) + { + /* object element doesn't exist in 'to' --> remove it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, (unsigned char*)a->string, 0); + a = a->next; + } + else + { + /* object element doesn't exist in 'from' --> add it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (unsigned char*)b->string, b); + b = b->next; + } + } + return; + } + + default: + break; + } +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to) +{ + cJSON *patches = cJSON_CreateArray(); + cJSONUtils_CompareToPatch(patches, (const unsigned char*)"", from, to); + + return patches; +} + +/* sort lists using mergesort */ +static cJSON *cJSONUtils_SortList(cJSON *list) +{ + cJSON *first = list; + cJSON *second = list; + cJSON *ptr = list; + + if (!list || !list->next) + { + /* One entry is sorted already. */ + return list; + } + + while (ptr && ptr->next && (cJSONUtils_strcasecmp((unsigned char*)ptr->string, (unsigned char*)ptr->next->string) < 0)) + { + /* Test for list sorted. */ + ptr = ptr->next; + } + if (!ptr || !ptr->next) + { + /* Leave sorted lists unmodified. */ + return list; + } + + /* reset ptr to the beginning */ + ptr = list; + while (ptr) + { + /* Walk two pointers to find the middle. */ + second = second->next; + ptr = ptr->next; + /* advances ptr two steps at a time */ + if (ptr) + { + ptr = ptr->next; + } + } + if (second && second->prev) + { + /* Split the lists */ + second->prev->next = NULL; + } + + /* Recursively sort the sub-lists. */ + first = cJSONUtils_SortList(first); + second = cJSONUtils_SortList(second); + list = ptr = NULL; + + while (first && second) /* Merge the sub-lists */ + { + if (cJSONUtils_strcasecmp((unsigned char*)first->string, (unsigned char*)second->string) < 0) + { + if (!list) + { + /* start merged list with the first element of the first list */ + list = ptr = first; + } + else + { + /* add first element of first list to merged list */ + ptr->next = first; + first->prev = ptr; + ptr = first; + } + first = first->next; + } + else + { + if (!list) + { + /* start merged list with the first element of the second list */ + list = ptr = second; + } + else + { + /* add first element of second list to merged list */ + ptr->next = second; + second->prev = ptr; + ptr = second; + } + second = second->next; + } + } + if (first) + { + /* Append rest of first list. */ + if (!list) + { + return first; + } + ptr->next = first; + first->prev = ptr; + } + if (second) + { + /* Append rest of second list */ + if (!list) + { + return second; + } + ptr->next = second; + second->prev = ptr; + } + + return list; +} + +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object) +{ + object->child = cJSONUtils_SortList(object->child); +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch) +{ + if (!patch || ((patch->type & 0xFF) != cJSON_Object)) + { + /* scalar value, array or NULL, just duplicate */ + cJSON_Delete(target); + return cJSON_Duplicate(patch, 1); + } + + if (!target || ((target->type & 0xFF) != cJSON_Object)) + { + cJSON_Delete(target); + target = cJSON_CreateObject(); + } + + patch = patch->child; + while (patch) + { + if ((patch->type & 0xFF) == cJSON_NULL) + { + /* NULL is the indicator to remove a value, see RFC7396 */ + cJSON_DeleteItemFromObject(target, patch->string); + } + else + { + cJSON *replaceme = cJSON_DetachItemFromObject(target, patch->string); + cJSON_AddItemToObject(target, patch->string, cJSONUtils_MergePatch(replaceme, patch)); + } + patch = patch->next; + } + return target; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to) +{ + cJSON *patch = NULL; + if (!to) + { + /* patch to delete everything */ + return cJSON_CreateNull(); + } + if (((to->type & 0xFF) != cJSON_Object) || !from || ((from->type & 0xFF) != cJSON_Object)) + { + return cJSON_Duplicate(to, 1); + } + + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + from = from->child; + to = to->child; + patch = cJSON_CreateObject(); + while (from || to) + { + int compare = from ? (to ? strcmp(from->string, to->string) : -1) : 1; + if (compare < 0) + { + /* from has a value that to doesn't have -> remove */ + cJSON_AddItemToObject(patch, from->string, cJSON_CreateNull()); + from = from->next; + } + else if (compare > 0) + { + /* to has a value that from doesn't have -> add to patch */ + cJSON_AddItemToObject(patch, to->string, cJSON_Duplicate(to, 1)); + to = to->next; + } + else + { + /* object key exists in both objects */ + if (cJSONUtils_Compare(from, to)) + { + /* not identical --> generate a patch */ + cJSON_AddItemToObject(patch, to->string, cJSONUtils_GenerateMergePatch(from, to)); + } + /* next key in the object */ + from = from->next; + to = to->next; + } + } + if (!patch->child) + { + cJSON_Delete(patch); + return NULL; + } + + return patch; +} diff --git a/libs/libks/src/include/ks_cJSON.h b/libs/libks/src/include/ks_cJSON.h new file mode 100644 index 0000000000..79dbb98157 --- /dev/null +++ b/libs/libks/src/include/ks_cJSON.h @@ -0,0 +1,223 @@ +/* + 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. +*/ + +#ifndef cJSON__h +#define cJSON__h + +#ifdef __cplusplus +extern "C" +{ +#endif + +/* project version */ +#define CJSON_VERSION_MAJOR 1 +#define CJSON_VERSION_MINOR 3 +#define CJSON_VERSION_PATCH 0 + +#include + +/* cJSON Types: */ +#define cJSON_Invalid (0) +#define cJSON_False (1 << 0) +#define cJSON_True (1 << 1) +#define cJSON_NULL (1 << 2) +#define cJSON_Number (1 << 3) +#define cJSON_String (1 << 4) +#define cJSON_Array (1 << 5) +#define cJSON_Object (1 << 6) +#define cJSON_Raw (1 << 7) /* raw json */ + +#define cJSON_IsReference 256 +#define cJSON_StringIsConst 512 + +/* The cJSON structure: */ +typedef struct cJSON +{ + /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ + struct cJSON *next; + struct cJSON *prev; + /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ + struct cJSON *child; + + /* The type of the item, as above. */ + int type; + + /* The item's string, if type==cJSON_String and type == cJSON_Raw */ + char *valuestring; + /* The item's number, if type==cJSON_Number */ + int valueint; + /* The item's number, if type==cJSON_Number */ + double valuedouble; + + /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ + char *string; +} cJSON; + +typedef struct cJSON_Hooks +{ + void *(*malloc_fn)(size_t sz); + void (*free_fn)(void *ptr); +} cJSON_Hooks; + +#if !defined(__WINDOWS__) && (defined(WIN32) || defined(WIN64) || defined(_MSC_VER) || defined(_WIN32)) +#define __WINDOWS__ +#endif +#ifdef __WINDOWS__ + +/* When compiling for windows, we specify a specific calling convention to avoid issues where we are being called from a project with a different default calling convention. For windows you have 2 define options: + +CJSON_HIDE_SYMBOLS - Define this in the case where you don't want to ever dllexport symbols +CJSON_EXPORT_SYMBOLS - Define this on library build when you want to dllexport symbols + +For *nix builds that support visibility attribute, you can define similar behavior by + +setting default visibility to hidden by adding +-fvisibility=hidden (for gcc) +or +-xldscope=hidden (for sun cc) +to CFLAGS + +then using the CJSON_API_VISIBILITY flag to "export" the same symbols the way CJSON_EXPORT_SYMBOLS does + +*/ + +#if defined(CJSON_HIDE_SYMBOLS) +#define CJSON_PUBLIC(type) type __stdcall +#elif defined(CJSON_EXPORT_SYMBOLS) +#define CJSON_PUBLIC(type) __declspec(dllexport) type __stdcall +#else +#define CJSON_PUBLIC(type) __declspec(dllimport) type __stdcall +#endif +#else /* !WIN32 */ +#if (defined(__GNUC__) || defined(__SUNPRO_CC) || defined (__SUNPRO_C)) && defined(CJSON_API_VISIBILITY) +#define CJSON_PUBLIC(type) __attribute__((visibility("default"))) type +#else +#define CJSON_PUBLIC(type) type +#endif +#endif + +/* returns the version of cJSON as a string */ +CJSON_PUBLIC(const char*) cJSON_Version(void); + +/* Supply malloc, realloc and free functions to cJSON */ +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks); + + +/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value); +/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item); +/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item); +/* Render a cJSON entity to text using a buffered strategy. prebuffer is a guess at the final size. guessing well reduces reallocation. fmt=0 gives unformatted, =1 gives formatted */ +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, int fmt); +/* Render a cJSON entity to text using a buffer already allocated in memory with length buf_len. Returns 1 on success and 0 on failure. */ +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const int fmt); +/* Delete a cJSON entity and all subentities. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c); + +/* Returns the number of items in an array (or object). */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array); +/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item); +/* Get item "string" from object. Case insensitive. */ +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string); +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON *object, const char *string); +CJSON_PUBLIC(int) cJSON_HasObjectItem(const cJSON *object, const char *string); +/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void); + +/* These calls create a cJSON item of the appropriate type. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(int b); +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num); +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string); +/* raw json */ +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw); +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void); + +/* These utilities create an Array of count items. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count); + +/* Append item to the specified array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item); +/* Use this when string is definitely const (i.e. a literal, or as good as), and will definitely survive the cJSON object. + * WARNING: When this function was used, make sure to always check that (item->type & cJSON_StringIsConst) is zero before + * writing to `item->string` */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item); +/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item); + +/* Remove/Detatch items from Arrays/Objects. */ +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string); +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string); + +/* Update array items. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem); /* Shifts pre-existing items to the right. */ +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem); +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); + +/* Duplicate a cJSON item */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, int recurse); +/* Duplicate will create a new, identical cJSON item to the one you pass, in new memory that will +need to be released. With recurse!=0, it will duplicate any children connected to the item. +The item->next and ->prev pointers are always zero on return from Duplicate. */ + +/* ParseWithOpts allows you to require (and check) that the JSON is null terminated, and to retrieve the pointer to the final byte parsed. */ +/* If you supply a ptr in return_parse_end and parsing fails, then return_parse_end will contain a pointer to the error. If not, then cJSON_GetErrorPtr() does the job. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, int require_null_terminated); + +CJSON_PUBLIC(void) cJSON_Minify(char *json); + +/* Macros for creating things quickly. */ +#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) +#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) +#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) +#define cJSON_AddBoolToObject(object,name,b) cJSON_AddItemToObject(object, name, cJSON_CreateBool(b)) +#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) +#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) +#define cJSON_AddRawToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateRaw(s)) + +/* When assigning an integer value, it needs to be propagated to valuedouble too. */ +#define cJSON_SetIntValue(object, number) ((object) ? (object)->valueint = (object)->valuedouble = (number) : (number)) +/* helper for the cJSON_SetNumberValue macro */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number); +#define cJSON_SetNumberValue(object, number) ((object != NULL) ? cJSON_SetNumberHelper(object, (double)number) : (number)) + +/* Macro for iterating over an array */ +#define cJSON_ArrayForEach(element, array) for(element = (array != NULL) ? (array)->child : NULL; element != NULL; element = element->next) + +#ifdef __cplusplus +} +#endif + +#endif diff --git a/libs/libks/src/include/ks_cJSON_Utils.h b/libs/libks/src/include/ks_cJSON_Utils.h new file mode 100644 index 0000000000..58a9b256da --- /dev/null +++ b/libs/libks/src/include/ks_cJSON_Utils.h @@ -0,0 +1,44 @@ +#include "ks_cJSON.h" + +/* Implement RFC6901 (https://tools.ietf.org/html/rfc6901) JSON Pointer spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer); + +/* Implement RFC6902 (https://tools.ietf.org/html/rfc6902) JSON Patch spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to); +/* Utility for generating patch array entries. */ +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val); +/* Returns 0 for success. */ +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches); + +/* +// Note that ApplyPatches is NOT atomic on failure. To implement an atomic ApplyPatches, use: +//int cJSONUtils_AtomicApplyPatches(cJSON **object, cJSON *patches) +//{ +// cJSON *modme = cJSON_Duplicate(*object, 1); +// int error = cJSONUtils_ApplyPatches(modme, patches); +// if (!error) +// { +// cJSON_Delete(*object); +// *object = modme; +// } +// else +// { +// cJSON_Delete(modme); +// } +// +// return error; +//} +// Code not added to library since this strategy is a LOT slower. +*/ + +/* Implement RFC7386 (https://tools.ietf.org/html/rfc7396) JSON Merge Patch spec. */ +/* target will be modified by patch. return value is new ptr for target. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch); +/* generates a patch to move from -> to */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to); + +/* Given a root object and a target object, construct a pointer from one to the other. */ +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target); + +/* Sorts the members of the object into alphabetical order. */ +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object); diff --git a/libs/libks/src/include/ks_json.h b/libs/libks/src/include/ks_json.h index 60cdc64adf..a90400906f 100644 --- a/libs/libks/src/include/ks_json.h +++ b/libs/libks/src/include/ks_json.h @@ -1,16 +1,16 @@ /* 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 @@ -20,117 +20,33 @@ THE SOFTWARE. */ #include "ks.h" -#ifndef cJSON__h -#define cJSON__h +#ifndef KS_JSON__h +#define KS_JSON__h + +#ifdef KS_EXPORTS +#ifndef CJSON_EXPORT_SYMBOLS +#define CJSON_EXPORT_SYMBOLS 1 +#endif +#endif + +#ifdef KS_API_VISIBILITY +#ifndef CJSON_API_VISIBILITY +#define CJSON_API_VISIBILITY 1 +#endif +#endif #ifdef __cplusplus extern "C" { #endif -/* cJSON Types: */ -#define cJSON_False 0 -#define cJSON_True 1 -#define cJSON_NULL 2 -#define cJSON_Number 3 -#define cJSON_String 4 -#define cJSON_Array 5 -#define cJSON_Object 6 +#include "ks_cJSON.h" +#include "ks_cJSON_Utils.h" -#define cJSON_IsReference 256 - -/* The cJSON structure: */ -typedef struct cJSON { - struct cJSON *next,*prev; /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ - struct cJSON *child; /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ - - int type; /* The type of the item, as above. */ - - char *valuestring; /* The item's string, if type==cJSON_String */ - int valueint; /* The item's number, if type==cJSON_Number */ - double valuedouble; /* The item's number, if type==cJSON_Number */ - - char *string; /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ -} cJSON; - -typedef struct cJSON_Hooks { - void *(*malloc_fn)(size_t sz); - void (*free_fn)(void *ptr); -} cJSON_Hooks; - -/* Supply malloc, realloc and free functions to cJSON */ -KS_DECLARE(void) cJSON_InitHooks(cJSON_Hooks* hooks); - - -/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ -KS_DECLARE(cJSON *)cJSON_Parse(const char *value); -/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ -KS_DECLARE(char *)cJSON_Print(cJSON *item); -/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ -KS_DECLARE(char *)cJSON_PrintUnformatted(cJSON *item); -/* Delete a cJSON entity and all subentities. */ -KS_DECLARE(void) cJSON_Delete(cJSON *c); - -/* Returns the number of items in an array (or object). */ -KS_DECLARE(int) cJSON_GetArraySize(cJSON *array); -/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ -KS_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item); -/* Get item "string" from object. Case insensitive. */ -KS_DECLARE(cJSON *)cJSON_GetObjectItem(const cJSON *object,const char *string); +KS_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...); KS_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string); -/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ -KS_DECLARE(const char *)cJSON_GetErrorPtr(void); - -/* These calls create a cJSON item of the appropriate type. */ -KS_DECLARE(cJSON *)cJSON_CreateNull(void); -KS_DECLARE(cJSON *)cJSON_CreateTrue(void); -KS_DECLARE(cJSON *)cJSON_CreateFalse(void); -KS_DECLARE(cJSON *)cJSON_CreateBool(int b); -KS_DECLARE(cJSON *)cJSON_CreateNumber(double num); -KS_DECLARE(cJSON *)cJSON_CreateString(const char *string); -KS_DECLARE(cJSON *)cJSON_CreateArray(void); -KS_DECLARE(cJSON *)cJSON_CreateObject(void); - -/* These utilities create an Array of count items. */ -KS_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count); -KS_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count); -KS_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count); -KS_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count); - -/* Append item to the specified array/object. */ -KS_DECLARE(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); -KS_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item); -/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ -KS_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); -KS_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item); - -/* Remove/Detatch items from Arrays/Objects. */ -KS_DECLARE(cJSON *)cJSON_DetachItemFromArray(cJSON *array,int which); -KS_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which); -KS_DECLARE(cJSON *)cJSON_DetachItemFromObject(cJSON *object,const char *string); -KS_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string); - -/* Update array items. */ -KS_DECLARE(void) cJSON_ReplaceItemInArray(cJSON *array,int which,cJSON *newitem); -KS_DECLARE(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); - -/* Duplicate a cJSON item */ -KS_DECLARE(cJSON *) cJSON_Duplicate(cJSON *item,int recurse); -/* Duplicate will create a new, identical cJSON item to the one you pass, in new memory that will - need to be released. With recurse!=0, it will duplicate any children connected to the item. - The item->next and ->prev pointers are always zero on return from Duplicate. */ - - -#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) -#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) -#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) -#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) -#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) - -KS_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...); - -static inline cJSON *json_add_child_obj(cJSON *json, const char *name, cJSON *obj) +static inline cJSON *ks_json_add_child_obj(cJSON *json, const char *name, cJSON *obj) { cJSON *new_json = NULL; @@ -149,7 +65,7 @@ static inline cJSON *json_add_child_obj(cJSON *json, const char *name, cJSON *ob return new_json; } -static inline cJSON *json_add_child_array(cJSON *json, const char *name) +static inline cJSON *ks_json_add_child_array(cJSON *json, const char *name) { cJSON *new_json = NULL; @@ -163,7 +79,7 @@ static inline cJSON *json_add_child_array(cJSON *json, const char *name) return new_json; } -static inline cJSON *json_add_child_string(cJSON *json, const char *name, const char *val) +static inline cJSON *ks_json_add_child_string(cJSON *json, const char *name, const char *val) { cJSON *new_json = NULL; diff --git a/libs/libks/src/ks_json.c b/libs/libks/src/ks_json.c index 30c73953a8..44f8bafab0 100644 --- a/libs/libks/src/ks_json.c +++ b/libs/libks/src/ks_json.c @@ -1,581 +1,4 @@ -/* - 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. -*/ - -/* cJSON */ -/* JSON parser in C. */ - -#include -#include -#include -#include -#include -#include #include "ks.h" -#include "ks_json.h" -#include - -static const char *ep; - -KS_DECLARE(const char *)cJSON_GetErrorPtr() {return ep;} - -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); -} - -static void *glue_malloc(size_t theSize) -{ - return(malloc(theSize)); -} - -static void glue_free(void *thePtr) -{ - free(thePtr); -} - -static void *(*cJSON_malloc)(size_t sz) = glue_malloc; -static void (*cJSON_free)(void *ptr) = glue_free; - -static char* cJSON_strdup(const char* str) -{ - size_t len; - char* copy; - const char *s = str ? str : ""; - - len = strlen(s) + 1; - if (!(copy = (char*)cJSON_malloc(len))) return 0; - memcpy(copy,s,len); - return copy; -} - -KS_DECLARE(void)cJSON_InitHooks(cJSON_Hooks* hooks) -{ - if (!hooks) { /* Reset hooks */ - cJSON_malloc = malloc; - cJSON_free = free; - return; - } - - cJSON_malloc = (hooks->malloc_fn)?hooks->malloc_fn:malloc; - cJSON_free = (hooks->free_fn)?hooks->free_fn:free; -} - -/* Internal constructor. */ -static cJSON *cJSON_New_Item() -{ - cJSON* node = (cJSON*)cJSON_malloc(sizeof(cJSON)); - if (node) memset(node,0,sizeof(cJSON)); - return node; -} - -/* Delete a cJSON structure. */ -KS_DECLARE(void)cJSON_Delete(cJSON *c) -{ - cJSON *next; - while (c) - { - next=c->next; - if (!(c->type&cJSON_IsReference) && c->child) cJSON_Delete(c->child); - if (!(c->type&cJSON_IsReference) && c->valuestring) cJSON_free(c->valuestring); - if (c->string) cJSON_free(c->string); - cJSON_free(c); - c=next; - } -} - -/* 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; - - /* Could use sscanf for this? */ - 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? */ - } - - n=sign*n*pow(10.0,(scale+subscale*signsubscale)); /* number = +/- number.fraction * 10^+/- exponent */ - - 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) - { - str=(char*)cJSON_malloc(21); /* 2^64+1 can be represented in 21 chars. */ - if (str) sprintf(str,"%d",item->valueint); - } - else - { - str=(char*)cJSON_malloc(64); /* This is a nice tradeoff. */ - if (str) - { - if (fabs(floor(d)-d)<=DBL_EPSILON) 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; -} - -#define is_hexdigit(c) ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F')) -static int scan_unicode(const char *ptr, unsigned int *uc) -{ - if (!is_hexdigit(*(ptr)) || !is_hexdigit(*(ptr+1)) || !is_hexdigit(*(ptr+2)) || !is_hexdigit(*(ptr+3))) return -1; - return sscanf(ptr, "%4x", uc); -} - -/* 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 *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=(char*)cJSON_malloc(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. */ - if (scan_unicode(ptr+1, &uc) < 1) break; - 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. - if (scan_unicode(ptr+3,&uc2) < 1) break; - 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 =(char)(uc | firstByteMark[len]); - } - ptr2+=len; - break; - default: *ptr2++=*ptr; break; - } - if (*ptr) 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 cJSON_strdup(""); - ptr=str;while ((token=*ptr) && ++len) {if (strchr("\"\\\b\f\n\r\t",token)) len++; else if (token<32) len+=5;ptr++;} - - out=(char*)cJSON_malloc(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); -static char *print_value(cJSON *item,int depth,int fmt); -static const char *parse_array(cJSON *item,const char *value); -static char *print_array(cJSON *item,int depth,int fmt); -static const char *parse_object(cJSON *item,const char *value); -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. */ -KS_DECLARE(cJSON *)cJSON_Parse(const char *value) -{ - cJSON *c=cJSON_New_Item(); - ep=0; - if (!c) return 0; /* memory fail */ - - if (!parse_value(c,skip(value))) {cJSON_Delete(c);return 0;} - return c; -} - -/* Render a cJSON item/entity/structure to text. */ -KS_DECLARE(char *)cJSON_Print(cJSON *item) {return print_value(item,0,1);} -KS_DECLARE(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) -{ - 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); } - if (*value=='-' || (*value>='0' && *value<='9')) { return parse_number(item,value); } - if (*value=='[') { return parse_array(item,value); } - if (*value=='{') { return parse_object(item,value); } - - 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=cJSON_strdup("null"); break; - case cJSON_False: out=cJSON_strdup("false");break; - case cJSON_True: out=cJSON_strdup("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) -{ - 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 */ - value=skip(parse_value(child,skip(value))); /* skip any spacing, get the value. */ - 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))); - 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; - size_t 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; - /* Allocate an array to hold the values for each */ - entries=(char**)cJSON_malloc(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 malloc the output string */ - if (!fail) out=(char*)cJSON_malloc(len); - /* If that fails, we fail. */ - if (!out) fail=1; - - /* Handle failure. */ - if (fail) - { - for (i=0;itype=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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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 i=0,j; - size_t len=7; - cJSON *child=item->child; - int numentries=0,fail=0; - /* Count the number of entries. */ - while (child) numentries++,child=child->next; - /* Allocate space for the names and the objects */ - entries=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!entries) return 0; - names=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!names) {cJSON_free(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=(char*)cJSON_malloc(len); - if (!out) fail=1; - - /* Handle failure */ - if (fail) - { - for (i=0;ichild;int i=0;while(c)i++,c=c->next;return i;} -KS_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item) {cJSON *c=array->child; while (c && item>0) item--,c=c->next; return c;} -KS_DECLARE(cJSON *)cJSON_GetObjectItem(const cJSON *object,const char *string) {cJSON *c=object->child; while (c && cJSON_strcasecmp(c->string,string)) c=c->next; return c;} - - -KS_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string) -{ - cJSON *cj = cJSON_GetObjectItem(object, string); - - if (!cj || cj->type != cJSON_String || !cj->valuestring) return NULL; - - return cj->valuestring; -} - - - - -/* 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. */ -KS_DECLARE(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);}} -KS_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item) {if (!item) return; if (item->string) cJSON_free(item->string);item->string=cJSON_strdup(string);cJSON_AddItemToArray(object,item);} -KS_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) {cJSON_AddItemToArray(array,create_reference(item));} -KS_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item) {cJSON_AddItemToObject(object,string,create_reference(item));} - -KS_DECLARE(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;} -KS_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which) {cJSON_Delete(cJSON_DetachItemFromArray(array,which));} -KS_DECLARE(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;} -KS_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string) {cJSON_Delete(cJSON_DetachItemFromObject(object,string));} - -/* Replace array/object items with new ones. */ -KS_DECLARE(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);} -KS_DECLARE(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=cJSON_strdup(string);cJSON_ReplaceItemInArray(object,i,newitem);}} - -/* Create basic types: */ -KS_DECLARE(cJSON *)cJSON_CreateNull() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_NULL;return item;} -KS_DECLARE(cJSON *)cJSON_CreateTrue() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_True;return item;} -KS_DECLARE(cJSON *)cJSON_CreateFalse() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_False;return item;} -KS_DECLARE(cJSON *)cJSON_CreateBool(int b) {cJSON *item=cJSON_New_Item();if(item)item->type=b?cJSON_True:cJSON_False;return item;} -KS_DECLARE(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;} -KS_DECLARE(cJSON *)cJSON_CreateString(const char *string) {cJSON *item=cJSON_New_Item();if(item){item->type=cJSON_String;item->valuestring=cJSON_strdup(string);}return item;} -KS_DECLARE(cJSON *)cJSON_CreateArray() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Array;return item;} -KS_DECLARE(cJSON *)cJSON_CreateObject() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Object;return item;} - -/* Create Arrays: */ -KS_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -KS_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -KS_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -KS_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} - -/* Duplication */ -KS_DECLARE(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=cJSON_strdup(item->valuestring); if (!newitem->valuestring) {cJSON_Delete(newitem);return 0;}} - if (item->string) {newitem->string=cJSON_strdup(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) { - newchild=cJSON_Duplicate(cptr,1); /* Duplicate (with recurse) each item in the ->next chain */ - if (!newchild) {cJSON_Delete(newitem);return 0;} - if (nptr) {nptr->next=newchild,newchild->prev=nptr;nptr=newchild;} /* If newitem->child already set, then crosswire ->prev and ->next and move on */ - else {newitem->child=newchild;nptr=newchild;} /* Set newitem->child and move to it */ - cptr=cptr->next; - } - return newitem; -} - KS_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...) { @@ -589,16 +12,22 @@ KS_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...) if (!str) return NULL; - if ((item = cJSON_New_Item())) { - item->type=cJSON_String; - item->valuestring = str; - } else { - free(str); - } + item = cJSON_CreateString(str); + + free(str); return item; } +KS_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string) +{ + cJSON *cj = cJSON_GetObjectItem(object, string); + + if (!cj || cj->type != cJSON_String || !cj->valuestring) return NULL; + + return cj->valuestring; +} + /* For Emacs: * Local Variables: * mode:c diff --git a/src/cJSON.c b/src/cJSON.c new file mode 100644 index 0000000000..cb1f9971a2 --- /dev/null +++ b/src/cJSON.c @@ -0,0 +1,2152 @@ +/* + 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. +*/ + +/* cJSON */ +/* JSON parser in C. */ + +#include +#include +#include +#include +#include +#include +#include +#include "switch_cJSON.h" + +/* define our own boolean type */ +typedef int cjbool; +#define true ((cjbool)1) +#define false ((cjbool)0) + +static const unsigned char *global_ep = NULL; + +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void) +{ + return (const char*) global_ep; +} + +/* This is a safeguard to prevent copy-pasters from using incompatible C and header files */ +#if (CJSON_VERSION_MAJOR != 1) || (CJSON_VERSION_MINOR != 3) || (CJSON_VERSION_PATCH != 0) + #error cJSON.h and cJSON.c have different versions. Make sure that both have the same. +#endif + +CJSON_PUBLIC(const char*) cJSON_Version(void) +{ + static char version[15]; + sprintf(version, "%i.%i.%i", CJSON_VERSION_MAJOR, CJSON_VERSION_MINOR, CJSON_VERSION_PATCH); + + return version; +} + +/* case insensitive strcmp */ +static int cJSON_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if (*s1 == '\0') + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +typedef struct internal_hooks +{ + void *(*allocate)(size_t size); + void (*deallocate)(void *pointer); + void *(*reallocate)(void *pointer, size_t size); +} internal_hooks; + +static internal_hooks global_hooks = { malloc, free, realloc }; + +static unsigned char* cJSON_strdup(const unsigned char* str, const internal_hooks * const hooks) +{ + size_t len = 0; + unsigned char *copy = NULL; + + if (str == NULL) + { + return NULL; + } + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)hooks->allocate(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks) +{ + if (hooks == NULL) + { + /* Reset hooks */ + global_hooks.allocate = malloc; + global_hooks.deallocate = free; + global_hooks.reallocate = realloc; + return; + } + + global_hooks.allocate = malloc; + if (hooks->malloc_fn != NULL) + { + global_hooks.allocate = hooks->malloc_fn; + } + + global_hooks.deallocate = free; + if (hooks->free_fn != NULL) + { + global_hooks.deallocate = hooks->free_fn; + } + + /* use realloc only if both free and malloc are used */ + global_hooks.reallocate = NULL; + if ((global_hooks.allocate == malloc) && (global_hooks.deallocate == free)) + { + global_hooks.reallocate = realloc; + } +} + +/* Internal constructor. */ +static cJSON *cJSON_New_Item(const internal_hooks * const hooks) +{ + cJSON* node = (cJSON*)hooks->allocate(sizeof(cJSON)); + if (node) + { + memset(node, '\0', sizeof(cJSON)); + } + + return node; +} + +/* Delete a cJSON structure. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c) +{ + cJSON *next = NULL; + while (c) + { + next = c->next; + if (!(c->type & cJSON_IsReference) && c->child) + { + cJSON_Delete(c->child); + } + if (!(c->type & cJSON_IsReference) && c->valuestring) + { + global_hooks.deallocate(c->valuestring); + } + if (!(c->type & cJSON_StringIsConst) && c->string) + { + global_hooks.deallocate(c->string); + } + global_hooks.deallocate(c); + c = next; + } +} + +/* Parse the input text to generate a number, and populate the result into item. */ +static const unsigned char *parse_number(cJSON * const item, const unsigned char * const input) +{ + double number = 0; + unsigned char *after_end = NULL; + + if (input == NULL) + { + return NULL; + } + + number = strtod((const char*)input, (char**)&after_end); + if (input == after_end) + { + return NULL; /* parse_error */ + } + + item->valuedouble = number; + + /* use saturation in case of overflow */ + if (number >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)number; + } + + item->type = cJSON_Number; + + return after_end; +} + +/* don't ask me, but the original cJSON_SetNumberValue returns an integer or double */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number) +{ + if (number >= INT_MAX) + { + object->valueint = INT_MAX; + } + else if (number <= INT_MIN) + { + object->valueint = INT_MIN; + } + else + { + object->valueint = cJSON_Number; + } + + return object->valuedouble = number; +} + +typedef struct +{ + unsigned char *buffer; + size_t length; + size_t offset; + cjbool noalloc; +} printbuffer; + +/* realloc printbuffer if necessary to have at least "needed" bytes more */ +static unsigned char* ensure(printbuffer * const p, size_t needed, const internal_hooks * const hooks) +{ + unsigned char *newbuffer = NULL; + size_t newsize = 0; + + if ((p == NULL) || (p->buffer == NULL)) + { + return NULL; + } + + if (needed > INT_MAX) + { + /* sizes bigger than INT_MAX are currently not supported */ + return NULL; + } + + needed += p->offset; + if (needed <= p->length) + { + return p->buffer + p->offset; + } + + if (p->noalloc) { + return NULL; + } + + /* calculate new buffer size */ + newsize = needed * 2; + if (newsize > INT_MAX) + { + /* overflow of int, use INT_MAX if possible */ + if (needed <= INT_MAX) + { + newsize = INT_MAX; + } + else + { + return NULL; + } + } + + if (hooks->reallocate != NULL) + { + /* reallocate with realloc if available */ + newbuffer = (unsigned char*)hooks->reallocate(p->buffer, newsize); + } + else + { + /* otherwise reallocate manually */ + newbuffer = (unsigned char*)hooks->allocate(newsize); + if (!newbuffer) + { + hooks->deallocate(p->buffer); + p->length = 0; + p->buffer = NULL; + + return NULL; + } + if (newbuffer) + { + memcpy(newbuffer, p->buffer, p->offset + 1); + } + hooks->deallocate(p->buffer); + } + p->length = newsize; + p->buffer = newbuffer; + + return newbuffer + p->offset; +} + +/* calculate the new length of the string in a printbuffer and update the offset */ +static void update_offset(printbuffer * const buffer) +{ + const unsigned char *buffer_pointer = NULL; + if ((buffer == NULL) || (buffer->buffer == NULL)) + { + return; + } + buffer_pointer = buffer->buffer + buffer->offset; + + buffer->offset += strlen((const char*)buffer_pointer); +} + +/* Render the number nicely from the given item into a string. */ +static unsigned char *print_number(const cJSON * const item, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output_pointer = NULL; + double d = item->valuedouble; + + if (output_buffer == NULL) + { + return NULL; + } + + /* value is an int */ + if ((fabs(((double)item->valueint) - d) <= DBL_EPSILON) && (d <= INT_MAX) && (d >= INT_MIN)) + { + /* 2^64+1 can be represented in 21 chars. */ + output_pointer = ensure(output_buffer, 21, hooks); + if (output_pointer != NULL) + { + sprintf((char*)output_pointer, "%d", item->valueint); + } + } + /* value is a floating point number */ + else + { + /* This is a nice tradeoff. */ + output_pointer = ensure(output_buffer, 64, hooks); + if (output_pointer != NULL) + { + /* This checks for NaN and Infinity */ + if ((d * 0) != 0) + { + sprintf((char*)output_pointer, "null"); + } + else if ((fabs(floor(d) - d) <= DBL_EPSILON) && (fabs(d) < 1.0e60)) + { + sprintf((char*)output_pointer, "%.0f", d); + } + else if ((fabs(d) < 1.0e-6) || (fabs(d) > 1.0e9)) + { + sprintf((char*)output_pointer, "%e", d); + } + else + { + sprintf((char*)output_pointer, "%f", d); + } + } + } + + return output_pointer; +} + +/* parse 4 digit hexadecimal number */ +static unsigned parse_hex4(const unsigned char * const input) +{ + unsigned int h = 0; + size_t i = 0; + + for (i = 0; i < 4; i++) + { + /* parse digit */ + if ((input[i] >= '0') && (input[i] <= '9')) + { + h += (unsigned int) input[i] - '0'; + } + else if ((input[i] >= 'A') && (input[i] <= 'F')) + { + h += (unsigned int) 10 + input[i] - 'A'; + } + else if ((input[i] >= 'a') && (input[i] <= 'f')) + { + h += (unsigned int) 10 + input[i] - 'a'; + } + else /* invalid */ + { + return 0; + } + + if (i < 3) + { + /* shift left to make place for the next nibble */ + h = h << 4; + } + } + + return h; +} + +/* converts a UTF-16 literal to UTF-8 + * A literal can be one or two sequences of the form \uXXXX */ +static unsigned char utf16_literal_to_utf8(const unsigned char * const input_pointer, const unsigned char * const input_end, unsigned char **output_pointer, const unsigned char **error_pointer) +{ + /* first bytes of UTF8 encoding for a given length in bytes */ + static const unsigned char firstByteMark[5] = + { + 0x00, /* should never happen */ + 0x00, /* 0xxxxxxx */ + 0xC0, /* 110xxxxx */ + 0xE0, /* 1110xxxx */ + 0xF0 /* 11110xxx */ + }; + + long unsigned int codepoint = 0; + unsigned int first_code = 0; + const unsigned char *first_sequence = input_pointer; + unsigned char utf8_length = 0; + unsigned char sequence_length = 0; + + if ((input_end - first_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the first utf16 sequence */ + first_code = parse_hex4(first_sequence + 2); + + /* check that the code is valid */ + if (((first_code >= 0xDC00) && (first_code <= 0xDFFF)) || (first_code == 0)) + { + *error_pointer = first_sequence; + goto fail; + } + + /* UTF16 surrogate pair */ + if ((first_code >= 0xD800) && (first_code <= 0xDBFF)) + { + const unsigned char *second_sequence = first_sequence + 6; + unsigned int second_code = 0; + sequence_length = 12; /* \uXXXX\uXXXX */ + + if ((input_end - second_sequence) < 6) + { + /* input ends unexpectedly */ + *error_pointer = first_sequence; + goto fail; + } + + if ((second_sequence[0] != '\\') || (second_sequence[1] != 'u')) + { + /* missing second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + /* get the second utf16 sequence */ + second_code = parse_hex4(second_sequence + 2); + /* check that the code is valid */ + if ((second_code < 0xDC00) || (second_code > 0xDFFF)) + { + /* invalid second half of the surrogate pair */ + *error_pointer = first_sequence; + goto fail; + } + + + /* calculate the unicode codepoint from the surrogate pair */ + codepoint = 0x10000 + (((first_code & 0x3FF) << 10) | (second_code & 0x3FF)); + } + else + { + sequence_length = 6; /* \uXXXX */ + codepoint = first_code; + } + + /* encode as UTF-8 + * takes at maximum 4 bytes to encode: + * 11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */ + if (codepoint < 0x80) + { + /* normal ascii, encoding 0xxxxxxx */ + utf8_length = 1; + } + else if (codepoint < 0x800) + { + /* two bytes, encoding 110xxxxx 10xxxxxx */ + utf8_length = 2; + } + else if (codepoint < 0x10000) + { + /* three bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx */ + utf8_length = 3; + } + else if (codepoint <= 0x10FFFF) + { + /* four bytes, encoding 1110xxxx 10xxxxxx 10xxxxxx 10xxxxxx */ + utf8_length = 4; + } + else + { + /* invalid unicode codepoint */ + *error_pointer = first_sequence; + goto fail; + } + + /* encode as utf8 */ + switch (utf8_length) + { + case 4: + /* 10xxxxxx */ + (*output_pointer)[3] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 3: + /* 10xxxxxx */ + (*output_pointer)[2] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 2: + (*output_pointer)[1] = (unsigned char)((codepoint | 0x80) & 0xBF); + codepoint >>= 6; + case 1: + /* depending on the length in bytes this determines the + encoding of the first UTF8 byte */ + (*output_pointer)[0] = (unsigned char)((codepoint | firstByteMark[utf8_length]) & 0xFF); + break; + default: + *error_pointer = first_sequence; + goto fail; + } + *output_pointer += utf8_length; + + return sequence_length; + +fail: + return 0; +} + +/* Parse the input text into an unescaped cinput, and populate item. */ +static const unsigned char *parse_string(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = input + 1; + const unsigned char *input_end = input + 1; + unsigned char *output_pointer = NULL; + unsigned char *output = NULL; + + /* not a string */ + if (*input != '\"') + { + *error_pointer = input; + goto fail; + } + + { + /* calculate approximate size of the output (overestimate) */ + size_t allocation_length = 0; + size_t skipped_bytes = 0; + while ((*input_end != '\"') && (*input_end != '\0')) + { + /* is escape sequence */ + if (input_end[0] == '\\') + { + if (input_end[1] == '\0') + { + /* prevent buffer overflow when last input character is a backslash */ + goto fail; + } + skipped_bytes++; + input_end++; + } + input_end++; + } + if (*input_end == '\0') + { + goto fail; /* string ended unexpectedly */ + } + + /* This is at most how much we need for the output */ + allocation_length = (size_t) (input_end - input) - skipped_bytes; + output = (unsigned char*)hooks->allocate(allocation_length + sizeof('\0')); + if (output == NULL) + { + goto fail; /* allocation failure */ + } + } + + output_pointer = output; + /* loop through the string literal */ + while (input_pointer < input_end) + { + if (*input_pointer != '\\') + { + *output_pointer++ = *input_pointer++; + } + /* escape sequence */ + else + { + unsigned char sequence_length = 2; + switch (input_pointer[1]) + { + case 'b': + *output_pointer++ = '\b'; + break; + case 'f': + *output_pointer++ = '\f'; + break; + case 'n': + *output_pointer++ = '\n'; + break; + case 'r': + *output_pointer++ = '\r'; + break; + case 't': + *output_pointer++ = '\t'; + break; + case '\"': + case '\\': + case '/': + *output_pointer++ = input_pointer[1]; + break; + + /* UTF-16 literal */ + case 'u': + sequence_length = utf16_literal_to_utf8(input_pointer, input_end, &output_pointer, error_pointer); + if (sequence_length == 0) + { + /* failed to convert UTF16-literal to UTF-8 */ + goto fail; + } + break; + + default: + *error_pointer = input_pointer; + goto fail; + } + input_pointer += sequence_length; + } + } + + /* zero terminate the output */ + *output_pointer = '\0'; + + item->type = cJSON_String; + item->valuestring = (char*)output; + + return input_end + 1; + +fail: + if (output != NULL) + { + hooks->deallocate(output); + } + + return NULL; +} + +/* Render the cstring provided to an escaped version that can be printed. */ +static unsigned char *print_string_ptr(const unsigned char * const input, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + const unsigned char *input_pointer = NULL; + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t output_length = 0; + /* numbers of additional characters needed for escaping */ + size_t escape_characters = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* empty string */ + if (input == NULL) + { + output = ensure(output_buffer, sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + strcpy((char*)output, "\"\""); + + return output; + } + + /* set "flag" to 1 if something needs to be escaped */ + for (input_pointer = input; *input_pointer; input_pointer++) + { + if (strchr("\"\\\b\f\n\r\t", *input_pointer)) + { + /* one character escape sequence */ + escape_characters++; + } + else if (*input_pointer < 32) + { + /* UTF-16 escape sequence uXXXX */ + escape_characters += 5; + } + } + output_length = (size_t)(input_pointer - input) + escape_characters; + + output = ensure(output_buffer, output_length + sizeof("\"\""), hooks); + if (output == NULL) + { + return NULL; + } + + /* no characters have to be escaped */ + if (escape_characters == 0) + { + output[0] = '\"'; + memcpy(output + 1, input, output_length); + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; + } + + output[0] = '\"'; + output_pointer = output + 1; + /* copy the string */ + for (input_pointer = input; *input_pointer != '\0'; input_pointer++, output_pointer++) + { + if ((*input_pointer > 31) && (*input_pointer != '\"') && (*input_pointer != '\\')) + { + /* normal character, copy */ + *output_pointer = *input_pointer; + } + else + { + /* character needs to be escaped */ + *output_pointer++ = '\\'; + switch (*input_pointer) + { + case '\\': + *output_pointer = '\\'; + break; + case '\"': + *output_pointer = '\"'; + break; + case '\b': + *output_pointer = 'b'; + break; + case '\f': + *output_pointer = 'f'; + break; + case '\n': + *output_pointer = 'n'; + break; + case '\r': + *output_pointer = 'r'; + break; + case '\t': + *output_pointer = 't'; + break; + default: + /* escape and print as unicode codepoint */ + sprintf((char*)output_pointer, "u%04x", *input_pointer); + output_pointer += 4; + break; + } + } + } + output[output_length + 1] = '\"'; + output[output_length + 2] = '\0'; + + return output; +} + +/* Invoke print_string_ptr (which is useful) on an item. */ +static unsigned char *print_string(const cJSON * const item, printbuffer * const p, const internal_hooks * const hooks) +{ + return print_string_ptr((unsigned char*)item->valuestring, p, hooks); +} + +/* Predeclare these prototypes. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const ep, const internal_hooks * const hooks); +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks); + +/* Utility to jump whitespace and cr/lf */ +static const unsigned char *skip_whitespace(const unsigned char *in) +{ + while (in && *in && (*in <= 32)) + { + in++; + } + + return in; +} + +/* Parse an object - create a new root, and populate. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, cjbool require_null_terminated) +{ + const unsigned char *end = NULL; + /* use global error pointer if no specific one was given */ + const unsigned char **ep = return_parse_end ? (const unsigned char**)return_parse_end : &global_ep; + cJSON *c = cJSON_New_Item(&global_hooks); + *ep = NULL; + if (!c) /* memory fail */ + { + return NULL; + } + + end = parse_value(c, skip_whitespace((const unsigned char*)value), ep, &global_hooks); + if (!end) + { + /* parse failure. ep is set. */ + cJSON_Delete(c); + return NULL; + } + + /* if we require null-terminated JSON without appended garbage, skip and then check for a null terminator */ + if (require_null_terminated) + { + end = skip_whitespace(end); + if (*end) + { + cJSON_Delete(c); + *ep = end; + return NULL; + } + } + if (return_parse_end) + { + *return_parse_end = (const char*)end; + } + + return c; +} + +/* Default options for cJSON_Parse */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value) +{ + return cJSON_ParseWithOpts(value, 0, 0); +} + +#define min(a, b) ((a < b) ? a : b) + +static unsigned char *print(const cJSON * const item, cjbool format, const internal_hooks * const hooks) +{ + printbuffer buffer[1]; + unsigned char *printed = NULL; + + memset(buffer, 0, sizeof(buffer)); + + /* create buffer */ + buffer->buffer = (unsigned char*) hooks->allocate(256); + if (buffer->buffer == NULL) + { + goto fail; + } + + /* print the value */ + if (print_value(item, 0, format, buffer, hooks) == NULL) + { + goto fail; + } + update_offset(buffer); + + /* copy the buffer over to a new one */ + printed = (unsigned char*) hooks->allocate(buffer->offset + 1); + if (printed == NULL) + { + goto fail; + } + strncpy((char*)printed, (char*)buffer->buffer, min(buffer->length, buffer->offset + 1)); + printed[buffer->offset] = '\0'; /* just to be sure */ + + /* free the buffer */ + hooks->deallocate(buffer->buffer); + + return printed; + +fail: + if (buffer->buffer != NULL) + { + hooks->deallocate(buffer->buffer); + } + + if (printed != NULL) + { + hooks->deallocate(printed); + } + + return NULL; +} + +/* Render a cJSON item/entity/structure to text. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item) +{ + return (char*)print(item, true, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item) +{ + return (char*)print(item, false, &global_hooks); +} + +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, cjbool fmt) +{ + printbuffer p; + + if (prebuffer < 0) + { + return NULL; + } + + p.buffer = (unsigned char*)global_hooks.allocate((size_t)prebuffer); + if (!p.buffer) + { + return NULL; + } + + p.length = (size_t)prebuffer; + p.offset = 0; + p.noalloc = false; + + return (char*)print_value(item, 0, fmt, &p, &global_hooks); +} + +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const cjbool fmt) +{ + printbuffer p; + + if (len < 0) + { + return false; + } + + p.buffer = (unsigned char*)buf; + p.length = (size_t)len; + p.offset = 0; + p.noalloc = true; + return print_value(item, 0, fmt, &p, &global_hooks) != NULL; +} + +/* Parser core - when encountering text, process appropriately. */ +static const unsigned char *parse_value(cJSON * const item, const unsigned char * const input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + if (input == NULL) + { + return NULL; /* no input */ + } + + /* parse the different types of values */ + /* null */ + if (!strncmp((const char*)input, "null", 4)) + { + item->type = cJSON_NULL; + return input + 4; + } + /* false */ + if (!strncmp((const char*)input, "false", 5)) + { + item->type = cJSON_False; + return input + 5; + } + /* true */ + if (!strncmp((const char*)input, "true", 4)) + { + item->type = cJSON_True; + item->valueint = 1; + return input + 4; + } + /* string */ + if (*input == '\"') + { + return parse_string(item, input, error_pointer, hooks); + } + /* number */ + if ((*input == '-') || ((*input >= '0') && (*input <= '9'))) + { + return parse_number(item, input); + } + /* array */ + if (*input == '[') + { + return parse_array(item, input, error_pointer, hooks); + } + /* object */ + if (*input == '{') + { + return parse_object(item, input, error_pointer, hooks); + } + + /* failure. */ + *error_pointer = input; + return NULL; +} + +/* Render a value to text. */ +static unsigned char *print_value(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + + if ((item == NULL) || (output_buffer == NULL)) + { + return NULL; + } + + switch ((item->type) & 0xFF) + { + case cJSON_NULL: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "null"); + } + break; + case cJSON_False: + output = ensure(output_buffer, 6, hooks); + if (output != NULL) + { + strcpy((char*)output, "false"); + } + break; + case cJSON_True: + output = ensure(output_buffer, 5, hooks); + if (output != NULL) + { + strcpy((char*)output, "true"); + } + break; + case cJSON_Number: + output = print_number(item, output_buffer, hooks); + break; + case cJSON_Raw: + { + size_t raw_length = 0; + if (item->valuestring == NULL) + { + if (!output_buffer->noalloc) + { + hooks->deallocate(output_buffer->buffer); + } + output = NULL; + break; + } + + raw_length = strlen(item->valuestring) + sizeof('\0'); + output = ensure(output_buffer, raw_length, hooks); + if (output != NULL) + { + memcpy(output, item->valuestring, raw_length); + } + break; + } + case cJSON_String: + output = print_string(item, output_buffer, hooks); + break; + case cJSON_Array: + output = print_array(item, depth, format, output_buffer, hooks); + break; + case cJSON_Object: + output = print_object(item, depth, format, output_buffer, hooks); + break; + default: + output = NULL; + break; + } + + return output; +} + +/* Build an array from input text. */ +static const unsigned char *parse_array(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* head of the linked list */ + cJSON *current_item = NULL; + + if (*input != '[') + { + /* not an array */ + *error_pointer = input; + goto fail; + } + + input = skip_whitespace(input + 1); + if (*input == ']') + { + /* empty array */ + goto success; + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse next value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != ']') + { + *error_pointer = input; + goto fail; /* expected end of array */ + } + +success: + item->type = cJSON_Array; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an array to text */ +static unsigned char *print_array(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + cJSON *current_element = item->child; + size_t output_offset = 0; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output array. */ + /* opening square bracket */ + output_offset = output_buffer->offset; + output_pointer = ensure(output_buffer, 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer = '['; + output_buffer->offset++; + + while (current_element != NULL) + { + if (print_value(current_element, depth + 1, format, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + if (current_element->next) + { + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ','; + if(format) + { + *output_pointer++ = ' '; + } + *output_pointer = '\0'; + output_buffer->offset += length; + } + current_element = current_element->next; + } + + output_pointer = ensure(output_buffer, 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ']'; + *output_pointer = '\0'; + output = output_buffer->buffer + output_offset; + + return output; +} + +/* Build an object from the text. */ +static const unsigned char *parse_object(cJSON * const item, const unsigned char *input, const unsigned char ** const error_pointer, const internal_hooks * const hooks) +{ + cJSON *head = NULL; /* linked list head */ + cJSON *current_item = NULL; + + if (*input != '{') + { + *error_pointer = input; + goto fail; /* not an object */ + } + + input = skip_whitespace(input + 1); + if (*input == '}') + { + goto success; /* empty object */ + } + + /* step back to character in front of the first element */ + input--; + /* loop through the comma separated array elements */ + do + { + /* allocate next item */ + cJSON *new_item = cJSON_New_Item(hooks); + if (new_item == NULL) + { + goto fail; /* allocation failure */ + } + + /* attach next item to list */ + if (head == NULL) + { + /* start the linked list */ + current_item = head = new_item; + } + else + { + /* add to the end and advance */ + current_item->next = new_item; + new_item->prev = current_item; + current_item = new_item; + } + + /* parse the name of the child */ + input = skip_whitespace(input + 1); + input = parse_string(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* faile to parse name */ + } + + /* swap valuestring and string, because we parsed the name */ + current_item->string = current_item->valuestring; + current_item->valuestring = NULL; + + if (*input != ':') + { + *error_pointer = input; + goto fail; /* invalid object */ + } + + /* parse the value */ + input = skip_whitespace(input + 1); + input = parse_value(current_item, input, error_pointer, hooks); + input = skip_whitespace(input); + if (input == NULL) + { + goto fail; /* failed to parse value */ + } + } + while (*input == ','); + + if (*input != '}') + { + *error_pointer = input; + goto fail; /* expected end of object */ + } + +success: + item->type = cJSON_Object; + item->child = head; + + return input + 1; + +fail: + if (head != NULL) + { + cJSON_Delete(head); + } + + return NULL; +} + +/* Render an object to text. */ +static unsigned char *print_object(const cJSON * const item, const size_t depth, const cjbool format, printbuffer * const output_buffer, const internal_hooks * const hooks) +{ + unsigned char *output = NULL; + unsigned char *output_pointer = NULL; + size_t length = 0; + size_t output_offset = 0; + cJSON *current_item = item->child; + + if (output_buffer == NULL) + { + return NULL; + } + + /* Compose the output: */ + output_offset = output_buffer->offset; + length = format ? 2 : 1; /* fmt: {\n */ + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + + *output_pointer++ = '{'; + if (format) + { + *output_pointer++ = '\n'; + } + output_buffer->offset += length; + + while (current_item) + { + if (format) + { + size_t i; + output_pointer = ensure(output_buffer, depth + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + for (i = 0; i < depth + 1; i++) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += depth + 1; + } + + /* print key */ + if (print_string_ptr((unsigned char*)current_item->string, output_buffer, hooks) == NULL) + { + return NULL; + } + update_offset(output_buffer); + + length = format ? 2 : 1; + output_pointer = ensure(output_buffer, length, hooks); + if (output_pointer == NULL) + { + return NULL; + } + *output_pointer++ = ':'; + if (format) + { + *output_pointer++ = '\t'; + } + output_buffer->offset += length; + + /* print value */ + if (!print_value(current_item, depth + 1, format, output_buffer, hooks)) + { + return NULL; + } + update_offset(output_buffer); + + /* print comma if not last */ + length = (size_t) (format ? 1 : 0) + (current_item->next ? 1 : 0); + output_pointer = ensure(output_buffer, length + 1, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (current_item->next) + { + *output_pointer++ = ','; + } + + if (format) + { + *output_pointer++ = '\n'; + } + *output_pointer = '\0'; + output_buffer->offset += length; + + current_item = current_item->next; + } + + output_pointer = ensure(output_buffer, format ? (depth + 2) : 2, hooks); + if (output_pointer == NULL) + { + return NULL; + } + if (format) + { + size_t i; + for (i = 0; i < (depth); i++) + { + *output_pointer++ = '\t'; + } + } + *output_pointer++ = '}'; + *output_pointer = '\0'; + output = (output_buffer->buffer) + output_offset; + + return output; +} + +/* Get Array size/item / object item. */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array) +{ + cJSON *c = array->child; + size_t i = 0; + while(c) + { + i++; + c = c->next; + } + + /* FIXME: Can overflow here. Cannot be fixed without breaking the API */ + + return (int)i; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item) +{ + cJSON *c = array ? array->child : NULL; + while (c && item > 0) + { + item--; + c = c->next; + } + + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string) +{ + cJSON *c = object ? object->child : NULL; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + c = c->next; + } + return c; +} + +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON * const object, const char * const string) +{ + cJSON *current_element = NULL; + + if ((object == NULL) || (string == NULL)) + { + return NULL; + } + + current_element = object->child; + while ((current_element != NULL) && (strcmp(string, current_element->string) != 0)) + { + current_element = current_element->next; + } + + return current_element; +} + +CJSON_PUBLIC(cjbool) cJSON_HasObjectItem(const cJSON *object, const char *string) +{ + return cJSON_GetObjectItem(object, string) ? 1 : 0; +} + +/* 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(const cJSON *item, const internal_hooks * const hooks) +{ + cJSON *ref = cJSON_New_Item(hooks); + if (!ref) + { + return NULL; + } + memcpy(ref, item, sizeof(cJSON)); + ref->string = NULL; + ref->type |= cJSON_IsReference; + ref->next = ref->prev = NULL; + return ref; +} + +/* Add item to array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item) +{ + cJSON *child = NULL; + + if ((item == NULL) || (array == NULL)) + { + return; + } + + child = array->child; + + if (child == NULL) + { + /* list is empty, start new one */ + array->child = item; + } + else + { + /* append to the end */ + while (child->next) + { + child = child->next; + } + suffix_object(child, item); + } +} + +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item) +{ + /* call cJSON_AddItemToObjectCS for code reuse */ + cJSON_AddItemToObjectCS(object, (char*)cJSON_strdup((const unsigned char*)string, &global_hooks), item); + /* remove cJSON_StringIsConst flag */ + item->type &= ~cJSON_StringIsConst; +} + +/* Add an item to an object with constant string as key */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item) +{ + if (!item) + { + return; + } + if (!(item->type & cJSON_StringIsConst) && item->string) + { + global_hooks.deallocate(item->string); + } +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wcast-qual" + item->string = (char*)string; +#pragma GCC diagnostic pop + item->type |= cJSON_StringIsConst; + cJSON_AddItemToArray(object, item); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) +{ + cJSON_AddItemToArray(array, create_reference(item, &global_hooks)); +} + +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item) +{ + cJSON_AddItemToObject(object, string, create_reference(item, &global_hooks)); +} + +static cJSON *DetachItemFromArray(cJSON *array, size_t which) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + /* item doesn't exist */ + return NULL; + } + if (c->prev) + { + /* not the first element */ + c->prev->next = c->next; + } + if (c->next) + { + c->next->prev = c->prev; + } + if (c==array->child) + { + array->child = c->next; + } + /* make sure the detached item doesn't point anywhere anymore */ + c->prev = c->next = NULL; + + return c; +} +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which) +{ + if (which < 0) + { + return NULL; + } + + return DetachItemFromArray(array, (size_t)which); +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which) +{ + cJSON_Delete(cJSON_DetachItemFromArray(array, which)); +} + +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string) +{ + size_t i = 0; + cJSON *c = object->child; + while (c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if (c) + { + return DetachItemFromArray(object, i); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string) +{ + cJSON_Delete(cJSON_DetachItemFromObject(object, string)); +} + +/* Replace array/object items with new ones. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem) +{ + cJSON *c = array->child; + while (c && (which > 0)) + { + c = c->next; + which--; + } + if (!c) + { + cJSON_AddItemToArray(array, newitem); + return; + } + newitem->next = c; + newitem->prev = c->prev; + c->prev = newitem; + if (c == array->child) + { + array->child = newitem; + } + else + { + newitem->prev->next = newitem; + } +} + +static void ReplaceItemInArray(cJSON *array, size_t 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 = NULL; + cJSON_Delete(c); +} +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem) +{ + if (which < 0) + { + return; + } + + ReplaceItemInArray(array, (size_t)which, newitem); +} + +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object, const char *string, cJSON *newitem) +{ + size_t i = 0; + cJSON *c = object->child; + while(c && cJSON_strcasecmp((unsigned char*)c->string, (const unsigned char*)string)) + { + i++; + c = c->next; + } + if(c) + { + /* free the old string if not const */ + if (!(newitem->type & cJSON_StringIsConst) && newitem->string) + { + global_hooks.deallocate(newitem->string); + } + + newitem->string = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + ReplaceItemInArray(object, i, newitem); + } +} + +/* Create basic types: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_NULL; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_True; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(cjbool b) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = b ? cJSON_True : cJSON_False; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Number; + item->valuedouble = num; + + /* use saturation in case of overflow */ + if (num >= INT_MAX) + { + item->valueint = INT_MAX; + } + else if (num <= INT_MIN) + { + item->valueint = INT_MIN; + } + else + { + item->valueint = (int)num; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_String; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)string, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type = cJSON_Raw; + item->valuestring = (char*)cJSON_strdup((const unsigned char*)raw, &global_hooks); + if(!item->valuestring) + { + cJSON_Delete(item); + return NULL; + } + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if(item) + { + item->type=cJSON_Array; + } + + return item; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void) +{ + cJSON *item = cJSON_New_Item(&global_hooks); + if (item) + { + item->type = cJSON_Object; + } + + return item; +} + +/* Create Arrays: */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if (!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for(i = 0;a && (i < (size_t)count); i++) + { + n = cJSON_CreateNumber(numbers[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p, n); + } + p = n; + } + + return a; +} + +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count) +{ + size_t i = 0; + cJSON *n = NULL; + cJSON *p = NULL; + cJSON *a = NULL; + + if (count < 0) + { + return NULL; + } + + a = cJSON_CreateArray(); + + for (i = 0; a && (i < (size_t)count); i++) + { + n = cJSON_CreateString(strings[i]); + if(!n) + { + cJSON_Delete(a); + return NULL; + } + if(!i) + { + a->child = n; + } + else + { + suffix_object(p,n); + } + p = n; + } + + return a; +} + +/* Duplication */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, cjbool recurse) +{ + cJSON *newitem = NULL; + cJSON *child = NULL; + cJSON *next = NULL; + cJSON *newchild = NULL; + + /* Bail on bad ptr */ + if (!item) + { + goto fail; + } + /* Create new item */ + newitem = cJSON_New_Item(&global_hooks); + if (!newitem) + { + goto fail; + } + /* Copy over all vars */ + newitem->type = item->type & (~cJSON_IsReference); + newitem->valueint = item->valueint; + newitem->valuedouble = item->valuedouble; + if (item->valuestring) + { + newitem->valuestring = (char*)cJSON_strdup((unsigned char*)item->valuestring, &global_hooks); + if (!newitem->valuestring) + { + goto fail; + } + } + if (item->string) + { + newitem->string = (item->type&cJSON_StringIsConst) ? item->string : (char*)cJSON_strdup((unsigned char*)item->string, &global_hooks); + if (!newitem->string) + { + goto fail; + } + } + /* If non-recursive, then we're done! */ + if (!recurse) + { + return newitem; + } + /* Walk the ->next chain for the child. */ + child = item->child; + while (child != NULL) + { + newchild = cJSON_Duplicate(child, true); /* Duplicate (with recurse) each item in the ->next chain */ + if (!newchild) + { + goto fail; + } + if (next != NULL) + { + /* If newitem->child already set, then crosswire ->prev and ->next and move on */ + next->next = newchild; + newchild->prev = next; + next = newchild; + } + else + { + /* Set newitem->child and move to it */ + newitem->child = newchild; + next = newchild; + } + child = child->next; + } + + return newitem; + +fail: + if (newitem != NULL) + { + cJSON_Delete(newitem); + } + + return NULL; +} + +CJSON_PUBLIC(void) cJSON_Minify(char *json) +{ + unsigned char *into = (unsigned char*)json; + while (*json) + { + if (*json == ' ') + { + json++; + } + else if (*json == '\t') + { + /* Whitespace characters. */ + json++; + } + else if (*json == '\r') + { + json++; + } + else if (*json=='\n') + { + json++; + } + else if ((*json == '/') && (json[1] == '/')) + { + /* double-slash comments, to end of line. */ + while (*json && (*json != '\n')) + { + json++; + } + } + else if ((*json == '/') && (json[1] == '*')) + { + /* multiline comments. */ + while (*json && !((*json == '*') && (json[1] == '/'))) + { + json++; + } + json += 2; + } + else if (*json == '\"') + { + /* string literals, which are \" sensitive. */ + *into++ = (unsigned char)*json++; + while (*json && (*json != '\"')) + { + if (*json == '\\') + { + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + *into++ = (unsigned char)*json++; + } + else + { + /* All other characters. */ + *into++ = (unsigned char)*json++; + } + } + + /* and null-terminate. */ + *into = '\0'; +} diff --git a/src/cJSON_Utils.c b/src/cJSON_Utils.c new file mode 100644 index 0000000000..240daba53f --- /dev/null +++ b/src/cJSON_Utils.c @@ -0,0 +1,881 @@ +#include +#include +#include +#include +#include + +#include "switch_cJSON_Utils.h" + +static unsigned char* cJSONUtils_strdup(const unsigned char* str) +{ + size_t len = 0; + unsigned char *copy = NULL; + + len = strlen((const char*)str) + 1; + if (!(copy = (unsigned char*)malloc(len))) + { + return NULL; + } + memcpy(copy, str, len); + + return copy; +} + +static int cJSONUtils_strcasecmp(const unsigned char *s1, const unsigned char *s2) +{ + if (!s1) + { + return (s1 == s2) ? 0 : 1; /* both NULL? */ + } + if (!s2) + { + return 1; + } + for(; tolower(*s1) == tolower(*s2); ++s1, ++s2) + { + if(*s1 == 0) + { + return 0; + } + } + + return tolower(*s1) - tolower(*s2); +} + +/* JSON Pointer implementation: */ +static int cJSONUtils_Pstrcasecmp(const unsigned char *a, const unsigned char *e) +{ + if (!a || !e) + { + return (a == e) ? 0 : 1; /* both NULL? */ + } + for (; *a && *e && (*e != '/'); a++, e++) /* compare until next '/' */ + { + if (*e == '~') + { + /* check for escaped '~' (~0) and '/' (~1) */ + if (!((e[1] == '0') && (*a == '~')) && !((e[1] == '1') && (*a == '/'))) + { + /* invalid escape sequence or wrong character in *a */ + return 1; + } + else + { + e++; + } + } + else if (tolower(*a) != tolower(*e)) + { + return 1; + } + } + if (((*e != 0) && (*e != '/')) != (*a != 0)) + { + /* one string has ended, the other not */ + return 1; + } + + return 0; +} + +static size_t cJSONUtils_PointerEncodedstrlen(const unsigned char *s) +{ + size_t l = 0; + for (; *s; s++, l++) + { + if ((*s == '~') || (*s == '/')) + { + l++; + } + } + + return l; +} + +static void cJSONUtils_PointerEncodedstrcpy(unsigned char *d, const unsigned char *s) +{ + for (; *s; s++) + { + if (*s == '/') + { + *d++ = '~'; + *d++ = '1'; + } + else if (*s == '~') + { + *d++ = '~'; + *d++ = '0'; + } + else + { + *d++ = *s; + } + } + + *d = '\0'; +} + +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target) +{ + int type = object->type; + size_t c = 0; + cJSON *obj = 0; + + if (object == target) + { + /* found */ + return (char*)cJSONUtils_strdup((const unsigned char*)""); + } + + /* recursively search all children of the object */ + for (obj = object->child; obj; obj = obj->next, c++) + { + unsigned char *found = (unsigned char*)cJSONUtils_FindPointerFromObjectTo(obj, target); + if (found) + { + if ((type & 0xFF) == cJSON_Array) + { + /* reserve enough memory for a 64 bit integer + '/' and '\0' */ + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + 23); + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(found); + return NULL; + } + sprintf((char*)ret, "/%lu%s", (unsigned long)c, found); /* / */ + free(found); + + return (char*)ret; + } + else if ((type & 0xFF) == cJSON_Object) + { + unsigned char *ret = (unsigned char*)malloc(strlen((char*)found) + cJSONUtils_PointerEncodedstrlen((unsigned char*)obj->string) + 2); + *ret = '/'; + cJSONUtils_PointerEncodedstrcpy(ret + 1, (unsigned char*)obj->string); + strcat((char*)ret, (char*)found); + free(found); + + return (char*)ret; + } + + /* reached leaf of the tree, found nothing */ + free(found); + return NULL; + } + } + + /* not found */ + return NULL; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer) +{ + /* follow path of the pointer */ + while ((*pointer++ == '/') && object) + { + if ((object->type & 0xFF) == cJSON_Array) + { + size_t which = 0; + /* parse array index */ + while ((*pointer >= '0') && (*pointer <= '9')) + { + which = (10 * which) + (size_t)(*pointer++ - '0'); + } + if (*pointer && (*pointer != '/')) + { + /* not end of string or new path token */ + return NULL; + } + if (which > INT_MAX) + { + return NULL; + } + object = cJSON_GetArrayItem(object, (int)which); + } + else if ((object->type & 0xFF) == cJSON_Object) + { + object = object->child; + /* GetObjectItem. */ + while (object && cJSONUtils_Pstrcasecmp((unsigned char*)object->string, (const unsigned char*)pointer)) + { + object = object->next; + } + /* skip to the next path token or end of string */ + while (*pointer && (*pointer != '/')) + { + pointer++; + } + } + else + { + return NULL; + } + } + + return object; +} + +/* JSON Patch implementation. */ +static void cJSONUtils_InplaceDecodePointerString(unsigned char *string) +{ + unsigned char *s2 = string; + + if (string == NULL) { + return; + } + + for (; *string; s2++, string++) + { + *s2 = (*string != '~') + ? (*string) + : ((*(++string) == '0') + ? '~' + : '/'); + } + + *s2 = '\0'; +} + +static cJSON *cJSONUtils_PatchDetach(cJSON *object, const unsigned char *path) +{ + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + cJSON *parent = NULL; + cJSON *ret = NULL; + + /* copy path and split it in parent and child */ + parentptr = cJSONUtils_strdup(path); + if (parentptr == NULL) { + return NULL; + } + + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); /* last '/' */ + if (childptr == NULL) + { + free(parentptr); + return NULL; + } + /* split strings */ + *childptr++ = '\0'; + + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + if (!parent) + { + /* Couldn't find object to remove child from. */ + ret = NULL; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + ret = cJSON_DetachItemFromArray(parent, atoi((char*)childptr)); + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + ret = cJSON_DetachItemFromObject(parent, (char*)childptr); + } + free(parentptr); + + /* return the detachted item */ + return ret; +} + +static int cJSONUtils_Compare(cJSON *a, cJSON *b) +{ + if ((a == NULL) || (b == NULL) || ((a->type & 0xFF) != (b->type & 0xFF))) + { + /* mismatched type. */ + return -1; + } + switch (a->type & 0xFF) + { + case cJSON_Number: + /* numeric mismatch. */ + return ((a->valueint != b->valueint) || (a->valuedouble != b->valuedouble)) ? -2 : 0; + case cJSON_String: + /* string mismatch. */ + return (strcmp(a->valuestring, b->valuestring) != 0) ? -3 : 0; + case cJSON_Array: + for (a = a->child, b = b->child; a && b; a = a->next, b = b->next) + { + int err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + } + /* array size mismatch? (one of both children is not NULL) */ + return (a || b) ? -4 : 0; + case cJSON_Object: + cJSONUtils_SortObject(a); + cJSONUtils_SortObject(b); + a = a->child; + b = b->child; + while (a && b) + { + int err = 0; + /* compare object keys */ + if (cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)) + { + /* missing member */ + return -6; + } + err = cJSONUtils_Compare(a, b); + if (err) + { + return err; + } + a = a->next; + b = b->next; + } + /* object length mismatch (one of both children is not null) */ + return (a || b) ? -5 : 0; + + default: + break; + } + /* null, true or false */ + return 0; +} + +static int cJSONUtils_ApplyPatch(cJSON *object, cJSON *patch) +{ + cJSON *op = NULL; + cJSON *path = NULL; + cJSON *value = NULL; + cJSON *parent = NULL; + int opcode = 0; + unsigned char *parentptr = NULL; + unsigned char *childptr = NULL; + + op = cJSON_GetObjectItem(patch, "op"); + path = cJSON_GetObjectItem(patch, "path"); + if (!op || !path) + { + /* malformed patch. */ + return 2; + } + + /* decode operation */ + if (!strcmp(op->valuestring, "add")) + { + opcode = 0; + } + else if (!strcmp(op->valuestring, "remove")) + { + opcode = 1; + } + else if (!strcmp(op->valuestring, "replace")) + { + opcode = 2; + } + else if (!strcmp(op->valuestring, "move")) + { + opcode = 3; + } + else if (!strcmp(op->valuestring, "copy")) + { + opcode = 4; + } + else if (!strcmp(op->valuestring, "test")) + { + /* compare value: {...} with the given path */ + return cJSONUtils_Compare(cJSONUtils_GetPointer(object, path->valuestring), cJSON_GetObjectItem(patch, "value")); + } + else + { + /* unknown opcode. */ + return 3; + } + + /* Remove/Replace */ + if ((opcode == 1) || (opcode == 2)) + { + /* Get rid of old. */ + cJSON_Delete(cJSONUtils_PatchDetach(object, (unsigned char*)path->valuestring)); + if (opcode == 1) + { + /* For Remove, this is job done. */ + return 0; + } + } + + /* Copy/Move uses "from". */ + if ((opcode == 3) || (opcode == 4)) + { + cJSON *from = cJSON_GetObjectItem(patch, "from"); + if (!from) + { + /* missing "from" for copy/move. */ + return 4; + } + + if (opcode == 3) + { + /* move */ + value = cJSONUtils_PatchDetach(object, (unsigned char*)from->valuestring); + } + if (opcode == 4) + { + /* copy */ + value = cJSONUtils_GetPointer(object, from->valuestring); + } + if (!value) + { + /* missing "from" for copy/move. */ + return 5; + } + if (opcode == 4) + { + value = cJSON_Duplicate(value, 1); + } + if (!value) + { + /* out of memory for copy/move. */ + return 6; + } + } + else /* Add/Replace uses "value". */ + { + value = cJSON_GetObjectItem(patch, "value"); + if (!value) + { + /* missing "value" for add/replace. */ + return 7; + } + value = cJSON_Duplicate(value, 1); + if (!value) + { + /* out of memory for add/replace. */ + return 8; + } + } + + /* Now, just add "value" to "path". */ + + /* split pointer in parent and child */ + parentptr = cJSONUtils_strdup((unsigned char*)path->valuestring); + childptr = (unsigned char*)strrchr((char*)parentptr, '/'); + if (childptr) + { + *childptr++ = '\0'; + } + parent = cJSONUtils_GetPointer(object, (char*)parentptr); + cJSONUtils_InplaceDecodePointerString(childptr); + + /* add, remove, replace, move, copy, test. */ + if (!parent) + { + /* Couldn't find object to add to. */ + free(parentptr); + cJSON_Delete(value); + return 9; + } + else if ((parent->type & 0xFF) == cJSON_Array) + { + if (!strcmp((char*)childptr, "-")) + { + cJSON_AddItemToArray(parent, value); + } + else + { + cJSON_InsertItemInArray(parent, atoi((char*)childptr), value); + } + } + else if ((parent->type & 0xFF) == cJSON_Object) + { + cJSON_DeleteItemFromObject(parent, (char*)childptr); + cJSON_AddItemToObject(parent, (char*)childptr, value); + } + else + { + cJSON_Delete(value); + } + free(parentptr); + + return 0; +} + +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches) +{ + int err = 0; + + if (patches == NULL) + { + return 1; + } + + if ((patches->type & 0xFF) != cJSON_Array) + { + /* malformed patches. */ + return 1; + } + if (patches) + { + patches = patches->child; + } + while (patches) + { + if ((err = cJSONUtils_ApplyPatch(object, patches))) + { + return err; + } + patches = patches->next; + } + + return 0; +} + +static void cJSONUtils_GeneratePatch(cJSON *patches, const unsigned char *op, const unsigned char *path, const unsigned char *suffix, cJSON *val) +{ + cJSON *patch = cJSON_CreateObject(); + cJSON_AddItemToObject(patch, "op", cJSON_CreateString((const char*)op)); + if (suffix) + { + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen(suffix) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", (const char*)path), suffix); + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)newpath)); + free(newpath); + } + else + { + cJSON_AddItemToObject(patch, "path", cJSON_CreateString((const char*)path)); + } + if (val) + { + cJSON_AddItemToObject(patch, "value", cJSON_Duplicate(val, 1)); + } + cJSON_AddItemToArray(patches, patch); +} + +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val) +{ + cJSONUtils_GeneratePatch(array, (const unsigned char*)op, (const unsigned char*)path, 0, val); +} + +static void cJSONUtils_CompareToPatch(cJSON *patches, const unsigned char *path, cJSON *from, cJSON *to) +{ + if ((from == NULL) || (to == NULL)) + { + return; + } + + if ((from->type & 0xFF) != (to->type & 0xFF)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + return; + } + + switch ((from->type & 0xFF)) + { + case cJSON_Number: + if ((from->valueint != to->valueint) || (from->valuedouble != to->valuedouble)) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_String: + if (strcmp(from->valuestring, to->valuestring) != 0) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"replace", path, 0, to); + } + return; + + case cJSON_Array: + { + size_t c = 0; + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + 23); /* Allow space for 64bit int. */ + /* generate patches for all array elements that exist in "from" and "to" */ + for (c = 0, from = from->child, to = to->child; from && to; from = from->next, to = to->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%s/%lu", path, (unsigned long)c); /* path of the current array element */ + cJSONUtils_CompareToPatch(patches, newpath, from, to); + } + /* remove leftover elements from 'from' that are not in 'to' */ + for (; from; from = from->next, c++) + { + /* check if conversion to unsigned long is valid + * This should be eliminated at compile time by dead code elimination + * if size_t is an alias of unsigned long, or if it is bigger */ + if (c > ULONG_MAX) + { + free(newpath); + return; + } + sprintf((char*)newpath, "%lu", (unsigned long)c); + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, newpath, 0); + } + /* add new elements in 'to' that were not in 'from' */ + for (; to; to = to->next, c++) + { + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (const unsigned char*)"-", to); + } + free(newpath); + return; + } + + case cJSON_Object: + { + cJSON *a = NULL; + cJSON *b = NULL; + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + a = from->child; + b = to->child; + /* for all object values in the object with more of them */ + while (a || b) + { + int diff = (!a) ? 1 : ((!b) ? -1 : cJSONUtils_strcasecmp((unsigned char*)a->string, (unsigned char*)b->string)); + if (!diff) + { + /* both object keys are the same */ + unsigned char *newpath = (unsigned char*)malloc(strlen((const char*)path) + cJSONUtils_PointerEncodedstrlen((unsigned char*)a->string) + 2); + cJSONUtils_PointerEncodedstrcpy(newpath + sprintf((char*)newpath, "%s/", path), (unsigned char*)a->string); + /* create a patch for the element */ + cJSONUtils_CompareToPatch(patches, newpath, a, b); + free(newpath); + a = a->next; + b = b->next; + } + else if (diff < 0) + { + /* object element doesn't exist in 'to' --> remove it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"remove", path, (unsigned char*)a->string, 0); + a = a->next; + } + else + { + /* object element doesn't exist in 'from' --> add it */ + cJSONUtils_GeneratePatch(patches, (const unsigned char*)"add", path, (unsigned char*)b->string, b); + b = b->next; + } + } + return; + } + + default: + break; + } +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to) +{ + cJSON *patches = cJSON_CreateArray(); + cJSONUtils_CompareToPatch(patches, (const unsigned char*)"", from, to); + + return patches; +} + +/* sort lists using mergesort */ +static cJSON *cJSONUtils_SortList(cJSON *list) +{ + cJSON *first = list; + cJSON *second = list; + cJSON *ptr = list; + + if (!list || !list->next) + { + /* One entry is sorted already. */ + return list; + } + + while (ptr && ptr->next && (cJSONUtils_strcasecmp((unsigned char*)ptr->string, (unsigned char*)ptr->next->string) < 0)) + { + /* Test for list sorted. */ + ptr = ptr->next; + } + if (!ptr || !ptr->next) + { + /* Leave sorted lists unmodified. */ + return list; + } + + /* reset ptr to the beginning */ + ptr = list; + while (ptr) + { + /* Walk two pointers to find the middle. */ + second = second->next; + ptr = ptr->next; + /* advances ptr two steps at a time */ + if (ptr) + { + ptr = ptr->next; + } + } + if (second && second->prev) + { + /* Split the lists */ + second->prev->next = NULL; + } + + /* Recursively sort the sub-lists. */ + first = cJSONUtils_SortList(first); + second = cJSONUtils_SortList(second); + list = ptr = NULL; + + while (first && second) /* Merge the sub-lists */ + { + if (cJSONUtils_strcasecmp((unsigned char*)first->string, (unsigned char*)second->string) < 0) + { + if (!list) + { + /* start merged list with the first element of the first list */ + list = ptr = first; + } + else + { + /* add first element of first list to merged list */ + ptr->next = first; + first->prev = ptr; + ptr = first; + } + first = first->next; + } + else + { + if (!list) + { + /* start merged list with the first element of the second list */ + list = ptr = second; + } + else + { + /* add first element of second list to merged list */ + ptr->next = second; + second->prev = ptr; + ptr = second; + } + second = second->next; + } + } + if (first) + { + /* Append rest of first list. */ + if (!list) + { + return first; + } + ptr->next = first; + first->prev = ptr; + } + if (second) + { + /* Append rest of second list */ + if (!list) + { + return second; + } + ptr->next = second; + second->prev = ptr; + } + + return list; +} + +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object) +{ + object->child = cJSONUtils_SortList(object->child); +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch) +{ + if (!patch || ((patch->type & 0xFF) != cJSON_Object)) + { + /* scalar value, array or NULL, just duplicate */ + cJSON_Delete(target); + return cJSON_Duplicate(patch, 1); + } + + if (!target || ((target->type & 0xFF) != cJSON_Object)) + { + cJSON_Delete(target); + target = cJSON_CreateObject(); + } + + patch = patch->child; + while (patch) + { + if ((patch->type & 0xFF) == cJSON_NULL) + { + /* NULL is the indicator to remove a value, see RFC7396 */ + cJSON_DeleteItemFromObject(target, patch->string); + } + else + { + cJSON *replaceme = cJSON_DetachItemFromObject(target, patch->string); + cJSON_AddItemToObject(target, patch->string, cJSONUtils_MergePatch(replaceme, patch)); + } + patch = patch->next; + } + return target; +} + +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to) +{ + cJSON *patch = NULL; + if (!to) + { + /* patch to delete everything */ + return cJSON_CreateNull(); + } + if (((to->type & 0xFF) != cJSON_Object) || !from || ((from->type & 0xFF) != cJSON_Object)) + { + return cJSON_Duplicate(to, 1); + } + + cJSONUtils_SortObject(from); + cJSONUtils_SortObject(to); + + from = from->child; + to = to->child; + patch = cJSON_CreateObject(); + while (from || to) + { + int compare = from ? (to ? strcmp(from->string, to->string) : -1) : 1; + if (compare < 0) + { + /* from has a value that to doesn't have -> remove */ + cJSON_AddItemToObject(patch, from->string, cJSON_CreateNull()); + from = from->next; + } + else if (compare > 0) + { + /* to has a value that from doesn't have -> add to patch */ + cJSON_AddItemToObject(patch, to->string, cJSON_Duplicate(to, 1)); + to = to->next; + } + else + { + /* object key exists in both objects */ + if (cJSONUtils_Compare(from, to)) + { + /* not identical --> generate a patch */ + cJSON_AddItemToObject(patch, to->string, cJSONUtils_GenerateMergePatch(from, to)); + } + /* next key in the object */ + from = from->next; + to = to->next; + } + } + if (!patch->child) + { + cJSON_Delete(patch); + return NULL; + } + + return patch; +} diff --git a/src/include/switch_cJSON.h b/src/include/switch_cJSON.h new file mode 100644 index 0000000000..79dbb98157 --- /dev/null +++ b/src/include/switch_cJSON.h @@ -0,0 +1,223 @@ +/* + 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. +*/ + +#ifndef cJSON__h +#define cJSON__h + +#ifdef __cplusplus +extern "C" +{ +#endif + +/* project version */ +#define CJSON_VERSION_MAJOR 1 +#define CJSON_VERSION_MINOR 3 +#define CJSON_VERSION_PATCH 0 + +#include + +/* cJSON Types: */ +#define cJSON_Invalid (0) +#define cJSON_False (1 << 0) +#define cJSON_True (1 << 1) +#define cJSON_NULL (1 << 2) +#define cJSON_Number (1 << 3) +#define cJSON_String (1 << 4) +#define cJSON_Array (1 << 5) +#define cJSON_Object (1 << 6) +#define cJSON_Raw (1 << 7) /* raw json */ + +#define cJSON_IsReference 256 +#define cJSON_StringIsConst 512 + +/* The cJSON structure: */ +typedef struct cJSON +{ + /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ + struct cJSON *next; + struct cJSON *prev; + /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ + struct cJSON *child; + + /* The type of the item, as above. */ + int type; + + /* The item's string, if type==cJSON_String and type == cJSON_Raw */ + char *valuestring; + /* The item's number, if type==cJSON_Number */ + int valueint; + /* The item's number, if type==cJSON_Number */ + double valuedouble; + + /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ + char *string; +} cJSON; + +typedef struct cJSON_Hooks +{ + void *(*malloc_fn)(size_t sz); + void (*free_fn)(void *ptr); +} cJSON_Hooks; + +#if !defined(__WINDOWS__) && (defined(WIN32) || defined(WIN64) || defined(_MSC_VER) || defined(_WIN32)) +#define __WINDOWS__ +#endif +#ifdef __WINDOWS__ + +/* When compiling for windows, we specify a specific calling convention to avoid issues where we are being called from a project with a different default calling convention. For windows you have 2 define options: + +CJSON_HIDE_SYMBOLS - Define this in the case where you don't want to ever dllexport symbols +CJSON_EXPORT_SYMBOLS - Define this on library build when you want to dllexport symbols + +For *nix builds that support visibility attribute, you can define similar behavior by + +setting default visibility to hidden by adding +-fvisibility=hidden (for gcc) +or +-xldscope=hidden (for sun cc) +to CFLAGS + +then using the CJSON_API_VISIBILITY flag to "export" the same symbols the way CJSON_EXPORT_SYMBOLS does + +*/ + +#if defined(CJSON_HIDE_SYMBOLS) +#define CJSON_PUBLIC(type) type __stdcall +#elif defined(CJSON_EXPORT_SYMBOLS) +#define CJSON_PUBLIC(type) __declspec(dllexport) type __stdcall +#else +#define CJSON_PUBLIC(type) __declspec(dllimport) type __stdcall +#endif +#else /* !WIN32 */ +#if (defined(__GNUC__) || defined(__SUNPRO_CC) || defined (__SUNPRO_C)) && defined(CJSON_API_VISIBILITY) +#define CJSON_PUBLIC(type) __attribute__((visibility("default"))) type +#else +#define CJSON_PUBLIC(type) type +#endif +#endif + +/* returns the version of cJSON as a string */ +CJSON_PUBLIC(const char*) cJSON_Version(void); + +/* Supply malloc, realloc and free functions to cJSON */ +CJSON_PUBLIC(void) cJSON_InitHooks(cJSON_Hooks* hooks); + + +/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ +CJSON_PUBLIC(cJSON *) cJSON_Parse(const char *value); +/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_Print(const cJSON *item); +/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ +CJSON_PUBLIC(char *) cJSON_PrintUnformatted(const cJSON *item); +/* Render a cJSON entity to text using a buffered strategy. prebuffer is a guess at the final size. guessing well reduces reallocation. fmt=0 gives unformatted, =1 gives formatted */ +CJSON_PUBLIC(char *) cJSON_PrintBuffered(const cJSON *item, int prebuffer, int fmt); +/* Render a cJSON entity to text using a buffer already allocated in memory with length buf_len. Returns 1 on success and 0 on failure. */ +CJSON_PUBLIC(int) cJSON_PrintPreallocated(cJSON *item, char *buf, const int len, const int fmt); +/* Delete a cJSON entity and all subentities. */ +CJSON_PUBLIC(void) cJSON_Delete(cJSON *c); + +/* Returns the number of items in an array (or object). */ +CJSON_PUBLIC(int) cJSON_GetArraySize(const cJSON *array); +/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ +CJSON_PUBLIC(cJSON *) cJSON_GetArrayItem(const cJSON *array, int item); +/* Get item "string" from object. Case insensitive. */ +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItem(const cJSON *object, const char *string); +CJSON_PUBLIC(cJSON *) cJSON_GetObjectItemCaseSensitive(const cJSON *object, const char *string); +CJSON_PUBLIC(int) cJSON_HasObjectItem(const cJSON *object, const char *string); +/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ +CJSON_PUBLIC(const char *) cJSON_GetErrorPtr(void); + +/* These calls create a cJSON item of the appropriate type. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateNull(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateTrue(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateFalse(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateBool(int b); +CJSON_PUBLIC(cJSON *) cJSON_CreateNumber(double num); +CJSON_PUBLIC(cJSON *) cJSON_CreateString(const char *string); +/* raw json */ +CJSON_PUBLIC(cJSON *) cJSON_CreateRaw(const char *raw); +CJSON_PUBLIC(cJSON *) cJSON_CreateArray(void); +CJSON_PUBLIC(cJSON *) cJSON_CreateObject(void); + +/* These utilities create an Array of count items. */ +CJSON_PUBLIC(cJSON *) cJSON_CreateIntArray(const int *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateFloatArray(const float *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateDoubleArray(const double *numbers, int count); +CJSON_PUBLIC(cJSON *) cJSON_CreateStringArray(const char **strings, int count); + +/* Append item to the specified array/object. */ +CJSON_PUBLIC(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemToObject(cJSON *object, const char *string, cJSON *item); +/* Use this when string is definitely const (i.e. a literal, or as good as), and will definitely survive the cJSON object. + * WARNING: When this function was used, make sure to always check that (item->type & cJSON_StringIsConst) is zero before + * writing to `item->string` */ +CJSON_PUBLIC(void) cJSON_AddItemToObjectCS(cJSON *object, const char *string, cJSON *item); +/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ +CJSON_PUBLIC(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); +CJSON_PUBLIC(void) cJSON_AddItemReferenceToObject(cJSON *object, const char *string, cJSON *item); + +/* Remove/Detatch items from Arrays/Objects. */ +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(void) cJSON_DeleteItemFromArray(cJSON *array, int which); +CJSON_PUBLIC(cJSON *) cJSON_DetachItemFromObject(cJSON *object, const char *string); +CJSON_PUBLIC(void) cJSON_DeleteItemFromObject(cJSON *object, const char *string); + +/* Update array items. */ +CJSON_PUBLIC(void) cJSON_InsertItemInArray(cJSON *array, int which, cJSON *newitem); /* Shifts pre-existing items to the right. */ +CJSON_PUBLIC(void) cJSON_ReplaceItemInArray(cJSON *array, int which, cJSON *newitem); +CJSON_PUBLIC(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); + +/* Duplicate a cJSON item */ +CJSON_PUBLIC(cJSON *) cJSON_Duplicate(const cJSON *item, int recurse); +/* Duplicate will create a new, identical cJSON item to the one you pass, in new memory that will +need to be released. With recurse!=0, it will duplicate any children connected to the item. +The item->next and ->prev pointers are always zero on return from Duplicate. */ + +/* ParseWithOpts allows you to require (and check) that the JSON is null terminated, and to retrieve the pointer to the final byte parsed. */ +/* If you supply a ptr in return_parse_end and parsing fails, then return_parse_end will contain a pointer to the error. If not, then cJSON_GetErrorPtr() does the job. */ +CJSON_PUBLIC(cJSON *) cJSON_ParseWithOpts(const char *value, const char **return_parse_end, int require_null_terminated); + +CJSON_PUBLIC(void) cJSON_Minify(char *json); + +/* Macros for creating things quickly. */ +#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) +#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) +#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) +#define cJSON_AddBoolToObject(object,name,b) cJSON_AddItemToObject(object, name, cJSON_CreateBool(b)) +#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) +#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) +#define cJSON_AddRawToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateRaw(s)) + +/* When assigning an integer value, it needs to be propagated to valuedouble too. */ +#define cJSON_SetIntValue(object, number) ((object) ? (object)->valueint = (object)->valuedouble = (number) : (number)) +/* helper for the cJSON_SetNumberValue macro */ +CJSON_PUBLIC(double) cJSON_SetNumberHelper(cJSON *object, double number); +#define cJSON_SetNumberValue(object, number) ((object != NULL) ? cJSON_SetNumberHelper(object, (double)number) : (number)) + +/* Macro for iterating over an array */ +#define cJSON_ArrayForEach(element, array) for(element = (array != NULL) ? (array)->child : NULL; element != NULL; element = element->next) + +#ifdef __cplusplus +} +#endif + +#endif diff --git a/src/include/switch_cJSON_Utils.h b/src/include/switch_cJSON_Utils.h new file mode 100644 index 0000000000..358145e4c2 --- /dev/null +++ b/src/include/switch_cJSON_Utils.h @@ -0,0 +1,44 @@ +#include "switch_cJSON.h" + +/* Implement RFC6901 (https://tools.ietf.org/html/rfc6901) JSON Pointer spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GetPointer(cJSON *object, const char *pointer); + +/* Implement RFC6902 (https://tools.ietf.org/html/rfc6902) JSON Patch spec. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GeneratePatches(cJSON *from, cJSON *to); +/* Utility for generating patch array entries. */ +CJSON_PUBLIC(void) cJSONUtils_AddPatchToArray(cJSON *array, const char *op, const char *path, cJSON *val); +/* Returns 0 for success. */ +CJSON_PUBLIC(int) cJSONUtils_ApplyPatches(cJSON *object, cJSON *patches); + +/* +// Note that ApplyPatches is NOT atomic on failure. To implement an atomic ApplyPatches, use: +//int cJSONUtils_AtomicApplyPatches(cJSON **object, cJSON *patches) +//{ +// cJSON *modme = cJSON_Duplicate(*object, 1); +// int error = cJSONUtils_ApplyPatches(modme, patches); +// if (!error) +// { +// cJSON_Delete(*object); +// *object = modme; +// } +// else +// { +// cJSON_Delete(modme); +// } +// +// return error; +//} +// Code not added to library since this strategy is a LOT slower. +*/ + +/* Implement RFC7386 (https://tools.ietf.org/html/rfc7396) JSON Merge Patch spec. */ +/* target will be modified by patch. return value is new ptr for target. */ +CJSON_PUBLIC(cJSON *) cJSONUtils_MergePatch(cJSON *target, cJSON *patch); +/* generates a patch to move from -> to */ +CJSON_PUBLIC(cJSON *) cJSONUtils_GenerateMergePatch(cJSON *from, cJSON *to); + +/* Given a root object and a target object, construct a pointer from one to the other. */ +CJSON_PUBLIC(char *) cJSONUtils_FindPointerFromObjectTo(cJSON *object, cJSON *target); + +/* Sorts the members of the object into alphabetical order. */ +CJSON_PUBLIC(void) cJSONUtils_SortObject(cJSON *object); diff --git a/src/include/switch_json.h b/src/include/switch_json.h index af9412e4d7..34ce5a05f9 100644 --- a/src/include/switch_json.h +++ b/src/include/switch_json.h @@ -20,115 +20,31 @@ THE SOFTWARE. */ #include "switch.h" -#ifndef cJSON__h -#define cJSON__h +#ifndef SWITCH_JSON__h +#define SWITCH_JSON__h + +#ifdef FREESWITCHCORE_EXPORTS +#ifndef CJSON_EXPORT_SYMBOLS +#define CJSON_EXPORT_SYMBOLS 1 +#endif +#endif + +#ifdef SWITCH_API_VISIBILITY +#ifndef CJSON_API_VISIBILITY +#define CJSON_API_VISIBILITY 1 +#endif +#endif #ifdef __cplusplus extern "C" { #endif -/* cJSON Types: */ -#define cJSON_False 0 -#define cJSON_True 1 -#define cJSON_NULL 2 -#define cJSON_Number 3 -#define cJSON_String 4 -#define cJSON_Array 5 -#define cJSON_Object 6 - -#define cJSON_IsReference 256 - -/* The cJSON structure: */ -typedef struct cJSON { - struct cJSON *next,*prev; /* next/prev allow you to walk array/object chains. Alternatively, use GetArraySize/GetArrayItem/GetObjectItem */ - struct cJSON *child; /* An array or object item will have a child pointer pointing to a chain of the items in the array/object. */ - - int type; /* The type of the item, as above. */ - - char *valuestring; /* The item's string, if type==cJSON_String */ - int valueint; /* The item's number, if type==cJSON_Number */ - double valuedouble; /* The item's number, if type==cJSON_Number */ - - char *string; /* The item's name string, if this item is the child of, or is in the list of subitems of an object. */ -} cJSON; - -typedef struct cJSON_Hooks { - void *(*malloc_fn)(size_t sz); - void (*free_fn)(void *ptr); -} cJSON_Hooks; - -/* Supply malloc, realloc and free functions to cJSON */ -SWITCH_DECLARE(void) cJSON_InitHooks(cJSON_Hooks* hooks); - - -/* Supply a block of JSON, and this returns a cJSON object you can interrogate. Call cJSON_Delete when finished. */ -SWITCH_DECLARE(cJSON *)cJSON_Parse(const char *value); -/* Render a cJSON entity to text for transfer/storage. Free the char* when finished. */ -SWITCH_DECLARE(char *)cJSON_Print(cJSON *item); -/* Render a cJSON entity to text for transfer/storage without any formatting. Free the char* when finished. */ -SWITCH_DECLARE(char *)cJSON_PrintUnformatted(cJSON *item); -/* Delete a cJSON entity and all subentities. */ -SWITCH_DECLARE(void) cJSON_Delete(cJSON *c); - -/* Returns the number of items in an array (or object). */ -SWITCH_DECLARE(int) cJSON_GetArraySize(cJSON *array); -/* Retrieve item number "item" from array "array". Returns NULL if unsuccessful. */ -SWITCH_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item); -/* Get item "string" from object. Case insensitive. */ -SWITCH_DECLARE(cJSON *)cJSON_GetObjectItem(const cJSON *object,const char *string); -SWITCH_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string); - -/* For analysing failed parses. This returns a pointer to the parse error. You'll probably need to look a few chars back to make sense of it. Defined when cJSON_Parse() returns 0. 0 when cJSON_Parse() succeeds. */ -SWITCH_DECLARE(const char *)cJSON_GetErrorPtr(void); - -/* These calls create a cJSON item of the appropriate type. */ -SWITCH_DECLARE(cJSON *)cJSON_CreateNull(void); -SWITCH_DECLARE(cJSON *)cJSON_CreateTrue(void); -SWITCH_DECLARE(cJSON *)cJSON_CreateFalse(void); -SWITCH_DECLARE(cJSON *)cJSON_CreateBool(int b); -SWITCH_DECLARE(cJSON *)cJSON_CreateNumber(double num); -SWITCH_DECLARE(cJSON *)cJSON_CreateString(const char *string); -SWITCH_DECLARE(cJSON *)cJSON_CreateArray(void); -SWITCH_DECLARE(cJSON *)cJSON_CreateObject(void); - -/* These utilities create an Array of count items. */ -SWITCH_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count); -SWITCH_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count); -SWITCH_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count); -SWITCH_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count); - -/* Append item to the specified array/object. */ -SWITCH_DECLARE(void) cJSON_AddItemToArray(cJSON *array, cJSON *item); -SWITCH_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item); -/* Append reference to item to the specified array/object. Use this when you want to add an existing cJSON to a new cJSON, but don't want to corrupt your existing cJSON. */ -SWITCH_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item); -SWITCH_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item); - -/* Remove/Detatch items from Arrays/Objects. */ -SWITCH_DECLARE(cJSON *)cJSON_DetachItemFromArray(cJSON *array,int which); -SWITCH_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which); -SWITCH_DECLARE(cJSON *)cJSON_DetachItemFromObject(cJSON *object,const char *string); -SWITCH_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string); - -/* Update array items. */ -SWITCH_DECLARE(void) cJSON_ReplaceItemInArray(cJSON *array,int which,cJSON *newitem); -SWITCH_DECLARE(void) cJSON_ReplaceItemInObject(cJSON *object,const char *string,cJSON *newitem); - -/* Duplicate a cJSON item */ -SWITCH_DECLARE(cJSON *) cJSON_Duplicate(cJSON *item,int recurse); -/* Duplicate will create a new, identical cJSON item to the one you pass, in new memory that will - need to be released. With recurse!=0, it will duplicate any children connected to the item. - The item->next and ->prev pointers are always zero on return from Duplicate. */ - - -#define cJSON_AddNullToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateNull()) -#define cJSON_AddTrueToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateTrue()) -#define cJSON_AddFalseToObject(object,name) cJSON_AddItemToObject(object, name, cJSON_CreateFalse()) -#define cJSON_AddNumberToObject(object,name,n) cJSON_AddItemToObject(object, name, cJSON_CreateNumber(n)) -#define cJSON_AddStringToObject(object,name,s) cJSON_AddItemToObject(object, name, cJSON_CreateString(s)) - +#include "switch_cJSON.h" +#include "switch_cJSON_Utils.h" + SWITCH_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...); +SWITCH_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string); static inline cJSON *json_add_child_obj(cJSON *json, const char *name, cJSON *obj) { diff --git a/src/switch_json.c b/src/switch_json.c index c1f27f3ce5..277e863df1 100644 --- a/src/switch_json.c +++ b/src/switch_json.c @@ -1,581 +1,4 @@ -/* - 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. -*/ - -/* cJSON */ -/* JSON parser in C. */ - -#include -#include -#include -#include -#include -#include #include "switch.h" -#include "switch_json.h" -#include - -static const char *ep; - -SWITCH_DECLARE(const char *)cJSON_GetErrorPtr() {return ep;} - -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); -} - -static void *glue_malloc(size_t theSize) -{ - return(malloc(theSize)); -} - -static void glue_free(void *thePtr) -{ - free(thePtr); -} - -static void *(*cJSON_malloc)(size_t sz) = glue_malloc; -static void (*cJSON_free)(void *ptr) = glue_free; - -static char* cJSON_strdup(const char* str) -{ - size_t len; - char* copy; - const char *s = str ? str : ""; - - len = strlen(s) + 1; - if (!(copy = (char*)cJSON_malloc(len))) return 0; - memcpy(copy,s,len); - return copy; -} - -SWITCH_DECLARE(void)cJSON_InitHooks(cJSON_Hooks* hooks) -{ - if (!hooks) { /* Reset hooks */ - cJSON_malloc = malloc; - cJSON_free = free; - return; - } - - cJSON_malloc = (hooks->malloc_fn)?hooks->malloc_fn:malloc; - cJSON_free = (hooks->free_fn)?hooks->free_fn:free; -} - -/* Internal constructor. */ -static cJSON *cJSON_New_Item() -{ - cJSON* node = (cJSON*)cJSON_malloc(sizeof(cJSON)); - if (node) memset(node,0,sizeof(cJSON)); - return node; -} - -/* Delete a cJSON structure. */ -SWITCH_DECLARE(void)cJSON_Delete(cJSON *c) -{ - cJSON *next; - while (c) - { - next=c->next; - if (!(c->type&cJSON_IsReference) && c->child) cJSON_Delete(c->child); - if (!(c->type&cJSON_IsReference) && c->valuestring) cJSON_free(c->valuestring); - if (c->string) cJSON_free(c->string); - cJSON_free(c); - c=next; - } -} - -/* 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; - - /* Could use sscanf for this? */ - 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? */ - } - - n=sign*n*pow(10.0,(scale+subscale*signsubscale)); /* number = +/- number.fraction * 10^+/- exponent */ - - 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) - { - str=(char*)cJSON_malloc(21); /* 2^64+1 can be represented in 21 chars. */ - if (str) sprintf(str,"%d",item->valueint); - } - else - { - str=(char*)cJSON_malloc(64); /* This is a nice tradeoff. */ - if (str) - { - if (fabs(floor(d)-d)<=DBL_EPSILON) 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; -} - -#define is_hexdigit(c) ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F')) -static int scan_unicode(const char *ptr, unsigned int *uc) -{ - if (!is_hexdigit(*(ptr)) || !is_hexdigit(*(ptr+1)) || !is_hexdigit(*(ptr+2)) || !is_hexdigit(*(ptr+3))) return -1; - return sscanf(ptr, "%4x", uc); -} - -/* 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 *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=(char*)cJSON_malloc(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. */ - if (scan_unicode(ptr+1, &uc) < 1) break; - 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. - if (scan_unicode(ptr+3,&uc2) < 1) break; - 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 =(char)(uc | firstByteMark[len]); - } - ptr2+=len; - break; - default: *ptr2++=*ptr; break; - } - if (*ptr) 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 cJSON_strdup(""); - ptr=str;while ((token=*ptr) && ++len) {if (strchr("\"\\\b\f\n\r\t",token)) len++; else if (token<32) len+=5;ptr++;} - - out=(char*)cJSON_malloc(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); -static char *print_value(cJSON *item,int depth,int fmt); -static const char *parse_array(cJSON *item,const char *value); -static char *print_array(cJSON *item,int depth,int fmt); -static const char *parse_object(cJSON *item,const char *value); -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. */ -SWITCH_DECLARE(cJSON *)cJSON_Parse(const char *value) -{ - cJSON *c=cJSON_New_Item(); - ep=0; - if (!c) return 0; /* memory fail */ - - if (!parse_value(c,skip(value))) {cJSON_Delete(c);return 0;} - return c; -} - -/* Render a cJSON item/entity/structure to text. */ -SWITCH_DECLARE(char *)cJSON_Print(cJSON *item) {return print_value(item,0,1);} -SWITCH_DECLARE(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) -{ - 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); } - if (*value=='-' || (*value>='0' && *value<='9')) { return parse_number(item,value); } - if (*value=='[') { return parse_array(item,value); } - if (*value=='{') { return parse_object(item,value); } - - 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=cJSON_strdup("null"); break; - case cJSON_False: out=cJSON_strdup("false");break; - case cJSON_True: out=cJSON_strdup("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) -{ - 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 */ - value=skip(parse_value(child,skip(value))); /* skip any spacing, get the value. */ - 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))); - 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; - size_t 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; - /* Allocate an array to hold the values for each */ - entries=(char**)cJSON_malloc(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 malloc the output string */ - if (!fail) out=(char*)cJSON_malloc(len); - /* If that fails, we fail. */ - if (!out) fail=1; - - /* Handle failure. */ - if (fail) - { - for (i=0;itype=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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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))); - if (!value) return 0; - child->string=child->valuestring;child->valuestring=0; - if (*value!=':') {ep=value;return 0;} /* fail! */ - value=skip(parse_value(child,skip(value+1))); /* skip any spacing, get the value. */ - 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 i=0,j; - size_t len=7; - cJSON *child=item->child; - int numentries=0,fail=0; - /* Count the number of entries. */ - while (child) numentries++,child=child->next; - /* Allocate space for the names and the objects */ - entries=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!entries) return 0; - names=(char**)cJSON_malloc(numentries*sizeof(char*)); - if (!names) {cJSON_free(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=(char*)cJSON_malloc(len); - if (!out) fail=1; - - /* Handle failure */ - if (fail) - { - for (i=0;ichild;int i=0;while(c)i++,c=c->next;return i;} -SWITCH_DECLARE(cJSON *)cJSON_GetArrayItem(cJSON *array,int item) {cJSON *c=array->child; while (c && item>0) item--,c=c->next; return c;} -SWITCH_DECLARE(cJSON *)cJSON_GetObjectItem(const cJSON *object,const char *string) {cJSON *c=object->child; while (c && cJSON_strcasecmp(c->string,string)) c=c->next; return c;} - - -SWITCH_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string) -{ - cJSON *cj = cJSON_GetObjectItem(object, string); - - if (!cj || cj->type != cJSON_String || !cj->valuestring) return NULL; - - return cj->valuestring; -} - - - - -/* 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. */ -SWITCH_DECLARE(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);}} -SWITCH_DECLARE(void) cJSON_AddItemToObject(cJSON *object,const char *string,cJSON *item) {if (!item) return; if (item->string) cJSON_free(item->string);item->string=cJSON_strdup(string);cJSON_AddItemToArray(object,item);} -SWITCH_DECLARE(void) cJSON_AddItemReferenceToArray(cJSON *array, cJSON *item) {cJSON_AddItemToArray(array,create_reference(item));} -SWITCH_DECLARE(void) cJSON_AddItemReferenceToObject(cJSON *object,const char *string,cJSON *item) {cJSON_AddItemToObject(object,string,create_reference(item));} - -SWITCH_DECLARE(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;} -SWITCH_DECLARE(void) cJSON_DeleteItemFromArray(cJSON *array,int which) {cJSON_Delete(cJSON_DetachItemFromArray(array,which));} -SWITCH_DECLARE(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;} -SWITCH_DECLARE(void) cJSON_DeleteItemFromObject(cJSON *object,const char *string) {cJSON_Delete(cJSON_DetachItemFromObject(object,string));} - -/* Replace array/object items with new ones. */ -SWITCH_DECLARE(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);} -SWITCH_DECLARE(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=cJSON_strdup(string);cJSON_ReplaceItemInArray(object,i,newitem);}} - -/* Create basic types: */ -SWITCH_DECLARE(cJSON *)cJSON_CreateNull() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_NULL;return item;} -SWITCH_DECLARE(cJSON *)cJSON_CreateTrue() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_True;return item;} -SWITCH_DECLARE(cJSON *)cJSON_CreateFalse() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_False;return item;} -SWITCH_DECLARE(cJSON *)cJSON_CreateBool(int b) {cJSON *item=cJSON_New_Item();if(item)item->type=b?cJSON_True:cJSON_False;return item;} -SWITCH_DECLARE(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;} -SWITCH_DECLARE(cJSON *)cJSON_CreateString(const char *string) {cJSON *item=cJSON_New_Item();if(item){item->type=cJSON_String;item->valuestring=cJSON_strdup(string);}return item;} -SWITCH_DECLARE(cJSON *)cJSON_CreateArray() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Array;return item;} -SWITCH_DECLARE(cJSON *)cJSON_CreateObject() {cJSON *item=cJSON_New_Item();if(item)item->type=cJSON_Object;return item;} - -/* Create Arrays: */ -SWITCH_DECLARE(cJSON *)cJSON_CreateIntArray(int *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -SWITCH_DECLARE(cJSON *)cJSON_CreateFloatArray(float *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -SWITCH_DECLARE(cJSON *)cJSON_CreateDoubleArray(double *numbers,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} -SWITCH_DECLARE(cJSON *)cJSON_CreateStringArray(const char **strings,int count) {int i;cJSON *n=0,*p=0,*a=cJSON_CreateArray();for(i=0;a && ichild=n;else suffix_object(p,n);p=n;}return a;} - -/* Duplication */ -SWITCH_DECLARE(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=cJSON_strdup(item->valuestring); if (!newitem->valuestring) {cJSON_Delete(newitem);return 0;}} - if (item->string) {newitem->string=cJSON_strdup(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) { - newchild=cJSON_Duplicate(cptr,1); /* Duplicate (with recurse) each item in the ->next chain */ - if (!newchild) {cJSON_Delete(newitem);return 0;} - if (nptr) {nptr->next=newchild,newchild->prev=nptr;nptr=newchild;} /* If newitem->child already set, then crosswire ->prev and ->next and move on */ - else {newitem->child=newchild;nptr=newchild;} /* Set newitem->child and move to it */ - cptr=cptr->next; - } - return newitem; -} - SWITCH_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...) { @@ -589,16 +12,22 @@ SWITCH_DECLARE(cJSON *) cJSON_CreateStringPrintf(const char *fmt, ...) if (!str) return NULL; - if ((item = cJSON_New_Item())) { - item->type=cJSON_String; - item->valuestring = str; - } else { - free(str); - } + item = cJSON_CreateString(str); + + free(str); return item; } +SWITCH_DECLARE(const char *)cJSON_GetObjectCstr(const cJSON *object, const char *string) +{ + cJSON *cj = cJSON_GetObjectItem(object, string); + + if (!cj || cj->type != cJSON_String || !cj->valuestring) return NULL; + + return cj->valuestring; +} + /* For Emacs: * Local Variables: * mode:c diff --git a/w32/Library/FreeSwitchCore.2015.vcxproj b/w32/Library/FreeSwitchCore.2015.vcxproj index ff72c9b7c5..76e4c735f5 100644 --- a/w32/Library/FreeSwitchCore.2015.vcxproj +++ b/w32/Library/FreeSwitchCore.2015.vcxproj @@ -1,4 +1,4 @@ - + @@ -432,6 +432,8 @@ if not exist "$(OutDir)htdocs" xcopy "$(SolutionDir)htdocs\*.*" "$(OutDir)htdocs + + @@ -769,6 +771,8 @@ if not exist "$(OutDir)htdocs" xcopy "$(SolutionDir)htdocs\*.*" "$(OutDir)htdocs + + @@ -909,4 +913,4 @@ if not exist "$(OutDir)htdocs" xcopy "$(SolutionDir)htdocs\*.*" "$(OutDir)htdocs - \ No newline at end of file +