Examples with Room org.drools.mvel.compiler.oopath.model.Room used on opensource projects

Example 1 with Room

use of org.drools.mvel.compiler.oopath.model.Room in project drools by kiegroup.

the class OOPathQueriesTest method testNonReactiveOOPathInQuery.

@Test
public void testNonReactiveOOPathInQuery() {
    final String drl = "import org.drools.mvel.compiler.oopath.model.Room;\n" + "import org.drools.mvel.compiler.oopath.model.Sensor;\n" + "import org.drools.mvel.compiler.oopath.model.SensorEvent;\n" + "query temperature ( Room $r, double $t )\n" + "    $t := /$r?/temperatureSensor/value\n" + "end\n" + "" + "rule \"Change sensor value\" when\n" + "    $e : SensorEvent( $s : sensor, $v : value)\n" + "then\n" + "    modify($s) { setValue($v) }\n" + "    retract($e)\n" + "end\n" + "" + "rule \"Turn heating on\" when\n" + "    $r : Room()\n" + "    temperature( $r, $t; )\n" + "    eval( $t < 20 )" + "then\n" + "    $r.getHeating().setOn(true);\n" + "end\n" + "rule \"Turn heating off\" when\n" + "    $r : Room()\n" + "    temperature( $r, $t; )\n" + "    eval( $t > 20 )" + "then\n" + "    $r.getHeating().setOn(false);\n" + "end\n";
    final Room room = new Room("Room");
    room.getTemperatureSensor().setValue(15);
    room.getHeating().setOn(false);
    KieBase kbase = KieBaseUtil.getKieBaseFromKieModuleFromDrl("test", kieBaseTestConfiguration, drl);
    KieSession ksession = kbase.newKieSession();
    ksession.insert(room);
    ksession.insert(room.getTemperatureSensor());
    ksession.insert(room.getHeating());
    ksession.fireAllRules();
    assertThat(room.getHeating().isOn()).as("Temperature is bellow 20 degrees of Celsius. Heating should be turned on.").isTrue();
    ksession.insert(new SensorEvent(room.getTemperatureSensor(), 25));
    ksession.fireAllRules();
    assertThat(room.getHeating().isOn()).as("Query is not reactive. Heating should still be turned on.").isTrue();
    ksession.dispose();
}

Example 2 with Room

use of org.drools.mvel.compiler.oopath.model.Room in project drools by kiegroup.

the class OOPathQueriesTest method testReactiveQuery.

@Test
public void testReactiveQuery() {
    final String drl = "import org.drools.mvel.compiler.oopath.model.Room;\n" + "import org.drools.mvel.compiler.oopath.model.Sensor;\n" + "import org.drools.mvel.compiler.oopath.model.SensorEvent;\n" + "query temperature ( Room $r, double $t )\n" + "    $t := /$r/temperatureSensor/value\n" + "end\n" + "" + "rule \"Change sensor value\" when\n" + "    $e : SensorEvent( $s : sensor, $v : value)\n" + "then\n" + "    modify($s) { setValue($v) }\n" + "    retract($e)\n" + "end\n" + "" + "rule \"Turn heating on\" when\n" + "    $r : Room()\n" + "    temperature( $r, $t; )\n" + "    eval( $t < 20 )" + "then\n" + "    $r.getHeating().setOn(true);\n" + "end\n" + "rule \"Turn heating off\" when\n" + "    $r : Room()\n" + "    temperature( $r, $t; )\n" + "    eval( $t > 20 )" + "then\n" + "    $r.getHeating().setOn(false);\n" + "end\n";
    final Room room = new Room("Room");
    room.getTemperatureSensor().setValue(15);
    room.getHeating().setOn(false);
    KieBase kbase = KieBaseUtil.getKieBaseFromKieModuleFromDrl("test", kieBaseTestConfiguration, drl);
    KieSession ksession = kbase.newKieSession();
    ksession.insert(room);
    ksession.insert(room.getTemperatureSensor());
    ksession.insert(room.getHeating());
    ksession.fireAllRules();
    assertThat(room.getHeating().isOn()).as("Temperature is bellow 20 degrees of Celsius. Heating should be turned on.").isTrue();
    ksession.insert(new SensorEvent(room.getTemperatureSensor(), 25));
    ksession.fireAllRules();
    assertThat(room.getHeating().isOn()).as("Temperature is higher than 20 degrees of Celsius. Heating should be turned off.").isFalse();
    ksession.dispose();
}