* lib/uri/common.rb (URI::Parser): new class.

	
	* lib/uri/mailto.rb, lib/uri/generic.rb: follow the above change.

	* test/uri/test_parser.rb: added tests for URI::Parser.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19282 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 41 insertions, 0 deletions

diff --git a/test/uri/test_parser.rb b/test/uri/test_parser.rb
new file mode 100644
index 0000000000..adf8a1292c
--- /dev/null
+++ b/test/uri/test_parser.rb
@@ -0,0 +1,41 @@
+require 'test/unit'
+require 'uri'
+
+class URI::TestParser < Test::Unit::TestCase
+  def uri_to_ary(uri)
+    uri.class.component.collect {|c| uri.send(c)}
+  end
+
+  def test_compare
+    url = 'http://a/b/c/d;p?q'
+    u0 = URI.parse(url)
+    u1 = URI.parse(url)
+    p = URI::Parser.new
+    u2 = p.parse(url)
+    u3 = p.parse(url)
+
+    assert(u0 == u1)
+    assert(u0.eql?(u1))
+    assert(!u0.equal?(u1))
+
+    assert(u1 == u2)
+    assert(!u1.eql?(u2))
+    assert(!u1.equal?(u2))
+
+    assert(u2 == u3)
+    assert(u2.eql?(u3))
+    assert(!u2.equal?(u3))
+  end
+
+  def test_parse
+    escaped = URI::REGEXP::PATTERN::ESCAPED
+    hex = URI::REGEXP::PATTERN::HEX
+    p1 = URI::Parser.new(:ESCAPED => "(?:#{escaped}|%u[#{hex}]{4})")
+    u1 = p1.parse('http://a/b/%uABCD')
+    assert_equal(['http', nil, 'a', URI::HTTP.default_port, '/b/%uABCD', nil, nil],
+		 uri_to_ary(u1))
+    u1.path = '/%uDCBA'
+    assert_equal(['http', nil, 'a', URI::HTTP.default_port, '/%uDCBA', nil, nil],
+		 uri_to_ary(u1))
+  end
+end