simplificator-fsm 0.3.5 → 0.3.7

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,8 @@
+*.sw?
+.DS_Store
+**/.DS_Store
+coverage
+rdoc
+pkg
+*.sqlite3
+**/*.sqlite3

data/README.markdown

@@ -27,7 +27,7 @@ for suggestions!
         transition(:cool_down, [:gas, :liquid], :liquid, :event => :on_cool)
         
         # define the attribute which is used to store the state (defaults to :state)
-        state(:state_of_material)
+        state_attribute(:state_of_material)
         
         # define the initial state (defaults to the first state defined - :gas in this sample)
         initial(:liquid)

data/Rakefile

@@ -4,7 +4,7 @@ require 'rake'
 begin
   require 'jeweler'
   Jeweler::Tasks.new do |gem|
-    gem.name = "fsm"
+    gem.name = "simplificator-fsm"
     gem.summary = %Q{A simple finite state machine (FSM) gem.}
     gem.email = "info@simplificator.com"
     gem.homepage = "http://github.com/simplificator/fsm"

data/VERSION.yml

@@ -1,4 +1,4 @@
 --- 
-:patch: 5
-:major: 0
 :minor: 3
+:patch: 7
+:major: 0

data/lib/fsm/builder.rb

@@ -1,5 +1,5 @@
 module FSM
-  # Builder exposees 'only' (well there are some other methods exposed) the methods that are required to build the configuration
+  # Builder exposes 'only' (well there are some other methods exposed) the methods that are required to build the configuration
   class Builder
     
     # Blank Slate

data/lib/fsm/dot.rb

@@ -0,0 +1,61 @@
+module FSM
+  module Dot
+    def self.included(includer)
+      FSM::Machine.class_eval do 
+        include(MachineInstanceMethods)
+      end
+      FSM::State.class_eval do 
+        include(StateInstanceMethods)
+      end
+    end
+    
+    module MachineInstanceMethods
+      # Convert this state machine to the dot format of graphviz
+      def to_dot(options = {})
+        s = self.states.map do |state|
+          "  #{state.to_dot(options)};"
+        end
+        t = self.transitions.map do |transition|
+          "  #{transition.to_dot(options)};"
+        end
+        "digraph FSM_#{@target_class.name} {\n#{s.join("\n")}\n\n#{t.join("\n")}\n}"
+      end
+
+      # 
+      def draw_graph(options = {})
+        format = options[:format] || :png
+        extension = options[:extension] || format
+        file_name = options[:outfile] || "#{@target_class.name.downcase}.#{extension}" 
+        cmd = "dot -T#{format} -o#{file_name}"
+        IO.popen cmd, 'w' do |io| 
+          io.write to_dot
+        end 
+        raise 'dot failed' unless $?.success? 
+      end      
+    end
+    
+    module StateInstanceMethods
+      def to_dot(options = {})
+        if initial?
+          attrs = "style=bold, label=\"#{self.name}\\n(initial)\""
+        elsif final?  
+          attrs = "style=bold"
+        else
+          attrs = ""
+        end
+        "#{self.name}[#{attrs}]"
+      end
+      
+      
+      # Is this state final?
+      def final?
+        @transitions.empty?
+      end
+
+      # Is this the initial state
+      def initial?
+        Machine[@target_class].initial_state_name == self.name
+      end
+    end
+  end
+end

data/lib/fsm/machine.rb

@@ -1,5 +1,6 @@
 module FSM
   class Machine
+    include FSM::Dot
     attr_accessor(:initial_state_name, :current_state_attribute_name, :states, :transitions)
     
     def initialize(target_class)
@@ -79,28 +80,6 @@ module FSM
       state
     end
     
-    # Convert this state machine to the dot format of graphviz
-    def to_dot(options = {})
-      s = self.states.map do |state|
-        "  #{state.to_dot(options)};"
-      end
-      t = self.transitions.map do |transition|
-        "  #{transition.to_dot(options)};"
-      end
-      "digraph FSM_#{@target_class.name} {\n#{s.join("\n")}\n\n#{t.join("\n")}\n}"
-    end
-    
-    # 
-    def draw_graph(options = {})
-      format = options[:format] || :png
-      extension = options[:extension] || format
-      file_name = options[:outfile] || "#{@target_class.name.downcase}.#{extension}" 
-      cmd = "dot -T#{format} -o#{file_name}"
-      IO.popen cmd, 'w' do |io| 
-        io.write to_dot
-      end 
-      raise 'dot failed' unless $?.success? 
-    end
     
     private
     

data/lib/fsm/state.rb

@@ -41,27 +41,10 @@ module FSM
     def to_states
       @transitions.map { |to_name, transition| transition.to}
     end
-    def final?
-      @transitions.empty?
-    end
-    
-    def initial?
-      Machine[@target_class].initial_state_name == self.name
-    end
     
     def to_s
       "State '#{self.name}' is "
     end
     
-    def to_dot(options = {})
-      if initial?
-        attrs = "style=bold, label=\"#{self.name}\\n(initial)\""
-      elsif final?  
-        attrs = "style=bold"
-      else
-        attrs = ""
-      end
-      "#{self.name}[#{attrs}]"
-    end
   end
 end

data/lib/fsm/state_attribute_interceptor.rb

@@ -27,7 +27,8 @@ module FSM
     def self.bar(klass)
       klass.instance_eval() do
         define_method(Machine[klass].current_state_attribute_name) do
-          value = read_attribute(Machine[self.class].current_state_attribute_name) || Machine[self.class].initial_state_name
+          value = read_attribute(Machine[self.class].current_state_attribute_name)
+          value = Machine[self.class].initial_state_name if value.blank?
           value.is_a?(String) ? value.intern : value
         end
       end

data/lib/fsm.rb

@@ -1,4 +1,4 @@
-%w[options errors machine state transition executable builder state_attribute_interceptor].each do |item|
+%w[dot options state errors machine transition executable builder state_attribute_interceptor].each do |item|
   require File.join(File.dirname(__FILE__), 'fsm', item)
 end
 
@@ -13,14 +13,12 @@ module FSM
       # TODO: other checks? islands?
       
       # create alias for state attribute method to intercept it 
-      # intercept
       FSM::StateAttributeInterceptor.add_interceptor(self)
     end
     
-    def draw_graph(options = {})
-      machine = Machine[self]
-      raise 'No FSM defined. Call define_fsm first' unless machine
-      machine.draw_graph(options)
+    def fsm_draw_graph(options = {})
+      raise 'No FSM defined. Call define_fsm first' unless Machine[self]
+      Machine[self].draw_graph(options)
     end
     
   end
@@ -28,13 +26,23 @@ module FSM
   module InstanceMethods
     #
     # Which states are reachable from the current state
-    def reachable_state_names
+    def fsm_next_state_names
       Machine[self.class].reachable_states(self).map() {|item| item.name}
     end
     
-    def available_transition_names
+    def fsm_state_names
+      Machine[self.class].states.map() {|item| item.name}
+    end
+    
+    #
+    # What are the next transitions
+    def fsm_next_transition_names
       Machine[self.class].available_transitions(self).map() {|item| item.name}
     end
+    
+    def fsm_transition_names
+      Machine[self.class].transitions.map() {|item| item.name}
+    end
   end
   
   def self.included(receiver)

data/samples/ticket/ticket.ps

@@ -0,0 +1,472 @@
+%!PS-Adobe-3.0
+%%Creator: graphviz version 2.22.2 (20090313.1817)
+%%Title: FSM_Ticket
+%%Pages: (atend)
+%%BoundingBox: (atend)
+%%EndComments
+save
+%%BeginProlog
+/DotDict 200 dict def
+DotDict begin
+
+/setupLatin1 {
+mark
+/EncodingVector 256 array def
+ EncodingVector 0
+
+ISOLatin1Encoding 0 255 getinterval putinterval
+EncodingVector 45 /hyphen put
+
+% Set up ISO Latin 1 character encoding
+/starnetISO {
+        dup dup findfont dup length dict begin
+        { 1 index /FID ne { def }{ pop pop } ifelse
+        } forall
+        /Encoding EncodingVector def
+        currentdict end definefont
+} def
+/Times-Roman starnetISO def
+/Times-Italic starnetISO def
+/Times-Bold starnetISO def
+/Times-BoldItalic starnetISO def
+/Helvetica starnetISO def
+/Helvetica-Oblique starnetISO def
+/Helvetica-Bold starnetISO def
+/Helvetica-BoldOblique starnetISO def
+/Courier starnetISO def
+/Courier-Oblique starnetISO def
+/Courier-Bold starnetISO def
+/Courier-BoldOblique starnetISO def
+cleartomark
+} bind def
+
+%%BeginResource: procset graphviz 0 0
+/coord-font-family /Times-Roman def
+/default-font-family /Times-Roman def
+/coordfont coord-font-family findfont 8 scalefont def
+
+/InvScaleFactor 1.0 def
+/set_scale {
+       dup 1 exch div /InvScaleFactor exch def
+       scale
+} bind def
+
+% styles
+/solid { [] 0 setdash } bind def
+/dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def
+/dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def
+/invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def
+/bold { 2 setlinewidth } bind def
+/filled { } bind def
+/unfilled { } bind def
+/rounded { } bind def
+/diagonals { } bind def
+
+% hooks for setting color 
+/nodecolor { sethsbcolor } bind def
+/edgecolor { sethsbcolor } bind def
+/graphcolor { sethsbcolor } bind def
+/nopcolor {pop pop pop} bind def
+
+/beginpage {	% i j npages
+	/npages exch def
+	/j exch def
+	/i exch def
+	/str 10 string def
+	npages 1 gt {
+		gsave
+			coordfont setfont
+			0 0 moveto
+			(\() show i str cvs show (,) show j str cvs show (\)) show
+		grestore
+	} if
+} bind def
+
+/set_font {
+	findfont exch
+	scalefont setfont
+} def
+
+% draw text fitted to its expected width
+/alignedtext {			% width text
+	/text exch def
+	/width exch def
+	gsave
+		width 0 gt {
+			[] 0 setdash
+			text stringwidth pop width exch sub text length div 0 text ashow
+		} if
+	grestore
+} def
+
+/boxprim {				% xcorner ycorner xsize ysize
+		4 2 roll
+		moveto
+		2 copy
+		exch 0 rlineto
+		0 exch rlineto
+		pop neg 0 rlineto
+		closepath
+} bind def
+
+/ellipse_path {
+	/ry exch def
+	/rx exch def
+	/y exch def
+	/x exch def
+	matrix currentmatrix
+	newpath
+	x y translate
+	rx ry scale
+	0 0 1 0 360 arc
+	setmatrix
+} bind def
+
+/endpage { showpage } bind def
+/showpage { } def
+
+/layercolorseq
+	[	% layer color sequence - darkest to lightest
+		[0 0 0]
+		[.2 .8 .8]
+		[.4 .8 .8]
+		[.6 .8 .8]
+		[.8 .8 .8]
+	]
+def
+
+/layerlen layercolorseq length def
+
+/setlayer {/maxlayer exch def /curlayer exch def
+	layercolorseq curlayer 1 sub layerlen mod get
+	aload pop sethsbcolor
+	/nodecolor {nopcolor} def
+	/edgecolor {nopcolor} def
+	/graphcolor {nopcolor} def
+} bind def
+
+/onlayer { curlayer ne {invis} if } def
+
+/onlayers {
+	/myupper exch def
+	/mylower exch def
+	curlayer mylower lt
+	curlayer myupper gt
+	or
+	{invis} if
+} def
+
+/curlayer 0 def
+
+%%EndResource
+%%EndProlog
+%%BeginSetup
+14 default-font-family set_font
+1 setmiterlimit
+% /arrowlength 10 def
+% /arrowwidth 5 def
+
+% make sure pdfmark is harmless for PS-interpreters other than Distiller
+/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse
+% make '<<' and '>>' safe on PS Level 1 devices
+/languagelevel where {pop languagelevel}{1} ifelse
+2 lt {
+    userdict (<<) cvn ([) cvn load put
+    userdict (>>) cvn ([) cvn load put
+} if
+
+%%EndSetup
+setupLatin1
+%%Page: 1 1
+%%PageBoundingBox: 36 36 358 526
+%%PageOrientation: Portrait
+0 0 1 beginpage
+gsave
+36 36 322 490 boxprim clip newpath
+1 1 set_scale 0 rotate 40 41 translate
+% created
+gsave
+2 setlinewidth
+bold
+0 0 0 nodecolor
+221.51 456 41.93 25.46 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+200.51 457.4 moveto 42 (created) alignedtext
+0 0 0 nodecolor
+14 /Times-Roman set_font
+199.51 443.4 moveto 44 (\(initial\)) alignedtext
+grestore
+% reserved
+gsave
+1 setlinewidth
+0 0 0 nodecolor
+171.51 362 41.06 18 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+147.01 356.4 moveto 49 (reserved) alignedtext
+grestore
+% created->reserved
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 208.37 431.3 moveto
+201.43 418.26 192.91 402.23 185.8 388.88 curveto
+stroke
+0 0 0 edgecolor
+newpath 188.71 386.89 moveto
+180.93 379.7 lineto
+182.53 390.18 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 188.71 386.89 moveto
+180.93 379.7 lineto
+182.53 390.18 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+197.51 399.4 moveto 41 (reserve) alignedtext
+grestore
+% invalid
+gsave
+2 setlinewidth
+bold
+0 0 0 nodecolor
+135.51 18 36.01 18 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+115.01 12.4 moveto 41 (invalid) alignedtext
+grestore
+% created->invalid
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 235.95 431.78 moveto
+245.59 413.31 256.51 386.9 256.51 362 curveto
+256.51 362 256.51 362 256.51 104 curveto
+256.51 64.19 212.45 41.11 177.5 29.06 curveto
+stroke
+0 0 0 edgecolor
+newpath 178.53 25.72 moveto
+167.93 25.96 lineto
+176.36 32.37 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 178.53 25.72 moveto
+167.93 25.96 lineto
+176.36 32.37 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+256.51 227.4 moveto 57 (invalidate) alignedtext
+grestore
+% sold
+gsave
+1 setlinewidth
+0 0 0 nodecolor
+105.51 276 27 18 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+93.01 270.4 moveto 25 (sold) alignedtext
+grestore
+% reserved->sold
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 153.98 345.48 moveto
+148.13 339.59 141.77 332.73 136.51 326 curveto
+130.66 318.51 124.97 309.87 120.09 301.89 curveto
+stroke
+0 0 0 edgecolor
+newpath 123.09 300.08 moveto
+114.97 293.27 lineto
+117.07 303.66 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 123.09 300.08 moveto
+114.97 293.27 lineto
+117.07 303.66 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+136.51 313.4 moveto 21 (buy) alignedtext
+grestore
+% reserved->invalid
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 171.51 343.88 moveto
+171.51 326.48 171.51 299.44 171.51 276 curveto
+171.51 276 171.51 276 171.51 104 curveto
+171.51 82.76 162.05 60.69 152.82 44.23 curveto
+stroke
+0 0 0 edgecolor
+newpath 155.6 42.06 moveto
+147.5 35.24 lineto
+149.58 45.62 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 155.6 42.06 moveto
+147.5 35.24 lineto
+149.58 45.62 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+171.51 184.4 moveto 57 (invalidate) alignedtext
+grestore
+% inside
+gsave
+1 setlinewidth
+0 0 0 nodecolor
+77.51 190 32.22 18 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+60.01 184.4 moveto 35 (inside) alignedtext
+grestore
+% sold->inside
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 99.71 258.18 moveto
+95.88 246.42 90.78 230.78 86.44 217.44 curveto
+stroke
+0 0 0 edgecolor
+newpath 89.73 216.22 moveto
+83.3 207.8 lineto
+83.07 218.39 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 89.73 216.22 moveto
+83.3 207.8 lineto
+83.07 218.39 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+92.51 227.4 moveto 29 (enter) alignedtext
+grestore
+% inside->invalid
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 55.89 176.23 moveto
+27.98 156.66 -14.74 119.44 5.51 86 curveto
+24.23 55.07 62.16 37.53 92.24 28.05 curveto
+stroke
+0 0 0 edgecolor
+newpath 93.51 31.32 moveto
+102.1 25.13 lineto
+91.52 24.61 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 93.51 31.32 moveto
+102.1 25.13 lineto
+91.52 24.61 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+5.51 98.4 moveto 57 (invalidate) alignedtext
+grestore
+% outside
+gsave
+1 setlinewidth
+0 0 0 nodecolor
+107.51 104 36.14 18 ellipse_path stroke
+0 0 0 nodecolor
+14 /Times-Roman set_font
+86.51 98.4 moveto 42 (outside) alignedtext
+grestore
+% inside->outside
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 70.03 172.29 moveto
+67 162.45 65.13 150.18 69.51 140 curveto
+71.71 134.89 75.03 130.16 78.81 125.93 curveto
+stroke
+0 0 0 edgecolor
+newpath 81.31 128.38 moveto
+85.97 118.86 lineto
+76.39 123.39 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 81.31 128.38 moveto
+85.97 118.86 lineto
+76.39 123.39 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+69.51 141.4 moveto 22 (exit) alignedtext
+grestore
+% outside->invalid
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 100.58 85.86 moveto
+97.93 76.12 96.42 64.07 100.51 54 curveto
+102.47 49.18 105.41 44.64 108.79 40.53 curveto
+stroke
+0 0 0 edgecolor
+newpath 111.39 42.87 moveto
+115.64 33.17 lineto
+106.26 38.1 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 111.39 42.87 moveto
+115.64 33.17 lineto
+106.26 38.1 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+100.51 55.4 moveto 57 (invalidate) alignedtext
+grestore
+% outside->inside
+gsave
+1 setlinewidth
+0 0 0 edgecolor
+newpath 104.15 122.35 moveto
+102.14 131.93 99.24 143.77 95.51 154 curveto
+94.36 157.15 93.01 160.39 91.57 163.56 curveto
+stroke
+0 0 0 edgecolor
+newpath 88.32 162.25 moveto
+87.12 172.78 lineto
+94.62 165.29 lineto
+closepath fill
+1 setlinewidth
+solid
+0 0 0 edgecolor
+newpath 88.32 162.25 moveto
+87.12 172.78 lineto
+94.62 165.29 lineto
+closepath stroke
+0 0 0 edgecolor
+14 /Times-Roman set_font
+99.51 141.4 moveto 29 (enter) alignedtext
+grestore
+endpage
+showpage
+grestore
+%%PageTrailer
+%%EndPage: 1
+%%Trailer
+%%Pages: 1
+%%BoundingBox: 36 36 358 526
+end
+restore
+%%EOF

data/samples/ticket/ticket_sample.rb

@@ -0,0 +1,20 @@
+require File.dirname(__FILE__) + '/../../lib/fsm'
+class Ticket
+  attr_accessor(:state)
+  include FSM
+  define_fsm do
+    states(:created, :reserved, :sold, :invalid, :inside, :outside)
+    
+    transition(:reserve, :created, :reserved)
+    transition(:buy, :reserved, :sold)
+    
+    transition(:enter, :sold, :inside)
+    transition(:enter, :outside, :inside)
+    transition(:exit, :inside, :outside)
+    
+    transition(:invalidate, [:created, :reserved, :inside, :outside], :invalid)
+  end
+  
+end
+
+t = Ticket.fsm_draw_graph(:format => 'png')

data/test/ar_test.rb

@@ -1,5 +1,6 @@
 require 'test_helper_ar'
 class ArTest < Test::Unit::TestCase
+  
   context 'AR' do
     
     should 'set the state' do
@@ -11,16 +12,21 @@ class ArTest < Test::Unit::TestCase
       assert_equal  :open, o2.state
     end
     
+    should 'return initial state when state is empty string' do
+      o1 = Order.new(:state => '')
+      assert_equal :open, o1.state
+    end
+    
     should 'make transition' do
-          o = Order.new
-          assert_equal :open, o.state
-          o.deliver
-          assert_equal :delivered, o.state
-          o.save!
-          o.reload
-          o = Order.find(o.id)
-          assert_equal :delivered, o.state
-        end
-        
+      o = Order.new
+      assert_equal :open, o.state
+      o.deliver
+      assert_equal :delivered, o.state
+      o.save!
+      assert_equal :delivered, o.state
+      o.reload
+      o = Order.find(o.id)
+      assert_equal :delivered, o.state
+    end
   end
 end

data/test/invoice_sample_test.rb

@@ -27,11 +27,12 @@ class Invoice
 end
 
 class InvoiceSampleTest < Test::Unit::TestCase
-  context 'Invoice' do
-    
+  context 'an Invoice' do
+    setup do
+      @invoice = Invoice.new
+    end
     should 'Initial State is the first state defined unless no initial() call was made' do
-      invoice = Invoice.new
-      assert_equal(:open, invoice.state)
+      assert_equal(:open, @invoice.state)
     end
     
     should 'Accept an initial state from outside' do
@@ -40,28 +41,46 @@ class InvoiceSampleTest < Test::Unit::TestCase
     end
     
     should 'Trasition to paid and then refunded' do
-      invoice = Invoice.new
-      assert_equal(:open, invoice.state)
+      assert_equal(:open, @invoice.state)
       
-      invoice.pay(1000)
-      assert_equal(:paid, invoice.state)
+      @invoice.pay(1000)
+      assert_equal(:paid, @invoice.state)
       
-      invoice.refund
-      assert_equal(:refunded, invoice.state)
+      @invoice.refund
+      assert_equal(:refunded, @invoice.state)
     end
     
     should 'Raise on illegal transition' do
-      invoice = Invoice.new
       assert_raise(FSM::InvalidStateTransition) do
-        invoice.refund
+        @invoice.refund
       end
     end
     
     should 'Pass the arguments to the event handler' do
-      invoice = Invoice.new
-      invoice.pay(1000)
-      assert_equal(0, invoice.amount)
+      @invoice.pay(1000)
+      assert_equal(0, @invoice.amount)
+    end
+    
+    should 'List all states' do
+        assert_equal_symbols [:paid, :refunded, :open], @invoice.fsm_state_names
+    end
+    should 'List all transitions' do
+        assert_equal_symbols [:pay, :refund], @invoice.fsm_transition_names
     end
     
+    should 'List next states' do
+      assert_equal_symbols :paid, @invoice.fsm_next_state_names
+      @invoice.pay(1000)
+      assert_equal_symbols :refunded, @invoice.fsm_next_state_names
+    end
+    
+    should 'List next transitions' do
+      assert_equal_symbols :pay, @invoice.fsm_next_transition_names
+      @invoice.pay(1000)
+      assert_equal_symbols :refund, @invoice.fsm_next_transition_names
+    end
+    
+    
+
   end
 end

data/test/test_helper.rb

@@ -5,3 +5,11 @@ require 'shoulda'
 $LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
 $LOAD_PATH.unshift(File.dirname(__FILE__))
 require 'fsm'
+
+
+class Test::Unit::TestCase
+  def assert_equal_symbols(a1, a2)
+    assert_equal  Array(a1).map() {|item| item.to_s}.sort, 
+                  Array(a2).map() {|item| item.to_s}.sort
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: simplificator-fsm
 version: !ruby/object:Gem::Version 
-  version: 0.3.5
+  version: 0.3.7
 platform: ruby
 authors: 
 - simplificator
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2009-06-30 00:00:00 -07:00
+date: 2009-12-07 00:00:00 +01:00
 default_executable: 
 dependencies: []
 
@@ -23,12 +23,15 @@ extra_rdoc_files:
 - LICENSE
 - README.markdown
 files: 
+- .document
+- .gitignore
 - LICENSE
 - README.markdown
 - Rakefile
 - VERSION.yml
 - lib/fsm.rb
 - lib/fsm/builder.rb
+- lib/fsm/dot.rb
 - lib/fsm/errors.rb
 - lib/fsm/executable.rb
 - lib/fsm/machine.rb
@@ -36,6 +39,9 @@ files:
 - lib/fsm/state.rb
 - lib/fsm/state_attribute_interceptor.rb
 - lib/fsm/transition.rb
+- samples/ticket/ticket.png
+- samples/ticket/ticket.ps
+- samples/ticket/ticket_sample.rb
 - test/ar_test.rb
 - test/executable_test.rb
 - test/invoice_sample_test.rb
@@ -47,6 +53,8 @@ files:
 - test/water_sample_test.rb
 has_rdoc: true
 homepage: http://github.com/simplificator/fsm
+licenses: []
+
 post_install_message: 
 rdoc_options: 
 - --charset=UTF-8
@@ -67,7 +75,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.2.0
+rubygems_version: 1.3.5
 signing_key: 
 specification_version: 3
 summary: A simple finite state machine (FSM) gem.