Loading...
Searching...
No Matches
parson.c
Go to the documentation of this file.
/*
SPDX-License-Identifier: MIT
Parson 1.5.3 (https://github.com/kgabis/parson)
Copyright (c) 2012 - 2023 Krzysztof Gabis
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.
*/
#ifdef _MSC_VER
#ifndef _CRT_SECURE_NO_WARNINGS
#define _CRT_SECURE_NO_WARNINGS
#endif /* _CRT_SECURE_NO_WARNINGS */
#endif /* _MSC_VER */
#include "parson.h"
#define PARSON_IMPL_VERSION_MAJOR 1
#define PARSON_IMPL_VERSION_MINOR 5
#define PARSON_IMPL_VERSION_PATCH 3
#if (PARSON_VERSION_MAJOR != PARSON_IMPL_VERSION_MAJOR) || \
(PARSON_VERSION_MINOR != PARSON_IMPL_VERSION_MINOR) || \
(PARSON_VERSION_PATCH != PARSON_IMPL_VERSION_PATCH)
#error "parson version mismatch between parson.c and parson.h"
#endif
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <math.h>
#include <errno.h>
#if defined(__GNUC__)
#pragma GCC visibility push(hidden)
#endif
/* Apparently sscanf is not implemented in some "standard" libraries, so don't
* use it, if you don't have to. */
#ifdef sscanf
#undef sscanf
#define sscanf THINK_TWICE_ABOUT_USING_SSCANF
#endif
/* strcpy is unsafe */
#ifdef strcpy
#undef strcpy
#endif
#define strcpy USE_MEMCPY_INSTEAD_OF_STRCPY
#define STARTING_CAPACITY 16
#define MAX_NESTING 2048
#ifndef PARSON_DEFAULT_FLOAT_FORMAT
#define PARSON_DEFAULT_FLOAT_FORMAT \
"%1.17g" /* do not increase precision without incresing NUM_BUF_SIZE */
#endif
#ifndef PARSON_NUM_BUF_SIZE
#define PARSON_NUM_BUF_SIZE \
64 /* double printed with "%1.17g" shouldn't be longer than 25 bytes so \
let's be paranoid and use 64 */
#endif
#ifndef PARSON_INDENT_STR
#define PARSON_INDENT_STR " "
#endif
#define SIZEOF_TOKEN(a) (sizeof(a) - 1)
#define SKIP_CHAR(str) ((*str)++)
#define SKIP_WHITESPACES(str) \
while (isspace((unsigned char)(**str))) { \
SKIP_CHAR(str); \
}
#define MAX(a, b) ((a) > (b) ? (a) : (b))
#undef malloc
#undef free
#if defined(isnan) && defined(isinf)
#define IS_NUMBER_INVALID(x) (isnan((x)) || isinf((x)))
#else
#define IS_NUMBER_INVALID(x) (((x) * 0.0) != 0.0)
#endif
#define OBJECT_INVALID_IX ((size_t)-1)
static JSON_Malloc_Function parson_malloc = malloc;
static JSON_Free_Function parson_free = free;
static int parson_escape_slashes = 1;
static char *parson_float_format = NULL;
static JSON_Number_Serialization_Function parson_number_serialization_function =
NULL;
#define IS_CONT(b) \
(((unsigned char)(b) & 0xC0) == 0x80) /* is utf-8 continuation byte */
typedef int parson_bool_t;
#define PARSON_TRUE 1
#define PARSON_FALSE 0
typedef struct json_string {
char *chars;
size_t length;
} JSON_String;
/* Type definitions */
typedef union json_value_value {
JSON_String string;
double number;
JSON_Object *object;
JSON_Array *array;
int boolean;
int null;
} JSON_Value_Value;
struct json_value_t {
JSON_Value *parent;
JSON_Value_Type type;
JSON_Value_Value value;
};
struct json_object_t {
JSON_Value *wrapping_value;
size_t *cells;
unsigned long *hashes;
char **names;
JSON_Value **values;
size_t *cell_ixs;
size_t count;
size_t item_capacity;
size_t cell_capacity;
};
struct json_array_t {
JSON_Value *wrapping_value;
JSON_Value **items;
size_t count;
size_t capacity;
};
/* Various */
static char *read_file(const char *filename);
static void remove_comments(char *string, const char *start_token,
const char *end_token);
static char *parson_strndup(const char *string, size_t n);
static char *parson_strdup(const char *string);
static int parson_sprintf(char *s, const char *format, ...);
static int hex_char_to_int(char c);
static JSON_Status parse_utf16_hex(const char *string, unsigned int *result);
static int num_bytes_in_utf8_sequence(unsigned char c);
static JSON_Status verify_utf8_sequence(const unsigned char *string, int *len);
static parson_bool_t is_valid_utf8(const char *string, size_t string_len);
static parson_bool_t is_decimal(const char *string, size_t length);
static unsigned long hash_string(const char *string, size_t n);
/* JSON Object */
static JSON_Object *json_object_make(JSON_Value *wrapping_value);
static JSON_Status json_object_init(JSON_Object *object, size_t capacity);
static void json_object_deinit(JSON_Object *object, parson_bool_t free_keys,
parson_bool_t free_values);
static JSON_Status json_object_grow_and_rehash(JSON_Object *object);
static size_t json_object_get_cell_ix(const JSON_Object *object,
const char *key, size_t key_len,
unsigned long hash,
parson_bool_t *out_found);
static JSON_Status json_object_add(JSON_Object *object, char *name,
JSON_Value *value);
static JSON_Value *json_object_getn_value(const JSON_Object *object,
const char *name, size_t name_len);
static JSON_Status json_object_remove_internal(JSON_Object *object,
const char *name,
parson_bool_t free_value);
static JSON_Status json_object_dotremove_internal(JSON_Object *object,
const char *name,
parson_bool_t free_value);
static void json_object_free(JSON_Object *object);
/* JSON Array */
static JSON_Array *json_array_make(JSON_Value *wrapping_value);
static JSON_Status json_array_add(JSON_Array *array, JSON_Value *value);
static JSON_Status json_array_resize(JSON_Array *array, size_t new_capacity);
static void json_array_free(JSON_Array *array);
/* JSON Value */
static JSON_Value *json_value_init_string_no_copy(char *string, size_t length);
static const JSON_String *json_value_get_string_desc(const JSON_Value *value);
/* Parser */
static JSON_Status skip_quotes(const char **string);
static JSON_Status parse_utf16(const char **unprocessed, char **processed);
static char *process_string(const char *input, size_t input_len,
size_t *output_len);
static char *get_quoted_string(const char **string, size_t *output_string_len);
static JSON_Value *parse_object_value(const char **string, size_t nesting);
static JSON_Value *parse_array_value(const char **string, size_t nesting);
static JSON_Value *parse_string_value(const char **string);
static JSON_Value *parse_boolean_value(const char **string);
static JSON_Value *parse_number_value(const char **string);
static JSON_Value *parse_null_value(const char **string);
static JSON_Value *parse_value(const char **string, size_t nesting);
/* Serialization */
static int json_serialize_to_buffer_r(const JSON_Value *value, char *buf,
int level, parson_bool_t is_pretty,
char *num_buf);
static int json_serialize_string(const char *string, size_t len, char *buf);
/* Various */
static char *read_file(const char *filename)
{
FILE *fp = fopen(filename, "r");
size_t size_to_read = 0;
size_t size_read = 0;
long pos;
char *file_contents;
if (!fp) {
return NULL;
}
fseek(fp, 0L, SEEK_END);
pos = ftell(fp);
if (pos < 0) {
fclose(fp);
return NULL;
}
size_to_read = pos;
rewind(fp);
file_contents = (char *)parson_malloc(sizeof(char) * (size_to_read + 1));
if (!file_contents) {
fclose(fp);
return NULL;
}
size_read = fread(file_contents, 1, size_to_read, fp);
if (size_read == 0 || ferror(fp)) {
fclose(fp);
parson_free(file_contents);
return NULL;
}
fclose(fp);
file_contents[size_read] = '\0';
return file_contents;
}
static void remove_comments(char *string, const char *start_token,
const char *end_token)
{
parson_bool_t in_string = PARSON_FALSE, escaped = PARSON_FALSE;
size_t i;
char *ptr = NULL, current_char;
size_t start_token_len = strlen(start_token);
size_t end_token_len = strlen(end_token);
if (start_token_len == 0 || end_token_len == 0) {
return;
}
while ((current_char = *string) != '\0') {
if (current_char == '\\' && !escaped) {
escaped = PARSON_TRUE;
string++;
continue;
}
else if (current_char == '\"' && !escaped) {
in_string = !in_string;
}
else if (!in_string &&
strncmp(string, start_token, start_token_len) == 0) {
for (i = 0; i < start_token_len; i++) {
string[i] = ' ';
}
string = string + start_token_len;
ptr = strstr(string, end_token);
if (!ptr) {
return;
}
for (i = 0; i < (ptr - string) + end_token_len; i++) {
string[i] = ' ';
}
string = ptr + end_token_len - 1;
}
escaped = PARSON_FALSE;
string++;
}
}
static char *parson_strndup(const char *string, size_t n)
{
/* We expect the caller has validated that 'n' fits within the input buffer.
*/
char *output_string = (char *)parson_malloc(n + 1);
if (!output_string) {
return NULL;
}
output_string[n] = '\0';
memcpy(output_string, string, n);
return output_string;
}
static char *parson_strdup(const char *string)
{
return parson_strndup(string, strlen(string));
}
static int parson_sprintf(char *s, const char *format, ...)
{
int result;
va_list args;
va_start(args, format);
#if defined(__APPLE__) && defined(__clang__)
#pragma clang diagnostic push
#pragma clang diagnostic ignored "-Wdeprecated-declarations"
#endif
result = vsprintf(s, format, args);
#if defined(__APPLE__) && defined(__clang__)
#pragma clang diagnostic pop
#endif
va_end(args);
return result;
}
static int hex_char_to_int(char c)
{
if (c >= '0' && c <= '9') {
return c - '0';
}
else if (c >= 'a' && c <= 'f') {
return c - 'a' + 10;
}
else if (c >= 'A' && c <= 'F') {
return c - 'A' + 10;
}
return -1;
}
static JSON_Status parse_utf16_hex(const char *s, unsigned int *result)
{
int x1, x2, x3, x4;
if (s[0] == '\0' || s[1] == '\0' || s[2] == '\0' || s[3] == '\0') {
return JSONFailure;
}
x1 = hex_char_to_int(s[0]);
x2 = hex_char_to_int(s[1]);
x3 = hex_char_to_int(s[2]);
x4 = hex_char_to_int(s[3]);
if (x1 == -1 || x2 == -1 || x3 == -1 || x4 == -1) {
return JSONFailure;
}
*result = (unsigned int)((x1 << 12) | (x2 << 8) | (x3 << 4) | x4);
return JSONSuccess;
}
static int num_bytes_in_utf8_sequence(unsigned char c)
{
if (c == 0xC0 || c == 0xC1 || c > 0xF4 || IS_CONT(c)) {
return 0;
}
else if ((c & 0x80) == 0) { /* 0xxxxxxx */
return 1;
}
else if ((c & 0xE0) == 0xC0) { /* 110xxxxx */
return 2;
}
else if ((c & 0xF0) == 0xE0) { /* 1110xxxx */
return 3;
}
else if ((c & 0xF8) == 0xF0) { /* 11110xxx */
return 4;
}
return 0; /* won't happen */
}
static JSON_Status verify_utf8_sequence(const unsigned char *string, int *len)
{
unsigned int cp = 0;
*len = num_bytes_in_utf8_sequence(string[0]);
if (*len == 1) {
cp = string[0];
}
else if (*len == 2 && IS_CONT(string[1])) {
cp = string[0] & 0x1F;
cp = (cp << 6) | (string[1] & 0x3F);
}
else if (*len == 3 && IS_CONT(string[1]) && IS_CONT(string[2])) {
cp = ((unsigned char)string[0]) & 0xF;
cp = (cp << 6) | (string[1] & 0x3F);
cp = (cp << 6) | (string[2] & 0x3F);
}
else if (*len == 4 && IS_CONT(string[1]) && IS_CONT(string[2]) &&
IS_CONT(string[3])) {
cp = string[0] & 0x7;
cp = (cp << 6) | (string[1] & 0x3F);
cp = (cp << 6) | (string[2] & 0x3F);
cp = (cp << 6) | (string[3] & 0x3F);
}
else {
return JSONFailure;
}
/* overlong encodings */
if ((cp < 0x80 && *len > 1) || (cp < 0x800 && *len > 2) ||
(cp < 0x10000 && *len > 3)) {
return JSONFailure;
}
/* invalid unicode */
if (cp > 0x10FFFF) {
return JSONFailure;
}
/* surrogate halves */
if (cp >= 0xD800 && cp <= 0xDFFF) {
return JSONFailure;
}
return JSONSuccess;
}
static int is_valid_utf8(const char *string, size_t string_len)
{
int len = 0;
const char *string_end = string + string_len;
while (string < string_end) {
if (verify_utf8_sequence((const unsigned char *)string, &len) !=
JSONSuccess) {
return PARSON_FALSE;
}
string += len;
}
return PARSON_TRUE;
}
static parson_bool_t is_decimal(const char *string, size_t length)
{
if (length > 1 && string[0] == '0' && string[1] != '.') {
return PARSON_FALSE;
}
if (length > 2 && !strncmp(string, "-0", 2) && string[2] != '.') {
return PARSON_FALSE;
}
while (length--) {
if (strchr("xX", string[length])) {
return PARSON_FALSE;
}
}
return PARSON_TRUE;
}
static unsigned long hash_string(const char *string, size_t n)
{
#ifdef PARSON_FORCE_HASH_COLLISIONS
(void)string;
(void)n;
return 0;
#else
unsigned long hash = 5381;
unsigned char c;
size_t i = 0;
for (i = 0; i < n; i++) {
c = string[i];
if (c == '\0') {
break;
}
hash = ((hash << 5) + hash) + c; /* hash * 33 + c */
}
return hash;
#endif
}
/* JSON Object */
static JSON_Object *json_object_make(JSON_Value *wrapping_value)
{
JSON_Status res = JSONFailure;
JSON_Object *new_obj = (JSON_Object *)parson_malloc(sizeof(JSON_Object));
if (new_obj == NULL) {
return NULL;
}
new_obj->wrapping_value = wrapping_value;
res = json_object_init(new_obj, 0);
if (res != JSONSuccess) {
parson_free(new_obj);
return NULL;
}
return new_obj;
}
static JSON_Status json_object_init(JSON_Object *object, size_t capacity)
{
unsigned int i = 0;
object->cells = NULL;
object->names = NULL;
object->values = NULL;
object->cell_ixs = NULL;
object->hashes = NULL;
object->count = 0;
object->cell_capacity = capacity;
object->item_capacity = (unsigned int)(capacity * 7 / 10);
if (capacity == 0) {
return JSONSuccess;
}
object->cells =
(size_t *)parson_malloc(object->cell_capacity * sizeof(*object->cells));
object->names =
(char **)parson_malloc(object->item_capacity * sizeof(*object->names));
object->values = (JSON_Value **)parson_malloc(object->item_capacity *
sizeof(*object->values));
object->cell_ixs = (size_t *)parson_malloc(object->item_capacity *
sizeof(*object->cell_ixs));
object->hashes = (unsigned long *)parson_malloc(object->item_capacity *
sizeof(*object->hashes));
if (object->cells == NULL || object->names == NULL ||
object->values == NULL || object->cell_ixs == NULL ||
object->hashes == NULL) {
goto error;
}
for (i = 0; i < object->cell_capacity; i++) {
object->cells[i] = OBJECT_INVALID_IX;
}
return JSONSuccess;
error:
parson_free(object->cells);
parson_free(object->names);
parson_free(object->values);
parson_free(object->cell_ixs);
parson_free(object->hashes);
return JSONFailure;
}
static void json_object_deinit(JSON_Object *object, parson_bool_t free_keys,
parson_bool_t free_values)
{
unsigned int i = 0;
for (i = 0; i < object->count; i++) {
if (free_keys) {
parson_free(object->names[i]);
}
if (free_values) {
json_value_free(object->values[i]);
}
}
object->count = 0;
object->item_capacity = 0;
object->cell_capacity = 0;
parson_free(object->cells);
parson_free(object->names);
parson_free(object->values);
parson_free(object->cell_ixs);
parson_free(object->hashes);
object->cells = NULL;
object->names = NULL;
object->values = NULL;
object->cell_ixs = NULL;
object->hashes = NULL;
}
static JSON_Status json_object_grow_and_rehash(JSON_Object *object)
{
JSON_Value *wrapping_value = NULL;
JSON_Object new_object;
char *key = NULL;
JSON_Value *value = NULL;
unsigned int i = 0;
size_t new_capacity = MAX(object->cell_capacity * 2, STARTING_CAPACITY);
JSON_Status res = json_object_init(&new_object, new_capacity);
if (res != JSONSuccess) {
return JSONFailure;
}
wrapping_value = json_object_get_wrapping_value(object);
new_object.wrapping_value = wrapping_value;
for (i = 0; i < object->count; i++) {
key = object->names[i];
value = object->values[i];
res = json_object_add(&new_object, key, value);
if (res != JSONSuccess) {
json_object_deinit(&new_object, PARSON_FALSE, PARSON_FALSE);
return JSONFailure;
}
value->parent = wrapping_value;
}
json_object_deinit(object, PARSON_FALSE, PARSON_FALSE);
*object = new_object;
return JSONSuccess;
}
static size_t json_object_get_cell_ix(const JSON_Object *object,
const char *key, size_t key_len,
unsigned long hash,
parson_bool_t *out_found)
{
size_t cell_ix = hash & (object->cell_capacity - 1);
size_t cell = 0;
size_t ix = 0;
unsigned int i = 0;
unsigned long hash_to_check = 0;
const char *key_to_check = NULL;
size_t key_to_check_len = 0;
*out_found = PARSON_FALSE;
for (i = 0; i < object->cell_capacity; i++) {
ix = (cell_ix + i) & (object->cell_capacity - 1);
cell = object->cells[ix];
if (cell == OBJECT_INVALID_IX) {
return ix;
}
hash_to_check = object->hashes[cell];
if (hash != hash_to_check) {
continue;
}
key_to_check = object->names[cell];
key_to_check_len = strlen(key_to_check);
if (key_to_check_len == key_len &&
strncmp(key, key_to_check, key_len) == 0) {
*out_found = PARSON_TRUE;
return ix;
}
}
return OBJECT_INVALID_IX;
}
static JSON_Status json_object_add(JSON_Object *object, char *name,
JSON_Value *value)
{
unsigned long hash = 0;
parson_bool_t found = PARSON_FALSE;
size_t cell_ix = 0;
JSON_Status res = JSONFailure;
if (!object || !name || !value) {
return JSONFailure;
}
hash = hash_string(name, strlen(name));
found = PARSON_FALSE;
cell_ix = json_object_get_cell_ix(object, name, strlen(name), hash, &found);
if (found) {
return JSONFailure;
}
if (object->count >= object->item_capacity) {
res = json_object_grow_and_rehash(object);
if (res != JSONSuccess) {
return JSONFailure;
}
cell_ix =
json_object_get_cell_ix(object, name, strlen(name), hash, &found);
}
object->names[object->count] = name;
object->cells[cell_ix] = object->count;
object->values[object->count] = value;
object->cell_ixs[object->count] = cell_ix;
object->hashes[object->count] = hash;
object->count++;
value->parent = json_object_get_wrapping_value(object);
return JSONSuccess;
}
static JSON_Value *json_object_getn_value(const JSON_Object *object,
const char *name, size_t name_len)
{
unsigned long hash = 0;
parson_bool_t found = PARSON_FALSE;
size_t cell_ix = 0;
size_t item_ix = 0;
if (!object || !name) {
return NULL;
}
hash = hash_string(name, name_len);
found = PARSON_FALSE;
cell_ix = json_object_get_cell_ix(object, name, name_len, hash, &found);
if (!found) {
return NULL;
}
item_ix = object->cells[cell_ix];
return object->values[item_ix];
}
static JSON_Status json_object_remove_internal(JSON_Object *object,
const char *name,
parson_bool_t free_value)
{
unsigned long hash = 0;
parson_bool_t found = PARSON_FALSE;
size_t cell = 0;
size_t item_ix = 0;
size_t last_item_ix = 0;
size_t i = 0;
size_t j = 0;
size_t x = 0;
size_t k = 0;
JSON_Value *val = NULL;
if (object == NULL) {
return JSONFailure;
}
hash = hash_string(name, strlen(name));
found = PARSON_FALSE;
cell = json_object_get_cell_ix(object, name, strlen(name), hash, &found);
if (!found) {
return JSONFailure;
}
item_ix = object->cells[cell];
if (free_value) {
val = object->values[item_ix];
json_value_free(val);
val = NULL;
}
parson_free(object->names[item_ix]);
last_item_ix = object->count - 1;
if (item_ix < last_item_ix) {
object->names[item_ix] = object->names[last_item_ix];
object->values[item_ix] = object->values[last_item_ix];
object->cell_ixs[item_ix] = object->cell_ixs[last_item_ix];
object->hashes[item_ix] = object->hashes[last_item_ix];
object->cells[object->cell_ixs[item_ix]] = item_ix;
}
object->count--;
i = cell;
j = i;
for (x = 0; x < (object->cell_capacity - 1); x++) {
j = (j + 1) & (object->cell_capacity - 1);
if (object->cells[j] == OBJECT_INVALID_IX) {
break;
}
k = object->hashes[object->cells[j]] & (object->cell_capacity - 1);
if ((j > i && (k <= i || k > j)) || (j < i && (k <= i && k > j))) {
object->cell_ixs[object->cells[j]] = i;
object->cells[i] = object->cells[j];
i = j;
}
}
object->cells[i] = OBJECT_INVALID_IX;
return JSONSuccess;
}
static JSON_Status json_object_dotremove_internal(JSON_Object *object,
const char *name,
parson_bool_t free_value)
{
JSON_Value *temp_value = NULL;
JSON_Object *temp_object = NULL;
const char *dot_pos = strchr(name, '.');
if (!dot_pos) {
return json_object_remove_internal(object, name, free_value);
}
temp_value = json_object_getn_value(object, name, dot_pos - name);
if (json_value_get_type(temp_value) != JSONObject) {
return JSONFailure;
}
temp_object = json_value_get_object(temp_value);
return json_object_dotremove_internal(temp_object, dot_pos + 1, free_value);
}
static void json_object_free(JSON_Object *object)
{
json_object_deinit(object, PARSON_TRUE, PARSON_TRUE);
parson_free(object);
}
/* JSON Array */
static JSON_Array *json_array_make(JSON_Value *wrapping_value)
{
JSON_Array *new_array = (JSON_Array *)parson_malloc(sizeof(JSON_Array));
if (new_array == NULL) {
return NULL;
}
new_array->wrapping_value = wrapping_value;
new_array->items = (JSON_Value **)NULL;
new_array->capacity = 0;
new_array->count = 0;
return new_array;
}
static JSON_Status json_array_add(JSON_Array *array, JSON_Value *value)
{
if (array->count >= array->capacity) {
size_t new_capacity = MAX(array->capacity * 2, STARTING_CAPACITY);
if (json_array_resize(array, new_capacity) != JSONSuccess) {
return JSONFailure;
}
}
value->parent = json_array_get_wrapping_value(array);
array->items[array->count] = value;
array->count++;
return JSONSuccess;
}
static JSON_Status json_array_resize(JSON_Array *array, size_t new_capacity)
{
JSON_Value **new_items = NULL;
if (new_capacity == 0) {
return JSONFailure;
}
new_items =
(JSON_Value **)parson_malloc(new_capacity * sizeof(JSON_Value *));
if (new_items == NULL) {
return JSONFailure;
}
if (array->items != NULL && array->count > 0) {
memcpy(new_items, array->items, array->count * sizeof(JSON_Value *));
}
parson_free(array->items);
array->items = new_items;
array->capacity = new_capacity;
return JSONSuccess;
}
static void json_array_free(JSON_Array *array)
{
size_t i;
for (i = 0; i < array->count; i++) {
json_value_free(array->items[i]);
}
parson_free(array->items);
parson_free(array);
}
/* JSON Value */
static JSON_Value *json_value_init_string_no_copy(char *string, size_t length)
{
JSON_Value *new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (!new_value) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONString;
new_value->value.string.chars = string;
new_value->value.string.length = length;
return new_value;
}
/* Parser */
static JSON_Status skip_quotes(const char **string)
{
if (**string != '\"') {
return JSONFailure;
}
SKIP_CHAR(string);
while (**string != '\"') {
if (**string == '\0') {
return JSONFailure;
}
else if (**string == '\\') {
SKIP_CHAR(string);
if (**string == '\0') {
return JSONFailure;
}
}
SKIP_CHAR(string);
}
SKIP_CHAR(string);
return JSONSuccess;
}
static JSON_Status parse_utf16(const char **unprocessed, char **processed)
{
unsigned int cp, lead, trail;
char *processed_ptr = *processed;
const char *unprocessed_ptr = *unprocessed;
JSON_Status status = JSONFailure;
unprocessed_ptr++; /* skips u */
status = parse_utf16_hex(unprocessed_ptr, &cp);
if (status != JSONSuccess) {
return JSONFailure;
}
if (cp < 0x80) {
processed_ptr[0] = (char)cp; /* 0xxxxxxx */
}
else if (cp < 0x800) {
processed_ptr[0] = ((cp >> 6) & 0x1F) | 0xC0; /* 110xxxxx */
processed_ptr[1] = ((cp) & 0x3F) | 0x80; /* 10xxxxxx */
processed_ptr += 1;
}
else if (cp < 0xD800 || cp > 0xDFFF) {
processed_ptr[0] = ((cp >> 12) & 0x0F) | 0xE0; /* 1110xxxx */
processed_ptr[1] = ((cp >> 6) & 0x3F) | 0x80; /* 10xxxxxx */
processed_ptr[2] = ((cp) & 0x3F) | 0x80; /* 10xxxxxx */
processed_ptr += 2;
}
else if (cp >= 0xD800 &&
cp <= 0xDBFF) { /* lead surrogate (0xD800..0xDBFF) */
lead = cp;
unprocessed_ptr += 4; /* should always be within the buffer, otherwise
previous sscanf would fail */
if (*unprocessed_ptr++ != '\\' || *unprocessed_ptr++ != 'u') {
return JSONFailure;
}
status = parse_utf16_hex(unprocessed_ptr, &trail);
if (status != JSONSuccess || trail < 0xDC00 ||
trail > 0xDFFF) { /* valid trail surrogate? (0xDC00..0xDFFF) */
return JSONFailure;
}
cp = ((((lead - 0xD800) & 0x3FF) << 10) | ((trail - 0xDC00) & 0x3FF)) +
0x010000;
processed_ptr[0] = (((cp >> 18) & 0x07) | 0xF0); /* 11110xxx */
processed_ptr[1] = (((cp >> 12) & 0x3F) | 0x80); /* 10xxxxxx */
processed_ptr[2] = (((cp >> 6) & 0x3F) | 0x80); /* 10xxxxxx */
processed_ptr[3] = (((cp) & 0x3F) | 0x80); /* 10xxxxxx */
processed_ptr += 3;
}
else { /* trail surrogate before lead surrogate */
return JSONFailure;
}
unprocessed_ptr += 3;
*processed = processed_ptr;
*unprocessed = unprocessed_ptr;
return JSONSuccess;
}
/* Copies and processes passed string up to supplied length.
Example: "\u006Corem ipsum" -> lorem ipsum */
static char *process_string(const char *input, size_t input_len,
size_t *output_len)
{
const char *input_ptr = input;
size_t initial_size = (input_len + 1) * sizeof(char);
size_t final_size = 0;
char *output = NULL, *output_ptr = NULL, *resized_output = NULL;
output = (char *)parson_malloc(initial_size);
if (output == NULL) {
goto error;
}
output_ptr = output;
while ((*input_ptr != '\0') && (size_t)(input_ptr - input) < input_len) {
if (*input_ptr == '\\') {
input_ptr++;
switch (*input_ptr) {
case '\"':
*output_ptr = '\"';
break;
case '\\':
*output_ptr = '\\';
break;
case '/':
*output_ptr = '/';
break;
case 'b':
*output_ptr = '\b';
break;
case 'f':
*output_ptr = '\f';
break;
case 'n':
*output_ptr = '\n';
break;
case 'r':
*output_ptr = '\r';
break;
case 't':
*output_ptr = '\t';
break;
case 'u':
if (parse_utf16(&input_ptr, &output_ptr) != JSONSuccess) {
goto error;
}
break;
default:
goto error;
}
}
else if ((unsigned char)*input_ptr < 0x20) {
goto error; /* 0x00-0x19 are invalid characters for json string
(http://www.ietf.org/rfc/rfc4627.txt) */
}
else {
*output_ptr = *input_ptr;
}
output_ptr++;
input_ptr++;
}
*output_ptr = '\0';
/* resize to new length */
final_size = (size_t)(output_ptr - output) + 1;
/* todo: don't resize if final_size == initial_size */
resized_output = (char *)parson_malloc(final_size);
if (resized_output == NULL) {
goto error;
}
memcpy(resized_output, output, final_size);
*output_len = final_size - 1;
parson_free(output);
return resized_output;
error:
parson_free(output);
return NULL;
}
/* Return processed contents of a string between quotes and
skips passed argument to a matching quote. */
static char *get_quoted_string(const char **string, size_t *output_string_len)
{
const char *string_start = *string;
size_t input_string_len = 0;
JSON_Status status = skip_quotes(string);
if (status != JSONSuccess) {
return NULL;
}
input_string_len = *string - string_start - 2; /* length without quotes */
return process_string(string_start + 1, input_string_len,
output_string_len);
}
static JSON_Value *parse_value(const char **string, size_t nesting)
{
if (nesting > MAX_NESTING) {
return NULL;
}
SKIP_WHITESPACES(string);
switch (**string) {
case '{':
return parse_object_value(string, nesting + 1);
case '[':
return parse_array_value(string, nesting + 1);
case '\"':
return parse_string_value(string);
case 'f':
case 't':
return parse_boolean_value(string);
case '-':
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
return parse_number_value(string);
case 'n':
return parse_null_value(string);
default:
return NULL;
}
}
static JSON_Value *parse_object_value(const char **string, size_t nesting)
{
JSON_Status status = JSONFailure;
JSON_Value *output_value = NULL, *new_value = NULL;
JSON_Object *output_object = NULL;
char *new_key = NULL;
output_value = json_value_init_object();
if (output_value == NULL) {
return NULL;
}
if (**string != '{') {
json_value_free(output_value);
return NULL;
}
output_object = json_value_get_object(output_value);
SKIP_CHAR(string);
SKIP_WHITESPACES(string);
if (**string == '}') { /* empty object */
SKIP_CHAR(string);
return output_value;
}
while (**string != '\0') {
size_t key_len = 0;
new_key = get_quoted_string(string, &key_len);
/* We do not support key names with embedded \0 chars */
if (!new_key) {
json_value_free(output_value);
return NULL;
}
if (key_len != strlen(new_key)) {
parson_free(new_key);
json_value_free(output_value);
return NULL;
}
SKIP_WHITESPACES(string);
if (**string != ':') {
parson_free(new_key);
json_value_free(output_value);
return NULL;
}
SKIP_CHAR(string);
new_value = parse_value(string, nesting);
if (new_value == NULL) {
parson_free(new_key);
json_value_free(output_value);
return NULL;
}
status = json_object_add(output_object, new_key, new_value);
if (status != JSONSuccess) {
parson_free(new_key);
json_value_free(new_value);
json_value_free(output_value);
return NULL;
}
SKIP_WHITESPACES(string);
if (**string != ',') {
break;
}
SKIP_CHAR(string);
SKIP_WHITESPACES(string);
if (**string == '}') {
break;
}
}
SKIP_WHITESPACES(string);
if (**string != '}') {
json_value_free(output_value);
return NULL;
}
SKIP_CHAR(string);
return output_value;
}
static JSON_Value *parse_array_value(const char **string, size_t nesting)
{
JSON_Value *output_value = NULL, *new_array_value = NULL;
JSON_Array *output_array = NULL;
output_value = json_value_init_array();
if (output_value == NULL) {
return NULL;
}
if (**string != '[') {
json_value_free(output_value);
return NULL;
}
output_array = json_value_get_array(output_value);
SKIP_CHAR(string);
SKIP_WHITESPACES(string);
if (**string == ']') { /* empty array */
SKIP_CHAR(string);
return output_value;
}
while (**string != '\0') {
new_array_value = parse_value(string, nesting);
if (new_array_value == NULL) {
json_value_free(output_value);
return NULL;
}
if (json_array_add(output_array, new_array_value) != JSONSuccess) {
json_value_free(new_array_value);
json_value_free(output_value);
return NULL;
}
SKIP_WHITESPACES(string);
if (**string != ',') {
break;
}
SKIP_CHAR(string);
SKIP_WHITESPACES(string);
if (**string == ']') {
break;
}
}
SKIP_WHITESPACES(string);
if (**string != ']' || /* Trim array after parsing is over */
json_array_resize(output_array, json_array_get_count(output_array)) !=
JSONSuccess) {
json_value_free(output_value);
return NULL;
}
SKIP_CHAR(string);
return output_value;
}
static JSON_Value *parse_string_value(const char **string)
{
JSON_Value *value = NULL;
size_t new_string_len = 0;
char *new_string = get_quoted_string(string, &new_string_len);
if (new_string == NULL) {
return NULL;
}
value = json_value_init_string_no_copy(new_string, new_string_len);
if (value == NULL) {
parson_free(new_string);
return NULL;
}
return value;
}
static JSON_Value *parse_boolean_value(const char **string)
{
size_t true_token_size = SIZEOF_TOKEN("true");
size_t false_token_size = SIZEOF_TOKEN("false");
if (strncmp("true", *string, true_token_size) == 0) {
*string += true_token_size;
return json_value_init_boolean(1);
}
else if (strncmp("false", *string, false_token_size) == 0) {
*string += false_token_size;
return json_value_init_boolean(0);
}
return NULL;
}
static JSON_Value *parse_number_value(const char **string)
{
char *end;
double number = 0;
errno = 0;
number = strtod(*string, &end);
if (errno == ERANGE && (number <= -HUGE_VAL || number >= HUGE_VAL)) {
return NULL;
}
if ((errno && errno != ERANGE) || !is_decimal(*string, end - *string)) {
return NULL;
}
*string = end;
return json_value_init_number(number);
}
static JSON_Value *parse_null_value(const char **string)
{
size_t token_size = SIZEOF_TOKEN("null");
if (strncmp("null", *string, token_size) == 0) {
*string += token_size;
return json_value_init_null();
}
return NULL;
}
/* Serialization */
/* APPEND_STRING() is only called on string literals.
It's a bit hacky because it makes plenty of assumptions about the external
state and should eventually be tidied up into a function (same goes for
APPEND_INDENT)
*/
#define APPEND_STRING(str) \
do { \
written = SIZEOF_TOKEN((str)); \
if (buf != NULL) { \
memcpy(buf, (str), written); \
buf[written] = '\0'; \
buf += written; \
} \
written_total += written; \
} while (0)
#define APPEND_INDENT(level) \
do { \
int level_i = 0; \
for (level_i = 0; level_i < (level); level_i++) { \
APPEND_STRING(PARSON_INDENT_STR); \
} \
} while (0)
static int json_serialize_to_buffer_r(const JSON_Value *value, char *buf,
int level, parson_bool_t is_pretty,
char *num_buf)
{
const char *key = NULL, *string = NULL;
JSON_Value *temp_value = NULL;
JSON_Array *array = NULL;
JSON_Object *object = NULL;
size_t i = 0, count = 0;
double num = 0.0;
int written = -1, written_total = 0;
size_t len = 0;
switch (json_value_get_type(value)) {
case JSONArray:
array = json_value_get_array(value);
count = json_array_get_count(array);
APPEND_STRING("[");
if (count > 0 && is_pretty) {
APPEND_STRING("\n");
}
for (i = 0; i < count; i++) {
if (is_pretty) {
APPEND_INDENT(level + 1);
}
temp_value = json_array_get_value(array, i);
written = json_serialize_to_buffer_r(temp_value, buf, level + 1,
is_pretty, num_buf);
if (written < 0) {
return -1;
}
if (buf != NULL) {
buf += written;
}
written_total += written;
if (i < (count - 1)) {
APPEND_STRING(",");
}
if (is_pretty) {
APPEND_STRING("\n");
}
}
if (count > 0 && is_pretty) {
APPEND_INDENT(level);
}
APPEND_STRING("]");
return written_total;
case JSONObject:
object = json_value_get_object(value);
count = json_object_get_count(object);
APPEND_STRING("{");
if (count > 0 && is_pretty) {
APPEND_STRING("\n");
}
for (i = 0; i < count; i++) {
key = json_object_get_name(object, i);
if (key == NULL) {
return -1;
}
if (is_pretty) {
APPEND_INDENT(level + 1);
}
/* We do not support key names with embedded \0 chars */
written = json_serialize_string(key, strlen(key), buf);
if (written < 0) {
return -1;
}
if (buf != NULL) {
buf += written;
}
written_total += written;
APPEND_STRING(":");
if (is_pretty) {
APPEND_STRING(" ");
}
temp_value = json_object_get_value_at(object, i);
written = json_serialize_to_buffer_r(temp_value, buf, level + 1,
is_pretty, num_buf);
if (written < 0) {
return -1;
}
if (buf != NULL) {
buf += written;
}
written_total += written;
if (i < (count - 1)) {
APPEND_STRING(",");
}
if (is_pretty) {
APPEND_STRING("\n");
}
}
if (count > 0 && is_pretty) {
APPEND_INDENT(level);
}
APPEND_STRING("}");
return written_total;
case JSONString:
string = json_value_get_string(value);
if (string == NULL) {
return -1;
}
len = json_value_get_string_len(value);
written = json_serialize_string(string, len, buf);
if (written < 0) {
return -1;
}
if (buf != NULL) {
buf += written;
}
written_total += written;
return written_total;
case JSONBoolean:
if (json_value_get_boolean(value)) {
APPEND_STRING("true");
}
else {
APPEND_STRING("false");
}
return written_total;
case JSONNumber:
num = json_value_get_number(value);
if (buf != NULL) {
num_buf = buf;
}
if (parson_number_serialization_function) {
written = parson_number_serialization_function(num, num_buf);
}
else {
const char *float_format = parson_float_format
? parson_float_format
: PARSON_DEFAULT_FLOAT_FORMAT;
written = parson_sprintf(num_buf, float_format, num);
}
if (written < 0) {
return -1;
}
if (buf != NULL) {
buf += written;
}
written_total += written;
return written_total;
case JSONNull:
APPEND_STRING("null");
return written_total;
case JSONError:
return -1;
default:
return -1;
}
}
static int json_serialize_string(const char *string, size_t len, char *buf)
{
size_t i = 0;
char c = '\0';
int written = -1, written_total = 0;
APPEND_STRING("\"");
for (i = 0; i < len; i++) {
c = string[i];
switch (c) {
case '\"':
APPEND_STRING("\\\"");
break;
case '\\':
APPEND_STRING("\\\\");
break;
case '\b':
APPEND_STRING("\\b");
break;
case '\f':
APPEND_STRING("\\f");
break;
case '\n':
APPEND_STRING("\\n");
break;
case '\r':
APPEND_STRING("\\r");
break;
case '\t':
APPEND_STRING("\\t");
break;
case '\x00':
APPEND_STRING("\\u0000");
break;
case '\x01':
APPEND_STRING("\\u0001");
break;
case '\x02':
APPEND_STRING("\\u0002");
break;
case '\x03':
APPEND_STRING("\\u0003");
break;
case '\x04':
APPEND_STRING("\\u0004");
break;
case '\x05':
APPEND_STRING("\\u0005");
break;
case '\x06':
APPEND_STRING("\\u0006");
break;
case '\x07':
APPEND_STRING("\\u0007");
break;
/* '\x08' duplicate: '\b' */
/* '\x09' duplicate: '\t' */
/* '\x0a' duplicate: '\n' */
case '\x0b':
APPEND_STRING("\\u000b");
break;
/* '\x0c' duplicate: '\f' */
/* '\x0d' duplicate: '\r' */
case '\x0e':
APPEND_STRING("\\u000e");
break;
case '\x0f':
APPEND_STRING("\\u000f");
break;
case '\x10':
APPEND_STRING("\\u0010");
break;
case '\x11':
APPEND_STRING("\\u0011");
break;
case '\x12':
APPEND_STRING("\\u0012");
break;
case '\x13':
APPEND_STRING("\\u0013");
break;
case '\x14':
APPEND_STRING("\\u0014");
break;
case '\x15':
APPEND_STRING("\\u0015");
break;
case '\x16':
APPEND_STRING("\\u0016");
break;
case '\x17':
APPEND_STRING("\\u0017");
break;
case '\x18':
APPEND_STRING("\\u0018");
break;
case '\x19':
APPEND_STRING("\\u0019");
break;
case '\x1a':
APPEND_STRING("\\u001a");
break;
case '\x1b':
APPEND_STRING("\\u001b");
break;
case '\x1c':
APPEND_STRING("\\u001c");
break;
case '\x1d':
APPEND_STRING("\\u001d");
break;
case '\x1e':
APPEND_STRING("\\u001e");
break;
case '\x1f':
APPEND_STRING("\\u001f");
break;
case '/':
if (parson_escape_slashes) {
APPEND_STRING("\\/"); /* to make json embeddable in xml\/html */
}
else {
APPEND_STRING("/");
}
break;
default:
if (buf != NULL) {
buf[0] = c;
buf += 1;
}
written_total += 1;
break;
}
}
APPEND_STRING("\"");
return written_total;
}
#undef APPEND_STRING
#undef APPEND_INDENT
/* Parser API */
JSON_Value *json_parse_file(const char *filename)
{
char *file_contents = read_file(filename);
JSON_Value *output_value = NULL;
if (file_contents == NULL) {
return NULL;
}
output_value = json_parse_string(file_contents);
parson_free(file_contents);
return output_value;
}
JSON_Value *json_parse_file_with_comments(const char *filename)
{
char *file_contents = read_file(filename);
JSON_Value *output_value = NULL;
if (file_contents == NULL) {
return NULL;
}
output_value = json_parse_string_with_comments(file_contents);
parson_free(file_contents);
return output_value;
}
JSON_Value *json_parse_string(const char *string)
{
if (string == NULL) {
return NULL;
}
if (string[0] == '\xEF' && string[1] == '\xBB' && string[2] == '\xBF') {
string = string + 3; /* Support for UTF-8 BOM */
}
return parse_value((const char **)&string, 0);
}
JSON_Value *json_parse_string_with_comments(const char *string)
{
JSON_Value *result = NULL;
char *string_mutable_copy = NULL, *string_mutable_copy_ptr = NULL;
string_mutable_copy = parson_strdup(string);
if (string_mutable_copy == NULL) {
return NULL;
}
remove_comments(string_mutable_copy, "/*", "*/");
remove_comments(string_mutable_copy, "//", "\n");
string_mutable_copy_ptr = string_mutable_copy;
result = parse_value((const char **)&string_mutable_copy_ptr, 0);
parson_free(string_mutable_copy);
return result;
}
/* JSON Object API */
JSON_Value *json_object_get_value(const JSON_Object *object, const char *name)
{
if (object == NULL || name == NULL) {
return NULL;
}
return json_object_getn_value(object, name, strlen(name));
}
const char *json_object_get_string(const JSON_Object *object, const char *name)
{
return json_value_get_string(json_object_get_value(object, name));
}
size_t json_object_get_string_len(const JSON_Object *object, const char *name)
{
return json_value_get_string_len(json_object_get_value(object, name));
}
double json_object_get_number(const JSON_Object *object, const char *name)
{
return json_value_get_number(json_object_get_value(object, name));
}
JSON_Object *json_object_get_object(const JSON_Object *object, const char *name)
{
return json_value_get_object(json_object_get_value(object, name));
}
JSON_Array *json_object_get_array(const JSON_Object *object, const char *name)
{
return json_value_get_array(json_object_get_value(object, name));
}
int json_object_get_boolean(const JSON_Object *object, const char *name)
{
return json_value_get_boolean(json_object_get_value(object, name));
}
JSON_Value *json_object_dotget_value(const JSON_Object *object,
const char *name)
{
const char *dot_position = strchr(name, '.');
if (!dot_position) {
return json_object_get_value(object, name);
}
object = json_value_get_object(
json_object_getn_value(object, name, dot_position - name));
return json_object_dotget_value(object, dot_position + 1);
}
const char *json_object_dotget_string(const JSON_Object *object,
const char *name)
{
return json_value_get_string(json_object_dotget_value(object, name));
}
size_t json_object_dotget_string_len(const JSON_Object *object,
const char *name)
{
return json_value_get_string_len(json_object_dotget_value(object, name));
}
double json_object_dotget_number(const JSON_Object *object, const char *name)
{
return json_value_get_number(json_object_dotget_value(object, name));
}
JSON_Object *json_object_dotget_object(const JSON_Object *object,
const char *name)
{
return json_value_get_object(json_object_dotget_value(object, name));
}
JSON_Array *json_object_dotget_array(const JSON_Object *object,
const char *name)
{
return json_value_get_array(json_object_dotget_value(object, name));
}
int json_object_dotget_boolean(const JSON_Object *object, const char *name)
{
return json_value_get_boolean(json_object_dotget_value(object, name));
}
size_t json_object_get_count(const JSON_Object *object)
{
return object ? object->count : 0;
}
const char *json_object_get_name(const JSON_Object *object, size_t index)
{
if (object == NULL || index >= json_object_get_count(object)) {
return NULL;
}
return object->names[index];
}
JSON_Value *json_object_get_value_at(const JSON_Object *object, size_t index)
{
if (object == NULL || index >= json_object_get_count(object)) {
return NULL;
}
return object->values[index];
}
JSON_Value *json_object_get_wrapping_value(const JSON_Object *object)
{
if (!object) {
return NULL;
}
return object->wrapping_value;
}
int json_object_has_value(const JSON_Object *object, const char *name)
{
return json_object_get_value(object, name) != NULL;
}
int json_object_has_value_of_type(const JSON_Object *object, const char *name,
JSON_Value_Type type)
{
JSON_Value *val = json_object_get_value(object, name);
return val != NULL && json_value_get_type(val) == type;
}
int json_object_dothas_value(const JSON_Object *object, const char *name)
{
return json_object_dotget_value(object, name) != NULL;
}
int json_object_dothas_value_of_type(const JSON_Object *object,
const char *name, JSON_Value_Type type)
{
JSON_Value *val = json_object_dotget_value(object, name);
return val != NULL && json_value_get_type(val) == type;
}
/* JSON Array API */
JSON_Value *json_array_get_value(const JSON_Array *array, size_t index)
{
if (array == NULL || index >= json_array_get_count(array)) {
return NULL;
}
return array->items[index];
}
const char *json_array_get_string(const JSON_Array *array, size_t index)
{
return json_value_get_string(json_array_get_value(array, index));
}
size_t json_array_get_string_len(const JSON_Array *array, size_t index)
{
return json_value_get_string_len(json_array_get_value(array, index));
}
double json_array_get_number(const JSON_Array *array, size_t index)
{
return json_value_get_number(json_array_get_value(array, index));
}
JSON_Object *json_array_get_object(const JSON_Array *array, size_t index)
{
return json_value_get_object(json_array_get_value(array, index));
}
JSON_Array *json_array_get_array(const JSON_Array *array, size_t index)
{
return json_value_get_array(json_array_get_value(array, index));
}
int json_array_get_boolean(const JSON_Array *array, size_t index)
{
return json_value_get_boolean(json_array_get_value(array, index));
}
size_t json_array_get_count(const JSON_Array *array)
{
return array ? array->count : 0;
}
JSON_Value *json_array_get_wrapping_value(const JSON_Array *array)
{
if (!array) {
return NULL;
}
return array->wrapping_value;
}
/* JSON Value API */
JSON_Value_Type json_value_get_type(const JSON_Value *value)
{
return value ? value->type : JSONError;
}
JSON_Object *json_value_get_object(const JSON_Value *value)
{
return json_value_get_type(value) == JSONObject ? value->value.object
: NULL;
}
JSON_Array *json_value_get_array(const JSON_Value *value)
{
return json_value_get_type(value) == JSONArray ? value->value.array : NULL;
}
static const JSON_String *json_value_get_string_desc(const JSON_Value *value)
{
return json_value_get_type(value) == JSONString ? &value->value.string
: NULL;
}
const char *json_value_get_string(const JSON_Value *value)
{
const JSON_String *str = json_value_get_string_desc(value);
return str ? str->chars : NULL;
}
size_t json_value_get_string_len(const JSON_Value *value)
{
const JSON_String *str = json_value_get_string_desc(value);
return str ? str->length : 0;
}
double json_value_get_number(const JSON_Value *value)
{
return json_value_get_type(value) == JSONNumber ? value->value.number : 0;
}
int json_value_get_boolean(const JSON_Value *value)
{
return json_value_get_type(value) == JSONBoolean ? value->value.boolean
: -1;
}
JSON_Value *json_value_get_parent(const JSON_Value *value)
{
return value ? value->parent : NULL;
}
void json_value_free(JSON_Value *value)
{
switch (json_value_get_type(value)) {
case JSONObject:
json_object_free(value->value.object);
break;
case JSONString:
parson_free(value->value.string.chars);
break;
case JSONArray:
json_array_free(value->value.array);
break;
default:
break;
}
parson_free(value);
}
JSON_Value *json_value_init_object(void)
{
JSON_Value *new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (!new_value) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONObject;
new_value->value.object = json_object_make(new_value);
if (!new_value->value.object) {
parson_free(new_value);
return NULL;
}
return new_value;
}
JSON_Value *json_value_init_array(void)
{
JSON_Value *new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (!new_value) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONArray;
new_value->value.array = json_array_make(new_value);
if (!new_value->value.array) {
parson_free(new_value);
return NULL;
}
return new_value;
}
JSON_Value *json_value_init_string(const char *string)
{
if (string == NULL) {
return NULL;
}
return json_value_init_string_with_len(string, strlen(string));
}
JSON_Value *json_value_init_string_with_len(const char *string, size_t length)
{
char *copy = NULL;
JSON_Value *value;
if (string == NULL) {
return NULL;
}
if (!is_valid_utf8(string, length)) {
return NULL;
}
copy = parson_strndup(string, length);
if (copy == NULL) {
return NULL;
}
value = json_value_init_string_no_copy(copy, length);
if (value == NULL) {
parson_free(copy);
}
return value;
}
JSON_Value *json_value_init_number(double number)
{
JSON_Value *new_value = NULL;
if (IS_NUMBER_INVALID(number)) {
return NULL;
}
new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (new_value == NULL) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONNumber;
new_value->value.number = number;
return new_value;
}
JSON_Value *json_value_init_boolean(int boolean)
{
JSON_Value *new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (!new_value) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONBoolean;
new_value->value.boolean = boolean ? 1 : 0;
return new_value;
}
JSON_Value *json_value_init_null(void)
{
JSON_Value *new_value = (JSON_Value *)parson_malloc(sizeof(JSON_Value));
if (!new_value) {
return NULL;
}
new_value->parent = NULL;
new_value->type = JSONNull;
return new_value;
}
JSON_Value *json_value_deep_copy(const JSON_Value *value)
{
size_t i = 0;
JSON_Value *return_value = NULL, *temp_value_copy = NULL,
*temp_value = NULL;
const JSON_String *temp_string = NULL;
const char *temp_key = NULL;
char *temp_string_copy = NULL;
JSON_Array *temp_array = NULL, *temp_array_copy = NULL;
JSON_Object *temp_object = NULL, *temp_object_copy = NULL;
JSON_Status res = JSONFailure;
char *key_copy = NULL;
switch (json_value_get_type(value)) {
case JSONArray:
temp_array = json_value_get_array(value);
return_value = json_value_init_array();
if (return_value == NULL) {
return NULL;
}
temp_array_copy = json_value_get_array(return_value);
for (i = 0; i < json_array_get_count(temp_array); i++) {
temp_value = json_array_get_value(temp_array, i);
temp_value_copy = json_value_deep_copy(temp_value);
if (temp_value_copy == NULL) {
json_value_free(return_value);
return NULL;
}
if (json_array_add(temp_array_copy, temp_value_copy) !=
JSONSuccess) {
json_value_free(return_value);
json_value_free(temp_value_copy);
return NULL;
}
}
return return_value;
case JSONObject:
temp_object = json_value_get_object(value);
return_value = json_value_init_object();
if (!return_value) {
return NULL;
}
temp_object_copy = json_value_get_object(return_value);
for (i = 0; i < json_object_get_count(temp_object); i++) {
temp_key = json_object_get_name(temp_object, i);
temp_value = json_object_get_value(temp_object, temp_key);
temp_value_copy = json_value_deep_copy(temp_value);
if (!temp_value_copy) {
json_value_free(return_value);
return NULL;
}
key_copy = parson_strdup(temp_key);
if (!key_copy) {
json_value_free(temp_value_copy);
json_value_free(return_value);
return NULL;
}
res = json_object_add(temp_object_copy, key_copy, temp_value_copy);
if (res != JSONSuccess) {
parson_free(key_copy);
json_value_free(temp_value_copy);
json_value_free(return_value);
return NULL;
}
}
return return_value;
case JSONBoolean:
return json_value_init_boolean(json_value_get_boolean(value));
case JSONNumber:
return json_value_init_number(json_value_get_number(value));
case JSONString:
temp_string = json_value_get_string_desc(value);
if (temp_string == NULL) {
return NULL;
}
temp_string_copy =
parson_strndup(temp_string->chars, temp_string->length);
if (temp_string_copy == NULL) {
return NULL;
}
return_value = json_value_init_string_no_copy(temp_string_copy,
temp_string->length);
if (return_value == NULL) {
parson_free(temp_string_copy);
}
return return_value;
case JSONNull:
return json_value_init_null();
case JSONError:
return NULL;
default:
return NULL;
}
}
size_t json_serialization_size(const JSON_Value *value)
{
char num_buf[PARSON_NUM_BUF_SIZE]; /* recursively allocating buffer on stack
is a bad idea, so let's do it only
once */
int res = json_serialize_to_buffer_r(value, NULL, 0, PARSON_FALSE, num_buf);
return res < 0 ? 0 : (size_t)(res) + 1;
}
JSON_Status json_serialize_to_buffer(const JSON_Value *value, char *buf,
size_t buf_size_in_bytes)
{
int written = -1;
size_t needed_size_in_bytes = json_serialization_size(value);
if (needed_size_in_bytes == 0 || buf_size_in_bytes < needed_size_in_bytes) {
return JSONFailure;
}
written = json_serialize_to_buffer_r(value, buf, 0, PARSON_FALSE, NULL);
if (written < 0) {
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_serialize_to_file(const JSON_Value *value,
const char *filename)
{
JSON_Status return_code = JSONSuccess;
FILE *fp = NULL;
char *serialized_string = json_serialize_to_string(value);
if (serialized_string == NULL) {
return JSONFailure;
}
fp = fopen(filename, "w");
if (fp == NULL) {
json_free_serialized_string(serialized_string);
return JSONFailure;
}
if (fputs(serialized_string, fp) == EOF) {
return_code = JSONFailure;
}
if (fclose(fp) == EOF) {
return_code = JSONFailure;
}
json_free_serialized_string(serialized_string);
return return_code;
}
char *json_serialize_to_string(const JSON_Value *value)
{
JSON_Status serialization_result = JSONFailure;
size_t buf_size_bytes = json_serialization_size(value);
char *buf = NULL;
if (buf_size_bytes == 0) {
return NULL;
}
buf = (char *)parson_malloc(buf_size_bytes);
if (buf == NULL) {
return NULL;
}
serialization_result = json_serialize_to_buffer(value, buf, buf_size_bytes);
if (serialization_result != JSONSuccess) {
json_free_serialized_string(buf);
return NULL;
}
return buf;
}
size_t json_serialization_size_pretty(const JSON_Value *value)
{
char num_buf[PARSON_NUM_BUF_SIZE]; /* recursively allocating buffer on stack
is a bad idea, so let's do it only
once */
int res = json_serialize_to_buffer_r(value, NULL, 0, PARSON_TRUE, num_buf);
return res < 0 ? 0 : (size_t)(res) + 1;
}
JSON_Status json_serialize_to_buffer_pretty(const JSON_Value *value, char *buf,
size_t buf_size_in_bytes)
{
int written = -1;
size_t needed_size_in_bytes = json_serialization_size_pretty(value);
if (needed_size_in_bytes == 0 || buf_size_in_bytes < needed_size_in_bytes) {
return JSONFailure;
}
written = json_serialize_to_buffer_r(value, buf, 0, PARSON_TRUE, NULL);
if (written < 0) {
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_serialize_to_file_pretty(const JSON_Value *value,
const char *filename)
{
JSON_Status return_code = JSONSuccess;
FILE *fp = NULL;
char *serialized_string = json_serialize_to_string_pretty(value);
if (serialized_string == NULL) {
return JSONFailure;
}
fp = fopen(filename, "w");
if (fp == NULL) {
json_free_serialized_string(serialized_string);
return JSONFailure;
}
if (fputs(serialized_string, fp) == EOF) {
return_code = JSONFailure;
}
if (fclose(fp) == EOF) {
return_code = JSONFailure;
}
json_free_serialized_string(serialized_string);
return return_code;
}
char *json_serialize_to_string_pretty(const JSON_Value *value)
{
JSON_Status serialization_result = JSONFailure;
size_t buf_size_bytes = json_serialization_size_pretty(value);
char *buf = NULL;
if (buf_size_bytes == 0) {
return NULL;
}
buf = (char *)parson_malloc(buf_size_bytes);
if (buf == NULL) {
return NULL;
}
serialization_result =
json_serialize_to_buffer_pretty(value, buf, buf_size_bytes);
if (serialization_result != JSONSuccess) {
json_free_serialized_string(buf);
return NULL;
}
return buf;
}
void json_free_serialized_string(char *string)
{
parson_free(string);
}
JSON_Status json_array_remove(JSON_Array *array, size_t ix)
{
size_t to_move_bytes = 0;
if (array == NULL || ix >= json_array_get_count(array)) {
return JSONFailure;
}
json_value_free(json_array_get_value(array, ix));
to_move_bytes =
(json_array_get_count(array) - 1 - ix) * sizeof(JSON_Value *);
memmove(array->items + ix, array->items + ix + 1, to_move_bytes);
array->count -= 1;
return JSONSuccess;
}
JSON_Status json_array_replace_value(JSON_Array *array, size_t ix,
JSON_Value *value)
{
if (array == NULL || value == NULL || value->parent != NULL ||
ix >= json_array_get_count(array)) {
return JSONFailure;
}
json_value_free(json_array_get_value(array, ix));
value->parent = json_array_get_wrapping_value(array);
array->items[ix] = value;
return JSONSuccess;
}
JSON_Status json_array_replace_string(JSON_Array *array, size_t i,
const char *string)
{
JSON_Value *value = json_value_init_string(string);
if (value == NULL) {
return JSONFailure;
}
if (json_array_replace_value(array, i, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_replace_string_with_len(JSON_Array *array, size_t i,
const char *string, size_t len)
{
JSON_Value *value = json_value_init_string_with_len(string, len);
if (value == NULL) {
return JSONFailure;
}
if (json_array_replace_value(array, i, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_replace_number(JSON_Array *array, size_t i,
double number)
{
JSON_Value *value = json_value_init_number(number);
if (value == NULL) {
return JSONFailure;
}
if (json_array_replace_value(array, i, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_replace_boolean(JSON_Array *array, size_t i, int boolean)
{
JSON_Value *value = json_value_init_boolean(boolean);
if (value == NULL) {
return JSONFailure;
}
if (json_array_replace_value(array, i, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_replace_null(JSON_Array *array, size_t i)
{
JSON_Value *value = json_value_init_null();
if (value == NULL) {
return JSONFailure;
}
if (json_array_replace_value(array, i, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_clear(JSON_Array *array)
{
size_t i = 0;
if (array == NULL) {
return JSONFailure;
}
for (i = 0; i < json_array_get_count(array); i++) {
json_value_free(json_array_get_value(array, i));
}
array->count = 0;
return JSONSuccess;
}
JSON_Status json_array_append_value(JSON_Array *array, JSON_Value *value)
{
if (array == NULL || value == NULL || value->parent != NULL) {
return JSONFailure;
}
return json_array_add(array, value);
}
JSON_Status json_array_append_string(JSON_Array *array, const char *string)
{
JSON_Value *value = json_value_init_string(string);
if (value == NULL) {
return JSONFailure;
}
if (json_array_append_value(array, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_append_string_with_len(JSON_Array *array,
const char *string, size_t len)
{
JSON_Value *value = json_value_init_string_with_len(string, len);
if (value == NULL) {
return JSONFailure;
}
if (json_array_append_value(array, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_append_number(JSON_Array *array, double number)
{
JSON_Value *value = json_value_init_number(number);
if (value == NULL) {
return JSONFailure;
}
if (json_array_append_value(array, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_append_boolean(JSON_Array *array, int boolean)
{
JSON_Value *value = json_value_init_boolean(boolean);
if (value == NULL) {
return JSONFailure;
}
if (json_array_append_value(array, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_array_append_null(JSON_Array *array)
{
JSON_Value *value = json_value_init_null();
if (value == NULL) {
return JSONFailure;
}
if (json_array_append_value(array, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_set_value(JSON_Object *object, const char *name,
JSON_Value *value)
{
unsigned long hash = 0;
parson_bool_t found = PARSON_FALSE;
size_t cell_ix = 0;
size_t item_ix = 0;
JSON_Value *old_value = NULL;
char *key_copy = NULL;
if (!object || !name || !value || value->parent) {
return JSONFailure;
}
hash = hash_string(name, strlen(name));
found = PARSON_FALSE;
cell_ix = json_object_get_cell_ix(object, name, strlen(name), hash, &found);
if (found) {
item_ix = object->cells[cell_ix];
old_value = object->values[item_ix];
json_value_free(old_value);
object->values[item_ix] = value;
value->parent = json_object_get_wrapping_value(object);
return JSONSuccess;
}
if (object->count >= object->item_capacity) {
JSON_Status res = json_object_grow_and_rehash(object);
if (res != JSONSuccess) {
return JSONFailure;
}
cell_ix =
json_object_get_cell_ix(object, name, strlen(name), hash, &found);
}
key_copy = parson_strdup(name);
if (!key_copy) {
return JSONFailure;
}
object->names[object->count] = key_copy;
object->cells[cell_ix] = object->count;
object->values[object->count] = value;
object->cell_ixs[object->count] = cell_ix;
object->hashes[object->count] = hash;
object->count++;
value->parent = json_object_get_wrapping_value(object);
return JSONSuccess;
}
JSON_Status json_object_set_string(JSON_Object *object, const char *name,
const char *string)
{
JSON_Value *value = json_value_init_string(string);
JSON_Status status = json_object_set_value(object, name, value);
if (status != JSONSuccess) {
json_value_free(value);
}
return status;
}
JSON_Status json_object_set_string_with_len(JSON_Object *object,
const char *name,
const char *string, size_t len)
{
JSON_Value *value = json_value_init_string_with_len(string, len);
JSON_Status status = json_object_set_value(object, name, value);
if (status != JSONSuccess) {
json_value_free(value);
}
return status;
}
JSON_Status json_object_set_number(JSON_Object *object, const char *name,
double number)
{
JSON_Value *value = json_value_init_number(number);
JSON_Status status = json_object_set_value(object, name, value);
if (status != JSONSuccess) {
json_value_free(value);
}
return status;
}
JSON_Status json_object_set_boolean(JSON_Object *object, const char *name,
int boolean)
{
JSON_Value *value = json_value_init_boolean(boolean);
JSON_Status status = json_object_set_value(object, name, value);
if (status != JSONSuccess) {
json_value_free(value);
}
return status;
}
JSON_Status json_object_set_null(JSON_Object *object, const char *name)
{
JSON_Value *value = json_value_init_null();
JSON_Status status = json_object_set_value(object, name, value);
if (status != JSONSuccess) {
json_value_free(value);
}
return status;
}
JSON_Status json_object_dotset_value(JSON_Object *object, const char *name,
JSON_Value *value)
{
const char *dot_pos = NULL;
JSON_Value *temp_value = NULL, *new_value = NULL;
JSON_Object *temp_object = NULL, *new_object = NULL;
JSON_Status status = JSONFailure;
size_t name_len = 0;
char *name_copy = NULL;
if (object == NULL || name == NULL || value == NULL) {
return JSONFailure;
}
dot_pos = strchr(name, '.');
if (dot_pos == NULL) {
return json_object_set_value(object, name, value);
}
name_len = dot_pos - name;
temp_value = json_object_getn_value(object, name, name_len);
if (temp_value) {
/* Don't overwrite existing non-object (unlike json_object_set_value,
* but it shouldn't be changed at this point) */
if (json_value_get_type(temp_value) != JSONObject) {
return JSONFailure;
}
temp_object = json_value_get_object(temp_value);
return json_object_dotset_value(temp_object, dot_pos + 1, value);
}
new_value = json_value_init_object();
if (new_value == NULL) {
return JSONFailure;
}
new_object = json_value_get_object(new_value);
status = json_object_dotset_value(new_object, dot_pos + 1, value);
if (status != JSONSuccess) {
json_value_free(new_value);
return JSONFailure;
}
name_copy = parson_strndup(name, name_len);
if (!name_copy) {
json_object_dotremove_internal(new_object, dot_pos + 1, 0);
json_value_free(new_value);
return JSONFailure;
}
status = json_object_add(object, name_copy, new_value);
if (status != JSONSuccess) {
parson_free(name_copy);
json_object_dotremove_internal(new_object, dot_pos + 1, 0);
json_value_free(new_value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_dotset_string(JSON_Object *object, const char *name,
const char *string)
{
JSON_Value *value = json_value_init_string(string);
if (value == NULL) {
return JSONFailure;
}
if (json_object_dotset_value(object, name, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_dotset_string_with_len(JSON_Object *object,
const char *name,
const char *string, size_t len)
{
JSON_Value *value = json_value_init_string_with_len(string, len);
if (value == NULL) {
return JSONFailure;
}
if (json_object_dotset_value(object, name, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_dotset_number(JSON_Object *object, const char *name,
double number)
{
JSON_Value *value = json_value_init_number(number);
if (value == NULL) {
return JSONFailure;
}
if (json_object_dotset_value(object, name, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_dotset_boolean(JSON_Object *object, const char *name,
int boolean)
{
JSON_Value *value = json_value_init_boolean(boolean);
if (value == NULL) {
return JSONFailure;
}
if (json_object_dotset_value(object, name, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_dotset_null(JSON_Object *object, const char *name)
{
JSON_Value *value = json_value_init_null();
if (value == NULL) {
return JSONFailure;
}
if (json_object_dotset_value(object, name, value) != JSONSuccess) {
json_value_free(value);
return JSONFailure;
}
return JSONSuccess;
}
JSON_Status json_object_remove(JSON_Object *object, const char *name)
{
return json_object_remove_internal(object, name, PARSON_TRUE);
}
JSON_Status json_object_dotremove(JSON_Object *object, const char *name)
{
return json_object_dotremove_internal(object, name, PARSON_TRUE);
}
JSON_Status json_object_clear(JSON_Object *object)
{
size_t i = 0;
if (object == NULL) {
return JSONFailure;
}
for (i = 0; i < json_object_get_count(object); i++) {
parson_free(object->names[i]);
object->names[i] = NULL;
json_value_free(object->values[i]);
object->values[i] = NULL;
}
object->count = 0;
for (i = 0; i < object->cell_capacity; i++) {
object->cells[i] = OBJECT_INVALID_IX;
}
return JSONSuccess;
}
JSON_Status json_validate(const JSON_Value *schema, const JSON_Value *value)
{
JSON_Value *temp_schema_value = NULL, *temp_value = NULL;
JSON_Array *schema_array = NULL, *value_array = NULL;
JSON_Object *schema_object = NULL, *value_object = NULL;
JSON_Value_Type schema_type = JSONError, value_type = JSONError;
const char *key = NULL;
size_t i = 0, count = 0;
if (schema == NULL || value == NULL) {
return JSONFailure;
}
schema_type = json_value_get_type(schema);
value_type = json_value_get_type(value);
if (schema_type != value_type &&
schema_type != JSONNull) { /* null represents all values */
return JSONFailure;
}
switch (schema_type) {
case JSONArray:
schema_array = json_value_get_array(schema);
value_array = json_value_get_array(value);
count = json_array_get_count(schema_array);
if (count == 0) {
return JSONSuccess; /* Empty array allows all types */
}
/* Get first value from array, rest is ignored */
temp_schema_value = json_array_get_value(schema_array, 0);
for (i = 0; i < json_array_get_count(value_array); i++) {
temp_value = json_array_get_value(value_array, i);
if (json_validate(temp_schema_value, temp_value) != JSONSuccess) {
return JSONFailure;
}
}
return JSONSuccess;
case JSONObject:
schema_object = json_value_get_object(schema);
value_object = json_value_get_object(value);
count = json_object_get_count(schema_object);
if (count == 0) {
return JSONSuccess; /* Empty object allows all objects */
}
else if (json_object_get_count(value_object) < count) {
return JSONFailure; /* Tested object mustn't have less name-value
pairs than schema */
}
for (i = 0; i < count; i++) {
key = json_object_get_name(schema_object, i);
temp_schema_value = json_object_get_value(schema_object, key);
temp_value = json_object_get_value(value_object, key);
if (temp_value == NULL) {
return JSONFailure;
}
if (json_validate(temp_schema_value, temp_value) != JSONSuccess) {
return JSONFailure;
}
}
return JSONSuccess;
case JSONString:
case JSONNumber:
case JSONBoolean:
case JSONNull:
return JSONSuccess; /* equality already tested before switch */
case JSONError:
default:
return JSONFailure;
}
}
int json_value_equals(const JSON_Value *a, const JSON_Value *b)
{
JSON_Object *a_object = NULL, *b_object = NULL;
JSON_Array *a_array = NULL, *b_array = NULL;
const JSON_String *a_string = NULL, *b_string = NULL;
const char *key = NULL;
size_t a_count = 0, b_count = 0, i = 0;
JSON_Value_Type a_type, b_type;
a_type = json_value_get_type(a);
b_type = json_value_get_type(b);
if (a_type != b_type) {
return PARSON_FALSE;
}
switch (a_type) {
case JSONArray:
a_array = json_value_get_array(a);
b_array = json_value_get_array(b);
a_count = json_array_get_count(a_array);
b_count = json_array_get_count(b_array);
if (a_count != b_count) {
return PARSON_FALSE;
}
for (i = 0; i < a_count; i++) {
if (!json_value_equals(json_array_get_value(a_array, i),
json_array_get_value(b_array, i))) {
return PARSON_FALSE;
}
}
return PARSON_TRUE;
case JSONObject:
a_object = json_value_get_object(a);
b_object = json_value_get_object(b);
a_count = json_object_get_count(a_object);
b_count = json_object_get_count(b_object);
if (a_count != b_count) {
return PARSON_FALSE;
}
for (i = 0; i < a_count; i++) {
key = json_object_get_name(a_object, i);
if (!json_value_equals(json_object_get_value(a_object, key),
json_object_get_value(b_object, key))) {
return PARSON_FALSE;
}
}
return PARSON_TRUE;
case JSONString:
a_string = json_value_get_string_desc(a);
b_string = json_value_get_string_desc(b);
if (a_string == NULL || b_string == NULL) {
return PARSON_FALSE; /* shouldn't happen */
}
return a_string->length == b_string->length &&
memcmp(a_string->chars, b_string->chars, a_string->length) == 0;
case JSONBoolean:
return json_value_get_boolean(a) == json_value_get_boolean(b);
case JSONNumber:
return fabs(json_value_get_number(a) - json_value_get_number(b)) <
0.000001; /* EPSILON */
case JSONError:
return PARSON_TRUE;
case JSONNull:
return PARSON_TRUE;
default:
return PARSON_TRUE;
}
}
JSON_Value_Type json_type(const JSON_Value *value)
{
return json_value_get_type(value);
}
JSON_Object *json_object(const JSON_Value *value)
{
return json_value_get_object(value);
}
JSON_Array *json_array(const JSON_Value *value)
{
return json_value_get_array(value);
}
const char *json_string(const JSON_Value *value)
{
return json_value_get_string(value);
}
size_t json_string_len(const JSON_Value *value)
{
return json_value_get_string_len(value);
}
double json_number(const JSON_Value *value)
{
return json_value_get_number(value);
}
int json_boolean(const JSON_Value *value)
{
return json_value_get_boolean(value);
}
void json_set_allocation_functions(JSON_Malloc_Function malloc_fun,
JSON_Free_Function free_fun)
{
parson_malloc = malloc_fun;
parson_free = free_fun;
}
void json_set_escape_slashes(int escape_slashes)
{
parson_escape_slashes = escape_slashes;
}
void json_set_float_serialization_format(const char *format)
{
if (parson_float_format) {
parson_free(parson_float_format);
parson_float_format = NULL;
}
if (!format) {
parson_float_format = NULL;
return;
}
parson_float_format = parson_strdup(format);
}
void json_set_number_serialization_function(
JSON_Number_Serialization_Function func)
{
parson_number_serialization_function = func;
}
#if defined(__GNUC__)
#pragma GCC visibility pop
#endif
NULL
#define NULL
Definition ccmath.h:32
b
double b
Definition driver/set_window.c:5
HUGE_VAL
#define HUGE_VAL
Values needed for Ray-Convex Polyhedron Intersection Test below originally by Eric Haines,...
Definition gs_query.c:29
count
int count
name
const char * name
Definition named_colr.c:6
json_object_dotset_string
JSON_Status json_object_dotset_string(JSON_Object *object, const char *name, const char *string)
Definition parson.c:2559
json_object_get_string_len
size_t json_object_get_string_len(const JSON_Object *object, const char *name)
Definition parson.c:1640
json_array_replace_null
JSON_Status json_array_replace_null(JSON_Array *array, size_t i)
Definition parson.c:2304
json_value_get_string
const char * json_value_get_string(const JSON_Value *value)
Definition parson.c:1839
json_string
const char * json_string(const JSON_Value *value)
Definition parson.c:2809
json_object_get_boolean
int json_object_get_boolean(const JSON_Object *object, const char *name)
Definition parson.c:1660
json_value_get_string_len
size_t json_value_get_string_len(const JSON_Value *value)
Definition parson.c:1845
json_string_len
size_t json_string_len(const JSON_Value *value)
Definition parson.c:2814
json_object_dotset_boolean
JSON_Status json_object_dotset_boolean(JSON_Object *object, const char *name, int boolean)
Definition parson.c:2602
PARSON_FALSE
#define PARSON_FALSE
Definition parson.c:120
SKIP_CHAR
#define SKIP_CHAR(str)
Definition parson.c:86
json_array_append_null
JSON_Status json_array_append_null(JSON_Array *array)
Definition parson.c:2391
json_array_replace_boolean
JSON_Status json_array_replace_boolean(JSON_Array *array, size_t i, int boolean)
Definition parson.c:2291
json_object_remove
JSON_Status json_object_remove(JSON_Object *object, const char *name)
Definition parson.c:2629
json_serialize_to_buffer_pretty
JSON_Status json_serialize_to_buffer_pretty(const JSON_Value *value, char *buf, size_t buf_size_in_bytes)
Definition parson.c:2157
IS_NUMBER_INVALID
#define IS_NUMBER_INVALID(x)
Definition parson.c:99
json_serialization_size_pretty
size_t json_serialization_size_pretty(const JSON_Value *value)
Definition parson.c:2148
json_array_replace_value
JSON_Status json_array_replace_value(JSON_Array *array, size_t ix, JSON_Value *value)
Definition parson.c:2236
json_array_get_value
JSON_Value * json_array_get_value(const JSON_Array *array, size_t index)
Definition parson.c:1765
json_array_get_string
const char * json_array_get_string(const JSON_Array *array, size_t index)
Definition parson.c:1773
json_array_append_boolean
JSON_Status json_array_append_boolean(JSON_Array *array, int boolean)
Definition parson.c:2378
json_type
JSON_Value_Type json_type(const JSON_Value *value)
Definition parson.c:2794
json_object_dotget_boolean
int json_object_dotget_boolean(const JSON_Object *object, const char *name)
Definition parson.c:1706
json_object_get_name
const char * json_object_get_name(const JSON_Object *object, size_t index)
Definition parson.c:1716
json_array_replace_string_with_len
JSON_Status json_array_replace_string_with_len(JSON_Array *array, size_t i, const char *string, size_t len)
Definition parson.c:2263
json_value_get_array
JSON_Array * json_value_get_array(const JSON_Value *value)
Definition parson.c:1828
json_object_dotget_string
const char * json_object_dotget_string(const JSON_Object *object, const char *name)
Definition parson.c:1677
json_object_dotset_null
JSON_Status json_object_dotset_null(JSON_Object *object, const char *name)
Definition parson.c:2616
json_object_set_string_with_len
JSON_Status json_object_set_string_with_len(JSON_Object *object, const char *name, const char *string, size_t len)
Definition parson.c:2461
JSON_String
struct json_string JSON_String
SKIP_WHITESPACES
#define SKIP_WHITESPACES(str)
Definition parson.c:87
json_object_set_number
JSON_Status json_object_set_number(JSON_Object *object, const char *name, double number)
Definition parson.c:2473
json_object_has_value_of_type
int json_object_has_value_of_type(const JSON_Object *object, const char *name, JSON_Value_Type type)
Definition parson.c:1745
json_object_get_object
JSON_Object * json_object_get_object(const JSON_Object *object, const char *name)
Definition parson.c:1650
json_set_float_serialization_format
void json_set_float_serialization_format(const char *format)
Definition parson.c:2841
json_array_get_count
size_t json_array_get_count(const JSON_Array *array)
Definition parson.c:1803
json_array_get_number
double json_array_get_number(const JSON_Array *array, size_t index)
Definition parson.c:1783
json_array_replace_number
JSON_Status json_array_replace_number(JSON_Array *array, size_t i, double number)
Definition parson.c:2277
json_object_dotget_value
JSON_Value * json_object_dotget_value(const JSON_Object *object, const char *name)
Definition parson.c:1665
json_set_number_serialization_function
void json_set_number_serialization_function(JSON_Number_Serialization_Function func)
Definition parson.c:2854
json_array_clear
JSON_Status json_array_clear(JSON_Array *array)
Definition parson.c:2317
json_object_set_string
JSON_Status json_object_set_string(JSON_Object *object, const char *name, const char *string)
Definition parson.c:2450
json_object_set_boolean
JSON_Status json_object_set_boolean(JSON_Object *object, const char *name, int boolean)
Definition parson.c:2484
json_free_serialized_string
void json_free_serialized_string(char *string)
Definition parson.c:2217
json_array_remove
JSON_Status json_array_remove(JSON_Array *array, size_t ix)
Definition parson.c:2222
json_value_equals
int json_value_equals(const JSON_Value *a, const JSON_Value *b)
Definition parson.c:2727
JSON_Value_Value
union json_value_value JSON_Value_Value
json_validate
JSON_Status json_validate(const JSON_Value *schema, const JSON_Value *value)
Definition parson.c:2659
json_serialize_to_file
JSON_Status json_serialize_to_file(const JSON_Value *value, const char *filename)
Definition parson.c:2104
json_array_append_string_with_len
JSON_Status json_array_append_string_with_len(JSON_Array *array, const char *string, size_t len)
Definition parson.c:2351
PARSON_DEFAULT_FLOAT_FORMAT
#define PARSON_DEFAULT_FLOAT_FORMAT
Definition parson.c:72
json_object_dotget_array
JSON_Array * json_object_dotget_array(const JSON_Object *object, const char *name)
Definition parson.c:1700
json_object_dothas_value_of_type
int json_object_dothas_value_of_type(const JSON_Object *object, const char *name, JSON_Value_Type type)
Definition parson.c:1757
json_set_escape_slashes
void json_set_escape_slashes(int escape_slashes)
Definition parson.c:2836
json_object_dotremove
JSON_Status json_object_dotremove(JSON_Object *object, const char *name)
Definition parson.c:2634
json_object_dotset_value
JSON_Status json_object_dotset_value(JSON_Object *object, const char *name, JSON_Value *value)
Definition parson.c:2505
json_value_init_array
JSON_Value * json_value_init_array(void)
Definition parson.c:1901
json_object_get_count
size_t json_object_get_count(const JSON_Object *object)
Definition parson.c:1711
STARTING_CAPACITY
#define STARTING_CAPACITY
Definition parson.c:68
json_object_get_wrapping_value
JSON_Value * json_object_get_wrapping_value(const JSON_Object *object)
Definition parson.c:1732
json_array_get_object
JSON_Object * json_array_get_object(const JSON_Array *array, size_t index)
Definition parson.c:1788
json_boolean
int json_boolean(const JSON_Value *value)
Definition parson.c:2824
json_number
double json_number(const JSON_Value *value)
Definition parson.c:2819
json_object_dotget_object
JSON_Object * json_object_dotget_object(const JSON_Object *object, const char *name)
Definition parson.c:1694
json_object_get_value_at
JSON_Value * json_object_get_value_at(const JSON_Object *object, size_t index)
Definition parson.c:1724
json_parse_string
JSON_Value * json_parse_string(const char *string)
Definition parson.c:1598
json_array_append_value
JSON_Status json_array_append_value(JSON_Array *array, JSON_Value *value)
Definition parson.c:2330
json_object_dothas_value
int json_object_dothas_value(const JSON_Object *object, const char *name)
Definition parson.c:1752
APPEND_INDENT
#define APPEND_INDENT(level)
Definition parson.c:1273
json_value_init_number
JSON_Value * json_value_init_number(double number)
Definition parson.c:1946
PARSON_NUM_BUF_SIZE
#define PARSON_NUM_BUF_SIZE
Definition parson.c:77
json_array
JSON_Array * json_array(const JSON_Value *value)
Definition parson.c:2804
json_object_get_array
JSON_Array * json_object_get_array(const JSON_Object *object, const char *name)
Definition parson.c:1655
json_object_has_value
int json_object_has_value(const JSON_Object *object, const char *name)
Definition parson.c:1740
json_value_get_boolean
int json_value_get_boolean(const JSON_Value *value)
Definition parson.c:1856
json_value_deep_copy
JSON_Value * json_value_deep_copy(const JSON_Value *value)
Definition parson.c:1985
json_parse_string_with_comments
JSON_Value * json_parse_string_with_comments(const char *string)
Definition parson.c:1609
json_object_get_value
JSON_Value * json_object_get_value(const JSON_Object *object, const char *name)
Definition parson.c:1627
MAX_NESTING
#define MAX_NESTING
Definition parson.c:69
json_object_clear
JSON_Status json_object_clear(JSON_Object *object)
Definition parson.c:2639
json_object_get_string
const char * json_object_get_string(const JSON_Object *object, const char *name)
Definition parson.c:1635
json_array_get_boolean
int json_array_get_boolean(const JSON_Array *array, size_t index)
Definition parson.c:1798
json_serialize_to_string
char * json_serialize_to_string(const JSON_Value *value)
Definition parson.c:2128
json_object_set_value
JSON_Status json_object_set_value(JSON_Object *object, const char *name, JSON_Value *value)
Definition parson.c:2404
json_object_dotset_string_with_len
JSON_Status json_object_dotset_string_with_len(JSON_Object *object, const char *name, const char *string, size_t len)
Definition parson.c:2573
json_value_init_null
JSON_Value * json_value_init_null(void)
Definition parson.c:1974
IS_CONT
#define IS_CONT(b)
Definition parson.c:114
json_array_get_wrapping_value
JSON_Value * json_array_get_wrapping_value(const JSON_Array *array)
Definition parson.c:1808
json_array_get_string_len
size_t json_array_get_string_len(const JSON_Array *array, size_t index)
Definition parson.c:1778
json_value_free
void json_value_free(JSON_Value *value)
Definition parson.c:1867
json_object_set_null
JSON_Status json_object_set_null(JSON_Object *object, const char *name)
Definition parson.c:2495
json_serialize_to_file_pretty
JSON_Status json_serialize_to_file_pretty(const JSON_Value *value, const char *filename)
Definition parson.c:2172
json_parse_file
JSON_Value * json_parse_file(const char *filename)
Definition parson.c:1574
json_serialization_size
size_t json_serialization_size(const JSON_Value *value)
Definition parson.c:2080
PARSON_TRUE
#define PARSON_TRUE
Definition parson.c:119
APPEND_STRING
#define APPEND_STRING(str)
Definition parson.c:1262
json_array_append_string
JSON_Status json_array_append_string(JSON_Array *array, const char *string)
Definition parson.c:2338
json_array_get_array
JSON_Array * json_array_get_array(const JSON_Array *array, size_t index)
Definition parson.c:1793
json_value_init_string_with_len
JSON_Value * json_value_init_string_with_len(const char *string, size_t length)
Definition parson.c:1925
json_object_dotget_string_len
size_t json_object_dotget_string_len(const JSON_Object *object, const char *name)
Definition parson.c:1683
json_value_init_boolean
JSON_Value * json_value_init_boolean(int boolean)
Definition parson.c:1962
json_value_get_number
double json_value_get_number(const JSON_Value *value)
Definition parson.c:1851
json_object_get_number
double json_object_get_number(const JSON_Object *object, const char *name)
Definition parson.c:1645
json_object_dotget_number
double json_object_dotget_number(const JSON_Object *object, const char *name)
Definition parson.c:1689
json_value_get_type
JSON_Value_Type json_value_get_type(const JSON_Value *value)
Definition parson.c:1817
json_value_get_object
JSON_Object * json_value_get_object(const JSON_Value *value)
Definition parson.c:1822
json_object
JSON_Object * json_object(const JSON_Value *value)
Definition parson.c:2799
json_value_init_object
JSON_Value * json_value_init_object(void)
Definition parson.c:1885
SIZEOF_TOKEN
#define SIZEOF_TOKEN(a)
Definition parson.c:85
json_serialize_to_string_pretty
char * json_serialize_to_string_pretty(const JSON_Value *value)
Definition parson.c:2196
json_value_init_string
JSON_Value * json_value_init_string(const char *string)
Definition parson.c:1917
parson_bool_t
int parson_bool_t
Definition parson.c:117
json_object_dotset_number
JSON_Status json_object_dotset_number(JSON_Object *object, const char *name, double number)
Definition parson.c:2588
OBJECT_INVALID_IX
#define OBJECT_INVALID_IX
Definition parson.c:102
json_set_allocation_functions
void json_set_allocation_functions(JSON_Malloc_Function malloc_fun, JSON_Free_Function free_fun)
Definition parson.c:2829
json_parse_file_with_comments
JSON_Value * json_parse_file_with_comments(const char *filename)
Definition parson.c:1586
json_array_append_number
JSON_Status json_array_append_number(JSON_Array *array, double number)
Definition parson.c:2365
json_array_replace_string
JSON_Status json_array_replace_string(JSON_Array *array, size_t i, const char *string)
Definition parson.c:2249
json_value_get_parent
JSON_Value * json_value_get_parent(const JSON_Value *value)
Definition parson.c:1862
json_serialize_to_buffer
JSON_Status json_serialize_to_buffer(const JSON_Value *value, char *buf, size_t buf_size_in_bytes)
Definition parson.c:2089
MAX
#define MAX(a, b)
Definition parson.c:91
parson.h
JSONError
@ JSONError
Definition parson.h:50
JSONObject
@ JSONObject
Definition parson.h:54
JSONNull
@ JSONNull
Definition parson.h:51
JSONNumber
@ JSONNumber
Definition parson.h:53
JSONBoolean
@ JSONBoolean
Definition parson.h:56
JSONString
@ JSONString
Definition parson.h:52
JSONArray
@ JSONArray
Definition parson.h:55
JSONSuccess
@ JSONSuccess
Definition parson.h:60
JSONFailure
@ JSONFailure
Definition parson.h:60
JSON_Value_Type
int JSON_Value_Type
Definition parson.h:58
JSON_Number_Serialization_Function
int(* JSON_Number_Serialization_Function)(double num, char *buf)
Definition parson.h:71
JSON_Array
struct json_array_t JSON_Array
Definition parson.h:46
JSON_Status
int JSON_Status
Definition parson.h:61
JSON_Value
struct json_value_t JSON_Value
Definition parson.h:47
JSON_Free_Function
void(* JSON_Free_Function)(void *)
Definition parson.h:64
JSON_Object
struct json_object_t JSON_Object
Definition parson.h:45
JSON_Malloc_Function
void *(* JSON_Malloc_Function)(size_t)
Definition parson.h:63
output
void output(const char *fmt,...)
Definition psdriver/graph_set.c:233
x
#define x