[ruby-dev:28936] Re: IO.popen("echo a") clear O_APPEND of other fds.

なかだです。

At Mon, 3 Jul 2006 02:34:14 +0900,
Tanaka Akira wrote in [ruby-dev:28933]:
> この出来の悪さを Ruby レベルでどうにかするために
> IO#file_flags を GETFL,
> IO#file_flags= を SETFL にして、
> io.file_flags |= File::NONBLOCK
> とできるようにしたらどうか、と考えたことはあります。
> 
> 同様に
> IO#descriptor_flags を GETFD,
> IO#descriptor_flags= を SETFD にして、
> io.descriptor_flags |= Fcntl::FD_CLOEXEC
> と出来るようにする、ということも考えられます。

IO#close_on_exec のように個別にしたほうが、file_flagsと
descriptor_flagsのどっちだっけ、とか悩まずにすむんじゃないでしょ
うか。それとも早すぎる怠惰化?

> ... と思って考えてみると、IO#file_flags が Windows で動かな
> いからポータビリティに難あり、かな。

なけりゃないで未定義でいいんでは。


* io.c (rb_io_cloexec_get, rb_io_cloexec_set): new methods, get/set
  FD_CLOEXEC flag.


Index: io.c
===================================================================
RCS file: /cvs/ruby/src/ruby/io.c,v
retrieving revision 1.411
diff -p -u -2 -r1.411 io.c
--- io.c	2 Jul 2006 02:25:11 -0000	1.411
+++ io.c	3 Jul 2006 01:17:08 -0000
@@ -2693,4 +2693,56 @@ rb_io_modenum_mode(int flags)
 }
 
+#ifdef FD_CLOEXEC
+/*
+ *  call-seq:
+ *     ios.close_on_exec    => true/false
+ *
+ *  Returns true if *ios* will be closed on +exec+.
+ *
+ *    def fd(io)
+ *      path = "/proc/self/fd/#{io.fileno.to_s}"
+ *      system("readlink", path) or puts "#{path} is not opened"
+ *    end
+ *
+ *    f = open("/dev/null")
+ *    fd(f)			# => /dev/null
+ *    f.close_on_exec = true
+ *    fd(f)			# => /proc/self/fd/3 is not opened
+ */
+
+static VALUE
+rb_io_cloexec_get(VALUE io)
+{
+    OpenFile *fptr;
+    int flag;
+
+    GetOpenFile(io, fptr);
+    flag = fcntl(fptr->fd, F_GETFD);
+    if (flag == -1) rb_sys_fail(0);
+    return (flag & FD_CLOEXEC) ? Qtrue : Qfalse;
+}
+
+static VALUE
+rb_io_cloexec_set(VALUE io, VALUE val)
+{
+    OpenFile *fptr;
+    int oflag, flag;
+
+    GetOpenFile(io, fptr);
+    flag = fcntl(fptr->fd, F_GETFD);
+    if (flag == -1) rb_sys_fail(0);
+    oflag = flag;
+    if (RTEST(val)) {
+	flag |= FD_CLOEXEC;
+    }
+    else {
+	flag &= ~FD_CLOEXEC;
+    }
+    if (oflag != flag && fcntl(fptr->fd, F_SETFD, flag) == -1)
+	rb_sys_fail(0);
+    return (oflag & FD_CLOEXEC) ? Qtrue : Qfalse;
+}
+#endif
+
 static int
 rb_sysopen(char *fname, int flags, unsigned int mode)
@@ -5696,4 +5748,8 @@ Init_IO(void)
     rb_define_method(rb_cIO, "eof", rb_io_eof, 0);
     rb_define_method(rb_cIO, "eof?", rb_io_eof, 0);
+#ifdef FD_CLOEXEC
+    rb_define_method(rb_cIO, "close_on_exec", rb_io_cloexec_get, 0);
+    rb_define_method(rb_cIO, "close_on_exec=", rb_io_cloexec_set, 1);
+#endif
 
     rb_define_method(rb_cIO, "close", rb_io_close_m, 0);


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