/**

 * SQL-DK

 * Copyright © 2014 František Kučera (frantovo.cz)

 *

 * 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, version 3 of the License.

 *

 * 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 <http://www.gnu.org/licenses/>.

 */

package info.globalcode.sql.dk.formatting;

import info.globalcode.sql.dk.Constants;

import info.globalcode.sql.dk.NamedParameter;

import info.globalcode.sql.dk.Parameter;

import info.globalcode.sql.dk.Xmlns;

import info.globalcode.sql.dk.configuration.DatabaseDefinition;

import info.globalcode.sql.dk.configuration.Properties;

import info.globalcode.sql.dk.configuration.Property;

import java.sql.Array;

import java.sql.SQLException;

import java.util.Date;

import java.util.List;

import java.util.Map;

import java.util.Scanner;

import java.util.logging.Level;

import java.util.logging.Logger;

import javax.xml.namespace.QName;

/**

 * Prints result sets and parameters as tables, SQL as preformatted and updates counts as

 * paragraphs. You can pick XHTML fragments (usually tabular data) and use it on your website or use

 * whole output as preview or report.

 *

 * @author Ing. František Kučera (frantovo.cz)

 */

public class XhtmlFormatter extends AbstractXmlFormatter {

	private static final Logger log = Logger.getLogger(XhtmlFormatter.class.getName());

	public static final String NAME = "xhtml"; // bash-completion:formatter

	private static final String DOCTYPE = "html PUBLIC \"-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN\" \"http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd\"";

	private static final String CSS_FILE = "info/globalcode/sql/dk/formatter/XhtmlFormatter.css";

	private int statementCounter = 0;

	private int resultSetCounter = 0;

	private int updatesResultCounter = 0;

	public XhtmlFormatter(FormatterContext formatterContext) {

		super(addDefaults(formatterContext));

	}

	private QName qname(String localPart) {

		return new QName(Xmlns.XHTML, localPart);

	}

	/**

	 * Do not indent text – preserve whitespace for pre elements

	 */

	private static FormatterContext addDefaults(FormatterContext formatterContext) {

		Properties defaults = new Properties(1);

		defaults.add(new Property(PROPERTY_INDENT_TEXT, "false"));

		formatterContext.getProperties().setLastDefaults(defaults);

		return formatterContext;

	}

	@Override

	public void writeStartBatch() {

		super.writeStartBatch();

		printStartDocument();

		printDoctype(DOCTYPE);

		printStartElement(qname("html"), singleAttribute(qname("xmlns"), Xmlns.XHTML));

		printStartElement(qname("head"));

		printTextElement(qname("title"), null, Constants.PROGRAM_NAME + ": batch results");

		printCss();

		printEndElement();

		printStartElement(qname("body"));

	}

	private void printCss() {

		try (Scanner css = new Scanner(getClass().getClassLoader().getResourceAsStream(CSS_FILE))) {

			printStartElement(qname("style"), singleAttribute(qname("type"), "text/css"));

			while (css.hasNext()) {

				printText(css.nextLine(), true);

			}

			printEndElement();

		}

	}

	@Override

	public void writeEndBatch() {

		super.writeEndBatch();

		printEndElement();

		printEndElement();

		printEndDocument();

	}

	@Override

	public void writeStartDatabase(DatabaseDefinition databaseDefinition) {

		super.writeStartDatabase(databaseDefinition);

		printTextElement(qname("h1"), null, "Database: " + databaseDefinition.getName());

		printStartElement(qname("p"));

		printText("This is XHTML output of batch executed at: ", true);

		printText(new Date().toString(), true);

		printEndElement();

	}

	@Override

	public void writeQuery(String sql) {

		super.writeQuery(sql);

		printTextElement(qname("pre"), null, sql);

	}

	@Override

	public void writeParameters(List<? extends Parameter> parameters) {

		super.writeParameters(parameters);

		if (parameters == null || parameters.isEmpty()) {

			printTextElement(qname("p"), null, "(this query has no parameters)");

		} else {

			printTextElement(qname("h3"), null, "Parameters:");

			printStartElement(qname("table"));

			printStartElement(qname("thead"));

			printStartElement(qname("tr"));

			printTextElement(qname("td"), null, "id");

			printTextElement(qname("td"), null, "type");

			printTextElement(qname("td"), null, "value");

			printEndElement();

			printEndElement();

			printStartElement(qname("tbody"));

			for (int i = 0; i < parameters.size(); i++) {

				Parameter p = parameters.get(i);

				printStartElement(qname("tr"));

				String numberOrName;

				if (p instanceof NamedParameter) {

					numberOrName = ((NamedParameter) p).getName();

				} else {

					numberOrName = String.valueOf(i + 1);

				}

				printTextElement(qname("td"), null, numberOrName);

				printTextElement(qname("td"), null, p.getType().name());

				printTableData(p.getValue());

				printEndElement();

			}

			printEndElement();

			printEndElement();

		}

	}

	private void printTableData(Object value) {

		if (value instanceof Array) {

			Array sqlArray = (Array) value;

			try {

				Object[] array = (Object[]) sqlArray.getArray();

				printStartElement(qname("td"));

				printArray(array);

				printEndElement();

			} catch (SQLException e) {

				log.log(Level.SEVERE, "Unable to format array", e);

				printTableData(String.valueOf(value));

			}

		} else {

			Map<QName, String> attributes = null;

			if (value instanceof Number) {

				attributes = singleAttribute(qname("class"), "number");

			} else if (value instanceof Boolean) {

				attributes = singleAttribute(qname("class"), "boolean");

			}

			printTextElement(qname("td"), attributes, String.valueOf(value));

		}

	}

	private void printArray(Object[] array) {

		printStartElement(qname("ul"));

		for (Object o : array) {

			if (o instanceof Object[]) {

				printStartElement(qname("li"));

				printTextElement(qname("p"), null, "nested array:");

				printArray((Object[]) o);

				printEndElement();

			} else {

				printTextElement(qname("li"), null, String.valueOf(o));

			}

		}

		printEndElement();

	}

	@Override

	public void writeStartResultSet(ColumnsHeader header) {

		super.writeStartResultSet(header);

		resultSetCounter++;

		printEmptyElement(qname("hr"), null);

		printTextElement(qname("h3"), null, "Result set #" + resultSetCounter);

		printStartElement(qname("table"));

		printStartElement(qname("thead"));

		printStartElement(qname("tr"));

		for (ColumnDescriptor cd : header.getColumnDescriptors()) {

			// TODO: type

			printTextElement(qname("td"), null, cd.getLabel());

		}

		printEndElement();

		printEndElement();

		printStartElement(qname("tbody"));

	}

	@Override

	public void writeEndResultSet() {

		super.writeEndResultSet();

		printEndElement();

		printEndElement();

		printTextElement(qname("p"), null, "Record count: " + getCurrentRowCount());

	}

	@Override

	public void writeStartRow() {

		super.writeStartRow();

		printStartElement(qname("tr"));

	}

	@Override

	public void writeColumnValue(Object value) {

		super.writeColumnValue(value);

		printTableData(value);

	}

	@Override

	public void writeEndRow() {

		super.writeEndRow();

		printEndElement();

	}

	@Override

	public void writeStartStatement() {

		super.writeStartStatement();

		statementCounter++;

		printEmptyElement(qname("hr"), null);

		printTextElement(qname("h2"), null, "SQL statement #" + statementCounter);

		resultSetCounter = 0;

		updatesResultCounter = 0;

	}

	@Override

	public void writeUpdatesResult(int updatedRowsCount) {

		super.writeUpdatesResult(updatedRowsCount);

		updatesResultCounter++;

		printEmptyElement(qname("hr"), null);

		printTextElement(qname("h3"), null, "Updates result #" + updatesResultCounter);

		printTextElement(qname("p"), null, "Updated rows: " + updatedRowsCount);

	}

}