shoes 4.0.0.pre1 → 4.0.0.pre2

data/lib/shoes/swt/arc.rb

@@ -1,70 +0,0 @@
-class Shoes
-  module Swt
-    class Arc
-      include Common::Fill
-      include Common::Stroke
-      include Common::PainterUpdatesPosition
-      include Common::Toggle
-      include Common::Clear
-      include ::Shoes::BackendDimensionsDelegations
-
-      attr_reader :dsl, :app, :transform
-
-      # Creates a new Shoes::Swt::Arc
-      #
-      # @param [Shoes::Arc] dsl The DSL object represented by this implementation
-      # @param [Shoes::Swt::App] app The implementation object of the Shoes app
-      def initialize(dsl, app, opts = {})
-        @dsl = dsl
-        @app = app
-        @painter = Painter.new(self)
-        @app.add_paint_listener @painter
-      end
-
-      def angle1
-        radians_to_degrees dsl.angle1
-      end
-
-      def angle2
-        radians_to_degrees dsl.angle2
-      end
-
-      def wedge?
-        dsl.wedge?
-      end
-
-      private
-      def radians_to_degrees(radians)
-        radians * 180 / ::Shoes::PI
-      end
-
-      public
-      class Painter < Common::Painter
-        def fill(graphics_context)
-          if (@obj.wedge?)
-            graphics_context.fill_arc(@obj.element_left, @obj.element_top,
-                                      @obj.element_width, @obj.element_height,
-                                      @obj.angle1, @obj.angle2 * -1)
-          else
-            path = ::Swt::Path.new(::Swt.display)
-            path.add_arc(@obj.element_left, @obj.element_top,
-                         @obj.element_width, @obj.element_height,
-                         @obj.angle1, @obj.angle2 * -1)
-            graphics_context.fill_path(path)
-          end
-        end
-
-        def draw(graphics_context)
-          sw = graphics_context.get_line_width
-          if (@obj.element_left and @obj.element_top and @obj.element_width and @obj.element_height)
-            graphics_context.draw_arc(@obj.element_left+sw/2,
-                                      @obj.element_top+sw/2,
-                                      @obj.element_width-sw,
-                                      @obj.element_height-sw,
-                                      @obj.angle1, @obj.angle2 * -1)
-          end
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/background.rb

@@ -1,31 +0,0 @@
-class Shoes
-  module Swt
-    class Background
-      extend Forwardable
-      include Common::Fill
-      include Common::Stroke
-      include Common::Clear
-      include Common::Toggle
-      include BackendDimensionsDelegations
-
-      def_delegators :dsl, :corners, :angle
-
-      attr_reader :dsl, :app, :transform, :painter, :opts
-
-      def initialize(dsl, app, opts = {}, &blk)
-        @dsl = dsl
-        @app = app
-        @opts = opts
-
-        @painter = Painter.new(self)
-        @app.add_paint_listener @painter
-      end
-
-      class Painter < RectPainter
-        def draw_setup(gc)
-          # don't draw
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/border.rb

@@ -1,37 +0,0 @@
-class Shoes
-  module Swt
-    class Border
-      extend Forwardable
-      include Common::Fill
-      include Common::Stroke
-      include Common::Clear
-      include ::Shoes::BackendDimensionsDelegations
-
-      def_delegators :dsl, :angle, :corners
-
-      attr_reader :dsl, :painter, :opts, :transform
-
-      def initialize(dsl, app, opts = {}, &blk)
-        @dsl = dsl
-        @app = app
-        @container = @app.real
-        @opts = opts
-
-        @painter = Painter.new(self)
-        @app.add_paint_listener @painter
-      end
-
-      class Painter < RectPainter
-
-        def fill_setup(gc)
-          # don't draw
-        end
-
-        def draw_setup(gc)
-          @obj.apply_stroke gc
-          true
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/button.rb

@@ -1,18 +0,0 @@
-class Shoes
-  module Swt
-    class Button < SwtButton
-      include Common::Child
-
-      # Create a button
-      #
-      # @param [Shoes::Button] dsl The Shoes DSL button this represents
-      # @param [::Swt::Widgets::Composite] parent The parent element of this button
-      # @param [Proc] blk The block of code to call when this button is activated
-      def initialize(dsl, parent)
-        super(dsl, parent, ::Swt::SWT::PUSH) do |button|
-          button.set_text @dsl.text
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/check.rb

@@ -1,14 +0,0 @@
-class Shoes
-  module Swt
-    class Check < CheckButton
-      # Create a check box
-      #
-      # @param [Shoes::Button] dsl The Shoes DSL check box this represents
-      # @param [::Swt::Widgets::Composite] parent The parent element of this button
-      # @param [Proc] blk The block of code to call when this button is activated
-      def initialize(dsl, parent)
-        super(dsl, parent, ::Swt::SWT::CHECK)
-      end
-    end
-  end
-end

data/lib/shoes/swt/check_button.rb

@@ -1,19 +0,0 @@
-class Shoes
-  module Swt
-    class CheckButton < SwtButton
-      include Common::Child
-
-      def initialize(dsl, parent, type)
-        super(dsl, parent, type)
-      end
-
-      def checked?
-        @real.get_selection
-      end
-
-      def checked=(bool)
-        @real.set_selection bool
-      end
-    end
-  end
-end

data/lib/shoes/swt/color.rb

@@ -1,45 +0,0 @@
-class Shoes
-  module Swt
-    class Color
-      include DisposedProtection
-
-      def self.create(color)
-        color ? new(color) : NullColor.new
-      end
-
-      # @param [Shoes::Color] color the DSL representation of this color
-      def initialize(color)
-        @dsl = color
-        @real = ::Swt::Graphics::Color.new(Shoes.display, @dsl.red, @dsl.green, @dsl.blue)
-      end
-
-      attr_reader :dsl
-
-      # @return [Integer] the alpha value, from 0 (transparent) to 255 (opaque)
-      def alpha
-        @dsl.alpha
-      end
-
-      # @param [Swt::Graphics::GC] gc the graphics context on which to apply fill
-      # @note left, top, width, height, and angle are not used in this method, and only
-      #   exist to satisfy the Pattern interface
-      def apply_as_fill(gc, left = nil, top = nil, width = nil, height = nil, angle = nil)
-        gc.set_background real
-        gc.set_alpha alpha
-      end
-
-      # @param [Swt::Graphics::GC] gc the graphics context on which to apply stroke
-      def apply_as_stroke(gc, left = nil, top = nil, width = nil, height = nil, angle = nil)
-        gc.set_foreground real
-        gc.set_alpha alpha
-      end
-    end
-
-    class NullColor
-      attr_reader :alpha, :dsl, :real
-      def apply_as_fill(gc); end
-      def apply_as_stroke(gc); end
-    end
-  end
-end
-

data/lib/shoes/swt/common/child.rb

@@ -1,16 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      # Behavior for elements that act as children of other elements
-      module Child
-        # Finds the current app by asking parent elements, all the way
-        # up to the App
-        #
-        # @return [Shoes::Swt::App] The current app
-        def app
-          parent.app
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/common/clear.rb

@@ -1,24 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      module Clear
-        def clear
-          app.remove_paint_listener @painter
-          remove_click_listeners
-          @real.dispose unless @real.nil? || @real.disposed?
-          dispose
-        end
-
-        # Classes should override to dispose of any Swt resources they create
-        def dispose
-        end
-
-        private
-        def remove_click_listeners
-          app.remove_listener ::Swt::SWT::MouseDown, @click_listener
-          app.remove_listener ::Swt::SWT::MouseUp, @click_listener
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/common/clickable.rb

@@ -1,62 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      module Clickable
-
-        attr_accessor :click_listener
-
-        # object = self is there for compatibility reasons for now
-        # it's for link (defined in text.rb) and the listener is added in the
-        # swt/text_block.rb ... moving it around would be too hard now
-        def clickable(object = self, block)
-          add_listener_for object, ::Swt::SWT::MouseDown, block
-        end
-
-        def click(&block)
-          add_listener_for ::Swt::SWT::MouseDown, block
-        end
-
-        def release(&block)
-          add_listener_for ::Swt::SWT::MouseUp, block
-        end
-
-        private
-        def add_listener_for(swt_object = self, event, block)
-          # dsl objects take care of in bounds checking etc.
-          dsl_object = swt_object.dsl
-          listener = ClickListener.new(dsl_object, block)
-          swt_object.click_listener = listener
-          app.add_clickable_element dsl_object
-          app.add_listener event, listener
-        end
-
-        def remove_listener_for(swt_object = self, event)
-          dsl_object = swt_object.dsl
-          app.clickable_elements.delete(dsl_object)
-          app.remove_listener ::Swt::SWT::MouseDown, swt_object.click_listener
-          app.remove_listener ::Swt::SWT::MouseUp, swt_object.click_listener
-        end
-
-        class ClickListener
-          include ::Swt::Widgets::Listener
-
-          def initialize(clickable_object, block)
-            @clickable_object = clickable_object
-            @block            = block
-          end
-
-          def handleEvent(mouse_event)
-            if @clickable_object.in_bounds?(mouse_event.x, mouse_event.y)
-              eval_block mouse_event
-            end
-          end
-
-          def eval_block(mouse_event)
-            @block.call mouse_event.button, mouse_event.x, mouse_event.y
-          end
-        end
-
-      end
-    end
-  end
-end

data/lib/shoes/swt/common/container.rb

@@ -1,28 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      # Container methods
-      module Container
-        # Adds a painter to be executed when this object needs to be
-        # repainted. Delegates to `@real`
-        #
-        # @param [Painter] painter The code to be executed on paint
-        def add_paint_listener(painter)
-          @real.add_paint_listener painter
-        end
-
-        def remove_paint_listener(painter)
-          @real.remove_paint_listener painter if painter
-        end
-
-        def add_listener(event, listener)
-          @real.add_listener event, listener
-        end
-
-        def remove_listener(event, listener)
-          @real.remove_listener event, listener if listener
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/common/fill.rb

@@ -1,37 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      # Methods for retrieving fill values from a Shoes DSL class
-      #
-      # @note Including classes must provide `#dsl`
-      module Fill
-        # This object's fill color
-        #
-        # @return [Swt::Graphics::Color] The Swt representation of this object's fill color
-        def fill
-          dsl.fill ? ::Shoes.configuration.backend_for(dsl.fill) : nil
-        end
-
-        # This object's fill alpha value
-        #
-        # @return [Integer] The alpha value of this object's fill color (0-255)
-        def fill_alpha
-          fill.alpha
-        end
-
-        # @return [Integer] the angle to use when filling with a pattern
-        def angle
-          @angle || 0
-        end
-
-        def apply_fill(context)
-          if fill
-            left, top = self.is_a?(Star) ? [element_left - element_width/2.0, element_top - element_height/2.0] : [element_left, element_top]
-            fill.apply_as_fill(context, left, top, element_width, element_height, angle)
-            true
-          end
-        end
-      end
-    end
-  end
-end

data/lib/shoes/swt/common/painter.rb

@@ -1,83 +0,0 @@
-class Shoes
-  module Swt
-    module Common
-      class Painter
-        include ::Swt::Events::PaintListener
-        include Resource
-        LINECAP = {curve: ::Swt::SWT::CAP_ROUND, rect: ::Swt::SWT::CAP_FLAT, project: ::Swt::SWT::CAP_SQUARE}
-
-        def initialize(obj)
-          @obj = obj
-        end
-
-        def paint_control(event)
-          graphics_context = event.gc
-          gcs_reset graphics_context
-          if @obj.dsl.visible? && @obj.dsl.positioned?
-            paint_object graphics_context
-          end
-        rescue => e
-          # Really important to rescue here. Failures that escape this method
-          # cause odd-ball hangs with no backtraces. See #559 for an example.
-          #
-          puts 'SWALLOWED PAINT EXCEPTION - go take care of it' + e.to_s
-          puts 'Unfortunately we have to swallow it because it causes odd failures :('
-        end
-
-        def paint_object(graphics_context)
-          graphics_context.set_antialias ::Swt::SWT::ON
-          graphics_context.set_line_cap(LINECAP[@obj.dsl.style[:cap]] || LINECAP[:rect])
-          graphics_context.set_transform(@obj.transform)
-          obj = @obj.dsl
-          case obj
-            when ::Shoes::Oval, ::Shoes::Rect
-              set_rotate graphics_context, @obj.angle,
-                         obj.element_left + obj.element_width/2.0,
-                         obj.element_top + obj.element_height/2.0 do
-                fill graphics_context if fill_setup(graphics_context)
-                draw graphics_context if draw_setup(graphics_context)
-              end
-            else
-              fill graphics_context if fill_setup(graphics_context)
-              draw graphics_context if draw_setup(graphics_context)
-          end
-        end
-
-        # Override in subclass and return something falsy if not using fill
-        def fill_setup(graphics_context)
-          @obj.apply_fill(graphics_context)
-        end
-
-        # Implement in subclass
-        def fill(graphics_context)
-        end
-
-        # Override in subclass and return something falsy if not using draw
-        def draw_setup(graphics_context)
-          @obj.apply_stroke(graphics_context)
-        end
-
-        # Implement in subclass
-        def draw(graphics_context)
-        end
-
-        def set_rotate graphics_context, angle, left, top
-          angle, left, top = angle.to_i, left.to_i, top.to_i
-          if block_given?
-            tr = ::Swt::Transform.new Shoes.display
-            reset_rotate tr, graphics_context, angle, left, top
-            yield
-            reset_rotate tr, graphics_context, -angle, left, top
-          end
-        end
-
-        def reset_rotate tr, graphics_context, angle, left, top
-          tr.translate left, top
-          tr.rotate angle
-          tr.translate -left, -top
-          graphics_context.setTransform tr
-        end
-      end
-    end
-  end
-end