glimmer-dsl-swt 4.18.4.4 → 4.18.4.9

data/lib/glimmer/swt/custom/radio_group.rb

@@ -1,176 +1,177 @@
-# Copyright (c) 2007-2021 Andy Maleh
-#
-# Permission is hereby granted, free of charge, to any person obtaining
-# a copy of this software and associated documentation files (the
-# "Software"), to deal in the Software without restriction, including
-# without limitation the rights to use, copy, modify, merge, publish,
-# distribute, sublicense, and/or sell copies of the Software, and to
-# permit persons to whom the Software is furnished to do so, subject to
-# the following conditions:
-#
-# The above copyright notice and this permission notice shall be
-# included in all copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-require 'glimmer/ui/custom_widget'
-
-module Glimmer
-  module SWT
-    module Custom
-      # A custom widget rendering a group of radios generated via data-binding
-      class RadioGroup
-        include Glimmer::UI::CustomWidget
-        
-        body {
-          composite # just an empty composite to hold radios upon data-binding `selection`
-        }
-        
-        def items=(text_array)
-          selection_value = selection
-          @items = Array[*text_array]
-          build_radios
-        end
-        
-        def items
-          @items || []
-        end
-        
-        def selection=(text)
-          radios.count.times do |index|
-            radio = radios[index]
-            item = items[index]
-            radio.selection = item == text
-          end
-        end
-        
-        def selection
-          selection_value = labels[selection_index]&.text unless selection_index == -1
-          selection_value.to_s
-        end
-        
-        def selection_index=(index)
-          self.selection=(items[index])
-        end
-        alias select selection_index=
-        
-        def selection_index
-          radios.index(radios.detect(&:selection)) || -1
-        end
-        
-        def radios
-          @radios ||= []
-        end
-        
-        def labels
-          @labels ||= []
-        end
-        
-        def can_handle_observation_request?(observation_request)
-          radios.first&.can_handle_observation_request?(observation_request) || super(observation_request)
-        end
-        
-        def handle_observation_request(observation_request, &block)
-          observation_requests << [observation_request, block]
-          delegate_observation_request_to_radios(observation_request, &block)
-          super
-        end
-        
-        def delegate_observation_request_to_radios(observation_request, &block)
-          if observation_request != 'on_widget_disposed'
-            radios.count.times do |index|
-              radio = radios[index]
-              label = labels[index]
-              if observation_request == 'on_widget_selected'
-                radio_block = lambda do |event|
-                  if event.widget.selection || selection_index == -1
-                    event.widget = self.swt_widget
-                    block.call(event)
-                  end
-                end
-                label_block = lambda do |event|
-                  self.selection_index = index
-                  block.call(event)
-                end
-                radio.handle_observation_request(observation_request, &radio_block) if radio.can_handle_observation_request?(observation_request)
-                label.handle_observation_request('on_mouse_up', &label_block)
-              else
-                listener_block = lambda do |event|
-                  event.widget = self.swt_widget
-                  block.call(event)
-                end
-                radio.handle_observation_request(observation_request, &listener_block) if radio.can_handle_observation_request?(observation_request)
-                label.handle_observation_request(observation_request, &listener_block) if label.can_handle_observation_request?(observation_request)
-              end
-            end
-          end
-        end
-        
-        def observation_requests
-          @observation_requests ||= Set.new
-        end
-        
-        def has_attribute?(attribute_name, *args)
-          (@composites.to_a + @radios.to_a + @labels.to_a).map do |widget_proxy|
-            return true if widget_proxy.has_attribute?(attribute_name, *args)
-          end
-          super
-        end
-         
-        def set_attribute(attribute_name, *args)
-          excluded_attributes = ['selection']
-          unless excluded_attributes.include?(attribute_name.to_s)
-            (@composites.to_a + @radios.to_a + @labels.to_a).each do |widget_proxy|
-              widget_proxy.set_attribute(attribute_name, *args) if widget_proxy.has_attribute?(attribute_name, *args)
-            end
-          end
-          super
-        end
-        
-        private
-        
-        def build_radios
-          current_selection = selection
-          @composites.to_a.each(&:dispose)
-          @radios = []
-          @labels = []
-          @composites = []
-          items.each do |item|
-            body_root.content {
-              @composites << composite {
-                grid_layout(2, false) {
-                  margin_width 0
-                  margin_height 0
-                  horizontal_spacing 0
-                  vertical_spacing 0
-                }
-                radios << radio { |radio_proxy|
-                  on_widget_selected {
-                    self.selection = items[radios.index(radio_proxy)]
-                  }
-                }
-                labels << label { |label_proxy|
-                  layout_data :fill, :center, true, false
-                  text item
-                  on_mouse_up {
-                    self.selection = label_proxy.text
-                  }
-                }
-              }
-            }
-          end
-          observation_requests.to_a.each do |observation_request, block|
-            delegate_observation_request_to_radios(observation_request, &block)
-          end
-          self.selection = current_selection
-        end
-      end
-    end
-  end
-end
+# Copyright (c) 2007-2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/ui/custom_widget'
+
+module Glimmer
+  module SWT
+    module Custom
+      # A custom widget rendering a group of radios generated via data-binding
+      class RadioGroup
+        include Glimmer::UI::CustomWidget
+        
+        body {
+          composite # just an empty composite to hold radios upon data-binding `selection`
+        }
+        
+        def items=(text_array)
+          selection_value = selection
+          @items = Array[*text_array]
+          build_radios
+        end
+        
+        def items
+          @items || []
+        end
+        
+        def selection=(text)
+          radios.count.times do |index|
+            radio = radios[index]
+            item = items[index]
+            radio.selection = item == text
+          end
+        end
+        
+        def selection
+          selection_value = labels[selection_index]&.text unless selection_index == -1
+          selection_value.to_s
+        end
+        
+        def selection_index=(index)
+          self.selection=(items[index])
+        end
+        alias select selection_index=
+        
+        def selection_index
+          radios.index(radios.detect(&:selection)) || -1
+        end
+        
+        def radios
+          @radios ||= []
+        end
+        
+        def labels
+          @labels ||= []
+        end
+        
+        def can_handle_observation_request?(observation_request)
+          radios.first&.can_handle_observation_request?(observation_request) or
+            super(observation_request)
+        end
+        
+        def handle_observation_request(observation_request, &block)
+          observation_requests << [observation_request, block]
+          delegate_observation_request_to_radios(observation_request, &block)
+          super
+        end
+        
+        def delegate_observation_request_to_radios(observation_request, &block)
+          if observation_request != 'on_widget_disposed'
+            radios.count.times do |index|
+              radio = radios[index]
+              label = labels[index]
+              if observation_request == 'on_widget_selected'
+                radio_block = lambda do |event|
+                  if event.widget.selection || selection_index == -1
+                    event.widget = self.swt_widget
+                    block.call(event)
+                  end
+                end
+                label_block = lambda do |event|
+                  self.selection_index = index
+                  block.call(event)
+                end
+                radio.handle_observation_request(observation_request, &radio_block) if radio.can_handle_observation_request?(observation_request)
+                label.handle_observation_request('on_mouse_up', &label_block)
+              else
+                listener_block = lambda do |event|
+                  event.widget = self.swt_widget
+                  block.call(event)
+                end
+                radio.handle_observation_request(observation_request, &listener_block) if radio.can_handle_observation_request?(observation_request)
+                label.handle_observation_request(observation_request, &listener_block) if label.can_handle_observation_request?(observation_request)
+              end
+            end
+          end
+        end
+        
+        def observation_requests
+          @observation_requests ||= Set.new
+        end
+        
+        def has_attribute?(attribute_name, *args)
+          (@composites.to_a + @radios.to_a + @labels.to_a).map do |widget_proxy|
+            return true if widget_proxy.has_attribute?(attribute_name, *args)
+          end
+          super
+        end
+         
+        def set_attribute(attribute_name, *args)
+          excluded_attributes = ['selection']
+          unless excluded_attributes.include?(attribute_name.to_s)
+            (@composites.to_a + @radios.to_a + @labels.to_a).each do |widget_proxy|
+              widget_proxy.set_attribute(attribute_name, *args) if widget_proxy.has_attribute?(attribute_name, *args)
+            end
+          end
+          super
+        end
+        
+        private
+        
+        def build_radios
+          current_selection = selection
+          @composites.to_a.each(&:dispose)
+          @radios = []
+          @labels = []
+          @composites = []
+          items.each do |item|
+            body_root.content {
+              @composites << composite {
+                grid_layout(2, false) {
+                  margin_width 0
+                  margin_height 0
+                  horizontal_spacing 0
+                  vertical_spacing 0
+                }
+                radios << radio { |radio_proxy|
+                  on_widget_selected {
+                    self.selection = items[radios.index(radio_proxy)]
+                  }
+                }
+                labels << label { |label_proxy|
+                  layout_data :fill, :center, true, false
+                  text item
+                  on_mouse_up {
+                    self.selection = label_proxy.text
+                  }
+                }
+              }
+            }
+          end
+          observation_requests.to_a.each do |observation_request, block|
+            delegate_observation_request_to_radios(observation_request, &block)
+          end
+          self.selection = current_selection
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/swt/custom/shape.rb

@@ -1,297 +1,332 @@
-# Copyright (c) 2007-2021 Andy Maleh
-#
-# Permission is hereby granted, free of charge, to any person obtaining
-# a copy of this software and associated documentation files (the
-# "Software"), to deal in the Software without restriction, including
-# without limitation the rights to use, copy, modify, merge, publish,
-# distribute, sublicense, and/or sell copies of the Software, and to
-# permit persons to whom the Software is furnished to do so, subject to
-# the following conditions:
-#
-# The above copyright notice and this permission notice shall be
-# included in all copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-require 'glimmer/swt/properties'
-require 'glimmer/swt/swt_proxy'
-require 'glimmer/swt/display_proxy'
-require 'glimmer/swt/color_proxy'
-require 'glimmer/swt/font_proxy'
-require 'glimmer/swt/transform_proxy'
-
-module Glimmer
-  module SWT
-    module Custom
-      # Represents a shape (graphics) to be drawn on a control/widget/canvas/display
-      # That is because Shape is drawn on a parent as graphics and doesn't have an SWT widget for itself
-      class Shape
-        include Packages
-        include Properties
-        # TODO support textExtent sized shapes nested within text/string
-        # TODO support a Pattern DSL for methods that take Pattern arguments
-        
-        class << self
-          def valid?(parent, keyword, *args, &block)
-            gc_instance_methods.include?(method_name(keyword, args))
-          end
-          
-          def gc_instance_methods
-            @gc_instance_methods ||= org.eclipse.swt.graphics.GC.instance_methods.map(&:to_s)
-          end
-          
-          def keywords
-            @keywords ||= gc_instance_methods.select do |method_name|
-              !method_name.end_with?('=') && (method_name.start_with?('draw_') || method_name.start_with?('fill_'))
-            end.reject do |method_name|
-              gc_instance_methods.include?("#{method_name}=") || gc_instance_methods.include?("set_#{method_name}")
-            end.map do |method_name|
-              method_name.gsub(/(draw|fill|gradient|round)_/, '')
-            end.uniq.compact.to_a
-          end
-          
-          def arg_options(args, extract: false)
-            arg_options_method = extract ? :pop : :last
-            options = args.send(arg_options_method) if args.last.is_a?(Hash)
-            options.nil? ? {} : options.symbolize_keys
-          end
-          
-          def method_name(keyword, args)
-            method_arg_options = arg_options(args)
-            unless flyweight_method_names.keys.include?([keyword, method_arg_options])
-              keyword = keyword.to_s
-              gradient = 'gradient_' if method_arg_options[:gradient]
-              round = 'round_' if method_arg_options[:round]
-              gc_instance_method_name_prefix = !['polyline', 'point', 'image', 'focus'].include?(keyword) && (method_arg_options[:fill] || method_arg_options[:gradient]) ? 'fill_' : 'draw_'
-              flyweight_method_names[[keyword, method_arg_options]] = "#{gc_instance_method_name_prefix}#{gradient}#{round}#{keyword}"
-            end
-            flyweight_method_names[[keyword, method_arg_options]]
-          end
-          
-          def flyweight_method_names
-            @flyweight_method_names ||= {}
-          end
-          
-          def pattern(*args)
-            found_pattern = flyweigh_patterns[args]
-            if found_pattern.nil? || found_pattern.is_disposed
-              found_pattern = flyweigh_patterns[args] = org.eclipse.swt.graphics.Pattern.new(*args)
-            end
-            found_pattern
-          end
-          
-          def flyweigh_patterns
-            @flyweigh_patterns ||= {}
-          end
-        end
-        
-        attr_reader :parent, :name, :args, :options, :paint_listener_proxy
-        
-        def initialize(parent, keyword, *args, &property_block)
-          @parent = parent
-          @name = keyword
-          @method_name = self.class.method_name(keyword, args)
-          @options = self.class.arg_options(args, extract: true)
-          @args = args
-          @properties = {}
-          @parent.shapes << self
-          post_add_content if property_block.nil?
-        end
-        
-        def draw?
-          !fill?
-        end
-        
-        def fill?
-          @options[:fill]
-        end
-        
-        def gradient?
-          @options[:gradient]
-        end
-        
-        def round?
-          @options[:round]
-        end
-        
-        def has_some_background?
-          @properties.keys.map(&:to_s).include?('background') || @properties.keys.map(&:to_s).include?('background_pattern')
-        end
-        
-        def has_some_foreground?
-          @properties.keys.map(&:to_s).include?('foreground') || @properties.keys.map(&:to_s).include?('foreground_pattern')
-        end
-        
-        def post_add_content
-          amend_method_name_options_based_on_properties
-          setup_painting
-          @content_added = true
-        end
-        
-        def apply_property_arg_conversions(method_name, property, args)
-          args = args.dup
-          the_java_method = org.eclipse.swt.graphics.GC.java_class.declared_instance_methods.detect {|m| m.name == method_name}
-          if (args.first.is_a?(Symbol) || args.first.is_a?(String))
-            if the_java_method.parameter_types.first == Color.java_class
-              args[0] = ColorProxy.new(args[0])
-            end
-            if the_java_method.parameter_types.first == Java::int.java_class
-              args[0] = SWTProxy.constant(args[0])
-            end
-          end
-          if args.first.is_a?(ColorProxy)
-            args[0] = args[0].swt_color
-          end
-          if args.first.is_a?(Hash) && the_java_method.parameter_types.first == Font.java_class
-            args[0] = FontProxy.new(args[0])
-          end
-          if args.first.is_a?(FontProxy)
-            args[0] = args[0].swt_font
-          end
-          if args.first.is_a?(TransformProxy)
-            args[0] = args[0].swt_transform
-          end
-          if ['setBackgroundPattern', 'setForegroundPattern'].include?(method_name.to_s)
-            args.each_with_index do |arg, i|
-              if arg.is_a?(Symbol) || arg.is_a?(String)
-                args[i] = ColorProxy.new(arg).swt_color
-              elsif arg.is_a?(ColorProxy)
-                args[i] = arg.swt_color
-              end
-            end
-            new_args = [DisplayProxy.instance.swt_display] + args
-            args[0] = pattern(*new_args, type: method_name.to_s.match(/set(.+)Pattern/)[1])
-            args[1..-1] = []
-          end
-          args
-        end
-        
-        def apply_shape_arg_conversions(method_name, args)
-          if args.size > 1 && (method_name.include?('polygon') || method_name.include?('polyline'))
-            args[0] = args.dup
-            args[1..-1] = []
-          end
-        end
-        
-        def apply_shape_arg_defaults(method_name, args)
-          if method_name.include?('round_rectangle') && args.size.between?(4, 5)
-            (6 - args.size).times {args << 60}
-          elsif method_name.include?('rectangle') && gradient? && args.size == 4
-            args << true
-          elsif (method_name.include?('text') || method_name.include?('string')) && !@properties.keys.map(&:to_s).include?('background') && args.size == 3
-            args << true
-          end
-          if method_name.include?('image') && args.first.is_a?(String)
-            args[0] = ImageProxy.new(args[0])
-          end
-          if method_name.include?('image') && args.first.is_a?(ImageProxy)
-            @image = args[0] = args[0].swt_image
-          end
-        end
-                
-        # Tolerates shape extra args added by user by mistake
-        # (e.g. happens when switching from round rectangle to a standard one without removing all extra args)
-        def tolerate_shape_extra_args(method_name, args)
-          the_java_method_arg_count = org.eclipse.swt.graphics.GC.java_class.declared_instance_methods.select do |m|
-            m.name == method_name.camelcase(:lower)
-          end.map(&:parameter_types).map(&:size).max
-          if args.size > the_java_method_arg_count
-            args[the_java_method_arg_count..-1] = []
-          end
-        end
-        
-        def amend_method_name_options_based_on_properties
-          if has_some_background? && !has_some_foreground?
-            @options[:fill] = true
-          elsif !has_some_background? && has_some_foreground?
-            @options[:fill] = false
-          elsif @name == 'rectangle' && has_some_background? && has_some_foreground?
-            @options[:fill] = true
-            @options[:gradient] = true
-          end
-          if @name == 'rectangle' && @args.size > 4 && @args.last.is_a?(Numeric)
-            @options[:round] = true
-          end
-          @method_name = self.class.method_name(@name, @args + [@options])
-        end
-                
-        def has_attribute?(attribute_name, *args)
-          self.class.gc_instance_methods.include?(attribute_setter(attribute_name))
-        end
-  
-        def set_attribute(attribute_name, *args)
-          @properties[attribute_name] = args
-          if @content_added && !@parent.is_disposed
-            @parent.resetup_shape_painting
-            @parent.redraw
-          end
-        end
-        
-        def get_attribute(attribute_name)
-          @properties.symbolize_keys[attribute_name.to_s.to_sym]
-        end
-        
-        def pattern(*args, type: nil)
-          instance_variable_name = "@#{type}_pattern"
-          the_pattern = instance_variable_get(instance_variable_name)
-          if the_pattern.nil?
-            the_pattern = self.class.pattern(*args)
-          end
-          the_pattern
-        end
-        
-        def dispose
-          paint_listener_proxy&.unregister
-          @background_pattern&.dispose
-          @background_pattern = nil
-          @foreground_pattern&.dispose
-          @foreground_pattern = nil
-          @image&.dispose
-          @image = nil
-          @parent.shapes.delete(self)
-        end
-        
-        def setup_painting
-          # TODO consider moving this method to parent (making the logic polymorphic)
-          return if @parent.is_disposed
-          if parent.respond_to?(:swt_display)
-            @paint_listener_proxy = @parent.on_swt_paint(&method(:paint))
-          elsif parent.respond_to?(:swt_image)
-            paint(parent) # treat parent as paint event since you don't do repaints with images, it's a one time deal.
-          elsif parent.respond_to?(:swt_widget)
-            @paint_listener_proxy = @parent.on_paint_control(&method(:paint))
-          end
-        end
-        
-        def paint(paint_event)
-          @properties['background'] = [@parent.background] if fill? && !has_some_background?
-          @properties['foreground'] = [@parent.foreground] if @parent.respond_to?(:foreground) && draw? && !has_some_foreground?
-          @properties['font'] = [@parent.font] if @parent.respond_to?(:font) && draw? && !@properties.keys.map(&:to_s).include?('font')
-          @properties['transform'] = [nil] if @parent.respond_to?(:transform) && !@properties.keys.map(&:to_s).include?('transform')
-          @properties.each do |property, args|
-            method_name = attribute_setter(property)
-            converted_args = apply_property_arg_conversions(method_name, property, args)
-            paint_event.gc.send(method_name, *converted_args)
-            if property == 'transform' && args.first.is_a?(TransformProxy)
-              args.first.swt_transform.dispose
-            end
-          end
-          apply_shape_arg_conversions(@method_name, @args)
-          apply_shape_arg_defaults(@method_name, @args)
-          tolerate_shape_extra_args(@method_name, @args)
-          paint_event.gc.send(@method_name, *@args)
-        end
-    
-      end
-      
-    end
-    
-  end
-  
-end
+# Copyright (c) 2007-2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/swt/properties'
+require 'glimmer/swt/swt_proxy'
+require 'glimmer/swt/display_proxy'
+require 'glimmer/swt/color_proxy'
+require 'glimmer/swt/font_proxy'
+require 'glimmer/swt/transform_proxy'
+
+module Glimmer
+  module SWT
+    module Custom
+      # Represents a shape (graphics) to be drawn on a control/widget/canvas/display
+      # That is because Shape is drawn on a parent as graphics and doesn't have an SWT widget for itself
+      class Shape
+        include Packages
+        include Properties
+        # TODO support textExtent sized shapes nested within text/string
+        # TODO support a Pattern DSL for methods that take Pattern arguments
+        
+        class << self
+          def valid?(parent, keyword, *args, &block)
+            gc_instance_methods.include?(method_name(keyword, arg_options(args)))
+          end
+          
+          def gc_instance_methods
+            @gc_instance_methods ||= org.eclipse.swt.graphics.GC.instance_methods.map(&:to_s)
+          end
+          
+          def keywords
+            @keywords ||= gc_instance_methods.select do |method_name|
+              !method_name.end_with?('=') && (method_name.start_with?('draw_') || method_name.start_with?('fill_'))
+            end.reject do |method_name|
+              gc_instance_methods.include?("#{method_name}=") || gc_instance_methods.include?("set_#{method_name}")
+            end.map do |method_name|
+              method_name.gsub(/(draw|fill|gradient|round)_/, '')
+            end.uniq.compact.to_a
+          end
+          
+          def arg_options(args, extract: false)
+            arg_options_method = extract ? :pop : :last
+            options = args.send(arg_options_method) if args.last.is_a?(Hash)
+            options.nil? ? {} : options.symbolize_keys
+          end
+          
+          def method_name(keyword, method_arg_options)
+            keyword = keyword.to_s
+            method_arg_options = method_arg_options.select {|key, value| %w[fill gradient round].include?(key.to_s)}
+            unless flyweight_method_names.keys.include?([keyword, method_arg_options])
+              gradient = 'Gradient' if method_arg_options[:gradient]
+              round = 'Round' if method_arg_options[:round]
+              gc_instance_method_name_prefix = !['polyline', 'point', 'image', 'focus'].include?(keyword) && (method_arg_options[:fill] || method_arg_options[:gradient]) ? 'fill' : 'draw'
+              flyweight_method_names[[keyword, method_arg_options]] = "#{gc_instance_method_name_prefix}#{gradient}#{round}#{keyword.capitalize}"
+            end
+            flyweight_method_names[[keyword, method_arg_options]]
+          end
+          
+          def flyweight_method_names
+            @flyweight_method_names ||= {}
+          end
+          
+          def pattern(*args)
+            found_pattern = flyweigh_patterns[args]
+            if found_pattern.nil? || found_pattern.is_disposed
+              found_pattern = flyweigh_patterns[args] = org.eclipse.swt.graphics.Pattern.new(*args)
+            end
+            found_pattern
+          end
+          
+          def flyweigh_patterns
+            @flyweigh_patterns ||= {}
+          end
+        end
+        
+        attr_reader :parent, :name, :args, :options
+        
+        def initialize(parent, keyword, *args, &property_block)
+          @parent = parent
+          @name = keyword
+          @options = self.class.arg_options(args, extract: true)
+          @method_name = self.class.method_name(keyword, @options)
+          @args = args
+          @properties = {}
+          @options.reject {|key, value| %w[fill gradient round].include?(key.to_s)}.each do |property, property_args|
+            @properties[property] = property_args
+          end
+          @parent.add_shape(self)
+          post_add_content if property_block.nil?
+        end
+        
+        def draw?
+          !fill?
+        end
+        
+        def fill?
+          @options[:fill]
+        end
+        
+        def gradient?
+          @options[:gradient]
+        end
+        
+        def round?
+          @options[:round]
+        end
+        
+        def has_some_background?
+          @properties.keys.map(&:to_s).include?('background') || @properties.keys.map(&:to_s).include?('background_pattern')
+        end
+        
+        def has_some_foreground?
+          @properties.keys.map(&:to_s).include?('foreground') || @properties.keys.map(&:to_s).include?('foreground_pattern')
+        end
+        
+        def post_add_content
+          unless @content_added
+            amend_method_name_options_based_on_properties!
+            @parent.setup_shape_painting unless @parent.is_a?(ImageProxy)
+            @content_added = true
+          end
+        end
+        
+        def apply_property_arg_conversions(method_name, property, args)
+          args = args.dup
+          the_java_method = org.eclipse.swt.graphics.GC.java_class.declared_instance_methods.detect {|m| m.name == method_name}
+          if ['setBackground', 'setForeground'].include?(method_name.to_s) && args.first.is_a?(Array)
+            args[0] = ColorProxy.new(args[0])
+          end
+          if args.first.is_a?(Symbol) || args.first.is_a?(String)
+            if the_java_method.parameter_types.first == Color.java_class
+              args[0] = ColorProxy.new(args[0])
+            end
+            if the_java_method.parameter_types.first == Java::int.java_class
+              args[0] = SWTProxy.constant(args[0])
+            end
+          end
+          if args.first.is_a?(ColorProxy)
+            args[0] = args[0].swt_color
+          end
+          if args.first.is_a?(Hash) && the_java_method.parameter_types.first == Font.java_class
+            args[0] = FontProxy.new(args[0])
+          end
+          if args.first.is_a?(FontProxy)
+            args[0] = args[0].swt_font
+          end
+          if args.first.is_a?(TransformProxy)
+            args[0] = args[0].swt_transform
+          end
+          if ['setBackgroundPattern', 'setForegroundPattern'].include?(method_name.to_s)
+            @parent.requires_shape_disposal = true
+            args.each_with_index do |arg, i|
+              if arg.is_a?(Symbol) || arg.is_a?(String)
+                args[i] = ColorProxy.new(arg).swt_color
+              elsif arg.is_a?(ColorProxy)
+                args[i] = arg.swt_color
+              end
+            end
+            new_args = [DisplayProxy.instance.swt_display] + args
+            args[0] = pattern(*new_args, type: method_name.to_s.match(/set(.+)Pattern/)[1])
+            args[1..-1] = []
+          end
+          args
+        end
+        
+        def apply_shape_arg_conversions!
+          if @args.size > 1 && (['polygon', 'polyline'].include?(@name))
+            @args[0] = @args.dup
+            @args[1..-1] = []
+          end
+        end
+        
+        def apply_shape_arg_defaults!
+          if @name.include?('rectangle') && round? && @args.size.between?(4, 5)
+            (6 - @args.size).times {@args << 60}
+          elsif @name.include?('rectangle') && gradient? && @args.size == 4
+            @args << true
+          elsif (@name.include?('text') || @name.include?('String')) && !@properties.keys.map(&:to_s).include?('background') && @args.size == 3
+            @args << true
+          end
+          if @name.include?('image')
+            @parent.requires_shape_disposal = true
+            if @args.size == 1
+              @args[1] = 0
+              @args[2] = 0
+            end
+            if @args.first.is_a?(String)
+              @args[0] = ImageProxy.new(@args[0])
+            end
+            if @args.first.is_a?(ImageProxy)
+              @image = @args[0] = @args[0].swt_image
+            end
+          end
+        end
+                
+        # Tolerates shape extra args added by user by mistake
+        # (e.g. happens when switching from round rectangle to a standard one without removing all extra args)
+        def tolerate_shape_extra_args!
+          the_java_method_arg_count = org.eclipse.swt.graphics.GC.java_class.declared_instance_methods.select do |m|
+            m.name == @method_name.camelcase(:lower)
+          end.map(&:parameter_types).map(&:size).max
+          if @args.size > the_java_method_arg_count
+            @args[the_java_method_arg_count..-1] = []
+          end
+        end
+        
+        def amend_method_name_options_based_on_properties!
+          return if @name == 'point'
+          if has_some_background? && !has_some_foreground?
+            @options[:fill] = true
+          elsif !has_some_background? && has_some_foreground?
+            @options[:fill] = false
+          elsif @name == 'rectangle' && has_some_background? && has_some_foreground?
+            @options[:fill] = true
+            @options[:gradient] = true
+          end
+          if @name == 'rectangle' && @args.size > 4 && @args.last.is_a?(Numeric)
+            @options[:round] = true
+          end
+          @method_name = self.class.method_name(@name, @options)
+        end
+                
+        def has_attribute?(attribute_name, *args)
+          self.class.gc_instance_methods.include?(attribute_setter(attribute_name))
+        end
+  
+        def set_attribute(attribute_name, *args)
+          @properties[attribute_name] = args
+          if @content_added && !@parent.is_disposed
+            @calculated_paint_args = false
+            @parent.redraw
+          end
+        end
+        
+        def get_attribute(attribute_name)
+          @properties.symbolize_keys[attribute_name.to_s.to_sym]
+        end
+        
+        def pattern(*args, type: nil)
+          instance_variable_name = "@#{type}_pattern"
+          the_pattern = instance_variable_get(instance_variable_name)
+          if the_pattern.nil?
+            the_pattern = self.class.pattern(*args)
+          end
+          the_pattern
+        end
+        
+        def dispose(dispose_images: true, dispose_patterns: true)
+          if dispose_patterns
+            @background_pattern&.dispose
+            @background_pattern = nil
+            @foreground_pattern&.dispose
+            @foreground_pattern = nil
+          end
+          if dispose_images
+            @image&.dispose
+            @image = nil
+          end
+          @parent.shapes.delete(self)
+        end
+                
+        def paint(paint_event)
+          calculate_paint_args!
+          @properties.each do |property, args|
+            method_name = attribute_setter(property)
+            # TODO consider optimization of not setting a background/foreground/font if it didn't change from last shape
+            paint_event.gc.send(method_name, *args)
+            if property == 'transform' && args.first.is_a?(TransformProxy)
+              args.first.swt_transform.dispose
+            end
+          end
+          paint_event.gc.send(@method_name, *@args)
+        end
+        
+        def calculate_paint_args!
+          unless @calculated_paint_args
+            if @name == 'point'
+              # optimized performance calculation for pixel points
+              if !@properties[:foreground].is_a?(Color)
+                if @properties[:foreground].is_a?(Array)
+                  @properties[:foreground] = ColorProxy.new(@properties[:foreground], ensure_bounds: false)
+                end
+                if @properties[:foreground].is_a?(Symbol) || @properties[:foreground].is_a?(String)
+                 @properties[:foreground] = ColorProxy.new(@properties[:foreground], ensure_bounds: false)
+                end
+                if @properties[:foreground].is_a?(ColorProxy)
+                  @properties[:foreground] = @properties[:foreground].swt_color
+                end
+              end
+            else
+              @properties['background'] = [@parent.background] if fill? && !has_some_background?
+              @properties['foreground'] = [@parent.foreground] if @parent.respond_to?(:foreground) && draw? && !has_some_foreground?
+              @properties['font'] = [@parent.font] if @parent.respond_to?(:font) && draw? && !@properties.keys.map(&:to_s).include?('font')
+              @properties['transform'] = [nil] if @parent.respond_to?(:transform) && !@properties.keys.map(&:to_s).include?('transform')
+              @properties.each do |property, args|
+                method_name = attribute_setter(property)
+                converted_args = apply_property_arg_conversions(method_name, property, args)
+                @properties[property] = converted_args
+              end
+              apply_shape_arg_conversions!
+              apply_shape_arg_defaults!
+              tolerate_shape_extra_args!
+              @calculated_paint_args = true
+            end
+          end
+        end
+    
+      end
+      
+    end
+    
+  end
+  
+end