MINT-core 1.0.1 → 2.0.0

data/lib/MINT-core/model/mim/mouse_stop_to_cio_highlight.xml

@@ -0,0 +1,13 @@
+<mapping name="Sync Mouse stop to CIO highlight"  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" states="stopped" result="p" process="onchange"/>
+    </observations>
+    <actions>
+      <backend id="2222" call="find_cio_from_coordinates" class="CUIControl" parameter="p"/>
+    </actions>
+  </operator>
+
+</mapping>

data/lib/MINT-core/model/mim/onehandposnav_confirm_to_aichoiceelement_choose.xml

@@ -0,0 +1,14 @@
+<mapping name="OneHandPoseNavigation confirm to AIChoiceElement choose" 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 id="1" type="sequential">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMode.Body.Hand.Pose.OneHandPoseNavigation" states="confirmed"  process="onchange" />
+      <observation id="3" interactor="Interactor.AIO.AIIN.AIINDiscrete.AIReference.AIChoiceElement" states="focused" result="aic" process="instant" />
+    </observations>
+    <actions>
+      <event id="4" type="choose" target="aic"/>
+    </actions>
+  </operator>
+</mapping>

data/lib/MINT-core/model/mim/onehandposnav_next_to_aio_next.xml

@@ -0,0 +1,14 @@
+<mapping name="OneHandPoseNavigation next to AIO next" 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 id="1" type="sequential">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMode.Body.Hand.Pose.OneHandPoseNavigation" states="next"  process="onchange" />
+      <observation id="3" interactor="Interactor.AIO" states="focused" result="aio" process="instant" />
+    </observations>
+    <actions>
+      <event id="4" type="next" target="aio"/>
+    </actions>
+  </operator>
+</mapping>

data/lib/MINT-core/model/mim/onehandposnav_previous_to_aio_prev.xml

@@ -0,0 +1,14 @@
+<mapping name="OneHandPoseNavigation previous to AIO prev" 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 id="1" type="sequential">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMode.Body.Hand.Pose.OneHandPoseNavigation" states="previous"  process="onchange" />
+      <observation id="3" interactor="Interactor.AIO" states="focused" result="aio" process="instant" />
+    </observations>
+    <actions>
+      <event id="4" type="prev" target="aio"/>
+    </actions>
+  </operator>
+</mapping>

data/lib/MINT-core/model/mim/radiobutton_selected_to_aisinglechoiceelement_choose.xml

@@ -0,0 +1,13 @@
+<mapping name="Sync RadioButton selected to AISingleChoiceElement choose" 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.CIO.RadioButton" states="selected" result="cio" process="onchange"/>
+      <observation id="3" type="negation" interactor="Interactor.AIO.AIIN.AIINDiscrete.AIReference.AIChoiceElement.AISingleChoiceElement" name="cio.name" states="chosen" result="aio" process="instant"/>
+    </observations>
+    <actions>
+      <event id="4" type="choose" target="aio"/>
+    </actions>
+  </operator>
+</mapping>
+

data/lib/MINT-core/model/mim/radiobutton_unselected_to_aisinglechoiceelement_unchoose.xml

@@ -0,0 +1,13 @@
+<mapping name="Sync RadioButton unselected to AISingleChoiceElement unchoose" 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.CIO.RadioButton" states="unselected" result="cio" process="onchange"/>
+      <observation id="3" type="negation" interactor="Interactor.AIO.AIIN.AIINDiscrete.AIReference.AIChoiceElement.AISingleChoiceElement" name="cio.name" states="listed" result="aio" process="instant"/>
+    </observations>
+    <actions>
+      <event id="4" type="unchoose" target="aio"/>
+    </actions>
+  </operator>
+</mapping>
+

data/lib/MINT-core/model/mim/right_button_aisinglepresence_prev.xml

@@ -0,0 +1,15 @@
+<mapping name="Right Button click to AISinglePresence prev" 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 id="1" type="sequential">
+    <observations>
+      <observation id="2" interactor="Interactor.IR.IRMode.Pointer.Mouse" states="right_pressed"  process="onchange" />
+      <observation id="3" interactor="Interactor.AIO.AIOUT.AIContainer.AISinglePresence" states="entered" result="ais" process="instant" />
+    </observations>
+    <actions>
+      <event id="4" type="prev" target="ais"/>
+    </actions>
+  </operator>
+
+</mapping>

data/lib/MINT-core/model/task.rb

@@ -5,12 +5,12 @@ module MINT
   # A {Task} defines the basic control flow object, has a {#parent} task, unless it's the root task and a textual,
   # unstructured {#description}.
   #
-  class Task < Element
+  class Task < Interactor
     #    belongs_to :parent, "Task"
     property :description, Text
 
     def initialize_statemachine
-      if @statemachine.blank?
+      if @statemachine.nil?
 
         @statemachine = Statemachine.build do
           trans :initialized, :run, :running
@@ -22,10 +22,10 @@ module MINT
 
 
 # Each {InteractionTask} is linked to one abstract interaction container
-# {MINT::AIC}
+# {MINT::AIContainer}
 #
   class InteractionTask < Task
-    #   has 1, :AIC @TODO - Mappings unklar
+    #   has 1, :AIContainer @TODO - Mappings unklar
     belongs_to :pts, "PTS"
   end
 
@@ -58,9 +58,9 @@ module MINT
 # A Presentation Task set {PTS} contains a set of active interaction tasks that should be presented or manipulated by the
 # user
 #
-  class PTS < Element
+  class PTS < Interactor
     def initialize_statemachine
-      if @statemachine.blank?
+      if @statemachine.nil?
         @statemachine = Statemachine.build do
           trans :initialized, :calculate, :calculating
           trans :calculating, :done, :finished

data/spec/AICommand_spec.rb

@@ -0,0 +1,20 @@
+require "spec_helper"
+
+require "em-spec/rspec"
+require File.expand_path(File.join(File.dirname(__FILE__), 'shared/aio_shared'))
+
+describe 'AUI' do
+
+  before :each do
+    Redis.connect.flushall
+    @interactor_class =  MINT::AICommand
+  end
+
+  it_should_behave_like 'An AIO interactor'
+
+  describe 'AICommand' do
+
+
+  end
+
+end

data/spec/AIContainer_spec.rb

@@ -0,0 +1,161 @@
+require "spec_helper"
+require "em-spec/rspec"
+
+describe 'AUI' do
+  include EventMachine::SpecHelper
+
+  before :all do
+    class ::Helper
+      def self.create_structure
+        MINT::AIContainer.create(:name=>"a", :children =>"e1|e2|e3")
+        MINT::AIO.create(:name => "e1", :parent=>"a")
+        MINT::AIO.create(:name => "e2", :parent=>"a")
+        MINT::AIO.create(:name => "e3", :parent=>"a")
+        MINT::AIContainer.first
+
+      end
+    end
+
+    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
+
+
+  describe 'AIContainer' do
+    it 'should initialize with initiated' do
+      connect do |redis|
+        @a = Helper.create_structure
+
+        @a.states.should ==[:initialized]
+        @a.new_states.should == [:initialized]
+      end
+    end
+
+    it 'should transform to organizing state ' do
+      connect do |redis|
+        @a = Helper.create_structure
+        @a.process_event(:organize).should ==[:organized]
+        @a.states.should == [:organized]
+        @a.new_states.should == [:organized]
+      end
+    end
+
+    it 'should support parent navigation' do
+      connect do |redis|
+        @a = Helper.create_structure
+        e = MINT::AIO.first(:name => "e1")
+        p = e.parent
+        p.should == @a
+      end
+    end
+
+    it 'should support navigation to child' do
+
+      connect do |redis|
+        @a = Helper.create_structure
+
+        aio = @a.children.first
+        aio.states=[:defocused]
+
+        @a.states = [:focused]
+
+        @a.process_event(:child)
+
+        @a.states.should ==[:defocused]
+        e = MINT::AIO.first(:name => "e1")
+        e.states.should ==[:focused]
+      end
+    end
+
+
+    it 'should transform all children to presented if presented' do
+      connect do |redis|
+        @a = Helper.create_structure
+        AUIControl.organize(@a,nil,0)
+        # @a.process_event(:organize).should ==[:organized]
+        @a.states.should == [:organized]
+        @a.new_states.should == [:organized]
+        @a.process_event(:present).should ==[:defocused]
+        @a.children.each do |c|
+          c.states.should == [:defocused]
+        end
+      end
+    end
+
+    it 'should transform all children to suspended if suspended' do
+      connect do |redis|
+        @a = Helper.create_structure
+        @a.children.each do |c|
+          c.states = [:defocused]
+        end
+        @a.states = [:focused]
+
+        @a.process_event(:suspend).should ==[:suspended]
+        @a.children.each do |c|
+          c.states.should == [:suspended]
+        end
+      end
+    end
+
+    it 'should transform all children to suspended if AUIControl.suspend_all is called' do
+          connect do |redis|
+            @b = MINT::AIContainer.create(:name=>"b", :children =>"a")
+            @b.states = [:defocused]
+
+            @a = Helper.create_structure
+            @a.parent = "b"
+
+            @a.children.each do |c|
+              c.states = [:defocused]
+              c.save
+            end
+            @a.states = [:focused]
+
+            #@b.process_event(:suspend).should ==[:suspended]
+            AUIControl.suspend_all
+
+            @a = MINT::AIContainer.first(:name=>"a")
+            @a.states.should == [:suspended]
+            @a.children.each do |c|
+              c.states.should == [:suspended]
+            end
+          end
+        end
+
+
+
+
+    it 'AIO should handle parent' do
+      connect do |redis|
+
+        MINT::AIContainer.create(:name=>"parent", :states => [:defocused],:children =>"a1")
+        MINT::AIContainer.create(:name=>"a1", :states => [:focused],:children =>"ee1|ee2|ee3",:parent=>"parent")
+        MINT::AIO.create(:name => "ee1",:states => [:defocused],:parent=>"a1")
+        MINT::AIO.create(:name => "ee2",:states => [:defocused],:parent=>"a1")
+        MINT::AIO.create(:name => "ee3",:states => [:defocused],:parent=>"a1")
+        @a = MINT::AIContainer.first(:name => "a1")
+        b = MINT::AIContainer.first(:name => "parent")
+
+
+        @a.states.should == [:focused]
+        #b =  MINT2::AIContainer.create(:name=>"parent",:children =>[@a])
+        b.states.should == [:defocused]
+        @a.process_event(:parent)
+
+        @a.states.should ==[:defocused]
+
+        b = MINT::AIContainer.first(:name => "parent")
+        b.states.should ==[:focused]
+      end
+    end
+
+  end
+end

data/spec/AIINContinuous_spec.rb

@@ -0,0 +1,92 @@
+require "spec_helper"
+
+require "em-spec/rspec"
+
+
+describe 'AUI' 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 'AIINContinuous' do
+    it 'should initialize with initiated' do
+
+      connect true do |redis|
+        test_state_flow redis,"Interactor.AIO.AIIN.AIINContinuous.a" ,%w(initialized)  do
+
+          MINT::AIINContinuous.new(:name=>"a").save
+          @a = MINT::AIINContinuous.first
+          @a.states.should ==[:initialized]
+          @a.new_states.should == [:initialized]
+        end
+        #MINT::Interactor.redis redis
+      end
+    end
+
+    it 'should transform to organizing state ' do
+      connect  true do |redis|
+        test_state_flow redis,"Interactor.AIO.AIIN.AIINContinuous.a" ,%w(initialized organized)   do
+
+          MINT::AIINContinuous.new(:name=>"a").save
+          @a = MINT::AIINContinuous.first
+
+          @a.process_event(:organize).should ==[:organized]
+          @a.states.should == [:organized]
+          @a.new_states.should == [:organized]
+        end
+      end
+    end
+
+    it 'should transform to progressing and regressing state and publishvalue' do
+      connect true  do |redis|
+        test_state_flow redis,"Interactor.AIO.AIIN.AIINContinuous.a" , [ "initialized", "organized",  ["presenting", "defocused"],["focused","waiting"],["moving", "progressing"],"regressing"] do
+          Fiber.new{
+          MINT::AIINContinuous.new(:name=>"a").save
+          @a = MINT::AIINContinuous.first
+
+          @a.process_event(:organize).should ==[:organized]
+
+          @a.process_event(:present).should ==[:defocused]
+          @a.process_event(:focus).should ==[:waiting]
+
+          channel_name = "in_channel:Interactor.AIO.AIIN.AIINContinuous.a:testuser"
+
+          RedisConnector.redis.publish(channel_name,"10")
+          RedisConnector.redis.publish(channel_name,"5")
+          }.resume
+        end
+      end
+      #@a.process_event(:move).should ==[:focused, :progressing]
+
+      #redis2 = EventMachine::Hiredis.connect
+      #redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>10,:name=>"a"}.to_json).callback { |c|
+      #  @a.data.should==10
+      #  redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>20,:name=>"a"}.to_json).callback { |c|
+      #    @a.data.should==20
+      #    @a.new_states.should==[:progressing,:moving, :c]
+      #    redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>10,:name=>"a"}.to_json).callback { |c|
+      #      @a.data.should==10
+      #      @a.new_states.should==[:regressing]
+      #      done
+      #    }
+      #  }
+      #}
+      #
+
+
+
+    end
+
+  end
+end

data/spec/AIOUTContinuous_spec.rb

@@ -0,0 +1,93 @@
+require "spec_helper"
+
+require "em-spec/rspec"
+
+
+describe 'AUI' 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 'AIOUTContinuous' do
+    it 'should initialize with initiated' do
+
+      connect true do |redis|
+        test_state_flow redis,"Interactor.AIO.AIOUT.AIOUTContinuous.a" ,%w(initialized)  do
+
+          MINT::AIOUTContinuous.new(:name=>"a").save
+          @a = MINT::AIOUTContinuous.first
+          @a.states.should ==[:initialized]
+          @a.new_states.should == [:initialized]
+        end
+        #MINT::Interactor.redis redis
+      end
+    end
+
+    it 'should transform to organizing state ' do
+      connect  true do |redis|
+        test_state_flow redis,"Interactor.AIO.AIOUT.AIOUTContinuous.a" ,%w(initialized organized)   do
+
+          MINT::AIOUTContinuous.new(:name=>"a").save
+          @a = MINT::AIOUTContinuous.first
+
+          @a.process_event(:organize).should ==[:organized]
+          @a.states.should == [:organized]
+          @a.new_states.should == [:organized]
+        end
+      end
+    end
+
+    it 'should transform to progressing and regressing state and consume value' do
+      connect true  do |redis|
+        test_state_flow redis,"Interactor.AIO.AIOUT.AIOUTContinuous.a" , [ "initialized", "organized",  ["presenting", "f", "p", "defocused", "waiting"],"focused",["moving", "progressing"],"regressing"] do
+          Fiber.new {
+            MINT::AIOUTContinuous.new(:name=>"a").save
+            @a = MINT::AIOUTContinuous.first
+
+            @a.process_event(:organize).should ==[:organized]
+
+            @a.process_event(:present).should ==[:defocused, :waiting]
+            @a.process_event(:focus).should ==[:focused, :waiting]
+
+            channel_name = @a.create_attribute_channel_name('data')
+
+            redis.publish(channel_name,MultiJson.encode({:data=>10,:name=>"a"}))
+            redis.publish(channel_name,MultiJson.encode({:data=>5,:name=>"a"}))
+
+          }.resume
+        end
+      end
+      #@a.process_event(:move).should ==[:focused, :progressing]
+
+      #redis2 = EventMachine::Hiredis.connect
+      #redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>10,:name=>"a"}.to_json).callback { |c|
+      #  @a.data.should==10
+      #  redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>20,:name=>"a"}.to_json).callback { |c|
+      #    @a.data.should==20
+      #    @a.new_states.should==[:progressing,:moving, :c]
+      #    redis2.publish("Interactor.AIO.AIOUT.AIOUTContinuous.data.a",{:data=>10,:name=>"a"}.to_json).callback { |c|
+      #      @a.data.should==10
+      #      @a.new_states.should==[:regressing]
+      #      done
+      #    }
+      #  }
+      #}
+      #
+
+
+
+    end
+
+  end
+end