1 package org.simantics.scl.db;
3 import java.io.IOException;
5 import org.cojen.classfile.TypeDesc;
6 import org.simantics.Simantics;
7 import org.simantics.db.ReadGraph;
8 import org.simantics.db.Resource;
9 import org.simantics.db.VirtualGraph;
10 import org.simantics.db.WriteGraph;
11 import org.simantics.db.common.procedure.adapter.SyncListenerAdapter;
12 import org.simantics.db.common.procedure.adapter.TransientCacheAsyncListener;
13 import org.simantics.db.common.request.BinaryRead;
14 import org.simantics.db.common.request.DelayedWriteRequest;
15 import org.simantics.db.common.request.ReadRequest;
16 import org.simantics.db.common.request.WriteRequest;
17 import org.simantics.db.common.request.WriteResultRequest;
18 import org.simantics.db.exception.DatabaseException;
19 import org.simantics.db.layer0.util.Layer0Utils;
20 import org.simantics.db.layer0.variable.Variables;
21 import org.simantics.db.request.Read;
22 import org.simantics.db.service.ClusterControl;
23 import org.simantics.db.service.SerialisationSupport;
24 import org.simantics.db.service.VirtualGraphSupport;
25 import org.simantics.layer0.utils.triggers.IActivationManager;
26 import org.simantics.scl.compiler.environment.specification.EnvironmentSpecification;
27 import org.simantics.scl.compiler.errors.Failable;
28 import org.simantics.scl.compiler.internal.codegen.types.JavaTypeTranslator;
29 import org.simantics.scl.compiler.module.Module;
30 import org.simantics.scl.compiler.module.repository.ImportFailureException;
31 import org.simantics.scl.compiler.runtime.RuntimeEnvironment;
32 import org.simantics.scl.compiler.types.Type;
33 import org.simantics.scl.osgi.SCLOsgi;
34 import org.simantics.scl.runtime.SCLContext;
35 import org.simantics.scl.runtime.function.Function;
36 import org.simantics.scl.runtime.function.Function1;
37 import org.simantics.scl.runtime.tuple.Tuple;
38 import org.simantics.scl.runtime.tuple.Tuple0;
39 import org.simantics.utils.DataContainer;
41 @SuppressWarnings({"rawtypes", "unchecked"})
42 public class SCLFunctions {
44 public static final String GRAPH = "graph";
46 public static <T> T safeExec(final Function f) {
48 return (T)f.apply(Tuple0.INSTANCE);
49 } catch (Throwable t) {
55 public static void asyncRead(final Function f) throws DatabaseException {
56 final SCLContext context = SCLContext.getCurrent();
57 Object graph = context.get(GRAPH);
59 f.apply(Tuple0.INSTANCE);
61 Simantics.getSession().asyncRequest(new ReadRequest() {
63 public void run(ReadGraph graph) throws DatabaseException {
64 SCLContext.push(context);
65 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
67 f.apply(Tuple0.INSTANCE);
69 context.put(GRAPH, oldGraph);
77 public static <T> T syncRead(final Function f) throws DatabaseException {
78 final SCLContext context = SCLContext.getCurrent();
79 Object graph = context.get(GRAPH);
81 return (T)f.apply(Tuple0.INSTANCE);
83 return Simantics.getSession().syncRequest(new Read<T>() {
85 public T perform(ReadGraph graph) throws DatabaseException {
86 SCLContext.push(context);
87 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
89 return (T)f.apply(Tuple0.INSTANCE);
91 context.put(GRAPH, oldGraph);
99 public static void asyncWrite(final Function f) throws DatabaseException {
100 final SCLContext context = SCLContext.getCurrent();
101 Object graph = context.get(GRAPH);
103 f.apply(Tuple0.INSTANCE);
105 Simantics.getSession().asyncRequest(new WriteRequest() {
107 public void perform(WriteGraph graph) throws DatabaseException {
108 SCLContext.push(context);
109 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
111 f.apply(Tuple0.INSTANCE);
113 context.put(GRAPH, oldGraph);
121 public static <T> T syncWrite(final Function f) throws DatabaseException {
122 final SCLContext context = SCLContext.getCurrent();
123 Object graph = context.get(GRAPH);
125 return (T)f.apply(Tuple0.INSTANCE);
127 return Simantics.getSession().syncRequest(new WriteResultRequest<T>() {
129 public T perform(WriteGraph graph) throws DatabaseException {
130 SCLContext.push(context);
131 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
133 return (T)f.apply(Tuple0.INSTANCE);
135 context.put(GRAPH, oldGraph);
143 public static <T> T delayedSyncWrite(final Function f) throws DatabaseException {
144 final SCLContext context = SCLContext.getCurrent();
145 final DataContainer<T> dc = new DataContainer<T>(null);
147 DelayedWriteRequest request = new DelayedWriteRequest() {
149 public void perform(WriteGraph graph) throws DatabaseException {
150 final SCLContext context = SCLContext.getCurrent();
151 SCLContext.push(context);
152 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
154 dc.set((T)f.apply(Tuple0.INSTANCE));
156 context.put(GRAPH, oldGraph);
162 Object graph = context.get(GRAPH);
164 if (graph instanceof WriteGraph) {
165 ((WriteGraph)graph).syncRequest(request);
167 throw new DatabaseException("Caller is inside a read transaction.");
170 Simantics.getSession().syncRequest(request);
175 public static <T> T virtualSyncWriteMem(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
176 final SCLContext context = SCLContext.getCurrent();
177 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
178 VirtualGraph vg = vgs.getMemoryPersistent(virtualGraphId);
179 return graph.syncRequest(new WriteResultRequest<T>(vg) {
181 public T perform(WriteGraph graph) throws DatabaseException {
182 SCLContext.push(context);
183 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
185 return (T)f.apply(Tuple0.INSTANCE);
187 context.put(GRAPH, oldGraph);
194 public static <T> T virtualSyncWriteWS(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
195 final SCLContext context = SCLContext.getCurrent();
196 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
197 VirtualGraph vg = vgs.getWorkspacePersistent(virtualGraphId);
198 return graph.syncRequest(new WriteResultRequest<T>(vg) {
200 public T perform(WriteGraph graph) throws DatabaseException {
201 SCLContext.push(context);
202 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
204 return (T)f.apply(Tuple0.INSTANCE);
206 context.put(GRAPH, oldGraph);
213 public static <T> T readValue(final String uri) throws DatabaseException {
214 return Simantics.getSession().syncRequest(new Read<T>() {
216 public T perform(ReadGraph graph) throws DatabaseException {
217 return Variables.getVariable(graph, uri).getValue(graph);
222 public static <T> void writeValue(final String uri, final T value) throws DatabaseException {
223 Simantics.getSession().syncRequest(new WriteRequest() {
225 public void perform(WriteGraph graph) throws DatabaseException {
226 Variables.getVariable(graph, uri).setValue(graph, value);
231 public static void activateOnce(Resource r) {
232 Simantics.getSession().getService(IActivationManager.class).activateOnce(r);
235 public static void syncActivateOnce(WriteGraph graph, Resource r) throws DatabaseException {
236 graph.getService(IActivationManager.class).activateOnce(graph, r);
239 public static Resource resourceFromId(ReadGraph graph, long id) throws DatabaseException, IOException {
240 SerialisationSupport ss = graph.getService(SerialisationSupport.class);
241 return ss.getResource(id);
244 public static void disableDependencies(WriteGraph graph) {
245 Layer0Utils.setDependenciesIndexingDisabled(graph, true);
248 public static void enableDependencies(WriteGraph graph) {
249 Layer0Utils.setDependenciesIndexingDisabled(graph, false);
252 public static void collectClusters() {
253 Simantics.getSession().getService(ClusterControl.class).collectClusters(Integer.MAX_VALUE);
256 public static class SCLUnaryRead extends BinaryRead<Function1<Object,Object>, Object, Object> {
258 public SCLUnaryRead(Function1<Object, Object> parameter1, Object parameter2) {
259 super(parameter1, parameter2);
263 public Object perform(ReadGraph graph) throws DatabaseException {
264 return Simantics.applySCLRead(graph, parameter, parameter2);
269 public static Object unaryQuery(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
270 return graph.syncRequest(new SCLUnaryRead(fn, value));
273 public static Object unaryQueryCached(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
274 return graph.syncRequest(new SCLUnaryRead(fn, value), TransientCacheAsyncListener.<Object>instance());
278 private static class Subquery implements Read<Object> {
281 public Subquery(Function q) {
286 public Object perform(ReadGraph graph) throws DatabaseException {
287 SCLContext sclContext = SCLContext.getCurrent();
288 Object oldGraph = sclContext.put("graph", graph);
290 return q.apply(Tuple0.INSTANCE);
291 } catch (Throwable e) {
292 if(e instanceof DatabaseException)
293 throw (DatabaseException)e;
295 throw new DatabaseException(e);
297 sclContext.put("graph", oldGraph);
302 public int hashCode() {
307 public boolean equals(Object obj) {
310 if(obj == null || obj.getClass() != getClass())
312 Subquery other = (Subquery)obj;
313 return q.equals(other.q);
317 public static Object subquery(ReadGraph graph, Function q) throws DatabaseException {
318 return graph.syncRequest(new Subquery(q));
321 public static Object subqueryC(ReadGraph graph, Function q) throws DatabaseException {
322 return graph.syncRequest(new Subquery(q), TransientCacheAsyncListener.<Object>instance());
325 public static void subqueryL(ReadGraph graph, Function query, Function executeCallback, Function1<Throwable, Tuple> exceptionCallback, Function1<Tuple0, Boolean> isDisposedCallback) throws DatabaseException {
326 graph.asyncRequest(new Subquery(query), new SyncListenerAdapter<Object>() {
329 public void execute(ReadGraph graph, Object result) {
330 executeCallback.apply(result);
334 public void exception(ReadGraph graph, Throwable t) {
335 exceptionCallback.apply(t);
339 public boolean isDisposed() {
340 return isDisposedCallback.apply(Tuple0.INSTANCE);
345 public static Object possibleFromDynamic(Type expectedType, String moduleName, Object value) {
350 Failable<Module> failable = SCLOsgi.MODULE_REPOSITORY.getModule(moduleName);
351 Module module = failable.getResult();
353 RuntimeEnvironment env = SCLOsgi.MODULE_REPOSITORY.createRuntimeEnvironment(
354 EnvironmentSpecification.of(moduleName, ""), module.getParentClassLoader());
356 JavaTypeTranslator tr = new JavaTypeTranslator(env.getEnvironment());
357 TypeDesc desc = tr.toTypeDesc(expectedType);
358 String className = desc.getFullName();
359 Class<?> clazz = env.getMutableClassLoader().loadClass(className);
360 if (!clazz.isAssignableFrom(value.getClass()))
363 } catch (ImportFailureException | ClassNotFoundException e) {