#include <string.h>
#include <stdio.h>
#include <libxml/xmlmemory.h>
#include <libxml/debugXML.h>
#include <libxml/HTMLtree.h>
#include <libxml/xmlIO.h>
#include <libxml/xinclude.h>
#include <libxml/catalog.h>
#include <libxslt/xslt.h>
#include <libxslt/xsltInternals.h>
#include <libxslt/transform.h>
#include <libxslt/xsltutils.h>
#include "transform.h"

extern int xmlLoadExtDtdDefaultValue;

xmlDocPtr stylesheetDoc;
xsltStylesheetPtr stylesheet;
int transformLoad(const char *stylesheetData, size_t stylesheetSize) {
	xmlLoadExtDtdDefaultValue = 1;
	xmlSubstituteEntitiesDefault(1);

	stylesheetDoc = xmlReadMemory(stylesheetData, stylesheetSize, NULL, NULL, 0);
	Stopif(!stylesheetDoc, return 0, "Unable to read stylesheet !\n");
	stylesheet = xsltParseStylesheetDoc(stylesheetDoc);
	Stopif(!stylesheet, return 0, "Unable to parse stylesheet !\n");
	return 1;
}

int transformXML(XMLBuff *infile) {
	xmlDocPtr doc, result;
	doc = xmlReadMemory(infile->data, infile->size, infile->name, NULL, 0);
	Stopif(!doc, return 0, "Unable to read %s!\n", infile->name);
	result = xsltApplyStylesheet(stylesheet, doc, NULL);
	Stopif(!result, return 0, "Transformation failed for %s!\n", infile->name);

	struct fileInfo *fi = newFileInfo(infile->name);
	char *outFile = malloc(fi->nameLength+6);
	snprintf(outFile, fi->nameLength+6, "%s.html", fi->name);
	freeFileInfo(fi);

	FILE *fp;
	fp = fopen(outFile, "w");
	Stopif(xsltSaveResultToFile(fp, result, stylesheet) < 0, return 0, "Nothing saved to %s!\n", outFile);
	fclose(fp);
	free(outFile);
	
	xmlFreeDoc(result);
	xmlFreeDoc(doc);
    return 1;
}

void transformCleanup() {
	xsltFreeStylesheet(stylesheet);
	xsltCleanupGlobals();
    xmlCleanupParser();
}