MINT-core 1.0.0

data/lib/MINT-core/model/cui/gfx/model.rb

@@ -0,0 +1,204 @@
+module MINT
+  require "MINT-core/model/cui/gfx/CIO"
+
+  require "MINT-core/model/cui/gfx/CIC"
+  class Button < CIO
+  end
+
+  class Image < CIO
+     property :path, String
+  end
+
+  class Selectable_sync_callback < CIO_sync_callback
+    def sync_aio_to_unchosen
+      true
+    end
+
+    def sync_aio_to_chosen
+      true
+    end
+  end
+  # Abstract class to handle objects that can be selected
+  class Selectable < CIO
+    def initialize_statemachine
+      if @statemachine.blank?
+
+        @statemachine = Statemachine.build do
+
+          superstate :CIO do
+            trans :initialized,:position,:positioning
+            trans :positioning,:calculated,:positioned, :store_calculated_values_in_model
+            trans :positioned, :display, :presenting
+            trans :disabled, :hide, :hidden
+            trans :hidden,:display, :presenting
+
+
+            parallel :p do
+              statemachine :s1 do
+                superstate :presenting do
+                  on_entry :sync_aio_to_presented
+
+                  event :hide, :hidden
+
+                  state :displayed do
+                    on_entry :sync_aio_to_defocus
+                  end
+
+                  state :highlighted  do
+                    on_entry :sync_aio_to_focused
+                  end
+
+                  trans :displayed, :highlight, :highlighted
+                  trans :highlighted,:unhighlight, :displayed
+                  trans :highlighted, :up, :displayed, :highlight_up
+                  trans :highlighted, :down, :displayed, :highlight_down
+                  trans :highlighted, :left, :displayed, :highlight_left
+                  trans :highlighted, :right, :displayed, :highlight_right
+
+                  event :disable, :disabled
+
+                end
+              end
+              statemachine :s2 do
+                superstate :selection do
+                  trans :listed, :select, :selected
+                  trans :selected, :select, :listed
+
+                  state :listed do
+                    on_entry :sync_aio_to_unchosen
+                  end
+
+                  state :selected  do
+                    on_entry :sync_aio_to_chosen
+                  end
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+
+    def sync_event(event)
+      process_event(event, Selectable_sync_callback.new)
+    end
+
+    def sync_aio_to_unchosen
+      aio =  MINT::AIINChoose.first(:name=>self.name)
+      if (aio and not aio.is_in? :unchosen)
+        aio.sync_event(:unchoose)
+      end
+      true
+    end
+
+    def sync_aio_to_chosen
+      aio =  MINT::AIINChoose.first(:name=>self.name)
+      if (aio and not aio.is_in? :chosen)
+        aio.sync_event(:choose)
+      end
+      true
+    end
+  end
+
+  class FurnitureItem < Selectable
+    property :title, String
+    property :price, String
+    property :image, String
+    property :description, String
+  end
+
+  class SingleHighlight < CIC
+    end
+
+
+  class ARFrame <  CIO
+
+  end
+
+  class CheckBox < Selectable
+  end
+
+  class CheckBoxGroup < CIC
+  end
+
+  class RadioButton < Selectable
+  end
+
+  class MarkableRadioButton < RadioButton
+    def initialize_statemachine
+      if @statemachine.blank?
+
+        @statemachine = Statemachine.build do
+
+          superstate :CIO do
+            trans :initialized,:position,:positioning
+            trans :positioning,:calculated,:positioned, :store_calculated_values_in_model
+            trans :positioned, :display, :presenting
+            trans :disabled, :hide, :hidden
+            trans :hidden,:display, :presenting
+
+
+            parallel :p do
+              statemachine :s1 do
+                superstate :presenting do
+                  on_entry :sync_aio_to_presented
+
+                  state :displayed do
+                    on_entry :sync_aio_to_defocus
+                  end
+
+                  state :highlighted  do
+                    on_entry :sync_aio_to_focused
+                  end
+
+                  trans :displayed, :highlight, :highlighted
+                  trans :highlighted,:unhighlight, :displayed
+                  trans :highlighted, :up, :displayed, :highlight_up
+                  trans :highlighted, :down, :displayed, :highlight_down
+                  trans :highlighted, :left, :displayed, :highlight_left
+                  trans :highlighted, :right, :displayed, :highlight_right
+
+                  event :disable, :disabled
+                  event :hide, :hidden
+
+                end
+              end
+              statemachine :s2 do
+                superstate :selection do
+                  trans :listed, :select, :selected
+                  trans :selected, :select, :listed
+
+                  state :listed do
+                    on_entry :sync_aio_to_unchosen
+                  end
+
+                  state :selected  do
+                    on_entry :sync_aio_to_chosen
+                  end
+                end
+              end
+              statemachine :s3 do
+                superstate :marker do
+                  trans :unmarked, :mark, :marked
+                  trans :marked, :unmark, :unmarked
+                end
+              end
+            end
+          end
+        end
+      end
+    end
+  end
+
+  class RadioButtonGroup < CIC
+  end
+
+  class BasicText < CIO
+  end
+
+  class Label <CIO
+  end
+
+  require "MINT-core/model/cui/gfx/screen"
+
+end

data/lib/MINT-core/model/cui/gfx/screen.rb

@@ -0,0 +1,18 @@
+module MINT
+  class Screen < Element
+    property :root, String
+
+
+    protected
+    def initialize_statemachine
+      if @statemachine.blank?
+        @statemachine = Statemachine.build do
+          trans :initialized, :calculate, :calculating
+          trans :calculating, :done, :finished
+          trans :finished, :calculate, :calculating
+        end
+      end
+    end
+
+  end
+end

data/lib/MINT-core/model/device/button.rb

@@ -0,0 +1,20 @@
+module MINT
+
+    class HWButton < Element
+
+      def initialize_statemachine
+        if @statemachine.blank?
+          @statemachine = Statemachine.build do
+
+            trans :disconnected,:connect, :connected
+            trans :connected, :disconnect, :disconnected
+
+            superstate :connected do
+              trans :released, :press, :pressed
+              trans :pressed, :release, :released
+            end
+          end
+        end
+      end
+    end
+end

data/lib/MINT-core/model/device/joypad.rb

@@ -0,0 +1,30 @@
+module MINT
+
+   class Joypad < Element
+    def initialize_statemachine
+      if @statemachine.blank?
+        @statemachine = Statemachine.build do
+
+          trans :disconnected,:connect, :connected
+          trans :connected, :disconnect, :disconnected
+
+          superstate :connected do
+            state :released
+            superstate :pressed do
+              state :left
+              state :right
+              state :down
+              state :up
+              event :release, :released
+            end
+            event :press_left, :left
+            event :press_right, :right
+            event :press_up, :up
+            event :press_down, :down
+            event :disconnect, :disconnected
+          end
+        end
+      end
+    end
+  end
+end

data/lib/MINT-core/model/device/mouse.rb

@@ -0,0 +1,171 @@
+require "eventmachine"
+module MINT
+
+  class MouseMode < Element
+    def initialize_statemachine
+      if @statemachine.blank?
+        @statemachine = Statemachine.build do
+          trans :selecting,:drag, :dragging
+          trans :dragging, :select, :selecting
+        end
+      end
+    end
+  end
+
+  class Mouse  < Pointer
+
+      class CoordinateTracker
+        include EventMachine::Deferrable
+        def initialize(mouse)
+          @mouse = mouse
+          p "handling juggernait"
+          Redis.new.subscribe("juggernaut") do |on|
+            on.mon.message do |msg|
+              r = msg.parseJSON
+              if (r["channels"].eql? "pointer")
+                @x,@y = r["data"].split
+              end
+            end
+          end
+        end
+        def save(state)
+          @mouse.x=@x
+          @mouse.y=@y
+          @mouse.process_event(state)
+          p "stopped"
+        end
+      end
+
+#    property :x, Integer, :default  => -1
+#    property :y, Integer, :default  => -1
+    property :z, Integer, :default  => 0
+
+    def cache_coordinates(x,y)
+      @x = x
+      @y = y
+    end
+
+    def initialize_statemachine
+      if @statemachine.blank?
+
+        @pointer_timer = nil
+        @wheel_timer = nil
+
+        @statemachine = Statemachine.build do
+
+          trans :disconnected,:connect, :connected
+          trans :connected, :disconnect, :disconnected
+
+          superstate :connected do
+            parallel :p do
+              statemachine :s1 do
+                superstate :pointer do
+                  on_entry :start_coordinates_tracker
+                  on_exit :stop_coordinates_tracker
+
+
+                  trans :stopped, :move, :moving
+                  trans :moving,:move, :moving
+                  trans :moving,:stop,:stopped
+
+                  state :moving do
+                    on_entry :start_timeout_pointer # TODO no support for varibles in on_entry on_exit
+                    on_exit :stop_timeout_pointer
+                  end
+                end
+              end
+              statemachine :s2 do
+                superstate :right_button do # TODO we still not have name spaces :-(
+                  trans :right_released, :right_press, :right_pressed
+                  trans :right_pressed, :right_release, :right_released
+                end
+              end
+              statemachine :s3 do
+                superstate :left_button do # TODO we still not have name spaces :-(
+                  trans :left_released, :left_press, :left_pressed
+                  trans :left_pressed, :left_release, :left_released
+                end
+              end
+              statemachine :s4 do
+                superstate :middle_button do # TODO we still not have name spaces :-(
+                  trans :middle_released, :middle_press, :middle_pressed
+                  trans :middle_pressed, :middle_release, :middle_released
+                end
+              end
+              statemachine :s5 do
+                superstate :wheel do
+                  trans :wheel_stopped,:regress, :regressing
+                  trans :wheel_stopped,:progress, :progressing
+
+                  trans :regressing, :regress, :regressing
+                  trans :regressing, :stop_wheel, :wheel_stopped
+                  trans :regressing, :progress, :progressing
+
+                  trans :progressing, :progress, :progressing
+                  trans :progressing, :stop_wheel, :wheel_stopped
+                  trans :progressing, :regress, :regressing
+
+                  state :regressing do
+                    on_entry :start_timeout_wheel
+                    on_exit :stop_timeout_wheel
+                  end
+                  state :progressing do
+                    on_entry :start_timeout_wheel
+                    on_exit :stop_timeout_wheel
+                  end
+                end
+              end
+            end
+          end
+        end
+      end
+
+      def start_timeout_wheel
+        if not @wheel_timer
+          @wheel_timer = EventMachine::Timer.new(0.3) do
+            process_event("stop_wheel")
+          end
+        else
+          puts "wheel timer already started!!!"
+        end
+      end
+
+      def stop_timeout_wheel
+        stop_timeout(@wheel_timer)
+      end
+
+      def start_timeout_pointer
+#        @tracker  = CoordinateTracker.new(self)
+#        @tracker.callback do |x|
+#          @tracker.save(state)
+#        end
+
+        if not @pointer_timer
+          @pointer_timer = EventMachine::Timer.new(0.3) do
+            @mouse.x=@x
+          @mouse.y=@y
+          @mouse.process_event("stop")
+
+#            @tracker.set_deferred_status :succeeded, "stop"
+          end
+        else
+          puts "pointer timer already started!!!"
+        end
+      end
+
+
+      def stop_timeout_pointer
+        stop_timeout(@pointer_timer)
+      end
+
+      def stop_timeout(timer)
+        if timer
+          timer.cancel
+          timer = nil
+        end
+      end
+    end
+
+  end
+
+end