294 lines
10 KiB
Ruby
294 lines
10 KiB
Ruby
require 'test/unit'
|
|
require 'tempfile'
|
|
require 'ut_eof'
|
|
|
|
class TestFile < Test::Unit::TestCase
|
|
|
|
# I don't know Ruby's spec about "unlink-before-close" exactly.
|
|
# This test asserts current behaviour.
|
|
def test_unlink_before_close
|
|
filename = File.basename(__FILE__) + ".#{$$}"
|
|
w = File.open(filename, "w")
|
|
w << "foo"
|
|
w.close
|
|
r = File.open(filename, "r")
|
|
begin
|
|
if /(mswin|bccwin|mingw|emx)/ =~ RUBY_PLATFORM
|
|
assert_raise(Errno::EACCES) {File.unlink(filename)}
|
|
else
|
|
assert_nothing_raised {File.unlink(filename)}
|
|
end
|
|
ensure
|
|
r.close
|
|
File.unlink(filename) if File.exist?(filename)
|
|
end
|
|
end
|
|
|
|
include TestEOF
|
|
def open_file(content)
|
|
f = Tempfile.new("test-eof")
|
|
f << content
|
|
f.rewind
|
|
yield f
|
|
end
|
|
alias open_file_rw open_file
|
|
|
|
include TestEOF::Seek
|
|
|
|
def test_fnmatch
|
|
# from [ruby-dev:22815] and [ruby-dev:22819]
|
|
assert(File.fnmatch('\[1\]' , '[1]'))
|
|
assert(File.fnmatch('*?', 'a'))
|
|
assert(File.fnmatch('*/', 'a/'))
|
|
assert(File.fnmatch('\[1\]' , '[1]', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('*?', 'a', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('*/', 'a/', File::FNM_PATHNAME))
|
|
# text
|
|
assert(File.fnmatch('cat', 'cat'))
|
|
assert(!File.fnmatch('cat', 'category'))
|
|
assert(!File.fnmatch('cat', 'wildcat'))
|
|
# '?' matches any one character
|
|
assert(File.fnmatch('?at', 'cat'))
|
|
assert(File.fnmatch('c?t', 'cat'))
|
|
assert(File.fnmatch('ca?', 'cat'))
|
|
assert(File.fnmatch('?a?', 'cat'))
|
|
assert(!File.fnmatch('c??t', 'cat'))
|
|
assert(!File.fnmatch('??at', 'cat'))
|
|
assert(!File.fnmatch('ca??', 'cat'))
|
|
# '*' matches any number (including 0) of any characters
|
|
assert(File.fnmatch('c*', 'cats'))
|
|
assert(File.fnmatch('c*ts', 'cats'))
|
|
assert(File.fnmatch('*ts', 'cats'))
|
|
assert(File.fnmatch('*c*a*t*s*', 'cats'))
|
|
assert(!File.fnmatch('c*t', 'cats'))
|
|
assert(!File.fnmatch('*abc', 'abcabz'))
|
|
assert(File.fnmatch('*abz', 'abcabz'))
|
|
assert(!File.fnmatch('a*abc', 'abc'))
|
|
assert(File.fnmatch('a*bc', 'abc'))
|
|
assert(!File.fnmatch('a*bc', 'abcd'))
|
|
# matches any character listed between bracket
|
|
assert(File.fnmatch('ca[np]', 'can'))
|
|
assert(File.fnmatch('ca[np]', 'cap'))
|
|
assert(!File.fnmatch('ca[np]', 'cat'))
|
|
assert(File.fnmatch('ca[a-or-z]', 'can'))
|
|
assert(!File.fnmatch('ca[a-or-z]', 'cap'))
|
|
assert(File.fnmatch('ca[a-or-z]', 'cat'))
|
|
s = "[bd-gikl-mosv-x]"
|
|
assert(!File.fnmatch(s, 'a'))
|
|
assert(File.fnmatch(s, 'b'))
|
|
assert(!File.fnmatch(s, 'c'))
|
|
assert(File.fnmatch(s, 'd'))
|
|
assert(File.fnmatch(s, 'e'))
|
|
assert(File.fnmatch(s, 'f'))
|
|
assert(File.fnmatch(s, 'g'))
|
|
assert(!File.fnmatch(s, 'h'))
|
|
assert(File.fnmatch(s, 'i'))
|
|
assert(!File.fnmatch(s, 'j'))
|
|
assert(File.fnmatch(s, 'k'))
|
|
assert(File.fnmatch(s, 'l'))
|
|
assert(File.fnmatch(s, 'm'))
|
|
assert(!File.fnmatch(s, 'n'))
|
|
assert(File.fnmatch(s, 'o'))
|
|
assert(!File.fnmatch(s, 'p'))
|
|
assert(!File.fnmatch(s, 'q'))
|
|
assert(!File.fnmatch(s, 'r'))
|
|
assert(File.fnmatch(s, 's'))
|
|
assert(!File.fnmatch(s, 't'))
|
|
assert(!File.fnmatch(s, 'u'))
|
|
assert(File.fnmatch(s, 'v'))
|
|
assert(File.fnmatch(s, 'w'))
|
|
assert(File.fnmatch(s, 'x'))
|
|
assert(!File.fnmatch(s, 'y'))
|
|
assert(!File.fnmatch(s, 'z'))
|
|
# matches any character except those listed between bracket
|
|
assert(File.fnmatch('ca[!pt]', 'can'))
|
|
assert(!File.fnmatch('ca[!pt]', 'cap'))
|
|
assert(!File.fnmatch('ca[!pt]', 'cat'))
|
|
assert(!File.fnmatch('ca[!a-or-z]', 'can'))
|
|
assert(File.fnmatch('ca[!a-or-z]', 'cap'))
|
|
assert(!File.fnmatch('ca[!a-or-z]', 'cat'))
|
|
assert(File.fnmatch('ca[^pt]', 'can'))
|
|
assert(!File.fnmatch('ca[^pt]', 'cap'))
|
|
assert(!File.fnmatch('ca[^pt]', 'cat'))
|
|
assert(!File.fnmatch('ca[^a-or-z]', 'can'))
|
|
assert(File.fnmatch('ca[^a-or-z]', 'cap'))
|
|
assert(!File.fnmatch('ca[^a-or-z]', 'cat'))
|
|
s = "[^bd-gikl-mosv-x]"
|
|
assert(File.fnmatch(s, 'a'))
|
|
assert(!File.fnmatch(s, 'b'))
|
|
assert(File.fnmatch(s, 'c'))
|
|
assert(!File.fnmatch(s, 'd'))
|
|
assert(!File.fnmatch(s, 'e'))
|
|
assert(!File.fnmatch(s, 'f'))
|
|
assert(!File.fnmatch(s, 'g'))
|
|
assert(File.fnmatch(s, 'h'))
|
|
assert(!File.fnmatch(s, 'i'))
|
|
assert(File.fnmatch(s, 'j'))
|
|
assert(!File.fnmatch(s, 'k'))
|
|
assert(!File.fnmatch(s, 'l'))
|
|
assert(!File.fnmatch(s, 'm'))
|
|
assert(File.fnmatch(s, 'n'))
|
|
assert(!File.fnmatch(s, 'o'))
|
|
assert(File.fnmatch(s, 'p'))
|
|
assert(File.fnmatch(s, 'q'))
|
|
assert(File.fnmatch(s, 'r'))
|
|
assert(!File.fnmatch(s, 's'))
|
|
assert(File.fnmatch(s, 't'))
|
|
assert(File.fnmatch(s, 'u'))
|
|
assert(!File.fnmatch(s, 'v'))
|
|
assert(!File.fnmatch(s, 'w'))
|
|
assert(!File.fnmatch(s, 'x'))
|
|
assert(File.fnmatch(s, 'y'))
|
|
assert(File.fnmatch(s, 'z'))
|
|
s = "[!bd-gikl-mosv-x]"
|
|
assert(File.fnmatch(s, 'a'))
|
|
assert(!File.fnmatch(s, 'b'))
|
|
assert(File.fnmatch(s, 'c'))
|
|
assert(!File.fnmatch(s, 'd'))
|
|
assert(!File.fnmatch(s, 'e'))
|
|
assert(!File.fnmatch(s, 'f'))
|
|
assert(!File.fnmatch(s, 'g'))
|
|
assert(File.fnmatch(s, 'h'))
|
|
assert(!File.fnmatch(s, 'i'))
|
|
assert(File.fnmatch(s, 'j'))
|
|
assert(!File.fnmatch(s, 'k'))
|
|
assert(!File.fnmatch(s, 'l'))
|
|
assert(!File.fnmatch(s, 'm'))
|
|
assert(File.fnmatch(s, 'n'))
|
|
assert(!File.fnmatch(s, 'o'))
|
|
assert(File.fnmatch(s, 'p'))
|
|
assert(File.fnmatch(s, 'q'))
|
|
assert(File.fnmatch(s, 'r'))
|
|
assert(!File.fnmatch(s, 's'))
|
|
assert(File.fnmatch(s, 't'))
|
|
assert(File.fnmatch(s, 'u'))
|
|
assert(!File.fnmatch(s, 'v'))
|
|
assert(!File.fnmatch(s, 'w'))
|
|
assert(!File.fnmatch(s, 'x'))
|
|
assert(File.fnmatch(s, 'y'))
|
|
assert(File.fnmatch(s, 'z'))
|
|
# escaping character
|
|
assert(File.fnmatch('\?', '?'))
|
|
assert(!File.fnmatch('\?', '\?'))
|
|
assert(!File.fnmatch('\?', 'a'))
|
|
assert(!File.fnmatch('\?', '\a'))
|
|
assert(File.fnmatch('\*', '*'))
|
|
assert(!File.fnmatch('\*', '\*'))
|
|
assert(!File.fnmatch('\*', 'cats'))
|
|
assert(!File.fnmatch('\*', '\cats'))
|
|
assert(File.fnmatch('\a', 'a'))
|
|
assert(!File.fnmatch('\a', '\a'))
|
|
assert(File.fnmatch('[a\-c]', 'a'))
|
|
assert(File.fnmatch('[a\-c]', '-'))
|
|
assert(File.fnmatch('[a\-c]', 'c'))
|
|
assert(!File.fnmatch('[a\-c]', 'b'))
|
|
assert(!File.fnmatch('[a\-c]', '\\'))
|
|
# escaping character loses its meaning if FNM_NOESCAPE is set
|
|
assert(!File.fnmatch('\?', '?', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('\?', '\?', File::FNM_NOESCAPE))
|
|
assert(!File.fnmatch('\?', 'a', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('\?', '\a', File::FNM_NOESCAPE))
|
|
assert(!File.fnmatch('\*', '*', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('\*', '\*', File::FNM_NOESCAPE))
|
|
assert(!File.fnmatch('\*', 'cats', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('\*', '\cats', File::FNM_NOESCAPE))
|
|
assert(!File.fnmatch('\a', 'a', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('\a', '\a', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('[a\-c]', 'a', File::FNM_NOESCAPE))
|
|
assert(!File.fnmatch('[a\-c]', '-', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('[a\-c]', 'c', File::FNM_NOESCAPE))
|
|
assert(File.fnmatch('[a\-c]', 'b', File::FNM_NOESCAPE)) # '\\' < 'b' < 'c'
|
|
assert(File.fnmatch('[a\-c]', '\\', File::FNM_NOESCAPE))
|
|
# case is ignored if FNM_CASEFOLD is set
|
|
assert(!File.fnmatch('cat', 'CAT'))
|
|
assert(File.fnmatch('cat', 'CAT', File::FNM_CASEFOLD))
|
|
assert(!File.fnmatch('[a-z]', 'D'))
|
|
assert(File.fnmatch('[a-z]', 'D', File::FNM_CASEFOLD))
|
|
# wildcard doesn't match '/' if FNM_PATHNAME is set
|
|
assert(File.fnmatch('foo?boo', 'foo/boo'))
|
|
assert(File.fnmatch('foo*', 'foo/boo'))
|
|
assert(!File.fnmatch('foo?boo', 'foo/boo', File::FNM_PATHNAME))
|
|
assert(!File.fnmatch('foo*', 'foo/boo', File::FNM_PATHNAME))
|
|
# wildcard matches leading period if FNM_DOTMATCH is set
|
|
assert(!File.fnmatch('*', '.profile'))
|
|
assert(File.fnmatch('*', '.profile', File::FNM_DOTMATCH))
|
|
assert(File.fnmatch('.*', '.profile'))
|
|
assert(File.fnmatch('*', 'dave/.profile'))
|
|
assert(File.fnmatch('*/*', 'dave/.profile'))
|
|
assert(!File.fnmatch('*/*', 'dave/.profile', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('*/*', 'dave/.profile', File::FNM_PATHNAME | File::FNM_DOTMATCH))
|
|
# recursive matching
|
|
assert(File.fnmatch('**/foo', 'a/b/c/foo', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('**/foo', '/foo', File::FNM_PATHNAME))
|
|
assert(!File.fnmatch('**/foo', 'a/.b/c/foo', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('**/foo', 'a/.b/c/foo', File::FNM_PATHNAME | File::FNM_DOTMATCH))
|
|
assert(File.fnmatch('**/foo', '/root/foo', File::FNM_PATHNAME))
|
|
assert(File.fnmatch('**/foo', 'c:/root/foo', File::FNM_PATHNAME))
|
|
end
|
|
|
|
def test_truncate_wbuf # [ruby-dev:24191]
|
|
f = Tempfile.new("test-truncate")
|
|
f.print "abc"
|
|
f.truncate(0)
|
|
f.print "def"
|
|
f.close
|
|
assert_equal("\0\0\0def", File.read(f.path))
|
|
end
|
|
|
|
def test_truncate_rbuf # [ruby-dev:24197]
|
|
f = Tempfile.new("test-truncate")
|
|
f.puts "abc"
|
|
f.puts "def"
|
|
f.close
|
|
f.open
|
|
assert_equal("abc\n", f.gets)
|
|
f.truncate(3)
|
|
assert_equal(nil, f.gets)
|
|
end
|
|
|
|
def test_truncate_beyond_eof
|
|
f = Tempfile.new("test-truncate")
|
|
f.print "abc"
|
|
f.truncate 10
|
|
assert_equal("\0" * 7, f.read(100), "[ruby-dev:24532]")
|
|
end
|
|
|
|
def test_read_all_extended_file
|
|
f = Tempfile.new("test-extended-file")
|
|
assert_nil(f.getc)
|
|
open(f.path, "w") {|g| g.print "a" }
|
|
assert_equal("a", f.read)
|
|
end
|
|
|
|
def test_gets_extended_file
|
|
f = Tempfile.new("test-extended-file")
|
|
assert_nil(f.getc)
|
|
open(f.path, "w") {|g| g.print "a" }
|
|
assert_equal("a", f.gets("a"))
|
|
end
|
|
|
|
def test_gets_para_extended_file
|
|
f = Tempfile.new("test-extended-file")
|
|
assert_nil(f.getc)
|
|
open(f.path, "w") {|g| g.print "\na" }
|
|
assert_equal("a", f.gets(""))
|
|
end
|
|
|
|
def test_each_byte_extended_file
|
|
f = Tempfile.new("test-extended-file")
|
|
assert_nil(f.getc)
|
|
open(f.path, "w") {|g| g.print "a" }
|
|
result = []
|
|
f.each_byte {|b| result << b }
|
|
assert_equal([?a], result)
|
|
end
|
|
|
|
def test_getc_extended_file
|
|
f = Tempfile.new("test-extended-file")
|
|
assert_nil(f.getc)
|
|
open(f.path, "w") {|g| g.print "a" }
|
|
assert_equal(?a, f.getc)
|
|
end
|
|
|
|
end
|