1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
require 'test/unit'
class TestPath < Test::Unit::TestCase
def test_path
assert_equal("a", File.basename("a"))
assert_equal("b", File.basename("a/b"))
assert_equal("b", File.basename("a/b/"))
assert_equal("/", File.basename("/"))
assert_equal("/", File.basename("//"))
assert_equal("/", File.basename("///"))
assert_equal("b", File.basename("a/b////"))
assert_equal("a", File.basename("a.rb", ".rb"))
assert_equal("a", File.basename("a.rb///", ".rb"))
assert_equal("a", File.basename("a.rb///", ".*"))
assert_equal("a.rb", File.basename("a.rb///", ".c"))
assert_equal(".", File.dirname("a"))
assert_equal("/", File.dirname("/"))
assert_equal("/", File.dirname("/a"))
assert_equal("a", File.dirname("a/b"))
assert_equal("a/b", File.dirname("a/b/c"))
assert_equal("/a/b", File.dirname("/a/b/c"))
assert_equal("/a", File.dirname("/a/b/"))
assert_equal("/a", File.dirname("/a/b///"))
case Dir.pwd
when %r'\A\w:'
assert_match(/\A\w:\/\z/, File.expand_path(".", "/"))
assert_match(/\A\w:\/a\z/, File.expand_path("a", "/"))
dosish = true
when %r'\A//'
assert_match(%r'\A//[^/]+/[^/]+\z', File.expand_path(".", "/"))
assert_match(%r'\A//[^/]+/[^/]+/a\z', File.expand_path(".", "/"))
dosish = true
else
assert_equal("/", File.expand_path(".", "/"))
assert_equal("/sub", File.expand_path("sub", "/"))
end
if dosish
assert_equal("//machine/share", File.expand_path("/", "//machine/share/sub"))
assert_equal("//machine/share/dir", File.expand_path("/dir", "//machine/share/sub"))
assert_equal("z:/", File.expand_path("/", "z:/sub"))
assert_equal("z:/dir", File.expand_path("/dir", "z:/sub"))
end
assert_equal("//", File.expand_path(".", "//"))
assert_equal("//sub", File.expand_path("sub", "//"))
end
def test_dirname_special # [ruby-dev:27738]
if /(bcc|ms)win\d|mingw|cygwin|djgpp|human|emx/ =~ RUBY_PLATFORM
# DOSISH_DRIVE_LETTER
assert_equal('C:.', File.dirname('C:'))
assert_equal('C:.', File.dirname('C:a'))
assert_equal('C:.', File.dirname('C:a/'))
assert_equal('C:a', File.dirname('C:a/b'))
assert_equal('C:/', File.dirname('C:/'))
assert_equal('C:/', File.dirname('C://'))
assert_equal('C:/', File.dirname('C:///'))
assert_equal('C:/', File.dirname('C:/a'))
assert_equal('C:/', File.dirname('C://a'))
assert_equal('C:/', File.dirname('C:///a'))
assert_equal('C:/', File.dirname('C:/a/'))
assert_equal('C:/', File.dirname('C://a/'))
assert_equal('C:/', File.dirname('C:///a/'))
assert_equal('C:/a', File.dirname('C:/a/b'))
assert_equal('C:/a', File.dirname('C://a/b'))
assert_equal('C:/a', File.dirname('C:///a/b'))
else
# others
assert_equal('.', File.dirname('C:'))
assert_equal('.', File.dirname('C:a'))
assert_equal('.', File.dirname('C:a/'))
assert_equal('C:a', File.dirname('C:a/b'))
assert_equal('.', File.dirname('C:/'))
assert_equal('.', File.dirname('C://'))
assert_equal('.', File.dirname('C:///'))
assert_equal('C:', File.dirname('C:/a'))
assert_equal('C:', File.dirname('C://a'))
assert_equal('C:', File.dirname('C:///a'))
assert_equal('C:', File.dirname('C:/a/'))
assert_equal('C:', File.dirname('C://a/'))
assert_equal('C:', File.dirname('C:///a/'))
assert_equal('C:/a', File.dirname('C:/a/b'))
# these show current implementation, but they are not spec.
#assert_equal('C://a', File.dirname('C://a/b'))
#assert_equal('C:///a', File.dirname('C:///a/b'))
end
assert_equal('.', File.dirname(''))
assert_equal('.', File.dirname('a'))
assert_equal('.', File.dirname('a/'))
assert_equal('a', File.dirname('a/b'))
assert_equal('/', File.dirname('/'))
assert_equal('/', File.dirname('/a'))
assert_equal('/', File.dirname('/a/'))
assert_equal('/a', File.dirname('/a/b'))
if /(bcc|ms|cyg)win|mingw|djgpp|human|emx/ =~ RUBY_PLATFORM
# DOSISH_UNC
assert_equal('//', File.dirname('//'))
assert_equal('//', File.dirname('//a'))
assert_equal('//', File.dirname('//a/'))
assert_equal('//a', File.dirname('//a/b'))
assert_equal('//', File.dirname('///'))
assert_equal('//', File.dirname('///a'))
assert_equal('//', File.dirname('///a/'))
assert_equal('//a', File.dirname('///a/b'))
else
# others
assert_equal('/', File.dirname('//'))
assert_equal('/', File.dirname('//a'))
assert_equal('/', File.dirname('//a/'))
assert_equal('/a', File.dirname('//a/b'))
assert_equal('/', File.dirname('///'))
assert_equal('/', File.dirname('///a'))
assert_equal('/', File.dirname('///a/'))
assert_equal('/a', File.dirname('///a/b'))
end
end
end
|