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.UnaryRead;
17 import org.simantics.db.common.request.WriteRequest;
18 import org.simantics.db.common.request.WriteResultRequest;
19 import org.simantics.db.exception.DatabaseException;
20 import org.simantics.db.layer0.util.Layer0Utils;
21 import org.simantics.db.layer0.variable.Variables;
22 import org.simantics.db.request.Read;
23 import org.simantics.db.service.ClusterControl;
24 import org.simantics.db.service.QueryControl;
25 import org.simantics.db.service.SerialisationSupport;
26 import org.simantics.db.service.VirtualGraphSupport;
27 import org.simantics.layer0.utils.triggers.IActivationManager;
28 import org.simantics.scl.compiler.environment.specification.EnvironmentSpecification;
29 import org.simantics.scl.compiler.errors.Failable;
30 import org.simantics.scl.compiler.internal.codegen.types.JavaTypeTranslator;
31 import org.simantics.scl.compiler.module.Module;
32 import org.simantics.scl.compiler.module.repository.ImportFailureException;
33 import org.simantics.scl.compiler.runtime.RuntimeEnvironment;
34 import org.simantics.scl.compiler.types.Type;
35 import org.simantics.scl.osgi.SCLOsgi;
36 import org.simantics.scl.runtime.SCLContext;
37 import org.simantics.scl.runtime.function.Function;
38 import org.simantics.scl.runtime.function.Function1;
39 import org.simantics.scl.runtime.reporting.SCLReportingHandler;
40 import org.simantics.scl.runtime.tuple.Tuple;
41 import org.simantics.scl.runtime.tuple.Tuple0;
42 import org.simantics.utils.DataContainer;
43 import org.slf4j.Logger;
44 import org.slf4j.LoggerFactory;
46 @SuppressWarnings({"rawtypes", "unchecked"})
47 public class SCLFunctions {
49 private static final Logger LOGGER = LoggerFactory.getLogger(SCLFunctions.class);
51 public static final String GRAPH = "graph";
53 public static <T> T safeExec(final Function f) {
55 return (T)f.apply(Tuple0.INSTANCE);
56 } catch (Throwable t) {
57 LOGGER.error("safeExec caught exception", t);
62 public static void asyncRead(final Function f) throws DatabaseException {
63 final SCLContext context = SCLContext.createDerivedContext();
64 Simantics.getSession().asyncRequest(new ReadRequest() {
66 public void run(ReadGraph graph) throws DatabaseException {
67 SCLContext.push(context);
68 context.put(GRAPH, graph);
70 f.apply(Tuple0.INSTANCE);
78 public static <T> T syncRead(final Function f) throws DatabaseException {
79 final SCLContext context = SCLContext.getCurrent();
80 Object graph = context.get(GRAPH);
82 return (T)f.apply(Tuple0.INSTANCE);
84 return Simantics.getSession().syncRequest(new Read<T>() {
86 public T perform(ReadGraph graph) throws DatabaseException {
87 SCLContext.push(context);
88 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
90 return (T)f.apply(Tuple0.INSTANCE);
92 context.put(GRAPH, oldGraph);
100 public static void asyncWrite(final Function f) throws DatabaseException {
101 SCLContext context = SCLContext.createDerivedContext();
102 if (Simantics.peekSession() != null) {
103 Simantics.getSession().asyncRequest(new WriteRequest() {
105 public void perform(WriteGraph graph) throws DatabaseException {
106 SCLContext.push(context);
107 context.put(GRAPH, graph);
109 f.apply(Tuple0.INSTANCE);
116 LOGGER.warn("No session available for asynchronous write requests");
120 public static <T> T syncWrite(final Function f) throws DatabaseException {
121 final SCLContext context = SCLContext.getCurrent();
122 Object graph = context.get(GRAPH);
124 return (T)f.apply(Tuple0.INSTANCE);
126 final SCLReportingHandler printer = (SCLReportingHandler)SCLContext.getCurrent().get(SCLReportingHandler.REPORTING_HANDLER);
127 return Simantics.getSession().syncRequest(new WriteResultRequest<T>() {
129 public T perform(WriteGraph graph) throws DatabaseException {
130 SCLContext.push(context);
131 SCLReportingHandler oldPrinter = (SCLReportingHandler)context.put(SCLReportingHandler.REPORTING_HANDLER, printer);
132 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
134 return (T)f.apply(Tuple0.INSTANCE);
136 context.put(GRAPH, oldGraph);
137 context.put(SCLReportingHandler.REPORTING_HANDLER, oldPrinter);
145 public static <T> T delayedSyncWrite(final Function f) throws DatabaseException {
146 final SCLContext context = SCLContext.getCurrent();
147 final DataContainer<T> dc = new DataContainer<T>(null);
149 DelayedWriteRequest request = new DelayedWriteRequest() {
151 public void perform(WriteGraph graph) throws DatabaseException {
152 final SCLContext context = SCLContext.getCurrent();
153 SCLContext.push(context);
154 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
156 dc.set((T)f.apply(Tuple0.INSTANCE));
158 context.put(GRAPH, oldGraph);
164 Object graph = context.get(GRAPH);
166 if (graph instanceof WriteGraph) {
167 ((WriteGraph)graph).syncRequest(request);
169 throw new DatabaseException("Caller is inside a read transaction.");
172 Simantics.getSession().syncRequest(request);
177 public static <T> T virtualSyncWriteMem(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
178 final SCLContext context = SCLContext.getCurrent();
179 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
180 VirtualGraph vg = vgs.getMemoryPersistent(virtualGraphId);
181 return graph.syncRequest(new WriteResultRequest<T>(vg) {
183 public T perform(WriteGraph graph) throws DatabaseException {
184 SCLContext.push(context);
185 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
187 return (T)f.apply(Tuple0.INSTANCE);
189 context.put(GRAPH, oldGraph);
196 public static <T> T virtualSyncWriteWS(WriteGraph graph, String virtualGraphId, final Function f) throws DatabaseException {
197 final SCLContext context = SCLContext.getCurrent();
198 VirtualGraphSupport vgs = graph.getService(VirtualGraphSupport.class);
199 VirtualGraph vg = vgs.getWorkspacePersistent(virtualGraphId);
200 return graph.syncRequest(new WriteResultRequest<T>(vg) {
202 public T perform(WriteGraph graph) throws DatabaseException {
203 SCLContext.push(context);
204 ReadGraph oldGraph = (ReadGraph)context.put(GRAPH, graph);
206 return (T)f.apply(Tuple0.INSTANCE);
208 context.put(GRAPH, oldGraph);
215 public static <T> T readValue(final String uri) throws DatabaseException {
216 return Simantics.getSession().syncRequest(new Read<T>() {
218 public T perform(ReadGraph graph) throws DatabaseException {
219 return Variables.getVariable(graph, uri).getValue(graph);
224 public static <T> void writeValue(final String uri, final T value) throws DatabaseException {
225 Simantics.getSession().syncRequest(new WriteRequest() {
227 public void perform(WriteGraph graph) throws DatabaseException {
228 Variables.getVariable(graph, uri).setValue(graph, value);
233 public static void activateOnce(Resource r) {
234 Simantics.getSession().getService(IActivationManager.class).activateOnce(r);
237 public static void syncActivateOnce(WriteGraph graph, Resource r) throws DatabaseException {
238 graph.getService(IActivationManager.class).activateOnce(graph, r);
241 public static Resource resourceFromId(ReadGraph graph, long id) throws DatabaseException, IOException {
242 SerialisationSupport ss = graph.getService(SerialisationSupport.class);
243 return ss.getResource(id);
246 public static void disableDependencies(WriteGraph graph) {
247 Layer0Utils.setDependenciesIndexingDisabled(graph, true);
250 public static void enableDependencies(WriteGraph graph) {
251 Layer0Utils.setDependenciesIndexingDisabled(graph, false);
254 public static void collectClusters() {
255 Simantics.getSession().getService(ClusterControl.class).collectClusters(Integer.MAX_VALUE);
258 public static class SCLUnaryRead extends BinaryRead<Function1<Object,Object>, Object, Object> {
260 public SCLUnaryRead(Function1<Object, Object> parameter1, Object parameter2) {
261 super(parameter1, parameter2);
265 public Object perform(ReadGraph graph) throws DatabaseException {
266 return Simantics.applySCLRead(graph, parameter, parameter2);
271 public static Object unaryQuery(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
272 return graph.syncRequest(new SCLUnaryRead(fn, value));
275 public static Object unaryQueryCached(ReadGraph graph, Function1<Object,Object> fn, Object value) throws DatabaseException {
276 return graph.syncRequest(new SCLUnaryRead(fn, value), TransientCacheAsyncListener.<Object>instance());
280 private static class Subquery extends UnaryRead<Function, Object> {
282 public Subquery(Function q) {
287 public Object perform(ReadGraph graph) throws DatabaseException {
288 return Simantics.applySCLRead(graph, parameter, Tuple0.INSTANCE);
293 public static Object subquery(ReadGraph graph, Function q) throws DatabaseException {
294 return graph.syncRequest(new Subquery(q));
297 public static Object subqueryC(ReadGraph graph, Function q) throws DatabaseException {
298 return graph.syncRequest(new Subquery(q), TransientCacheAsyncListener.<Object>instance());
301 public static void subqueryL(ReadGraph graph, Function query, Function executeCallback, Function1<Throwable, Tuple> exceptionCallback, Function1<Tuple0, Boolean> isDisposedCallback) throws DatabaseException {
302 graph.syncRequest(new Subquery(query), new SyncListenerAdapter<Object>() {
304 public void execute(ReadGraph graph, Object result) throws DatabaseException {
305 Simantics.applySCLRead(graph, executeCallback, result);
309 public void exception(ReadGraph graph, Throwable t) throws DatabaseException {
310 Simantics.applySCLRead(graph, exceptionCallback, t);
314 public boolean isDisposed() {
315 return isDisposedCallback.apply(Tuple0.INSTANCE);
320 public static Object possibleFromDynamic(Type expectedType, String moduleName, Object value) {
325 Failable<Module> failable = SCLOsgi.MODULE_REPOSITORY.getModule(moduleName);
326 Module module = failable.getResult();
328 RuntimeEnvironment env = SCLOsgi.MODULE_REPOSITORY.createRuntimeEnvironment(
329 EnvironmentSpecification.of(moduleName, ""), module.getParentClassLoader());
331 JavaTypeTranslator tr = new JavaTypeTranslator(env.getEnvironment());
332 TypeDesc desc = tr.toTypeDesc(expectedType);
333 String className = desc.getFullName();
334 Class<?> clazz = env.getMutableClassLoader().loadClass(className);
335 if (!clazz.isAssignableFrom(value.getClass()))
338 } catch (ImportFailureException | ClassNotFoundException e) {
343 public static void restrictQueries(ReadGraph graph, int amount, int step, int maxTimeInMs) {
345 QueryControl qc = graph.getService(QueryControl.class);
346 long start = System.currentTimeMillis();
348 int current = qc.count();
349 if(current < amount) return;
351 long duration = System.currentTimeMillis() - start;
352 if(duration > maxTimeInMs) return;
357 public static int countQueries(ReadGraph graph) {
359 QueryControl qc = graph.getService(QueryControl.class);