redcar 0.5.3dev → 0.5.4dev

data/plugins/application_swt/lib/application_swt/toolbar/binding_translator.rb

@@ -1,94 +0,0 @@
-module Redcar
-  class ApplicationSWT
-    class ToolBar
-      module BindingTranslator
-        MODIFIERS = %w(Cmd Ctrl Alt Shift)
-        
-        def self.platform_key_string(key_specifier)
-          if key_specifier.is_a?(Hash)
-            key_string = key_specifier[Redcar.platform]
-          else
-            key_string = key_specifier
-          end
-          key_string.gsub("Escape", "")
-          key_string.gsub("Space", "")
-          key_string
-        end
-
-        def self.key(key_string)
-          value = 0
-          MODIFIERS.each do |modifier|
-            if key_string =~ /\b#{modifier}\b/
-              value += modifier_values[modifier]
-            end
-          end
-          if key_string =~ /Escape$/
-            value += Swt::SWT::ESC
-          elsif key_string =~ /Space$/
-            value += " "[0]
-          elsif key_string =~ /(F\d+)/
-            value += Swt::SWT.const_get $1
-          elsif key_string =~ /(Right|Left|Up|Down)/
-            value += Swt::SWT.const_get 'ARROW_'+$1.upcase
-          elsif key_string =~ /Tab/
-            value += Swt::SWT::TAB
-          elsif key_string =~ /Page Up$/
-            value += Swt::SWT::PAGE_UP
-          elsif key_string =~ /Page Down$/
-            value += Swt::SWT::PAGE_DOWN
-          elsif key_string =~ /Home$/
-            value += Swt::SWT::HOME
-          elsif key_string =~ /End$/
-            value += Swt::SWT::END
-          else
-            value += key_string[-1]
-          end
-        end
-        
-        def self.modifiers(key_event)
-          modifiers = []
-          modifier_values.each do |string, constant|
-            if (key_event.stateMask & constant) != 0
-              modifiers << string
-            end
-          end
-          modifiers = modifiers.sort_by {|m| MODIFIERS.index(m) }
-        end
-        
-        def self.key_string(key_event)
-          modifiers = modifiers(key_event)
-          if key_event.character == 0
-            modifiers.join("+")
-          else
-            letter = java.lang.Character.new(key_event.character).toString.upcase # key_event.keyCode)
-            if modifiers.any?
-              modifiers.join("+") << "+" << (pretty_letter(letter) || letter)
-            else
-              (pretty_letter(letter) || letter)
-            end
-          end
-        end
-        
-        def self.matches?(key_string, key_string2)
-          key_string.split("+").sort ==
-            key_string2.split("+").sort
-        end
-        
-        def self.pretty_letter(char_string)
-          {"\r" => "Return"}[char_string]
-        end
-        
-        private
-        
-        def self.modifier_values
-          {
-            "Cmd"   => Swt::SWT::COMMAND,
-            "Ctrl"  => Swt::SWT::CTRL,
-            "Alt"   => Swt::SWT::ALT,
-            "Shift" => Swt::SWT::SHIFT,
-          }
-        end
-      end
-    end
-  end
-end

data/plugins/application_swt/lib/application_swt/toolbar.rb

@@ -1,134 +0,0 @@
-module Redcar
-  class ApplicationSWT
-    class ToolBar
-
-      
-      FILE_DIR = File.join(Redcar.root, %w(share icons))
-      DEFAULT_ICON = File.join(Redcar.root, %w(share icons document.png))
-
-      def self.icons
-        @icons = {
-          :new => File.join(FILE_DIR, "document-text.png"),
-          :open => File.join(FILE_DIR, "folder-open-document.png"),
-          :save => File.join(FILE_DIR, "document-import.png"),
-          #:save_as => File.join(FILE_DIR, "save_as.png"),
-          #:save_all => File.join(FILE_DIR, "save_all.png"),
-          :undo => File.join(FILE_DIR, "arrow-circle-225-left.png"),
-          :redo => File.join(FILE_DIR, "arrow-circle-315.png"),
-          :search => File.join(FILE_DIR, "binocular.png")
-        }
-      end
-
-
-      def self.types
-        @types = { :check => Swt::SWT::CHECK, :radio => Swt::SWT::RADIO }
-      end
-
-      def self.items
-        @items ||= Hash.new {|h,k| h[k] = []}
-      end
-
-      def self.disable_items(key_string)
-        items[key_string].each {|i| p i.text; i.enabled = false}
-      end
-
-      attr_reader :toolbar_bar
-
-      def self.toolbar_types
-        [Swt::SWT::FLAT, Swt::SWT::HORIZONTAL]
-      end
-
-      def initialize(window, toolbar_model, options={})
-        s = Time.now
-        @window = window
-        @toolbar_bar = Swt::Widgets::ToolBar.new(window.shell, Swt::SWT::FLAT + Swt::SWT::SHADOW_OUT)
-        @toolbar_bar.set_visible(false)
-	      @toolbar_bar.setLayout(Swt::Layout::FormLayout.new)
-	      @toolbar_bar.setLayoutData(Swt::Layout::FormData.new)
-        return unless toolbar_model
-        add_entries_to_toolbar(@toolbar_bar, toolbar_model)
-        #puts "ApplicationSWT::ToolBar initialize took #{Time.now - s}s"
-        @toolbar_bar.pack
-      end
-
-      def show
-        @toolbar_bar.set_visible(true)
-      end
-
-      def hide
-        #@toolbar_bar.set_visible(false)
-	#@toolbar_bar.setRedraw(true)
-	@toolbar_bar.dispose()
-      end
-
-      def close
-        #@handlers.each {|obj, h| obj.remove_listener(h) }
-        @toolbar_bar.dispose
-        @result
-      end
-
-      def move(x, y)
-        @toolbar_bar.setLocation(x, y)
-      end
-
-      private
-
-      def add_entries_to_toolbar(toolbar, toolbar_model)
-
-        toolbar_model.each do |entry|
-          if entry.is_a?(Redcar::ToolBar::LazyToolBar)
-            toolbar_header = Swt::Widgets::ToolItem.new(toolbar, Swt::SWT::CASCADE)
-            toolbar_header.text = entry.text
-            #new_toolbar = Swt::Widgets::ToolBar.new(@window.shell, Swt::SWT::DROP_DOWN)
-            new_toolbar = Swt::Widgets::ToolBar.new(toolbar)
-            toolbar_header.toolbar = new_toolbar
-            toolbar_header.add_arm_listener do
-              new_toolbar.get_items.each {|i| i.dispose }
-              add_entries_to_toolbar(new_toolbar, entry)
-            end
-          elsif entry.is_a?(Redcar::ToolBar)
-            new_toolbar = Swt::Widgets::ToolBar.new(toolbar)
-            add_entries_to_toolbar(new_toolbar, entry)
-          elsif entry.is_a?(Redcar::ToolBar::Item::Separator)
-            item = Swt::Widgets::ToolItem.new(toolbar, Swt::SWT::SEPARATOR)
-          elsif entry.is_a?(Redcar::ToolBar::Item)
-            item = Swt::Widgets::ToolItem.new(toolbar, Swt::SWT::PUSH)
-            item.setEnabled(true)
-            item.setImage(Swt::Graphics::Image.new(ApplicationSWT.display, ToolBar.icons[entry.icon] || entry.icon || DEFAULT_ICON))
-            connect_command_to_item(item, entry)
-          else
-            raise "unknown object of type #{entry.class} in toolbar"
-          end
-        end
-      end
-
-      class SelectionListener
-        def initialize(entry)
-          @entry = entry
-        end
-
-        def widget_selected(e)
-          @entry.selected(e.stateMask != 0)
-        end
-
-        def widget_default_selected(e)
-          @entry.selected(e.stateMask != 0)
-        end
-      end
-
-      def connect_command_to_item(item, entry)
-        item.setToolTipText(entry.text)
-        item.add_selection_listener(SelectionListener.new(entry))
-        h = entry.command.add_listener(:active_changed) do |value|
-          unless item.disposed
-            item.enabled = value
-          end
-        end
-        #@handlers << [entry.command, h]
-        if not entry.command.active?
-          item.enabled = false
-        end
-      end
-    end
-  end
-end