1 files changed, 122 insertions, 0 deletions
diff --git a/trunk/test/ruby/test_file.rb b/trunk/test/ruby/test_file.rb
new file mode 100644
index 0000000000..f6fcf89a14
--- /dev/null
+++ b/trunk/test/ruby/test_file.rb
@@ -0,0 +1,122 @@
+require 'test/unit'
+require 'tempfile'
+require_relative '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
+    Dir.mktmpdir('rubytest-file') {|tmpdir|
+      filename = tmpdir + '/' + 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_truncate_wbuf
+    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), "[ruby-dev:24191]")
+  end
+
+  def test_truncate_rbuf
+    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, "[ruby-dev:24197]")
+  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.chr }
+    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
+
+  def test_s_chown
+    assert_nothing_raised { File.chown -1, -1 }
+    assert_nothing_raised { File.chown nil, nil }
+  end
+
+  def test_chown
+    assert_nothing_raised {
+      File.open(__FILE__) {|f| f.chown -1, -1 }
+    }
+    assert_nothing_raised("[ruby-dev:27140]") {
+      File.open(__FILE__) {|f| f.chown nil, nil }
+    }
+  end
+
+  def test_uninitialized
+    assert_raise(TypeError) { File::Stat.allocate.readable? }
+    assert_nothing_raised { File::Stat.allocate.inspect }
+  end
+end