1 package org.simantics.modeling.scl;
3 import java.util.ArrayList;
4 import java.util.Collection;
6 import org.simantics.Simantics;
7 import org.simantics.db.ReadGraph;
8 import org.simantics.db.RequestProcessorSpecific;
9 import org.simantics.db.Resource;
10 import org.simantics.db.WriteGraph;
11 import org.simantics.db.common.request.UnaryRead;
12 import org.simantics.db.common.request.WriteRequest;
13 import org.simantics.db.exception.DatabaseException;
14 import org.simantics.db.procedure.SyncListener;
15 import org.simantics.db.request.Read;
16 import org.simantics.layer0.Layer0;
17 import org.simantics.modeling.ModelingUtils;
18 import org.simantics.modeling.internal.Activator;
19 import org.simantics.scl.compiler.internal.codegen.types.JavaReferenceValidatorFactory;
20 import org.simantics.scl.compiler.module.repository.UpdateListener;
21 import org.simantics.scl.compiler.module.repository.UpdateListener.Observable;
22 import org.simantics.scl.compiler.source.ModuleSource;
23 import org.simantics.scl.compiler.source.StringModuleSource;
24 import org.simantics.scl.compiler.source.repository.ModuleSourceRepository;
25 import org.simantics.scl.osgi.internal.OsgiJavaReferenceValidatorFactory;
26 import org.simantics.scl.runtime.SCLContext;
27 import org.simantics.scl.runtime.tuple.Tuple0;
28 import org.simantics.structural2.utils.StructuralUtils;
30 import gnu.trove.procedure.TObjectProcedure;
31 import gnu.trove.set.hash.THashSet;
33 public enum GraphModuleSourceRepository implements ModuleSourceRepository {
36 private static final OsgiJavaReferenceValidatorFactory REFERENCE_VALIDATOR_FACTORY = new OsgiJavaReferenceValidatorFactory(Activator.getContext().getBundle());
39 public ModuleSource getModuleSource(final String moduleName, UpdateListener listener) {
40 if(!moduleName.startsWith("http://"))
43 Object graph = SCLContext.getCurrent().get("graph");
44 RequestProcessorSpecific requestProcessor;
45 if(graph instanceof ReadGraph)
46 requestProcessor = (ReadGraph)graph;
48 requestProcessor = Simantics.getSession();
50 Read<ModuleSource> request = new ReadModuleSource(moduleName);
54 return requestProcessor.syncRequest(request, new ModuleListener(listener, moduleName));
56 return requestProcessor.syncRequest(request);
57 } catch (DatabaseException e) {
63 static class ModuleListener implements SyncListener<ModuleSource>, Observable {
64 UpdateListener listener;
65 boolean alreadyExecutedOnce;
66 final String moduleName;
67 public ModuleListener(UpdateListener listener, String moduleName) {
68 this.listener = listener;
69 this.listener.addObservable(this);
70 this.moduleName = moduleName;
73 public void removeListener(UpdateListener listener) {
77 public boolean isDisposed() {
78 return listener == null;
80 private void fireUpdate(ReadGraph graph) {
81 if(listener != null) {
82 SCLContext context = SCLContext.getCurrent();
83 Object oldGraph = context.put("graph", graph);
85 listener.notifyAboutUpdate();
88 context.put("graph", oldGraph);
93 public void execute(ReadGraph graph, ModuleSource result)
94 throws DatabaseException {
95 if(alreadyExecutedOnce)
98 alreadyExecutedOnce = true;
101 public void exception(ReadGraph graph, Throwable t)
102 throws DatabaseException {
104 if(alreadyExecutedOnce && listener != null)
109 public static class GraphModuleSource extends StringModuleSource {
111 private final boolean immutable;
113 public GraphModuleSource(String moduleName, ClassLoader classLoader, String moduleText, boolean immutable) {
114 super(moduleName, classLoader, moduleText);
115 this.immutable = immutable;
119 public boolean isUpdateable() {
124 public void update(String newSourceText) {
126 Simantics.getSession().syncRequest(new WriteModuleSource(getModuleName(), newSourceText));
127 } catch (DatabaseException e) {
133 public JavaReferenceValidatorFactory getJavaReferenceValidatorFactory() {
134 return REFERENCE_VALIDATOR_FACTORY;
138 static class ReadModuleSource extends UnaryRead<String, ModuleSource> {
139 public ReadModuleSource(String moduleName) {
144 public ModuleSource perform(ReadGraph graph) throws DatabaseException {
145 Resource moduleResource = graph.getPossibleResource(parameter);
146 if(moduleResource == null)
148 Layer0 L0 = Layer0.getInstance(graph);
149 if(!graph.isInstanceOf(moduleResource, L0.SCLModule))
151 String text = graph.getRelatedValue(moduleResource, L0.SCLModule_definition);
152 boolean immutable = StructuralUtils.isImmutable(graph, moduleResource);
153 return new GraphModuleSource(parameter, getClass().getClassLoader(), text, immutable);
157 static class WriteModuleSource extends WriteRequest {
158 private final String moduleURI;
159 private final String sourceText;
161 public WriteModuleSource(String moduleURI, String sourceText) {
162 this.moduleURI = moduleURI;
163 this.sourceText = sourceText;
167 public void perform(WriteGraph graph) throws DatabaseException {
168 Resource moduleResource = graph.getPossibleResource(moduleURI);
169 if(moduleResource == null)
171 Layer0 L0 = Layer0.getInstance(graph);
172 if(!graph.isInstanceOf(moduleResource, L0.SCLModule))
174 graph.claimLiteral(moduleResource, L0.SCLModule_definition, sourceText);
179 public void forAllModules(TObjectProcedure<String> procedure) {
180 THashSet<String> moduleURIs;
182 moduleURIs = Simantics.getSession().syncRequest(new Read<THashSet<String>>() {
184 public THashSet<String> perform(ReadGraph graph)
185 throws DatabaseException {
186 THashSet<String> result = new THashSet<String>();
187 Resource projectResource = Simantics.getProjectResource();
188 Layer0 L0 = Layer0.getInstance(graph);
189 for(Resource model : graph.getObjects(projectResource, L0.ConsistsOf)) {
190 if(graph.isInstanceOf(model, L0.IndexRoot)) {
191 for(Resource module : ModelingUtils.searchByType(graph, model, L0.SCLModule))
192 result.add(graph.getURI(module));
196 Collection<Resource> ontologies = Simantics.applySCL("Simantics/SharedOntologies", "getSharedOntologies", graph, Tuple0.INSTANCE);
197 for (Resource ontology : ontologies) {
198 for(Resource module : ModelingUtils.searchByType(graph, ontology, L0.SCLModule))
199 result.add(graph.getURI(module));
205 moduleURIs.forEach(procedure);
206 } catch (DatabaseException e) {
212 public Collection<String> getModuleNames() {
213 ArrayList<String> result = new ArrayList<>();
214 forAllModules((String name) -> {