reflexion 0.1.6 → 0.1.7

data/lib/reflex/arc_shape.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/shape'
+
+
+module Reflex
+
+
+  class ArcShape < Shape
+
+    def on_draw (e)
+      p, b = e.painter, e.bounds
+      attach_color_and_border(p) {p.arc b}
+    end
+
+  end# ArcShape
+
+
+end# Reflex

data/lib/reflex/button.rb

@@ -0,0 +1,75 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/view'
+
+
+module Reflex
+
+
+  class Button < View
+
+    has_model
+
+    attr_accessor :text
+
+    def initialize (*args, &block)
+      self.data = false
+      super
+    end
+
+    def content_size ()
+      f = window.painter.font
+      return f.width(@text) + 2, f.height + 2
+    end
+
+    def on_press (e)
+    end
+
+    def on_draw (e)
+      e.painter.color (pressing? ? :white : :none), :white do |p|
+        p.rect e.bounds
+
+        if @text
+          p.fill pressing? ? :black : :white
+          x = (e.bounds.w - p.font.w(@text)) / 2
+          y = (e.bounds.h - p.font.h) / 2
+          p.text @text, x, y
+        end
+
+        p.fill :none
+        p.rect e.bounds
+      end
+    end
+
+    def on_pointer (e)
+      case e.type
+      when :down
+        self.capture += [:pointer]
+        redraw
+      when :up
+        if pressing?
+          self.capture -= [:pointer]
+          if frame.move_to(0, 0).include? e.position
+            self.data = true
+            self.data = false
+          end
+          redraw
+        end
+      end
+    end
+
+    def on_data_update (e)
+      on_press({}) if e.data
+    end
+
+    private
+
+      def pressing? ()
+        capturing? :pointer
+      end
+
+  end# Button
+
+
+end# Reflex

data/lib/reflex/capture_event.rb

@@ -0,0 +1,37 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/flags'
+
+
+module Reflex
+
+
+  class CaptureEvent
+
+    def begin ()
+      CAPTURE_FLAG.bits2symbols get_begin
+    end
+
+    def begin? (*symbols)
+      bits = CAPTURE_FLAG.symbols2bits *symbols
+      (bits & get_begin) == bits
+    end
+
+    def end ()
+      CAPTURE_FLAG.bits2symbols get_end
+    end
+
+    def end? (*symbols)
+      bits = CAPTURE_FLAG.symbols2bits *symbols
+      (bits & get_end) == bits
+    end
+
+    def inspect ()
+      "#<Reflex::CaptureEvent begin:#{self.begin} end:#{self.end}}>"
+    end
+
+  end# CaptureEvent
+
+
+end# Reflex

data/lib/reflex/color.rb

@@ -0,0 +1,13 @@
+# -*- coding: utf-8 -*-
+
+
+require 'rays/color'
+
+
+module Reflex
+
+
+  Color = Rays::Color
+
+
+end# Reflex

data/lib/reflex/color_space.rb

@@ -0,0 +1,13 @@
+# -*- coding: utf-8 -*-
+
+
+require 'rays/color_space'
+
+
+module Reflex
+
+
+  ColorSpace = Rays::ColorSpace
+
+
+end# Reflex

data/lib/reflex/draw_event.rb

@@ -0,0 +1,19 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/ext'
+
+
+module Reflex
+
+
+  class DrawEvent
+
+    def inspect ()
+      "#<Reflex::DrawEvent painter:#{painter} bounds:#{bounds} dt:#{dt} fps:#{fps}>"
+    end
+
+  end# DrawEvent
+
+
+end# Reflex

data/lib/reflex/ellipse_shape.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/shape'
+
+
+module Reflex
+
+
+  class EllipseShape < Shape
+
+    def on_draw (e)
+      p, b = e.painter, e.bounds
+      attach_color_and_border(p) {p.ellipse b}
+    end
+
+  end# EllipseShape
+
+
+end# Reflex

data/lib/reflex/ext.rb

@@ -1,5 +1,5 @@
 # -*- coding: utf-8 -*-
 
 
-require 'rays/native'
+require 'rays/ext'
 require 'reflex/native'

data/lib/reflex/flags.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+
+
+require 'xot/bit_flag'
+require 'reflex/ext'
+
+
+module Reflex
+
+
+  CAPTURE_FLAG = Xot::BitFlag.new do
+    flag :key,     View::CAPTURE_KEY
+    flag :pointer, View::CAPTURE_POINTER
+    flag :all,     View::CAPTURE_ALL
+  end
+
+
+end# Reflex

data/lib/reflex/focus_event.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/ext'
+
+
+module Reflex
+
+
+  class FocusEvent
+
+    def type ()
+      TYPE2SYM[get_type] || :none
+    end
+
+    def focus? ()
+      get_type == TYPE_FOCUS
+    end
+
+    def blur? ()
+      get_type == TYPE_BLUR
+    end
+
+    def inspect ()
+      "#<Reflex::FocusEvent type:#{type} focus:#{focus} last:#{last}>"
+    end
+
+    private
+
+      TYPE2SYM = {
+        TYPE_FOCUS => :focus,
+        TYPE_BLUR  => :blur,
+      }
+
+  end# FocusEvent
+
+
+end# Reflex

data/lib/reflex/font.rb

@@ -0,0 +1,13 @@
+# -*- coding: utf-8 -*-
+
+
+require 'rays/font'
+
+
+module Reflex
+
+
+  Font = Rays::Font
+
+
+end# Reflex

data/lib/reflex/frame_event.rb

@@ -0,0 +1,42 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/ext'
+
+
+module Reflex
+
+
+  class FrameEvent
+
+    alias dw   dwidth
+    alias dh   dheight
+    alias dpos dposition
+
+    def x ()
+      frame.x
+    end
+
+    def y ()
+      frame.y
+    end
+
+    def width ()
+      frame.width
+    end
+
+    def height ()
+      frame.height
+    end
+
+    alias w width
+    alias h height
+
+    def inspect ()
+      "#<Reflex::FrameEvent x:#{x} y:#{y} w:#{w} h:#{h} dx:#{dx} dy:#{dy} dw:#{dw} dh:#{dh}>"
+    end
+
+  end# FrameEvent
+
+
+end# Reflex

data/lib/reflex/helper.rb

@@ -1,6 +1,7 @@
 # -*- coding: utf-8 -*-
 
 
+require 'xot/hookable'
 require 'reflex/point'
 require 'reflex/bounds'
 
@@ -8,50 +9,106 @@ require 'reflex/bounds'
 module Reflex
 
 
-  module HasBounds
+  module Hookable
 
-    def bounds (*args)
-      b = get_bounds
-      b.move_to! *args unless args.empty?
-      b
+    include Xot::Hookable
+
+    def hook (name, &block)
+      super "on_#{name}".intern, &block
+    end
+
+  end# Hookable
+
+
+  module HasFrame
+
+    def frame= (*args)
+      set_frame args.flatten
+      get_frame
+    end
+
+    def frame (*args)
+      send :frame=, *args unless args.empty?
+      get_frame
+    end
+
+    def move_to (*args)
+      self.frame = get_frame.move_to *args
+      self
+    end
+
+    def move_by (*args)
+      self.frame = get_frame.move_by *args
+      self
+    end
+
+    def resize_to (*args)
+      self.frame = get_frame.resize_to *args
+      self
     end
 
-    def bounds= (*args)
-      case args[0]
-      when Bounds
-        set_bounds *args[0].to_a
-      when Point
-        set_bounds *args.map{|p| p.to_a}.flatten
-      when Array
-        set_bounds *args[0]
-      when Integer, Float
-        set_bounds *args
+    def resize_by (*args)
+      self.frame = get_frame.resize_by *args
+      self
+    end
+
+    def inset_by (*args)
+      self.frame = get_frame.inset_by *args
+      self
+    end
+
+    %w[
+      x y z w h d width height depth
+      left top back right bottom front
+      left_top right_top left_bottom right_bottom
+      lt rt lb rb
+      position pos size center
+    ].each do |name|
+      name_assign = "#{name}=".intern
+      name        = name.intern
+
+      define_method name do |*args|
+        send name_assign, *args unless args.empty?
+        get_frame.send name
+      end
+
+      define_method name_assign do |*args|
+        b   = get_frame
+        ret = b.send name_assign, *args
+        set_frame b
+        ret
       end
     end
 
-    def move_to (x, y)
-      b = self.bounds
-      b.x, b.y = x, y
-      self.bounds = b
+  end# HasFrame
+
+
+  module HasTags
+
+    def tag= (*tags)
+      clear_tags
+      tag *tags.flatten
+    end
+
+    alias tags= tag=
+
+    def tag (*tags)
+      tags.each {|tag| add_tag tag}
     end
 
-    def move_by (dx, dy)
-      b = self.bounds
-      move_to b.x + dx, b.y + dy
+    def untag (*tags)
+      tags.each {|tag| remove_tag tag}
     end
 
-    def resize_to (width, height)
-      b = self.bounds
-      b.width, b.height = width, height
-      self.bounds = b
+    def tags ()
+      to_enum :each_tag
     end
 
-    def resize_by (dwidth, dheight)
-      b = self.bounds
-      resize_to b.width + dwidth, b.height + dheight
+    def clear_tags ()
+      untag *tags.to_a
     end
 
-  end# HasBounds
+  end# HasTags
 
 
 end# Reflex

data/lib/reflex/image_view.rb

@@ -0,0 +1,25 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/view'
+
+
+module Reflex
+
+
+  class ImageView < View
+
+    has_model
+
+    def image= (image)
+      self.data = image
+    end
+
+    def on_data_update (e)
+      set_image self.data
+    end
+
+  end# ImageView
+
+
+end# Reflex

data/lib/reflex/key_event.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/ext'
+
+
+module Reflex
+
+
+  class KeyEvent
+
+    def type ()
+      TYPE2SYM[get_type] || :none
+    end
+
+    def down? ()
+      get_type == TYPE_DOWN
+    end
+
+    def up? ()
+      get_type == TYPE_UP
+    end
+
+    def inspect ()
+      "#<Reflex::KeyEvent type:#{type} chars:'#{chars}' code:#{code} mod:#{modifiers} repeat:#{repeat} capture?:#{capture?}>"
+    end
+
+    private
+
+      TYPE2SYM = {
+        TYPE_DOWN => :down,
+        TYPE_UP   => :up,
+      }
+
+  end# KeyEvent
+
+
+end# Reflex

data/lib/reflex/line_shape.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/shape'
+
+
+module Reflex
+
+
+  class LineShape < Shape
+
+    def on_draw (e)
+      p, b = e.painter, e.bounds
+      attach_color_and_border(p) {p.line b.lt, b.rb}
+    end
+
+  end# LineShape
+
+
+end# Reflex

data/lib/reflex/list_view.rb

@@ -0,0 +1,15 @@
+# -*- coding: utf-8 -*-
+
+
+require 'reflex/view'
+
+
+module Reflex
+
+
+  class ListView < View
+
+  end# ListView
+
+
+end# Reflex