ruby-changes:14420
From: usa <ko1@a...>
Date: Fri, 8 Jan 2010 16:47:32 +0900 (JST)
Subject: [ruby-changes:14420] Ruby:r26250 (trunk): * io.c (rb_io_s_read): close the IO if an exception is raised on
usa 2010-01-08 16:47:12 +0900 (Fri, 08 Jan 2010) New Revision: 26250 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=26250 Log: * io.c (rb_io_s_read): close the IO if an exception is raised on seeking. [ruby-core:27429] Modified files: trunk/ChangeLog trunk/io.c Index: ChangeLog =================================================================== --- ChangeLog (revision 26249) +++ ChangeLog (revision 26250) @@ -1,3 +1,8 @@ +Fri Jan 8 14:06:01 2010 NAKAMURA Usaku <usa@r...> + + * io.c (rb_io_s_read): close the IO if an exception is raised on + seeking. [ruby-core:27429] + Fri Jan 8 13:12:26 2010 Nobuyoshi Nakada <nobu@r...> * marshal.c (w_symbol): dump no encoding for 7bit only coderange Index: io.c =================================================================== --- io.c (revision 26249) +++ io.c (revision 26250) @@ -7816,6 +7816,19 @@ return io_read(arg->argc, arg->argv, arg->io); } +struct seek_arg { + VALUE io; + VALUE offset; + int mode; +}; + +static VALUE +seek_before_read(struct seek_arg *arg) +{ + rb_io_binmode(arg->io); + return rb_io_seek(arg->io, arg->offset, arg->mode); +} + /* * call-seq: * IO.read(name, [length [, offset]] ) => string @@ -7858,8 +7871,16 @@ open_key_args(argc, argv, &arg); if (NIL_P(arg.io)) return Qnil; if (!NIL_P(offset)) { - rb_io_binmode(arg.io); - rb_io_seek(arg.io, offset, SEEK_SET); + struct seek_arg sarg; + int state = 0; + sarg.io = arg.io; + sarg.offset = offset; + sarg.mode = SEEK_SET; + rb_protect((VALUE (*)(VALUE))seek_before_read, (VALUE)&sarg, &state); + if (state) { + rb_io_close(arg.io); + rb_jump_tag(state); + } if (arg.argc == 2) arg.argc = 1; } return rb_ensure(io_s_read, (VALUE)&arg, rb_io_close, arg.io); -- ML: ruby-changes@q... Info: http://www.atdot.net/~ko1/quickml/