/**
 * 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.ColorfulPrintWriter;
import static info.globalcode.sql.dk.ColorfulPrintWriter.*;
import static info.globalcode.sql.dk.Functions.lpad;
import static info.globalcode.sql.dk.Functions.rpad;
import static info.globalcode.sql.dk.Functions.repeat;

/**
 *
 * @author Ing. František Kučera (frantovo.cz)
 */
public class TabularFormatter extends AbstractFormatter {

	public static final String NAME = "tabular";
	private static final String HEADER_TYPE_PREFIX = " (";
	private static final String HEADER_TYPE_SUFFIX = ")";
	private ColorfulPrintWriter out;
	private boolean firstResult = true;
	private int[] columnWidth;

	public TabularFormatter(FormatterContext formatterContext) {
		super(formatterContext);
		out = new ColorfulPrintWriter(formatterContext.getOutputStream());
	}

	@Override
	public void writeStartResultSet() {
		super.writeStartResultSet();
		printResultSeparator();
	}

	@Override
	public void writeColumnsHeader(ColumnsHeader header) {
		super.writeColumnsHeader(header);

		columnWidth = new int[header.getColumnCount()];

		printTableIndent();
		printTableBorder("╭");
		for (ColumnDescriptor cd : header.getColumnDescriptors()) {
			setColumnWidth(cd.getColumnNumber(), cd.getLabel().length() + cd.getTypeName().length() + HEADER_TYPE_PREFIX.length() + HEADER_TYPE_SUFFIX.length());
			if (!cd.isFirstColumn()) {
				printTableBorder("┬");
			}
			printTableBorder(repeat('─', getColumnWidth(cd.getColumnNumber()) + 2));
		}
		printTableBorder("╮");
		out.println();

		for (ColumnDescriptor cd : header.getColumnDescriptors()) {
			if (cd.isFirstColumn()) {
				printTableIndent();
				printTableBorder("│ ");
			} else {
				printTableBorder(" │ ");
			}
			out.print(TerminalStyle.Bright, cd.getLabel());
			out.print(HEADER_TYPE_PREFIX);
			out.print(cd.getTypeName());
			out.print(HEADER_TYPE_SUFFIX);
			if (cd.isLastColumn()) {
				printTableBorder(" │");
			}

			setColumnWidth(cd.getColumnNumber(), cd.getLabel().length() + cd.getTypeName().length() + HEADER_TYPE_PREFIX.length() + HEADER_TYPE_SUFFIX.length());
		}
		out.println();

		printTableIndent();
		printTableBorder("├");
		for (int i = 1; i <= header.getColumnCount(); i++) {
			if (i > 1) {
				printTableBorder("┼");
			}
			printTableBorder(repeat('─', getColumnWidth(i) + 2));
		}
		printTableBorder("┤");
		out.println();

		out.flush();
	}

	@Override
	public void writeColumnValue(Object value) {
		super.writeColumnValue(value);

		if (isCurrentColumnFirst()) {
			printTableIndent();
			printTableBorder("│ ");
		} else {
			printTableBorder(" │ ");
		}

		out.print(TerminalColor.Cyan, toString(value));

		if (isCurrentColumnLast()) {
			printTableBorder(" │");
		}

	}

	private int getColumnWidth(int columnNumber) {
		return columnWidth[columnNumber - 1];
	}

	private void setColumnWidth(int columnNumber, int width) {
		columnWidth[columnNumber - 1] = width;
	}

	private void updateColumnWidth(int columnNumber, int width) {
		int oldWidth = getColumnWidth(columnNumber);
		setColumnWidth(columnNumber, Math.max(width, oldWidth));

	}

	@Override
	protected String toString(Object value) {
		final int width = getColumnWidth(getCurrentColumnsCount());
		if (value instanceof Number || value instanceof Boolean) {
			return lpad(super.toString(value), width);
		} else {
			return rpad(super.toString(value), width);
		}
		// ?	value = (boolean) value ? "✔" : "✗";
	}

	@Override
	public void writeEndRow() {
		super.writeEndRow();
		out.println();
		out.flush();
	}

	@Override
	public void writeEndResultSet() {
		int columnCount = getCurrentColumnsHeader().getColumnCount();
		super.writeEndResultSet();

		printTableIndent();
		printTableBorder("╰");
		for (int i = 1; i <= columnCount; i++) {
			if (i > 1) {
				printTableBorder("┴");
			}
			printTableBorder(repeat('─', getColumnWidth(i) + 2));
		}
		printTableBorder("╯");
		out.println();


		out.print(TerminalColor.Yellow, "Record count: ");
		out.println(getCurrentRowCount());
		out.bell();
		out.flush();
	}

	@Override
	public void writeStartUpdatesResult() {
		super.writeStartUpdatesResult();
		printResultSeparator();
	}

	@Override
	public void writeUpdatedRowsCount(int updatedRowsCount) {
		super.writeUpdatedRowsCount(updatedRowsCount);
		out.print(TerminalColor.Red, "Updated records: ");
		out.println(updatedRowsCount);
		out.bell();
		out.flush();
	}

	@Override
	public void writeEndDatabase() {
		super.writeEndDatabase();
		out.flush();
	}

	private void printResultSeparator() {
		if (firstResult) {
			firstResult = false;
		} else {
			out.println();
		}
	}

	private void printTableBorder(String border) {
		out.print(TerminalColor.Green, border);
	}

	private void printTableIndent() {
		out.print(" ");
	}
}