#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <json.h>
#ifdef __EMSCRIPTEN__
#include <emscripten/fetch.h>
#endif
#include "icclient/product.h"
#include "icclient/catalog.h"

static json_tokener *tokener = NULL;

void icclient_catalog_init()
{
	tokener = json_tokener_new();
}

#ifdef __EMSCRIPTEN__
void icclient_catalog_results(emscripten_fetch_t *fetch)
#else
size_t icclient_catalog_results(void *contents, size_t size, size_t nmemb, void *userData)
#endif
{
	size_t realsize =
#ifdef __EMSCRIPTEN__
		fetch->numBytes
#else
		size * nmemb
#endif
		;
#ifndef __EMSCRIPTEN__
	char data[realsize + 1];
	memcpy(data, contents, realsize);
	data[realsize] = '\0';
#endif
	json_object *products = json_tokener_parse_ex(tokener,
#ifdef __EMSCRIPTEN__
			fetch->
#endif
			data, realsize);
	enum json_tokener_error error = json_tokener_get_error(tokener);
	if (!products) {
		if (error == json_tokener_continue)
			return
#ifndef __EMSCRIPTEN__
				realsize
#endif
				;
		else {
			json_tokener_reset(tokener);
			return
#ifndef __EMSCRIPTEN__
				realsize
#endif
				;
		}
	} else if (!json_object_is_type(products, json_type_array) || error != json_tokener_success)
		return
#ifndef __EMSCRIPTEN__
			realsize
#endif
			;
	size_t length = json_object_array_length(products);
	struct icclient_catalog_callback *catalog_callback = (struct icclient_catalog_callback *)
#ifdef __EMSCRIPTEN__
		fetch->
#endif
		userData;
	struct icclient_catalog **catalogptr = catalog_callback->catalog;
	*catalogptr = malloc(sizeof(struct icclient_catalog) + sizeof(struct icclient_product *[length]));
	struct icclient_catalog *catalog = *catalogptr;
	catalog->length = length;
	for (size_t i = 0; i < length; i++) {
		catalog->products[i] = malloc(sizeof(struct icclient_product));
		struct icclient_product *product = catalog->products[i];
		icclient_product_init(product);
		json_object *object = json_object_array_get_idx(products, i);
		struct json_object_iterator iterator = json_object_iter_begin(object);
		struct json_object_iterator iterator_end = json_object_iter_end(object);
		while (!json_object_iter_equal(&iterator, &iterator_end)) {
			const char *key = json_object_iter_peek_name(&iterator);
			json_object *val = json_object_iter_peek_value(&iterator);
			if (!strcmp(key, "price"))
				product->price = json_object_get_double(val);
			else {
				int len = json_object_get_string_len(val);
				if (len) {
					char *value = malloc(len + 1);
					strcpy(value, json_object_get_string(val));
					if (!strcmp(key, "sku"))
						product->sku = value;
					else if (!strcmp(key, "thumb"))
						product->thumb = value;
					else if (!strcmp(key, "image"))
						product->image = value;
					else if (!strcmp(key, "description"))
						product->description = value;
					else if (!strcmp(key, "prod_group"))
						product->prod_group = value;
				}
			}
			json_object_iter_next(&iterator);
		}
	}
	catalog_callback->callback(catalog);
	free(catalog_callback);
#ifdef __EMSCRIPTEN__
	emscripten_fetch_close(fetch);
#else
	return realsize;
#endif
}

void icclient_catalog_free(struct icclient_catalog *catalog)
{
	for (size_t i = 0; i < catalog->length; i++)
		icclient_product_free(catalog->products[i]);
	free(catalog);
	catalog = NULL;
	json_tokener_free(tokener);
}