aboutsummaryrefslogtreecommitdiffstats
path: root/Solvers/VIATRA-Solver/hu.bme.mit.inf.dslreasoner.viatrasolver.reasoner/src/hu/bme/mit/inf/dslreasoner/viatrasolver/reasoner/dse/PartialModelAsLogicInterpretation.xtend
blob: 4484052d630ab0a5042b9cf98e03671cc5532fc8 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
package hu.bme.mit.inf.dslreasoner.viatrasolver.reasoner.dse

import hu.bme.mit.inf.dslreasoner.logic.model.builder.LogicModelInterpretation
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.ConstantDeclaration
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.DefinedElement
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.FunctionDeclaration
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.RelationDeclaration
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.Type
import hu.bme.mit.inf.dslreasoner.logic.model.logiclanguage.TypeDeclaration
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.BinaryElementRelationLink
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.BooleanElement
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.IntegerElement
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.PartialComplexTypeInterpretation
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.PartialInterpretation
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.PartialRelationInterpretation
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.PrimitiveElement
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.RealElement
import hu.bme.mit.inf.dslreasoner.viatrasolver.partialinterpretationlanguage.partialinterpretation.StringElement
import java.math.BigDecimal
import java.util.HashMap
import java.util.List
import java.util.Map
import java.util.TreeSet
import org.eclipse.emf.ecore.EObject
import org.eclipse.xtend.lib.annotations.Accessors
import org.eclipse.xtext.xbase.lib.Functions.Function1

import static extension hu.bme.mit.inf.dslreasoner.util.CollectionsUtil.*

class PartialModelAsLogicInterpretation implements LogicModelInterpretation{
	@Accessors val PartialInterpretation partialInterpretation
	val Map<EObject, EObject> trace;
	val Map<TypeDeclaration,PartialComplexTypeInterpretation> type2Interpretation
	val Map<RelationDeclaration,PartialRelationInterpretation> relation2Interpretation
	
	val Map<DefinedElement,DefinedElement> elementBackwardTrace
	val Map<Boolean, BooleanElement> booleanForwardTrace
	val Map<Integer, IntegerElement> integerForwardTrace
	val Map<Double, RealElement> realForwardTrace
	val Map<String, StringElement> stringForwardTrace
	
	new(PartialInterpretation partialInterpretation, Map<EObject, EObject> forwardMap) {
		this.partialInterpretation = partialInterpretation
		this.trace = forwardMap
		this.type2Interpretation = initComplexTypes(partialInterpretation.partialtypeinterpratation.filter(PartialComplexTypeInterpretation))
		this.relation2Interpretation = initRelations(partialInterpretation.partialrelationinterpretation)
		
		this.elementBackwardTrace = initElementBackwardTrace(trace)
		this.booleanForwardTrace = initialisePrimitiveElementTrace(
			null,null,[null],partialInterpretation.newElements.filter(BooleanElement),[it.value])
		integerForwardTrace = initialisePrimitiveElementTrace(
			0,[it+1],[it],partialInterpretation.newElements.filter(IntegerElement),[it.value])
		realForwardTrace = initialisePrimitiveElementTrace(
			0.0,[it+1.0],[it],partialInterpretation.newElements.filter(RealElement),[it.value])
//		realForwardTrace = initialisePrimitiveElementTrace(
//			BigDecimal::ZERO,[it.add(BigDecimal.ONE)],[it],partialInterpretation.newElements.filter(RealElement),[it.value])
		stringForwardTrace = initialisePrimitiveElementTrace(
			0,[it+1],['''String«it»'''],partialInterpretation.newElements.filter(StringElement),[it.value])
	}
	
	private def <Seed,Type,ElementType extends PrimitiveElement> Map<Type,ElementType> initialisePrimitiveElementTrace(
		Seed initialSeed,
		Function1<Seed,Seed> nextSeed,
		Function1<Seed,Type> seed2Value,
		Iterable<ElementType> elements,
		Function1<ElementType,Type> element2Value)
	{
		val forwardMap = new HashMap
		
		val assignedElements = elements.filter[it.valueSet]
		for(assignedElement : assignedElements) {
			forwardMap.put(element2Value.apply(assignedElement),assignedElement)
		}
		
		val unsassignedElements = elements.filter[!it.valueSet]
		var seed = initialSeed
		var newValue = seed2Value.apply(seed) 
		for(unassignedElement : unsassignedElements) {
			while(forwardMap.keySet.contains(newValue)) {
				seed = nextSeed.apply(seed)
				newValue = seed2Value.apply(seed)
			}
			forwardMap.put(newValue,unassignedElement)
		}
		
		return forwardMap
	}
	
	def initComplexTypes(Iterable<PartialComplexTypeInterpretation> types) {
		types.toMap[it.interpretationOf]
	}
	def initRelations(List<PartialRelationInterpretation> relations) {
		relations.toMap[it.interpretationOf]
	}
	def initElementBackwardTrace(Map<EObject, EObject> trace) {
		val entryBackwardMap = new HashMap
		for(entry: trace.entrySet) {
			if(entry.key instanceof DefinedElement) {
				entryBackwardMap.put(entry.value as DefinedElement, entry.key as DefinedElement)
			}
		}
		return entryBackwardMap
	}
	
	override getElements(Type type) {
		val t1 = type.lookup(trace) as TypeDeclaration
		val t2 = t1.lookup(this.type2Interpretation)
		return t2.elements.map[it.elementLookupBackward]
	}
	
	def dispatch elementLookupForward(DefinedElement e) {
		if(this.trace.containsKey(e)) return e.lookup(trace) as DefinedElement
		else return e;
	}
	def dispatch elementLookupForward(Boolean e) {
		this.booleanForwardTrace.get(e)
	}
	def dispatch elementLookupForward(Integer e) {
		this.integerForwardTrace.get(e)
	}
	def dispatch elementLookupForward(Double e) {
		this.realForwardTrace.get(e)
	}
	def dispatch elementLookupForward(String e) {
		this.stringForwardTrace.get(e)
	}
	
	def elementLookupBackward(DefinedElement e) {
		if(this.elementBackwardTrace.containsKey(e)) return e.lookup(this.elementBackwardTrace)
		else return e;
	}
	
	override getInterpretation(FunctionDeclaration function, Object[] parameterSubstitution) {
		throw new UnsupportedOperationException("TODO: auto-generated method stub")
	}
	
	override getInterpretation(RelationDeclaration relation, Object[] parameterSubstitution) {
		if(parameterSubstitution.size == 2) {
			val param1 = parameterSubstitution.get(0).elementLookupForward
			val param2 = parameterSubstitution.get(1).elementLookupForward
			if(param1 != null && param2 != null) {
				val r1 = relation.lookup(trace) as RelationDeclaration
				val r2 = r1.lookup(this.relation2Interpretation)
				val links = r2.relationlinks.filter(BinaryElementRelationLink)
				val existLink = links.exists[it.param1 == param1 && it.param2 == param2]
				//println(existLink)
				return existLink
			} else {
				return false
			}
		} else throw new UnsupportedOperationException
	}
	
	override getInterpretation(ConstantDeclaration constant) {
		throw new UnsupportedOperationException("TODO: auto-generated method stub")
	}
	
	override getAllIntegersInStructure() {
		new TreeSet(allIntegersWithInterpretation.values)
	}
	
	override getAllIntegersWithInterpretation() {
		val builder = new HashMap
		for (entry : integerForwardTrace.entrySet) {
			builder.put(entry.value, entry.key)
		}
		for (element : partialInterpretation.newElements) {
			if (element instanceof IntegerElement) {
				builder.put(element, element.value)
			}
		}
		builder
	}
	
	override getAllRealsInStructure() {
		new TreeSet(allRealsWithInterpretation.values)
	}
	
	override getAllRealsWithInterpretation() {
		val builder = new HashMap
		for (entry : realForwardTrace.entrySet) {
			builder.put(entry.value, entry.key)
		}
		for (element : partialInterpretation.newElements) {
			if (element instanceof RealElement) {
				builder.put(element, element.value)
			}
		}
		builder
	}
	
	override getAllStringsInStructure() {
		new TreeSet(allStringsWithInterpretation.values)
	}
	
	override getAllStringsWithInterpretation() {
		val builder = new HashMap
		for (entry : stringForwardTrace.entrySet) {
			builder.put(entry.value, entry.key)
		}
		for (element : partialInterpretation.newElements) {
			if (element instanceof StringElement) {
				builder.put(element, element.value)
			}
		}
		builder
	}
	
	override getAllBooleansInStructure() {
		new TreeSet(allBooleansWithInterpretation.values)
	}
	
	override getAllBooleansWithInterpretation() {
		val builder = new HashMap
		for (entry : booleanForwardTrace.entrySet) {
			builder.put(entry.value, entry.key)
		}
		for (element : partialInterpretation.newElements) {
			if (element instanceof BooleanElement) {
				builder.put(element, element.value)
			}
		}
		builder
	}
}