1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00

* test/uri/* (6 files): added.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4670 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
akira 2003-10-04 04:02:16 +00:00
parent d6f70951db
commit ef5883c016
7 changed files with 1079 additions and 1 deletions

View file

@ -1,4 +1,8 @@
Sat Oct 4 12:44:45 2003 akira yamada <akira@ruby-lang.org>
Sat Oct 4 12:58:48 2003 akira yamada <akira@ruby-lang.org>
* test/uri/* (6 files): added.
Sat Oct 4 12:44:45 2003 akira yamada <akira@ruby-lang.org>
* lib/uri/ftp.rb, lib/uri/mailto.rb: renamed to #to_s from #to_str.

49
test/uri/test_common.rb Normal file
View file

@ -0,0 +1,49 @@
#
# $Id$
#
# Copyright (c) 2002 akira yamada <akira@ruby-lang.org>
# You can redistribute it and/or modify it under the same term as Ruby.
#
require 'runit/testcase'
require 'runit/cui/testrunner'
require 'uri'
class TestCommon < RUNIT::TestCase
def setup
end
def teardown
end
def test_extract
# ruby-list:36086
assert_equal(['http://example.com'],
URI.extract('http://example.com'))
assert_equal(['http://example.com'],
URI.extract('(http://example.com)'))
assert_equal(['http://example.com/foo)'],
URI.extract('(http://example.com/foo)'))
assert_equal(['http://example.jphttp://example.jp'],
URI.extract('http://example.jphttp://example.jp'))
assert_equal(['http://example.jphttp://example.jp'],
URI.extract('http://example.jphttp://example.jp', ['http']))
assert_equal(['http://', 'mailto:'].sort,
URI.extract('ftp:// http:// mailto: https://', ['http', 'mailto']).sort)
# reported by Doug Kearns <djkea2@mugca.its.monash.edu.au>
assert_equal(['From:', 'mailto:xxx@xxx.xxx.xxx]'].sort,
URI.extract('From: XXX [mailto:xxx@xxx.xxx.xxx]').sort)
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestCommon.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestGeneric.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end

61
test/uri/test_ftp.rb Normal file
View file

@ -0,0 +1,61 @@
#
# $Id$
#
# Copyright (c) 2001 akira yamada <akira@ruby-lang.org>
# You can redistribute it and/or modify it under the same term as Ruby.
#
require 'runit/testcase'
require 'runit/testsuite'
require 'runit/cui/testrunner'
require 'uri/ftp'
module URI
class Generic
def to_ary
component_ary
end
end
end
class TestFTP < RUNIT::TestCase
def setup
end
def test_parse
url = URI.parse('ftp://user:pass@host.com/abc/def')
assert_kind_of(URI::FTP, url)
exp = [
'ftp',
'user:pass', 'host.com', URI::FTP.default_port,
'/abc/def', nil,
]
ary = url.to_ary
assert_equal(exp, ary)
assert_equal('user', url.user)
assert_equal('pass', url.password)
end
def test_select
assert_equal(['ftp', 'a.b.c', 21], URI.parse('ftp://a.b.c/').select(:scheme, :host, :port))
u = URI.parse('ftp://a.b.c/')
assert_equal(u.to_ary, u.select(*u.component))
assert_exception(ArgumentError) do
u.select(:scheme, :host, :not_exist, :port)
end
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestFTP.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestFTP.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end

634
test/uri/test_generic.rb Normal file
View file

@ -0,0 +1,634 @@
#
# $Id$
#
# Copyright (c) 2002 akira yamada <akira@ruby-lang.org>
# You can redistribute it and/or modify it under the same term as Ruby.
#
require 'runit/testcase'
require 'runit/cui/testrunner'
require 'uri'
module URI
class Generic
def to_ary
component_ary
end
end
end
class TestGeneric < RUNIT::TestCase
def setup
@url = 'http://a/b/c/d;p?q'
@base_url = URI.parse(@url)
end
def teardown
end
def test_parse
# 0
assert_kind_of(URI::HTTP, @base_url)
exp = [
'http',
nil, 'a', URI::HTTP.default_port,
'/b/c/d;p',
'q',
nil
]
ary = @base_url.to_ary
assert_equal(exp, ary)
# 1
url = URI.parse('ftp://ftp.is.co.za/rfc/rfc1808.txt')
assert_kind_of(URI::FTP, url)
exp = [
'ftp',
nil, 'ftp.is.co.za', URI::FTP.default_port,
'/rfc/rfc1808.txt', nil,
]
ary = url.to_ary
assert_equal(exp, ary)
# 2
url = URI.parse('gopher://spinaltap.micro.umn.edu/00/Weather/California/Los%20Angeles')
assert_kind_of(URI::Generic, url)
exp = [
'gopher',
nil, 'spinaltap.micro.umn.edu', nil, nil,
'/00/Weather/California/Los%20Angeles', nil,
nil,
nil
]
ary = url.to_ary
assert_equal(exp, ary)
# 3
url = URI.parse('http://www.math.uio.no/faq/compression-faq/part1.html')
assert_kind_of(URI::HTTP, url)
exp = [
'http',
nil, 'www.math.uio.no', URI::HTTP.default_port,
'/faq/compression-faq/part1.html',
nil,
nil
]
ary = url.to_ary
assert_equal(exp, ary)
# 4
url = URI.parse('mailto:mduerst@ifi.unizh.ch')
assert_kind_of(URI::Generic, url)
exp = [
'mailto',
'mduerst@ifi.unizh.ch',
[]
]
ary = url.to_ary
assert_equal(exp, ary)
# 5
url = URI.parse('news:comp.infosystems.www.servers.unix')
assert_kind_of(URI::Generic, url)
exp = [
'news',
nil, nil, nil, nil,
nil, 'comp.infosystems.www.servers.unix',
nil,
nil
]
ary = url.to_ary
assert_equal(exp, ary)
# 6
url = URI.parse('telnet://melvyl.ucop.edu/')
assert_kind_of(URI::Generic, url)
exp = [
'telnet',
nil, 'melvyl.ucop.edu', nil, nil,
'/', nil,
nil,
nil
]
ary = url.to_ary
assert_equal(exp, ary)
# 7
# reported by Mr. Kubota <em6t-kbt@asahi-net.or.jp>
assert_exception(URI::InvalidURIError) { URI.parse('http://a_b:80/') }
assert_exception(URI::InvalidURIError) { URI.parse('http://a_b/') }
# 8
# reporte by m_seki
uri = URI.parse('file:///foo/bar.txt')
assert_kind_of(URI::Generic, url)
uri = URI.parse('file:/foo/bar.txt')
assert_kind_of(URI::Generic, url)
end
def test_merge
u1 = URI.parse('http://foo')
u2 = URI.parse('http://foo/')
u3 = URI.parse('http://foo/bar')
u4 = URI.parse('http://foo/bar/')
assert_equal(URI.parse('http://foo/baz'), u1 + 'baz')
assert_equal(URI.parse('http://foo/baz'), u2 + 'baz')
assert_equal(URI.parse('http://foo/baz'), u3 + 'baz')
assert_equal(URI.parse('http://foo/bar/baz'), u4 + 'baz')
assert_equal(URI.parse('http://foo/baz'), u1 + '/baz')
assert_equal(URI.parse('http://foo/baz'), u2 + '/baz')
assert_equal(URI.parse('http://foo/baz'), u3 + '/baz')
assert_equal(URI.parse('http://foo/baz'), u4 + '/baz')
# from [ruby-dev:11508] Re: uri
url = URI.parse('http://hoge/a.html') + 'b.html'
assert_equal('http://hoge/b.html', url.to_s)
# reported by Mr. Kubota <em6t-kbt@asahi-net.or.jp>
url = URI.parse('http://a/b') + 'http://x/y'
assert_equal('http://x/y', url.to_s)
assert_equal(url, URI.parse('') + 'http://x/y')
assert_equal(url, URI.parse('').normalize + 'http://x/y')
assert_equal(url, URI.parse('http://a/b').normalize + 'http://x/y')
u = URI.parse('http://foo/bar/baz')
assert_equal(nil, u.merge!(""))
assert_equal(nil, u.merge!(u))
assert(nil != u.merge!("."))
assert_equal('http://foo/bar/', u.to_s)
assert(nil != u.merge!("../baz"))
assert_equal('http://foo/baz', u.to_s)
end
def test_route
url = URI.parse('http://hoge/a.html').route_to('http://hoge/b.html')
assert_equal('b.html', url.to_s)
url = URI.parse('http://hoge/a/').route_to('http://hoge/b/')
assert_equal('../b/', url.to_s)
url = URI.parse('http://hoge/a/b').route_to('http://hoge/b/')
assert_equal('../b/', url.to_s)
url = URI.parse('http://hoge/a/b/').route_to('http://hoge/b/')
assert_equal('../../b/', url.to_s)
end
def test_rfc2396_examples
# http://a/b/c/d;p?q
# g:h = g:h
url = @base_url.merge('g:h')
assert_kind_of(URI::Generic, url)
assert_equal('g:h', url.to_s)
url = @base_url.route_to('g:h')
assert_kind_of(URI::Generic, url)
assert_equal('g:h', url.to_s)
# http://a/b/c/d;p?q
# g = http://a/b/c/g
url = @base_url.merge('g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g', url.to_s)
url = @base_url.route_to('http://a/b/c/g')
assert_kind_of(URI::Generic, url)
assert_equal('g', url.to_s)
# http://a/b/c/d;p?q
# ./g = http://a/b/c/g
url = @base_url.merge('./g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g', url.to_s)
url = @base_url.route_to('http://a/b/c/g')
assert_kind_of(URI::Generic, url)
assert('./g' != url.to_s) # ok
assert_equal('g', url.to_s)
# http://a/b/c/d;p?q
# g/ = http://a/b/c/g/
url = @base_url.merge('g/')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g/', url.to_s)
url = @base_url.route_to('http://a/b/c/g/')
assert_kind_of(URI::Generic, url)
assert_equal('g/', url.to_s)
# http://a/b/c/d;p?q
# /g = http://a/g
url = @base_url.merge('/g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/g', url.to_s)
url = @base_url.route_to('http://a/g')
assert_kind_of(URI::Generic, url)
assert('/g' != url.to_s) # ok
assert_equal('../../g', url.to_s)
# http://a/b/c/d;p?q
# //g = http://g
url = @base_url.merge('//g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://g', url.to_s)
url = @base_url.route_to('http://g')
assert_kind_of(URI::Generic, url)
assert_equal('//g', url.to_s)
# http://a/b/c/d;p?q
# ?y = http://a/b/c/?y
url = @base_url.merge('?y')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/?y', url.to_s)
url = @base_url.route_to('http://a/b/c/?y')
assert_kind_of(URI::Generic, url)
assert_equal('?y', url.to_s)
# http://a/b/c/d;p?q
# g?y = http://a/b/c/g?y
url = @base_url.merge('g?y')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g?y', url.to_s)
url = @base_url.route_to('http://a/b/c/g?y')
assert_kind_of(URI::Generic, url)
assert_equal('g?y', url.to_s)
# http://a/b/c/d;p?q
# #s = (current document)#s
url = @base_url.merge('#s')
assert_kind_of(URI::HTTP, url)
assert_equal(@base_url.to_s + '#s', url.to_s)
url = @base_url.route_to(@base_url.to_s + '#s')
assert_kind_of(URI::Generic, url)
assert_equal('#s', url.to_s)
# http://a/b/c/d;p?q
# g#s = http://a/b/c/g#s
url = @base_url.merge('g#s')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g#s', url.to_s)
url = @base_url.route_to('http://a/b/c/g#s')
assert_kind_of(URI::Generic, url)
assert_equal('g#s', url.to_s)
# http://a/b/c/d;p?q
# g?y#s = http://a/b/c/g?y#s
url = @base_url.merge('g?y#s')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g?y#s', url.to_s)
url = @base_url.route_to('http://a/b/c/g?y#s')
assert_kind_of(URI::Generic, url)
assert_equal('g?y#s', url.to_s)
# http://a/b/c/d;p?q
# ;x = http://a/b/c/;x
url = @base_url.merge(';x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/;x', url.to_s)
url = @base_url.route_to('http://a/b/c/;x')
assert_kind_of(URI::Generic, url)
assert_equal(';x', url.to_s)
# http://a/b/c/d;p?q
# g;x = http://a/b/c/g;x
url = @base_url.merge('g;x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g;x', url.to_s)
url = @base_url.route_to('http://a/b/c/g;x')
assert_kind_of(URI::Generic, url)
assert_equal('g;x', url.to_s)
# http://a/b/c/d;p?q
# g;x?y#s = http://a/b/c/g;x?y#s
url = @base_url.merge('g;x?y#s')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g;x?y#s', url.to_s)
url = @base_url.route_to('http://a/b/c/g;x?y#s')
assert_kind_of(URI::Generic, url)
assert_equal('g;x?y#s', url.to_s)
# http://a/b/c/d;p?q
# . = http://a/b/c/
url = @base_url.merge('.')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/', url.to_s)
url = @base_url.route_to('http://a/b/c/')
assert_kind_of(URI::Generic, url)
assert('.' != url.to_s) # ok
assert_equal('./', url.to_s)
# http://a/b/c/d;p?q
# ./ = http://a/b/c/
url = @base_url.merge('./')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/', url.to_s)
url = @base_url.route_to('http://a/b/c/')
assert_kind_of(URI::Generic, url)
assert_equal('./', url.to_s)
# http://a/b/c/d;p?q
# .. = http://a/b/
url = @base_url.merge('..')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/', url.to_s)
url = @base_url.route_to('http://a/b/')
assert_kind_of(URI::Generic, url)
assert('..' != url.to_s) # ok
assert_equal('../', url.to_s)
# http://a/b/c/d;p?q
# ../ = http://a/b/
url = @base_url.merge('../')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/', url.to_s)
url = @base_url.route_to('http://a/b/')
assert_kind_of(URI::Generic, url)
assert_equal('../', url.to_s)
# http://a/b/c/d;p?q
# ../g = http://a/b/g
url = @base_url.merge('../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/g', url.to_s)
url = @base_url.route_to('http://a/b/g')
assert_kind_of(URI::Generic, url)
assert_equal('../g', url.to_s)
# http://a/b/c/d;p?q
# ../.. = http://a/
url = @base_url.merge('../..')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/', url.to_s)
url = @base_url.route_to('http://a/')
assert_kind_of(URI::Generic, url)
assert('../..' != url.to_s) # ok
assert_equal('../../', url.to_s)
# http://a/b/c/d;p?q
# ../../ = http://a/
url = @base_url.merge('../../')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/', url.to_s)
url = @base_url.route_to('http://a/')
assert_kind_of(URI::Generic, url)
assert_equal('../../', url.to_s)
# http://a/b/c/d;p?q
# ../../g = http://a/g
url = @base_url.merge('../../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/g', url.to_s)
url = @base_url.route_to('http://a/g')
assert_kind_of(URI::Generic, url)
assert_equal('../../g', url.to_s)
# http://a/b/c/d;p?q
# <> = (current document)
url = @base_url.merge('')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/d;p?q', url.to_s)
url = @base_url.route_to('http://a/b/c/d;p?q')
assert_kind_of(URI::Generic, url)
assert_equal('', url.to_s)
# http://a/b/c/d;p?q
# /./g = http://a/./g
url = @base_url.merge('/./g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/./g', url.to_s)
url = @base_url.route_to('http://a/./g')
assert_kind_of(URI::Generic, url)
assert_equal('/./g', url.to_s)
# http://a/b/c/d;p?q
# /../g = http://a/../g
url = @base_url.merge('/../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/../g', url.to_s)
url = @base_url.route_to('http://a/../g')
assert_kind_of(URI::Generic, url)
assert_equal('/../g', url.to_s)
# http://a/b/c/d;p?q
# g. = http://a/b/c/g.
url = @base_url.merge('g.')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g.', url.to_s)
url = @base_url.route_to('http://a/b/c/g.')
assert_kind_of(URI::Generic, url)
assert_equal('g.', url.to_s)
# http://a/b/c/d;p?q
# .g = http://a/b/c/.g
url = @base_url.merge('.g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/.g', url.to_s)
url = @base_url.route_to('http://a/b/c/.g')
assert_kind_of(URI::Generic, url)
assert_equal('.g', url.to_s)
# http://a/b/c/d;p?q
# g.. = http://a/b/c/g..
url = @base_url.merge('g..')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g..', url.to_s)
url = @base_url.route_to('http://a/b/c/g..')
assert_kind_of(URI::Generic, url)
assert_equal('g..', url.to_s)
# http://a/b/c/d;p?q
# ..g = http://a/b/c/..g
url = @base_url.merge('..g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/..g', url.to_s)
url = @base_url.route_to('http://a/b/c/..g')
assert_kind_of(URI::Generic, url)
assert_equal('..g', url.to_s)
# http://a/b/c/d;p?q
# ../../../g = http://a/../g
url = @base_url.merge('../../../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/../g', url.to_s)
url = @base_url.route_to('http://a/../g')
assert_kind_of(URI::Generic, url)
assert('../../../g' != url.to_s) # ok? yes, it confuses you
assert_equal('/../g', url.to_s) # and it is clearly
# http://a/b/c/d;p?q
# ../../../../g = http://a/../../g
url = @base_url.merge('../../../../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/../../g', url.to_s)
url = @base_url.route_to('http://a/../../g')
assert_kind_of(URI::Generic, url)
assert('../../../../g' != url.to_s) # ok? yes, it confuses you
assert_equal('/../../g', url.to_s) # and it is clearly
# http://a/b/c/d;p?q
# ./../g = http://a/b/g
url = @base_url.merge('./../g')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/g', url.to_s)
url = @base_url.route_to('http://a/b/g')
assert_kind_of(URI::Generic, url)
assert('./../g' != url.to_s) # ok
assert_equal('../g', url.to_s)
# http://a/b/c/d;p?q
# ./g/. = http://a/b/c/g/
url = @base_url.merge('./g/.')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g/', url.to_s)
url = @base_url.route_to('http://a/b/c/g/')
assert_kind_of(URI::Generic, url)
assert('./g/.' != url.to_s) # ok
assert_equal('g/', url.to_s)
# http://a/b/c/d;p?q
# g/./h = http://a/b/c/g/h
url = @base_url.merge('g/./h')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g/h', url.to_s)
url = @base_url.route_to('http://a/b/c/g/h')
assert_kind_of(URI::Generic, url)
assert('g/./h' != url.to_s) # ok
assert_equal('g/h', url.to_s)
# http://a/b/c/d;p?q
# g/../h = http://a/b/c/h
url = @base_url.merge('g/../h')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/h', url.to_s)
url = @base_url.route_to('http://a/b/c/h')
assert_kind_of(URI::Generic, url)
assert('g/../h' != url.to_s) # ok
assert_equal('h', url.to_s)
# http://a/b/c/d;p?q
# g;x=1/./y = http://a/b/c/g;x=1/y
url = @base_url.merge('g;x=1/./y')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g;x=1/y', url.to_s)
url = @base_url.route_to('http://a/b/c/g;x=1/y')
assert_kind_of(URI::Generic, url)
assert('g;x=1/./y' != url.to_s) # ok
assert_equal('g;x=1/y', url.to_s)
# http://a/b/c/d;p?q
# g;x=1/../y = http://a/b/c/y
url = @base_url.merge('g;x=1/../y')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/y', url.to_s)
url = @base_url.route_to('http://a/b/c/y')
assert_kind_of(URI::Generic, url)
assert('g;x=1/../y' != url.to_s) # ok
assert_equal('y', url.to_s)
# http://a/b/c/d;p?q
# g?y/./x = http://a/b/c/g?y/./x
url = @base_url.merge('g?y/./x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g?y/./x', url.to_s)
url = @base_url.route_to('http://a/b/c/g?y/./x')
assert_kind_of(URI::Generic, url)
assert_equal('g?y/./x', url.to_s)
# http://a/b/c/d;p?q
# g?y/../x = http://a/b/c/g?y/../x
url = @base_url.merge('g?y/../x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g?y/../x', url.to_s)
url = @base_url.route_to('http://a/b/c/g?y/../x')
assert_kind_of(URI::Generic, url)
assert_equal('g?y/../x', url.to_s)
# http://a/b/c/d;p?q
# g#s/./x = http://a/b/c/g#s/./x
url = @base_url.merge('g#s/./x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g#s/./x', url.to_s)
url = @base_url.route_to('http://a/b/c/g#s/./x')
assert_kind_of(URI::Generic, url)
assert_equal('g#s/./x', url.to_s)
# http://a/b/c/d;p?q
# g#s/../x = http://a/b/c/g#s/../x
url = @base_url.merge('g#s/../x')
assert_kind_of(URI::HTTP, url)
assert_equal('http://a/b/c/g#s/../x', url.to_s)
url = @base_url.route_to('http://a/b/c/g#s/../x')
assert_kind_of(URI::Generic, url)
assert_equal('g#s/../x', url.to_s)
# http://a/b/c/d;p?q
# http:g = http:g ; for validating parsers
# | http://a/b/c/g ; for backwards compatibility
url = @base_url.merge('http:g')
assert_kind_of(URI::HTTP, url)
assert_equal('http:g', url.to_s)
url = @base_url.route_to('http:g')
assert_kind_of(URI::Generic, url)
assert_equal('http:g', url.to_s)
end
def test_join
assert_equal(URI.parse('http://foo/bar'), URI.join('http://foo/bar'))
assert_equal(URI.parse('http://foo/bar'), URI.join('http://foo', 'bar'))
assert_equal(URI.parse('http://foo/bar/'), URI.join('http://foo', 'bar/'))
assert_equal(URI.parse('http://foo/baz'), URI.join('http://foo', 'bar', 'baz'))
assert_equal(URI.parse('http://foo/baz'), URI.join('http://foo', 'bar', '/baz'))
assert_equal(URI.parse('http://foo/baz/'), URI.join('http://foo', 'bar', '/baz/'))
assert_equal(URI.parse('http://foo/bar/baz'), URI.join('http://foo', 'bar/', 'baz'))
assert_equal(URI.parse('http://foo/hoge'), URI.join('http://foo', 'bar', 'baz', 'hoge'))
assert_equal(URI.parse('http://foo/bar/baz'), URI.join('http://foo', 'bar/baz'))
assert_equal(URI.parse('http://foo/bar/hoge'), URI.join('http://foo', 'bar/baz', 'hoge'))
assert_equal(URI.parse('http://foo/bar/baz/hoge'), URI.join('http://foo', 'bar/baz/', 'hoge'))
assert_equal(URI.parse('http://foo/hoge'), URI.join('http://foo', 'bar/baz', '/hoge'))
assert_equal(URI.parse('http://foo/bar/hoge'), URI.join('http://foo', 'bar/baz', 'hoge'))
assert_equal(URI.parse('http://foo/bar/baz/hoge'), URI.join('http://foo', 'bar/baz/', 'hoge'))
assert_equal(URI.parse('http://foo/hoge'), URI.join('http://foo', 'bar/baz', '/hoge'))
end
# ruby-dev:16728
def test_set_component
uri = URI.parse('http://foo:bar@baz')
assert_equal('oof', uri.user = 'oof')
assert_equal('http://oof:bar@baz', uri.to_s)
assert_equal('rab', uri.password = 'rab')
assert_equal('http://oof:rab@baz', uri.to_s)
assert_equal('foo', uri.userinfo = 'foo')
assert_equal('http://foo:rab@baz', uri.to_s)
assert_equal(['foo', 'bar'], uri.userinfo = ['foo', 'bar'])
assert_equal('http://foo:bar@baz', uri.to_s)
assert_equal(['foo'], uri.userinfo = ['foo'])
assert_equal('http://foo:bar@baz', uri.to_s)
assert_equal('zab', uri.host = 'zab')
assert_equal('http://foo:bar@zab', uri.to_s)
assert_equal(8080, uri.port = 8080)
assert_equal('http://foo:bar@zab:8080', uri.to_s)
assert_equal('/', uri.path = '/')
assert_equal('http://foo:bar@zab:8080/', uri.to_s)
assert_equal('a=1', uri.query = 'a=1')
assert_equal('http://foo:bar@zab:8080/?a=1', uri.to_s)
assert_equal('b123', uri.fragment = 'b123')
assert_equal('http://foo:bar@zab:8080/?a=1#b123', uri.to_s)
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestGeneric.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestGeneric.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end

73
test/uri/test_http.rb Normal file
View file

@ -0,0 +1,73 @@
require 'runit/testcase'
require 'runit/cui/testrunner'
require 'uri/http'
module URI
class Generic
def to_ary
component_ary
end
end
end
class TestHTTP < RUNIT::TestCase
def setup
end
def teardown
end
def test_parse
u = URI.parse('http://a')
assert_kind_of(URI::HTTP, u)
assert_equal(['http',
nil, 'a', URI::HTTP.default_port,
'', nil, nil], u.to_ary)
end
def test_normalize
host = 'aBcD'
u1 = URI.parse('http://' + host + '/eFg?HiJ')
u2 = URI.parse('http://' + host.downcase + '/eFg?HiJ')
assert(u1.normalize.host == 'abcd')
assert(u1.normalize.path == u1.path)
assert(u1.normalize == u2.normalize)
assert(!u1.normalize.host.equal?(u1.host))
assert( u2.normalize.host.equal?(u2.host))
assert_equal('http://abc/', URI.parse('http://abc').normalize.to_s)
end
def test_equal
assert(URI.parse('http://abc') == URI.parse('http://ABC'))
assert(URI.parse('http://abc/def') == URI.parse('http://ABC/def'))
assert(URI.parse('http://abc/def') != URI.parse('http://ABC/DEF'))
end
def test_request_uri
assert_equal('/', URI.parse('http://a.b.c/').request_uri)
assert_equal('/?abc=def', URI.parse('http://a.b.c/?abc=def').request_uri)
assert_equal('/', URI.parse('http://a.b.c').request_uri)
assert_equal('/?abc=def', URI.parse('http://a.b.c?abc=def').request_uri)
end
def test_select
assert_equal(['http', 'a.b.c', 80], URI.parse('http://a.b.c/').select(:scheme, :host, :port))
u = URI.parse('http://a.b.c/')
assert_equal(u.to_ary, u.select(*u.component))
assert_exception(ArgumentError) do
u.select(:scheme, :host, :not_exist, :port)
end
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestHTTP.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestHTTP.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end

118
test/uri/test_ldap.rb Normal file
View file

@ -0,0 +1,118 @@
#
# $Id$
#
# Copyright (c) 2001 Takaaki Tateishi <ttate@jaist.ac.jp> and
# akira yamada <akira@ruby-lang.org>.
# You can redistribute it and/or modify it under the same term as Ruby.
#
require 'runit/testcase'
require 'runit/cui/testrunner'
require 'uri/ldap'
module URI
class Generic
def to_ary
component_ary
end
end
end
class TestLDAP < RUNIT::TestCase
def setup
end
def teardown
end
def test_parse
url = 'ldap://ldap.jaist.ac.jp/o=JAIST,c=JP?sn?base?(sn=ttate*)'
u = URI.parse(url)
assert_kind_of(URI::LDAP, u)
assert_equal(url, u.to_s)
assert_equal('o=JAIST,c=JP', u.dn)
assert_equal('sn', u.attributes)
assert_equal('base', u.scope)
assert_equal('(sn=ttate*)', u.filter)
assert_equal(nil, u.extensions)
u.scope = URI::LDAP::SCOPE_SUB
u.attributes = 'sn,cn,mail'
assert_equal('ldap://ldap.jaist.ac.jp/o=JAIST,c=JP?sn,cn,mail?sub?(sn=ttate*)', u.to_s)
assert_equal('o=JAIST,c=JP', u.dn)
assert_equal('sn,cn,mail', u.attributes)
assert_equal('sub', u.scope)
assert_equal('(sn=ttate*)', u.filter)
assert_equal(nil, u.extensions)
# from RFC2255, section 6.
urls = {
'ldap:///o=University%20of%20Michigan,c=US' =>
['ldap', nil, URI::LDAP::DEFAULT_PORT,
'o=University%20of%20Michigan,c=US',
nil, nil, nil, nil],
'ldap://ldap.itd.umich.edu/o=University%20of%20Michigan,c=US' =>
['ldap', 'ldap.itd.umich.edu', URI::LDAP::DEFAULT_PORT,
'o=University%20of%20Michigan,c=US',
nil, nil, nil, nil],
'ldap://ldap.itd.umich.edu/o=University%20of%20Michigan,c=US?postalAddress' =>
['ldap', 'ldap.itd.umich.edu', URI::LDAP::DEFAULT_PORT,
'o=University%20of%20Michigan,c=US',
'postalAddress', nil, nil, nil],
'ldap://host.com:6666/o=University%20of%20Michigan,c=US??sub?(cn=Babs%20Jensen)' =>
['ldap', 'host.com', 6666,
'o=University%20of%20Michigan,c=US',
nil, 'sub', '(cn=Babs%20Jensen)', nil],
'ldap://ldap.itd.umich.edu/c=GB?objectClass?one' =>
['ldap', 'ldap.itd.umich.edu', URI::LDAP::DEFAULT_PORT,
'c=GB',
'objectClass', 'one', nil, nil],
'ldap://ldap.question.com/o=Question%3f,c=US?mail' =>
['ldap', 'ldap.question.com', URI::LDAP::DEFAULT_PORT,
'o=Question%3f,c=US',
'mail', nil, nil, nil],
'ldap://ldap.netscape.com/o=Babsco,c=US??(int=%5c00%5c00%5c00%5c04)' =>
['ldap', 'ldap.netscape.com', URI::LDAP::DEFAULT_PORT,
'o=Babsco,c=US',
nil, '(int=%5c00%5c00%5c00%5c04)', nil, nil],
'ldap:///??sub??bindname=cn=Manager%2co=Foo' =>
['ldap', nil, URI::LDAP::DEFAULT_PORT,
'',
nil, 'sub', nil, 'bindname=cn=Manager%2co=Foo'],
'ldap:///??sub??!bindname=cn=Manager%2co=Foo' =>
['ldap', nil, URI::LDAP::DEFAULT_PORT,
'',
nil, 'sub', nil, '!bindname=cn=Manager%2co=Foo'],
}.each do |url, ary|
u = URI.parse(url)
assert_equal(ary, u.to_ary)
end
end
def test_select
u = URI.parse('ldap:///??sub??!bindname=cn=Manager%2co=Foo')
assert_equal(u.to_ary, u.select(*u.component))
assert_exception(ArgumentError) do
u.select(:scheme, :host, :not_exist, :port)
end
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestLDAP.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestLDAP.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end

139
test/uri/test_mailto.rb Normal file
View file

@ -0,0 +1,139 @@
#
# $Id$
#
# Copyright (c) 2001 akira yamada <akira@ruby-lang.org>
# You can redistribute it and/or modify it under the same term as Ruby.
#
require 'runit/testcase'
require 'runit/cui/testrunner'
require 'uri/mailto'
module URI
class Generic
def to_ary
component_ary
end
end
end
class TestMailTo < RUNIT::TestCase
def setup
@u = URI::MailTo
end
def teardown
end
def test_build
ok = []
bad = []
# RFC2368, 6. Examples
# mailto:chris@example.com
ok << ["mailto:chris@example.com"]
ok[-1] << ["chris@example.com", nil]
ok[-1] << {:to => "chris@example.com"}
# mailto:infobot@example.com?subject=current-issue
ok << ["mailto:infobot@example.com?subject=current-issue"]
ok[-1] << ["infobot@example.com", ["subject=current-issue"]]
ok[-1] << {:to => "infobot@example.com",
:headers => ["subject=current-issue"]}
# mailto:infobot@example.com?body=send%20current-issue
ok << ["mailto:infobot@example.com?body=send%20current-issue"]
ok[-1] << ["infobot@example.com", ["body=send%20current-issue"]]
ok[-1] << {:to => "infobot@example.com",
:headers => ["body=send%20current-issue"]}
# mailto:infobot@example.com?body=send%20current-issue%0D%0Asend%20index
ok << ["mailto:infobot@example.com?body=send%20current-issue%0D%0Asend%20index"]
ok[-1] << ["infobot@example.com",
["body=send%20current-issue%0D%0Asend%20index"]]
ok[-1] << {:to => "infobot@example.com",
:headers => ["body=send%20current-issue%0D%0Asend%20index"]}
# mailto:foobar@example.com?In-Reply-To=%3c3469A91.D10AF4C@example.com
ok << ["mailto:foobar@example.com?In-Reply-To=%3c3469A91.D10AF4C@example.com"]
ok[-1] << ["foobar@example.com",
["In-Reply-To=%3c3469A91.D10AF4C@example.com"]]
ok[-1] << {:to => "foobar@example.com",
:headers => ["In-Reply-To=%3c3469A91.D10AF4C@example.com"]}
# mailto:majordomo@example.com?body=subscribe%20bamboo-l
ok << ["mailto:majordomo@example.com?body=subscribe%20bamboo-l"]
ok[-1] << ["majordomo@example.com", ["body=subscribe%20bamboo-l"]]
ok[-1] << {:to => "majordomo@example.com",
:headers => ["body=subscribe%20bamboo-l"]}
# mailto:joe@example.com?cc=bob@example.com&body=hello
ok << ["mailto:joe@example.com?cc=bob@example.com&body=hello"]
ok[-1] << ["joe@example.com", ["cc=bob@example.com", "body=hello"]]
ok[-1] << {:to => "joe@example.com",
:headers => ["cc=bob@example.com", "body=hello"]}
# mailto:?to=joe@example.com&cc=bob@example.com&body=hello
ok << ["mailto:?to=joe@example.com&cc=bob@example.com&body=hello"]
ok[-1] << [nil,
["to=joe@example.com", "cc=bob@example.com", "body=hello"]]
ok[-1] << {:headers => ["to=joe@example.com",
"cc=bob@example.com", "body=hello"]}
# mailto:gorby%25kremvax@example.com
ok << ["mailto:gorby%25kremvax@example.com"]
ok[-1] << ["gorby%25kremvax@example.com", nil]
ok[-1] << {:to => "gorby%25kremvax@example.com"}
# mailto:unlikely%3Faddress@example.com?blat=foop
ok << ["mailto:unlikely%3Faddress@example.com?blat=foop"]
ok[-1] << ["unlikely%3Faddress@example.com", ["blat=foop"]]
ok[-1] << {:to => "unlikely%3Faddress@example.com",
:headers => ["blat=foop"]}
ok_all = ok.flatten.join("\0")
# mailto:joe@example.com?cc=bob@example.com?body=hello ; WRONG!
bad << ["joe@example.com", ["cc=bob@example.com?body=hello"]]
# mailto:javascript:alert()
bad << ["javascript:alert()", []]
# '=' which is in hname or hvalue is wrong.
bad << ["foo@example.jp?subject=1+1=2", []]
ok.each do |x|
assert_equal(x[0],
@u.build(x[1]).to_s)
assert_equal(x[0],
@u.build(x[2]).to_s)
end
bad.each do |x|
assert_exception(URI::InvalidComponentError) {
@u.build(x)
}
end
assert_equal(ok_all, ok.flatten.join("\0"))
end
def test_select
u = URI.parse('mailto:joe@example.com?cc=bob@example.com&body=hello')
assert_equal(u.to_ary, u.select(*u.component))
assert_exception(ArgumentError) do
u.select(:scheme, :host, :not_exist, :port)
end
end
end
if $0 == __FILE__
if ARGV.size == 0
suite = TestMailTo.suite
else
suite = RUNIT::TestSuite.new
ARGV.each do |testmethod|
suite.add_test(TestMailTo.new(testmethod))
end
end
RUNIT::CUI::TestRunner.run(suite)
end