#include <string.h>
#include <json.h>
#include "pikul.h"

extern json_tokener *tokener;
void recurse(struct json_object *, const char *[], struct json_object **);

inline void handle_services(const char *contents, size_t num_bytes, const char *status_trail[],
		const char *trail[], const char *attributes[], struct pikul_services **services)
{
	json_object *response = json_tokener_parse_ex(tokener, contents, num_bytes);
	enum json_tokener_error error = json_tokener_get_error(tokener);
	if (!response) {
		if (error == json_tokener_continue)
			return;
		else {
			json_tokener_reset(tokener);
			return;
		}
	} else if (!json_object_is_type(response, json_type_object) || error != json_tokener_success)
		return;
	struct json_object *status = NULL;
	recurse(response, status_trail, &status);
	if (json_object_get_int(status) != 200)
		return;
	struct json_object *objects = NULL;
	recurse(response, trail, &objects);
	size_t length = json_object_array_length(objects);
	*services = malloc(sizeof(struct pikul_services)
			+ sizeof(struct pikul_service *[length]));
	(*services)->length = length;
	enum { CODE, NAME, ETD, COST };
	for (size_t i = 0; i < length; i++) {
		(*services)->list[i] = malloc(sizeof(struct pikul_service));
		struct pikul_service *service = (*services)->list[i];
		json_object *object = json_object_array_get_idx(objects, 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, attributes[COST]))
				service->cost = 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, attributes[CODE]))
						service->code = value;
					else if (!strcmp(key, attributes[NAME]))
						service->name = value;
					else if (!strcmp(key, attributes[ETD]))
						service->etd = value;
				}
			}
			json_object_iter_next(&iterator);
		}
	}
}