| /******************************************************************************* |
| * Copyright (c) 2014, 2018 Willink Transformations and others. |
| * All rights reserved. This program and the accompanying materials |
| * are made available under the terms of the Eclipse Public License v2.0 |
| * which accompanies this distribution, and is available at |
| * http://www.eclipse.org/legal/epl-v20.html |
| * |
| * Contributors: |
| * E.D.Willink - Initial API and implementation |
| *******************************************************************************/ |
| package org.eclipse.ocl.examples.debug.delegate; |
| |
| import java.util.Map; |
| |
| import org.eclipse.emf.common.util.BasicDiagnostic; |
| import org.eclipse.emf.common.util.DiagnosticChain; |
| import org.eclipse.emf.ecore.EClass; |
| import org.eclipse.emf.ecore.EClassifier; |
| import org.eclipse.emf.ecore.EDataType; |
| import org.eclipse.emf.ecore.EObject; |
| import org.eclipse.emf.ecore.EOperation; |
| import org.eclipse.jdt.annotation.NonNull; |
| import org.eclipse.jdt.annotation.Nullable; |
| import org.eclipse.ocl.pivot.Constraint; |
| import org.eclipse.ocl.pivot.ExpressionInOCL; |
| import org.eclipse.ocl.pivot.NamedElement; |
| import org.eclipse.ocl.pivot.Operation; |
| import org.eclipse.ocl.pivot.Type; |
| import org.eclipse.ocl.pivot.evaluation.AbstractConstraintEvaluator; |
| import org.eclipse.ocl.pivot.evaluation.EvaluationException; |
| import org.eclipse.ocl.pivot.evaluation.EvaluationVisitor; |
| import org.eclipse.ocl.pivot.internal.delegate.InvocationBehavior; |
| import org.eclipse.ocl.pivot.internal.delegate.OCLDelegateDomain; |
| import org.eclipse.ocl.pivot.internal.delegate.OCLDelegateException; |
| import org.eclipse.ocl.pivot.internal.delegate.ValidationDelegate; |
| import org.eclipse.ocl.pivot.internal.messages.PivotMessagesInternal; |
| import org.eclipse.ocl.pivot.utilities.ClassUtil; |
| import org.eclipse.ocl.pivot.utilities.LabelUtil; |
| import org.eclipse.ocl.pivot.utilities.MetamodelManager; |
| import org.eclipse.ocl.pivot.utilities.NameUtil; |
| import org.eclipse.ocl.pivot.utilities.OCL; |
| import org.eclipse.ocl.pivot.utilities.SemanticException; |
| import org.eclipse.ocl.pivot.utilities.StringUtil; |
| import org.eclipse.ocl.pivot.values.InvalidValueException; |
| |
| /** |
| * An implementation of the dynamic validation delegate API, maintaining a cache |
| * of compiled constraints and invariants. |
| */ |
| public class OCLValidationDelegate implements ValidationDelegate |
| { |
| protected static class CheckingConstraintEvaluator extends AbstractConstraintEvaluator<Boolean> |
| { |
| protected final @NonNull EClassifier eClassifier; |
| |
| protected CheckingConstraintEvaluator(@NonNull EClassifier eClassifier, @NonNull ExpressionInOCL query) { |
| super(query); |
| this.eClassifier = eClassifier; |
| } |
| |
| @Override |
| public Boolean evaluate(@NonNull EvaluationVisitor evaluationVisitor) { |
| if (!isBooleanConstraint()) { |
| String objectLabel = LabelUtil.getLabel(query.getType()); |
| String checkMessage = StringUtil.bind(PivotMessagesInternal.ValidationConstraintIsNotBooleanType_ERROR_, getConstraintTypeName(), getConstraintName(), objectLabel); |
| throw new OCLDelegateException(new EvaluationException(checkMessage)); |
| } |
| return super.evaluate(evaluationVisitor); |
| } |
| |
| @Override |
| protected String getObjectLabel() { |
| return LabelUtil.getLabel(eClassifier, null, null); |
| } |
| |
| @Override |
| protected Boolean handleExceptionResult(@NonNull Throwable e) { |
| throw new OCLDelegateException(new EvaluationException(e, PivotMessagesInternal.ValidationResultIsInvalid_ERROR_, |
| getConstraintTypeName(), getConstraintName(), getObjectLabel(), e.toString())); |
| } |
| |
| @Override |
| protected Boolean handleFailureResult(@Nullable Object result) { |
| if (result == null) { |
| String message = getConstraintResultMessage(result); |
| throw new OCLDelegateException(new EvaluationException(message)); |
| } |
| else { |
| return Boolean.FALSE; |
| } |
| } |
| |
| @Override |
| protected Boolean handleInvalidExpression(@NonNull String message) { |
| throw new OCLDelegateException(new EvaluationException(message)); |
| } |
| |
| @Override |
| protected Boolean handleInvalidResult(@NonNull InvalidValueException e) { |
| throw new OCLDelegateException(new EvaluationException(e, PivotMessagesInternal.ValidationResultIsInvalid_ERROR_, |
| getConstraintTypeName(), getConstraintName(), getObjectLabel(), e.getLocalizedMessage())); |
| } |
| |
| @Override |
| protected Boolean handleSuccessResult() { |
| return Boolean.TRUE; |
| } |
| } |
| |
| protected final @NonNull OCLDelegateDomain delegateDomain; |
| protected final @NonNull EClassifier eClassifier; |
| |
| /** |
| * Initializes me with the classifier whose DelegateEClassifierAdapter delegates to me. |
| * |
| * @param classifier |
| * my classifier |
| */ |
| public OCLValidationDelegate(@NonNull OCLDelegateDomain delegateDomain, @NonNull EClassifier classifier) { |
| this.delegateDomain = delegateDomain; |
| this.eClassifier = classifier; |
| } |
| |
| public @NonNull ExpressionInOCL getExpressionInOCL(@NonNull MetamodelManager metamodelManager, @NonNull Constraint constraint) { |
| ExpressionInOCL query = null; |
| Type contextType = (Type) constraint.getContext(); |
| if (contextType != null) { |
| query = ValidationBehavior.INSTANCE.getQueryOrThrow(metamodelManager, constraint); |
| } |
| if (query == null) { |
| String message = StringUtil.bind(PivotMessagesInternal.MissingBodyForInvocationDelegate_ERROR_, constraint.getContext()); |
| throw new OCLDelegateException(new SemanticException(message)); |
| } |
| return query; |
| } |
| |
| @Override |
| public String toString() { |
| return "<" + delegateDomain.getURI() + ":validate> " + eClassifier.getEPackage().getName() + "::" + eClassifier.getName(); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$ |
| } |
| |
| public boolean validate(EClass eClass, EObject eObject, |
| Map<Object, Object> context, EOperation invariant, String expression) { |
| if (eClass == null) { |
| throw new NullPointerException("Null EClass"); |
| } |
| if (eObject == null) { |
| throw new NullPointerException("Null EObject"); |
| } |
| MetamodelManager metamodelManager = delegateDomain.getMetamodelManager(); |
| NamedElement namedElement = delegateDomain.getPivot(NamedElement.class, ClassUtil.nonNullEMF(invariant)); |
| if (namedElement instanceof Operation) { |
| Operation operation = (Operation)namedElement; |
| ExpressionInOCL query = InvocationBehavior.INSTANCE.getQueryOrThrow(metamodelManager, operation); |
| InvocationBehavior.INSTANCE.validate(operation); |
| return validateExpressionInOCL(eClass, eObject, null, context, invariant.getName(), null, 0, query); |
| } |
| else if (namedElement instanceof Constraint) { |
| Constraint constraint = (Constraint)namedElement; |
| ExpressionInOCL query = getExpressionInOCL(metamodelManager, constraint); |
| ValidationBehavior.INSTANCE.validate(constraint); |
| return validateExpressionInOCL(eClass, eObject, null, context, |
| invariant.getName(), null, 0, query); |
| } |
| else if (namedElement != null) { |
| throw new ClassCastException(namedElement.getClass().getName() + " does not provide a Constraint"); |
| } |
| else { |
| throw new ClassCastException(invariant.eClass().getName() + " does not provide a Constraint"); |
| } |
| } |
| |
| public boolean validate(@NonNull EClass eClass, @NonNull EObject eObject, @Nullable DiagnosticChain diagnostics, |
| Map<Object, Object> context, @NonNull EOperation invariant, String expression, int severity, String source, int code) { |
| MetamodelManager metamodelManager = delegateDomain.getMetamodelManager(); |
| NamedElement namedElement = delegateDomain.getPivot(NamedElement.class, ClassUtil.nonNullEMF(invariant)); |
| if (namedElement instanceof Operation) { |
| Operation operation = (Operation)namedElement; |
| ExpressionInOCL query = InvocationBehavior.INSTANCE.getQueryOrThrow(metamodelManager, operation); |
| InvocationBehavior.INSTANCE.validate(operation); |
| return validateExpressionInOCL(eClass, eObject, null, context, invariant.getName(), null, 0, query); |
| } |
| else if (namedElement instanceof Constraint) { |
| Constraint constraint = (Constraint)namedElement; |
| ExpressionInOCL query = getExpressionInOCL(metamodelManager, constraint); |
| ValidationBehavior.INSTANCE.validate(constraint); |
| return validateExpressionInOCL(eClass, eObject, diagnostics, context, |
| invariant.getName(), source, code, query); |
| } |
| else if (namedElement != null) { |
| throw new ClassCastException(namedElement.getClass().getName() + " does not provide a Constraint"); |
| } |
| else { |
| throw new ClassCastException(invariant.eClass().getName() + " does not provide a Constraint"); |
| } |
| } |
| |
| public boolean validate(EClass eClass, EObject eObject, |
| Map<Object, Object> context, String constraintName, String expression) { |
| if (eClass == null) { |
| throw new NullPointerException("Null EClass"); |
| } |
| if (eObject == null) { |
| throw new NullPointerException("Null EObject"); |
| } |
| if (constraintName == null) { |
| throw new NullPointerException("Null constraint name"); |
| } |
| return validatePivot(eClass, eObject, null, context, constraintName, null, 0); |
| } |
| |
| public boolean validate(@NonNull EClass eClass, @NonNull EObject eObject, @Nullable DiagnosticChain diagnostics, Map<Object, Object> context, |
| @NonNull String constraintName, String expression, int severity, String source, int code) { |
| return validatePivot(eClass, eObject, diagnostics, context, constraintName, source, code); |
| } |
| |
| public boolean validate(EDataType eDataType, Object value, |
| Map<Object, Object> context, String constraintName, String expression) { |
| if (eDataType == null) { |
| throw new NullPointerException("Null EClass"); |
| } |
| if (value == null) { |
| throw new NullPointerException("Null EObject"); |
| } |
| if (constraintName == null) { |
| throw new NullPointerException("Null constraint name"); |
| } |
| return validatePivot(eDataType, value, null, context, constraintName, null, 0); |
| } |
| |
| public boolean validate(@NonNull EDataType eDataType, @NonNull Object value, @Nullable DiagnosticChain diagnostics, Map<Object, Object> context, |
| @NonNull String constraintName, String expression, int severity, String source, int code) { |
| return validatePivot(eDataType, value, diagnostics, context, constraintName, source, code); |
| } |
| |
| protected boolean validateExpressionInOCL(final @NonNull EClassifier eClassifier, final @NonNull Object value, final @Nullable DiagnosticChain diagnostics, |
| final Map<Object, Object> context, String constraintName, final String source, final int code, @NonNull ExpressionInOCL query) { |
| AbstractConstraintEvaluator<Boolean> constraintEvaluator = new CheckingConstraintEvaluator(eClassifier, query) |
| { |
| @Override |
| protected String getObjectLabel() { |
| return NameUtil.qualifiedNameFor(value); |
| // return ClassUtil.getLabel(eClassifier, value, context); |
| } |
| |
| @Override |
| protected Boolean handleFailureResult(@Nullable Object result) { |
| if (result == null) { |
| String message = getConstraintResultMessage(result); |
| throw new OCLDelegateException(new EvaluationException(message)); |
| } |
| if (diagnostics != null) { |
| String message = getConstraintResultMessage(result); |
| int severity = getConstraintResultSeverity(result); |
| diagnostics.add(new BasicDiagnostic(severity, source, code, message, new Object [] { value })); |
| } |
| return Boolean.FALSE; |
| } |
| }; |
| OCL ocl = delegateDomain.getOCL(); |
| EvaluationVisitor evaluationVisitor = ocl.createEvaluationVisitor(value, query); |
| return constraintEvaluator.evaluate(evaluationVisitor); |
| } |
| |
| protected boolean validatePivot(@NonNull EClassifier eClassifier, @NonNull Object value, @Nullable DiagnosticChain diagnostics, |
| Map<Object, Object> context, @NonNull String constraintName, String source, int code) { |
| MetamodelManager metamodelManager = delegateDomain.getMetamodelManager(); |
| Type type = delegateDomain.getPivot(Type.class, eClassifier); |
| Constraint constraint = ValidationBehavior.INSTANCE.getConstraint(metamodelManager, eClassifier, constraintName); |
| if (constraint == null) { |
| String message = StringUtil.bind(PivotMessagesInternal.MissingBodyForInvocationDelegate_ERROR_, type); |
| throw new OCLDelegateException(new SemanticException(message)); |
| } |
| ExpressionInOCL query = null; |
| if (type != null) { |
| query = ValidationBehavior.INSTANCE.getQueryOrThrow(metamodelManager, constraint); |
| } |
| if (query == null) { |
| String message = StringUtil.bind(PivotMessagesInternal.MissingBodyForInvocationDelegate_ERROR_, type); |
| throw new OCLDelegateException(new SemanticException(message)); |
| } |
| return validateExpressionInOCL(eClassifier, value, diagnostics, context, |
| constraintName, source, code, query); |
| } |
| } |