Mercurial > hg > octave-kai > gnulib-hg
annotate lib/fopen-safer.c @ 8341:7929a12676ab
New module 'vasprintf-posix'.
| author | Bruno Haible <bruno@clisp.org> |
|---|---|
| date | Mon, 05 Mar 2007 00:37:52 +0000 |
| parents | 8a1a9361108c |
| children | bbbbbf4cd1c5 |
| rev | line source |
|---|---|
| 3196 | 1 /* Invoke fopen, but avoid some glitches. |
|
7302
8a1a9361108c
* _fpending.c: Include <config.h> unconditionally, since we no
Paul Eggert <eggert@cs.ucla.edu>
parents:
6259
diff
changeset
|
2 |
|
8a1a9361108c
* _fpending.c: Include <config.h> unconditionally, since we no
Paul Eggert <eggert@cs.ucla.edu>
parents:
6259
diff
changeset
|
3 Copyright (C) 2001, 2004, 2005, 2006 Free Software Foundation, Inc. |
| 3196 | 4 |
| 5 This program is free software; you can redistribute it and/or modify | |
| 6 it under the terms of the GNU General Public License as published by | |
| 7 the Free Software Foundation; either version 2, or (at your option) | |
| 8 any later version. | |
| 9 | |
| 10 This program is distributed in the hope that it will be useful, | |
| 11 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 13 GNU General Public License for more details. | |
| 14 | |
| 15 You should have received a copy of the GNU General Public License | |
| 16 along with this program; if not, write to the Free Software Foundation, | |
|
5848
a48fb0e98c8c
*** empty log message ***
Paul Eggert <eggert@cs.ucla.edu>
parents:
5159
diff
changeset
|
17 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ |
| 3196 | 18 |
| 19 /* Written by Paul Eggert. */ | |
| 20 | |
|
7302
8a1a9361108c
* _fpending.c: Include <config.h> unconditionally, since we no
Paul Eggert <eggert@cs.ucla.edu>
parents:
6259
diff
changeset
|
21 #include <config.h> |
| 3196 | 22 |
|
6150
882f5823cabb
Merge minor changes from coreutils.
Jim Meyering <jim@meyering.net>
parents:
5848
diff
changeset
|
23 #include "stdio-safer.h" |
|
882f5823cabb
Merge minor changes from coreutils.
Jim Meyering <jim@meyering.net>
parents:
5848
diff
changeset
|
24 |
|
882f5823cabb
Merge minor changes from coreutils.
Jim Meyering <jim@meyering.net>
parents:
5848
diff
changeset
|
25 #include <errno.h> |
|
882f5823cabb
Merge minor changes from coreutils.
Jim Meyering <jim@meyering.net>
parents:
5848
diff
changeset
|
26 #include <unistd.h> |
|
882f5823cabb
Merge minor changes from coreutils.
Jim Meyering <jim@meyering.net>
parents:
5848
diff
changeset
|
27 #include "unistd-safer.h" |
| 3196 | 28 |
| 29 #ifndef STDERR_FILENO | |
| 30 # define STDERR_FILENO 2 | |
| 31 #endif | |
| 32 | |
| 33 /* Like fopen, but do not return stdin, stdout, or stderr. */ | |
| 34 | |
| 35 FILE * | |
| 36 fopen_safer (char const *file, char const *mode) | |
| 37 { | |
| 38 FILE *fp = fopen (file, mode); | |
| 39 | |
| 40 if (fp) | |
| 41 { | |
| 42 int fd = fileno (fp); | |
| 43 | |
| 44 if (0 <= fd && fd <= STDERR_FILENO) | |
| 45 { | |
| 46 int f = dup_safer (fd); | |
| 47 | |
| 48 if (f < 0) | |
| 49 { | |
| 50 int e = errno; | |
| 51 fclose (fp); | |
| 52 errno = e; | |
| 53 return NULL; | |
| 54 } | |
| 55 | |
| 56 if (fclose (fp) != 0 | |
| 57 || ! (fp = fdopen (f, mode))) | |
| 58 { | |
| 59 int e = errno; | |
| 60 close (f); | |
| 61 errno = e; | |
| 62 return NULL; | |
| 63 } | |
| 64 } | |
| 65 } | |
| 66 | |
| 67 return fp; | |
| 68 } |