diff options
author | Tobias Burnus <burnus@net-b.de> | 2012-05-16 20:39:34 +0200 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2012-05-16 20:39:34 +0200 |
commit | e10f759e193e815c77411b6db93ccca2504878e8 (patch) | |
tree | 75688ad1996e441b674cd50dbb94242df5e99502 | |
parent | 4677d2eb614facde0ebc4f111101b5c750ed82af (diff) | |
download | gcc-e10f759e193e815c77411b6db93ccca2504878e8.zip gcc-e10f759e193e815c77411b6db93ccca2504878e8.tar.gz gcc-e10f759e193e815c77411b6db93ccca2504878e8.tar.bz2 |
unix.c (tempfile_open): Pass mode to "open" for O_CREAT.
2012-05-16 Tobias Burnus <burnus@net-b.de>
* io/unix.c (tempfile_open): Pass mode to "open" for O_CREAT.
From-SVN: r187604
-rw-r--r-- | libgfortran/ChangeLog | 4 | ||||
-rw-r--r-- | libgfortran/io/unix.c | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 088d517..cac6a62 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2012-05-16 Tobias Burnus <burnus@net-b.de> + + * io/unix.c (tempfile_open): Pass mode to "open" for O_CREAT. + 2012-05-14 Janne Blomqvist <jb@gcc.gnu.org> PR fortran/52428 diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index c81163f..2e59efd 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -1099,9 +1099,9 @@ tempfile_open (const char *tempdir, char **fname) #if defined(HAVE_CRLF) && defined(O_BINARY) fd = open (template, O_RDWR | O_CREAT | O_EXCL | O_BINARY, - S_IRUSR | S_IWUSR); + S_IRUSR | S_IWUSR, 0600); #else - fd = open (template, O_RDWR | O_CREAT | O_EXCL, S_IRUSR | S_IWUSR); + fd = open (template, O_RDWR | O_CREAT | O_EXCL, S_IRUSR | S_IWUSR, 0600); #endif } while (fd == -1 && errno == EEXIST); |