sweet 0.0.2

data/COPYING

@@ -0,0 +1,18 @@
+Copyright (c) 2010 Michael Klaus
+
+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 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.

data/README.rdoc

@@ -0,0 +1,41 @@
+== Sweet: The SWT wrapper for JRuby
+
+Sweet is designed to provide the most readable and straight-forward DSL for the
+SWT toolkit while maintaining all of its flexibility. If you find any limits to
+this claim, please open a bug report or fix it on a fork if you feel
+adventurous.
+
+=== Install
+
+Sweet is available as a gem:
+
+  sudo gem install sweet
+
+To install the necessary SWT for your platform libraries, run:
+
+  sudo sweet install
+
+
+=== Example
+
+  Sweet.app 'My first Application', :layout => :fill do
+    label 'Your name:'
+    @name = edit_line
+
+    button 'Push me' do
+      puts "Hello, #{@name.text}!"
+    end
+  end
+
+You can then start your application via:
+
+  sweet my_app.rb
+
+Or put the following lines into the head of your file:
+
+  require 'rubygems'
+  require 'sweet'
+
+Also, take a look at the files in the example folder to get a head start.
+
+Have fun!

data/Rakefile

@@ -0,0 +1,50 @@
+# 
+# To change this template, choose Tools | Templates
+# and open the template in the editor.
+ 
+
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require 'rake/testtask'
+require 'spec/rake/spectask'
+
+spec = Gem::Specification.new do |s|
+  s.name = 'Sweet'
+  s.version = '0.0.1'
+  s.has_rdoc = true
+  s.extra_rdoc_files = ['README', 'LICENSE']
+  s.summary = 'Your summary here'
+  s.description = s.summary
+  s.author = ''
+  s.email = ''
+  # s.executables = ['your_executable_here']
+  s.files = %w(LICENSE README Rakefile) + Dir.glob("{bin,lib,spec}/**/*")
+  s.require_path = "lib"
+  s.bindir = "bin"
+end
+
+Rake::GemPackageTask.new(spec) do |p|
+  p.gem_spec = spec
+  p.need_tar = true
+  p.need_zip = true
+end
+
+Rake::RDocTask.new do |rdoc|
+  files =['README', 'LICENSE', 'lib/**/*.rb']
+  rdoc.rdoc_files.add(files)
+  rdoc.main = "README" # page to start on
+  rdoc.title = "Sweet Docs"
+  rdoc.rdoc_dir = 'doc/rdoc' # rdoc output folder
+  rdoc.options << '--line-numbers'
+end
+
+Rake::TestTask.new do |t|
+  t.test_files = FileList['test/**/*.rb']
+end
+
+Spec::Rake::SpecTask.new do |t|
+  t.spec_files = FileList['spec/**/*.rb']
+end

data/bin/sweet

@@ -0,0 +1,16 @@
+#!/usr/bin/env jruby
+
+require 'rubygems'
+require 'sweet/downloader'
+
+cmd = ARGV[0]
+
+if cmd == 'install'
+  tk = ARGV[1]
+  opts = tk ? {:tk => tk} : {}
+  Sweet::Downloader.download_swt opts
+else
+  require 'sweet'
+  load cmd
+end
+

data/examples/hello_world.rb

@@ -0,0 +1,11 @@
+$: << File.join(__FILE__, '../lib')
+require 'sweet'
+
+Sweet.app 'My first Application', :layout => :fill do
+  label 'Your name:'
+  @name = edit_line
+
+  button 'Push me' do
+    puts "Hello, #{@name.text}!"
+  end
+end

data/examples/snippet108.rb

@@ -0,0 +1,46 @@
+$: << File.join(__FILE__, '../lib')
+require 'sweet'
+
+#	Display display = new Display ();
+#	Shell shell = new Shell (display);
+#	shell.setLayout (new RowLayout ());
+Sweet.app :layout => :row do
+
+  #	Label label = new Label (shell, SWT.NONE);
+  #	label.setText ("Enter your name:");
+  label 'Enter your name:'
+
+  #	Text text = new Text (shell, SWT.BORDER);
+  #	text.setLayoutData (new RowData (100, SWT.DEFAULT));
+  edit_line :style => swt::BORDER, :row_data => 100
+
+  #	Button ok = new Button (shell, SWT.PUSH);
+  #	ok.setText ("OK");
+  #	ok.addSelectionListener(new SelectionAdapter() {
+  #		public void widgetSelected(SelectionEvent e) {
+  #			System.out.println("OK");
+  #		}
+  #	});
+  button 'OK' do
+    puts 'OK'
+  end
+
+  #	Button cancel = new Button (shell, SWT.PUSH);
+  #	cancel.setText ("Cancel");
+  #	cancel.addSelectionListener(new SelectionAdapter() {
+  #		public void widgetSelected(SelectionEvent e) {
+  #			System.out.println("Cancel");
+  #		}
+  #	});
+  #	shell.setDefaultButton (cancel);
+  self.default_button = button 'Cancel' do
+    puts 'Cancel'
+  end
+  
+  #	shell.pack ();
+  #	shell.open ();
+  #	while (!shell.isDisposed ()) {
+  #		if (!display.readAndDispatch ()) display.sleep ();
+  #	}
+  #	display.dispose ();
+end

data/examples/snippet128.rb

@@ -0,0 +1,159 @@
+$: << File.join(__FILE__, '../lib')
+require 'sweet'
+
+#   Display display = new Display();
+#		final Shell shell = new Shell(display);
+#		GridLayout gridLayout = new GridLayout();
+#		gridLayout.numColumns = 3;
+#		shell.setLayout(gridLayout);
+Sweet.app :layout => :grid.conf(:numColumns => 3) do
+
+  #		ToolBar toolbar = new ToolBar(shell, SWT.NONE);
+  #		GridData data = new GridData();
+  #		data.horizontalSpan = 3;
+  #		toolbar.setLayoutData(data);
+  tool_bar :grid_data => {:span => 3} do
+
+    #		ToolItem itemBack = new ToolItem(toolbar, SWT.PUSH);
+    #		itemBack.setText("Back");
+    #		ToolItem itemForward = new ToolItem(toolbar, SWT.PUSH);
+    #		itemForward.setText("Forward");
+    #		ToolItem itemStop = new ToolItem(toolbar, SWT.PUSH);
+    #		itemStop.setText("Stop");
+    #		ToolItem itemRefresh = new ToolItem(toolbar, SWT.PUSH);
+    #		itemRefresh.setText("Refresh");
+    #		ToolItem itemGo = new ToolItem(toolbar, SWT.PUSH);
+    #		itemGo.setText("Go");
+    #		/* event handling */
+    #		Listener listener = new Listener() {
+    #			public void handleEvent(Event event) {
+    #				ToolItem item = (ToolItem)event.widget;
+    #				String string = item.getText();
+    #				if (string.equals("Back")) browser.back();
+    #				else if (string.equals("Forward")) browser.forward();
+    #				else if (string.equals("Stop")) browser.stop();
+    #				else if (string.equals("Refresh")) browser.refresh();
+    #				else if (string.equals("Go")) browser.setUrl(location.getText());
+    #		   }
+    #		};
+    %w{Back Forward Stop Refresh}.each do |caption|
+      tool_item(caption) { @browser.send(caption.downcase) }
+    end
+    tool_item('Go') { @browser.setUrl @location.text }
+  end
+
+  #		Label labelAddress = new Label(shell, SWT.NONE);
+  #		labelAddress.setText("Address");
+  label 'Address'
+
+  #		final Text location = new Text(shell, SWT.BORDER);
+  #		data = new GridData();
+  #		data.horizontalAlignment = GridData.FILL;
+  #		data.horizontalSpan = 2;
+  #		data.grabExcessHorizontalSpace = true;
+  #		location.setLayoutData(data);
+  #		location.addListener(SWT.DefaultSelection, new Listener() {
+  #			public void handleEvent(Event e) {
+  #				browser.setUrl(location.getText());
+  #			}
+  #		});
+  @location = edit_line :grid_data => {:align => :fill, :span => 2, :grab => true} do
+    @browser.setUrl @location.text
+  end
+
+
+  #		final Browser browser;
+  #		try {
+  #			browser = new Browser(shell, SWT.NONE);
+  #		} catch (SWTError e) {
+  #			System.out.println("Could not instantiate Browser: " + e.getMessage());
+  #			display.dispose();
+  #			return;
+  #		}
+  begin
+    #		data = new GridData();
+    #		data.horizontalAlignment = GridData.FILL;
+    #		data.verticalAlignment = GridData.FILL;
+    #		data.horizontalSpan = 3;
+    #		data.grabExcessHorizontalSpace = true;
+    #		data.grabExcessVerticalSpace = true;
+    #		browser.setLayoutData(data);
+    @browser = browser :grid_data => {
+      :align => [:fill, :fill],
+      :span => 3,
+      :grab => [true, true]
+    }
+  rescue org.eclipse.swt.SWTError => e
+    SYSERR.puts "Could not instantiate Browser: #{e.message}"
+    exit
+  end
+
+  #		final Label status = new Label(shell, SWT.NONE);
+  #		data = new GridData(GridData.FILL_HORIZONTAL);
+  #		data.horizontalSpan = 2;
+  #		status.setLayoutData(data);
+  @status = label :grid_data => {:span => 2, :align => :fill}
+
+  #		final ProgressBar progressBar = new ProgressBar(shell, SWT.NONE);
+  #		data = new GridData();
+  #		data.horizontalAlignment = GridData.END;
+  #		progressBar.setLayoutData(data);
+  @progress_bar = progress :grid_data => {:align => :end}
+
+  #
+  #		browser.addProgressListener(new ProgressListener() {
+  #			public void changed(ProgressEvent event) {
+  #					if (event.total == 0) return;
+  #					int ratio = event.current * 100 / event.total;
+  #					progressBar.setSelection(ratio);
+  #			}
+  #			public void completed(ProgressEvent event) {
+  #				progressBar.setSelection(0);
+  #			}
+  #		});
+  @browser.on_progress_changed do |event|
+    if event.total != 0
+      @progress_bar.fraction = event.current.to_f / event.total
+    end
+  end
+  @browser.on_progress_completed do
+    @progress_bar.selection = 0
+  end
+  
+  #		browser.addStatusTextListener(new StatusTextListener() {
+  #			public void changed(StatusTextEvent event) {
+  #				status.setText(event.text);
+  #			}
+  #		});
+  @browser.on_status_text do |event|
+    @status.text = event.text
+  end
+
+  #		browser.addLocationListener(new LocationListener() {
+  #			public void changed(LocationEvent event) {
+  #				if (event.top) location.setText(event.location);
+  #			}
+  #			public void changing(LocationEvent event) {
+  #			}
+  #		});
+  @browser.on_location_changed do |event|
+    @location.text = event.location if event.top
+  end
+
+  #		itemBack.addListener(SWT.Selection, listener);
+  #		itemForward.addListener(SWT.Selection, listener);
+  #		itemStop.addListener(SWT.Selection, listener);
+  #		itemRefresh.addListener(SWT.Selection, listener);
+  #		itemGo.addListener(SWT.Selection, listener);
+  #
+  #		shell.open();
+  #		browser.setUrl("http://eclipse.org");
+  @browser.setUrl "http://eclipse.org"
+
+  #
+  #		while (!shell.isDisposed()) {
+  #			if (!display.readAndDispatch())
+  #				display.sleep();
+  #		}
+  #		display.dispose();
+end

data/examples/snippet169.rb

@@ -0,0 +1,47 @@
+$: << File.join(__FILE__, '../lib')
+require 'sweet'
+
+#	Display display = new Display ();
+#	final Shell shell = new Shell (display);
+#	shell.setLayout (new FillLayout ());
+Sweet.app :layout => :fill do
+
+  #	Listener listener = new Listener () {
+  #		public void handleEvent (Event e) {
+  #			Control [] children = shell.getChildren ();
+  #			for (int i=0; i<children.length; i++) {
+  #				Control child = children [i];
+  #				if (e.widget != child && child instanceof Button && (child.getStyle () & SWT.TOGGLE) != 0) {
+  #					((Button) child).setSelection (false);
+  #				}
+  #			}
+  #			((Button) e.widget).setSelection (true);
+  #		}
+  #	};
+  @listener = proc do |e|
+    shell.children.each do |child|
+      if e.widget != child && child.is_a?(widgets::Button) && (child.style & swt::TOGGLE)
+        child.selection = false
+      end
+    end
+    e.widget.selection = true
+  end
+
+  #	for (int i=0; i<20; i++) {
+  #		Button button = new Button (shell, SWT.TOGGLE);
+  #		button.setText ("B" + i);
+  #		button.addListener (SWT.Selection, listener);
+  #		if (i == 0) button.setSelection (true);
+  #	}
+
+  20.times do |i|
+    button "B#{i}", :style => swt::TOGGLE, :selection => i == 0, &@listener
+  end
+
+  #	shell.pack ();
+  #	shell.open ();
+  #	while (!shell.isDisposed ()) {
+  #		if (!display.readAndDispatch ()) display.sleep ();
+  #	}
+  #	display.dispose ();
+end

data/examples/snippet82.rb

@@ -0,0 +1,57 @@
+$: << File.join(__FILE__, '../lib')
+require 'sweet'
+
+#Display display = new Display();
+#	Shell shell = new Shell(display);
+#	shell.setLayout(new FillLayout());
+Sweet.app :layout => :fill do
+
+  #	CTabFolder folder = new CTabFolder(shell, SWT.BORDER);
+  @folder = tab_folder do
+    #	for (int i = 0; i < 4; i++) {
+    #		CTabItem item = new CTabItem(folder, SWT.CLOSE);
+    #		item.setText("Item "+i);
+    #		Text text = new Text(folder, SWT.MULTI);
+    #		text.setText("Content for Item "+i);
+    #		item.setControl(text);
+    #	}
+    4.times do |i|
+      tab_item "Item #{i}", :control => edit_area("Content for Item #{i}")
+    end
+
+    #	final CTabItem specialItem = new CTabItem(folder, SWT.CLOSE);
+    #	specialItem.setText("Don't Close Me");
+    #	Text text = new Text(folder, SWT.MULTI);
+    #	text.setText("This tab can never be closed");
+    #	specialItem.setControl(text);
+    @special_item = tab_item("Don't Close Me") do
+      edit_area("This tab can never be closed")
+    end
+    
+    #	final CTabItem noCloseItem = new CTabItem(folder, SWT.NONE);
+    #	noCloseItem.setText("No Close Button");
+    #	Text text2 = new Text(folder, SWT.MULTI);
+    #	text2.setText("This tab does not have a close button");
+    #	noCloseItem.setControl(text2);
+    tab_item "No Close Button", edit_area("This tab does not have a close button"), :style => :none
+  end
+  
+  #	folder.addCTabFolder2Listener(new CTabFolder2Adapter() {
+  #		public void close(CTabFolderEvent event) {
+  #			if (event.item.equals(specialItem)) {
+  #				event.doit = false;
+  #			}
+  #		}
+  #	});
+  @folder.on_close do |event|
+    event.doit = event.item != @special_item
+  end
+
+  #	shell.pack();
+  #	shell.open();
+  #	while (!shell.isDisposed()) {
+  #		if (!display.readAndDispatch())
+  #			display.sleep();
+  #	}
+  #	display.dispose();
+end

data/lib/sweet/base.rb

@@ -0,0 +1,223 @@
+require 'sweet/downloader'
+
+begin
+  load Sweet::SWT_JAR
+rescue LoadError => e
+  STDERR.puts "No swt.jar found. Run:"
+  STDERR.puts "  sweet install [toolkit]"
+  exit
+end
+
+require 'java'
+%w{hacks widget composite shell dialog}.each{|file| require "sweet/#{file}"}
+
+# TODO create gemspec
+# TODO evaluate integration of jface
+# TODO enable additive and replacing :style on widget creation
+module Sweet
+
+  import 'org.eclipse.swt'
+  import 'org.eclipse.swt.widgets'
+  import 'org.eclipse.swt.custom'
+  import 'org.eclipse.swt.browser'
+
+  # TODO integrate all standard widgets
+  WIDGET_HACKS = {
+    ProgressBar => {:custom_code => proc {
+        def fraction=(value)
+          setSelection value.to_f * maximum
+        end
+        def fraction
+          selection / maximum
+        end
+      }},
+    Text => {:custom_code => proc{
+        def password=(value)
+          self.echo_char = ?* if value
+        end
+        def password
+          ! echo_char.nil?
+        end
+      }},
+    CTabFolder => {:default_listener => 'CTabFolder2'}
+  }
+
+  DEFAULT = {:init_args => :text, :block_handler => SWT::Selection}
+  WIDGET_OPTIONS = {
+    # Text components
+    :label => {:style => SWT::WRAP, :init_args => :text},
+    :edit_line => {:class => Text, :style => SWT::SINGLE | SWT::BORDER, :init_args => :text, :block_handler => :on_widget_default_selected},
+    :edit_area => {:class => Text, :style => SWT::MULTI | SWT::BORDER, :init_args => :text, :block_handler => :on_widget_default_selected},
+
+    # Buttons
+    :button => DEFAULT.merge(:style => SWT::PUSH),
+    :toggle_button => DEFAULT.merge(:class => Button, :style => SWT::TOGGLE),
+    :radio_button => DEFAULT.merge(:class => Button, :style => SWT::RADIO),
+    :check_button => DEFAULT.merge(:class => Button, :style => SWT::CHECK),
+    :arrow_button => DEFAULT.merge(:class => Button, :style => SWT::ARROW),
+
+    # Menus
+    :menubar => {:class => Menu, :style => SWT::BAR},
+    :popup => {:class => Menu, :style => SWT::POP_UP},
+    :item => {:class => MenuItem, :style => SWT::PUSH, :init_args => :text, :block_handler => :on_widget_selected},
+    :separator => {:class => MenuItem, :style => SWT::SEPARATOR},
+    :submenu => {:class => MenuItem, :style => SWT::CASCADE, :init_args => :text, :block_handler => proc{|c, opts, block|
+        sub = Menu.new(c.app, SWT::DROP_DOWN)
+        sub.sweeten(c.app, opts, &block)
+        c.menu = sub
+      }
+    },
+    
+    # Toolbars
+    :tool_item => DEFAULT.merge(:style => SWT::PUSH),
+    # TODO make CoolBar work
+#    :cool_item => {:init_args => :control, :block_handler => proc{ |c, opts, proc|
+#        c.control = proc.call
+#      }},
+
+    # Tabs
+    :tab_folder => {:class => CTabFolder, :style => SWT::BORDER},
+    :tab_item => {:class => CTabItem, :style => SWT::CLOSE, :init_args => [:text, :control], :block_handler => proc{|c, opts, proc|
+        c.control = proc.call
+      }},
+
+    # Other components
+    :tree => {:style => SWT::VIRTUAL, :block_handler => SWT::Selection},
+    :progress => {:class => ProgressBar, :style => SWT::SMOOTH},
+    :group => {:init_args => :text},
+
+    # Dialogs
+    :color_dialog => {:style => SWT::APPLICATION_MODAL, :init_args => :text}
+  }.unify
+
+  WIDGETS = {}
+
+  def self.app(*args, &block)
+    # prepare the arguments
+    count = args.length
+    name = args.first.is_a?(String) ? args.shift : 'SWEET Application'
+    raise ArgumentError.new(count, 2) if args.size > 1
+    opts = args.first || {}
+
+    # build the UI
+    Display.setAppName(name)
+    display = Display.new
+
+    # TODO allow multiple shells
+    shell = Shell.new(display)
+    shell.sweeten(display, name, opts, &block)
+    shell.open
+
+    # dispatch loop
+    while (!shell.isDisposed) do
+      display.sleep unless display.readAndDispatch
+    end
+
+    display.dispose
+  end
+
+  def self.create_widget(parent, name, *args, &block)
+    init = WIDGET_OPTIONS[name] || {}
+
+    unless cls = WIDGETS[name]
+      #      puts "Loading widget #{name}"
+      #      filename = File.join('sweet/widget', name.to_s)
+      #      begin
+      #        require filename
+      #      rescue LoadError
+      cls = create_widget_class(name, init)
+      #      end
+    end
+
+    opts = args.last.is_a?(Hash) ? args.pop.dup : {}
+
+    style = opts.delete(:style) || init[:style] || SWT::NONE
+    style = Array(style).inject(0) do |result, value|
+      value = value.swt_const if value.is_a? Symbol
+      result | value
+    end
+
+    Sweet.debug "Creating #{cls.java_class.simple_name}(#{parent}, #{style})"
+    result = cls.new(parent, style)
+    result.instance_variable_set(:@block_handler, init[:block_handler])
+
+    if init_args = init[:init_args]
+      Hash[Array(init_args).zip(args)].each do |k, v|
+        opts.merge! k => v if v
+      end
+    end
+    result.sweeten(parent.app, opts, &block)
+
+    result
+  end
+
+  def self.create_widget_class(name, init)
+    # build widget with default accessors
+    class_name = init[:class] || name
+    class_name = class_name.to_s.camelize(:upper) if class_name.is_a?(Symbol)
+    cls = class_name.is_a?(Class) ? class_name : const_get(class_name)
+
+    unless WIDGETS.values.member? cls
+      delegate_events(cls)
+      if hacks = WIDGET_HACKS[cls]
+        if custom_code = hacks[:custom_code]
+          cls.class_eval &custom_code
+        end
+      end
+    end
+
+    cls
+  end
+
+  def self.delegate_events(cls)
+    hacks = WIDGET_HACKS[cls]
+    default_listener = (hacks[:default_listener] || '').underscore if hacks
+
+    methods = cls.java_class.java_instance_methods
+    methods.each do |m|
+      next unless m.name =~ /(add(.*)Listener)/
+      j = $1
+      n = $2.underscore
+      p = m.parameter_types[0]
+      evts = p.declared_instance_methods
+
+      if evts.size == 1
+        s = "on_#{n}"
+        cls.send(:alias_method, s, j) unless cls.respond_to?(s)
+      else
+        evts.each do |evt|
+          s = evt.name.underscore
+          if s.split(/_/).size == 1 && n != default_listener
+            s = n + "_" + s
+          end
+          # TODO provide addListener SWT::Xxx option
+          unused_events = evts.select{ |e| e.name != evt.name }.map{ |e| "def #{e.name.underscore}(e)\nend" }.join("\n")
+          cls.class_eval <<-EOF
+              def on_#{s}(&block)
+                l = Class.new do
+                  include Java.#{p}
+                  def initialize(&block)
+                    @block = block
+                  end
+                  def #{evt.name}(e)
+                    @block.call e
+                  end
+                  #{unused_events}
+                end
+                #{j} l.new(&block)
+              end
+          EOF
+        end
+      end
+    end
+  end
+
+  def self.set_debug
+    @debug = true
+  end
+  def self.debug(text)
+    # TODO add a decent logging mechanism
+    puts text if @debug
+  end
+end
+

data/lib/sweet/composite.rb

@@ -0,0 +1,14 @@
+class Java::OrgEclipseSwtWidgets::Composite
+
+  def layout=(name, options = {})
+    class_name = "#{name.to_s.capitalize}Layout"
+    l = instance_eval "org.eclipse.swt.layout.#{class_name}.new"
+
+    options.each_pair do |k,v|
+      l.send("#{k}=", v)
+    end
+
+    setLayout l
+  end
+  
+end

data/lib/sweet/dialog.rb

@@ -0,0 +1,9 @@
+class Java::OrgEclipseSwtWidgets::Dialog
+
+  attr_reader :app
+
+  def sweeten(app, opts)
+    @app = app
+  end
+
+end

data/lib/sweet/downloader.rb

@@ -0,0 +1,63 @@
+module Sweet
+  SWT_JAR = File.join(File.dirname(__FILE__), '../../swt/swt.jar')
+
+  module Downloader
+    def self.download_swt(opts = {})
+      require 'rubygems'
+      require 'open-uri'
+      require 'zippy'
+      require 'fileutils'
+
+      platform = system_qualifier(opts)
+      puts "Downloading SWT #{platform}"
+
+      # TODO support other SWT versions
+      open("http://mirrors.ibiblio.org/pub/mirrors/eclipse/eclipse/downloads/drops/R-3.5.2-201002111343/swt-3.5.2-#{platform}.zip") do |remote|
+        Zippy.open(remote.path) do |zip|
+          FileUtils.mkdir_p File.dirname(Sweet::SWT_JAR)
+          File.open(Sweet::SWT_JAR, 'wb') do |f|
+            f.write zip['swt.jar']
+          end
+        end
+      end
+    end
+
+    # TODO integrate user input to all feasible platforms
+    def self.system_qualifier(opts = {})
+      props = Java.java.lang.System.properties
+      os = (opts[:os] || props['os.name']).downcase
+
+      arch = (opts[:arch] || props['os.arch']).downcase
+      arch = 'x86' if arch =~ /..86$/
+
+      wish_tk = opts[:tk]
+      tk = case os
+      when *%w{linux solaris sunos}
+        os = 'solaris' if os == 'sunos'
+        %w{gtk motif}.member?(wish_tk) ? wish_tk : 'gtk'
+      when 'mac os x'
+        os = 'macosx'
+        arch = nil if arch != 'x86_64'
+        %w{carbon cocoa}.member?(wish_tk) ? wish_tk : 'cocoa'
+      when 'qnx'
+        arch = 'x86'
+        'photon'
+      when 'aix'
+        arch = 'ppc'
+        'motif'
+      when 'hp-ux'
+        os = 'hpux'
+        arch = 'ia64_32'
+        'motif'
+      when 'windows vista'
+        os = 'win32'
+        arch = 'x86' if wish_tk == 'wpf'
+        %w{wpf win32}.member?(wish_tk) ? wish_tk : 'win32'
+      when /windows/
+        os = 'win32' # returns win32 as tk also
+      end
+
+      [tk, os, arch].compact.join('-')
+    end
+  end
+end

data/lib/sweet/hacks.rb

@@ -0,0 +1,43 @@
+class Hash
+  def unify
+    each_pair do |k, v|
+      if k.is_a? Array
+        k.each do |key|
+          self[key.to_sym] = v
+        end
+        self.delete k
+      elsif ! k.is_a?(Symbol)
+        self[k.to_sym] = v
+        self.delete k
+      end
+    end
+    self
+  end
+end
+
+class Symbol
+  # For configuring layouts
+  def conf(opts = {})
+    [self, opts]
+  end
+  def swt_const
+    org.eclipse.swt.SWT.const_get(self.to_s.upcase)
+  end
+  def swt_event
+    org.eclipse.swt.SWT.const_get(self.to_s.camelize(:upper))
+  end
+end
+
+# TODO find those things in JRuby
+class String
+  def camelize(first_letter_in_uppercase = :upper)
+    s = gsub(/\/(.?)/){|x| "::#{x[-1..-1].upcase unless x == '/'}"}.gsub(/(^|_)(.)/){|x| x[-1..-1].upcase}
+    s[0...1] = s[0...1].downcase unless first_letter_in_uppercase == :upper
+    s
+  end
+  def underscore
+    gsub(/::/, '/').gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+      gsub(/([a-z\d])([A-Z])/,'\1_\2').tr("-", "_").downcase
+  end
+end
+

data/lib/sweet/shell.rb

@@ -0,0 +1,53 @@
+# TODO pack into WIDGETS
+class Java::OrgEclipseSwtWidgets::Shell
+  attr_reader :display
+  alias_property :title => :text
+
+  def sweeten(display, name, opts = {}, &block)
+    @display = display
+
+    self.text = opts.delete(:title) || name
+    w, h = opts.delete(:width), opts.delete(:height)
+
+    super(self, opts, &block)
+
+    pack
+    size = (w || width), (h || height)
+  end
+
+  def sweet_containers
+    @sweet_containers ||= [self]
+  end
+  
+  def perform(&block)
+    display.syncExec block
+  end
+
+  def busy(&block)
+    Thread.new do
+      perform do
+        custom::BusyIndicator.showWhile(display) do
+          block.call
+        end
+      end
+    end
+  end
+
+  def menubar(&block)
+    self.menu_bar = make_menu(:menubar, &block)
+  end
+
+  def popup(&block)
+    self.menu = make_menu(:popup, &block)
+  end
+
+  def method_missing(name, *args, &block)
+    Sweet.create_widget(sweet_containers.last, name, *args, &block) || super
+  end
+
+  private
+  def make_menu(type, &block)
+    Sweet.create_widget(sweet_containers.last, type, &block)
+  end
+
+end

data/lib/sweet/widget.rb

@@ -0,0 +1,151 @@
+require 'forwardable'
+
+class Java::OrgEclipseSwtWidgets::Widget
+  extend Forwardable
+  attr_reader :app
+
+  def sweeten(app, opts, &block)
+    @app = app
+    self.options = opts
+    
+    if block
+      case handler = @block_handler
+      when nil
+        handle_container &block
+      when Symbol
+        send handler, &block
+      when Numeric
+        addListener handler, &block
+      when Proc
+        instance_eval do
+          handler.call self, opts, block
+        end
+      else
+        raise "Invalid :block_handler ",handler
+      end
+    end
+
+    puts "Unknown properties for class #{self.class}: #{opts.keys.inspect}" unless opts.empty?
+  end
+
+  def app(&block)
+    block ? @app.instance_eval(&block) : @app
+  end
+
+  def append(&block)
+    raise "Append called without block" unless block
+    handle_container &block
+  end
+
+  def meta(&block)
+    @meta ||= class << self
+      self
+    end
+    block ? @meta.class_eval(&block) : @meta
+  end
+
+  def self.alias_property(aliases = {})
+    aliases.each do |from, to|
+      alias_method from, to unless "to"
+      alias_method "#{from}=", "#{to}=" unless "#{to}="
+    end
+  end
+
+  def options=(opts)
+    # TODO reader method
+    opts.each_pair do |k, v|
+      case k
+      when :hidden
+        setVisible !v
+      else
+        name = k.to_s + "="
+        if respond_to?(name)
+          if v
+            Sweet.debug "#{self.java_class.simple_name}.#{k} = #{v.inspect}"
+            send name, *v
+          end
+          opts.delete(k)
+        end
+      end
+    end
+  end
+
+
+  # TODO unify this layout mess somehow
+  # TODO hierarchical hash for nicer client code
+  def grid_data=(*opts)
+    opts = Hash[opts]
+    ax, ay = opts[:align]
+    gx, gy = opts[:grab]
+    sx, sy = opts[:span]
+    args = [ax || swt::BEGINNING, ay || swt::CENTER,
+      gx || false, gy || false, sx || 1, sy || 1]
+    args.map!{|v| v.is_a?(Symbol) ? v.swt_const : v}
+    Sweet.debug args.inspect
+    l = layouts::GridData.new(*args)
+    self.layout_data = l
+  end
+  def row_data=(x, y = nil)
+    self.layout_data = layouts::RowData.new(x || swt::DEFAULT, y || swt::DEFAULT)
+  end
+
+  def perform(&block)
+    app.perform &block
+  end
+
+  def hide
+    self.visible = false
+  end
+  def show
+    self.visible = true
+  end
+
+  def width
+    size.x
+  end
+  def width=(value)
+    self.size = value, nil
+  end
+
+  def height
+    size.y
+  end
+  def height=(value)
+    self.size = nil, value
+  end
+
+  def size=(*s)
+    nw, nh = s.flatten
+    nw ||= width
+    nh ||= height
+    setSize(nw, nh)
+  end
+
+  # TODO replace via import?
+  def swt
+    org.eclipse.swt.SWT
+  end
+  def widgets
+    org.eclipse.swt.widgets
+  end
+  def layouts
+    org.eclipse.swt.layout
+  end
+  def custom
+    org.eclipse.swt.custom
+  end
+
+  def method_missing(name, *args, &block)
+    handle_container(&block) rescue super
+  end
+
+  private
+  def handle_container(&block)
+    app.sweet_containers.push self
+    app &block
+  ensure
+    app.sweet_containers.pop
+  end
+
+end
+

data/lib/sweet.rb

@@ -0,0 +1 @@
+require 'sweet/base'

data/spec/downloader_spec.rb

@@ -0,0 +1,36 @@
+require 'sweet/downloader'
+
+describe Sweet::Downloader, '#system_qualifier' do
+  before :each do
+    @d = Sweet::Downloader
+  end
+
+  it 'returns gtk-linux-x86 for Linux i686' do
+    @d.system_qualifier(:os => 'Linux', :arch => 'i686').should == 'gtk-linux-x86'
+  end
+
+  it 'returns gtk-linux-x86 for Linux x86_64' do
+    @d.system_qualifier(:os => 'Linux', :arch => 'x86_64').should == 'gtk-linux-x86_64'
+  end
+
+  it 'returns motif-linux-x86 for Linux i686 and :tk => "motif"' do
+    @d.system_qualifier(:os => 'Linux', :arch => 'i686', :tk => 'motif').should == 'motif-linux-x86'
+  end
+
+  it 'returns cocoa-macos for Mac OS X i686' do
+    @d.system_qualifier(:os => 'Mac OS X', :arch => 'i686').should == 'cocoa-macosx'
+  end
+
+  it 'returns cocoa-macos-x86_64 for Mac OS X x86_64' do
+    @d.system_qualifier(:os => 'Mac OS X', :arch => 'x86_64').should == 'cocoa-macosx-x86_64'
+  end
+
+  it 'returns win32-win32-x86 for Windows XP' do
+    @d.system_qualifier(:os => 'Windows XP', :arch => 'i686').should == 'win32-win32-x86'
+  end
+
+  it 'returns win32-win32-x86_64 for Windows Vista on x86_64' do
+    @d.system_qualifier(:os => 'Windows Vista', :arch => 'x86_64').should == 'win32-win32-x86_64'
+  end
+
+end

metadata

@@ -0,0 +1,100 @@
+--- !ruby/object:Gem::Specification 
+name: sweet
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+    - 0
+    - 0
+    - 2
+  version: 0.0.2
+platform: ruby
+authors: 
+  - Michael Klaus
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-05-17 00:00:00 +02:00
+default_executable: 
+dependencies: 
+  - !ruby/object:Gem::Dependency 
+    name: zippy
+    prerelease: false
+    requirement: &id001 !ruby/object:Gem::Requirement 
+      none: false
+      requirements: 
+        - - ">="
+          - !ruby/object:Gem::Version 
+            segments: 
+              - 0
+            version: "0"
+    type: :runtime
+    version_requirements: *id001
+description: The SWT wrapper for JRuby
+email: Michael.Klaus@gmx.net
+executables: 
+  - sweet
+extensions: []
+
+extra_rdoc_files: 
+  - README.rdoc
+  - COPYING
+files: 
+  - COPYING
+  - README.rdoc
+  - Rakefile
+  - bin/sweet
+  - spec/downloader_spec.rb
+  - lib/sweet.rb
+  - lib/sweet/shell.rb
+  - lib/sweet/widget.rb
+  - lib/sweet/hacks.rb
+  - lib/sweet/downloader.rb
+  - lib/sweet/composite.rb
+  - lib/sweet/base.rb
+  - lib/sweet/dialog.rb
+  - examples/snippet128.rb
+  - examples/snippet169.rb
+  - examples/snippet108.rb
+  - examples/snippet82.rb
+  - examples/hello_world.rb
+has_rdoc: true
+homepage: http://github.org/QaDeS/sweet
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+  - --quiet
+  - --line-numbers
+  - --inline-source
+  - --title
+  - "Sweet: The SWT wrapper for JRuby"
+  - --main
+  - README.rdoc
+require_paths: 
+  - lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+          - 0
+        version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+          - 0
+        version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: The SWT wrapper for JRuby
+test_files: []
+