Skip to main content
aboutsummaryrefslogtreecommitdiffstats
blob: e4a277e1f9de59dbb6591fa38e3338fb7368f91e (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/*****************************************************************************
 * Copyright (c) 2010 CEA LIST.
 *
 *    
 * 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:
 *  Vincent Lorenzo (CEA LIST) vincent.lorenzo@cea.fr - Initial API and implementation
 *
 *****************************************************************************/

«IMPORT "http://www.eclipse.org/gmf/2008/GenModel"»
«IMPORT "http://www.eclipse.org/emf/2002/Ecore"»
«IMPORT 'http://www.eclipse.org/papyrus/2009/papyrusgmfgenextension'»
«EXTENSION xpt::diagram::editpolicies::Utils»
«EXTENSION xpt::GenModelUtils»
«EXTENSION xpt::diagram::editpolicies::linkCommands»


«REM» 
We overwrite the reorientTypeLinkCommands to manages the links which use the ReorientCommand provided by the EditService
«ENDREM»
«AROUND reorientTypeLinkCommands FOR gmfgen::GenLinkEnd-»
«EXPAND xpt::Common::generatedMemberComment(
	'Returns command to reorient EClass based link. New link target or source\n' + 
	'should be the domain model element associated with this node.\n'
)»
protected org.eclipse.gef.commands.Command getReorientRelationshipCommand(
		org.eclipse.gmf.runtime.emf.type.core.requests.ReorientRelationshipRequest req) {
	switch (getVisualID(req)) {
		«EXPAND reorientLinkCommandWithService FOREACH getReroutableTypeLinks(self)-»
		«EXPAND callReorientCommand-»
		«EXPAND reorientLinkCommandWithoutService FOREACH getReroutableTypeLinks(self)-»
	}
	return super.getReorientRelationshipCommand(req);
	}
«ENDAROUND»

«REM» 
This function writes only  : "case myLinkEditPart.VISUAL_ID:" 
for the link which uses the ReorientCommand provided by the EditService 
«ENDREM»
«DEFINE reorientLinkCommandWithService FOR gmfgen::GenLink-»
	«IF papyrusgmfgenextension::EditPartUsingReorientService.allInstances()->select(v:papyrusgmfgenextension::EditPartUsingReorientService|v.genView->includes(self))->size()<>0-» 
		«EXPAND xpt::Common::caseVisualID-»
	«ENDIF-»
«ENDDEFINE»

«REM» 
This function writes the code to call the ReorientCommand provided by the ReorientService
«ENDREM»
«DEFINE callReorientCommand FOR gmfgen::GenLinkEnd-»
	«LET papyrusgmfgenextension::EditPartUsingReorientService.allInstances() AS rServiceNodes-»
	«IF rServiceNodes->notEmpty()-»
	«IF rServiceNodes->asSequence()
					 ->select(rServiceNode | rServiceNode.genView->select(view | getReroutableTypeLinks(self)->includes(view))->notEmpty())
					 ->notEmpty()-»	
			org.eclipse.papyrus.infra.services.edit.service.IElementEditService provider =org.eclipse.papyrus.infra.services.edit.service.ElementEditServiceUtils.getCommandProvider(req.getRelationship());
			 if(provider == null) {
	             return org.eclipse.gef.commands.UnexecutableCommand.INSTANCE;
	         }
	         // Retrieve re-orient command from the Element Edit service
			 org.eclipse.gmf.runtime.common.core.command.ICommand reorientCommand = provider.getEditCommand(req);
             if(reorientCommand == null) {
	             return org.eclipse.gef.commands.UnexecutableCommand.INSTANCE;
             }
			 return getGEFWrapper(reorientCommand.reduce());
	«ENDIF-»
	«ENDIF-»
	«ENDLET-»
«ENDDEFINE»

«REM»
This function writes the code for the Links which uses their own ReorientCommand (the initial code)
«ENDREM»
«DEFINE reorientLinkCommandWithoutService FOR gmfgen::GenLink-»
	«IF papyrusgmfgenextension::EditPartUsingReorientService.allInstances()->select(v:papyrusgmfgenextension::EditPartUsingReorientService|v.genView->includes(self))->size()=0-» 
		«EXPAND xpt::diagram::editpolicies::linkCommands::reorientLinkCommand-» 
	«ENDIF-»
«ENDDEFINE»

Back to the top