X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;ds=sidebyside;f=bundles%2Forg.simantics.db.layer0%2Fsrc%2Forg%2Fsimantics%2Fdb%2Flayer0%2Fscl%2FCompileResourceValueRequest.java;h=c8d168f50320b547966e8bccb95d5473bf071ac5;hb=0ae2b770234dfc3cbb18bd38f324125cf0faca07;hp=feee7961768850940abba331487a38eb4f6adc4a;hpb=24e2b34260f219f0d1644ca7a138894980e25b14;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileResourceValueRequest.java b/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileResourceValueRequest.java index feee79617..c8d168f50 100644 --- a/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileResourceValueRequest.java +++ b/bundles/org.simantics.db.layer0/src/org/simantics/db/layer0/scl/CompileResourceValueRequest.java @@ -1,109 +1,109 @@ -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.CompileResourceValueRequest.CompilationContext; -import org.simantics.db.layer0.util.RuntimeEnvironmentRequest; -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 Antti Villberg - */ -public class CompileResourceValueRequest extends AbstractExpressionCompilationRequest { - - public static class CompilationContext extends AbstractExpressionCompilationContext { - public CompilationContext(RuntimeEnvironment runtimeEnvironment) { - super(runtimeEnvironment); - } - } - - protected final Resource literal; - - public CompileResourceValueRequest(Resource literal) { - this.literal = literal; - } - - public static Object compileAndEvaluate(ReadGraph graph, Resource literal) throws DatabaseException { - SCLContext sclContext = SCLContext.getCurrent(); - Object oldGraph = sclContext.get("graph"); - try { - Function1 exp = graph.syncRequest(new CompileResourceValueRequest(literal), - TransientCacheListener.>instance()); - sclContext.put("graph", graph); - return exp.apply(literal); - } 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(literal, L0.HasValueType, 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 RESOURCE; - } - - @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.CompileResourceValueRequest.CompilationContext; +import org.simantics.db.layer0.util.RuntimeEnvironmentRequest; +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 Antti Villberg + */ +public class CompileResourceValueRequest extends AbstractExpressionCompilationRequest { + + public static class CompilationContext extends AbstractExpressionCompilationContext { + public CompilationContext(RuntimeEnvironment runtimeEnvironment) { + super(runtimeEnvironment); + } + } + + protected final Resource literal; + + public CompileResourceValueRequest(Resource literal) { + this.literal = literal; + } + + public static Object compileAndEvaluate(ReadGraph graph, Resource literal) throws DatabaseException { + SCLContext sclContext = SCLContext.getCurrent(); + Object oldGraph = sclContext.get("graph"); + try { + Function1 exp = graph.syncRequest(new CompileResourceValueRequest(literal), + TransientCacheListener.>instance()); + sclContext.put("graph", graph); + return exp.apply(literal); + } 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(literal, L0.HasValueType, 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 RESOURCE; + } + + @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; + } + +}