/* vim: set et ts=3 sw=3 sts=3 ft=c:
 *
 * Copyright (C) 2012, 2013, 2014 James McLaughlin et al.  All rights reserved.
 * https://github.com/udp/json-parser
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#ifndef _JSON_H
#define _JSON_H

#ifndef json_char
   #define json_char char
#endif

#ifndef json_int_t
   #ifndef _MSC_VER
      #include <inttypes.h>
      #define json_int_t int64_t
   #else
      #define json_int_t __int64
   #endif
#endif

#include <stdlib.h>

#ifdef __cplusplus

   #include <string.h>

extern "C"
{

#endif

typedef struct {
	unsigned long max_memory;
	int settings;

	/* Custom allocator support (leave null to use malloc/free)
	 */

	void * (*mem_alloc)(size_t, int zero, void * user_data);
	void (* mem_free)(void *, void * user_data);

	void * user_data; /* will be passed to mem_alloc and mem_free */

} json_settings;

#define json_enable_comments  0x01

typedef enum {
	json_none,
	json_object,
	json_array,
	json_integer,
	json_double,
	json_string,
	json_boolean,
	json_null

} json_type;

extern const struct _json_value json_value_none;

typedef struct _json_value {
	struct _json_value * parent;

	json_type type;

	union {
		int boolean;
		json_int_t integer;
		double dbl;

		struct {
			unsigned int length;
			json_char * ptr; /* null terminated */

		} string;

		struct {
			unsigned int length;

			struct {
				json_char * name;
				unsigned int name_length;

				struct _json_value * value;

			} * values;

	 #if defined(__cplusplus) && __cplusplus >= 201103L
			decltype(values) begin() const
			{  return values; }
			decltype(values) end() const
			{  return values + length; }
	 #endif

		} object;

		struct {
			unsigned int length;
			struct _json_value ** values;

	 #if defined(__cplusplus) && __cplusplus >= 201103L
			decltype(values) begin() const
			{  return values; }
			decltype(values) end() const
			{  return values + length; }
	 #endif

		} array;

	} u;

	union {
		struct _json_value * next_alloc;
		void * object_mem;

	} _reserved;


	/* Some C++ operator sugar */

   #ifdef __cplusplus

public:

	inline _json_value ()
	{
		memset(this, 0, sizeof(_json_value));
	}

	inline const struct _json_value &operator [](int index) const
	{
		if (type != json_array || index < 0
		    || ((unsigned int)index) >= u.array.length) {
			return json_value_none;
		}

		return *u.array.values [index];
	}

	inline const struct _json_value &operator [](const char * index) const
	{
		if (type != json_object) {
			return json_value_none;
		}

		for (unsigned int i = 0; i < u.object.length; ++i) {
			if (!strcmp(u.object.values [i].name, index)) {
				return *u.object.values [i].value;
			}
		}

		return json_value_none;
	}

	inline operator const char *() const
	{
		switch (type) {
		case json_string:
			return u.string.ptr;

		default:
			return "";
		}
		;
	}

	inline operator json_int_t() const
	{
		switch (type) {
		case json_integer:
			return u.integer;

		case json_double:
			return (json_int_t)u.dbl;

		default:
			return 0;
		}
		;
	}

	inline operator bool() const
	{
		if (type != json_boolean) {
			return false;
		}

		return u.boolean != 0;
	}

	inline operator double() const
	{
		switch (type) {
		case json_integer:
			return (double)u.integer;

		case json_double:
			return u.dbl;

		default:
			return 0;
		}
		;
	}

   #endif

} json_value;

json_value * json_parse(const json_char * json,
                        size_t length);

#define json_error_max 128
json_value * json_parse_ex(json_settings * settings,
                           const json_char * json,
                           size_t length,
                           char * error);

void json_value_free(json_value *);


/* Not usually necessary, unless you used a custom mem_alloc and now want to
 * use a custom mem_free.
 */
void json_value_free_ex(json_settings * settings,
                        json_value *);


#ifdef __cplusplus
}    /* extern "C" */
#endif

#endif