/**

 * SQL-DK

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

 */

package info.globalcode.sql.dk.formatting;

import info.globalcode.sql.dk.Parameter;

import info.globalcode.sql.dk.Xmlns;

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

import static info.globalcode.sql.dk.Functions.notNull;

import info.globalcode.sql.dk.NamedParameter;

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

import static info.globalcode.sql.dk.formatting.AbstractXmlFormatter.qname;

import java.sql.Array;

import java.sql.ResultSet;

import java.sql.SQLException;

import java.sql.SQLXML;

import java.util.ArrayList;

import java.util.LinkedHashMap;

import java.util.List;

import java.util.Map;

import java.util.logging.Level;

import java.util.logging.Logger;

import javax.xml.namespace.QName;

/**

 * <p>

 * Prints machine-readable output – XML document containing resultsets and updates count. Good

 * choice for further processing – e.g. XSL transformation.</p>

 *

 * <p>

 * TODO: XSD</p>

 *

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

 */

@PropertyDeclaration(name = XmlFormatter.PROPERTY_LABELED_COLUMNS, defaultValue = "false", type = Boolean.class, description = "whether to add 'label' attribute to each 'column' element")

public class XmlFormatter extends AbstractXmlFormatter {

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

	public static final String PROPERTY_LABELED_COLUMNS = "labeledColumns";

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

	private final boolean labeledColumns;

	public XmlFormatter(FormatterContext formatterContext) {

		super(formatterContext);

		labeledColumns = formatterContext.getProperties().getBoolean(PROPERTY_LABELED_COLUMNS, false);

	}

	@Override

	public void writeStartBatch() {

		super.writeStartBatch();

		printStartDocument();

		printStartElement(qname("batchResult"), singleAttribute(qname("xmlns"), Xmlns.BATCH_RESULT));

	}

	@Override

	public void writeEndBatch() {

		super.writeEndBatch();

		printEndElement();

		printEndDocument();

	}

	@Override

	public void writeStartDatabase(DatabaseDefinition databaseDefinition) {

		super.writeStartDatabase(databaseDefinition);

		Map<QName, String> attributes = databaseDefinition.getName() == null ? null : singleAttribute(qname("name"), databaseDefinition.getName());

		printStartElement(qname("database"), attributes);

	}

	@Override

	public void writeEndDatabase() {

		super.writeEndDatabase();

		printEndElement();

	}

	@Override

	public void writeStartStatement() {

		super.writeStartStatement();

		printStartElement(qname("statement"));

	}

	@Override

	public void writeEndStatement() {

		super.writeEndStatement();

		printEndElement();

	}

	@Override

	public void writeQuery(String sql) {

		super.writeQuery(sql);

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

	}

	@Override

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

		super.writeParameters(parameters);

		for (Parameter p : notNull(parameters)) {

			Map<QName, String> attributes = new LinkedHashMap<>(2);

			if (p instanceof NamedParameter) {

				attributes.put(qname("name"), ((NamedParameter) p).getName());

			}

			attributes.put(qname("type"), p.getType().name());

			printTextElement(qname("parameter"), attributes, String.valueOf(p.getValue()));

		}

	}

	@Override

	public void writeStartResultSet(ColumnsHeader header) {

		super.writeStartResultSet(header);

		printStartElement(qname("resultSet"));

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

			Map<QName, String> attributes = new LinkedHashMap<>(4);

			attributes.put(qname("label"), cd.getLabel());

			attributes.put(qname("name"), cd.getName());

			attributes.put(qname("typeName"), cd.getTypeName());

			attributes.put(qname("type"), String.valueOf(cd.getType()));

			printEmptyElement(qname("columnHeader"), attributes);

		}

	}

	@Override

	public void writeEndResultSet() {

		super.writeEndResultSet();

		printEndElement();

	}

	@Override

	public void writeStartRow() {

		super.writeStartRow();

		printStartElement(qname("row"));

	}

	@Override

	public void writeColumnValue(Object value) {

		super.writeColumnValue(value);

		Map<QName, String> attributes = null;

		if (labeledColumns) {

			attributes = new LinkedHashMap<>(2);

			attributes.put(qname("label"), getCurrentColumnsHeader().getColumnDescriptors().get(getCurrentColumnsCount() - 1).getLabel());

		}

		if (value == null) {

			if (attributes == null) {

				attributes = new LinkedHashMap<>(2);

			}

			attributes.put(qname("null"), "true");

			printEmptyElement(qname("column"), attributes);

		} else if (value instanceof Array) {

			Array sqlArray = (Array) value;

			try {

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

				printStartElement(qname("column"), attributes);

				printArray(array);

				printEndElement();

			} catch (SQLException e) {

				// FIXME: rewrite array formatting, remember array mode, don't try sqlArray.getArray() again and again if it has failed

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

				try {

					ResultSet arrayResultSet = sqlArray.getResultSet();

					//int columnCount = arrayResultSet.getMetaData().getColumnCount();

					ArrayList<Object> arrayList = new ArrayList<>();

					while (arrayResultSet.next()) {

						arrayList.add(arrayResultSet.getObject(2));

						// for (int i = 1; i <= columnCount; i++) {

						// 	log.log(Level.INFO, "Array column {0} = {1}", new Object[]{i, arrayResultSet.getObject(i)});

						// }

					}

					printStartElement(qname("column"), attributes);

					// FIXME: instanceof SQLXML, see below

					printArray(arrayList.toArray());

					printEndElement();

				} catch (SQLException e2) {

					// FIXME: fix logging, error recovery

					log.log(Level.SEVERE, "Second level fuck up !!!", e2);

				}

				writeColumnValue(String.valueOf(value));

			}

		} else if (value instanceof SQLXML) { // FIXME: move to separate method, to AbstractFormatter?

			SQLXML xml = (SQLXML) value;

			// TODO: parse DOM/SAX and transplant XML, don't escape (optional)

			try {

				printTextElement(qname("column"), attributes, xml.getString());

			} catch (SQLException e) {

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

				writeColumnValue(String.valueOf(value));

			}

		} else {

			printTextElement(qname("column"), attributes, toString(value));

		}

	}

	private void printArray(Object[] array) {

		printStartElement(qname("array"));

		for (Object o : array) {

			if (o instanceof Object[]) {

				printStartElement(qname("item"));

				printArray((Object[]) o);

				printEndElement();

			} else {

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

			}

		}

		printEndElement();

	}

	@Override

	public void writeEndRow() {

		super.writeEndRow();

		printEndElement();

	}

	@Override

	public void writeUpdatesResult(int updatedRowsCount) {

		super.writeUpdatesResult(updatedRowsCount);

		printTextElement(qname("updatedRows"), null, String.valueOf(updatedRowsCount));

	}

	protected String toString(Object value) {

		return String.valueOf(value);

	}

}