fopen-gnu: Create files correctly

[Bruno Haible]

A test failure on Solaris 11.3 indicates that something is wrong with the
'fopen-gnu' module. Namely, newly created files have incorrect access
permissions. This patch fixes it.


2020-07-28  Bruno Haible  <bruno@clisp.org>

        fopen-gnu: Create files correctly (regression from 2020-05-24).
        * lib/fopen.c (rpl_open): Pass a third argument to open().

diff --git a/lib/fopen.c b/lib/fopen.c
index 0acffa2..4a0cab1 100644
--- a/lib/fopen.c
+++ b/lib/fopen.c
@@ -176,7 +176,8 @@ rpl_fopen (const char *filename, const char *mode)
             return NULL;
           }
 
-        fd = open (filename, open_direction | open_flags);
+        fd = open (filename, open_direction | open_flags,
+                   S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH);
         if (fd < 0)
           return NULL;
 
@@ -209,7 +210,8 @@ rpl_fopen (const char *filename, const char *mode)
       int fd;
       FILE *fp;
 
-      fd = open (filename, open_direction | open_flags);
+      fd = open (filename, open_direction | open_flags,
+                 S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH);
       if (fd < 0)
         return NULL;