EDIT

/**

 *

 */

package eu.etaxonomy.taxeditor.ui.element;

import java.awt.Point;

import java.io.IOException;

import java.util.Set;

import java.util.regex.Matcher;

import java.util.regex.Pattern;

import javax.xml.parsers.ParserConfigurationException;

import org.apache.commons.lang.StringUtils;

import org.eclipse.jface.dialogs.MessageDialog;

import org.eclipse.jface.layout.GridDataFactory;

import org.eclipse.jface.util.PropertyChangeEvent;

import org.eclipse.jface.viewers.CellEditor.LayoutData;

import org.eclipse.nebula.widgets.richtext.RichTextEditor;

import org.eclipse.nebula.widgets.richtext.RichTextEditorConfiguration;

import org.eclipse.nebula.widgets.richtext.toolbar.ToolbarButton;

import org.eclipse.swt.SWT;

import org.eclipse.swt.events.KeyAdapter;

import org.eclipse.swt.events.KeyEvent;

import org.eclipse.swt.events.ModifyEvent;

import org.eclipse.swt.events.ModifyListener;

import org.eclipse.swt.events.SelectionAdapter;

import org.eclipse.swt.events.SelectionEvent;

import org.eclipse.swt.graphics.Color;

import org.eclipse.swt.layout.GridLayout;

import org.eclipse.swt.layout.RowLayout;

import org.eclipse.swt.widgets.Button;

import org.eclipse.swt.widgets.Composite;

import org.eclipse.swt.widgets.Control;

import org.eclipse.swt.widgets.Label;

import org.eclipse.swt.widgets.Listener;

import org.eclipse.swt.widgets.Text;

import org.eclipse.ui.dialogs.SelectionDialog;

import org.eclipse.ui.forms.widgets.TableWrapData;

import org.eclipse.ui.forms.widgets.TableWrapLayout;

import eu.etaxonomy.cdm.common.CdmUtils;

import eu.etaxonomy.cdm.model.agent.AgentBase;

import eu.etaxonomy.cdm.model.common.IIntextReferenceTarget;

import eu.etaxonomy.cdm.model.common.IntextReference;

import eu.etaxonomy.cdm.model.common.Language;

import eu.etaxonomy.cdm.model.common.LanguageString;

import eu.etaxonomy.cdm.model.reference.Reference;

import eu.etaxonomy.cdm.model.reference.ReferenceFactory;

import eu.etaxonomy.taxeditor.preference.Resources;

import eu.etaxonomy.taxeditor.store.CdmStore;

import eu.etaxonomy.taxeditor.ui.selection.EntitySelectionElement;

/**

 * @author n.hoffmann

 * @version $Id: $

 */

public class RichTextWithLabelElement extends AbstractCdmFormElement implements ModifyListener, IEnableableFormElement,

        ISelectable {

	protected RichTextEditor text;

    public void setLanguageString(LanguageString languageString) {

    	if (languageString == null){

    		this.languageString = LanguageString.NewInstance("", Language.DEFAULT());

    	}

		this.languageString = languageString;

	}

	private LanguageString languageString ;

    EntitySelectionElement<Reference> selection_reference;

	private Label label;

    private final boolean isMultiLine;

    public static final int MAX_HEIGHT = 0;

    public static final int SINGLE = -1;

    protected RichTextWithLabelElement(CdmFormFactory formFactory, ICdmFormElement parentElement, boolean isMultiLine) {

        super(formFactory, parentElement);

        this.isMultiLine = isMultiLine;

    }

    protected RichTextWithLabelElement(CdmFormFactory formFactory, ICdmFormElement parentElement, String labelString,

            LanguageString initialLanguageString, Integer textHeight, int style) {

        this(formFactory, parentElement, labelString, initialLanguageString, textHeight, null, true, style);

    }

    protected RichTextWithLabelElement(CdmFormFactory formFactory, ICdmFormElement parentElement, String labelString,

            LanguageString initialText, Integer textHeight, boolean isMultiLine, int style) {

        this(formFactory, parentElement, labelString, initialText, textHeight, null, isMultiLine, style);

    }

    protected RichTextWithLabelElement(CdmFormFactory formFactory, ICdmFormElement parentElement, String labelString,

            LanguageString initialText, Integer textHeight, Integer textLimit, int style) {

        this(formFactory, parentElement, labelString, initialText, textHeight, textLimit, false, style);

    }

    protected RichTextWithLabelElement(CdmFormFactory formFactory, ICdmFormElement parentElement, String labelString,

            LanguageString initialLanguageString, Integer textHeight, Integer textLimit, boolean isMultiLine, int style) {

        super(formFactory, parentElement);

        this.isMultiLine = isMultiLine;

        this.languageString = initialLanguageString;

        initLabel(formFactory, labelString, isMultiLine, getLayoutComposite());

        if (initialLanguageString != null){

        	initText( initialLanguageString.getText(), textHeight, textLimit, isMultiLine, style, getLayoutComposite());

        }else{

        	initText( "", textHeight, textLimit, isMultiLine, style, getLayoutComposite());

        }

        formFactory.addPropertyChangeListener(this);

    }

    protected void initText(String initialText, Integer textHeight, Integer textLimit,

            boolean isMultiLine, int style, Composite layoutComposite) {

    	int scrollStyle = textHeight == null ? SWT.NULL : (SWT.V_SCROLL | SWT.MULTI);

        int combinedStyle = style | SWT.BORDER | scrollStyle;

        // SWT.PASSWORD does not work when SWT.WRAP is set.

        if (style != SWT.PASSWORD) {

            combinedStyle = combinedStyle | SWT.WRAP;

        }

        text = formFactory.createRichTextEditor(layoutComposite, "", combinedStyle);

       // text.setTextLimit(textLimit!=null?textLimit:Text.LIMIT);

        addControl(text);

        // text.setWO

        if (textHeight == null) {

            text.addKeyListener(new KeyAdapter() {

                @Override

                public void keyPressed(KeyEvent e) {

                    if (e.character == SWT.CR) {

                        // Don't accept carriage returns as input when in single

                        // line mode

                        e.doit = false;

                    } else if (e.character == SWT.TAB) {

                        // traverse is not working for wrapped text widgets so

                        // we reintroduce it here

                        e.doit = false;

                        text.traverse(SWT.TRAVERSE_TAB_NEXT);

                    }

                }

            });

        }

        TableWrapData layoutData;

        if(isMultiLine){

            layoutData = LayoutConstants.FILL_HORIZONTALLY(2, 1);

        }

        else{

            layoutData = LayoutConstants.FILL();

        }

        if (textHeight != null && textHeight > 0) {

            (layoutData).heightHint = textHeight;

        }

        text.setLayoutData(layoutData);

        text.addModifyListener(this);

        setText();

    }

//   

    protected void initLabel(CdmFormFactory formFactory, String labelString, boolean isMultiLine, Composite layoutComposite) {

        if (labelString != null) {

            label = formFactory.createLabel(layoutComposite, CdmUtils.Nz(labelString), SWT.NULL);

            addControl(label);

            if(isMultiLine){

                label.setLayoutData(LayoutConstants.FILL_HORIZONTALLY(2, 1));

                ((TableWrapData)label.getLayoutData()).valign = TableWrapData.MIDDLE;

            }

            else{

                label.setLayoutData(LayoutConstants.LEFT());

                ((TableWrapData)label.getLayoutData()).valign = TableWrapData.MIDDLE;

            }

        }

    }

    /** {@inheritDoc} */

    @Override

    public void setBackground(Color color) {

        if (label != null) {

            label.setBackground(color);

        }

    }

    @Override

    public void setSelected(boolean selected) {

        setBackground(selected ? SELECTED : getPersistentBackground());

    }

	@Override

	public void setIrrelevant(boolean irrelevant) {

		// TODO Auto-generated method stub

	}

	@Override

	public void setEnabled(boolean enabled) {

		// TODO Auto-generated method stub

	}

	@Override

	public boolean isEnabled() {

		// TODO Auto-generated method stub

		return false;

	}

	@Override

	public void modifyText(ModifyEvent e) {

		if(languageString == null){

				languageString = LanguageString.NewInstance("", CdmStore.getDefaultLanguage());

			}

		languageString.setText(getText());

		firePropertyChangeEvent(new CdmPropertyChangeEvent(this, e));

	}

	public LanguageString getLanguageString(){

		return languageString;

	}

	/**

     * Set the text of this composites text composite

     *

     * @param string

     *            a {@link java.lang.String} object.

     */

    public void setText() {

    	String convertedString = "";

    	if (languageString != null){

    		Set<IntextReference> inrefs =  this.languageString.getIntextReferences();

    		convertedString = languageString.getText();

    		String inLineString = null;

        	String innerText = null;

        	String htmlString = null;

        	boolean converted = true;

        	if (!languageString.getText().contains("<cdm")){

    			text.setText(languageString.getText());

    			return;

    		}

        	if (inrefs == null || inrefs.size() == 0){

        		 text.setText(CdmUtils.Nz(languageString.getText()));

        	}else{

	        	for (IntextReference inref: inrefs){

	        		if (inref.getTarget() == null){

	        			break;

	        		}

	        		inLineString = findInlineString(convertedString,  inref.toInlineString(".*"));

	        		innerText = findInText(inLineString, "(<cdm:.+>)(.+)(</cdm:.+>)");

	        		if (innerText != null){

	        			htmlString = createHtml(inref, innerText);

	        		}else{

	        			inLineString =findInlineString(convertedString, "(<cdm:.+/>)");

	        			htmlString = createHtml(inref, innerText);

	        		}

	        		if (inLineString != null){

	        			convertedString = convertedString.replace(inLineString, htmlString);

	        			System.out.println("new text after converting "+convertedString + " - " + languageString.getText());

	        		}else{

	        			converted = false;

	        		}

	        	}

	        	text.setText(convertedString);

	        	if(!converted){

	        		System.err.println("There is a problem with the language string and an intextrefernce.");

	        	}

        	}

    	}

        Listener[] listeners = text.getListeners(SWT.Modify);

        text.removeModifyListener(this);

        text.addModifyListener(this);

//        for (Listener listener : listeners) {

//            text.removeListener(SWT.Modify, listener);

//        }

//        

//       

//

//        for (Listener listener : listeners) {

//            text.addListener(SWT.Modify, listener);

//        }

    }

    /**

     * Set the text of this composites text composite

     *

     * @param string

     *            a {@link java.lang.String} object.

     */

    public String getText() {

    	String convertedString = "";

    	if (this.languageString != null){

    		Set<IntextReference> inrefs =  this.languageString.getIntextReferences();

    		String inLineString = null;

        	String innerText = null;

        	String htmlString = null;

        	convertedString = text.getText();

        	System.out.println("before converting html to markup: "+convertedString);

        	for (IntextReference inref: inrefs){

        		if (inref.getTarget() == null){

        			break;

        		}

        		htmlString = findHtmlString(text.getText(), inref);

        		System.out.println("html"+htmlString);

        		if (htmlString != null){

        			innerText = findInText(htmlString, "(.+>)(.*)(</span>)");

        			inLineString = createCdmMarkUp(inref, innerText);

        			System.out.println("cdm mark up" + inLineString);

        			convertedString = convertedString.replace(htmlString, inLineString);

        			System.out.println("cnvertedString" +convertedString);

        		}else{

        			convertedString = text.getText();

        		}

        	}

    	}

    	return convertedString;

    }

    private String findHtmlString(String htmlText, IntextReference inRef) {

		String htmlString = createHtml(inRef, ".*");

		Pattern pattern = Pattern.compile(htmlString);

    	Matcher matcher = pattern.matcher(htmlText);

    	if (matcher.find())

    	{

    		String result = matcher.group();

    	    return result;

    	}

    	return null;

	}

    private String createCdmMarkUp(IntextReference inRef, String innerText){

    	return inRef.toInlineString(innerText);

    }

	private static final String CDM_PREFIX = "cdm:";

    private String createHtml(IntextReference inRef, String innerString){

    	/*

    	 * 

    	 * <span 

			class="cdm:IntextReference" 

			data-cdm-referenced-type="reference" 

			data-cdm-referenced-uuid="38567a90-bcae-4f76-b148-21fcae649a85'" 

			data-cdm-intext-uuid="'d427802f-ea22-4d10-b90b-fa90aa0092ed">

			innerString

			</span>

    	 */

    	String type = " data-cdm-referenced-type=\"" + inRef.myClass().tag() + "\"";

 	    IIntextReferenceTarget entity = inRef.getTarget();

 	    String attributes = " data-cdm-referenced-uuid=\"" + entity.getUuid() + "\" data-cdm-intext-uuid=\"" + inRef.getUuid() + "\"" ;

 	    String result;

 	    if (StringUtils.isNotEmpty(innerString)){

 	        result = "<span \n class=\"cdm:IntextReference\"" + type + attributes + ">" + innerString + "</" + "span" + ">";

 	    }else{

             result ="<span \n class=\"cdm:IntextReference\"" + type + attributes  + "/>";

 	    }

 	    return result;

    }

    private String findInlineString(String text, String inlineString){

    	if (text == null){

    		return null;

    	}

    	Pattern pattern = Pattern.compile(inlineString);

    	Matcher matcher = pattern.matcher(text);

    	String result = null;

    	if (matcher.find()){

    		result = matcher.group();

    		System.out.println(result);

    		for (int i = 0; i<matcher.groupCount(); i++){

    			if (i == 0){

    				 result= matcher.group(i);

    			}

    			System.out.println(matcher.group(i));

    		}

    	}

    	return result;

    }

    private String findInText(String text, String inlineString){

	    if (text == null){

	    	return null;

	    }

    	Pattern pattern = Pattern.compile(inlineString);

    	Matcher matcher = pattern.matcher(text);

    	if (matcher.find())

    	{

    		String result = matcher.group(1);

    	    return matcher.group(2);

    	}

    	return null;

    }

}