/* Copyright (C) 2020  C. McEnroe <june@causal.agency>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <https://www.gnu.org/licenses/>.
 *
 * Additional permission under GNU GPL version 3 section 7:
 *
 * If you modify this Program, or any covered work, by linking or
 * combining it with LibreSSL (or a modified version of that library),
 * containing parts covered by the terms of the OpenSSL License and the
 * original SSLeay license, the licensors of this Program grant you
 * additional permission to convey the resulting work. Corresponding
 * Source for a non-source form of such a combination shall include the
 * source code for the parts of LibreSSL used as well as that of the
 * covered work.
 */

#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <sysexits.h>
#include <time.h>

#include "archive.h"

static char *atomID(const struct Envelope *envelope) {
	struct Variable vars[] = {
		{ "messageID", envelope->messageID },
		{0},
	};
	return templateURL("mid:[messageID]", vars);
}

static int atomAuthor(FILE *file, struct Address addr) {
	const char *template = {
		Q(<author>)
			Q(<name>[name]</name>)
			Q(<email>[mailbox]@[host]</email>)
		Q(</author>)
	};
	struct Variable vars[] = {
		{ "name", addressName(addr) },
		{ "mailbox", addr.mailbox },
		{ "host", addr.host },
		{0},
	};
	return templateRender(file, template, vars, escapeXML);
}

static char *atomEntryURL(const struct Envelope *envelope) {
	struct Variable vars[] = {
		{ "messageID", envelope->messageID },
		{ "type", "mbox" },
		{0},
	};
	return templateURL("/" PATH_MESSAGE, vars);
}

static const char *atomUpdated(time_t time) {
	static char buf[sizeof("0000-00-00T00:00:00Z")];
	strftime(buf, sizeof(buf), "%FT%TZ", gmtime(&time));
	return buf;
}

int atomEntryOpen(FILE *file, const struct Envelope *envelope) {
	const char *template = {
		Q(<entry>)
		Q(<id>[id]</id>)
		Q(<title>[title]</title>)
		Q(<updated>[updated]</updated>)
		Q(<link rel="alternate" type="application/mbox" href="[base][url]"/>)
	};
	char *id = atomID(envelope);
	char *url = atomEntryURL(envelope);
	struct Variable vars[] = {
		{ "id", id },
		{ "title", envelope->subject },
		{ "updated", atomUpdated(envelope->time) },
		{ "base", baseURL },
		{ "url", url },
		{0},
	};
	int error = 0
		|| templateRender(file, template, vars, escapeXML)
		|| atomAuthor(file, envelope->from);
	free(id);
	free(url);
	return error;
}

int atomContent(FILE *file, const char *content) {
	const char *template = {
		Q(<content type="xhtml">)
			Q(<div xmlns="http://www.w3.org/1999/xhtml">)
				Q(<pre>[content]</pre>)
			Q(</div>)
		Q(</content>)
	};
	struct Variable vars[] = {
		{ "content", content },
		{0},
	};
	return templateRender(file, template, vars, escapeXML);
}

int atomEntryClose(FILE *file) {
	return templateRender(file, Q(</entry>), NULL, NULL);
}

static char *atomThreadURL(const struct Envelope *envelope, const char *type) {
	struct Variable vars[] = {
		{ "messageID", envelope->messageID },
		{ "type", type },
		{0},
	};
	return templateURL("/" PATH_THREAD, vars);
}

int atomThreadOpen(FILE *file, const struct Envelope *envelope) {
	const char *template = {
		"<?" Q(xml version="1.0" encoding="utf-8") "?>"
		Q(<feed xmlns="http://www.w3.org/2005/Atom">)
		Q(<generator uri="[generator]">bubger</generator>)
		Q(<id>[id]</id>)
		Q(<title>[title]</title>)
		Q(<updated>[updated]</updated>)
		Q(<link rel="self" href="[base][atom]"/>)
		Q(<link rel="alternate" type="text/html" href="[base][html]"/>)
		Q(<link rel="alternate" type="application/mbox" href="[base][mbox]"/>)
	};
	char *id = atomID(envelope);
	char *atom = atomThreadURL(envelope, "atom");
	char *html = atomThreadURL(envelope, "html");
	char *mbox = atomThreadURL(envelope, "mbox");
	struct Variable vars[] = {
		{ "generator", GENERATOR_URL },
		{ "id", id },
		{ "title", envelope->subject },
		{ "updated", atomUpdated(time(NULL)) },
		{ "base", baseURL },
		{ "atom", atom },
		{ "html", html },
		{ "mbox", mbox },
		{0},
	};
	int error = 0
		|| templateRender(file, template, vars, escapeXML)
		|| atomAuthor(file, envelope->from);
	free(id);
	free(atom);
	free(html);
	free(mbox);
	return error;
}

int atomThreadClose(FILE *file) {
	return templateRender(file, Q(</feed>), NULL, NULL);
}

int atomIndexOpen(FILE *file) {
	const char *template = {
		"<?" Q(xml version="1.0" encoding="utf-8") "?>"
		Q(<feed xmlns="http://www.w3.org/2005/Atom">)
		Q(<generator uri="[generator]">bubger</generator>)
		Q(<id>mailto:[mailto]</id>)
		Q(<title>[title]</title>)
		Q(<updated>[updated]</updated>)
		Q(<link rel="self" href="[base]/index.atom"/>)
		Q(<link rel="alternate" type="text/html" href="[base]/index.html"/>)
	};
	struct Variable vars[] = {
		{ "generator", GENERATOR_URL },
		{ "mailto", baseMailto },
		{ "title", baseTitle },
		{ "updated", atomUpdated(time(NULL)) },
		{ "base", baseURL },
		{0},
	};
	return templateRender(file, template, vars, escapeXML);
}

int atomIndexClose(FILE *file) {
	return templateRender(file, Q(</feed>), NULL, NULL);
}