admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

more tests.

Browse Source
This commit is contained in:
Tomoyuki Sahara
2014-04-21 10:02:25 +09:00
parent e5f30f83ce
commit c46cb1b5eb
4 changed files with 102 additions and 66 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/file.rb
+2 -2
View File
@@ -23,7 +23,7 @@ end
assert('File#path', '15.2.21.4.2') do
io = File.open($mrbtest_io_rfname, "r")
assert_equal $mrbtest_io_msg + "\n", io.read
assert_equal $mrbtest_io_msg, io.read
assert_equal $mrbtest_io_rfname, io.path
io.close
assert_equal $mrbtest_io_rfname, io.path
@@ -66,7 +66,7 @@ end
assert('File.size') do
File.size($mrbtest_io_rfname) == $mrbtest_io_msg.size + 1 and
File.size($mrbtest_io_rfname) == $mrbtest_io_msg.size and
File.size($mrbtest_io_wfname) == 0
end
test/file_test.rb
+2 -2
View File
@@ -34,13 +34,13 @@ assert("FileTest.pipe?") do
end
assert("FileTest.size?") do
assert_equal $mrbtest_io_msg.size+1, FileTest.size?($mrbtest_io_rfname)
assert_equal $mrbtest_io_msg.size, FileTest.size?($mrbtest_io_rfname)
assert_equal nil, FileTest.size?($mrbtest_io_wfname)
assert_equal nil, FileTest.size?("not-exist-test-target-file")
fp1 = File.open($mrbtest_io_rfname)
fp2 = File.open($mrbtest_io_wfname)
assert_equal $mrbtest_io_msg.size+1, FileTest.size?(fp1)
assert_equal $mrbtest_io_msg.size, FileTest.size?(fp1)
assert_equal nil, FileTest.size?(fp2)
fp1.close
fp2.close
test/io.rb
+96 -60
View File
@@ -22,17 +22,106 @@ assert('IO.open', '15.2.20.4.1') do
assert_equal Fixnum, fd.class
io = IO.open fd
assert_equal IO, io.class
assert_equal $mrbtest_io_msg+"\n", io.read
assert_equal $mrbtest_io_msg, io.read
io.close
fd = IO.sysopen $mrbtest_io_rfname
IO.open(fd) do |io|
assert_equal $mrbtest_io_msg+"\n", io.read
assert_equal $mrbtest_io_msg, io.read
end
true
end
assert('IO#close', '15.2.20.5.1') do
io = IO.new(IO.sysopen($mrbtest_io_rfname))
assert_nil io.close
end
assert('IO#closed?', '15.2.20.5.2') do
io = IO.new(IO.sysopen($mrbtest_io_rfname))
assert_false io.closed?
io.close
assert_true io.closed?
end
#assert('IO#each', '15.2.20.5.3') do
#assert('IO#each_byte', '15.2.20.5.4') do
#assert('IO#each_line', '15.2.20.5.5') do
assert('IO#eof?', '15.2.20.5.6') do
io = IO.new(IO.sysopen($mrbtest_io_rfname))
$mrbtest_io_msg.each_char { |ch|
# XXX
#assert_false io.eof?
io.getc
}
assert_true io.eof?
io.close
true
end
assert('IO#flush', '15.2.20.5.7') do
# Note: mruby-io does not have any buffer to be flushed now.
io = IO.new(IO.sysopen($mrbtest_io_wfname))
assert_equal io, io.flush
io.close
assert_raise(IOError) do
io.flush
end
end
assert('IO#getc', '15.2.20.5.8') do
io = IO.new(IO.sysopen($mrbtest_io_rfname))
$mrbtest_io_msg.each_char { |ch|
assert_equal ch, io.getc
}
assert_equal nil, io.getc
io.close
true
end
#assert('IO#gets', '15.2.20.5.9') do
#assert('IO#initialize_copy', '15.2.20.5.10') do
#assert('IO#print', '15.2.20.5.11') do
#assert('IO#putc', '15.2.20.5.12') do
#assert('IO#puts', '15.2.20.5.13') do
assert('IO#read', '15.2.20.5.14') do
IO.open(IO.sysopen($mrbtest_io_rfname)) do |io|
assert_raise(ArgumentError) { io.read(-5) }
assert_raise(TypeError) { io.read("str") }
len = $mrbtest_io_msg.length
assert_equal 'mruby', io.read(5)
assert_equal $mrbtest_io_msg[5,len], io.read(len)
assert_equal "", io.read
assert_nil io.read(1)
end
IO.open(IO.sysopen($mrbtest_io_rfname)) do |io|
assert_equal $mrbtest_io_msg, io.read
end
end
assert('IO#readchar', '15.2.20.5.15') do
# almost same as IO#getc
IO.open(IO.sysopen($mrbtest_io_rfname)) do |io|
$mrbtest_io_msg.each_char { |ch|
assert_equal ch, io.readchar
}
assert_raise(EOFError) do
io.readchar
end
end
end
#assert('IO#readline', '15.2.20.5.16') do
#assert('IO#readlines', '15.2.20.5.17') do
#assert('IO#sync', '15.2.20.5.18') do
#assert('IO#sync=', '15.2.20.5.19') do
assert('IO#write', '15.2.20.5.20') do
io = IO.open(IO.sysopen($mrbtest_io_wfname))
assert_equal 0, io.write("")
@@ -48,16 +137,6 @@ assert('IO gc check') do
100.times { IO.new(0) }
end
assert('IO.sysopen, IO#close, IO#closed?') do
fd = IO.sysopen $mrbtest_io_rfname
assert_equal Fixnum, fd.class
io = IO.new fd
assert_equal IO, io.class
assert_equal false, io.closed?, "IO not closed"
assert_equal nil, io.close, "IO#close should return nil"
assert_equal true, io.closed?, "IO#closed? should return true"
end
assert('IO.sysopen("./nonexistent")') do
if Object.const_defined? :Errno
eclass = Errno::ENOENT
@@ -106,14 +185,14 @@ assert('IO#_read_buf') do
def io._buf
@buf
end
msg_len = $mrbtest_io_msg.size + 1
msg_len = $mrbtest_io_msg.size
assert_equal '', io._buf
assert_equal $mrbtest_io_msg + "\n", io._read_buf
assert_equal $mrbtest_io_msg + "\n", io._buf
assert_equal $mrbtest_io_msg, io._read_buf
assert_equal $mrbtest_io_msg, io._buf
assert_equal 'mruby', io.read(5)
assert_equal 5, io.pos
assert_equal msg_len - 5, io._buf.size
assert_equal $mrbtest_io_msg[5,100] + "\n", io.read
assert_equal $mrbtest_io_msg[5,100], io.read
assert_equal 0, io._buf.size
assert_raise EOFError do
io._read_buf
@@ -124,48 +203,6 @@ assert('IO#_read_buf') do
io.closed?
end
assert('IO#read argument check') do
fd = IO.sysopen $mrbtest_io_rfname
io = IO.new fd
assert_raise TypeError do
io.read("str")
end
assert_raise ArgumentError do
io.read(-5)
end
io.close
io.closed?
end
assert('IO#read') do
fd = IO.sysopen $mrbtest_io_rfname
io = IO.new fd
assert_equal 'mruby', io.read(5)
assert_equal $mrbtest_io_msg[5,100] + "\n", io.read
assert_equal "", io.read
io.close
io.closed?
end
assert('IO#readchar, IO#getc') do
fd = IO.sysopen $mrbtest_io_rfname
io = IO.new fd
def io._buf
@buf
end
assert_equal 'm', io.readchar
assert_equal 1, io.pos
assert_equal 'r', io.getc
assert_equal 2, io.pos
io.gets
assert_raise EOFError do
io.readchar
end
assert_equal nil, io.getc
io.close
io.closed?
end
assert('IO#pos=, IO#seek') do
fd = IO.sysopen $mrbtest_io_rfname
io = IO.new fd
@@ -180,13 +217,12 @@ assert('IO#pos=, IO#seek') do
io.closed?
end
assert('IO#gets') do
fd = IO.sysopen $mrbtest_io_rfname
io = IO.new fd
# gets without arguments
assert_equal $mrbtest_io_msg + "\n", io.gets, "gets without arguments"
assert_equal $mrbtest_io_msg, io.gets, "gets without arguments"
assert_equal nil, io.gets, "gets returns nil, when EOF"
# gets with limit
test/mruby_io_test.c
+2 -2
View File
@@ -18,7 +18,7 @@ mrb_io_test_io_setup(mrb_state *mrb, mrb_value self)
char wfname[] = "tmp.mruby-io-test.XXXXXXXX";
char symlinkname[] = "tmp.mruby-io-test.XXXXXXXX";
char socketname[] = "tmp.mruby-io-test.XXXXXXXX";
char msg[] = "mruby io test";
char msg[] = "mruby io test\n";
mode_t mask;
int fd0, fd1, fd2, fd3;
FILE *fp;
@@ -46,7 +46,7 @@ mrb_io_test_io_setup(mrb_state *mrb, mrb_value self)
mrb_raise(mrb, E_RUNTIME_ERROR, "can't open temporary file");
return mrb_nil_value();
}
fprintf(fp, "%s\n", msg);
fputs(msg, fp);
fclose(fp);
fp = fopen(wfname, "w");