gtk3 2.2.5-x64-mingw32 → 3.0.0-x64-mingw32

data/test/test-gtk-image.rb

@@ -0,0 +1,52 @@
+class TestGtkImage < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case ".new" do
+    test "stock" do
+      image = Gtk::Image.new(:stock => Gtk::Stock::GO_FORWARD,
+                             :size => :dialog)
+      assert_equal([
+                     Gtk::Stock::GO_FORWARD.to_s,
+                     Gtk::IconSize::DIALOG,
+                   ],
+                   image.stock)
+    end
+
+    test "icon_name" do
+      icon_name = "dialog-password"
+      image = Gtk::Image.new(:icon_name => icon_name,
+                             :size => Gtk::IconSize::DIALOG)
+      assert_equal([
+                     icon_name,
+                     Gtk::IconSize::DIALOG,
+                   ],
+                   image.icon_name)
+    end
+
+    test "icon" do
+      icon = Gio::ThemedIcon.new("gtk-open")
+      image = Gtk::Image.new(:icon => icon,
+                             :size => :dialog)
+      assert_equal([
+                     icon,
+                     Gtk::IconSize::DIALOG,
+                   ],
+                   image.icon)
+    end
+
+    test "resource" do
+      resource = Gio::Resource.load(fixture_path("image.gresource"))
+      Gio::Resources.register(resource)
+      begin
+        resource_path = "/org/ruby/gnome/gnome-logo-icon.png"
+        image = Gtk::Image.new(:resource => resource_path,
+                               :size => :dialog)
+        omit("GTK+ 3.16 doesn't support getting resource path. See GitHub#461.")
+        assert_equal(resource_path,
+                     image.resource)
+      ensure
+        Gio::Resources.unregister(resource)
+      end
+    end
+  end
+end

data/test/test-gtk-label.rb

@@ -0,0 +1,39 @@
+# Copyright (C) 2015  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+class TestGtkLabel < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case ".new" do
+    test ":use_underline => true" do
+      label = Gtk::Label.new("_Hello", :use_underline => true)
+      assert_equal("h", [label.mnemonic_keyval].pack("U"))
+    end
+  end
+
+  sub_test_case "instance methods" do
+    sub_test_case "set_markup" do
+      def setup
+        @label = Gtk::Label.new
+      end
+
+      test ":use_underline => true" do
+        @label.set_markup("_Hello", :use_underline => true)
+        assert_equal("h", [@label.mnemonic_keyval].pack("U"))
+      end
+    end
+  end
+end

data/test/{test_gtk_level_bar.rb → test-gtk-level-bar.rb}

@@ -78,5 +78,17 @@ class TestGtkLevelBar < Test::Unit::TestCase
     def test_get_nonexistent_offset_value
       assert_nil(@level_bar.get_offset_value("nonexistent"))
     end
+
+    def test_inverted
+      only_gtk_version(3, 8, 0)
+      @level_bar.inverted = true
+      assert_true(@level_bar.inverted?)
+    end
+  end
+
+  class TestEnum < self
+    def test_level_bar_mode
+      assert_const_defined(Gtk::LevelBar::Mode, :CONTINUOUS)
+    end
   end
 end

data/test/test-gtk-list-store.rb

@@ -0,0 +1,204 @@
+# Copyright (C) 2013-2015  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA  02110-1301  USA
+
+class TestGtkListStore < Test::Unit::TestCase
+  include GtkTestUtils
+
+  ID = 0
+  NAME = 1
+
+  COLUMNS = {
+    ID => Integer,
+    NAME => String,
+  }
+
+  def setup
+    columns = COLUMNS.keys.sort.collect do |key|
+      COLUMNS[key]
+    end
+    @store = Gtk::ListStore.new(*columns)
+  end
+
+  sub_test_case(".new") do
+    test "no columns" do
+      assert_raise(ArgumentError.new("No column type is specified")) do
+        Gtk::ListStore.new
+      end
+    end
+  end
+
+  sub_test_case("#set_values") do
+    test "Array" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal([0, '1'], [iter[0], iter[1]])
+
+      iter = @store.append
+      @store.set_values(iter, [2, '3'])
+      assert_equal([2, '3'], [iter[0], iter[1]])
+
+      @store.set_values(iter, [])
+      assert_equal([2, '3'], [iter[0], iter[1]])
+    end
+
+    test "Hash" do
+      iter = @store.append
+      @store.set_values(iter, {ID => 0, NAME => 'me'})
+      assert_equal([0, 'me'], [iter[ID], iter[NAME]])
+
+      iter = @store.append
+      @store.set_values(iter, {NAME => 'you', ID => 2})
+      assert_equal([2, 'you'], [iter[ID], iter[NAME]])
+
+      @store.set_values(iter, {NAME => "she"})
+      assert_equal([2, 'she'], [iter[ID], iter[NAME]])
+
+      @store.set_values(iter, {})
+      assert_equal([2, 'she'], [iter[ID], iter[NAME]])
+    end
+  end
+
+  sub_test_case("Add data") do
+    test "#append" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal("0", iter.path.to_s)
+
+      iter = @store.append
+      @store.set_values(iter, [2, '3'])
+
+      assert_equal("1", iter.path.to_s)
+      assert_equal(0, @store.iter_first[0])
+      assert_equal(2, @store.get_iter("1")[0])
+    end
+
+    test "#prepend" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal("0", iter.path.to_s)
+
+      iter = @store.prepend
+      @store.set_values(iter, [2, '3'])
+
+      assert_equal("0", iter.path.to_s)
+      assert_equal(2, @store.iter_first[0])
+      assert_equal(0, @store.get_iter("1")[0])
+    end
+
+    test "#insert" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal("0", iter.path.to_s)
+
+      iter = @store.append
+      @store.set_values(iter, [2, '3'])
+      assert_equal("1", iter.path.to_s)
+
+      iter = @store.insert(1)
+      @store.set_values(iter, [4, '5'])
+
+      assert_equal(0, @store.get_iter("0")[0])
+      assert_equal(4, @store.get_iter("1")[0])
+      assert_equal(2, @store.get_iter("2")[0])
+    end
+
+    test "#insert_before" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal("0", iter.path.to_s)
+
+      iter = @store.append
+      @store.set_values(iter, [2, '3'])
+      assert_equal("1", iter.path.to_s)
+
+      sibling = @store.get_iter("1")
+      iter = @store.insert_before(sibling)
+      @store.set_values(iter, [4, '5'])
+
+      assert_equal(0, @store.get_iter("0")[0])
+      assert_equal(4, @store.get_iter("1")[0])
+      assert_equal(2, @store.get_iter("2")[0])
+    end
+
+    test "#insert_after" do
+      iter = @store.append
+      @store.set_values(iter, [0, '1'])
+      assert_equal("0", iter.path.to_s)
+
+      iter = @store.append
+      @store.set_values(iter, [2, '3'])
+      assert_equal("1", iter.path.to_s)
+
+      sibling = @store.get_iter("0")
+      iter = @store.insert_after(sibling)
+      @store.set_values(iter, [4, '5'])
+
+      assert_equal(0, @store.get_iter("0")[0])
+      assert_equal(4, @store.get_iter("1")[0])
+      assert_equal(2, @store.get_iter("2")[0])
+    end
+  end
+
+  test "#each" do
+    first_iter = @store.append
+    first_iter[ID] = 0
+    first_iter[NAME] = "Hello"
+    second_iter = @store.append
+    second_iter[ID] = 1
+    second_iter[NAME] = "World"
+
+    normalized_data = []
+    @store.each do |model, path, iter|
+      normalized_data << [model, path.to_s, iter.class]
+    end
+    assert_equal([
+                   [@store, first_iter.path.to_s, first_iter.class],
+                   [@store, second_iter.path.to_s, second_iter.class],
+                 ],
+                 normalized_data)
+  end
+
+  sub_test_case "GC" do
+    test "iter" do
+      GC.start
+      n_iterators = count_objects(Gtk::TreeIter)
+      50.times do |i|
+        iter = @store.append
+        iter[ID] = i
+        iter[NAME] = i.to_s
+      end
+      100.times do
+        @store.iter_first
+      end
+      iter = @store.iter_first
+      while @store.remove(iter); end
+      assert_equal(0, @store.to_enum(:each).to_a.size)
+      GC.start
+      assert do
+        count_objects(Gtk::TreeIter) <= n_iterators + 1
+      end
+    end
+
+    private
+    def count_objects(klass)
+      n_objects = ObjectSpace.each_object(Gtk::TreeIter) do
+        # do nothing
+      end
+      n_objects
+    end
+  end
+end

data/test/test-gtk-message-dialog.rb

@@ -0,0 +1,62 @@
+# Copyright (C) 2015  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+class TestGtkMessageDialog < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case ".new" do
+    test "no argument" do
+      dialog = Gtk::MessageDialog.new
+      assert_equal("", dialog.text)
+    end
+
+    test "parent" do
+      parent = Gtk::Window.new
+      dialog = Gtk::MessageDialog.new(:parent => parent)
+      assert_equal(parent, dialog.transient_for)
+    end
+
+    test "flags - modal" do
+      dialog = Gtk::MessageDialog.new(:flags => :modal)
+      assert do
+        dialog.modal?
+      end
+    end
+
+    test "flags - destroy_with_parent" do
+      dialog = Gtk::MessageDialog.new(:flags => :destroy_with_parent)
+      assert do
+        dialog.destroy_with_parent?
+      end
+    end
+
+    test "type" do
+      dialog = Gtk::MessageDialog.new(:type => :error)
+      assert_equal(Gtk::MessageType::ERROR, dialog.message_type)
+    end
+
+    test "buttons" do
+      dialog = Gtk::MessageDialog.new(:buttons => :cancel)
+      button = dialog.get_widget_for_response(Gtk::ResponseType::CANCEL)
+      assert_not_nil(button)
+    end
+
+    test "message" do
+      dialog = Gtk::MessageDialog.new(:message => "Label")
+      assert_equal("Label", dialog.text)
+    end
+  end
+end

data/test/test-gtk-paned.rb

@@ -0,0 +1,109 @@
+# Copyright (C) 2015  Ruby-GNOME2 Project Team
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License as published by the Free Software Foundation; either
+# version 2.1 of the License, or (at your option) any later version.
+#
+# This library is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this library; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+class TestGtkPaned < Test::Unit::TestCase
+  include GtkTestUtils
+
+  def setup
+    @paned = Gtk::Paned.new(:horizontal)
+  end
+
+  sub_test_case "#pack1" do
+    def setup
+      super
+      @child = Gtk::EventBox.new
+    end
+
+    test "no options" do
+      @paned.pack1(@child)
+      assert_equal({
+                     :resize => false,
+                     :shrink => true,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+
+    test ":resize => true" do
+      @paned.pack1(@child, :resize => true)
+      assert_equal({
+                     :resize => true,
+                     :shrink => true,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+
+    test ":shrink => false" do
+      @paned.pack1(@child, :shrink => false)
+      assert_equal({
+                     :resize => false,
+                     :shrink => false,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+  end
+
+  sub_test_case "#pack2" do
+    def setup
+      super
+      @child = Gtk::EventBox.new
+    end
+
+    test "no options" do
+      @paned.pack2(@child)
+      assert_equal({
+                     :resize => true,
+                     :shrink => true,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+
+    test ":resize => false" do
+      @paned.pack2(@child, :resize => false)
+      assert_equal({
+                     :resize => false,
+                     :shrink => true,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+
+    test ":shrink => false" do
+      @paned.pack2(@child, :shrink => false)
+      assert_equal({
+                     :resize => true,
+                     :shrink => false,
+                   },
+                   {
+                     :resize => @paned.child_get_property(@child, :resize),
+                     :shrink => @paned.child_get_property(@child, :shrink),
+                   })
+    end
+  end
+end