--- /dev/null
+package org.simantics.modeling.adapters;\r
+\r
+import org.simantics.browsing.ui.model.tests.Test;\r
+import org.simantics.db.ReadGraph;\r
+import org.simantics.db.Resource;\r
+import org.simantics.db.exception.DatabaseException;\r
+import org.simantics.db.layer0.variable.Variable;\r
+import org.simantics.db.layer0.variable.Variables;\r
+import org.simantics.modeling.ModelingResources;\r
+import org.simantics.scl.runtime.SCLContext;\r
+import org.simantics.scl.runtime.function.Function1;\r
+\r
+public class SCLTest implements Test {\r
+\r
+ private Resource rule;\r
+ \r
+ public SCLTest(ReadGraph graph, Resource rule) {\r
+ this.rule = rule;\r
+ }\r
+ \r
+ @Override\r
+ public boolean isCompatible(Class<?> contentType) {\r
+ return contentType.equals(Resource.class) || contentType.equals(Variable.class);\r
+ }\r
+\r
+ @Override\r
+ public boolean test(ReadGraph graph, Object content) throws DatabaseException {\r
+ \r
+ ModelingResources MOD = ModelingResources.getInstance(graph);\r
+ \r
+ Variable ruleVariable = Variables.getVariable(graph, rule);\r
+ Function1<Object,Boolean> test = ruleVariable.getPossiblePropertyValue(graph, MOD.SCLTest_test);\r
+ if(test == null) return false;\r
+\r
+ SCLContext sclContext = SCLContext.getCurrent();\r
+ Object oldGraph = sclContext.get("graph");\r
+ try {\r
+ sclContext.put("graph", graph);\r
+ Object value = test.apply((Resource)content);\r
+ return (Boolean)value;\r
+ } catch (Throwable t) {\r
+ throw new DatabaseException(t);\r
+ } finally {\r
+ sclContext.put("graph", oldGraph);\r
+ }\r
+ \r
+ }\r
+\r
+}\r