dsl/org.eclipse.emf.parsley.dsl.tests/src/org/eclipse/emf/parsley/dsl/tests/EmfParsleyDslGuiceModuleHelperTests.xtend

/*******************************************************************************
 * Copyright (c) 2013 RCP Vision (http://www.rcp-vision.com) 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:
 * Lorenzo Bettini - initial API and implementation
 *******************************************************************************/
package org.eclipse.emf.parsley.dsl.tests

import com.google.inject.Inject
import org.eclipse.emf.parsley.dsl.model.Model
import org.eclipse.emf.parsley.dsl.util.EmfParsleyDslGuiceModuleHelper
import org.eclipse.xtext.junit4.InjectWith
import org.eclipse.xtext.junit4.XtextRunner
import org.eclipse.xtext.junit4.util.ParseHelper
import org.junit.Test
import org.junit.runner.RunWith

import static extension org.junit.Assert.*

@RunWith(typeof(XtextRunner))
@InjectWith(typeof(EmfParsleyDslInjectorProvider))
class EmfParsleyDslGuiceModuleHelperTests extends EmfParsleyDslAbstractTests {

	@Inject extension ParseHelper<Model>
 	@Inject extension EmfParsleyDslGuiceModuleHelper
 	
	@Test
	def void testModuleWithNoNameInferredType() {
		'''
		module
		'''.parse.module.moduleInferredType.assertNull
	}

	@Test
	def void testModuleWithNoNameGuiceValueBindingsMethodsInSuperclass() {
		assertTrue(
		'''
		module
		'''.parse.module.allGuiceValueBindingsMethodsInSuperclass.empty)
	}

	@Test
	def void testModuleGuiceValueBindingsMethodsInSuperclass() {
		// ATTENTION: if you add a new value method in EmfParsleyGuiceModule this test
		// will fail: you must fix it by updating the expected list in the CharSequence
		assertEqualsStrings(
		'''
valueContentAssistShortcut
valueIterableStringSeparator
valueIterableStringEllipses
valueIterableStringMaxLength
valueDefaultTableColumnWeight
valueTableColumnWeights
valueTreeFormSashStyle
valueTreeFormSashWeights''',
		'''
		module my.test.mod {}
		'''.parse.module.allGuiceValueBindingsMethodsInSuperclass.map[simpleName].join("\n"))
	}

	@Test
	def void testModuleGuiceTypeBindingsMethodsInSuperclass() {
		// ATTENTION: if you add a new bind method in EmfParsleyGuiceModule this test
		// will fail: you must fix it by updating the expected list in the CharSequence
		// These are only the bind methods that return a Class<? extends Something>
		assertEqualsStrings(
		'''
bindIImageHelper
bindResourceLoader
bindIEditorMouseListener
bindIViewerMouseListener
bindILabelProvider
bindFeatureCaptionProvider
bindFormFeatureCaptionProvider
bindDialogFeatureCaptionProvider
bindOutlineSelectionHandler
bindViewerFactory
bindTreeFormFactory
bindFormFactory
bindViewerContextMenuHelper
bindViewerDragAndDropHelper
bindFormControlFactory
bindDialogControlFactory
bindColumnLabelProviderFactory
bindTableColumnLabelProvider
bindTableViewerColumnBuilder
bindWorkbenchActionBarContributor
bindLightweightActionBarContributor
bindEditingActionManager
bindEditingMenuBuilder
bindEditingDomainFinder
bindFeaturesProvider
bindFeatureResolver
bindTableFeaturesProvider
bindEmfSelectionHelper
bindEmfEventHelper
bindResourceSaveStrategy
bindResourceManager
bindIContentProvider
bindTableViewerContentProvider
bindProposalCreator
bindIEditingStrategy
bindConfigurator
bindIssueReporter
bindValidationRunner
bindDiagnosticUtil
bindFeatureHelper
bindAsyncCommandStackListener
bindAdapterFactory
bindAdapterFactoryLabelProvider''',
		'''
		module my.test.mod {}
		'''.parse.module.allGuiceTypeBindingsMethodsInSuperclass.map[simpleName].join("\n"))
	}

	@Test
	def void testModuleGuiceProviderBindingsMethodsInSuperclass() {
		// ATTENTION: if you add a new provide method in EmfParsleyGuiceModule this test
		// will fail: you must fix it by updating the expected list in the CharSequence
		assertEqualsStrings(
		'''
provideAdapterFactoryEditingDomain
provideEditingDomain''',
		'''
		module my.test.mod {}
		'''.parse.module.allGuiceProviderBindingsMethodsInSuperclass.map[simpleName].join("\n"))
	}

	@Test
	def void testGetAllWithExtendsClause() {
		assertEqualsStrings(
		'''
LabelProviderImpl
FormFeatureCaptionProviderImpl''',
		'''
		module my.test.mod {
			labelProvider {}
			bindings {} // this is not a WithExtendsClause
			formFeatureCaptionProvider {}
		}
		'''.parseAndAssertNoError.module.allWithExtendsClause.map[class.simpleName].join("\n"))
	}

	@Test
	def void testGetAllWithExtendsClauseInferredJavaTypes() {
		assertEqualsStrings(
		'''
ModLabelProvider
ModFormFeatureCaptionProvider''',
		'''
		module my.test.mod {
			labelProvider {}
			bindings {} // this is not a WithExtendsClause
			formFeatureCaptionProvider {}
		}
		'''.parseAndAssertNoError.module.allWithExtendsClauseInferredJavaTypes.map[simpleName].join("\n"))
	}

	@Test
	def void testGetJavaResolvedFeatures() {
		assertEqualsStrings(
		'''
text(List)''',
		'''
		module my.test.mod {
			labelProvider {
				text {
					java.util.List l -> { "test" }
				}
			}
		}
		'''.parseAndAssertNoError.
			module.allWithExtendsClauseInferredJavaTypes.
			head.javaResolvedFeatures.declaredOperations.
			map[simpleSignature].join("\n"))
	}

	@Test
	def void testGetGetJavaMethodResolvedErasedSignature() {
		assertEqualsStrings(
		'''
text(java.util.List)
text(java.util.List)
image(java.util.List)
text_EClass_name(org.eclipse.emf.ecore.EStructuralFeature)''',
		'''
		module my.test.mod {
			labelProvider {
				text {
					java.util.List l -> { "test" }
					// the following has the same erased signature of the previous one
					java.util.List<String> -> { "test" }
				}
				image {
					java.util.List l -> { "test" }
				}
			}
			featureCaptionProvider {
				text {
					org.eclipse.emf.ecore.EClass : name -> { "name" }
				}
			}
		}
		'''.parse.
			module.allWithExtendsClauseInferredJavaTypes.
			map[javaResolvedFeatures.declaredOperations].flatten.
			map[getJavaMethodResolvedErasedSignature].join("\n"))
	}
}