MINT-core 1.0.1 → 2.0.0

data/spec/complementary_mapping_spec.rb

@@ -0,0 +1,158 @@
+require "spec_helper"
+
+require "MINT-core"
+
+
+class FakeSocketClient < EventMachine::Connection
+  include EM::Protocols::LineText2
+
+  attr_reader :data
+
+  def initialize
+
+  end
+
+  def set_data(data)
+    @data = data
+
+  end
+  def post_init
+    send_data "HeadMove/10,1/10,0/10,1/-1,6\r\n"
+    # send_data "HeadMove/10,1/10,0/10,1/-1,6\r\n"
+  end
+
+end
+
+describe "Complementary mapping" do
+  include EventMachine::SpecHelper
+
+  before :all do
+    connection_options = { :adapter => "redis"}
+    DataMapper.setup(:default, connection_options)
+
+    connect do |redis|
+      require "MINT-core"
+      #require "support/redis_connector_monkey_patch"  # TODO dirty patch for a bug that i have not found :(
+      DataMapper.finalize
+      DataMapper::Model.raise_on_save_failure = true
+    end
+  end
+  describe "with BindAction" do
+    it "between AIINContinuous and AIOUTContinuouss should work correctly" do
+      connect true do |redis|
+
+        # capture the result an the very end: the message from the volume interactor to move the progress bar
+        # presentation to 20 - additionally checks for correct states for bothe interactors
+
+        redis.pubsub.subscribe("ss:channels") { |message|
+
+          if channel.eql? 'ss:channels'
+            r = MultiJson.decode msg
+
+            r["params"]["data"].should== 20
+
+            volume = MINT::AIOUTContinuous.first(:name=>"volume")
+            volume.states.should==[:defocused, :progressing]
+
+            slider = MINT::AIINContinuous.first(:name=>"slider")
+            slider.states.should==[:progressing]
+
+            done
+          end
+        }
+
+        o1 = Observation.new(:element =>"Interactor.AIO.AIIN.AIINContinuous",:name => "slider", :states =>[:progressing], :process=>"onchange")
+        o2 = Observation.new(:element =>"Interactor.AIO.AIOUT.AIOUTContinuous",:name=>"volume", :states =>[:presenting], :process=>"onchange")
+        a1 = BindAction.new(:elementIn => "Interactor.AIO.AIIN.AIINContinuous",:nameIn => "slider", :attrIn =>"data",:attrOut=>"data",
+                            #:transform =>:manipulate,
+                            :elementOut =>"Interactor.AIO.AIOUT.AIOUTContinuous", :nameOut=>"volume" )
+        m = MINT::ComplementaryMapping.new(:name => "Mapping_spec", :observations => [o1,o2],:actions =>[a1])
+        m.start
+
+
+        check_result = Proc.new {
+
+        }
+
+        test_state_flow redis,"Interactor.AIO.AIIN.AIINContinuous.slider",["initialized","organized",["presenting", "defocused"],["focused", "waiting"],["moving","progressing"]] do
+          Fiber.new {
+            # setup a waiting volume and slider interactor
+            volume = MINT::AIOUTContinuous.create(:name=>"volume")
+            volume.process_event(:organize).should ==[:organized]
+            volume.process_event(:present).should ==[:defocused, :waiting]
+
+            slider = MINT::AIINContinuous.create(:name=>"slider")
+            slider.process_event(:organize).should ==[:organized]
+            slider.process_event(:present).should ==[:defocused]
+            slider.process_event(:focus).should ==[:waiting]
+            redis.publish  'in_channel:Interactor.AIO.AIIN.AIINContinuous.slider:test', 20
+
+          }.resume
+
+        end
+
+
+      end
+    end
+    it "between Head angle and AIOUTContinuous with transformation should work correctly" do
+      pending "test not finished"
+      connect true do |redis|
+
+        # capture the result an the very end: the message from the volume interactor to move the progress bar
+        # presentation to 20 - additionally checks for correct states for bothe interactors
+
+        redis.pubsub.subscribe("out_channel:Interactor.AIO.AIOUT.AIOUTContinuous.horizontal_level:testuser") { |message|
+
+          message.should== "40"
+
+          volume = MINT::AIOUTContinuous.first(:name=>"horizontal_level")
+          volume.states.should==[:defocused, :progressing]
+
+
+          done
+
+        }
+
+        #<observation id="22" interactor="Interactor.Head" name="head" states="tilting_detection" process="onchange"/>
+        #    <observation id="23" interactor="Interactor.AIO.AIOUT.AIOUTContinuous" name="horizontal_level" states="presenting" process="instant"/>
+        #  </observations>
+        #  <actions>
+        #    <bind id="33" interactor_in="Interactor.Head" name_in="head" attr_in="head_angle" interactor_out="Interactor.AIO.AIOUT.AIOUTContinuous" name_out="horizontal_level" attr_out="data" transformation="head_angle_transformation" class="MusicSheet"/>
+        #  </actions>
+
+        def head_angle_transformation(angle)
+          r = (angle / Math::PI * 100 * 80 / 100).abs.to_i
+          p "result #{r}"
+          return r
+        end
+
+        o1 = Observation.new(:element =>"Interactor.IR.IRMode.Body.Head",:name => "head", :states =>[:tilting_detection], :process=>"onchange")
+        o2 = Observation.new(:element =>"Interactor.AIO.AIOUT.AIOUTContinuous",:name=>"horizontal_level", :states =>[:presenting], :process=>"onchange")
+        a1 = BindAction.new(:elementIn => "Interactor.IR.IRMode.Body.Head",:nameIn => "head", :attrIn =>"head_angle",:attrOut=>"data",
+                            :transform => self.method(:head_angle_transformation),
+                            :elementOut =>"Interactor.AIO.AIOUT.AIOUTContinuous", :nameOut=>"horizontal_level" )
+        m = MINT::ComplementaryMapping.new(:name => "Mapping_spec", :observations => [o1,o2],:actions =>[a1])
+        m.start
+
+        check_result = Proc.new {
+
+        }
+
+        test_state_flow_w_name redis,"Interactor.IR.IRMode.Body.Head","head",["disconnected",["tilting_detection", "face_detected", "connected", "centered"],"tilting_left"],check_result do
+          Fiber.new{
+            # setup a waiting volume and slider interactor
+            volume = MINT::AIOUTContinuous.create(:name=>"horizontal_level")
+            volume.process_event(:organize).should ==[:organized]
+            volume.process_event(:present).should ==[:defocused, :waiting]
+
+            MINT::Head.create(:name=>"head")
+            socket = EM.connect('0.0.0.0', 4242, FakeSocketClient)
+
+          }.resume
+
+        end
+      end
+    end
+
+  end
+end

data/spec/core_spec.rb

@@ -1,28 +1,40 @@
 require "spec_helper"
-
-include MINT
+require "em-spec/rspec"
 
 
 describe 'Interactor' do
-  before :each do
-    connection_options = { :adapter => "in_memory"}
+  include EventMachine::SpecHelper
+
+  before :all do
+    connection_options = { :adapter => "redis"}
     DataMapper.setup(:default, connection_options)
+
+    connect do |redis|
+      require "MINT-core"
+
+      DataMapper.finalize
+      DataMapper::Model.raise_on_save_failure = true
+    end
   end
 
   it 'should initialize to initiated if no initial states have been set' do
-    Element.create(:name =>"test1")
-    p = Element.all.first
-    p.name.should == "test1"
-    p.states.should == [:initialized]
-    p.abstract_states.should == "root|initialized"
+    connect do |redis|
+      MINT::Interactor.create(:name =>"test1")
+      p = MINT::Interactor.all.first
+      p.name.should == "test1"
+      p.states.should == [:initialized]
+      p.abstract_states.should == "Interactor|root"
+    end
   end
 
-  it 'should initialize to states set have been been set during creation' do
-    Element.create(:name =>"test2",:states=>[:finished])
-    p = Element.all.first
-    p.name.should == "test2"
-    p.states.should == [:finished]
-    p.abstract_states.should == "root|finished"
+  it 'should initialize to states set that have been set during creation' do
+    connect do |redis|
+      MINT::Interactor.create(:name =>"test2",:states=>[:finished])
+      p = MINT::Interactor.all.first
+      p.name.should == "test2"
+      p.states.should == [:finished]
+      p.abstract_states.should == "root"
+    end
   end
 
 

data/spec/cui_helper.rb

@@ -0,0 +1,100 @@
+class CUIHelper
+  def self.create_structure
+    @up = MINT::CIO.create(:name => "up",:down =>"center")
+    @down = MINT::CIO.create(:name => "down",:up=>"center")
+    @left = MINT::CIO.create(:name => "left",:right=>"center")
+    @right = MINT::CIO.create(:name => "right",:left=>"center")
+    @center = MINT::CIO.create(:name => "center",:left=>"left",:right =>"right",:up =>"up", :down=>"down")
+
+  end
+
+  def self.create_structure_w_highlighted
+    @up = MINT::CIO.create(:name => "up",:down =>"center",:states => [:displayed])
+    @down = MINT::CIO.create(:name => "down",:up=>"center",:states => [:displayed])
+    @left = MINT::CIO.create(:name => "left",:right=>"center",:states => [:displayed])
+    @right = MINT::CIO.create(:name => "right",:left=>"center",:states => [:displayed])
+    @center = MINT::CIO.create(:name => "center",:left=>"left",:right =>"right",:up =>"up", :down=>"down",:states => [:highlighted])
+  end
+
+  def self.set_highlighted
+    @up.states=[:displayed]
+    @down.states=[:displayed]
+    @left.states=[:displayed]
+    @right.states=[:displayed]
+    @center.states=[:highlighted]
+  end
+
+
+  def self.scenario2
+    center = create_structure
+    @up.states=[:displayed]
+    @down.states=[:displayed]
+    @left.states=[:displayed]
+    @right.states=[:displayed]
+    @center.states=[:highlighted]
+
+    @a_left = MINT::AIO.new(:name => "left",:states =>[:defocused])
+    @a_left.save!
+
+    @a_right = MINT::AIO.new(:name => "right",:states =>[:defocused])
+    @a_right.save!
+    @a_up = MINT::AIO.new(:name => "up",:states =>[:defocused])
+    @a_up.save!
+    @a_down = MINT::AIO.new(:name => "down",:states =>[:defocused])
+    @a_down.save!
+    @a_center = MINT::AIO.new(:name => "center",:states =>[:focused], :next =>"down")
+    @a_center.save!
+    center
+  end
+
+  def self.scenario3
+    @center = MINT::CIO.create(:name => "center",:left=>"left",:states => [:highlighted])
+    @left = MINT::CIO.create(:name => "left",:states => [:displayed])
+
+    @a_center = MINT::AIO.create(:name => "center",:states =>[:focused], :next =>"left")
+    @a_left = MINT::AIO.create(:name => "left",:states =>[:defocused])
+  end
+
+  def self.create_sync_mappings
+    o1 = Observation.new(:element =>"Interactor.CIO", :states =>[:displaying], :result=> "cio")
+    o2 = Observation.new(:eval => "AIO.get('aui',@cio.name)",:result=>"aio")
+    o3 = Observation.new(:eval =>"not @aio.is_in(:presenting)")
+    a = EventAction.new(:event => :present, :target => "aio")
+    s = Sequence.new([o1,o2,o3],a)
+    s.start
+
+  end
+
+  def self.layout_setup
+    scenario2
+
+    @up.states=[:initialized]
+    @down.states=[:initialized]
+    @left.states=[:initialized]
+    @right.states=[:initialized]
+
+
+    @a_left.states=[:organized]
+    @a_right.states=[:organized]
+    @a_up.states=[:organized]
+    @a_down.states=[:organized]
+  end
+
+
+  def self.layout_scenario2(solver)
+    MINT::AIContainer.create(:name=>"RecipeFinder_content",:states =>[:organized],:children=>"RecipeFilter")
+    MINT::AIContainer.create(:name=>"RecipeFilter",:states =>[:organized],:children=>"RecipeFilter_description1|RecipeFilter_content")
+    MINT::AIContainer.create(:name=>"RecipeFilter_description1",:states =>[:organized],:children=>"RecipeFilter_label|RecipeFilter_description")
+    MINT::AIReference.create(:name=>"RecipeFilter_label",:label=>"Suchkriterien",:states =>[:organized])
+    MINT::AIContext.new(:name=>"RecipeFilter_description",:states =>[:organized],
+                        :text=>"In diesem Feld koennen Sie mit genauen Angaben zu Ihrem Gericht-Wunsch die Suche nach Ihrem Rezeptvorschlag eingrenzen.")
+    MINT::AIContainer.create(:name=>"RecipeFilter_content",:states =>[:organized])
+
+
+    @test = MINT::CIC.create( :name => "RecipeFinder_content", :rows => 1, :cols=> 1,:x=>0, :y=>0, :width =>800, :height => 600)
+
+    @test.calculate_container(solver,10)
+    @test
+  end
+
+end

data/spec/examples/browserscreen_reload_to_cuicontrol_refresh_all.xml

@@ -0,0 +1,12 @@
+<mapping name="BrowserScreen reload to CUIControl refresh all" xmlns="http://www.multi-access.de" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+         xsi:schemaLocation="http://www.multi-access.de mint-mappings.xsd">
+  <operator type="sequential" id="1">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMedia.Screen.BrowserScreen" states="reloaded"  process="onchange"/>
+    </observations>
+    <actions>
+      <backend id="2222" call="refresh_all" class="CUIControl" />
+    </actions>
+  </operator>
+</mapping>
+

data/spec/examples/mim_streaming_example.xml

@@ -0,0 +1,9 @@
+<?xml version='1.0'?>
+<mim name="Streaming Example" xmlns="http://www.multi-access.de"
+         xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+         xsi:schemaLocation="http://www.multi-access.de mint-mappings.xsd">
+
+  <include href="reset_click.xml"/>
+  <include href="mouse_highlight.xml" start="true"/>
+  <include href="browserscreen_reload_to_cuicontrol_refresh_all.xml" start="true"/>
+</mim>

data/spec/examples/mouse_highlight.xml

@@ -0,0 +1,22 @@
+<mapping name="Mouse Interactor Highlighting" xmlns="http://www.multi-access.de"
+         xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+         xsi:schemaLocation="http://www.multi-access.de mint-mappings.xsd">
+
+  <operator type="complementary"  id="33113" >
+    <observations>
+      <observation id="111" interactor="Interactor.IR.IRMode.Pointer.Mouse" name="mouse" states="stopped" result="p" process="onchange"/>
+    </observations>
+    <actions>
+      <backend id="2222" call="find_cio_from_coordinates" class="CUIControl" parameter="p"/>
+    </actions>
+  </operator>
+
+</mapping>
+
+        <!--
+  o3 = Observation.new(:element =>"Interactor.Pointer.Mouse",:name => "mouse", :states =>[:stopped], :result => "p")
+  a2 = BackendAction.new(:call => CUIControl.method(:find_cio_from_coordinates),:parameter => "p")
+  m2 = ComplementaryMapping.new(:name=>"Mouse Interactor Highlighting", :observations => [o3],:actions =>[a2])
+  m2.start
+
+                        -->

data/spec/examples/performance_mapping.xml

@@ -0,0 +1,15 @@
+<mapping name="Performance Mapping" xmlns="http://www.multi-access.de"
+         xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+         xsi:schemaLocation="http://www.multi-access.de mint-mappings.xsd">
+
+  <operator type="sequential"  id="33113" >
+    <observations>
+      <observation id="111" interactor="Interactor.InteractorTest" name="test" states="organized" result="p" process="onchange"/>
+      <observation id="5" interactor="Interactor.PerformanceCounter" state="initialized" result="counter" process="instant"/>
+    </observations>
+    <actions>
+      <event id="6" type="finished" target="counter"/>
+    </actions>
+  </operator>
+</mapping>
+

data/spec/examples/reset_click.xml

@@ -0,0 +1,24 @@
+<mapping name="Reset Click" xmlns="http://www.multi-access.de"
+         xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+         xsi:schemaLocation="http://www.multi-access.de mint-mappings.xsd">
+
+  <operator type="sequential" id="1">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMode.Pointer.Mouse" name="mouse" states="left_pressed" result="p" process="onchange"/>
+      <observation id="3" interactor="Interactor.AIO.AIIN.AIINDiscrete.AICommand" name="reset" states="focused" result="c" process="instant"/>
+    </observations>
+    <actions>
+      <event id="4" type="activate" target="c"/>
+    </actions>
+  </operator>
+
+</mapping>
+
+        <!--
+
+o4 = Observation.new(:element =>"Interactor.Pointer.Mouse",:name => "mouse", :states =>[:pressed], :result => "p")
+o5 = Observation.new(:element =>"Interactor.AIO.AIIN.AIINDiscrete.AICommand",:name => "reset", :continuous => true, :states =>[:focused], :result => "c")
+a3 = EventAction.new(:event => :activate,:target => "c")
+m3 = ComplementaryMapping.new(:name=>"Reset Click",:observations => [o4,o5],:actions =>[a3])
+m3.start
+        -->

data/spec/interactor_test.scxml

@@ -0,0 +1,32 @@
+<scxml initial="initialized" name="InteractorTest" version="0.9" xmlns="http://www.w3.org/2005/07/scxml"><!--   node-size-and-position x=0.0 y=0.0 w=630.0 h=510.0  -->
+ <state id="organized"><!--   node-size-and-position x=10.0 y=130.0 w=80.0 h=30.0  -->
+  <transition event="suspend" target="suspended"><!--   edge-path [suspended]  x=160.0 y=160.0 pointx=0.0 pointy=4.0 offsetx=-4.0 offsety=2.0  --></transition>
+  <transition event="present" target="presenting"><!--   edge-path [presenting]  x=50.0 y=260.0  --></transition>
+ </state>
+ <state id="initialized"><!--   node-size-and-position x=10.0 y=40.0 w=80.0 h=30.0  -->
+  <transition event="organize" target="organized"></transition>
+ </state>
+ <parallel id="presenting"><!--   node-size-and-position x=80.0 y=180.0 w=530.0 h=330.0  -->
+  <transition event="suspend" target="suspended"></transition>
+  <state id="f" initial="defocused"><!--   node-size-and-position x=60.0 y=40.0 w=340.0 h=100.0  -->
+   <state id="defocused"><!--   node-size-and-position x=30.0 y=40.0 w=80.0 h=30.0  -->
+    <transition event="focus" target="focused"><!--   edge-path [focused]  x=180.0 y=80.0  --></transition>
+   </state>
+   <state id="focused"><!--   node-size-and-position x=250.0 y=40.0 w=80.0 h=30.0  -->
+    <transition event="defocus" target="defocused"><!--   edge-path [defocused]  x=180.0 y=30.0  --></transition>
+   </state>
+  </state>
+  <state id="g" initial="in"><!--   node-size-and-position x=50.0 y=180.0 w=340.0 h=100.0  -->
+   <state id="in"><!--   node-size-and-position x=30.0 y=40.0 w=80.0 h=30.0  -->
+    <transition event="out" target="out"><!--   edge-path [out]  x=180.0 y=80.0  --></transition>
+   </state>
+   <state id="out"><!--   node-size-and-position x=250.0 y=40.0 w=80.0 h=30.0  -->
+    <transition event="in" target="in"><!--   edge-path [in]  x=180.0 y=30.0  --></transition>
+   </state>
+  </state>
+ </parallel>
+ <state id="suspended"><!--   node-size-and-position x=190.0 y=60.0 w=80.0 h=30.0  -->
+  <transition event="present" target="presenting"><!--   edge-path [presenting]  x=290.0 y=140.0  --></transition>
+  <transition event="organize" target="organized"><!--   edge-path [organized]  pointx=0.0 pointy=11.0 offsetx=2.0 offsety=-1.0  --></transition>
+ </state>
+</scxml>

data/spec/interactor_test_2.scxml

@@ -0,0 +1,16 @@
+<scxml initial="initialized" name="InteractorTest" version="0.9" xmlns="http://www.w3.org/2005/07/scxml"><!--   node-size-and-position x=0.0 y=0.0 w=630.0 h=510.0  -->
+ <state id="initialized"><!--   node-size-and-position x=10.0 y=40.0 w=80.0 h=30.0  -->
+  <transition event="present" target="presenting"></transition>
+ </state>
+ <state id="presenting" initial="step1"><!--   node-size-and-position x=60.0 y=180.0 w=530.0 h=330.0  -->
+  <state id="step1"><!--   node-size-and-position x=30.0 y=70.0 w=100.0 h=100.0  -->
+   <transition event="step" target="step2"></transition>
+  </state>
+  <state id="step2"><!--   node-size-and-position x=190.0 y=70.0 w=100.0 h=100.0  -->
+   <transition event="step" target="step3"></transition>
+  </state>
+  <state id="step3"><!--   node-size-and-position x=350.0 y=60.0 w=100.0 h=100.0  -->
+   <transition event="step" target="initialized"></transition>
+  </state>
+ </state>
+</scxml>