1 package org.simantics.modeling.scl;
\r
3 import java.util.Collection;
\r
5 import org.simantics.Simantics;
\r
6 import org.simantics.db.ReadGraph;
\r
7 import org.simantics.db.RequestProcessorSpecific;
\r
8 import org.simantics.db.Resource;
\r
9 import org.simantics.db.WriteGraph;
\r
10 import org.simantics.db.common.request.UnaryRead;
\r
11 import org.simantics.db.common.request.WriteRequest;
\r
12 import org.simantics.db.exception.DatabaseException;
\r
13 import org.simantics.db.procedure.SyncListener;
\r
14 import org.simantics.db.request.Read;
\r
15 import org.simantics.layer0.Layer0;
\r
16 import org.simantics.modeling.ModelingUtils;
\r
17 import org.simantics.scl.compiler.module.repository.UpdateListener;
\r
18 import org.simantics.scl.compiler.source.ModuleSource;
\r
19 import org.simantics.scl.compiler.source.StringModuleSource;
\r
20 import org.simantics.scl.compiler.source.repository.ModuleSourceRepository;
\r
21 import org.simantics.scl.runtime.SCLContext;
\r
22 import org.simantics.scl.runtime.tuple.Tuple0;
\r
24 import gnu.trove.procedure.TObjectProcedure;
\r
25 import gnu.trove.set.hash.THashSet;
\r
27 public enum GraphModuleSourceRepository implements ModuleSourceRepository {
\r
31 public ModuleSource getModuleSource(final String moduleName, UpdateListener listener) {
\r
32 if(!moduleName.startsWith("http://"))
\r
35 Object graph = SCLContext.getCurrent().get("graph");
\r
36 RequestProcessorSpecific requestProcessor;
\r
37 if(graph instanceof ReadGraph)
\r
38 requestProcessor = (ReadGraph)graph;
\r
40 requestProcessor = Simantics.getSession();
\r
42 Read<ModuleSource> request = new ReadModuleSource(moduleName);
\r
45 if(listener != null)
\r
46 return requestProcessor.syncRequest(request, new ModuleListener(listener, moduleName));
\r
48 return requestProcessor.syncRequest(request);
\r
49 } catch (DatabaseException e) {
\r
50 e.printStackTrace();
\r
55 static class ModuleListener implements SyncListener<ModuleSource> {
\r
56 UpdateListener listener;
\r
57 boolean alreadyExecutedOnce;
\r
58 final String moduleName;
\r
59 public ModuleListener(UpdateListener listener, String moduleName) {
\r
60 this.listener = listener;
\r
61 this.moduleName = moduleName;
\r
64 public boolean isDisposed() {
\r
65 return listener == null;
\r
67 private void fireUpdate(ReadGraph graph) {
\r
68 if(listener != null) {
\r
69 SCLContext context = SCLContext.getCurrent();
\r
70 Object oldGraph = context.put("graph", graph);
\r
72 listener.notifyAboutUpdate();
\r
75 context.put("graph", oldGraph);
\r
80 public void execute(ReadGraph graph, ModuleSource result)
\r
81 throws DatabaseException {
\r
82 if(alreadyExecutedOnce)
\r
85 alreadyExecutedOnce = true;
\r
88 public void exception(ReadGraph graph, Throwable t)
\r
89 throws DatabaseException {
\r
90 t.printStackTrace();
\r
91 if(alreadyExecutedOnce && listener != null)
\r
96 public static class GraphModuleSource extends StringModuleSource {
\r
98 public GraphModuleSource(String moduleName, ClassLoader classLoader, String moduleText) {
\r
99 super(moduleName, classLoader, moduleText);
\r
103 public boolean isUpdateable() {
\r
108 public void update(String newSourceText) {
\r
110 Simantics.getSession().syncRequest(new WriteModuleSource(getModuleName(), newSourceText));
\r
111 } catch (DatabaseException e) {
\r
112 e.printStackTrace();
\r
117 static class ReadModuleSource extends UnaryRead<String, ModuleSource> {
\r
118 public ReadModuleSource(String moduleName) {
\r
123 public ModuleSource perform(ReadGraph graph) throws DatabaseException {
\r
124 Resource moduleResource = graph.getPossibleResource(parameter);
\r
125 if(moduleResource == null)
\r
127 Layer0 L0 = Layer0.getInstance(graph);
\r
128 if(!graph.isInstanceOf(moduleResource, L0.SCLModule))
\r
130 String text = graph.getRelatedValue(moduleResource, L0.SCLModule_definition);
\r
131 return new GraphModuleSource(parameter, getClass().getClassLoader(), text);
\r
135 static class WriteModuleSource extends WriteRequest {
\r
136 private final String moduleURI;
\r
137 private final String sourceText;
\r
139 public WriteModuleSource(String moduleURI, String sourceText) {
\r
140 this.moduleURI = moduleURI;
\r
141 this.sourceText = sourceText;
\r
145 public void perform(WriteGraph graph) throws DatabaseException {
\r
146 Resource moduleResource = graph.getPossibleResource(moduleURI);
\r
147 if(moduleResource == null)
\r
149 Layer0 L0 = Layer0.getInstance(graph);
\r
150 if(!graph.isInstanceOf(moduleResource, L0.SCLModule))
\r
152 graph.claimLiteral(moduleResource, L0.SCLModule_definition, sourceText);
\r
157 public void forAllModules(TObjectProcedure<String> procedure) {
\r
158 THashSet<String> moduleURIs;
\r
160 moduleURIs = Simantics.getSession().syncRequest(new Read<THashSet<String>>() {
\r
162 public THashSet<String> perform(ReadGraph graph)
\r
163 throws DatabaseException {
\r
164 THashSet<String> result = new THashSet<String>();
\r
165 Resource projectResource = Simantics.getProjectResource();
\r
166 Layer0 L0 = Layer0.getInstance(graph);
\r
167 for(Resource model : graph.getObjects(projectResource, L0.ConsistsOf)) {
\r
168 if(graph.isInstanceOf(model, L0.IndexRoot)) {
\r
169 for(Resource module : ModelingUtils.searchByType(graph, model, L0.SCLModule))
\r
170 result.add(graph.getURI(module));
\r
174 Collection<Resource> ontologies = Simantics.applySCL("Simantics/SharedOntologies", "getSharedOntologies", graph, Tuple0.INSTANCE);
\r
175 for (Resource ontology : ontologies) {
\r
176 for(Resource module : ModelingUtils.searchByType(graph, ontology, L0.SCLModule))
\r
177 result.add(graph.getURI(module));
\r
183 moduleURIs.forEach(procedure);
\r
184 } catch (DatabaseException e) {
\r
185 e.printStackTrace();
\r
190 public void checkUpdates() {
\r
194 public String getDocumentation(String documentationName) {
\r
199 public void forAllDocumentations(TObjectProcedure<String> procedure) {
\r
203 public void clear() {
\r