glimmer 0.8.2 → 0.9.4

data/lib/glimmer/dsl/swt/combo_selection_data_binding_expression.rb

@@ -1,42 +0,0 @@
-require 'glimmer/dsl/expression'
-require 'glimmer/data_binding/model_binding'
-require 'glimmer/data_binding/widget_binding'
-
-module Glimmer
-  module DSL
-    module SWT
-      class ComboSelectionDataBindingExpression < Expression
-        include_package 'org.eclipse.swt.widgets'
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'selection' and
-            block.nil? and
-            widget?(parent) and
-            parent.swt_widget.is_a?(Combo) and
-            args.size == 1 and
-            args[0].is_a?(DataBinding::ModelBinding) and
-            args[0].evaluate_options_property.is_a?(Array)
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          model_binding = args[0]
-  
-          #TODO make this options observer dependent and all similar observers in widget specific data binding handlers
-          # TODO consider delegating some of this work
-          widget_binding = DataBinding::WidgetBinding.new(parent, 'items')
-          widget_binding.call(model_binding.evaluate_options_property)
-          model = model_binding.base_model
-          widget_binding.observe(model, model_binding.options_property_name)
-  
-          widget_binding = DataBinding::WidgetBinding.new(parent, 'text')
-          widget_binding.call(model_binding.evaluate_property)
-          widget_binding.observe(model, model_binding.property_name_expression)
-  
-          parent.on_widget_selected do
-            model_binding.call(widget_binding.evaluate_property)
-          end
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/custom_widget_expression.rb

@@ -1,36 +0,0 @@
-require 'glimmer'
-require 'glimmer/dsl/expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/ui/custom_widget'
-require 'glimmer/ui/custom_shell'
-
-module Glimmer
-  module DSL
-    module SWT
-      class CustomWidgetExpression < Expression
-        include ParentExpression
-
-        def can_interpret?(parent, keyword, *args, &block)
-          custom_widget_class = UI::CustomWidget.for(keyword)
-          custom_widget_class and
-            (widget?(parent) or
-            custom_widget_class.ancestors.include?(UI::CustomShell))
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          options = args.last.is_a?(Hash) ? args.pop : {}
-          UI::CustomWidget.for(keyword).new(parent, *args, options, &block)
-        end
-  
-        def add_content(parent, &block)
-          # TODO consider avoiding source_location
-          if block.source_location == parent.content&.__getobj__.source_location
-            parent.content.call(parent) unless parent.content.called?
-          else
-            super
-          end
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/data_binding_expression.rb

@@ -1,34 +0,0 @@
-require 'glimmer/dsl/expression'
-require 'glimmer/data_binding/model_binding'
-require 'glimmer/data_binding/widget_binding'
-
-module Glimmer
-  module DSL
-    module SWT
-      # Responsible for wiring two-way data-binding for text and selection properties
-      # on Text, Button, and Spinner widgets.
-      # Does so by using the output of the bind(model, property) command in the form
-      # of a ModelBinding, which is then connected to an anonymous widget observer
-      # (aka widget_data_binder as per widget_data_binders array)
-      #
-      # Depends on BindCommandHandler
-      class DataBindingExpression < Expression
-        def can_interpret?(parent, keyword, *args, &block)
-          args.size == 1 and
-            args[0].is_a?(DataBinding::ModelBinding)
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          model_binding = args[0]
-          widget_binding_parameters = [parent, keyword]
-          widget_binding = DataBinding::WidgetBinding.new(*widget_binding_parameters)
-          widget_binding.call(model_binding.evaluate_property)
-          #TODO make this options observer dependent and all similar observers in widget specific data binding handlers
-          widget_binding.observe(model_binding)
-          # TODO simplify this logic and put it where it belongs
-          parent.add_observer(model_binding, keyword) if parent.respond_to?(:add_observer, [model_binding, keyword])
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/dialog_expression.rb

@@ -1,26 +0,0 @@
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/dsl/top_level_expression'
-require 'glimmer/swt/shell_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class DialogExpression < StaticExpression
-        include TopLevelExpression
-        include ParentExpression
-
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'dialog' and
-            (parent.nil? or parent.is_a?(Glimmer::SWT::ShellProxy))
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          args = [parent] + args unless parent.nil?
-          args += [:dialog_trim, :application_modal]
-          Glimmer::SWT::ShellProxy.send(:new, *args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/display_expression.rb

@@ -1,19 +0,0 @@
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/dsl/top_level_expression'
-require 'glimmer/swt/display_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class DisplayExpression < StaticExpression
-        include TopLevelExpression
-        include ParentExpression
-
-        def interpret(parent, keyword, *args, &block)
-          Glimmer::SWT::DisplayProxy.instance(*args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/dsl.rb

@@ -1,28 +0,0 @@
-require 'glimmer/launcher'
-require Glimmer::Launcher.swt_jar_file
-require 'glimmer/dsl/engine'
-Dir[File.expand_path('../*_expression.rb', __FILE__)].each {|f| require f}
-
-# Glimmer DSL expression configuration module
-#
-# When DSL engine interprets an expression, it attempts to handle
-# with expressions listed here in the order specified.
-
-# Every expression has a corresponding Expression subclass
-# in glimmer/dsl
-
-Glimmer::DSL::Engine.add_dynamic_expressions(
-  Glimmer::DSL::SWT,
-  %w[
-    layout
-    widget_listener
-    combo_selection_data_binding
-    list_selection_data_binding
-    tree_items_data_binding
-    table_items_data_binding
-    data_binding
-    property
-    widget
-    custom_widget
-  ]
-)

data/lib/glimmer/dsl/swt/exec_expression.rb

@@ -1,28 +0,0 @@
-require 'glimmer/dsl/top_level_expression'
-require 'glimmer/swt/display_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      # Mixin for common code in async_exec and sync_exec expressions
-      # Uses name in subclass to auto-derive exec_operation
-      module ExecExpression
-        include TopLevelExpression
-
-        def exec_operation
-          @exec_operation ||= self.class.name.split(/::/).last.sub(/Expression$/, '').underscore
-        end
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == exec_operation and
-            block_given? and
-            args.empty?
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          Glimmer::SWT::DisplayProxy.instance.send(exec_operation, &block)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/layout_data_expression.rb

@@ -1,25 +0,0 @@
-require 'glimmer'
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/swt/layout_data_proxy'
-
-# TODO consider turning static keywords like layout_data into methods
-
-module Glimmer
-  module DSL
-    module SWT
-      class LayoutDataExpression < StaticExpression
-        include ParentExpression
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'layout_data' and
-            widget?(parent)
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          Glimmer::SWT::LayoutDataProxy.new(parent, args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/layout_expression.rb

@@ -1,27 +0,0 @@
-require 'glimmer'
-require 'glimmer/dsl/expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/swt/layout_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class LayoutExpression < Expression
-        include ParentExpression
-  
-        include_package 'org.eclipse.swt.widgets'
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword.to_s.end_with?('_layout') and
-            widget?(parent) and
-            parent.swt_widget.is_a?(Composite) and
-            Glimmer::SWT::LayoutProxy.layout_exists?(keyword.to_s)
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          Glimmer::SWT::LayoutProxy.new(keyword, parent, args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/list_selection_data_binding_expression.rb

@@ -1,44 +0,0 @@
-require 'glimmer/dsl/expression'
-require 'glimmer/data_binding/model_binding'
-require 'glimmer/data_binding/widget_binding'
-require 'glimmer/data_binding/list_selection_binding'
-
-module Glimmer
-  module DSL
-    module SWT
-      class ListSelectionDataBindingExpression < Expression
-        include_package 'org.eclipse.swt.widgets'
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'selection' and
-            block.nil? and
-            widget?(parent) and
-            parent.swt_widget.is_a?(List) and
-            args.size == 1 and
-            args[0].is_a?(DataBinding::ModelBinding) and
-            args[0].evaluate_options_property.is_a?(Array)
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          model_binding = args[0]
-          widget_binding = DataBinding::WidgetBinding.new(parent, 'items')
-          widget_binding.call(model_binding.evaluate_options_property)
-          model = model_binding.base_model
-          #TODO make this options observer dependent and all similar observers in widget specific data binding interpretrs
-          widget_binding.observe(model, model_binding.options_property_name)
-  
-          property_type = :string
-          property_type = :array if parent.has_style?(:multi)
-          list_selection_binding = DataBinding::ListSelectionBinding.new(parent, property_type)
-          list_selection_binding.call(model_binding.evaluate_property)
-          #TODO check if nested data binding works for list widget and other widgets that need custom data binding
-          list_selection_binding.observe(model, model_binding.property_name_expression)
-  
-          parent.on_widget_selected do
-            model_binding.call(list_selection_binding.evaluate_property)
-          end
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/menu_bar_expression.rb

@@ -1,33 +0,0 @@
-require 'glimmer'
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/swt/menu_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class MenuBarExpression < StaticExpression
-        include ParentExpression
-  
-        include_package 'org.eclipse.swt.widgets'
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          initial_condition = (keyword == 'menu_bar')
-          if initial_condition
-            if parent.swt_widget.is_a?(Shell)
-              return true
-            else
-              raise Glimmer::Error, "menu_bar may only be nested under a shell!"
-            end
-          end
-          false
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          args = args.unshift(:bar)
-          Glimmer::SWT::MenuProxy.new(parent, args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/menu_expression.rb

@@ -1,32 +0,0 @@
-require 'glimmer'
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/swt/menu_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class MenuExpression < StaticExpression
-        include ParentExpression
-  
-        include_package 'org.eclipse.swt.widgets'
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          initial_condition = (keyword == 'menu')
-          if initial_condition
-            if widget?(parent)
-              return true
-            else
-              raise Glimmer::Error, "menu may only be nested under a widget (like shell or another menu)!"
-            end
-          end
-          false
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          Glimmer::SWT::MenuProxy.new(parent, args)
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/message_box_expression.rb

@@ -1,29 +0,0 @@
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/parent_expression'
-require 'glimmer/dsl/top_level_expression'
-require 'glimmer/swt/shell_proxy'
-require 'glimmer/swt/message_box_proxy'
-require 'glimmer/swt/swt_proxy'
-
-module Glimmer
-  module DSL
-    module SWT
-      class MessageBoxExpression < StaticExpression
-        include TopLevelExpression
-        include ParentExpression
-
-        include_package 'org.eclipse.swt.widgets'
-
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'message_box'
-        end
-
-        def interpret(parent, keyword, *args, &block)
-          potential_parent = args.first
-          parent = args.shift if potential_parent.is_a?(Shell) || (potential_parent.respond_to?(:swt_widget) && potential_parent.swt_widget.is_a?(Shell))
-          Glimmer::SWT::MessageBoxProxy.new(parent, Glimmer::SWT::SWTProxy[args])
-        end
-      end
-    end
-  end
-end

data/lib/glimmer/dsl/swt/observe_expression.rb

@@ -1,32 +0,0 @@
-require 'glimmer/dsl/static_expression'
-require 'glimmer/dsl/top_level_expression'
-require 'glimmer/data_binding/observer'
-require 'glimmer/data_binding/model_binding'
-
-module Glimmer
-  module DSL
-    module SWT
-      class ObserveExpression < StaticExpression
-        include TopLevelExpression
-
-        REGEX_NESTED_OR_INDEXED_PROPERTY = /([^\[]+)(\[[^\]]+\])?/
-  
-        def can_interpret?(parent, keyword, *args, &block)
-          keyword == 'observe' and
-            block_given? and
-            (args.size == 2) and
-            textual?(args[1])
-        end
-  
-        def interpret(parent, keyword, *args, &block)
-          observer = DataBinding::Observer.proc(&block)
-          if args[1].to_s.match(REGEX_NESTED_OR_INDEXED_PROPERTY)
-            observer.observe(DataBinding::ModelBinding.new(args[0], args[1]))
-          else
-            observer.observe(args[0], args[1])
-          end
-        end
-      end
-    end
-  end
-end