glimmer-dsl-swt 4.17.4.2 → 4.17.8.1

data/lib/glimmer/swt/directory_dialog_proxy.rb

@@ -0,0 +1,65 @@
+# Copyright (c) 2007-2020 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/swt_proxy'
+require 'glimmer/swt/widget_proxy'
+require 'glimmer/swt/display_proxy'
+
+module Glimmer
+  module SWT
+    # Proxy for org.eclipse.swt.widgets.DirectoryDialog
+    #
+    # Automatically uses the current shell if one is open.
+    # Otherwise, it instantiates a new shell parent
+    #
+    # Optionally takes a shell as an argument
+    #
+    # Follows the Proxy Design Pattern
+    class DirectoryDialogProxy < WidgetProxy
+      # TODO write rspec tests
+      include_package 'org.eclipse.swt.widgets'
+
+      def initialize(*args, swt_widget: nil)
+        if swt_widget
+          @swt_widget = swt_widget
+        else
+          style_args = args.select {|arg| arg.is_a?(Symbol) || arg.is_a?(String)}
+          if style_args.any?
+            style_arg_start_index = args.index(style_args.first)
+            style_arg_last_index = args.index(style_args.last)
+            args[style_arg_start_index..style_arg_last_index] = SWTProxy[style_args]
+          end
+          if !args.first.is_a?(Shell)
+            current_shell = DisplayProxy.instance.swt_display.shells.first
+            args.unshift(current_shell.nil? ? ShellProxy.new : current_shell)
+          end
+          if args.first.is_a?(ShellProxy)
+            args[0] = args[0].swt_widget
+          end
+          parent = args[0]
+          @parent_proxy = parent.is_a?(Shell) ? ShellProxy.new(swt_widget: parent) : parent
+          @swt_widget = DirectoryDialog.new(*args)
+        end
+      end
+
+    end
+  end
+end

data/lib/glimmer/swt/expand_item_proxy.rb

@@ -0,0 +1,97 @@
+# Copyright (c) 2007-2020 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/widget_proxy'
+require 'glimmer/swt/swt_proxy'
+
+module Glimmer
+  module SWT
+    # Proxy for org.eclipse.swt.widgets.ExpandItem
+    #
+    # Functions differently from other widget proxies.
+    #
+    # Glimmer instantiates an SWT Composite alongside the SWT ExpandItem
+    # and returns it for `#swt_widget` to allow adding widgets into it.
+    #
+    # In order to get the SWT ExpandItem object, one must call `#swt_expand_item`.
+    #
+    # Behind the scenes, this creates a tab item widget proxy separately from a composite that
+    # is set as the control of the tab item and `#swt_widget`.
+    #
+    # In order to retrieve the tab item widget proxy, one must call `#widget_proxy`
+    #
+    # Follows the Proxy Design Pattern
+    class ExpandItemProxy < WidgetProxy
+      ATTRIBUTES = ['text', 'height', 'expanded']
+      
+      include_package 'org.eclipse.swt.widgets'
+
+      attr_reader :widget_proxy, :swt_expand_item
+
+      def initialize(parent, style, &contents)
+        super("composite", parent, style, &contents)
+        layout = FillLayout.new(SWTProxy[:vertical])
+        layout.marginWidth = 0
+        layout.marginHeight = 0
+        layout.spacing = 0
+        swt_widget.layout = layout        
+        @widget_proxy = SWT::WidgetProxy.new('expand_item', parent, style)
+        @swt_expand_item = @widget_proxy.swt_widget
+        @swt_expand_item.control = swt_widget        
+        @swt_expand_item.expanded = true
+      end
+      
+      def post_add_content
+        @swt_expand_item.setHeight(swt_widget.computeSize(SWTProxy[:default], SWTProxy[:default]).y) unless @swt_expand_item.getHeight > 0
+      end
+      
+      def has_attribute?(attribute_name, *args)
+        if ATTRIBUTES.include?(attribute_name.to_s)
+          true
+        else
+          super(attribute_name, *args)
+        end
+      end
+
+      def set_attribute(attribute_name, *args)
+        if ATTRIBUTES.include?(attribute_name.to_s)
+          @widget_proxy.set_attribute(attribute_name, *args)
+        else
+          super(attribute_name, *args)
+        end
+      end
+
+      def get_attribute(attribute_name)
+        if ATTRIBUTES.include?(attribute_name.to_s)
+          @widget_proxy.get_attribute(attribute_name)
+        else
+          super(attribute_name)
+        end
+      end
+      
+      def dispose
+        swt_expand_item.setControl(nil)
+        swt_widget.dispose
+        swt_expand_item.dispose
+      end
+    end
+  end
+end

data/lib/glimmer/swt/file_dialog_proxy.rb

@@ -0,0 +1,66 @@
+# Copyright (c) 2007-2020 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/swt_proxy'
+require 'glimmer/swt/widget_proxy'
+require 'glimmer/swt/display_proxy'
+
+module Glimmer
+  module SWT
+    # Proxy for org.eclipse.swt.widgets.FileDialog
+    #
+    # Automatically uses the current shell if one is open.
+    # Otherwise, it instantiates a new shell parent
+    #
+    # Optionally takes a shell as an argument
+    #
+    # Follows the Proxy Design Pattern
+    class FileDialogProxy < WidgetProxy
+      # TODO write rspec tests
+      # TODO consider refactoring and sharing code with DirectoryDialogProxy (and do the same with their expressions)
+      include_package 'org.eclipse.swt.widgets'
+
+      def initialize(*args, swt_widget: nil)
+        if swt_widget
+          @swt_widget = swt_widget
+        else
+          style_args = args.select {|arg| arg.is_a?(Symbol) || arg.is_a?(String)}
+          if style_args.any?
+            style_arg_start_index = args.index(style_args.first)
+            style_arg_last_index = args.index(style_args.last)
+            args[style_arg_start_index..style_arg_last_index] = SWTProxy[style_args]
+          end
+          if !args.first.is_a?(Shell)
+            current_shell = DisplayProxy.instance.swt_display.shells.first
+            args.unshift(current_shell.nil? ? ShellProxy.new : current_shell)
+          end
+          if args.first.is_a?(ShellProxy)
+            args[0] = args[0].swt_widget
+          end
+          parent = args[0]
+          @parent_proxy = parent.is_a?(Shell) ? ShellProxy.new(swt_widget: parent) : parent
+          @swt_widget = FileDialog.new(*args)
+        end
+      end
+
+    end
+  end
+end

data/lib/glimmer/swt/image_proxy.rb

@@ -60,6 +60,8 @@ module Glimmer
           @swt_image = Image.new(DisplayProxy.instance.swt_display, @image_data)
           width = options[:width]
           height = options[:height]
+          height = (@image_data.height.to_f / @image_data.width.to_f)*width.to_f if !width.nil? && height.nil?
+          width = (@image_data.width.to_f / @image_data.height.to_f)*height.to_f if !height.nil? && width.nil?
           scale_to(width, height) unless width.nil? || height.nil?
         else
           @swt_image = Image.new(*@args)

data/lib/glimmer/swt/menu_proxy.rb

@@ -1,5 +1,5 @@
 # Copyright (c) 2007-2020 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
@@ -7,10 +7,10 @@
 # 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
@@ -116,7 +116,7 @@ module Glimmer
         else
           menu_item_proxy.handle_observation_request(observation_request, &block)
         end
-      end      
+      end
     end
   end
 end

data/lib/glimmer/swt/shell_proxy.rb

@@ -1,5 +1,5 @@
 # Copyright (c) 2007-2020 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
@@ -7,10 +7,10 @@
 # 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
@@ -65,7 +65,7 @@ module Glimmer
           @swt_widget.setMinimumSize(WIDTH_MIN, HEIGHT_MIN)
           # TODO make this an option not the default
           on_swt_show do
-            Thread.new do      
+            Thread.new do
               sleep(0.25)
               async_exec do
                 @swt_widget.setActive unless @swt_widget.isDisposed
@@ -130,7 +130,7 @@ module Glimmer
           @swt_widget.pack
           @swt_widget.removeControlListener(listener.swt_listener)
           @swt_widget.setMinimumSize(minimum_size)
-        elsif OS.linux?          
+        elsif OS.linux?
           @swt_widget.layout(true, true)
           @swt_widget.setBounds(bounds)
         end

data/lib/glimmer/swt/tab_item_proxy.rb

@@ -47,7 +47,7 @@ module Glimmer
         super("composite", parent, style, &contents)
         @widget_proxy = SWT::WidgetProxy.new('tab_item', parent, style)
         @swt_tab_item = @widget_proxy.swt_widget
-        @widget_proxy.swt_widget.control = self.swt_widget
+        @swt_tab_item.control = swt_widget
       end
 
       def has_attribute?(attribute_name, *args)

data/lib/glimmer/swt/widget_proxy.rb

@@ -1,5 +1,5 @@
 # Copyright (c) 2007-2020 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
@@ -7,10 +7,10 @@
 # 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
@@ -50,6 +50,7 @@ module Glimmer
         'check'               => [:check],
         'drag_source'         => [:drop_copy],
         'drop_target'         => [:drop_copy],
+        'expand_bar'          => [:v_scroll],
         'list'                => [:border, :v_scroll],
         'menu_item'           => [:push],
         'radio'               => [:radio],
@@ -90,11 +91,11 @@ module Glimmer
       }
       
       KEYWORD_ALIASES = {
-        'radio'          => 'button',
+        'arrow'          => 'button',
         'checkbox'       => 'button',
         'check'          => 'button',
+        'radio'          => 'button',
         'toggle'         => 'button',
-        'arrow'          => 'button',
       }
       
       class << self
@@ -107,7 +108,7 @@ module Glimmer
           if init_args.empty?
             selected_widget_proxy_class.new(swt_widget: swt_widget)
           else
-            selected_widget_proxy_class.new(*init_args)            
+            selected_widget_proxy_class.new(*init_args)
           end
         end
         
@@ -118,11 +119,11 @@ module Glimmer
             Glimmer::SWT.const_get(class_name)
           rescue
             Glimmer::SWT::WidgetProxy
-          end        
+          end
         end
         
         def underscored_widget_name(swt_widget)
-          swt_widget.class.name.split(/::|\./).last.underscore        
+          swt_widget.class.name.split(/::|\./).last.underscore
         end
       end
 
@@ -130,7 +131,7 @@ module Glimmer
       
       # Initializes a new SWT Widget
       #
-      # It is preferred to use `::create` method instead since it instantiates the 
+      # It is preferred to use `::create` method instead since it instantiates the
       # right subclass per widget keyword
       #
       # keyword, parent, swt_widget_args (including styles)
@@ -151,7 +152,7 @@ module Glimmer
           @parent_proxy = parent.get_data('proxy') || parent_proxy_class.new(swt_widget: parent)
         end
         if @swt_widget&.get_data('proxy').nil?
-          @swt_widget.set_data('proxy', self)          
+          @swt_widget.set_data('proxy', self)
           DEFAULT_INITIALIZERS[underscored_widget_name]&.call(@swt_widget)
           @parent_proxy.post_initialize_child(self)
         end
@@ -375,7 +376,7 @@ module Glimmer
                   observer.call(@last_top_index)
                 end
               }
-            end,            
+            end,
             :top_pixel => lambda do |observer|
               @last_top_pixel = @swt_widget.getTopPixel
               on_paint_control { |event|
@@ -479,13 +480,13 @@ module Glimmer
           proxy.set_attribute(:transfer, :text)
           proxy.on_drag_enter { |event|
             event.detail = DNDProxy[:drop_copy]
-          }          
+          }
         end
       end
       
       # TODO eliminate duplication in the following methods perhaps by relying on exceptions
 
-      def can_handle_observation_request?(observation_request)        
+      def can_handle_observation_request?(observation_request)
         observation_request = observation_request.to_s
         if observation_request.start_with?('on_swt_')
           constant_name = observation_request.sub(/^on_swt_/, '')
@@ -508,7 +509,7 @@ module Glimmer
         end
       rescue => e
         Glimmer::Config.logger.debug {e.full_message}
-        false        
+        false
       end
 
       def can_handle_drop_observation_request?(observation_request)
@@ -546,7 +547,7 @@ module Glimmer
       end
 
       def method_missing(method, *args, &block)
-        if can_handle_observation_request?(method)          
+        if can_handle_observation_request?(method)
           handle_observation_request(method, &block)
         else
           swt_widget.send(method, *args, &block)
@@ -558,7 +559,7 @@ module Glimmer
       end
       
       def respond_to?(method, *args, &block)
-        super || 
+        super ||
           can_handle_observation_request?(method) ||
           swt_widget.respond_to?(method, *args, &block)
       end
@@ -566,7 +567,7 @@ module Glimmer
       private
 
       def style(underscored_widget_name, styles)
-        styles = [styles].flatten.compact        
+        styles = [styles].flatten.compact
         styles = default_style(underscored_widget_name) if styles.empty?
         interpret_style(*styles)
       end
@@ -602,9 +603,9 @@ module Glimmer
       end
 
       def add_listener(underscored_listener_name, &block)
-        widget_add_listener_method, listener_class, listener_method = self.class.find_listener(@swt_widget.getClass, underscored_listener_name)        
+        widget_add_listener_method, listener_class, listener_method = self.class.find_listener(@swt_widget.getClass, underscored_listener_name)
         widget_listener_proxy = nil
-        safe_block = lambda { |*args| block.call(*args) unless @swt_widget.isDisposed }        
+        safe_block = lambda { |*args| block.call(*args) unless @swt_widget.isDisposed }
         listener = listener_class.new(listener_method => safe_block)
         @swt_widget.send(widget_add_listener_method, listener)
         widget_listener_proxy = WidgetListenerProxy.new(swt_widget: @swt_widget, swt_listener: listener, widget_add_listener_method: widget_add_listener_method, swt_listener_class: listener_class, swt_listener_method: listener_method)
@@ -646,7 +647,7 @@ module Glimmer
             listener_class.define_method('initialize') do |event_method_block_mapping|
               @event_method_block_mapping = event_method_block_mapping
             end
-            listener_type.getMethods.each do |event_method|              
+            listener_type.getMethods.each do |event_method|
               listener_class.define_method(event_method.getName) do |*args|
                 @event_method_block_mapping[event_method.getName]&.call(*args)
               end
@@ -677,9 +678,9 @@ module Glimmer
           },
           'selection_count' => {
             getter: {name: 'getSelectionCount'},
-            setter: {name: 'setSelection', invoker: lambda { |widget, args| 
+            setter: {name: 'setSelection', invoker: lambda { |widget, args|
               caret_position = @swt_widget.respond_to?(:getCaretPosition) ? @swt_widget.getCaretPosition : @swt_widget.getCaretOffset
-              @swt_widget.setSelection(caret_position, caret_position + args.first) if args.first 
+              @swt_widget.setSelection(caret_position, caret_position + args.first) if args.first
             }},
           },
         }
@@ -772,13 +773,13 @@ module Glimmer
                   sleep(delayTime)
                 end
               };
-              image_proxy = nil              
+              image_proxy = nil
             else
               on_swt_Resize do |resize_event|
                 image_proxy.scale_to(@swt_widget.getSize.x, @swt_widget.getSize.y)
-                @swt_widget.setBackgroundImage(image_proxy.swt_image)          
-              end        
-            end            
+                @swt_widget.setBackgroundImage(image_proxy.swt_image)
+              end
+            end
             
             image_proxy&.swt_image
           end,