From 4870c89f777c8ae4403e9127a4df9f9c06cb5995 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 9 May 2003 08:12:52 +0000
Subject: * io.c (rb_io_reopen): It should be possible to reopen closed IO.  
 [ruby-talk:70941]

* io.c (rb_io_reopen): inherit original file mode unless specified.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3770 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 io.c | 41 +++++++++++++++++++++++++++++++++++++++--
 1 file changed, 39 insertions(+), 2 deletions(-)

(limited to 'io.c')

diff --git a/io.c b/io.c
index 78b885517f..f44a78944c 100644
--- a/io.c
+++ b/io.c
@@ -1614,6 +1614,39 @@ rb_io_binmode(io)
     return io;
 }
 
+char*
+rb_io_flags_mode(flags, mode)
+    int flags;
+    char *mode;
+{
+    char *p = mode;
+
+    switch (flags & FMODE_READWRITE) {
+      case FMODE_READABLE:
+	*p++ = 'r';
+	break;
+      case FMODE_WRITABLE:
+	*p++ = 'w';
+	break;
+      case FMODE_READWRITE:
+	*p++ = 'r';
+	*p++ = '+';
+	break;
+    }
+    *p++ = '\0';
+#ifdef O_BINARY
+    if (flags & FMODE_BINMODE) {
+	if (mode[1] == '+') {
+	    mode[1] = 'b'; mode[2] = '+'; mode[3] = '\0';
+	}
+	else {
+	    mode[1] = 'b'; mode[2] = '\0';
+	}
+    }
+#endif
+    return mode;
+}
+
 int
 rb_io_mode_flags(mode)
     const char *mode;
@@ -2387,14 +2420,18 @@ rb_io_reopen(argc, argv, file)
     }
 
     SafeStringValue(fname);
+
+    rb_io_taint_check(file);
+    fptr = RFILE(file)->fptr;
+
     if (!NIL_P(nmode)) {
 	mode = StringValuePtr(nmode);
     }
     else {
-	mode = "r";
+	mode = ALLOCA_N(char, 4);
+	rb_io_flags_mode(fptr->mode, mode);
     }
 
-    GetOpenFile(file, fptr);
     if (fptr->path) {
 	free(fptr->path);
 	fptr->path = 0;
-- 
cgit v1.2.3