public final class CustomEditorHelper {

	private CustomEditorHelper() {
	}

	public static EmbeddedEditor editor;
	public static EmbeddedEditorModelAccess partialEditorModelAccess;
	public static Resource originalResource;
	public static XtextResource xTextResource;
	public static CLabel lblUserShiftEnter;
	public static CLabel lblSavedOrStillErroneous;

	public static EmbeddedEditor createEditor(Composite parent, EObject semanticElement) throws CoreException {

		TransactionalEditingDomain editingDomain = TransactionUtil.getEditingDomain(semanticElement);

		if (!(semanticElement instanceof Transition))
			return null;

		Transition trans = (Transition) semanticElement;

		final CommandStack commandStack = editingDomain.getCommandStack();
		commandStack.execute(new RecordingCommand(editingDomain) {

			@Override
			protected void doExecute() {

				Composite top = new Composite(parent, SWT.NONE);
				top.setLayout(new GridLayout());

				GridData data = new GridData(GridData.FILL_HORIZONTAL);
				data.heightHint = 100;
				top.setLayoutData(data);

				Injector injector = FormlActivator.getInstance().getInjector(FormlActivator.UW_CS_WATFORM_FORML_FORML);

				CustomEmbeddedEditorResourceProvider resourceProvider = injector
						.getInstance(CustomEmbeddedEditorResourceProvider.class);
				// EmbeddedEditorFactory factory =
				// injector.getInstance(EmbeddedEditorFactory.class);
				CustomEmbeddedEditorFactory factory = injector.getInstance(CustomEmbeddedEditorFactory.class);

				editor = factory.newEditor(resourceProvider).showErrorAndWarningAnnotations().withParent(top);
				editor.getViewer().getTextWidget().setLayoutData(data);

				if (trans.getGuard() == null) {
					Guard guard = FormlFactory.eINSTANCE.createGuard();
					trans.setGuard(guard);
				}

				xTextResource = resourceProvider.createResource(trans.getGuard());
				ICompositeNode rootNode = xTextResource.getParseResult().getRootNode();
				originalResource = trans.getGuard().eResource();

				String[] pre_editable_suff_Fixes = findPartsForNode(rootNode, trans.getGuard());

				partialEditorModelAccess = editor.createPartialEditor(pre_editable_suff_Fixes[0],
						pre_editable_suff_Fixes[1], pre_editable_suff_Fixes[2], true);

				// CREATES TOOLTIPS AND ETC.
				lblUserShiftEnter = new CLabel(top, SWT.SHADOW_NONE);
				lblUserShiftEnter.setForeground(SWTResourceManager.getColor(64, 64, 64));
				lblUserShiftEnter.setSize(SWT.DEFAULT, 100);
				lblUserShiftEnter.setText("Please use Shift+Enter to save the modifications in the textual editor.");
				lblUserShiftEnter.pack();

				lblSavedOrStillErroneous = new CLabel(top, SWT.SHADOW_NONE);
				lblSavedOrStillErroneous.setForeground(SWTResourceManager.getColor(0, 255, 0));

				editor.getViewer().getTextWidget().setBackground(SWTResourceManager.getColor(228, 246, 253));
				
			}
		});

		addKeyVerifyListener();

		return editor;
	}

	protected static String[] findPartsForNode(ICompositeNode rootNode, EObject semanticElementInDocument) {
		String[] parts = new String[3];

		try {
			String allText = rootNode.getText();
			ICompositeNode elementNode = NodeModelUtils.findActualNodeFor((semanticElementInDocument));

			String prefix = allText.substring(0, elementNode.getOffset() - 1);
			String editablePart = allText.substring(elementNode.getOffset(), elementNode.getEndOffset());

			String suffix = allText.substring(elementNode.getEndOffset());

			parts[0] = prefix;
			parts[1] = editablePart;
			parts[2] = suffix;
		} catch (Exception e) {
			parts[0] = "";
			parts[1] = "[]";
			parts[2] = "";
		}
		return parts;
	}

	private static void addKeyVerifyListener() {
		final StyledText xtextTextWidget = editor.getViewer().getTextWidget();
		xtextTextWidget.addVerifyKeyListener(new VerifyKeyListener() {
			public void verifyKey(VerifyEvent e) {
				int keyCode = e.keyCode;
				// if ((e.stateMask & SWT.CTRL) != 0 && ((keyCode == SWT.KEYPAD_CR) || (keyCode
				// == SWT.CR))) {
				if ((e.stateMask & SWT.SHIFT) != 0 && ((keyCode == SWT.KEYPAD_CR) || (keyCode == SWT.CR))) {
					e.doit = false;
					saveEditor(true);
				}
				// if (keyCode == SWT.ESC) {
				if ((e.stateMask & SWT.SHIFT) != 0 && keyCode == SWT.ESC) {
					e.doit = false;
					saveEditor(false);
				}

			}
		});
	}

	/**
	 * Close this editor.
	 * 
	 * @param isReconcile
	 */
	public static void saveEditor(boolean isReconcile) {
		if (partialEditorModelAccess != null) {
			if (isReconcile) {
				try {
					updateXtextResource();
				} catch (Exception exc) {
					Activator.logError(exc);
				}
			}

		}
	}

	protected static void updateXtextResource() throws IOException, BadLocationException {
		String newText = partialEditorModelAccess.getSerializedModel();
		xTextResource.reparse(newText);
		EcoreUtil.resolveAll(xTextResource);
		final IParseResult parseResult = xTextResource.getParseResult();
		if (!parseResult.hasSyntaxErrors() && !hasDanglingRefs(xTextResource)) {
			if (reconcile(originalResource, xTextResource)) {
				lblSavedOrStillErroneous.setForeground(SWTResourceManager.getColor(0, 102, 0));
				lblSavedOrStillErroneous.setText("Successfully saved.");
				lblSavedOrStillErroneous.pack();
			} else {
				lblSavedOrStillErroneous.setForeground(SWTResourceManager.getColor(255, 0, 0));
				lblSavedOrStillErroneous.setText("Guard value contains error and cannot be saved.");
				lblSavedOrStillErroneous.pack();
			}
		} else {
			lblSavedOrStillErroneous.setForeground(SWTResourceManager.getColor(255, 0, 0));
			lblSavedOrStillErroneous.setText("Guard value contains error and cannot be saved.");
			lblSavedOrStillErroneous.pack();
		}
	}

	private static boolean hasDanglingRefs(XtextResource xtextResource2) {
		return EcoreUtil.UnresolvedProxyCrossReferencer.find(xtextResource2).size() > 0;
	}

	private static boolean reconcile(Resource resourceInSirius, XtextResource resourceInEmbeddedEditor) {
		try {

			IComparisonScope scope = new DefaultComparisonScope(resourceInSirius, resourceInEmbeddedEditor, null);
			final Comparison comparison = EMFCompare.builder().build().compare(scope);

			IMerger.Registry mergerRegistry = EMFCompareRCPPlugin.getDefault().getMergerRegistry();
			final IBatchMerger merger = new BatchMerger(mergerRegistry);

			final TransactionalEditingDomain editingDomain = TransactionUtil.getEditingDomain(originalResource);
			editingDomain.getCommandStack()
					.execute(new RecordingCommand(editingDomain, "update resource after direct text edit") {

						@Override
						protected void doExecute() {
							merger.copyAllRightToLeft(comparison.getDifferences(), new BasicMonitor());
						}
					});
		} catch (Exception e) {
			Activator.logError(e);
			return false;
		}
		return true;
	}

}

private boolean reconcile(Resource resourceInSirius, XtextResource resourceInEmbeddedEditor) {
		try {

			IComparisonScope scope = new DefaultComparisonScope(resourceInSirius, resourceInEmbeddedEditor, null);
			final Comparison comparison = EMFCompare.builder().build().compare(scope);

			IMerger.Registry mergerRegistry = EMFCompareRCPPlugin.getDefault().getMergerRegistry();
			final IBatchMerger merger = new BatchMerger(mergerRegistry);

			final TransactionalEditingDomain editingDomain = TransactionUtil.getEditingDomain(originalResource);
			editingDomain.getCommandStack()
					.execute(new RecordingCommand(editingDomain, "update resource after direct text edit") {

						@Override
						protected void doExecute() {

							
									merger.copyAllRightToLeft(comparison.getDifferences(), new BasicMonitor());
                                                                         /******************THIS TRY BLOCK BELOW IS WHAT I ADDED ********************/
									try {
										resourceInSirius.save(SaveOptions.newBuilder().format().getOptions().toOptionsMap());
									} catch (IOException e) {
										e.printStackTrace();
									}
						}
					});
		} catch (Exception e) {
			Activator.logError(e);
			return false;
		}
		return true;
	}

private boolean reconcile(Resource resourceInSirius, XtextResource resourceInEmbeddedEditor) {
		try {

			IComparisonScope scope = new DefaultComparisonScope(resourceInSirius, resourceInEmbeddedEditor, null);
			final Comparison comparison = EMFCompare.builder().build().compare(scope);

			IMerger.Registry mergerRegistry = EMFCompareRCPPlugin.getDefault().getMergerRegistry();
			final IBatchMerger merger = new BatchMerger(mergerRegistry);

			final TransactionalEditingDomain editingDomain = TransactionUtil.getEditingDomain(originalResource);
			editingDomain.getCommandStack()
					.execute(new RecordingCommand(editingDomain, "update resource after direct text edit") {
						@Override
						protected void doExecute() {
							IXtextDocument xTextDoc = editor.getDocument();
							xTextDoc.modify(new IUnitOfWork.Void<XtextResource>() {

								@Override
								public void process(XtextResource state) throws Exception {
									merger.copyAllRightToLeft(comparison.getDifferences(), new BasicMonitor());
								}
							});					
					    }
					});
		} catch (Exception e) {
			Activator.logError(e);
			return false;
		}
		return true;
	}

public static final String SYNTHETIC_SCHEME = "synthetic";
	XtextResource xtextResouce = null;

	@Inject
	private IResourceSetProvider resourceSetProvider;

	@Inject
	private FileExtensionProvider ext;

	public XtextResource createResource(EObject element) {
		ResourceSet resourceSet = resourceSetProvider.get(null);

		Resource originalResource = element.eResource();

		EObject semanticElement = EcoreUtil.copy(originalResource.getContents().get(0));

		try {
			xtextResouce = createVirtualXtextResource(originalResource.getURI(), semanticElement);
		} catch (IOException e) {
			// TODO Auto-generated catch block
			e.printStackTrace();
		}
		resourceSet.getResources().add(xtextResouce);
		return xtextResouce;

	}

	public EObject getObject(EObject element) {
		// ResourceSet resourceSet = resourceSetProvider.get(null);
		System.out.println(ModelUtils.getTextForModelObjects(element).trim());
		return this.xtextResouce.getEObject(element.eResource().getURI().toString());

	}

	protected XtextResource createVirtualXtextResource(URI uri, EObject semanticElement) throws IOException {
		IResourceFactory resourceFactory = ModelUtils.getInjector().getInstance(IResourceFactory.class);
		// TODO use the synthetic scheme.
		XtextResourceSet rs = ModelUtils.getInjector().getInstance(XtextResourceSet.class);
		rs.setClasspathURIContext(getClass());
		// Create virtual resource
		XtextResource xtextVirtualResource = (XtextResource) resourceFactory
				.createResource(URI.createURI(uri.toString()));
		rs.getResources().add(xtextVirtualResource);

		// Populate virtual resource with the given semantic element to edit
		xtextVirtualResource.getContents().add(semanticElement);

		// Save and reparse in order to initialize virtual Xtext resource
		ByteArrayOutputStream out = new ByteArrayOutputStream();
		xtextVirtualResource.save(out, SaveOptions.newBuilder().format().getOptions().toOptionsMap());
		xtextVirtualResource.reparse(new String(out.toByteArray()));

		return xtextVirtualResource;
	}