/*****************************************************************************
 * Copyright (c) 2018 CEA LIST and others.
 * 
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * http://www.eclipse.org/legal/epl-v10.html
 *
 * Contributors:
 *   CEA LIST - Initial API and implementation
 *   
 *****************************************************************************/

package org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.impl.custom;

import java.util.ArrayList;
import java.util.List;

import org.eclipse.emf.common.util.EList;
import org.eclipse.emf.ecore.EStructuralFeature;
import org.eclipse.emf.ecore.util.EcoreUtil;
import org.eclipse.emf.transaction.TransactionalEditingDomain;
import org.eclipse.gmf.runtime.notation.Diagram;
import org.eclipse.gmf.runtime.notation.NotationPackage;
import org.eclipse.gmf.runtime.notation.StringListValueStyle;
import org.eclipse.gmf.runtime.notation.View;
import org.eclipse.papyrus.infra.core.services.ServiceException;
import org.eclipse.papyrus.infra.emf.utils.ServiceUtilsForResource;
import org.eclipse.papyrus.infra.gmfdiag.css.notation.CSSDiagram;
import org.eclipse.papyrus.infra.gmfdiag.css.notation.CSSStyles;
import org.eclipse.papyrus.infra.gmfdiag.css.properties.databinding.AddCSSStyleSheetCommand;
import org.eclipse.papyrus.infra.gmfdiag.css.properties.databinding.AddCssClassStyleCommand;
import org.eclipse.papyrus.infra.gmfdiag.css.stylesheets.EmbeddedStyleSheet;
import org.eclipse.papyrus.infra.gmfdiag.css.stylesheets.StyleSheet;
import org.eclipse.papyrus.infra.gmfdiag.css.stylesheets.StyleSheetReference;
import org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.CSSInstance;
import org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.TypeInstance;
import org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.impl.CSSPropertySetterImpl;

/**
 * @author QL238289
 *
 */
public class CustomCSSPropertySetterImpl extends CSSPropertySetterImpl {

	/**
	 * <!-- begin-user-doc -->
	 * <!-- end-user-doc -->
	 * 
	 */
	protected CustomCSSPropertySetterImpl() {
		super();
		setPropertyName("css");
	}

	/**
	 * @see org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.impl.PropertySetterImpl#setValue(org.eclipse.gmf.runtime.notation.View, org.eclipse.papyrus.internal.infra.gmfdiag.layers.model.layers.TypeInstance)
	 *
	 * @param view
	 * @param value
	 */
	@Override
	public void setValue(View view, TypeInstance value) {
		Diagram d = view.getDiagram();
		StyleSheet ass;
		CSSDiagram cssD = null;
		TransactionalEditingDomain ted = null;

		EList<EStructuralFeature> features = view.eClass().getEStructuralFeatures();

		CSSInstance associatedCSS = (CSSInstance) value;
		StyleSheet sheet = associatedCSS.getStylesheet();

		// System.err.println(view);
		// System.err.println(value);

		// CHeck if there is a styleSheet reference associated
		if (sheet == null) {
			return;
		}

		if (d instanceof CSSDiagram) {
			cssD = (CSSDiagram) d;
			// Get the Transactional Editing Domain associated to the diagram
			try {
				ted = ServiceUtilsForResource.getInstance().getTransactionalEditingDomain(view.eResource());
			} catch (ServiceException e) {
				// TODO Auto-generated catch block
				e.printStackTrace();
			}

			// TODO find a way to remove a reference
			// if (!(cssD.getStyleSheets().isEmpty())) {
			// RemoveAllCSSStyleSheetValueCommand racssvc = new RemoveAllCSSStyleSheetValueCommand(ted, cssD,
			// CSSStyles.CSS_DIAGRAM_STYLESHEETS_KEY,
			// NotationPackage.eINSTANCE.getEObjectListValueStyle(),
			// NotationPackage.eINSTANCE.getEObjectListValueStyle_EObjectListValue(),
			// Collections.singleton(sheet));
			// racssvc.execute();
			// System.out.println("done!");
			// }

			String sheetPath = ((StyleSheetReference) sheet).getPath();
			boolean sheetIsApplied = false;
			for (StyleSheet ss : cssD.getStyleSheets()) {
				String ssPath = ((StyleSheetReference) ss).getPath();
				if (sheetPath.equals(ssPath)) {
					sheetIsApplied = true;
					// There may be discrepancies in the memory addresses between the layer's CSS and the model's
					// Always revert to the model's CSS as it is the one being used
					sheet = ss;
					break;
				}
			}

			if (!sheetIsApplied) {
				if (sheet instanceof StyleSheetReference) {
					sheet = EcoreUtil.copy(sheet);
				} else if (sheet instanceof EmbeddedStyleSheet) {
					// TODO if needed
				}

				AddCSSStyleSheetCommand aacssc = new AddCSSStyleSheetCommand(ted, cssD,
						CSSStyles.CSS_DIAGRAM_STYLESHEETS_KEY,
						NotationPackage.eINSTANCE.getEObjectListValueStyle(),
						NotationPackage.eINSTANCE.getEObjectListValueStyle_EObjectListValue(),
						sheet);
				aacssc.execute();
			}

			// Apply the style to the view if it has not been previously
			String style = associatedCSS.getStyle();
			if (style == null) {
				return;
			}

			List<String> appliedStyles = new ArrayList<String>();
			for (Object o : view.getStyles()) {
				if (!(o instanceof StringListValueStyle)) {
					continue;
				}
				StringListValueStyle slvs = (StringListValueStyle) o;
				if (!slvs.getStringListValue().isEmpty()) {
					appliedStyles.add((String) slvs.getStringListValue().get(0));
				}
			}
			// There is a refresh problem on the style display in the property view,
			// undo/redo multiply the style without applying it multiple times
			if (appliedStyles.isEmpty() || !appliedStyles.contains(style)) {
				AddCssClassStyleCommand accsc = new AddCssClassStyleCommand(ted, view, style);
				accsc.execute();
			}
		}
	}

}