From b7ed3353ba34dd837bfc15f7e48c30a2cdc7ce75 Mon Sep 17 00:00:00 2001
From: Kristóf Marussy <kris7topher@gmail.com>
Date: Wed, 22 May 2019 20:38:53 -0400
Subject: MDEOptimiser implementation of CPS benchmark

---
 .../cps/mdeo/UnavailableHddConstraint.xtend        | 27 ++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 Domains/hu.bme.mit.inf.dslreasoner.domains.cps/src/hu/bme/mit/inf/dslreasoner/domains/cps/mdeo/UnavailableHddConstraint.xtend

(limited to 'Domains/hu.bme.mit.inf.dslreasoner.domains.cps/src/hu/bme/mit/inf/dslreasoner/domains/cps/mdeo/UnavailableHddConstraint.xtend')

diff --git a/Domains/hu.bme.mit.inf.dslreasoner.domains.cps/src/hu/bme/mit/inf/dslreasoner/domains/cps/mdeo/UnavailableHddConstraint.xtend b/Domains/hu.bme.mit.inf.dslreasoner.domains.cps/src/hu/bme/mit/inf/dslreasoner/domains/cps/mdeo/UnavailableHddConstraint.xtend
new file mode 100644
index 00000000..08450f45
--- /dev/null
+++ b/Domains/hu.bme.mit.inf.dslreasoner.domains.cps/src/hu/bme/mit/inf/dslreasoner/domains/cps/mdeo/UnavailableHddConstraint.xtend
@@ -0,0 +1,27 @@
+package hu.bme.mit.inf.dslreasoner.domains.cps.mdeo
+
+import hu.bme.mit.inf.dslreasoner.domains.cps.CyberPhysicalSystem
+import uk.ac.kcl.inf.mdeoptimiser.libraries.core.optimisation.IGuidanceFunction
+import uk.ac.kcl.inf.mdeoptimiser.libraries.core.optimisation.interpreter.guidance.Solution
+
+class UnavailableHddConstraint implements IGuidanceFunction {
+	override getName() {
+		"UnavailableHdd"
+	}
+
+	override computeFitness(Solution solution) {
+		val cps = solution.model as CyberPhysicalSystem
+		var int cost = 0
+		for (hostType : cps.hostTypes) {
+			for (host : hostType.instances) {
+				val utilization = ResourceUtilizationUtil.getHddUtilization(host)
+				val difference = utilization - hostType.defaultHdd
+				if (difference > 0) {
+					cost += difference
+				}
+			}
+		}
+		cost
+	}
+
+}
-- 
cgit v1.2.3-70-g09d2