EDIT

/**

 * Copyright (C) 2007 EDIT

 * European Distributed Institute of Taxonomy

 * http://www.e-taxonomy.eu

 *

 * The contents of this file are subject to the Mozilla Public License Version 1.1

 * See LICENSE.TXT at the top of this package for the full license terms.

 */

package eu.etaxonomy.taxeditor.editor.name.e4;

import java.util.ArrayList;

import java.util.HashSet;

import java.util.List;

import java.util.Set;

import javax.annotation.PostConstruct;

import javax.annotation.PreDestroy;

import javax.inject.Inject;

import org.apache.commons.lang.StringUtils;

import org.eclipse.core.commands.operations.IUndoContext;

import org.eclipse.core.runtime.IProgressMonitor;

import org.eclipse.core.runtime.OperationCanceledException;

import org.eclipse.e4.ui.di.Focus;

import org.eclipse.e4.ui.di.Persist;

import org.eclipse.e4.ui.model.application.ui.MDirtyable;

import org.eclipse.e4.ui.services.EMenuService;

import org.eclipse.e4.ui.workbench.modeling.ESelectionService;

import org.eclipse.jface.action.MenuManager;

import org.eclipse.jface.viewers.ISelection;

import org.eclipse.jface.viewers.ISelectionChangedListener;

import org.eclipse.jface.viewers.ISelectionProvider;

import org.eclipse.jface.viewers.StructuredSelection;

import org.eclipse.swt.graphics.Color;

import org.eclipse.swt.widgets.Composite;

import org.eclipse.swt.widgets.Menu;

import org.eclipse.ui.ISelectionListener;

import org.eclipse.ui.ISelectionService;

import org.eclipse.ui.IWorkbenchPart;

import org.eclipse.ui.IWorkbenchPartReference;

import org.eclipse.ui.PartInitException;

import org.eclipse.ui.PlatformUI;

import org.eclipse.ui.forms.ManagedForm;

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

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

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

import eu.etaxonomy.cdm.api.conversation.ConversationHolder;

import eu.etaxonomy.cdm.api.conversation.IConversationEnabled;

import eu.etaxonomy.cdm.hibernate.HibernateProxyHelper;

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

import eu.etaxonomy.cdm.model.name.HomotypicalGroup;

import eu.etaxonomy.cdm.model.taxon.Taxon;

import eu.etaxonomy.cdm.model.taxon.TaxonBase;

import eu.etaxonomy.cdm.model.taxon.TaxonNode;

import eu.etaxonomy.cdm.persistence.hibernate.CdmDataChangeMap;

import eu.etaxonomy.taxeditor.editor.ISecuredEditor;

import eu.etaxonomy.taxeditor.editor.e4.TaxonEditorInputE4;

import eu.etaxonomy.taxeditor.editor.l10n.Messages;

import eu.etaxonomy.taxeditor.editor.name.container.AbstractGroupedContainer;

import eu.etaxonomy.taxeditor.editor.name.e4.container.AbstractGroupE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.AbstractGroupedContainerE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.AcceptedGroupE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.AcceptedNameContainerE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.ContainerFactoryE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.HomotypicalSynonymGroupE4;

import eu.etaxonomy.taxeditor.editor.name.e4.container.MisappliedGroupE4;

import eu.etaxonomy.taxeditor.model.AbstractUtility;

import eu.etaxonomy.taxeditor.model.IDirtyMarkable;

import eu.etaxonomy.taxeditor.model.IPartChangeListener;

import eu.etaxonomy.taxeditor.model.IPartContentHasDetails;

import eu.etaxonomy.taxeditor.model.TaxeditorPartService;

import eu.etaxonomy.taxeditor.operation.IPostOperationEnabled;

import eu.etaxonomy.taxeditor.preference.Resources;

import eu.etaxonomy.taxeditor.security.RequiredPermissions;

import eu.etaxonomy.taxeditor.session.ICdmEntitySession;

import eu.etaxonomy.taxeditor.store.CdmStore;

/**

 *

 * @author pplitzner

 * @date Aug 24, 2017

 *

 */

public class TaxonNameEditorE4 implements

		IConversationEnabled, IDirtyMarkable,

		IPartContentHasDetails, IPartChangeListener,

		ISelectionListener, ISecuredEditor, IPostOperationEnabled {

	private Taxon taxon;

	private ManagedForm managedForm;

	private ScrolledForm scrolledForm;

	private Composite parent;

	private ISelectionProvider simpleSelectionProvider;

	private TaxonBase selection;

	private ConversationHolder conversation;

	private MenuManager menuManager;

	private Menu menu;

	private AcceptedGroupE4 acceptedGroup;

	private List<HomotypicalSynonymGroupE4> heterotypicSynonymGroups = new ArrayList<>();

	private MisappliedGroupE4 misappliedGroup;

	private ISelectionService selectionService;

	private TaxonBase objectAffectedByLastOperation;

	private ICdmEntitySession cdmEntitySession;

	@Inject

	private ESelectionService selService;

	@Inject

	private MDirtyable dirty;

	private ISelectionChangedListener selectionChangedListener;

    private TaxonEditorInputE4 input;

	@Inject

	public TaxonNameEditorE4() {

	}

	@PostConstruct

    public void createPartControl(Composite parent, EMenuService menuService) {

        if (CdmStore.isActive()){

            if(conversation == null){

                conversation = CdmStore.createConversation();

            }

        }

        else{

            return;

        }

		createManagedForm(parent);

		//propagate selection

        selectionChangedListener = (event -> selService.setSelection(AbstractUtility.getElementsFromSelectionChangedEvent(event)));

        //FIXME E4 migrate

//        viewer.addSelectionChangedListener(selectionChangedListener);

        //create context menu

        menuService.registerContextMenu(managedForm, "eu.etaxonomy.taxeditor.editor.popupmenu.nameeditor");

		TaxeditorPartService.getInstance().addListener(

				TaxeditorPartService.PART_ACTIVATED, this);

	}

	protected void createManagedForm(Composite composite) {

		managedForm = new ManagedForm(composite) {

			@Override

			public void dirtyStateChanged() {

			    dirty.setDirty(true);

			    //FIXME E4 migrate

//				firePropertyChange(PROP_DIRTY);

			}

			@Override

			public boolean setInput(Object input) {

				if (input instanceof AbstractGroupedContainer) {

					selection = ((AbstractGroupedContainer) input).getData();

			        selectionChangedListener = (event -> selService.setSelection(new StructuredSelection(selection)));

				}else if(input == null){

					selection = null;

                    selectionChangedListener = (event -> selService.setSelection(new StructuredSelection()));

				}

				return super.setInput(input);

			}

		};

		scrolledForm = managedForm.getForm();

		parent = scrolledForm.getBody();

		parent.setData(taxon);

		TableWrapLayout layout = new TableWrapLayout();

		layout.leftMargin = 0;

		layout.rightMargin = 0;

		layout.topMargin = 0;

		layout.bottomMargin = 0;

		layout.verticalSpacing = 0;

		layout.horizontalSpacing = 0;

		parent.setLayout(layout);

		parent.setBackground(AbstractUtility

				.getColor(Resources.COLOR_COMPOSITE_BACKGROUND));

	}

	public void createOrUpdateNameComposites() {

		ContainerFactoryE4.createOrUpdateAcceptedTaxonsHomotypicGroup(this);

		ContainerFactoryE4.createOrUpdateHeterotypicSynonymyGroups(this);

		ContainerFactoryE4.createOrUpdateMisapplicationsGroup(this);

		// Redraw composite

		managedForm.reflow(true);

	}

	public Taxon getTaxon() {

		return HibernateProxyHelper.deproxy(taxon);

	}

	public void setDirty() {

		managedForm.dirtyStateChanged();

	}

	@Focus

	public void setFocus() {

	    if(input!=null){

	        PlatformUI.getWorkbench().getActiveWorkbenchWindow().getShell().setFocus();

	        if (getSelectedContainer() == null) {

	            throw new IllegalStateException(

	                    Messages.TaxonNameEditor_THERE_SHOULD_ALWAYS_BE);

	        }

	        getSelectedContainer().setSelected();

	        // check permissions

	        boolean doEnable = permissionsSatisfied();

	        managedForm.getForm().setEnabled(doEnable);

	    }

	}

	@Override

	public boolean permissionsSatisfied() {

		TaxonNode taxonNode = input.getTaxonNode();

		boolean doEnable = CdmStore.currentAuthentiationHasPermission(taxonNode, RequiredPermissions.TAXONNODE_EDIT);

		return doEnable;

	}

	@Override

    public ConversationHolder getConversationHolder() {

		return conversation;

	}

	/** {@inheritDoc} */

	@Override

    public void update(CdmDataChangeMap events) {

		// redraw();

	}

	/**

	 * Redraws this editor return true on success

	 *

	 * @return a boolean.

	 */

    public boolean redraw() {

		return redraw(true);

	}

	/**

	 * {@inheritDoc}

	 *

	 * Redraws the editor controls

	 */

    public boolean redraw(boolean focus) {

		createOrUpdateNameComposites();

		if (focus) {

			setFocus();

		}

		return true;

	}

	@Override

    public boolean postOperation(CdmBase objectAffectedByOperation) {

		changed(objectAffectedByOperation);

		redraw(false);

		if (objectAffectedByOperation instanceof TaxonBase) {

			objectAffectedByLastOperation = (TaxonBase) objectAffectedByOperation;

		}

		return true;

	}

	public ManagedForm getManagedForm() {

		return managedForm;

	}

	public Menu getMenu() {

		if (menu == null || menu.isDisposed()) {

			// Creating the menu because it was either not initialised or

			// disposed while refreshing the editor

			menu = menuManager.createContextMenu(parent);

		}

		return menu;

	}

	/**

	 * <p>

	 * checkForEmptyNames

	 * </p>

	 *

	 * @return true if there are empty names

	 */

	public boolean checkForEmptyNames() {

		for (AbstractGroupedContainerE4 container : getGroupedContainers()) {

			if (container.getName() == null

					|| StringUtils.isEmpty(container.getName().getTitleCache())) {

				return true;

			}

		}

		return false;

	}

	public Set<AbstractGroupedContainerE4> getEmptyContainers() {

		Set<AbstractGroupedContainerE4> containersWithEmptyNames = new HashSet<>();

		for (AbstractGroupedContainerE4 container : getGroupedContainers()) {

			if (container.getName() == null

					|| StringUtils.isEmpty(container.getName().getTitleCache())) {

				containersWithEmptyNames.add(container);

			}

		}

		return containersWithEmptyNames;

	}

	/** {@inheritDoc} */

	@Persist

	public void doSave(IProgressMonitor monitor) {

		monitor.beginTask(Messages.TaxonNameEditor_SAVING_NAMES, getGroupedContainers().size());

		try {

			// check for empty names

			for (AbstractGroupedContainerE4 container : getGroupedContainers()) {

				monitor.subTask(Messages.TaxonNameEditor_SAVING_COMPOSITES

						+ container.getTaxonBase().getTitleCache());

				container.persistName();

				// In case the progress monitor was canceled throw an exception.

				if (monitor.isCanceled()) {

					throw new OperationCanceledException();

				}

				// Otherwise declare this step as done.

				monitor.worked(1);

			}

		} finally {

			// Stop the progress monitor.

			monitor.done();

		}

	}

	public void init(TaxonEditorInputE4 input)

			throws PartInitException {

		if (!(input != null)) {

            throw new PartInitException(Messages.TaxonNameEditor_INVALID_INPUT);

        }

		if (input.getAdapter(Taxon.class) != null) {

			taxon = CdmBase.deproxy(input.getAdapter(Taxon.class), Taxon.class);

		} else {

			throw new PartInitException(Messages.TaxonNameEditor_INVALID_INPUT_TAXON_NULL);

		}

		this.input = input;

        createOrUpdateNameComposites();

        setFocus();

	}

	public AcceptedNameContainerE4 getAcceptedNameContainer() {

		return getAcceptedGroup().getAcceptedNameContainer();

	}

	public HomotypicalSynonymGroupE4 getHomotypicalGroupContainer(

			HomotypicalGroup homotypicalGroup) {

		for (HomotypicalSynonymGroupE4 group : getHeterotypicSynonymGroups()) {

			if (group.getGroup().equals(homotypicalGroup)) {

				return group;

			}

		}

		return null;

	}

	/**

	 * <p>

	 * getDirtyNames

	 * </p>

	 *

	 * @return a Set containing all composites that have been edited

	 */

	public Set<AbstractGroupedContainerE4> getDirtyNames() {

		Set<AbstractGroupedContainerE4> dirtyNames = new HashSet<>();

		for (AbstractGroupedContainerE4 composite : getGroupedContainers()) {

			if (composite.isDirty()) {

				dirtyNames.add(composite);

			}

		}

		return dirtyNames;

	}

	public List<AbstractGroupedContainerE4> getGroupedContainers() {

		List<AbstractGroupedContainerE4> groupedComposites = new ArrayList<>();

		for (AbstractGroupE4 group : getAllGroups()) {

			groupedComposites.addAll(group.getGroupedContainers());

		}

		return groupedComposites;

	}

	public List<AbstractGroupE4> getAllGroups() {

		List<AbstractGroupE4> allGroups = new ArrayList<>();

		allGroups.add(getAcceptedGroup());

		heterotypicSynonymGroups = getHeterotypicSynonymGroups();

		if (heterotypicSynonymGroups != null) {

			allGroups.addAll(heterotypicSynonymGroups);

		}

		if (misappliedGroup != null) {

			allGroups.add(misappliedGroup);

		}

		return allGroups;

	}

	public boolean isDirty() {

		return dirty.isDirty();

	}

	@PreDestroy

	public void dispose() {

		conversation.unregisterForDataStoreChanges(this);

	}

	/** {@inheritDoc} */

	@Override

    public void selectionChanged(IWorkbenchPart part, ISelection selection) {

	}

	public AbstractGroupedContainerE4 getSelectedContainer() {

		TaxonBase selectedTaxonBase = null;

		if (input.getInitiallySelectedTaxonBase() != null) {

			selectedTaxonBase = input.getInitiallySelectedTaxonBase();

		} else {

			if (selection != null) {

				selectedTaxonBase = selection;

			}

		}

		return (selectedTaxonBase != null) ? getContainer(selectedTaxonBase)

				: getAcceptedNameContainer();

	}

	public void setMisapplicationsGroup(MisappliedGroupE4 misappliedGroup) {

		this.misappliedGroup = misappliedGroup;

	}

	public FormToolkit getToolkit() {

		return managedForm.getToolkit();

	}

	public List<HomotypicalSynonymGroupE4> getHeterotypicSynonymGroups() {

		return heterotypicSynonymGroups;

	}

	public void addHeterotypicSynonymGroup(HomotypicalSynonymGroupE4 group) {

		heterotypicSynonymGroups.add(group);

	}

	public AcceptedGroupE4 getAcceptedGroup() {

		return acceptedGroup;

	}

	public void setAcceptedGroup(AcceptedGroupE4 acceptedGroup) {

		this.acceptedGroup = acceptedGroup;

	}

	public MisappliedGroupE4 getMisappliedGroup() {

		return misappliedGroup;

	}

	public boolean isActive() {

		return this.equals(AbstractUtility.getActiveE4Part());

	}

    @Override

    public boolean onComplete() {

		getContainer(objectAffectedByLastOperation).setSelected();

		return true;

	}

	/** {@inheritDoc} */

	@Override

    public void partChanged(Integer eventType, IWorkbenchPartReference partRef) {

		if (!partRef.getPart(false).equals(this)) {

			// getSelectedObject().colorSelected(AbstractGroupedContainer.SELECTED_NO_FOCUS);

		}

	}

	public void removeGroup(AbstractGroupE4 group) {

		if (group != null) {

			group.dispose();

			//if (heterotypicSynonymGroups != null) {

			heterotypicSynonymGroups.remove(group);

			//}

		}

	}

	public AbstractGroupedContainerE4 getContainer(TaxonBase taxonBase) {

		List<AbstractGroupedContainerE4> groupedContainers = getGroupedContainers();

		for (AbstractGroupedContainerE4 container : groupedContainers) {

			if (container.getData().equals(taxonBase)

					&& container.getNameViewer().getTextWidget() != null) {

				return container;

			}

		}

		return getAcceptedNameContainer();

	}

    public void setOnError() {

		Color disabledColor =  AbstractUtility.getColor(Resources.COLOR_EDITOR_ERROR);

		setEnabled(false, disabledColor);

	}

	public void setDisabled(){

		Color disabledColor =  AbstractUtility.getColor(Resources.COLOR_TEXT_DISABLED_BACKGROUND);

		setEnabled(false, disabledColor);

	}

	protected void setEnabled(boolean enabled, Color background) {

		for(AbstractGroupedContainerE4 groupedContainer : getGroupedContainers()){

			groupedContainer.setEnabled(enabled);

		}

		// send an empty selection to the current provider - TODO only on error ???

		if (!enabled) {

			getManagedForm().setInput(null);

			for (AbstractGroupedContainerE4 groupedContainer : getGroupedContainers()) {

				groupedContainer.setBackground(background);

			}

		}

		managedForm.getForm().setBackground(background);

	}

    @Override

    public void changed(Object element) {

        // TODO Auto-generated method stub

    }

    @Override

    public void forceDirty() {

        setDirty();

    }

    public IUndoContext getUndoContext() {

        //FIXME E4 is this needed

        return null;

    }

}