[Bug #21794] Fix for platforms where O_CLOEXEC is not available

Author: nobu

box.c

@@ -9,6 +9,7 @@
 #include "internal/file.h"
 #include "internal/gc.h"
 #include "internal/hash.h"
+#include "internal/io.h"
 #include "internal/load.h"
 #include "internal/st.h"
 #include "internal/variable.h"
@@ -627,20 +628,27 @@ copy_ext_file(const char *src_path, const char *dst_path)
 # else
     const int bin = 0;
 # endif
-    const int src_fd = open(src_path, O_RDONLY|bin);
+# ifdef O_CLOEXEC
+    const int cloexec = O_CLOEXEC;
+# else
+    const int cloexec = 0;
+# endif
+    const int src_fd = open(src_path, O_RDONLY|cloexec|bin);
     if (src_fd < 0) return COPY_ERROR_SRC_OPEN;
+    if (!cloexec) rb_maygvl_fd_fix_cloexec(src_fd);
 
     struct stat src_st;
     if (fstat(src_fd, &src_st)) {
         close(src_fd);
         return COPY_ERROR_SRC_STAT;
     }
 
-    const int dst_fd = open(dst_path, O_WRONLY|O_CREAT|O_EXCL|O_CLOEXEC|bin, S_IRWXU);
+    const int dst_fd = open(dst_path, O_WRONLY|O_CREAT|O_EXCL|cloexec|bin, S_IRWXU);
     if (dst_fd < 0) {
         close(src_fd);
         return COPY_ERROR_DST_OPEN;
     }
+    if (!cloexec) rb_maygvl_fd_fix_cloexec(dst_fd);
 
     enum copy_error_type ret = COPY_ERROR_NONE;
 

depend

@@ -745,6 +745,7 @@ box.$(OBJEXT): $(top_srcdir)/internal/file.h
 box.$(OBJEXT): $(top_srcdir)/internal/gc.h
 box.$(OBJEXT): $(top_srcdir)/internal/hash.h
 box.$(OBJEXT): $(top_srcdir)/internal/imemo.h
+box.$(OBJEXT): $(top_srcdir)/internal/io.h
 box.$(OBJEXT): $(top_srcdir)/internal/load.h
 box.$(OBJEXT): $(top_srcdir)/internal/sanitizers.h
 box.$(OBJEXT): $(top_srcdir)/internal/serial.h
@@ -951,6 +952,7 @@ box.$(OBJEXT): {$(VPATH)}internal/value_type.h
 box.$(OBJEXT): {$(VPATH)}internal/variable.h
 box.$(OBJEXT): {$(VPATH)}internal/warning_push.h
 box.$(OBJEXT): {$(VPATH)}internal/xmalloc.h
+box.$(OBJEXT): {$(VPATH)}io.h
 box.$(OBJEXT): {$(VPATH)}iseq.h
 box.$(OBJEXT): {$(VPATH)}method.h
 box.$(OBJEXT): {$(VPATH)}missing.h