/**

 * Alt2XML

 * 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, 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 cz.frantovo.alt2xml.in.json;

import java.io.IOException;

import java.util.Stack;

import org.json.simple.parser.ParseException;

import org.xml.sax.ContentHandler;

import org.xml.sax.SAXException;

/**

 *

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

 */

public class JsonSimpleContentHandler implements org.json.simple.parser.ContentHandler {

	/** Sem vypisujeme XML události */

	private final ContentHandler saxVýstup;

	/** Musíme si pamatovat polohu v XML stromu, abychom věděli, kterou značku kdy uzavřít */

	private final Stack<String> poloha = new Stack<>();

	/**

	 * Po textových uzlech vkládáme konce elementů rovnou,

	 * ale pokud jeden element končí hned po jiném, 

	 * vložíme mezi ně ještě konec řádku a odsazení.

	 */

	private boolean zalomitŘádek = false;

	public JsonSimpleContentHandler(ContentHandler saxVýstup) {

		this.saxVýstup = saxVýstup;

	}

	private void začniElement(String název) throws IOException {

		try {

			vložOdsazení();

			saxVýstup.startElement(null, null, název, null);

			poloha.push(název);

		} catch (SAXException e) {

			throw new IOException("Chyba při začátku elementu.", e);

		}

	}

	private void ukončiElement() throws IOException {

		try {

			String značka = poloha.pop();

			if (zalomitŘádek) {

				vložOdsazení();

			}

			zalomitŘádek = true;

			saxVýstup.endElement(null, null, značka);

		} catch (SAXException e) {

			throw new IOException("Chyba při ukončování elementu.", e);

		}

	}

	private void vložOdsazení() throws IOException {

		/**

		 * TODO: ignorableWhitespace() ?

		 */

		vložText("\n");

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

			vložText("\t");

		}

	}

	private void vložText(String text) throws IOException {

		try {

			saxVýstup.characters(text.toCharArray(), 0, text.length());

		} catch (SAXException e) {

			throw new IOException("Chyba při vkládání textu.", e);

		}

	}

	@Override

	public void startJSON() throws ParseException, IOException {

		try {

			saxVýstup.startDocument();

			začniElement("objekt");

		} catch (SAXException e) {

			throw new IOException("Chyba při začátku dokumentu.", e);

		}

	}

	@Override

	public void endJSON() throws ParseException, IOException {

		try {

			ukončiElement();

			vložText("\n");

			saxVýstup.endDocument();

		} catch (SAXException e) {

			throw new IOException(e);

		}

	}

	@Override

	public boolean startObject() throws ParseException, IOException {

		// System.err.println("startObject");

		return true;

	}

	@Override

	public boolean endObject() throws ParseException, IOException {

		// System.err.println("endObject");

		return true;

	}

	@Override

	public boolean startObjectEntry(String key) throws ParseException, IOException {

		začniElement(key);

		return true;

	}

	@Override

	public boolean endObjectEntry() throws ParseException, IOException {

		ukončiElement();

		// System.err.println("endObjectEntry");

		return true;

	}

	@Override

	public boolean startArray() throws ParseException, IOException {

		// System.err.println("startArray");

		return true;

	}

	@Override

	public boolean endArray() throws ParseException, IOException {

		// System.err.println("endArray");

		return true;

	}

	@Override

	public boolean primitive(Object value) throws ParseException, IOException {

		vložText(String.valueOf(value));

		zalomitŘádek = false;

		return true;

	}

}