hsume2-state_machine 1.0.1

data/test/unit/integrations_test.rb

@@ -0,0 +1,61 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+
+class IntegrationMatcherTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+  end
+  
+  def test_should_return_nil_if_no_match_found
+    assert_nil StateMachine::Integrations.match(@klass)
+  end
+  
+  def test_should_return_integration_class_if_match_found
+    integration = Module.new do
+      include StateMachine::Integrations::Base
+      
+      def self.available?
+        true
+      end
+      
+      def self.matches?(klass)
+        true
+      end
+    end
+    StateMachine::Integrations.const_set('Custom', integration)
+    
+    assert_equal integration, StateMachine::Integrations.match(@klass)
+  ensure
+    StateMachine::Integrations.send(:remove_const, 'Custom')
+  end
+end
+
+class IntegrationFinderTest < Test::Unit::TestCase
+  def test_should_find_base
+    assert_equal StateMachine::Integrations::Base, StateMachine::Integrations.find_by_name(:base)
+  end
+  
+  def test_should_find_active_model
+    assert_equal StateMachine::Integrations::ActiveModel, StateMachine::Integrations.find_by_name(:active_model)
+  end
+  
+  def test_should_find_active_record
+    assert_equal StateMachine::Integrations::ActiveRecord, StateMachine::Integrations.find_by_name(:active_record)
+  end
+  
+  def test_should_find_data_mapper
+    assert_equal StateMachine::Integrations::DataMapper, StateMachine::Integrations.find_by_name(:data_mapper)
+  end
+  
+  def test_should_find_mongo_mapper
+    assert_equal StateMachine::Integrations::MongoMapper, StateMachine::Integrations.find_by_name(:mongo_mapper)
+  end
+  
+  def test_should_find_sequel
+    assert_equal StateMachine::Integrations::Sequel, StateMachine::Integrations.find_by_name(:sequel)
+  end
+  
+  def test_should_raise_an_exception_if_invalid
+    exception = assert_raise(StateMachine::IntegrationNotFound) { StateMachine::Integrations.find_by_name(:invalid) }
+    assert_equal ':invalid is an invalid integration', exception.message
+  end
+end

data/test/unit/invalid_event_test.rb

@@ -0,0 +1,20 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+
+class InvalidEventTest < Test::Unit::TestCase
+  def setup
+    @object = Object.new
+    @invalid_event = StateMachine::InvalidEvent.new(@object, :invalid)
+  end
+  
+  def test_should_have_an_object
+    assert_equal @object, @invalid_event.object
+  end
+  
+  def test_should_have_an_event
+    assert_equal :invalid, @invalid_event.event
+  end
+  
+  def test_should_generate_a_message
+    assert_equal ':invalid is an unknown state machine event', @invalid_event.message
+  end
+end

data/test/unit/invalid_parallel_transition_test.rb

@@ -0,0 +1,18 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+
+class InvalidParallelTransitionTest < Test::Unit::TestCase
+  def setup
+    @object = Object.new
+    @events = [:ignite, :disable_alarm]
+    
+    @invalid_transition = StateMachine::InvalidParallelTransition.new(@object, @events)
+  end
+  
+  def test_should_have_an_object
+    assert_equal @object, @invalid_transition.object
+  end
+  
+  def test_should_have_events
+    assert_equal @events, @invalid_transition.events
+  end
+end

data/test/unit/invalid_transition_test.rb

@@ -0,0 +1,77 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+
+class InvalidTransitionTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    @machine = StateMachine::Machine.new(@klass)
+    @state = @machine.state :parked
+    @machine.event :ignite
+    
+    @object = @klass.new
+    @object.state = 'parked'
+    
+    @invalid_transition = StateMachine::InvalidTransition.new(@object, @machine, :ignite)
+  end
+  
+  def test_should_have_an_object
+    assert_equal @object, @invalid_transition.object
+  end
+  
+  def test_should_have_a_machine
+    assert_equal @machine, @invalid_transition.machine
+  end
+  
+  def test_should_have_an_event
+    assert_equal :ignite, @invalid_transition.event
+  end
+  
+  def test_should_have_a_qualified_event
+    assert_equal :ignite, @invalid_transition.qualified_event
+  end
+  
+  def test_should_have_a_from_value
+    assert_equal 'parked', @invalid_transition.from
+  end
+  
+  def test_should_have_a_from_name
+    assert_equal :parked, @invalid_transition.from_name
+  end
+  
+  def test_should_have_a_qualified_from_name
+    assert_equal :parked, @invalid_transition.qualified_from_name
+  end
+  
+  def test_should_generate_a_message
+    assert_equal 'Cannot transition state via :ignite from :parked', @invalid_transition.message
+  end
+end
+
+class InvalidTransitionWithNamespaceTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    @machine = StateMachine::Machine.new(@klass, :namespace => 'alarm')
+    @state = @machine.state :active
+    @machine.event :disable
+    
+    @object = @klass.new
+    @object.state = 'active'
+    
+    @invalid_transition = StateMachine::InvalidTransition.new(@object, @machine, :disable)
+  end
+  
+  def test_should_have_an_event
+    assert_equal :disable, @invalid_transition.event
+  end
+  
+  def test_should_have_a_qualified_event
+    assert_equal :disable_alarm, @invalid_transition.qualified_event
+  end
+  
+  def test_should_have_a_from_name
+    assert_equal :active, @invalid_transition.from_name
+  end
+  
+  def test_should_have_a_qualified_from_name
+    assert_equal :alarm_active, @invalid_transition.qualified_from_name
+  end
+end

data/test/unit/machine_collection_test.rb

@@ -0,0 +1,599 @@
+require File.expand_path(File.dirname(__FILE__) + '/../test_helper')
+
+class MachineCollectionByDefaultTest < Test::Unit::TestCase
+  def setup
+    @machines = StateMachine::MachineCollection.new
+  end
+  
+  def test_should_not_have_any_machines
+    assert @machines.empty?
+  end
+end
+
+class MachineCollectionStateInitializationTest < Test::Unit::TestCase
+  def setup
+    @machines = StateMachine::MachineCollection.new
+    
+    @klass = Class.new
+    
+    @machines[:state] = StateMachine::Machine.new(@klass, :state, :initial => :parked)
+    @machines[:alarm_state] = StateMachine::Machine.new(@klass, :alarm_state, :initial => lambda {|object| :active})
+    @machines[:alarm_state].state :active, :value => lambda {'active'}
+    
+    # Prevent the auto-initialization hook from firing
+    @klass.class_eval do
+      def initialize
+      end
+    end
+    
+    @object = @klass.new
+    @object.state = nil
+    @object.alarm_state = nil
+  end
+  
+  def test_should_raise_exception_if_invalid_option_specified
+    assert_raise(ArgumentError) {@machines.initialize_states(@object, :invalid => true)}
+  end
+  
+  def test_should_only_initialize_static_states_prior_to_block
+    @machines.initialize_states(@object) do
+      @state_in_block = @object.state
+      @alarm_state_in_block = @object.alarm_state
+    end
+    
+    assert_equal 'parked', @state_in_block
+    assert_nil @alarm_state_in_block
+  end
+  
+  def test_should_only_initialize_dynamic_states_after_block
+    @machines.initialize_states(@object) do
+      @alarm_state_in_block = @object.alarm_state
+    end
+    
+    assert_nil @alarm_state_in_block
+    assert_equal 'active', @object.alarm_state
+  end
+  
+  def test_should_initialize_all_states_without_block
+    @machines.initialize_states(@object)
+    
+    assert_equal 'parked', @object.state
+    assert_equal 'active', @object.alarm_state
+  end
+  
+  def test_should_skip_static_states_if_disabled
+    @machines.initialize_states(@object, :static => false)
+    assert_nil @object.state
+    assert_equal 'active', @object.alarm_state
+  end
+  
+  def test_should_initialize_existing_static_states_by_default
+    @object.state = 'idling'
+    @machines.initialize_states(@object)
+    assert_equal 'parked', @object.state
+  end
+  
+  def test_should_initialize_existing_static_states_if_forced
+    @object.state = 'idling'
+    @machines.initialize_states(@object, :static => :force)
+    assert_equal 'parked', @object.state
+  end
+  
+  def test_should_not_initialize_existing_static_states_if_not_forced
+    @object.state = 'idling'
+    @machines.initialize_states(@object, :static => true)
+    assert_equal 'idling', @object.state
+  end
+  
+  def test_should_skip_dynamic_states_if_disabled
+    @machines.initialize_states(@object, :dynamic => false)
+    assert_equal 'parked', @object.state
+    assert_nil @object.alarm_state
+  end
+  
+  def test_should_not_initialize_existing_dynamic_states_by_default
+    @object.alarm_state = 'inactive'
+    @machines.initialize_states(@object)
+    assert_equal 'inactive', @object.alarm_state
+  end
+  
+  def test_should_initialize_existing_dynamic_states_if_forced
+    @object.alarm_state = 'inactive'
+    @machines.initialize_states(@object, :dynamic => :force)
+    assert_equal 'active', @object.alarm_state
+  end
+  
+  def test_should_not_initialize_existing_dynamic_states_if_not_forced
+    @object.alarm_state = 'inactive'
+    @machines.initialize_states(@object, :dynamic => true)
+    assert_equal 'inactive', @object.alarm_state
+  end
+end
+
+class MachineCollectionFireTest < Test::Unit::TestCase
+  def setup
+    @machines = StateMachine::MachineCollection.new
+    
+    @klass = Class.new do
+      attr_reader :saved
+      
+      def save
+        @saved = true
+      end
+    end
+    
+    # First machine
+    @machines[:state] = @state = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @state.event :ignite do
+      transition :parked => :idling
+    end
+    @state.event :park do
+      transition :idling => :parked
+    end
+    
+    # Second machine
+    @machines[:alarm_state] = @alarm_state = StateMachine::Machine.new(@klass, :alarm_state, :initial => :active, :action => :save, :namespace => 'alarm')
+    @alarm_state.event :enable do
+      transition :off => :active
+    end
+    @alarm_state.event :disable do
+      transition :active => :off
+    end
+    
+    @object = @klass.new
+  end
+  
+  def test_should_raise_exception_if_invalid_event_specified
+    exception = assert_raise(StateMachine::InvalidEvent) { @machines.fire_events(@object, :invalid) }
+    assert_equal :invalid, exception.event
+    
+    exception = assert_raise(StateMachine::InvalidEvent) { @machines.fire_events(@object, :ignite, :invalid) }
+    assert_equal :invalid, exception.event
+  end
+  
+  def test_should_fail_if_any_event_cannot_transition
+    assert !@machines.fire_events(@object, :park, :disable_alarm)
+    assert_equal 'parked', @object.state
+    assert_equal 'active', @object.alarm_state
+    assert !@object.saved
+    
+    assert !@machines.fire_events(@object, :ignite, :enable_alarm)
+    assert_equal 'parked', @object.state
+    assert_equal 'active', @object.alarm_state
+    assert !@object.saved
+  end
+  
+  def test_should_run_failure_callbacks_if_any_event_cannot_transition
+    @machines[:state].after_failure {@state_failure_run = true}
+    @machines[:alarm_state].after_failure {@alarm_state_failure_run = true}
+    
+    assert !@machines.fire_events(@object, :park, :disable_alarm)
+    assert @state_failure_run
+    assert !@alarm_state_failure_run
+  end
+  
+  def test_should_be_successful_if_all_events_transition
+    assert @machines.fire_events(@object, :ignite, :disable_alarm)
+    assert_equal 'idling', @object.state
+    assert_equal 'off', @object.alarm_state
+    assert @object.saved
+  end
+  
+  def test_should_not_save_if_skipping_action
+    assert @machines.fire_events(@object, :ignite, :disable_alarm, false)
+    assert_equal 'idling', @object.state
+    assert_equal 'off', @object.alarm_state
+    assert !@object.saved
+  end
+end
+
+class MachineCollectionFireWithTransactionsTest < Test::Unit::TestCase
+  def setup
+    @machines = StateMachine::MachineCollection.new
+    
+    @klass = Class.new do
+      attr_accessor :allow_save
+      
+      def save
+        @allow_save
+      end
+    end
+    
+    StateMachine::Integrations.const_set('Custom', Module.new do
+      include StateMachine::Integrations::Base
+      
+      attr_reader :rolled_back
+      
+      def transaction(object)
+        @rolled_back = yield
+      end
+    end)
+    
+    # First machine
+    @machines[:state] = @state = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save, :integration => :custom)
+    @state.event :ignite do
+      transition :parked => :idling
+    end
+    
+    # Second machine
+    @machines[:alarm_state] = @alarm_state = StateMachine::Machine.new(@klass, :alarm_state, :initial => :active, :action => :save, :namespace => 'alarm', :integration => :custom)
+    @alarm_state.event :disable do
+      transition :active => :off
+    end
+    
+    @object = @klass.new
+  end
+  
+  def test_should_not_rollback_if_successful
+    @object.allow_save = true
+    
+    assert @machines.fire_events(@object, :ignite, :disable_alarm)
+    assert_equal true, @state.rolled_back
+    assert_nil @alarm_state.rolled_back
+    assert_equal 'idling', @object.state
+    assert_equal 'off', @object.alarm_state
+  end
+  
+  def test_should_rollback_if_not_successful
+    @object.allow_save = false
+    
+    assert !@machines.fire_events(@object, :ignite, :disable_alarm)
+    assert_equal false, @state.rolled_back
+    assert_nil @alarm_state.rolled_back
+    assert_equal 'parked', @object.state
+    assert_equal 'active', @object.alarm_state
+  end
+  
+  def test_should_run_failure_callbacks_if_not_successful
+    @object.allow_save = false
+    
+    @machines[:state].after_failure {@state_failure_run = true}
+    @machines[:alarm_state].after_failure {@alarm_state_failure_run = true}
+    
+    assert !@machines.fire_events(@object, :ignite, :disable_alarm)
+    assert @state_failure_run
+    assert @alarm_state_failure_run
+  end
+  
+  def teardown
+    StateMachine::Integrations.send(:remove_const, 'Custom')
+  end
+end
+
+class MachineCollectionFireWithValidationsTest < Test::Unit::TestCase
+  def setup
+    StateMachine::Integrations.const_set('Custom', Module.new do
+      include StateMachine::Integrations::Base
+      
+      def invalidate(object, attribute, message, values = [])
+        (object.errors ||= []) << generate_message(message, values)
+      end
+      
+      def reset(object)
+        object.errors = []
+      end
+    end)
+    
+    @klass = Class.new do
+      attr_accessor :errors
+      
+      def initialize
+        @errors = []
+        super
+      end
+    end
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @state = StateMachine::Machine.new(@klass, :state, :initial => :parked, :integration => :custom)
+    @state.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @machines[:alarm_state] = @alarm_state = StateMachine::Machine.new(@klass, :alarm_state, :initial => :active, :namespace => 'alarm', :integration => :custom)
+    @alarm_state.event :disable do
+      transition :active => :off
+    end
+    
+    @object = @klass.new
+  end
+  
+  def test_should_not_invalidate_if_transitions_exist
+    assert @machines.fire_events(@object, :ignite, :disable_alarm)
+    assert_equal [], @object.errors
+  end
+  
+  def test_should_invalidate_if_no_transitions_exist
+    @object.state = 'idling'
+    @object.alarm_state = 'off'
+    
+    assert !@machines.fire_events(@object, :ignite, :disable_alarm)
+    assert_equal ['cannot transition via "ignite"', 'cannot transition via "disable"'], @object.errors
+  end
+  
+  def test_should_run_failure_callbacks_if_no_transitions_exist
+    @object.state = 'idling'
+    @object.alarm_state = 'off'
+    
+    @machines[:state].after_failure {@state_failure_run = true}
+    @machines[:alarm_state].after_failure {@alarm_state_failure_run = true}
+    
+    assert !@machines.fire_events(@object, :ignite, :disable_alarm)
+    assert @state_failure_run
+    assert @alarm_state_failure_run
+  end
+  
+  def teardown
+    StateMachine::Integrations.send(:remove_const, 'Custom')
+  end
+end
+
+class MachineCollectionTransitionsWithoutEventsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.state_event = nil
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_be_empty
+    assert @transitions.empty?
+  end
+  
+  def test_should_perform
+    assert_equal true, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithBlankEventsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.state_event = ''
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_be_empty
+    assert @transitions.empty?
+  end
+  
+  def test_should_perform
+    assert_equal true, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithInvalidEventsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.state_event = 'invalid'
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_be_empty
+    assert @transitions.empty?
+  end
+  
+  def test_should_not_perform
+    assert_equal false, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithoutTransitionTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.state = 'idling'
+    @object.state_event = 'ignite'
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_be_empty
+    assert @transitions.empty?
+  end
+  
+  def test_should_not_perform
+    assert_equal false, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithTransitionTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.state_event = 'ignite'
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_not_be_empty
+    assert_equal 1, @transitions.length
+  end
+  
+  def test_should_perform
+    assert_equal true, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithSameActionsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    @machines[:status] = @machine = StateMachine::Machine.new(@klass, :status, :initial => :first_gear, :action => :save)
+    @machine.event :shift_up do
+      transition :first_gear => :second_gear
+    end
+    
+    @object = @klass.new
+    @object.state_event = 'ignite'
+    @object.status_event = 'shift_up'
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_not_be_empty
+    assert_equal 2, @transitions.length
+  end
+  
+  def test_should_perform
+    assert_equal true, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithDifferentActionsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @state = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @state.event :ignite do
+      transition :parked => :idling
+    end
+    @machines[:status] = @status = StateMachine::Machine.new(@klass, :status, :initial => :first_gear, :action => :persist)
+    @status.event :shift_up do
+      transition :first_gear => :second_gear
+    end
+    
+    @object = @klass.new
+    @object.state_event = 'ignite'
+    @object.status_event = 'shift_up'
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_only_select_matching_actions
+    assert_equal 1, @transitions.length
+  end
+end
+
+class MachineCollectionTransitionsWithExisitingTransitionsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @object.send(:state_event_transition=, StateMachine::Transition.new(@object, @machine, :ignite, :parked, :idling))
+    @transitions = @machines.transitions(@object, :save)
+  end
+  
+  def test_should_not_be_empty
+    assert_equal 1, @transitions.length
+  end
+  
+  def test_should_perform
+    assert_equal true, @transitions.perform
+  end
+end
+
+class MachineCollectionTransitionsWithCustomOptionsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    @object = @klass.new
+    @transitions = @machines.transitions(@object, :save, :after => false)
+  end
+  
+  def test_should_use_custom_options
+    assert @transitions.skip_after
+  end
+end
+
+class MachineCollectionFireAttributesWithValidationsTest < Test::Unit::TestCase
+  def setup
+    @klass = Class.new do
+      attr_accessor :errors
+      
+      def initialize
+        @errors = []
+        super
+      end
+    end
+    
+    @machines = StateMachine::MachineCollection.new
+    @machines[:state] = @machine = StateMachine::Machine.new(@klass, :state, :initial => :parked, :action => :save)
+    @machine.event :ignite do
+      transition :parked => :idling
+    end
+    
+    class << @machine
+      def invalidate(object, attribute, message, values = [])
+        (object.errors ||= []) << generate_message(message, values)
+      end
+      
+      def reset(object)
+        object.errors = []
+      end
+    end
+    
+    @object = @klass.new
+  end
+  
+  def test_should_invalidate_if_event_is_invalid
+    @object.state_event = 'invalid'
+    @machines.transitions(@object, :save)
+    
+    assert !@object.errors.empty?
+  end
+  
+  def test_should_invalidate_if_no_transition_exists
+    @object.state = 'idling'
+    @object.state_event = 'ignite'
+    @machines.transitions(@object, :save)
+    
+    assert !@object.errors.empty?
+  end
+  
+  def test_should_not_invalidate_if_transition_exists
+    @object.state_event = 'ignite'
+    @machines.transitions(@object, :save)
+    
+    assert @object.errors.empty?
+  end
+end