/* XLogo4Schools - A Logo Interpreter specialized for use in schools, based on XLogo by Loic Le Coq
 * Copyright (C) 2013 Marko Zivkovic
 * 
 * Contact Information: marko88zivkovic at gmail dot com
 * 
 * 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 2 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, write to the Free 
 * Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, 
 * MA 02110-1301, USA.
 * 
 * 
 * This Java source code belongs to XLogo4Schools, written by Marko Zivkovic
 * during his Bachelor thesis at the computer science department of ETH Zurich,
 * in the year 2013 and/or during future work.
 * 
 * It is a reengineered version of XLogo written by Loic Le Coq, published
 * under the GPL License at http://xlogo.tuxfamily.org/
 * 
 * Contents of this file were initially written by Loic Le Coq,
 * modifications, extensions, refactorings might have been applied by Marko Zivkovic 
 */

package xlogo.gui;

import javax.swing.JTextPane;
import javax.swing.SwingUtilities;
import javax.swing.event.*;
import javax.swing.text.BadLocationException;

import java.awt.Color;

import xlogo.StyledDocument.DocumentLogoCommande;
import xlogo.storage.WSManager;
import xlogo.storage.workspace.WorkspaceConfig;
import xlogo.Application;

/**
 * Title : XLogo
 * Description : XLogo is an interpreter for the Logo
 * programming language
 * 
 * @author Loïc Le Coq
 */
public class ZoneCommande extends JTextPane implements CaretListener
{
	private static final long		serialVersionUID	= 1L;
	private DocumentLogoCommande	dlc;
	// Si la correspondance entre parenthese ou crochets est activée
	private boolean					active				= false;
	// Dernière position allumée
	private int[]					position			= new int[2];
	
	public ZoneCommande(Application cadre)
	{
		dlc = new DocumentLogoCommande(cadre);
		this.setBackground(Color.WHITE);
		setDocument(dlc);
		addCaretListener(this);
	}
	
	class verif_parenthese implements Runnable
	{
		int	pos;
		
		verif_parenthese(int pos)
		{
			this.pos = pos;
		}
		
		public void run()
		{
			if (active)
			{
				active = false;
				int debut = position[0];
				int fin = position[0];
				if (debut != -1)
				{
					if (debut > 0)
						debut--;
					if (fin < dlc.getLength())
						fin++;
					try
					{
						String content = dlc.getText(0, dlc.getLength());
						// System.out.println(debut+" "+fin);
						dlc.colore(content, debut, fin);
					}
					catch (BadLocationException e)
					{}
				}
				debut = position[1];
				fin = position[1];
				if (debut != -1)
				{
					if (debut > 0)
						debut--;
					if (fin < dlc.getLength())
						debut++;
					if (fin < dlc.getLength())
						fin++;
					try
					{
						String content = dlc.getText(0, dlc.getLength());
						// System.out.println(debut+" "+fin);
						dlc.colore(content, debut, fin);
					}
					catch (BadLocationException e)
					{}
				}
			}
			int length = dlc.getLength();
			try
			{
				String content = dlc.getText(pos, length - pos);
				int id = -1;
				if (length > pos)
				{
					id = "[]()".indexOf(content.substring(0, 1));
				}
				if (id > -1 && !TesteBackslash(dlc.getText(0, pos), pos))
				{
					active = true;
					switch (id)
					{
						case 0:
							chercheApres(content, pos, "[", "]");
							break;
						case 1:
							content = getText(0, pos);
							chercheAvant(content, pos, "[", "]");
							break;
						case 2:
							chercheApres(content, pos, "(", ")");
							break;
						case 3:
							content = getText(0, pos);
							chercheAvant(content, pos, "(", ")");
							break;
					}
				}
			}
			catch (BadLocationException e1)
			{}
			
		}
	}
	
	public void caretUpdate(CaretEvent e)
	{
		int pos = e.getDot();
		if (WSManager.getWorkspaceConfig().isSyntaxHighlightingEnabled())
			SwingUtilities.invokeLater(new verif_parenthese(pos));
	}
	
	// Teste si le caractère précédent est un backslash
	private boolean TesteBackslash(String content, int pos)
	{
		String caractere = "";
		if (pos > 0)
			caractere = content.substring(pos - 1, pos);
		// System.out.println(caractere);
		if (caractere.equals("\\"))
			return true;
		return false;
	}
	
	void chercheApres(String content, int pos, String ouv, String fer)
	{
		boolean continuer = true;
		int of_ouvrant;
		int of_fermant = 0;
		int from_index_ouvrant = 1;
		int from_index_fermant = 1;
		while (continuer)
		{
			of_ouvrant = content.indexOf(ouv, from_index_ouvrant);
			while (of_ouvrant != -1 && TesteBackslash(content, of_ouvrant))
				of_ouvrant = content.indexOf(ouv, of_ouvrant + 1);
			of_fermant = content.indexOf(fer, from_index_fermant);
			while (of_fermant != -1 && TesteBackslash(content, of_fermant))
			{
				of_fermant = content.indexOf(fer, of_fermant + 1);
				// System.out.println(of_fermant);
			}
			if (of_fermant == -1)
				break;
			if (of_ouvrant != -1 && of_ouvrant < of_fermant)
			{
				from_index_ouvrant = of_ouvrant + 1;
				from_index_fermant = of_fermant + 1;
			}
			else
				continuer = false;
			;
		}
		if (of_fermant != -1)
		{
			dlc.Montre_Parenthese(of_fermant + pos);
			position[1] = of_fermant + pos;
		}
		else
			position[1] = -1;
		dlc.Montre_Parenthese(pos);
		position[0] = pos;
	}
	
	void chercheAvant(String content, int pos, String ouv, String fer)
	{
		boolean continuer = true;
		int of_fermant = 0;
		int of_ouvrant = 0;
		int from_index_ouvrant = pos;
		int from_index_fermant = pos;
		while (continuer)
		{
			of_ouvrant = content.lastIndexOf(ouv, from_index_ouvrant);
			while (of_ouvrant != -1 && TesteBackslash(content, of_ouvrant))
				of_ouvrant = content.lastIndexOf(ouv, of_ouvrant - 1);
			of_fermant = content.lastIndexOf(fer, from_index_fermant);
			while (of_fermant != -1 && TesteBackslash(content, of_fermant))
				of_fermant = content.lastIndexOf(fer, of_fermant - 1);
			if (of_ouvrant == -1)
				break;
			if (of_ouvrant < of_fermant)
			{
				from_index_ouvrant = of_ouvrant - 1;
				from_index_fermant = of_fermant - 1;
			}
			else
				continuer = false;
			;
		}
		if (of_ouvrant != -1)
		{
			dlc.Montre_Parenthese(of_ouvrant);
			position[0] = of_ouvrant;
		}
		else
			position[0] = -1;
		dlc.Montre_Parenthese(pos);
		position[1] = pos;
	}
	
	// Change Syntax Highlighting for the command line
	public void initStyles(int c_comment, int sty_comment, int c_primitive, int sty_primitive, int c_parenthese,
			int sty_parenthese, int c_operande, int sty_operande)
	{
		WorkspaceConfig wc = WSManager.getWorkspaceConfig();
		dlc.initStyles(wc.getCommentColor(), wc.getCommentStyle(), wc.getPrimitiveColor(), wc.getPrimitiveStyle(),
				wc.getBraceColor(), wc.getBraceStyle(), wc.getOperatorColor(), wc.getOperatorStyle());
	}
	
	// Enable or disable Syntax Highlighting
	public void setColoration(boolean b)
	{
		dlc.setColoration(b);
	}
	
	public void setActive(boolean b)
	{
		active = b;
	}
	
}