/*******************************************************************************
 * See the NOTICE file distributed with this work for additional information
 * regarding copyright ownership.
 * 
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 * 
 *   http://www.apache.org/licenses/LICENSE-2.0
 * 
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 ******************************************************************************/
package hr.fer.zemris.vhdllab.applets.editor.schema2.model.parameters.events;

import hr.fer.zemris.vhdllab.applets.editor.schema2.enums.EPropertyChange;
import hr.fer.zemris.vhdllab.applets.editor.schema2.exceptions.DuplicateKeyException;
import hr.fer.zemris.vhdllab.applets.editor.schema2.exceptions.OverlapException;
import hr.fer.zemris.vhdllab.applets.editor.schema2.exceptions.UnknownKeyException;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.IParameter;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.IParameterEvent;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.ISchemaComponent;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.ISchemaComponentCollection;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.ISchemaInfo;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.ISchemaWire;
import hr.fer.zemris.vhdllab.applets.editor.schema2.interfaces.ISchemaWireCollection;
import hr.fer.zemris.vhdllab.applets.editor.schema2.misc.Caseless;
import hr.fer.zemris.vhdllab.applets.editor.schema2.misc.ChangeTuple;
import hr.fer.zemris.vhdllab.applets.editor.schema2.misc.PlacedComponent;
import hr.fer.zemris.vhdllab.applets.editor.schema2.misc.SchemaPort;

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

/**
 * Event koji nakon promjene imena zice ili komponente automatski mijenja kljuc
 * pod kojim je komponenta ili zica spremljena u kolekciju. Kako akcija ovog
 * eventa ovisi iskljucivo o vrijednosti imena komponente, a ne o njegovom
 * stanju ili stanju shematica, ovaj je event undoable.
 * 
 * @author Axel
 * 
 */
public class NameChanger implements IParameterEvent {

	/* static fields */
	private static final List<ChangeTuple> changes = new ArrayList<ChangeTuple>();
	private static final List<ChangeTuple> ro_ch = Collections.unmodifiableList(changes);
	static {
		changes.add(new ChangeTuple(EPropertyChange.CANVAS_CHANGE));
	}
	
	
	/* private fields */
	
	

	/* ctors */

	public NameChanger() {
	}


	
	/* methods */	

	public IParameterEvent copyCtor() {
		return new NameChanger();
	}

	public List<ChangeTuple> getChanges() {
		return ro_ch;
	}

	public boolean isUndoable() {
		return true;
	}

	public boolean performChange(Object oldvalue, IParameter parameter,
			ISchemaInfo info, ISchemaWire wire, ISchemaComponent component)
	{
		Caseless oldkey = new Caseless((Caseless) oldvalue);

		if (wire != null) {
			return performWireNameChange(oldkey, info, wire, parameter);
		} else if (component != null) {
			return performComponentNameChange(oldkey, info, component, parameter);
		}
		
		return true;
	}

	private boolean performWireNameChange(Caseless oldname, ISchemaInfo info,
			ISchemaWire wire, IParameter parameter)
	{
		ISchemaWireCollection wires = info.getWires();
		
		if (wires.containsName(wire.getName())) return false;
		
		try {
			wires.removeWire(oldname);
		} catch (UnknownKeyException e) {
			return false;
		}
		
		try {
			wires.addWire(wire);
		} catch (DuplicateKeyException e) {
			throw new IllegalStateException("Wire could not be placed " +
					"back to the same location.");
		} catch (OverlapException e) {
			throw new IllegalStateException("Wire could not be placed " +
					"back to the same location.");
		}
		
		// unplug old wire from this one, and plug new one to components
		Caseless newname = wire.getName();
		for (PlacedComponent placed : info.getComponents()) {
			for (SchemaPort sp : placed.comp.getSchemaPorts()) {
				if (oldname.equals(sp.getMapping())) sp.setMapping(newname);
			}
		}
		
		return true;
	}

	private boolean performComponentNameChange(Caseless oldname, ISchemaInfo info,
			ISchemaComponent cmp, IParameter parameter)
	{
		ISchemaComponentCollection components = info.getComponents();
		Caseless updatedname = cmp.getName();
		
		cmp.setName(oldname);
		
		try {
			components.renameComponent(oldname, updatedname);
		} catch (UnknownKeyException e) {
			throw new IllegalStateException("Component was in collection, but cannot be found.");
		} catch (DuplicateKeyException e) {
			cmp.setName(updatedname);
			return false;
		}
		
		return true;
	}
}