[ruby-dev:25327] Re: test_readline.rb blocks on BSD again

なかだです。

At Sat, 25 Dec 2004 18:46:51 +0900,
GOTOU Yuuzou wrote in [ruby-dev:25321]:
> > > |その後つらつらと眺めてみたのですが、FMODE_PREPがクリアされて
> > > |いる(ないしは余計に伝わっている)ようです。
> > > 
> > > どうしようかなあ。手元ではキャンセルしたんですが。
> > 
> > これはrevertするってことですか？
> > どうもミスがあったらしく、そのままリリースされてしまいました。
> > すぐにでも差し替えるべきだと思います。
> > ちなみに、revertするかゆうぞうさんのパッチで
> > [ruby-dev:25303]のreadlineのSEGVもなおります。
> 
> [ruby-dev:25314]だとorig->modeがFMODE_PREPだったときにまずい
> ので送り直します。しかし差し替えならdivertするに一票です。

フラグではなくて、fptr->fで見るようにしてみました。また、
[ruby-core:04021]という問題も報告されているので、条件を緩くして
stdinならreadable、stdout,stderrならwritableであることだけにし
ました。


* io.c (check_prep_mode): check if necessary mode is set.


Index: io.c
===================================================================
RCS file: /cvs/ruby/src/ruby/io.c,v
retrieving revision 1.246.2.67
diff -U2 -p -r1.246.2.67 io.c
--- io.c	25 Dec 2004 10:56:39 -0000	1.246.2.67
+++ io.c	25 Dec 2004 14:09:19 -0000
@@ -3135,4 +3135,20 @@ rb_io_mode_string(fptr)
 }
 
+static void
+check_prep_mode(fptr, mode)
+    OpenFile *fptr;
+    int mode;
+{
+    if (fptr->f == stdin || fptr->f == stdout || fptr->f == stderr) {
+	int bit = (fptr->f == stdin) ? FMODE_READABLE : FMODE_WRITABLE;
+	if (!(bit & mode)) {
+	    rb_raise(rb_eArgError,
+		     "%s cannot change access mode from \"%s\" to \"%s\"",
+		     fptr->path, rb_io_flags_mode(fptr->mode),
+		     rb_io_flags_mode(mode));
+	}
+    }
+}
+
 static VALUE
 io_reopen(io, nfile)
@@ -3152,4 +3168,5 @@ io_reopen(io, nfile)
 
     if (fptr == orig) return io;
+    check_prep_mode(fptr, orig->mode);
     if (orig->mode & FMODE_READABLE) {
 	pos = io_tell(orig);
@@ -3276,5 +3293,7 @@ rb_io_reopen(argc, argv, file)
 
     if (!NIL_P(nmode)) {
-	fptr->mode = rb_io_mode_flags(StringValuePtr(nmode));
+	int flags = rb_io_mode_flags(StringValuePtr(nmode));
+	check_prep_mode(fptr, flags);
+	fptr->mode = flags;
     }
 
@@ -3783,8 +3802,9 @@ deferr_setter(val, id, variable)
 
 static VALUE
-prep_stdio(f, mode, klass)
+prep_stdio(f, mode, klass, path)
     FILE *f;
     int mode;
     VALUE klass;
+    const char *path;
 {
     OpenFile *fp;
@@ -3800,20 +3820,9 @@ prep_stdio(f, mode, klass)
     fp->f = f;
     fp->mode = mode;
+    fp->path = strdup(path);
 
     return io;
 }
 
-static void
-prep_path(io, path)
-    VALUE io;
-    char *path;
-{
-    OpenFile *fptr;
-
-    GetOpenFile(io, fptr);
-    if (fptr->path) rb_bug("illegal prep_path() call");
-    fptr->path = strdup(path);
-}
-
 /*
  *  call-seq:
@@ -4086,10 +4095,8 @@ next_argv()
 		    }
 #endif
-		    rb_stdout = prep_stdio(fw, FMODE_WRITABLE, rb_cFile);
-		    prep_path(rb_stdout, fn);
+		    rb_stdout = prep_stdio(fw, FMODE_WRITABLE, rb_cFile, fn);
 		    if (stdout_binmode) rb_io_binmode(rb_stdout);
 		}
-		current_file = prep_stdio(fr, FMODE_READABLE, rb_cFile);
-		prep_path(current_file, fn);
+		current_file = prep_stdio(fr, FMODE_READABLE, rb_cFile, fn);
 	    }
 	    if (binmode) rb_io_binmode(current_file);
@@ -5445,9 +5452,9 @@ Init_IO()
     rb_define_method(rb_cIO, "inspect",  rb_io_inspect, 0);
 
-    rb_stdin = prep_stdio(stdin, FMODE_READABLE, rb_cIO);
+    rb_stdin = prep_stdio(stdin, FMODE_READABLE, rb_cIO, "<STDIN>");
     rb_define_variable("$stdin", &rb_stdin);
-    rb_stdout = prep_stdio(stdout, FMODE_WRITABLE, rb_cIO);
+    rb_stdout = prep_stdio(stdout, FMODE_WRITABLE, rb_cIO, "<STDOUT>");
     rb_define_hooked_variable("$stdout", &rb_stdout, 0, stdout_setter);
-    rb_stderr = prep_stdio(stderr, FMODE_WRITABLE, rb_cIO);
+    rb_stderr = prep_stdio(stderr, FMODE_WRITABLE, rb_cIO, "<STDERR>");
     rb_define_hooked_variable("$stderr", &rb_stderr, 0, stdout_setter);
     rb_define_hooked_variable("$>", &rb_stdout, 0, stdout_setter);


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