/* convert an opml file to sfeedrc file */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>

#include "util.h"
#include "xml.h"

static XMLParser parser; /* XML parser state */
static char feedurl[2048], feedname[2048], basesiteurl[2048];

static int
istag(const char *s1, const char *s2)
{
	return !strcasecmp(s1, s2);
}

static int
isattr(const char *s1, const char *s2)
{
	return !strcasecmp(s1, s2);
}

static void
xml_handler_start_element(XMLParser *p, const char *tag, size_t taglen)
{
	(void)p;
	(void)taglen;

	if (istag(tag, "outline")) {
		feedurl[0] = '\0';
		feedname[0] = '\0';
		basesiteurl[0] = '\0';
	}
}

static void
xml_handler_end_element(XMLParser *p, const char *tag, size_t taglen,
	int isshort)
{
	(void)p;
	(void)taglen;
	(void)isshort;

	if (istag(tag, "outline")) {
		printf("\tfeed \"%s\" \"%s\" \"%s\"\n",
		       feedname[0] ? feedname : "unnamed",
		       feedurl[0] ? feedurl : "",
		       basesiteurl[0] ? basesiteurl : "");
	}
}

static void
xml_handler_attr(XMLParser *p, const char *tag, size_t taglen,
	const char *name, size_t namelen, const char *value, size_t valuelen)
{
	(void)p;
	(void)taglen;
	(void)namelen;
	(void)valuelen;

	if (istag(tag, "outline")) {
		if (isattr(name, "text") || isattr(name, "title"))
			strlcpy(feedname, value, sizeof(feedname));
		else if (isattr(name, "htmlurl"))
			strlcpy(basesiteurl, value, sizeof(basesiteurl));
		else if (isattr(name, "xmlurl"))
			strlcpy(feedurl, value, sizeof(feedurl));
	}
}

int
main(void)
{
	memset(&parser, 0, sizeof(parser));
	parser.xmltagstart = xml_handler_start_element;
	parser.xmltagend = xml_handler_end_element;
	parser.xmlattr = xml_handler_attr;

	fputs(
	    "# paths\n"
	    "# NOTE: make sure to uncomment all these if you change it.\n"
	    "#sfeedpath=\"$HOME/.sfeed\"\n"
	    "#sfeedfile=\"$sfeedpath/feeds\"\n"
	    "#sfeedfilenew=\"$sfeedfile.new\"\n"
	    "\n"
	    "# list of feeds to fetch:\n"
	    "feeds() {\n"
	    "	# feed <name> <feedurl> <basesiteurl> [encoding]\n", stdout);
	xmlparser_parse_fd(&parser, 0);
	fputs("}\n", stdout);

	return 0;
}