2003-09-26 16:00:03 -04:00
|
|
|
require 'test/unit'
|
2003-12-04 21:54:48 -05:00
|
|
|
require 'tempfile'
|
|
|
|
require 'ut_eof'
|
2003-09-26 16:00:03 -04:00
|
|
|
|
|
|
|
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
|
* gc.c (Init_stack): stack region is far smaller than usual if
pthread is used.
* marshal.c (w_extended): singleton methods should not be checked
when dumping via marshal_dump() or _dump(). [ruby-talk:85909]
* file.c (getcwdofdrv): avoid using getcwd() directly, use
my_getcwd() instead.
* merged NeXT, OpenStep, Rhapsody ports patch from Eric Sunshine
<sunshine@sunshineco.com>. [ruby-core:01596]
* marshal.c (w_object): LINK check earlier than anything else,
i.e. do not dump TYPE_IVAR for already dumped objects.
(ruby-bugs PR#1220)
* eval.c (rb_eval): call "inherited" only when a new class is
generated; not on reopening.
* eval.c (eval): prepend error position in evaluating string to
* configure.in: revived NextStep, OpenStep, and Rhapsody ports which
had become unbuildable; enhanced --enable-fat-binary option so that
it accepts a list of desired architectures (rather than assuming a
fixed list), or defaults to a platform-appropriate list if user does
not provide an explicit list; made the default list of architectures
for MAB (fat binary) more comprehensive; now uses -fno-common even
when building the interpreter (in addition to using it for
extensions), thus allowing the interpreter to be embedded into a
plugin module of an external project (in addition to allowing
embedding directly into an application); added checks for
<netinet/in_systm.h> (needed by `socket' extension) and getcwd(); now
ensures that -I/usr/local/include is employed when extensions'
extconf.rb scripts invoke have_header() since extension checks on
NextStep and OpenStep will fail without it if the desired resource
resides in the /usr/local tree; fixed formatting of --help message.
* Makefile.in: $(LIBRUBY_A) rule now deletes the archive before
invoking $(AR) since `ar' on Apple/NeXT can not "update" MAB archives
(see configure's --enable-fat-binary option); added rule for new
missing/getcwd.c.
* defines.h: fixed endian handling during MAB build (see configure's
--enable-fat-binary option) to ensure that all portions of the
project see the correct WORDS_BIGENDIAN value (some extension modules
were getting the wrong endian setting); added missing constants
GETPGRP_VOID, WNOHANG, WUNTRACED, X_OK, and type pid_t for NextStep
and OpenStep; removed unnecessary and problematic HAVE_SYS_WAIT_H
define in NeXT section.
* dir.c: do not allow NAMLEN() macro to trust dirent::d_namlen on
NextStep since, on some installations, this value always resolves
uselessly to zero.
* dln.c: added error reporting to NextStep extension loader since the
previous behavior of failing silently was not useful; now ensures
that NSLINKMODULE_OPTION_BINDNOW compatibility constant is defined
for OpenStep and Rhapsody; no longer includes <mach-o/dyld.h> twice
on Rhapsody since this header lacks multiple-include protection,
which resulted in "redefinition" compilation errors.
* main.c: also create hard reference to objc_msgSend() on NeXT
platforms (in addition to Apple platforms).
* lib/mkmf.rb: now exports XCFLAGS from configure script to extension
makefiles so that extensions can be built MAB (see configure's
--enable-fat-binary option); also utilize XCFLAGS in cc_command()
(but not cpp_command() because MAB flags are incompatible with
direct invocation of `cpp').
* ext/curses/extconf.rb: now additionally checks for presence of these
curses functions which are not present on NextStep or Openstep:
bkgd(), bkgdset(), color(), curs(), getbkgd(), init(), scrl(), set(),
setscrreg(), wattroff(), wattron(), wattrset(), wbkgd(), wbkgdset(),
wscrl(), wsetscrreg()
* ext/curses/curses.c: added appropriate #ifdef's for additional set of
curses functions now checked by extconf.rb; fixed curses_bkgd() and
window_bkgd() to correctly return boolean result rather than numeric
result; fixed window_getbkgd() to correctly signal an error by
returning nil rather than -1.
* ext/etc/etc.c: setup_passwd() and setup_group() now check for null
pointers before invoking rb_tainted_str_new2() upon fields extracted
from `struct passwd' and `struct group' since null pointers in some
fields are common on NextStep/OpenStep (especially so for the
`pw_comment' field) and rb_tainted_str_new2() throws an exception
when it receives a null pointer.
* ext/pty/pty.c: include "util.h" for strdup()/ruby_strdup() for
platforms such as NextStep and OpenStep which lack strdup().
* ext/socket/getaddrinfo.c: cast first argument of getservbyname(),
gethostbyaddr(), and gethostbyname() from (const char*) to non-const
(char*) for older platforms such as NextStep and OpenStep.
* ext/socket/socket.c: include "util.h" for strdup()/ruby_strdup() for
platforms such as NextStep and OpenStep which lack strdup(); include
<netinet/in_systm.h> if present for NextStep and OpenStep; cast first
argument of gethostbyaddr() and getservbyname() from (const char*) to
non-const (char*) for older platforms.
* ext/syslog/syslog.c: include "util.h" for strdup()/ruby_strdup() for
platforms such as NextStep and OpenStep which lack strdup().
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@5002 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2003-11-21 23:00:03 -05:00
|
|
|
if /(mswin|bccwin|mingw|emx)/ =~ RUBY_PLATFORM
|
2004-02-24 04:03:19 -05:00
|
|
|
assert_raise(Errno::EACCES) {File.unlink(filename)}
|
2003-09-26 16:00:03 -04:00
|
|
|
else
|
2004-02-24 04:03:19 -05:00
|
|
|
assert_nothing_raised {File.unlink(filename)}
|
2003-09-26 16:00:03 -04:00
|
|
|
end
|
|
|
|
ensure
|
|
|
|
r.close
|
|
|
|
File.unlink(filename) if File.exist?(filename)
|
|
|
|
end
|
|
|
|
end
|
2003-12-04 21:54:48 -05:00
|
|
|
|
|
|
|
include TestEOF
|
|
|
|
def open_file(content)
|
|
|
|
f = Tempfile.new("test-eof")
|
|
|
|
f << content
|
|
|
|
f.rewind
|
|
|
|
yield f
|
|
|
|
end
|
2003-12-09 00:33:32 -05:00
|
|
|
alias open_file_rw open_file
|
2003-12-10 03:16:14 -05:00
|
|
|
|
|
|
|
include TestEOF::Seek
|
2004-02-08 01:52:45 -05:00
|
|
|
|
2004-09-07 01:32:26 -04:00
|
|
|
def test_truncate_wbuf # [ruby-dev:24191]
|
|
|
|
f = Tempfile.new("test-truncate")
|
2004-11-11 02:56:38 -05:00
|
|
|
f.print "abc"
|
2004-09-07 01:32:26 -04:00
|
|
|
f.truncate(0)
|
2004-11-11 02:56:38 -05:00
|
|
|
f.print "def"
|
2004-09-07 01:32:26 -04:00
|
|
|
f.close
|
2004-11-11 02:56:38 -05:00
|
|
|
assert_equal("\0\0\0def", File.read(f.path))
|
2004-09-07 01:32:26 -04:00
|
|
|
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
|
2005-05-12 05:04:49 -04:00
|
|
|
|
|
|
|
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
|
|
|
|
|
2005-09-22 17:01:58 -04:00
|
|
|
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 }
|
|
|
|
}
|
|
|
|
# [ruby-dev:27140]
|
|
|
|
assert_nothing_raised {
|
|
|
|
File.open(__FILE__) {|f| f.chown nil, nil }
|
|
|
|
}
|
|
|
|
end
|
|
|
|
|
2003-09-26 16:00:03 -04:00
|
|
|
end
|