glimmer 0.1.5.470 → 0.1.8.470

data/spec/lib/glimmer__list_data_binding__spec.rb

@@ -0,0 +1,224 @@
+require "spec_helper"
+
+describe "Glimmer List Data Binding" do
+  include Glimmer
+
+	include_package 'org.eclipse.swt'
+	include_package 'org.eclipse.swt.widgets'
+	include_package 'org.eclipse.swt.layout'
+
+  SWT = org.eclipse.swt.SWT unless Object.const_defined?(:SWT)
+
+  before do
+    dsl :swt
+  end
+
+	after do
+  	@target.display.dispose if @target.display
+	end
+
+  class Person
+    attr_accessor :country, :country_options
+    attr_accessor :provinces, :provinces_options
+
+    def initialize
+      self.country_options=[
+        "",
+        "Canada",
+        "US",
+        "Mexico"
+      ]
+      self.provinces_options=[
+        "",
+        "Quebec",
+        "Ontario",
+        "Manitoba",
+        "Saskatchewan",
+        "Alberta",
+        "British Columbia",
+        "Nova Skotia",
+        "Newfoundland"
+      ]
+    end
+  end
+
+  it "tests single selection property" do
+    person = Person.new
+
+    @target = shell {
+      @list = list {
+        selection bind(person, :country)
+      }
+    }
+
+    expect(@list.widget.item_count).to eq(4)
+    expect(@list.widget.selection_index).to eq(-1)
+    expect(@list.widget.selection.to_a).to eq([])
+
+    @list.widget.select(1)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.country).to eq("Canada")
+
+    person.country_options << "France"
+
+    expect(@list.widget.item_count).to eq(5)
+
+    person.country_options=["", "Canada", "US", "Mexico", "Russia", "France"]
+
+    expect(@list.widget.item_count).to eq(6)
+
+    person.country_options << "Italy"
+    person.country_options << "Germany"
+    person.country_options << "Australia"
+
+    expect(@list.widget.item_count).to eq(9)
+
+    person.country = "Canada"
+
+    expect(@list.widget.selection_index).to eq(1)
+    expect(@list.widget.selection.to_a).to eq(["Canada"])
+
+    person.country = "Russia"
+
+    expect(@list.widget.selection_index).to eq(4)
+    expect(@list.widget.selection.to_a).to eq(["Russia"])
+
+    person.country = ""
+
+    expect(@list.widget.selection_index).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([""])
+
+    person.country = "Japan"
+
+    expect(@list.widget.selection_index).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([""])
+
+    @list.widget.select(2)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.country).to eq("US")
+  end
+
+  it "tests single selection property with model preinitialized" do
+    person = Person.new
+    person.country = "Canada"
+
+    @target = shell {
+      @list = list {
+        selection bind(person, :country)
+      }
+    }
+
+    expect(@list.widget.item_count).to eq(4)
+    expect(@list.widget.selection_index).to eq(1)
+    expect(@list.widget.selection.to_a).to eq(["Canada"])
+
+    @list.widget.select(2)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.country).to eq("US")
+
+    person.country_options << "France"
+
+    expect(@list.widget.item_count).to eq(5)
+
+    person.country_options=["", "Canada", "US", "Mexico", "Russia", "France"]
+
+    expect(@list.widget.item_count).to eq(6)
+
+    person.country_options << "Italy"
+    person.country_options << "Germany"
+    person.country_options << "Australia"
+
+    expect(@list.widget.item_count).to eq(9)
+
+    person.country = "Canada"
+
+    expect(@list.widget.selection_index).to eq(1)
+    expect(@list.widget.selection.to_a).to eq(["Canada"])
+
+    person.country = "Russia"
+
+    expect(@list.widget.selection_index).to eq(4)
+    expect(@list.widget.selection.to_a).to eq(["Russia"])
+
+    person.country = ""
+
+    expect(@list.widget.selection_index).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([""])
+
+    person.country = "Japan"
+
+    expect(@list.widget.selection_index).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([""])
+  end
+
+  it "tests multi selection property" do
+    person = Person.new
+
+    @target = shell {
+      @list = list(:multi) {
+        selection bind(person, :provinces)
+      }
+    }
+
+    expect(@list.widget.selection_count.to_i).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([])
+
+    @list.widget.select(1)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.provinces).to eq(["Quebec"])
+
+    @list.widget.select(2)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.provinces).to eq(["Quebec", "Ontario"])
+
+    person.provinces=["Ontario", "Manitoba", "Alberta"]
+
+    expect(@list.widget.selection_count.to_i).to eq(3)
+    expect(@list.widget.selection_indices.to_a).to eq([2, 3, 5])
+    expect(@list.widget.selection.to_a).to eq(["Ontario", "Manitoba", "Alberta"])
+
+    person.provinces << "Quebec"
+    person.provinces << "Saskatchewan"
+    person.provinces << "British Columbia"
+
+    expect(@list.widget.selection_count.to_i).to eq(6)
+    expect(@list.widget.selection_indices.to_a).to eq([1, 2, 3, 4, 5, 6])
+    expect(@list.widget.selection.to_a).to eq(["Quebec", "Ontario", "Manitoba", "Saskatchewan", "Alberta", "British Columbia"])
+   end
+
+  it "tests multi selection property with model preinitialized" do
+    person = Person.new
+    person.provinces = []
+
+    @target = shell {
+      @list = list(:multi) {
+        selection bind(person, :provinces)
+      }
+    }
+
+    expect(@list.widget.selection_count.to_i).to eq(0)
+    expect(@list.widget.selection.to_a).to eq([])
+
+    @list.widget.select(1)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.provinces).to eq(["Quebec"])
+
+    @list.widget.select(2)
+    @list.widget.notifyListeners(SWT::Selection, nil)
+    expect(person.provinces).to eq(["Quebec", "Ontario"])
+
+    person.provinces=["Ontario", "Manitoba", "Alberta"]
+
+    expect(@list.widget.selection_count.to_i).to eq(3)
+    expect(@list.widget.selection_indices.to_a).to eq([2, 3, 5])
+    expect(@list.widget.selection.to_a).to eq(["Ontario", "Manitoba", "Alberta"])
+
+    person.provinces << "Quebec"
+    person.provinces << "Saskatchewan"
+    person.provinces << "British Columbia"
+
+    expect(@list.widget.selection_count.to_i).to eq(6)
+    expect(@list.widget.selection_indices.to_a).to eq([1, 2, 3, 4, 5, 6])
+    expect(@list.widget.selection.to_a).to eq(["Quebec", "Ontario", "Manitoba", "Saskatchewan", "Alberta", "British Columbia"])
+   end
+end

data/{test/glimmer_listeners_test.rb → spec/lib/glimmer__listeners__spec.rb}

@@ -1,25 +1,25 @@
-require_relative "helper"
+require "spec_helper"
 
-class GlimmerDataBindingTest < Test::Unit::TestCase
+describe "Glimmer Listeners" do
   include Glimmer
 
 	include_package 'org.eclipse.swt'
 	include_package 'org.eclipse.swt.widgets'
 	include_package 'org.eclipse.swt.layout'
-		
-  def setup
+
+  before do
     dsl :swt
   end
 
-	def teardown
+	after do
   	@target.display.dispose if @target.display
 	end
-	
-  class Person 
+
+  class Person
     attr_accessor :name, :age, :adult
   end
-  
-  def test_text_widget_verify_listener
+
+  it "tests text widget verify listener" do
     @target = shell {
       composite {
         @text = text {
@@ -30,18 +30,18 @@ class GlimmerDataBindingTest < Test::Unit::TestCase
         }
       }
     }
-    
+
     @text.widget.setText("Hi")
-    assert_equal "Hi", @text.widget.getText
-    
+    expect(@text.widget.getText).to eq("Hi")
+
     @text.widget.setText("Hello")
-    assert_equal "Hi", @text.widget.getText
+    expect(@text.widget.getText).to eq("Hi")
   end
-    
+
   def test_button_widget_selection_listener
     person = Person.new
     person.name = "Bruce Ting"
-    
+
     @target = shell {
       composite {
         @button = button {
@@ -51,11 +51,10 @@ class GlimmerDataBindingTest < Test::Unit::TestCase
         }
       }
     }
-    assert_equal "Bruce Ting", person.name
+    expect(person.name).to eq("Bruce Ting")
     @button.widget.setSelection(true)
     @button.widget.notifyListeners(SWT::Selection, nil)
-    assert_equal "Bruce Lao", person.name
+    expect(person.name).to eq("Bruce Lao")
   end
-    
-end
 
+end

data/spec/lib/glimmer__shine_data_binding__spec.rb

@@ -0,0 +1,89 @@
+## NOTE: Unsupported in Ruby 2 syntax
+# require "spec_helper"
+#
+# require_relative "../../lib/shine"
+#
+# describe "Glimmer Shine Data Binding" do
+#   include Glimmer
+#
+# 	include_package 'org.eclipse.swt'
+# 	include_package 'org.eclipse.swt.widgets'
+# 	include_package 'org.eclipse.swt.layout'
+#
+#   before do
+#     dsl :swt
+#   end
+#
+# 	after do
+#   	@target.display.dispose if @target.display
+# 	end
+#
+#   class Person
+#     attr_accessor :name, :age, :adult
+#   end
+#
+#   it "tests text_widget_data_binding_string_property_spaceship" do
+#     person = Person.new
+#     person.name = "Bruce Ting"
+#
+#     @target = shell {
+#       composite {
+#         @text = text {
+#         }
+#       }
+#     }
+#
+#     [@text, :text] <=> [person, :name]
+#
+#     expect(@text.widget.getText).to eq( "Bruce Ting")
+#
+#     person.name = "Lady Butterfly"
+#     expect(@text.widget.getText).to eq( "Lady Butterfly")
+#
+#     @text.widget.setText("Allen Cork")
+#     expect(person.name).to eq( "Allen Cork")
+#
+#     comparison = ["he"] <=> ["he"]
+#     expect(comparison).to eq(0)
+#   end
+#
+#   it "tests multiple_widget_data_bindings_to_different_model_properties_spaceship" do
+#     person = Person.new
+#     person.name = "Nancy"
+#     person.age = 15
+#     person.adult = true
+#
+#     @target = shell {
+#       composite {
+#         @label = label {}
+#         @text = text {}
+#         @check_box = button(:check) {}
+#       }
+#     }
+#
+#     [@label,     :text]      <=> [person, :name]
+#     [@text,      :text]      <=> [person, :age, :fixnum]
+#     [@check_box, :selection] <=> [person, :adult]
+#
+#     expect(@label.widget.getText).to eq( "Nancy")
+#     expect(@text.widget.getText).to eq( "15")
+#     expect(@check_box.widget.getSelection).to eq( true)
+#
+#     person.name = "Drew"
+#     expect(@label.widget.getText).to eq( "Drew")
+#
+#     person.age = 27
+#     expect(@text.widget.getText).to eq( "27")
+#
+#     person.adult = false
+#     expect(@check_box.widget.getSelection).to eq( false)
+#
+#     @text.widget.setText("30")
+#     expect(person.age).to eq( 30)
+#
+#     @check_box.widget.setSelection(true)
+#     @check_box.widget.notifyListeners(SWT::Selection, nil)
+#     expect(person.adult).to eq( true)
+#   end
+#
+# end

data/spec/lib/glimmer__tab_item__spec.rb

@@ -0,0 +1,55 @@
+require "spec_helper"
+
+describe "Glimmer Tab Item" do
+  include Glimmer
+
+  before do
+    dsl :swt
+  end
+
+	after do
+		@target.display.dispose if @target.display
+	end
+
+  it "tests tab item composite with default layout" do
+    @target = shell {
+      @tab_folder = tab_folder {
+        @tab_item_composite = tab_item {
+          text "Tab 1"
+          label {text "Hello"}
+        }
+      }
+    }
+
+    expect(@target).to_not be_nil
+    expect(@target.widget).to_not be_nil
+    expect(@tab_folder.widget.items.size).to eq(1)
+    expect(@tab_item_composite.widget).to be_instance_of(org.eclipse.swt.widgets.Composite)
+    expect(@tab_folder.widget.items[0].control).to eq(@tab_item_composite.widget)
+    expect(@tab_item_composite.tab_item.widget.text).to eq("Tab 1")
+    expect(@tab_item_composite.widget.getLayout).to_not be_nil
+    expect(@tab_item_composite.widget.getLayout).to be_instance_of(org.eclipse.swt.layout.GridLayout)
+  end
+
+  it "tests tab item composite with fill layout" do
+    @target = shell {
+      @tab_folder = tab_folder {
+        @tab_item_composite = tab_item {
+          text "Tab 2"
+          layout org.eclipse.swt.layout.FillLayout.new
+          label {text "Hello"}
+        }
+      }
+    }
+
+    expect(@target).to_not be_nil
+    expect(@target.widget).to_not be_nil
+    expect(@tab_folder.widget.items.size).to eq(1)
+    expect(@tab_item_composite.widget).to be_instance_of(org.eclipse.swt.widgets.Composite)
+    expect(@tab_folder.widget.items[0].control).to eq(@tab_item_composite.widget)
+    expect(@tab_item_composite.tab_item.widget.text).to eq("Tab 2")
+    expect(@tab_item_composite.widget.getLayout).to_not be_nil
+    expect(@tab_item_composite.widget.getLayout).to be_instance_of(org.eclipse.swt.layout.FillLayout)
+  end
+
+end

data/spec/lib/glimmer__table_data_binding__spec.rb

@@ -0,0 +1,121 @@
+require "spec_helper"
+
+describe "Glimmer Table Data Binding" do
+  include Glimmer
+
+	include_package 'org.eclipse.swt'
+	include_package 'org.eclipse.swt.widgets'
+	include_package 'org.eclipse.swt.layout'
+
+  before do
+    dsl :swt
+  end
+
+	after do
+  	@target.display.dispose if @target.display
+	end
+
+  class Group
+    def initialize
+      @people = []
+    end
+
+    attr_accessor :people
+  end
+
+  class Person
+    attr_accessor :name, :age, :adult
+  end
+
+  it "data binds text widget to a string property" do
+    person1 = Person.new
+    person1.name = "Bruce Ting"
+    person1.age = 45
+    person1.adult = true
+
+    person2 = Person.new
+    person2.name = "Julia Fang"
+    person2.age = 17
+    person2.adult = false
+
+    group = Group.new
+    group.people << person1
+    group.people << person2
+
+    @target = shell {
+      @table = table {
+        table_column {
+          text "Name"
+          width 120
+        }
+        table_column {
+          text "Age"
+          width 120
+        }
+        table_column {
+          text "Adult"
+          width 120
+        }
+        items bind(group, :people), column_properties(:name, :age, :adult)
+      }
+    }
+
+    expect(@table.widget.getColumnCount).to eq(3)
+    expect(@table.widget.getItems.size).to eq(2)
+
+    expect(@table.widget.getItems[0].getText(0)).to eq("Bruce Ting")
+    expect(@table.widget.getItems[0].getText(1)).to eq("45")
+    expect(@table.widget.getItems[0].getText(2)).to eq("true")
+
+    expect(@table.widget.getItems[1].getText(0)).to eq("Julia Fang")
+    expect(@table.widget.getItems[1].getText(1)).to eq("17")
+    expect(@table.widget.getItems[1].getText(2)).to eq("false")
+
+    person3 = Person.new
+    person3.name = "Andrea Shingle"
+    person3.age = 23
+    person3.adult = true
+
+    group.people << person3
+
+    expect(@table.widget.getItems.size).to eq(3)
+    expect(@table.widget.getItems[2].getText(0)).to eq("Andrea Shingle")
+    expect(@table.widget.getItems[2].getText(1)).to eq("23")
+    expect(@table.widget.getItems[2].getText(2)).to eq("true")
+
+    group.people.delete person2
+
+    expect(@table.widget.getItems.size).to eq(2)
+    expect(@table.widget.getItems[1].getText(0)).to eq("Andrea Shingle")
+    expect(@table.widget.getItems[1].getText(1)).to eq("23")
+    expect(@table.widget.getItems[1].getText(2)).to eq("true")
+
+    group.people.delete_at(0)
+
+    expect(@table.widget.getItems.size).to eq(1)
+    expect(@table.widget.getItems[0].getText(0)).to eq("Andrea Shingle")
+    expect(@table.widget.getItems[0].getText(1)).to eq("23")
+    expect(@table.widget.getItems[0].getText(2)).to eq("true")
+
+    group.people.clear
+
+    expect(0).to eq(@table.widget.getItems.size)
+
+    group.people = [person2, person1]
+
+    expect(2).to eq(@table.widget.getItems.size)
+
+    expect(@table.widget.getItems[0].getText(0)).to eq("Julia Fang")
+    expect(@table.widget.getItems[0].getText(1)).to eq("17")
+    expect(@table.widget.getItems[0].getText(2)).to eq("false")
+
+    expect(@table.widget.getItems[1].getText(0)).to eq("Bruce Ting")
+    expect(@table.widget.getItems[1].getText(1)).to eq("45")
+    expect(@table.widget.getItems[1].getText(2)).to eq("true")
+
+    person1.name = "Bruce Flee"
+
+    expect(@table.widget.getItems[1].getText(0)).to eq("Bruce Flee")
+  end
+
+end