1 package org.simantics.scl.db;
3 import java.io.IOException;
5 import org.simantics.Simantics;
6 import org.simantics.db.ReadGraph;
7 import org.simantics.db.Resource;
8 import org.simantics.db.VirtualGraph;
9 import org.simantics.db.WriteGraph;
10 import org.simantics.db.common.procedure.adapter.TransientCacheAsyncListener;
11 import org.simantics.db.common.request.BinaryRead;
12 import org.simantics.db.common.request.DelayedWriteRequest;
13 import org.simantics.db.common.request.ReadRequest;
14 import org.simantics.db.common.request.WriteRequest;
15 import org.simantics.db.common.request.WriteResultRequest;
16 import org.simantics.db.exception.DatabaseException;
17 import org.simantics.db.layer0.util.Layer0Utils;
18 import org.simantics.db.layer0.variable.Variables;
19 import org.simantics.db.request.Read;
20 import org.simantics.db.service.ClusterControl;
21 import org.simantics.db.service.SerialisationSupport;
22 import org.simantics.db.service.VirtualGraphSupport;
23 import org.simantics.layer0.utils.triggers.IActivationManager;
24 import org.simantics.scl.runtime.SCLContext;
25 import org.simantics.scl.runtime.function.Function;
26 import org.simantics.scl.runtime.function.Function1;
27 import org.simantics.scl.runtime.tuple.Tuple0;
28 import org.simantics.utils.DataContainer;
30 @SuppressWarnings({"rawtypes", "unchecked"})
31 public class SCLFunctions {
33 public static final String GRAPH = "graph";
35 public static <T> T safeExec(final Function f) {
37 return (T)f.apply(Tuple0.INSTANCE);
38 } catch (Throwable t) {
44 public static void asyncRead(final Function f) throws DatabaseException {
45 final SCLContext context = SCLContext.getCurrent();
46 Object graph = context.get(GRAPH);
48 f.apply(Tuple0.INSTANCE);
50 Simantics.getSession().asyncRequest(new ReadRequest() {
52 public void run(ReadGraph graph) throws DatabaseException {
53 SCLContext.push(context);
54 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
56 f.apply(Tuple0.INSTANCE);
58 context.put(GRAPH, oldGraph);
66 public static <T> T syncRead(final Function f) throws DatabaseException {
67 final SCLContext context = SCLContext.getCurrent();
68 Object graph = context.get(GRAPH);
70 return (T)f.apply(Tuple0.INSTANCE);
72 return Simantics.getSession().syncRequest(new Read<T>() {
74 public T perform(ReadGraph graph) throws DatabaseException {
75 SCLContext.push(context);
76 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
78 return (T)f.apply(Tuple0.INSTANCE);
80 context.put(GRAPH, oldGraph);
88 public static void asyncWrite(final Function f) throws DatabaseException {
89 final SCLContext context = SCLContext.getCurrent();
90 Object graph = context.get(GRAPH);
92 f.apply(Tuple0.INSTANCE);
94 Simantics.getSession().asyncRequest(new WriteRequest() {
96 public void perform(WriteGraph graph) throws DatabaseException {
97 SCLContext.push(context);
98 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
100 f.apply(Tuple0.INSTANCE);
102 context.put(GRAPH, oldGraph);
110 public static <T> T syncWrite(final Function f) throws DatabaseException {
111 final SCLContext context = SCLContext.getCurrent();
112 Object graph = context.get(GRAPH);
114 return (T)f.apply(Tuple0.INSTANCE);
116 return Simantics.getSession().syncRequest(new WriteResultRequest<T>() {
118 public T perform(WriteGraph graph) throws DatabaseException {
119 SCLContext.push(context);
120 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
122 return (T)f.apply(Tuple0.INSTANCE);
124 context.put(GRAPH, oldGraph);
132 public static <T> T delayedSyncWrite(final Function f) throws DatabaseException {
133 final SCLContext context = SCLContext.getCurrent();
134 final DataContainer<T> dc = new DataContainer<T>(null);
136 DelayedWriteRequest request = new DelayedWriteRequest() {
138 public void perform(WriteGraph graph) throws DatabaseException {
139 final SCLContext context = SCLContext.getCurrent();
140 SCLContext.push(context);
141 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
143 dc.set((T)f.apply(Tuple0.INSTANCE));
145 context.put(GRAPH, oldGraph);
151 Object graph = context.get(GRAPH);
153 if (graph instanceof WriteGraph) {
154 ((WriteGraph)graph).syncRequest(request);
156 throw new DatabaseException("Caller is inside a read transaction.");
159 Simantics.getSession().syncRequest(request);
164 public static <T> T virtualSyncWriteMem(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
165 final SCLContext context = SCLContext.getCurrent();
166 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
167 VirtualGraph vg = vgs.getMemoryPersistent(virtualGraphId);
168 return graph.syncRequest(new WriteResultRequest<T>(vg) {
170 public T perform(WriteGraph graph) throws DatabaseException {
171 SCLContext.push(context);
172 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
174 return (T)f.apply(Tuple0.INSTANCE);
176 context.put(GRAPH, oldGraph);
183 public static <T> T virtualSyncWriteWS(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
184 final SCLContext context = SCLContext.getCurrent();
185 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
186 VirtualGraph vg = vgs.getWorkspacePersistent(virtualGraphId);
187 return graph.syncRequest(new WriteResultRequest<T>(vg) {
189 public T perform(WriteGraph graph) throws DatabaseException {
190 SCLContext.push(context);
191 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
193 return (T)f.apply(Tuple0.INSTANCE);
195 context.put(GRAPH, oldGraph);
202 public static <T> T readValue(final String uri) throws DatabaseException {
203 return Simantics.getSession().syncRequest(new Read<T>() {
205 public T perform(ReadGraph graph) throws DatabaseException {
206 return Variables.getVariable(graph, uri).getValue(graph);
211 public static <T> void writeValue(final String uri, final T value) throws DatabaseException {
212 Simantics.getSession().syncRequest(new WriteRequest() {
214 public void perform(WriteGraph graph) throws DatabaseException {
215 Variables.getVariable(graph, uri).setValue(graph, value);
220 public static void activateOnce(Resource r) {
221 Simantics.getSession().getService(IActivationManager.class).activateOnce(r);
224 public static void syncActivateOnce(WriteGraph graph, Resource r) throws DatabaseException {
225 graph.getService(IActivationManager.class).activateOnce(graph, r);
228 public static Resource resourceFromId(ReadGraph graph, long id) throws DatabaseException, IOException {
229 SerialisationSupport ss = graph.getService(SerialisationSupport.class);
230 return ss.getResource(id);
233 public static void disableDependencies(WriteGraph graph) {
234 Layer0Utils.setDependenciesIndexingDisabled(graph, true);
237 public static void enableDependencies(WriteGraph graph) {
238 Layer0Utils.setDependenciesIndexingDisabled(graph, false);
241 public static void collectClusters() {
242 Simantics.getSession().getService(ClusterControl.class).collectClusters(Integer.MAX_VALUE);
245 public static class SCLUnaryRead extends BinaryRead<Function1<Object,Object>, Object, Object> {
247 public SCLUnaryRead(Function1<Object, Object> parameter1, Object parameter2) {
248 super(parameter1, parameter2);
252 public Object perform(ReadGraph graph) throws DatabaseException {
253 return Simantics.applySCLRead(graph, parameter, parameter2);
258 public static Object unaryQuery(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
259 return graph.syncRequest(new SCLUnaryRead(fn, value));
262 public static Object unaryQueryCached(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
263 return graph.syncRequest(new SCLUnaryRead(fn, value), TransientCacheAsyncListener.<Object>instance());