[ruby-dev:24996] Re: rb_io_sysread dumps core [BUG] rb_sys_fail() - errno == 0

なかだです。

At Tue, 30 Nov 2004 06:53:15 +0900,
Tietew wrote in [ruby-dev:24993]:
> とりあえずコアは採ってあるのですが，TRAP_END の中で errno がクリ
> アされているような雰囲気です。

TRAP_ENDではerrnoを保存しているので、それはないはずです。一つの
可能性としては、rb_io_sysread()ではrb_sys_fail()の直前で
rb_str_resize()を呼んでいるので、その中でクリアされているとか。


Index: io.c
===================================================================
RCS file: /cvs/ruby/src/ruby/io.c,v
retrieving revision 1.246.2.53
diff -u -2 -p -r1.246.2.53 io.c
--- io.c	29 Nov 2004 04:38:08 -0000	1.246.2.53
+++ io.c	30 Nov 2004 05:11:18 -0000
@@ -91,4 +91,7 @@ extern void Init_File _((void));
 #endif
 
+#define preserving_errno(stmts) \
+	do {int saved_errno = errno; stmts; errno = saved_errno;} while (0)
+
 VALUE rb_cIO;
 VALUE rb_eEOFError;
@@ -1065,5 +1068,5 @@ read_all(fptr, siz, str)
 	rb_str_unlocktmp(str);
 	if (n == 0 && bytes == 0) {
-	    rb_str_resize(str,0);
+	    preserving_errno(rb_str_resize(str, 0));
 	    if (!fptr->f) break;
 	    if (feof(fptr->f)) break;
@@ -1141,5 +1144,5 @@ io_read(argc, argv, io)
     rb_str_unlocktmp(str);
     if (n == 0) {
-	rb_str_resize(str,0);
+	preserving_errno(rb_str_resize(str, 0));
 	if (!fptr->f) return Qnil;
 	if (feof(fptr->f)) return Qnil;
@@ -2185,5 +2188,5 @@ rb_io_sysread(argc, argv, io)
 
     if (n == -1) {
-	rb_str_resize(str, 0);
+	preserving_errno(rb_str_resize(str, 0));
 	rb_sys_fail(fptr->path);
     }


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦