rroonga 1.1.0 → 1.2.0

data/test-unit/lib/test/unit/ui/tap/testrunner.rb

@@ -1,7 +1,7 @@
 #--
 #
 # Author:: Kouhei Sutou.
-# Copyright:: Copyright (c) 2009 Kouhei Sutou <kou@clear-code.com>.
+# Copyright:: Copyright (c) 2009-2010 Kouhei Sutou <kou@clear-code.com>.
 # License:: Ruby license.
 
 require 'test/unit/ui/testrunner'
@@ -24,8 +24,7 @@ module Test
 
           # Begins the test run.
           def start
-            setup_mediator
-            result = start_mediator
+            result = super
             def result.passed?
               true # for prove commend :<
             end
@@ -33,11 +32,6 @@ module Test
           end
 
           private
-          def setup_mediator
-            @mediator = TestRunnerMediator.new(@suite)
-            attach_to_mediator
-          end
-
           def attach_to_mediator
             @mediator.add_listener(TestResult::FAULT, &method(:add_fault))
             @mediator.add_listener(TestRunnerMediator::STARTED, &method(:started))
@@ -46,10 +40,6 @@ module Test
             @mediator.add_listener(TestCase::FINISHED, &method(:test_finished))
           end
 
-          def start_mediator
-            @mediator.run_suite
-          end
-
           def add_fault(fault)
             puts("not ok #{@n_tests} - #{fault.short_display}")
             fault.long_display.each_line do |line|

data/test-unit/lib/test/unit/ui/testrunner.rb

@@ -6,6 +6,7 @@ module Test
       class TestRunner
         extend TestRunnerUtilities
 
+        attr_reader :listeners
         def initialize(suite, options={})
           if suite.respond_to?(:suite)
             @suite = suite.suite
@@ -13,6 +14,30 @@ module Test
             @suite = suite
           end
           @options = options
+          @listeners = @options[:listeners] || []
+        end
+
+        # Begins the test run.
+        def start
+          setup_mediator
+          attach_to_mediator
+          attach_listeners
+          start_mediator
+        end
+
+        private
+        def setup_mediator
+          @mediator = TestRunnerMediator.new(@suite)
+        end
+
+        def attach_listeners
+          @listeners.each do |listener|
+            listener.attach_to_mediator(@mediator)
+          end
+        end
+
+        def start_mediator
+          @mediator.run_suite
         end
 
         def diff_target_string?(string)

data/test-unit/lib/test/unit/util/backtracefilter.rb

@@ -9,6 +9,7 @@ module Test
         module_function
         def filter_backtrace(backtrace, prefix=nil)
           return ["No backtrace"] unless(backtrace)
+          return backtrace if ENV["TEST_UNIT_ALL_BACKTRACE"]
           split_p = if(prefix)
             prefix.split(TESTUNIT_FILE_SEPARATORS)
           else

data/test-unit/lib/test/unit/util/output.rb

@@ -0,0 +1,31 @@
+module Test
+  module Unit
+    module Util
+      module Output
+        ##
+        # Returns output for standard output and standard
+        # error as string.
+        #
+        # Example:
+        #   capture_output do
+        #     puts("stdout")
+        #     warn("stderr")
+        #   end # -> ["stdout\n", "stderr\n"]
+        def capture_output
+          require 'stringio'
+
+          output = StringIO.new
+          error = StringIO.new
+          stdout_save, stderr_save = $stdout, $stderr
+          $stdout, $stderr = output, error
+          begin
+            yield
+            [output.string, error.string]
+          ensure
+            $stdout, $stderr = stdout_save, stderr_save
+          end
+        end
+      end
+    end
+  end
+end

data/test-unit/lib/test/unit/version.rb

@@ -2,6 +2,6 @@
 # HACK: quick and dirty to get integrated into the new project - ryan
 module Test
   module Unit
-    VERSION = '2.0.8'
+    VERSION = '2.1.2'
   end
 end

data/test-unit/test/test-color-scheme.rb

@@ -1,8 +1,10 @@
 class TestUnitColorScheme < Test::Unit::TestCase
   def test_default
     assert_equal({
-                   "success" => color("green", :bold => true),
-                   "failure" => color("red", :bold => true),
+                   "pass" => color("green", :foreground => false) +
+                                color("white", :bold => true),
+                   "failure" => color("red", :foreground => false) +
+                                color("white", :bold => true),
                    "pending" => color("magenta", :bold => true),
                    "omission" => color("blue", :bold => true),
                    "notification" => color("cyan", :bold => true),

data/test-unit/test/test_assertions.rb

@@ -1,6 +1,8 @@
+# -*- coding: utf-8 -*-
+#
 # Author:: Nathaniel Talbott.
 # Copyright:: Copyright (c) 2000-2002 Nathaniel Talbott. All rights reserved.
-#             Copyright (c) 2009 Kouhei Sutou.
+#             Copyright (c) 2009-2010 Kouhei Sutou. All rights reserved.
 # License:: Ruby license.
 
 require 'test/unit'
@@ -311,6 +313,21 @@ EOM
         end
       end
 
+      def test_assert_equal_with_different_encoding
+        utf8_string = "こんにちは"
+        unless utf8_string.respond_to?(:force_encoding)
+          omit("encoding test is for Ruby >= 1.9")
+        end
+        ascii_8bit_string = utf8_string.dup.force_encoding("ascii-8bit")
+        message = <<-EOM.chomp
+<"こんにちは">("UTF-8") expected but was
+<#{ascii_8bit_string.inspect}>("ASCII-8BIT").
+EOM
+        check_fails(message) do
+          assert_equal(utf8_string, ascii_8bit_string)
+        end
+      end
+
       def test_assert_raise_success
         return_value = nil
         check_nothing_fails(true) do
@@ -811,13 +828,19 @@ EOM
           end
           assert_in_delta(0.1, float_thing, 0.1)
         }
-        check_fails("message.\n<0.5> and\n<0.4> expected to be within\n<0.05> of each other.") {
+        check_fails("message.\n" +
+                    "<0.5> expected but was\n" +
+                    "<0.4> (tolerance <0.05>).\n" +
+                    "\n" +
+                    "Relation:\n" +
+                    "<<0.4> < <0.5>-<0.05>(0.45) <= <0.5>+<0.05>(0.55)>") {
           assert_in_delta(0.5, 0.4, 0.05, "message")
         }
         object = Object.new
+        inspected_object = AssertionMessage.convert(object)
         check_fails("The arguments must respond to to_f; " +
                     "the first float did not.\n" +
-                    "<#{object.inspect}>.respond_to?(:to_f) expected\n" +
+                    "<#{inspected_object}>.respond_to?(:to_f) expected\n" +
                     "(Class: <Object>)") {
           assert_in_delta(object, 0.4, 0.1)
         }
@@ -1121,17 +1144,40 @@ EOM
           assert_alias_method(object, :other, :original_method)
         end
 
-        check_fails("<#{object.inspect}>.nonexistent doesn't exist\n" +
+        inspected_object = AssertionMessage.convert(object)
+        check_fails("<#{inspected_object}>.nonexistent doesn't exist\n" +
                     "(Class: <Object>)") do
           assert_alias_method(object, :nonexistent, :original_method)
         end
 
-        check_fails("<#{object.inspect}>.nonexistent doesn't exist\n" +
+        check_fails("<#{inspected_object}>.nonexistent doesn't exist\n" +
                     "(Class: <Object>)") do
           assert_alias_method(object, :alias_method, :nonexistent)
         end
       end
 
+      def test_assert_path_exist
+        check_nothing_fails do
+          assert_path_exist(__FILE__)
+        end
+
+        nonexistent_file = __FILE__ + ".nonexistent"
+        check_fails("<#{nonexistent_file.inspect}> expected to exist") do
+          assert_path_exist(nonexistent_file)
+        end
+      end
+
+      def test_assert_path_not_exist
+        nonexistent_file = __FILE__ + ".nonexistent"
+        check_nothing_fails do
+          assert_path_not_exist(nonexistent_file)
+        end
+
+        check_fails("<#{__FILE__.inspect}> expected to not exist") do
+          assert_path_not_exist(__FILE__)
+        end
+      end
+
       private
       def add_failure(message, location=caller, options=nil)
         unless @catch_assertions

data/test-unit/test/ui/test_tap.rb

@@ -0,0 +1,33 @@
+require 'stringio'
+require 'test/unit/ui/tap/testrunner'
+
+class TestTap < Test::Unit::TestCase
+  def test_run
+    fail_line = nil
+    test_case = Class.new(Test::Unit::TestCase) do
+      def test_success
+        assert_equal(3, 1 + 2)
+      end
+
+      def test_fail; assert_equal(3, 1 - 2); end; fail_line = __LINE__
+    end
+    output = StringIO.new
+    runner = Test::Unit::UI::Tap::TestRunner.new(test_case.suite,
+                                                 :output => output)
+    result = runner.start; start_line = __LINE__
+    assert_equal(<<-EOR, output.string.gsub(/[\d\.]+ seconds/, "0.001 seconds"))
+1..2
+not ok 1 - test_fail(): <3> expected but was
+# Failure:
+# test_fail()
+#     [#{__FILE__}:#{fail_line}:in `test_fail'
+#      #{__FILE__}:#{start_line}:in `test_run']:
+# <3> expected but was
+# <-1>.
+ok 2 - test_success()
+# Finished in 0.001 seconds.
+# 2 tests, 2 assertions, 1 failures, 0 errors, 0 pendings, 0 omissions, 0 notifications
+EOR
+    assert_true(result.passed?)
+  end
+end

data/test-unit/test/util/test-output.rb

@@ -0,0 +1,11 @@
+require 'test/unit'
+
+class TestUnitOutput < Test::Unit::TestCase
+  def test_capture_output
+    assert_equal(["stdout\n", "stderr\n"],
+                 capture_output do
+                   puts("stdout")
+                   warn("stderr")
+                 end)
+  end
+end

data/test/groonga-test-utils.rb

@@ -17,6 +17,7 @@ require 'fileutils'
 require 'pathname'
 require 'time'
 require 'erb'
+require 'stringio'
 begin
   require 'json'
 rescue LoadError

data/test/test-accessor.rb

@@ -0,0 +1,32 @@
+# Copyright (C) 2011  Kouhei Sutou <kou@clear-code.com>
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License version 2.1 as published by the Free Software Foundation.
+#
+# 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+class AccessorTest < Test::Unit::TestCase
+  include GroongaTestUtils
+
+  def setup
+    setup_database
+    @posts = Groonga::Hash.create(:name => "Posts", :key_type => "ShortText")
+    @id = @posts.column("_id")
+  end
+
+  def test_name
+    assert_nil(@id.name)
+  end
+
+  def test_local_name
+    assert_equal("_id", @id.local_name)
+  end
+end

data/test/test-context.rb

@@ -1,4 +1,4 @@
-# Copyright (C) 2009  Kouhei Sutou <kou@clear-code.com>
+# Copyright (C) 2009-2011  Kouhei Sutou <kou@clear-code.com>
 #
 # This library is free software; you can redistribute it and/or
 # modify it under the terms of the GNU Lesser General Public
@@ -114,4 +114,10 @@ class ContextTest < Test::Unit::TestCase
   def test_support_lzo?
     assert_boolean(Groonga::Context.default.support_lzo?)
   end
+
+  def test_match_escalation_threshold
+    assert_equal(0, context.match_escalation_threshold)
+    context.match_escalation_threshold = -1
+    assert_equal(-1, context.match_escalation_threshold)
+  end
 end

data/test/test-database-dumper.rb

@@ -0,0 +1,156 @@
+# Copyright (C) 2011  Kouhei Sutou <kou@clear-code.com>
+#
+# This library is free software; you can redistribute it and/or
+# modify it under the terms of the GNU Lesser General Public
+# License version 2.1 as published by the Free Software Foundation.
+#
+# 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+class DatabaseDumperTest < Test::Unit::TestCase
+  include GroongaTestUtils
+
+  setup :setup_database, :before => :append
+
+  setup
+  def setup_tables
+    Groonga::Schema.define do |schema|
+      schema.create_table("Users",
+                          :type => :hash,
+                          :key_type => "ShortText") do |table|
+        table.text("name")
+      end
+
+      schema.create_table("Posts") do |table|
+        table.text("title")
+        table.reference("author", "Users")
+        table.integer("rank")
+        table.unsigned_integer("n_goods")
+        table.text("tags", :type => :vector)
+        table.boolean("published")
+        table.time("created_at")
+      end
+
+      schema.change_table("Users") do |table|
+        table.index("Posts.author")
+      end
+    end
+  end
+
+  private
+  def dump(options={})
+    Groonga::DatabaseDumper.new(options).dump
+  end
+
+  def posts
+    context["Posts"]
+  end
+
+  def dumped_schema
+    <<-EOS
+table_create Posts TABLE_NO_KEY
+column_create Posts created_at COLUMN_SCALAR Time
+column_create Posts n_goods COLUMN_SCALAR UInt32
+column_create Posts published COLUMN_SCALAR Bool
+column_create Posts rank COLUMN_SCALAR Int32
+column_create Posts tags COLUMN_VECTOR Text
+column_create Posts title COLUMN_SCALAR Text
+
+table_create Users TABLE_HASH_KEY --key_type ShortText
+column_create Users name COLUMN_SCALAR Text
+
+column_create Posts author COLUMN_SCALAR Users
+
+column_create Users Posts_author COLUMN_INDEX Posts author
+EOS
+  end
+
+  class EmptyTest < DatabaseDumperTest
+    def test_default
+      assert_equal(dumped_schema, dump)
+    end
+  end
+
+  class HaveDataTest < DatabaseDumperTest
+    setup
+    def setup_data
+      posts.add(:author => "mori",
+                :created_at => Time.parse("2010-03-08 16:52 JST"),
+                :n_goods => 4,
+                :published => true,
+                :rank => 10,
+                :tags => ["search", "mori"],
+                :title => "Why search engine find?")
+    end
+
+    def test_default
+      assert_equal(<<-EOS, dump)
+#{dumped_schema.chomp}
+
+load --table Posts
+[
+["_id","author","created_at","n_goods","published","rank","tags","title"],
+[1,"mori",1268034720.0,4,true,10,["search","mori"],"Why search engine find?"]
+]
+
+load --table Users
+[
+["_key","name"],
+["mori",""]
+]
+EOS
+    end
+
+    def test_limit_tables
+      assert_equal(<<-EOS, dump(:tables => ["Posts"]))
+#{dumped_schema.chomp}
+
+load --table Posts
+[
+["_id","author","created_at","n_goods","published","rank","tags","title"],
+[1,"mori",1268034720.0,4,true,10,["search","mori"],"Why search engine find?"]
+]
+EOS
+    end
+
+    def test_limit_tables_with_regexp
+      assert_equal(<<-EOS, dump(:tables => [/Posts?/]))
+#{dumped_schema.chomp}
+
+load --table Posts
+[
+["_id","author","created_at","n_goods","published","rank","tags","title"],
+[1,"mori",1268034720.0,4,true,10,["search","mori"],"Why search engine find?"]
+]
+EOS
+    end
+
+    def test_no_schema
+      assert_equal(<<-EOS, dump(:dump_schema => false))
+load --table Posts
+[
+["_id","author","created_at","n_goods","published","rank","tags","title"],
+[1,"mori",1268034720.0,4,true,10,["search","mori"],"Why search engine find?"]
+]
+
+load --table Users
+[
+["_key","name"],
+["mori",""]
+]
+EOS
+    end
+
+    def test_no_tables
+      assert_equal(<<-EOS, dump(:dump_tables => false))
+#{dumped_schema.chomp}
+EOS
+    end
+  end
+end