* gfortran.dg/promotion.f90: Fix options.
[official-gcc.git] / libiberty / fopen_unlocked.c
blob3c3cefed76b37f875f32cc52ad56b16e4cdcf5cb
1 /* Implement fopen_unlocked and related functions.
2 Copyright (C) 2005 Free Software Foundation, Inc.
3 Written by Kaveh R. Ghazi <ghazi@caip.rutgers.edu>.
5 This file is part of the libiberty library.
6 Libiberty is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Library General Public
8 License as published by the Free Software Foundation; either
9 version 2 of the License, or (at your option) any later version.
11 Libiberty is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Library General Public License for more details.
16 You should have received a copy of the GNU Library General Public
17 License along with libiberty; see the file COPYING.LIB. If
18 not, write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
19 Boston, MA 02110-1301, USA. */
23 @deftypefn Extension void unlock_stream (FILE * @var{stream})
25 If the OS supports it, ensure that the supplied stream is setup to
26 avoid any multi-threaded locking. Otherwise leave the @code{FILE}
27 pointer unchanged. If the @var{stream} is @code{NULL} do nothing.
29 @end deftypefn
31 @deftypefn Extension void unlock_std_streams (void)
33 If the OS supports it, ensure that the standard I/O streams,
34 @code{stdin}, @code{stdout} and @code{stderr} are setup to avoid any
35 multi-threaded locking. Otherwise do nothing.
37 @end deftypefn
39 @deftypefn Extension {FILE *} fopen_unlocked (const char *@var{path}, const char * @var{mode})
41 Opens and returns a @code{FILE} pointer via @code{fopen}. If the
42 operating system supports it, ensure that the stream is setup to avoid
43 any multi-threaded locking. Otherwise return the @code{FILE} pointer
44 unchanged.
46 @end deftypefn
48 @deftypefn Extension {FILE *} fdopen_unlocked (int @var{fildes}, const char * @var{mode})
50 Opens and returns a @code{FILE} pointer via @code{fdopen}. If the
51 operating system supports it, ensure that the stream is setup to avoid
52 any multi-threaded locking. Otherwise return the @code{FILE} pointer
53 unchanged.
55 @end deftypefn
57 @deftypefn Extension {FILE *} freopen_unlocked (const char * @var{path}, const char * @var{mode}, FILE * @var{stream})
59 Opens and returns a @code{FILE} pointer via @code{freopen}. If the
60 operating system supports it, ensure that the stream is setup to avoid
61 any multi-threaded locking. Otherwise return the @code{FILE} pointer
62 unchanged.
64 @end deftypefn
68 #ifdef HAVE_CONFIG_H
69 #include "config.h"
70 #endif
71 #include <stdio.h>
72 #ifdef HAVE_STDIO_EXT_H
73 #include <stdio_ext.h>
74 #endif
76 #include "libiberty.h"
78 /* This is an inline helper function to consolidate attempts to unlock
79 a stream. */
81 static inline void
82 unlock_1 (FILE *const fp ATTRIBUTE_UNUSED)
84 #if defined(HAVE___FSETLOCKING) && defined(FSETLOCKING_BYCALLER)
85 if (fp)
86 __fsetlocking (fp, FSETLOCKING_BYCALLER);
87 #endif
90 void
91 unlock_stream (FILE *fp)
93 unlock_1 (fp);
96 void
97 unlock_std_streams (void)
99 unlock_1 (stdin);
100 unlock_1 (stdout);
101 unlock_1 (stderr);
104 FILE *
105 fopen_unlocked (const char *path, const char *mode)
107 FILE *const fp = fopen (path, mode);
108 unlock_1 (fp);
109 return fp;
112 FILE *
113 fdopen_unlocked (int fildes, const char *mode)
115 FILE *const fp = fdopen (fildes, mode);
116 unlock_1 (fp);
117 return fp;
120 FILE *
121 freopen_unlocked (const char *path, const char *mode, FILE *stream)
123 FILE *const fp = freopen (path, mode, stream);
124 unlock_1 (fp);
125 return fp;