gtk3 2.2.5-x86-mingw32 → 3.0.0-x86-mingw32

data/test/test-gtk-tree-iter.rb

@@ -0,0 +1,53 @@
+# 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 TestGtkTreeIter < Test::Unit::TestCase
+  include GtkTestUtils
+
+  def setup
+    @model = Gtk::ListStore.new(String)
+    @iter = @model.append
+  end
+
+  def test_path
+    assert_equal("0", @iter.path.to_s)
+  end
+
+  sub_test_case("#set_values") do
+    test "Array" do
+      @iter.set_values(["string"])
+      assert_equal("string", @iter[0])
+    end
+
+    test "Hash" do
+      @iter.set_values(0 => "string")
+      assert_equal("string", @iter[0])
+    end
+  end
+
+  sub_test_case("#values=") do
+    test "Array" do
+      @iter.values = ["string"]
+      assert_equal("string", @iter[0])
+    end
+
+    test "Hash" do
+      @iter.values = {0 => "string"}
+      assert_equal("string", @iter[0])
+    end
+  end
+end

data/test/test-gtk-tree-model-filter.rb

@@ -0,0 +1,55 @@
+# 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 TestGtkTreeModelFilter < Test::Unit::TestCase
+  include GtkTestUtils
+
+  def setup
+    @model = Gtk::TreeStore.new(String)
+    @root = @model.append(nil)
+    @filter_root = @model.append(@root)
+    @filter = Gtk::TreeModelFilter.new(@model, @filter_root.path)
+  end
+
+  sub_test_case "#set_modify_func" do
+    test "no argument" do
+      assert_raise(ArgumentError.new("one or more types are required")) do
+        @filter.set_modify_func do
+        end
+      end
+    end
+  end
+
+  sub_test_case "#convert_iter_to_child_iter" do
+    test "converted" do
+      iter = @model.append(@filter_root)
+      assert_equal(iter,
+                   @filter.convert_iter_to_child_iter(@filter.iter_first))
+    end
+  end
+
+  sub_test_case "#convert_child_iter_to_iter" do
+    test "converted" do
+      iter = @model.append(@filter_root)
+      assert_equal(@filter.iter_first,
+                   @filter.convert_child_iter_to_iter(iter))
+    end
+
+    test "not converted" do
+      assert_nil(@filter.convert_child_iter_to_iter(@root))
+    end
+  end
+end

data/test/test-gtk-tree-path.rb

@@ -0,0 +1,42 @@
+# Copyright (C) 2010-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 TestGtkTreePath < Test::Unit::TestCase
+  include GtkTestUtils
+
+  def test_compare
+    assert_equal(-1, tree_path("0") <=> tree_path("1"))
+    assert_equal(0, tree_path("0") <=> tree_path("0"))
+    assert_equal(1, tree_path("1") <=> tree_path("0"))
+  end
+
+  def test_equal
+    assert_equal(tree_path("0"), tree_path("0"))
+    assert_not_equal(tree_path("0"), tree_path("1"))
+    assert_not_equal(tree_path("0"), "0")
+  end
+
+  def test_indices
+    indices, depth = tree_path("2").indices
+    assert_equal([[2], 1],
+                 [indices, depth])
+  end
+
+  private
+  def tree_path(path)
+    Gtk::TreePath.new(path)
+  end
+end

data/test/test-gtk-tree-selection.rb

@@ -0,0 +1,61 @@
+# -*- coding: utf-8 -*-
+#
+# Copyright (C) 2014-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 TestGtkTreeSelection < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case("accessors") do
+    def setup
+      @tree = Gtk::TreeView.new
+      @selection =  @tree.selection
+    end
+
+    test "mode" do
+      @selection.mode = :multiple
+      assert_equal(Gtk::SelectionMode::MULTIPLE, @selection.mode)
+    end
+  end
+
+  sub_test_case("selected") do
+    def setup
+      @model = Gtk::TreeStore.new(String)
+      @view = Gtk::TreeView.new(@model)
+      @column = Gtk::TreeViewColumn.new("Label",
+                                        Gtk::CellRendererText.new,
+                                        :text => 0)
+      @iter = @model.append(nil)
+      @iter[0] = "Hello"
+
+      @selection = @view.selection
+      @selection.select_path(@iter.path)
+    end
+
+    test "#selected_rows" do
+      assert_equal([[@iter.path], @model],
+                   @selection.selected_rows)
+    end
+
+    test "#each" do
+      normalized_selected = @selection.collect do |model, path, iter|
+        [model, path.to_s, iter.class]
+      end
+      assert_equal([[@model, @iter.path.to_s, @iter.class]],
+                   normalized_selected)
+    end
+  end
+end

data/test/test-gtk-tree-view-column.rb

@@ -0,0 +1,71 @@
+# 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 TestGtkTreeViewColumn < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case(".new") do
+    test "empty" do
+      column = Gtk::TreeViewColumn.new
+      assert_equal("", column.title)
+    end
+
+    test "title only" do
+      column = Gtk::TreeViewColumn.new("title")
+      assert_equal("title", column.title)
+    end
+
+    sub_test_case("attributes") do
+      test "string key" do
+        column = Gtk::TreeViewColumn.new
+        cell = Gtk::CellRendererText.new
+        column.pack_start(cell, true)
+        column.add_attribute(cell, "text", 0)
+      end
+
+      test "symbol key" do
+        column = Gtk::TreeViewColumn.new
+        cell = Gtk::CellRendererText.new
+        column.pack_start(cell, true)
+        column.add_attribute(cell, :text, 0)
+      end
+    end
+  end
+
+  sub_test_case("instance methods") do
+    def setup
+      @column = Gtk::TreeViewColumn.new
+      @cell = Gtk::CellRendererText.new
+      @column.pack_start(@cell, true)
+      @column.add_attribute(@cell, :text, 0)
+    end
+
+    test "#set_cell_data_func" do
+      values = []
+      @column.set_cell_data_func(@cell) do |column, cell, model, iter|
+        values << iter[0]
+      end
+
+      model = Gtk::TreeStore.new(String)
+      parent = model.append(nil)
+      parent[0] = "Hello"
+      child = model.append(parent)
+      child[0] = "World"
+      @column.cell_set_cell_data(model, parent, true, true)
+      assert_equal([parent[0]], values)
+    end
+  end
+end

data/test/test-gtk-tree-view.rb

@@ -0,0 +1,105 @@
+# 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 TestGtkTreeView < Test::Unit::TestCase
+  include GtkTestUtils
+
+  sub_test_case("instance methods") do
+    def setup
+      @store = Gtk::TreeStore.new(String)
+      @view = Gtk::TreeView.new(@store)
+      @column = Gtk::TreeViewColumn.new("Label",
+                                        Gtk::CellRendererText.new,
+                                        :text => 0)
+      @view.append_column(@column)
+
+      @window = Gtk::Window.new
+      @window.add(@view)
+      @window.signal_connect("destroy") do
+        Gtk.main_quit
+      end
+    end
+
+    sub_test_case "#get_path_at_pos" do
+      test "found" do
+        iter = @store.append(nil)
+        iter[0] = "Hello"
+        result = nil
+        GLib::Idle.add do
+          result = @view.get_path_at_pos(0, 0)
+          @window.destroy
+          GLib::Source::REMOVE
+        end
+        @window.show_all
+        Gtk.main
+
+        result[0] = result[0].to_s if result[0].is_a?(Gtk::TreePath)
+        assert_equal(["0", @column, 0, 0],
+                     result)
+      end
+
+      test "not found" do
+        result = nil
+        GLib::Idle.add do
+          result = @view.get_path_at_pos(0, 0)
+          @window.destroy
+          GLib::Source::REMOVE
+        end
+        @window.show_all
+        Gtk.main
+
+        assert_nil(result)
+      end
+    end
+
+    test "#map_expanded_rows" do
+      parent = @store.append(nil)
+      parent[0] = "Hello"
+      child = @store.append(parent)
+      child[0] = "World"
+
+      @view.expand_all
+      @view.map_expanded_rows do |view, path|
+        iter = @store.get_iter(path)
+        iter[0] += " (mapped)"
+      end
+
+      normalized_data = @store.collect do |model, path, iter|
+        [model, path.to_s, iter[0]]
+      end
+      assert_equal([
+                     [@store, parent.path.to_s, "Hello (mapped)"],
+                     [@store, child.path.to_s, "World"],
+                   ],
+                   normalized_data)
+    end
+
+    test "#row_expanded?" do
+      parent = @store.append(nil)
+      parent[0] = "Hello"
+      child = @store.append(parent)
+      child[0] = "World"
+
+      assert do
+        not @view.row_expanded?(parent.path)
+      end
+      @view.expand_all
+      assert do
+        @view.row_expanded?(parent.path)
+      end
+    end
+  end
+end

data/test/test-gtk-version.rb

@@ -0,0 +1,47 @@
+# 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 TestGtkVersion < Test::Unit::TestCase
+  include GtkTestUtils
+
+  test "STRING" do
+    major = Gtk::Version::MAJOR
+    minor = Gtk::Version::MINOR
+    micro = Gtk::Version::MICRO
+    assert_equal([major, minor, micro].join("."),
+                 Gtk::Version::STRING)
+  end
+
+  sub_test_case("#or_later?") do
+    test "same" do
+      assert_true(Gtk::Version.or_later?(Gtk::Version::MAJOR,
+                                         Gtk::Version::MINOR,
+                                         Gtk::Version::MICRO))
+    end
+
+    test "later" do
+      assert_true(Gtk::Version.or_later?(Gtk::Version::MAJOR,
+                                         Gtk::Version::MINOR,
+                                         Gtk::Version::MICRO - 1))
+    end
+
+    test "earlier" do
+      assert_false(Gtk::Version.or_later?(Gtk::Version::MAJOR,
+                                          Gtk::Version::MINOR,
+                                          Gtk::Version::MICRO + 1))
+    end
+  end
+end

data/test/test-gtk-widget.rb

@@ -0,0 +1,148 @@
+# Copyright (C) 2008-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 TestGtkWidget < Test::Unit::TestCase
+  include GtkTestUtils
+
+  def setup
+    @widget = Gtk::Invisible.new
+  end
+
+  sub_test_case "class methods" do
+    test ".style_properties" do
+      assert_equal("cursor-aspect-ratio",
+                   Gtk::Label.style_properties.collect(&:name).sort.first)
+    end
+  end
+
+  def test_set_window
+    attrs = Gdk::WindowAttr.new(100, 100, :input_only, :temp)
+    window = Gdk::Window.new(nil, attrs, 0)
+    @widget.window = window
+    assert_equal(window, @widget.window)
+  end
+
+  def test_modify_color_component_with_nil_color
+    assert_nothing_raised do
+      @widget.override_color(:normal, nil)
+    end
+
+    assert_nothing_raised do
+      @widget.override_background_color(:normal, nil)
+    end
+  end
+
+  sub_test_case "#drag_source_set" do
+    def setup
+      only_gtk_version(3, 9, 16)
+      super
+    end
+
+    test "targets - TargetEntry" do
+      target = "text/uri-list"
+      info = 0
+      @widget.drag_source_set([:shift_mask, :control_mask],
+                              [Gtk::TargetEntry.new(target, 0, info)],
+                              :copy)
+      list = @widget.drag_source_get_target_list
+      assert_equal(info, list.find(target))
+    end
+
+    test "targets - Array" do
+      target = "text/uri-list"
+      info = 0
+      @widget.drag_source_set([:shift_mask, :control_mask],
+                              [[target, 0, info]],
+                              :copy)
+      list = @widget.drag_source_get_target_list
+      assert_equal(info, list.find(target))
+    end
+  end
+
+  sub_test_case "#drag_dest_set" do
+    def setup
+      only_gtk_version(3, 9, 16)
+      super
+    end
+
+    test "targets - TargetEntry" do
+      target = "text/uri-list"
+      info = 0
+      @widget.drag_dest_set(:all,
+                            [Gtk::TargetEntry.new(target, 0, info)],
+                            :copy)
+      list = @widget.drag_dest_get_target_list
+      assert_equal(info, list.find(target))
+    end
+
+    test "targets - Array" do
+      target = "text/uri-list"
+      info = 0
+      @widget.drag_dest_set(:all,
+                            [[target, 0, info]],
+                            :copy)
+      list = @widget.drag_dest_get_target_list
+      assert_equal(info, list.find(target))
+    end
+  end
+
+  sub_test_case "events" do
+    def setup
+      @widget = Gtk::EventBox.new
+    end
+
+    test "get" do
+      assert_equal(Gdk::EventMask.new(0), @widget.events)
+    end
+
+    test "add" do
+      @widget.add_events([:exposure_mask, :pointer_motion_mask])
+      assert_equal(Gdk::EventMask::EXPOSURE_MASK |
+                   Gdk::EventMask::POINTER_MOTION_MASK,
+                   @widget.events)
+    end
+
+    test "set" do
+      @widget.set_events([:exposure_mask, :pointer_motion_mask])
+      assert_equal(Gdk::EventMask::EXPOSURE_MASK |
+                   Gdk::EventMask::POINTER_MOTION_MASK,
+                   @widget.events)
+    end
+
+    test "assign" do
+      @widget.events = [:exposure_mask, :pointer_motion_mask]
+      assert_equal(Gdk::EventMask::EXPOSURE_MASK |
+                   Gdk::EventMask::POINTER_MOTION_MASK,
+                   @widget.events)
+    end
+  end
+
+  test "#style_get_property" do
+    entry = Gtk::Entry.new
+    assert do
+      entry.style_get_property("focus-padding").is_a?(Integer)
+    end
+  end
+
+  sub_test_case "predicates" do
+    test "#in_destruction?" do
+      entry = Gtk::Entry.new
+      assert do
+        not entry.in_destruction?
+      end
+    end
+  end
+end