#include <sys/types.h>
#include <assert.h>
#include <stdarg.h>
#include <stdint.h>
#include <string.h>

#include <kcgi.h>
#include <jansson.h>

#include "config.h"
#include "log.h"
#include "page-api-jobs.h"
#include "page.h"
#include "req.h"
#include "types.h"
#include "util.h"

static void
list(struct kreq *r, const struct job *jobs, size_t jobsz)
{
	json_t *doc;
	char *dump;

	doc = job_to(jobs, jobsz);
	dump = json_dumps(doc, JSON_COMPACT);

	khttp_puts(r, dump);
	free(dump);
	json_decref(doc);
}

static int
save(const char *json)
{
	struct req req = {0};
	struct jobresult res = {0};
	int ret = -1;

	json_t *doc;
	json_error_t err;

	if (!(doc = json_loads(json, 0, &err)))
		log_warn("api/post: invalid JSON input: %s", err.text);
	else if (jobresult_from(&res, 1, doc) < 0)
		log_warn("api/post: failed to decode parameters");
	else if ((req = req_jobresult_add(&res)).status)
		log_warn("api/post: save error: %s", strerror(req.status));
	else
		ret = 0;

	json_decref(doc);
	req_finish(&req);

	return ret;
}

static void
get(struct kreq *r)
{
	struct req req;
	struct job jobs[SCI_JOB_LIST_MAX];
	size_t jobsz = UTIL_SIZE(jobs);
	const char *worker = util_basename(r->path);

	if ((req = req_job_todo(jobs, &jobsz, worker)).status)
		page(r, NULL, KHTTP_500, KMIME_APP_JSON, NULL);
	else {
		khttp_head(r, kresps[KRESP_CONTENT_TYPE], "%s", kmimetypes[KMIME_APP_JSON]);
		khttp_head(r, kresps[KRESP_STATUS], "%s", khttps[KHTTP_200]);
		khttp_body(r);
		list(r, jobs, jobsz);
		req_finish(&req);
		khttp_free(r);
	}
}

static void
post(struct kreq *r)
{
	if (r->fieldsz < 1)
		page(r, NULL, KHTTP_400, KMIME_APP_JSON, NULL);
	else if (save(r->fields[0].key) < 0)
		page(r, NULL, KHTTP_500, KMIME_APP_JSON, NULL);
	else {
		khttp_head(r, kresps[KRESP_CONTENT_TYPE], "%s", kmimetypes[KMIME_APP_JSON]);
		khttp_head(r, kresps[KRESP_STATUS], "%s", khttps[KHTTP_200]);
		khttp_body(r);
		khttp_free(r);
	}
}

void
page_api_v1_jobs(struct kreq *r)
{
	assert(r);

	switch (r->method) {
	case KMETHOD_GET:
		get(r);
		break;
	case KMETHOD_POST:
		post(r);
		break;
	default:
		page(r, NULL, KHTTP_400, KMIME_APP_JSON, NULL);
		break;
	}
}