MINT-core 1.0.1 → 2.0.0

data/spec/performance_counter.scxml

@@ -0,0 +1,9 @@
+<scxml initial="initialized" name="PerformanceCounter" 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 cond="counter &lt; (amount-1)" event="finished">
+   <invoke src="inc_counter" type="x-mint"></invoke>
+  </transition>
+  <transition cond="counter == (amount-1)" event="finished" target="finished"></transition>
+ </state>
+ <state id="finished"><!--   node-size-and-position x=30.0 y=140.0 w=100.0 h=40.0  --></state>
+</scxml>

data/spec/sequential_mappings_spec.rb

@@ -0,0 +1,69 @@
+require "spec_helper"
+
+require "em-spec/rspec"
+
+describe 'In a sequential mapping' do
+  include EventMachine::SpecHelper
+
+  before :all do
+    connection_options = { :adapter => "redis"}
+    DataMapper.setup(:default, connection_options)
+
+
+    connect do |redis|
+      require "MINT-core"
+      class Logging
+        def self.log(mapping,data)
+          p "log: #{mapping} #{data}"
+        end
+      end
+      DataMapper.finalize
+      DataMapper::Model.raise_on_save_failure = true
+    end
+  end
+
+  it 'observations and events should handle list of interactors' do
+    def my_callback(mapping_name,data)
+      if mapping_name.eql? "Reset Click"
+        @data << data
+      end
+    end
+
+
+    connect true do |redis|
+      m = MappingManager.new
+
+      def my_callback(mapping_name,data)
+        p data
+
+      end
+
+      m.register_callback("BrowserScreen reload to CIO refresh", method(:my_callback))
+      m.load("#{File.dirname(__FILE__)}/examples/mim_streaming_example.xml")
+
+
+      check_result = Proc.new {
+        MINT::CIO.first(:name=>"c1").states.should ==[:displayed]
+        MINT::CIO.first(:name=>"c2").states.should ==[:displayed]
+        MINT::CIO.first(:name=>"c3").states.should ==[:hidden]
+
+        done
+      }
+
+      test_complex_state_flow_w_name redis,[["Interactor.CIO","c1" ,["refreshing",["displaying", "init_js"],"displayed"]],["Interactor.CIO","c2" ,["refreshing",["displaying", "init_js"],"displayed"]],["Interactor.CIO","c3" ,["refreshing_while_hidden","hidden"]]],check_result do  |count|
+        Fiber.new{
+          b = MINT::BrowserScreen.create(:name=>'screen')
+          MINT::AIO.create(:name =>"c1", :states=>[:presenting])
+                    MINT::AIO.create(:name =>"c2", :states=>[:presenting])
+                    MINT::AIO.create(:name =>"c3", :states=>[:suspended])
+
+          MINT::CIO.create(:name =>"c1", :states=>[:displayed])
+          MINT::CIO.create(:name =>"c2", :states=>[:displayed])
+          MINT::CIO.create(:name =>"c3", :states=>[:hidden])
+
+          b.process_event :reload
+        }.resume
+      end
+    end
+  end
+end

data/spec/shared/aio_shared.rb

@@ -0,0 +1,144 @@
+share_examples_for 'An AIO interactor' 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
+
+  it 'should publish initialize when created' do
+    connect true  do |redis|
+      test_state_flow redis,@interactor_class.create_channel_name+".test" ,%w(initialized) do
+        @interactor_class.create(:name => "test")
+      end
+    end
+  end
+
+  it 'should change to initialized when created' do
+    @a = @interactor_class.create(:name => "test")
+    @a.states.should ==[:initialized]
+    @a.new_states.should == [:initialized]
+  end
+
+  it 'should save with correct identifier' do
+    @a = @interactor_class.create(:name => "test")
+    redis = Redis.connect
+    r = redis.hgetall("mint_interactors:"+@interactor_class.getModel+"test")
+    r['name'].should == "test"
+  end
+
+  it 'should transform to organizing state for present action' do
+    @a = @interactor_class.create(:name => "test")
+    @a.process_event(:organize).should ==[:organized]
+    @a.states.should == [:organized]
+    @a.new_states.should == [:organized]
+  end
+
+  it 'should recover state after save and reload' do
+    @a = @interactor_class.create(:name => "test")
+    @a.process_event(:organize).should == [:organized]
+    @a.save
+    b =  @interactor_class.first(:mint_model =>@interactor_class.getModel, :name => "test")
+    b.states.should == [:organized]
+  end
+
+  describe "and basic navigation" do
+    it "should save prev/next links" do
+      a = @interactor_class.create(:name => "test")
+      b = @interactor_class.create(:name=>"next")
+      a.next = "next"
+      b.previous = "test"
+      b.save.should == true
+      a.save.should == true
+
+      n = @interactor_class.first(:name=>"next")
+      n.previous.should == a
+
+      m = @interactor_class.first(:name=>"test")
+      m.next.should == b
+    end
+
+    it 'should move focus to next element upon next' do
+      a = @interactor_class.create(:name => "test",:next => "next")
+      b = @interactor_class.create(:name=>"next",:previous => "test")
+
+      a.process_event(:organize)
+      b.process_event(:organize)
+
+      a.process_event(:present)
+      b.process_event(:present)
+
+      a.process_event(:focus).should include :focused
+      a.process_event(:next).should include :defocused
+
+      b = @interactor_class.first(:name=>"next")
+      b.states.should include :focused
+      a.states.should include :defocused
+    end
+
+    it 'should move focus to previous element upon previous' do
+      a = @interactor_class.create(:name => "test",:next => "next")
+      b = @interactor_class.create(:name=>"next",:previous => "test")
+
+      a.process_event(:organize)
+      b.process_event(:organize)
+
+      a.process_event(:present)
+      b.process_event(:present)
+
+      b.process_event(:focus).should include :focused
+      b.process_event(:prev).should include :defocused
+
+      a = @interactor_class.first(:name=>"test")
+      a.states.should include :focused
+      b.states.should include :defocused
+    end
+
+    it 'should not defocus on next if there is no next element' do
+      a = @interactor_class.create(:name => "test")
+      a.process_event(:organize)
+
+      a.process_event(:present)
+
+      a.process_event(:focus).should include :focused
+      a.process_event(:next)
+      a.states.should include :focused
+    end
+
+    it 'should not defocus on previous if there is no previous element' do
+      a = @interactor_class.create(:name => "test")
+      a.process_event(:organize)
+
+      a.process_event(:present)
+
+      a.process_event(:focus).should include :focused
+      a.process_event(:prev).should include :focused
+    end
+
+    it 'should move focus to parent upon parent' do
+      a = @interactor_class.create(:name => "test",:parent =>"parent")
+      b =  MINT::AIContainer.create(:name=>"parent",:children =>["test"])
+
+      a.process_event(:organize)
+      b.process_event(:organize)
+
+      a.process_event(:present)
+      b.process_event(:present)
+
+      a.process_event(:focus).should include :focused
+      a.process_event(:parent).should include :defocused
+
+      b = MINT::AIContainer.first(:name=>"parent")
+      b.states.should include :focused
+      a.states.should include :defocused
+
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -1,7 +1,26 @@
 $:.unshift(File.dirname(__FILE__) + '/../lib')
 
 require 'rubygems'
-require "spec"
-require "MINT-core"
-require "MINT-scxml"
+require "rspec"
+require "bundler/setup"
+require 'statemachine'
+require "cassowary"
+require 'RMagick'
+require 'drb/drb'
+require 'redis'
+require 'dm-core'
+require 'dm-serializer'
+require 'dm-types'
+require 'eventmachine'
+require 'em-hiredis'
+require 'em-spec/rspec'
 
+require 'support/connection_helper'
+require 'support/statemachine_helper'
+require 'stringio'
+
+RSpec.configure do |config|
+  config.include ConnectionHelper
+  config.include StatemachineHelper
+  config.include EventMachine::SpecHelper
+end

data/spec/spontaneous.scxml

@@ -0,0 +1,11 @@
+<scxml initial="initialized" name="Spontaneous" version="0.9" xmlns="http://www.w3.org/2005/07/scxml"><!--   node-size-and-position x=0.0 y=0.0 w=885.0 h=723.0  -->
+ <state id="initialized"><!--   node-size-and-position x=220.0 y=130.0 w=100.0 h=40.0  -->
+  <transition event="position" target="superstate"></transition>
+ </state>
+ <state id="superstate" initial="positioning"><!--   node-size-and-position x=180.0 y=220.0 w=160.0 h=190.0  -->
+  <state id="positioned"><!--   node-size-and-position x=20.0 y=130.0 w=100.0 h=40.0  --></state>
+  <state id="positioning"><!--   node-size-and-position x=10.0 y=40.0 w=100.0 h=40.0  -->
+   <transition target="positioned"></transition>
+  </state>
+ </state>
+</scxml>

data/spec/support/connection_helper.rb

@@ -0,0 +1,19 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+require "MINT-core/connector/redis_connector"
+
+
+module ConnectionHelper
+  def connect(wait = false, timeout = 10, &blk)
+    em(timeout) do
+      RedisConnector.reset
+      redis = RedisConnector.redis
+
+        redis.flushall.callback {
+          blk.call(redis)
+          EM.stop_event_loop if not wait
+        }
+
+    end
+  end
+end

data/spec/support/redis_connector_monkey_patch.rb

@@ -0,0 +1 @@
+

data/spec/support/statemachine_helper.rb

@@ -0,0 +1,84 @@
+module StatemachineHelper
+  def test_state_flow(redis, channel, expected_states, &blk)
+    redis.pubsub.subscribe(channel) { |message|
+      # p [:message, channel, message]
+      m = MultiJson.decode message
+      r = expected_states.shift
+      r = r.lines.to_a if r.is_a? String
+      m["new_states"].should == r
+
+      done if expected_states.length==0
+    }.callback {blk.call}
+
+    EM.add_timer(3) {
+      raise "failed to wait for state change to >>#{expected_states.first}<<, which not occurred during the last 3 seconds"
+      done # EM.stop
+    }
+  end
+
+  def test_state_flow_w_name(redis, channel, name, expected_states, cb,  &blk)
+    redis.pubsub.subscribe(channel+".#{name}") { |message|
+      m = MultiJson.decode message
+      if m["name"].eql? name
+        #p [:message, channel, message]
+        r = expected_states.shift
+        r = r.lines.to_a if r.is_a? String
+        m["new_states"].should == r
+
+        if expected_states.length==0
+         redis.pubsub.unsubscribe(channel+".#{name}")
+          cb.call
+        end
+
+      end
+    }.callback {blk.call}
+
+    EM.add_timer(60) {
+      raise "failed to wait for state change to >>#{expected_states.first}<<, which not occurred during the last 3 seconds"
+      done # EM.stop
+
+    }
+  end
+
+  def test_complex_state_flow_w_name(redis, interactors, cb,  &blk)
+
+    @counter = interactors.size
+    res_cb_new = Proc.new do
+      @counter -=1
+      cb.call if @counter == 0
+    end
+
+    @subcounter = interactors.size
+    sub_cb_new = Proc.new do
+      @subcounter -=1
+      blk.call if @subcounter == 0
+    end
+
+    interactors.each do |i|
+      channel, name, expected_states = i
+      test_state_flow_w_name(redis, channel, name, expected_states, res_cb_new,  &sub_cb_new)
+    end
+
+
+  end
+
+
+  def test_msg_flow (redis,channel,interactor,attribute,value, publish_data)
+
+    #redis.subscribe(interactor.create_channel_name).callback {blk.call}
+
+    #   redis.on(:message) { |c, message|
+
+    end_reached = publish_data.length
+    publish_data.each_with_index do |data,i|
+      redis.publish(channel,MultiJson.encode(data.to_json)).callback { |c|
+        #interactor.method(attribute).call.should == value[i]
+        done if end_reached == i
+      }
+    end
+
+  end
+end
+
+
+

data/spec/sync_mappings_spec.rb

@@ -0,0 +1,96 @@
+
+require "spec_helper"
+
+require "em-spec/rspec"
+
+require "cui_helper"
+
+
+describe 'Sync wth AIO' do
+  include EventMachine::SpecHelper
+
+  before :all do
+    connection_options = { :adapter => "redis"}
+    DataMapper.setup(:default, connection_options)
+
+
+    connect do |redis|
+      require "MINT-core"
+      class Logging
+        def self.log(mapping,data)
+          p "log: #{mapping} #{data}"
+        end
+      end
+      DataMapper.finalize
+      DataMapper::Model.raise_on_save_failure = true
+    end
+  end
+
+  it 'should sync highlight movements of CIO  to AUI' do
+    connect true do |redis|
+
+      # Sync AIO to defocused
+      parser = MINT::MappingParser.new
+      m = parser.build_from_scxml File.dirname(__FILE__) +"/../lib/MINT-core/model/mim/cio_display_to_aio_defocus.xml"
+      m.start
+
+      # Sync AIO to focused
+      parser = MINT::MappingParser.new
+      m = parser.build_from_scxml File.dirname(__FILE__) +"/../lib/MINT-core/model/mim/cio_highlight_to_aio_focus.xml"
+      m.start
+
+      check_result = Proc.new {
+        MINT::AIO.first(:name=>"left").states.should ==[:focused]
+        MINT::CIO.first(:name=>"left").states.should ==[:highlighted]
+        MINT::AIO.first(:name=>"center").states.should ==[:defocused]
+
+        done
+      }
+
+
+      test_complex_state_flow_w_name redis,[["Interactor.CIO","center" ,["initialized","displayed"]],["Interactor.AIO","center" ,["defocused"]]],check_result do  |count|
+        center = CUIHelper.scenario2
+        p "testcound:#{count}"
+        center.process_event(:left).should ==[:displayed]
+      end
+
+#
+    end
+  end
+
+  it 'should sync AUI focus movements to CUI' do
+    connect true do |redis|
+
+      # Sync CIO to displayed
+      parser = MINT::MappingParser.new
+      m = parser.build_from_scxml File.dirname(__FILE__) +"/../lib/MINT-core/model/mim/aio_defocus_to_cio_unhighlight.xml"
+      m.start
+
+      # Sync CIO to highlighted
+      parser = MINT::MappingParser.new
+      m = parser.build_from_scxml File.dirname(__FILE__) +"/../lib/MINT-core/model/mim/aio_focus_to_cio_highlight.xml"
+      m.start
+
+      check_result = Proc.new {
+        MINT::AIO.first(:name=>"left").states.should ==[:focused]
+        MINT::AIO.first(:name=>"center").states.should ==[:defocused]
+
+        MINT::CIO.first(:name=>"center").states.should ==[:displayed]
+        MINT::CIO.first(:name=>"left").states.should ==[:highlighted]
+
+        done
+      }
+
+      test_complex_state_flow_w_name  redis,[["Interactor.AIO","center" ,["defocused"]],["Interactor.CIO","center" ,["displayed"]]],check_result do  |count|
+        center = CUIHelper.scenario3
+        a_center = MINT::AIO.first(:name => "center")
+        a_center.process_event("next").should ==[:defocused]
+      end
+
+
+
+
+      #MINThighlightedst(:nameA>"dowleftates.should ==[:highlighted]
+    end
+  end
+end