state_machines 0.0.1

data/spec/matcher_helpers_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+
+describe StateMachines::MatcherHelpers do
+  context 'All' do
+    include StateMachines::MatcherHelpers
+
+    before(:each) do
+      @matcher = all
+    end
+
+    it 'should_build_an_all_matcher' do
+      assert_equal StateMachines::AllMatcher.instance, @matcher
+    end
+  end
+
+  context 'Any' do
+    include StateMachines::MatcherHelpers
+
+    before(:each) do
+      @matcher = any
+    end
+
+    it 'should_build_an_all_matcher' do
+      assert_equal StateMachines::AllMatcher.instance, @matcher
+    end
+  end
+
+  context 'Same' do
+    include StateMachines::MatcherHelpers
+
+    before(:each) do
+      @matcher = same
+    end
+
+    it 'should_build_a_loopback_matcher' do
+      assert_equal StateMachines::LoopbackMatcher.instance, @matcher
+    end
+  end
+end

data/spec/matcher_spec.rb

@@ -0,0 +1,157 @@
+require 'spec_helper'
+
+describe StateMachines::Matcher do
+  context 'ByDefault' do
+    before(:each) do
+      @matcher = StateMachines::Matcher.new
+    end
+
+    it 'should_have_no_values' do
+      assert_equal [], @matcher.values
+    end
+
+    it 'should_filter_all_values' do
+      assert_equal [], @matcher.filter([:parked, :idling])
+    end
+  end
+
+  context 'WithValue' do
+    before(:each) do
+      @matcher = StateMachines::Matcher.new(nil)
+    end
+
+    it 'should_have_values' do
+      assert_equal [nil], @matcher.values
+    end
+
+    it 'should_filter_unknown_values' do
+      assert_equal [nil], @matcher.filter([nil, :parked])
+    end
+  end
+
+  context 'WithMultipleValues' do
+    before(:each) do
+      @matcher = StateMachines::Matcher.new([:parked, :idling])
+    end
+
+    it 'should_have_values' do
+      assert_equal [:parked, :idling], @matcher.values
+    end
+
+    it 'should_filter_unknown_values' do
+      assert_equal [:parked], @matcher.filter([:parked, :first_gear])
+    end
+  end
+
+  context 'AllMatcher' do
+    before(:each) do
+      @matcher = StateMachines::AllMatcher.instance
+    end
+
+    it 'should_have_no_values' do
+      assert_equal [], @matcher.values
+    end
+
+    it 'should_always_match' do
+      [nil, :parked, :idling].each { |value| assert @matcher.matches?(value) }
+    end
+
+    it 'should_not_filter_any_values' do
+      assert_equal [:parked, :idling], @matcher.filter([:parked, :idling])
+    end
+
+    it 'should_generate_blacklist_matcher_after_subtraction' do
+      matcher = @matcher - [:parked, :idling]
+      assert_instance_of StateMachines::BlacklistMatcher, matcher
+      assert_equal [:parked, :idling], matcher.values
+    end
+
+    it 'should_have_a_description' do
+      assert_equal 'all', @matcher.description
+    end
+  end
+
+  context 'WhitelistMatcher' do
+    before(:each) do
+      @matcher = StateMachines::WhitelistMatcher.new([:parked, :idling])
+    end
+
+    it 'should_have_values' do
+      assert_equal [:parked, :idling], @matcher.values
+    end
+
+    it 'should_filter_unknown_values' do
+      assert_equal [:parked, :idling], @matcher.filter([:parked, :idling, :first_gear])
+    end
+
+    it 'should_match_known_values' do
+      assert @matcher.matches?(:parked)
+    end
+
+    it 'should_not_match_unknown_values' do
+      assert !@matcher.matches?(:first_gear)
+    end
+
+    it 'should_have_a_description' do
+      assert_equal '[:parked, :idling]', @matcher.description
+
+      matcher = StateMachines::WhitelistMatcher.new([:parked])
+      assert_equal ':parked', matcher.description
+    end
+  end
+
+  context 'BlacklistMatcher' do
+    before(:each) do
+      @matcher = StateMachines::BlacklistMatcher.new([:parked, :idling])
+    end
+
+    it 'should_have_values' do
+      assert_equal [:parked, :idling], @matcher.values
+    end
+
+    it 'should_filter_known_values' do
+      assert_equal [:first_gear], @matcher.filter([:parked, :idling, :first_gear])
+    end
+
+    it 'should_match_unknown_values' do
+      assert @matcher.matches?(:first_gear)
+    end
+
+    it 'should_not_match_known_values' do
+      assert !@matcher.matches?(:parked)
+    end
+
+    it 'should_have_a_description' do
+      assert_equal 'all - [:parked, :idling]', @matcher.description
+
+      matcher = StateMachines::BlacklistMatcher.new([:parked])
+      assert_equal 'all - :parked', matcher.description
+    end
+  end
+
+  context 'LoopbackMatcher' do
+    before(:each) do
+      @matcher = StateMachines::LoopbackMatcher.instance
+    end
+
+    it 'should_have_no_values' do
+      assert_equal [], @matcher.values
+    end
+
+    it 'should_filter_all_values' do
+      assert_equal [], @matcher.filter([:parked, :idling])
+    end
+
+    it 'should_match_if_from_context_is_same' do
+      assert @matcher.matches?(:parked, :from => :parked)
+    end
+
+    it 'should_not_match_if_from_context_is_different' do
+      assert !@matcher.matches?(:parked, :from => :idling)
+    end
+
+    it 'should_have_a_description' do
+      assert_equal 'same', @matcher.description
+    end
+  end
+end

data/spec/models/auto_shop_spec.rb

@@ -0,0 +1,41 @@
+require 'spec_helper'
+
+describe AutoShop do
+
+  let(:auto_shop) { AutoShop.new }
+
+  it 'should_be_in_available_state' do
+    assert_equal 'available', auto_shop.state
+  end
+
+  it 'should_allow_tow_vehicle' do
+    assert auto_shop.tow_vehicle
+  end
+
+  it 'should_not_allow_fix_vehicle' do
+    assert !auto_shop.fix_vehicle
+  end
+
+  context 'Busy' do
+    before(:each) do
+      auto_shop.tow_vehicle
+    end
+
+    it 'should_be_in_busy_state' do
+      assert_equal 'busy', auto_shop.state
+    end
+
+    it 'should_have_incremented_number_of_customers' do
+      assert_equal 1, auto_shop.num_customers
+    end
+
+    it 'should_not_allow_tow_vehicle' do
+      assert !auto_shop.tow_vehicle
+    end
+
+    it 'should_allow_fix_vehicle' do
+      assert auto_shop.fix_vehicle
+    end
+  end
+
+end

data/spec/models/car_spec.rb

@@ -0,0 +1,90 @@
+require 'spec_helper'
+
+describe Car do
+  let(:car) { Car.new }
+
+  it 'should_be_in_parked_state' do
+    assert_equal 'parked', car.state
+  end
+
+  it 'should_not_have_the_seatbelt_on' do
+    assert !car.seatbelt_on
+  end
+
+  it 'should_not_allow_park' do
+    assert !car.park
+  end
+
+  it 'should_allow_ignite' do
+    assert car.ignite
+    assert_equal 'idling', car.state
+  end
+
+  it 'should_not_allow_idle' do
+    assert !car.idle
+  end
+
+  it 'should_not_allow_shift_up' do
+    assert !car.shift_up
+  end
+
+  it 'should_not_allow_shift_down' do
+    assert !car.shift_down
+  end
+
+  it 'should_not_allow_crash' do
+    assert !car.crash
+  end
+
+  it 'should_not_allow_repair' do
+    assert !car.repair
+  end
+
+  it 'should_allow_reverse' do
+    assert car.reverse
+  end
+
+
+  context 'backing up' do
+    before(:each) do
+      car.reverse
+    end
+
+    it 'should_be_in_backing_up_state' do
+      assert_equal 'backing_up', car.state
+    end
+
+    it 'should_allow_park' do
+      assert car.park
+    end
+
+    it 'should_not_allow_ignite' do
+      assert !car.ignite
+    end
+
+    it 'should_allow_idle' do
+      assert car.idle
+    end
+
+    it 'should_allow_shift_up' do
+      assert car.shift_up
+    end
+
+    it 'should_not_allow_shift_down' do
+      assert !car.shift_down
+    end
+
+    it 'should_not_allow_crash' do
+      assert !car.crash
+    end
+
+    it 'should_not_allow_repair' do
+      assert !car.repair
+    end
+
+    it 'should_not_allow_reverse' do
+      assert !car.reverse
+    end
+
+  end
+end

data/spec/models/motorcycle_spec.rb

@@ -0,0 +1,44 @@
+require 'spec_helper'
+
+describe Motorcycle do
+  let(:motorcycle) { Motorcycle.new }
+
+  it 'should_be_in_idling_state' do
+    assert_equal 'idling', motorcycle.state
+  end
+
+  it 'should_allow_park' do
+    assert motorcycle.park
+  end
+
+  it 'should_not_allow_ignite' do
+    assert !motorcycle.ignite
+  end
+
+  it 'should_allow_shift_up' do
+    assert motorcycle.shift_up
+  end
+
+  it 'should_not_allow_shift_down' do
+    assert !motorcycle.shift_down
+  end
+
+  it 'should_not_allow_crash' do
+    assert !motorcycle.crash
+  end
+
+  it 'should_not_allow_repair' do
+    assert !motorcycle.repair
+  end
+
+  it 'should_inherit_decibels_from_superclass' do
+    motorcycle.park
+    assert_equal 0.0, motorcycle.decibels
+  end
+
+  it 'should_use_decibels_defined_in_state' do
+    motorcycle.shift_up
+    assert_equal 1.0, motorcycle.decibels
+  end
+
+end

data/spec/models/traffic_light_spec.rb

@@ -0,0 +1,56 @@
+require 'spec_helper'
+
+describe TrafficLight do
+  let(:light) { TrafficLight.new }
+  context 'Stop' do
+    before(:each) do
+      light.state = 'stop'
+    end
+
+    it 'should_use_stop_color' do
+      assert_equal 'red', light.color
+    end
+
+    it 'should_pass_arguments_through' do
+      assert_equal 'RED', light.color(:upcase!)
+    end
+
+    it 'should_pass_block_through' do
+      color = light.color { |value| value.upcase! }
+      assert_equal 'RED', color
+    end
+
+    it 'should_use_stop_capture_violations' do
+      assert_equal true, light.capture_violations?
+    end
+  end
+
+ context 'Proceed' do
+    before(:each) do
+      light.state = 'proceed'
+    end
+
+    it 'should_use_proceed_color' do
+      assert_equal 'green', light.color
+    end
+
+    it 'should_use_proceed_capture_violations' do
+      assert_equal false, light.capture_violations?
+    end
+  end
+
+ context 'Caution' do
+    before(:each) do
+      light.state = 'caution'
+    end
+
+    it 'should_use_caution_color' do
+      assert_equal 'yellow', light.color
+    end
+
+    it 'should_use_caution_capture_violations' do
+      assert_equal true, light.capture_violations?
+    end
+  end
+
+end