X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.db.layer0%2Fsrc%2Forg%2Fsimantics%2Fdb%2Flayer0%2Fscl%2FCompileValueRequest.java;h=e1804d790fc327c6713cc5e7bdf41b78b84c8b91;hb=a52f0324c9435755d3da3f053794c077f7d58213;hp=bdbf4f3784a5014ea9864fc67462dbd4dfa9b4d7;hpb=969bd23cab98a79ca9101af33334000879fb60c5;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileValueRequest.java b/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileValueRequest.java index bdbf4f378..e1804d790 100644 --- a/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileValueRequest.java +++ b/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileValueRequest.java @@ -1,120 +1,120 @@ -package org.simantics.db.layer0.scl; - -import org.simantics.databoard.Bindings; -import org.simantics.db.ReadGraph; -import org.simantics.db.Resource; -import org.simantics.db.common.procedure.adapter.TransientCacheListener; -import org.simantics.db.common.request.IndexRoot; -import org.simantics.db.exception.DatabaseException; -import org.simantics.db.layer0.scl.CompileValueRequest.CompilationContext; -import org.simantics.db.layer0.util.RuntimeEnvironmentRequest; -import org.simantics.db.layer0.variable.Variable; -import org.simantics.layer0.Layer0; -import org.simantics.scl.compiler.elaboration.expressions.EVariable; -import org.simantics.scl.compiler.elaboration.expressions.Expression; -import org.simantics.scl.compiler.environment.Environments; -import org.simantics.scl.compiler.runtime.RuntimeEnvironment; -import org.simantics.scl.compiler.top.SCLExpressionCompilationException; -import org.simantics.scl.compiler.types.Type; -import org.simantics.scl.runtime.SCLContext; -import org.simantics.scl.runtime.function.Function1; - -/** - * Compiles an SCL expression that is attached to a literal - * whose parent is a component that is a part of a component type. - * - * @author Tuukka Lehtonen - */ -public class CompileValueRequest extends AbstractExpressionCompilationRequest { - - public static class CompilationContext extends AbstractExpressionCompilationContext { - public CompilationContext(RuntimeEnvironment runtimeEnvironment) { - super(runtimeEnvironment); - } - } - - protected final Resource relation; - protected final Resource component; - protected final Resource literal; - - public CompileValueRequest(Resource component, Resource literal, Resource relation) { - this.relation = relation; - this.component = component; - this.literal = literal; - } - - public CompileValueRequest(ReadGraph graph, Variable context) throws DatabaseException { - this(context.getParent(graph).getRepresents(graph), - context.getRepresents(graph), - context.getPredicateResource(graph)); - } - - public static Object compileAndEvaluate(ReadGraph graph, Variable context) throws DatabaseException { - SCLContext sclContext = SCLContext.getCurrent(); - Object oldGraph = sclContext.get("graph"); - try { - Function1 exp = graph.syncRequest(new CompileValueRequest(graph, context), - TransientCacheListener.>instance()); - sclContext.put("graph", graph); - return exp.apply(context); - } catch (DatabaseException e) { - throw (DatabaseException)e; - } catch (Throwable t) { - throw new DatabaseException(t); - } finally { - sclContext.put("graph", oldGraph); - } - } - - @Override - protected String getExpressionText(ReadGraph graph) - throws DatabaseException { - Layer0 L0 = Layer0.getInstance(graph); - return graph.getRelatedValue(literal, L0.SCLValue_expression, Bindings.STRING); - } - - protected Resource getIndexRoot(ReadGraph graph) throws DatabaseException { - return graph.syncRequest(new IndexRoot(literal)); - } - - @Override - protected Type getExpectedType(ReadGraph graph, CompilationContext context) - throws DatabaseException { - Layer0 L0 = Layer0.getInstance(graph); - String valueType = graph.getPossibleRelatedValue(relation, L0.RequiresValueType, Bindings.STRING); - if(valueType != null) { - try { - return Environments.getType(context.runtimeEnvironment.getEnvironment(), valueType); - } catch (SCLExpressionCompilationException e) { - e.printStackTrace(); - } - } - return super.getExpectedType(graph, context); - } - - @Override - protected CompilationContext getCompilationContext(ReadGraph graph) - throws DatabaseException { - Resource indexRoot = getIndexRoot(graph); - RuntimeEnvironment runtimeEnvironment = graph.syncRequest(new RuntimeEnvironmentRequest(indexRoot)); - return new CompilationContext(runtimeEnvironment); - } - - @Override - protected Type getContextVariableType() { - return VARIABLE; - } - - @Override - protected Expression getVariableAccessExpression( - ReadGraph graph, - CompilationContext context, - org.simantics.scl.compiler.elaboration.expressions.Variable contextVariable, - String name) throws DatabaseException { - if(name.equals("self")) - return new EVariable(contextVariable); - else - return null; - } - -} +package org.simantics.db.layer0.scl; + +import org.simantics.databoard.Bindings; +import org.simantics.db.ReadGraph; +import org.simantics.db.Resource; +import org.simantics.db.common.procedure.adapter.TransientCacheListener; +import org.simantics.db.common.request.IndexRoot; +import org.simantics.db.exception.DatabaseException; +import org.simantics.db.layer0.scl.CompileValueRequest.CompilationContext; +import org.simantics.db.layer0.util.RuntimeEnvironmentRequest; +import org.simantics.db.layer0.variable.Variable; +import org.simantics.layer0.Layer0; +import org.simantics.scl.compiler.elaboration.expressions.EVariable; +import org.simantics.scl.compiler.elaboration.expressions.Expression; +import org.simantics.scl.compiler.environment.Environments; +import org.simantics.scl.compiler.runtime.RuntimeEnvironment; +import org.simantics.scl.compiler.top.SCLExpressionCompilationException; +import org.simantics.scl.compiler.types.Type; +import org.simantics.scl.runtime.SCLContext; +import org.simantics.scl.runtime.function.Function1; + +/** + * Compiles an SCL expression that is attached to a literal + * whose parent is a component that is a part of a component type. + * + * @author Tuukka Lehtonen + */ +public class CompileValueRequest extends AbstractExpressionCompilationRequest { + + public static class CompilationContext extends AbstractExpressionCompilationContext { + public CompilationContext(RuntimeEnvironment runtimeEnvironment) { + super(runtimeEnvironment); + } + } + + protected final Resource relation; + protected final Resource component; + protected final Resource literal; + + public CompileValueRequest(Resource component, Resource literal, Resource relation) { + this.relation = relation; + this.component = component; + this.literal = literal; + } + + public CompileValueRequest(ReadGraph graph, Variable context) throws DatabaseException { + this(context.getParent(graph).getRepresents(graph), + context.getRepresents(graph), + context.getPredicateResource(graph)); + } + + public static Object compileAndEvaluate(ReadGraph graph, Variable context) throws DatabaseException { + SCLContext sclContext = SCLContext.getCurrent(); + Object oldGraph = sclContext.get("graph"); + try { + Function1 exp = graph.syncRequest(new CompileValueRequest(graph, context), + TransientCacheListener.>instance()); + sclContext.put("graph", graph); + return exp.apply(context); + } catch (DatabaseException e) { + throw (DatabaseException)e; + } catch (Throwable t) { + throw new DatabaseException(t); + } finally { + sclContext.put("graph", oldGraph); + } + } + + @Override + protected String getExpressionText(ReadGraph graph) + throws DatabaseException { + Layer0 L0 = Layer0.getInstance(graph); + return graph.getRelatedValue(literal, L0.SCLValue_expression, Bindings.STRING); + } + + protected Resource getIndexRoot(ReadGraph graph) throws DatabaseException { + return graph.syncRequest(new IndexRoot(literal)); + } + + @Override + protected Type getExpectedType(ReadGraph graph, CompilationContext context) + throws DatabaseException { + Layer0 L0 = Layer0.getInstance(graph); + String valueType = graph.getPossibleRelatedValue(relation, L0.RequiresValueType, Bindings.STRING); + if(valueType != null) { + try { + return Environments.getType(context.runtimeEnvironment.getEnvironment(), valueType); + } catch (SCLExpressionCompilationException e) { + e.printStackTrace(); + } + } + return super.getExpectedType(graph, context); + } + + @Override + protected CompilationContext getCompilationContext(ReadGraph graph) + throws DatabaseException { + Resource indexRoot = getIndexRoot(graph); + RuntimeEnvironment runtimeEnvironment = graph.syncRequest(new RuntimeEnvironmentRequest(indexRoot)); + return new CompilationContext(runtimeEnvironment); + } + + @Override + protected Type getContextVariableType() { + return VARIABLE; + } + + @Override + protected Expression getVariableAccessExpression( + ReadGraph graph, + CompilationContext context, + org.simantics.scl.compiler.elaboration.expressions.Variable contextVariable, + String name) throws DatabaseException { + if(name.equals("self")) + return new EVariable(contextVariable); + else + return null; + } + +}