Mercurial > gnulib
annotate lib/fwritable.c @ 17363:5a51fb7777a9
sys_select, sys_time: port 2013-01-30 Solaris 2.6 fix to Cygwin
Problem reported by Marco Atzeri in
<http://lists.gnu.org/archive/html/bug-gnulib/2013-03/msg00000.html>.
* lib/sys_select.in.h [HAVE_SYS_SELECT_H && _CYGWIN_SYS_TIME_H]:
Simply delegate to the system <sys/select.h> in this case too.
Also, pay attention to _GL_SYS_SELECT_H_REDIRECT_FROM_SYS_TIME_H only
if OSF/1, since otherwise Cygwin breaks, and it doesn't seem to
be needed on Solaris either.
* lib/sys_time.in.h [_CYGWIN_SYS_TIME_H]:
Simply delgate to the system <sys/time.h> in this case.
author | Paul Eggert <eggert@cs.ucla.edu> |
---|---|
date | Tue, 19 Mar 2013 09:08:47 -0700 |
parents | e542fd46ad6f |
children | 344018b6e5d7 |
rev | line source |
---|---|
8689 | 1 /* Retrieve information about a FILE stream. |
17249
e542fd46ad6f
maint: update all copyright year number ranges
Eric Blake <eblake@redhat.com>
parents:
16935
diff
changeset
|
2 Copyright (C) 2007-2013 Free Software Foundation, Inc. |
8689 | 3 |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
9280
diff
changeset
|
4 This program is free software: you can redistribute it and/or modify |
8689 | 5 it under the terms of the GNU General Public License as published by |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
9280
diff
changeset
|
6 the Free Software Foundation; either version 3 of the License, or |
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
9280
diff
changeset
|
7 (at your option) any later version. |
8689 | 8 |
9 This program is distributed in the hope that it will be useful, | |
10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
12 GNU General Public License for more details. | |
13 | |
9309
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
9280
diff
changeset
|
14 You should have received a copy of the GNU General Public License |
bbbbbf4cd1c5
Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents:
9280
diff
changeset
|
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
8689 | 16 |
17 #include <config.h> | |
18 | |
19 /* Specification. */ | |
20 #include "fwritable.h" | |
21 | |
9980
2c1ba629f5d5
New private include file lib/stdio-impl.h.
Bruno Haible <bruno@clisp.org>
parents:
9928
diff
changeset
|
22 #include "stdio-impl.h" |
2c1ba629f5d5
New private include file lib/stdio-impl.h.
Bruno Haible <bruno@clisp.org>
parents:
9928
diff
changeset
|
23 |
16345
7cf3cc0dcf46
stdioext: Fix last commit.
Bruno Haible <bruno@clisp.org>
parents:
16344
diff
changeset
|
24 #if defined EPLAN9 /* Plan9 */ |
7cf3cc0dcf46
stdioext: Fix last commit.
Bruno Haible <bruno@clisp.org>
parents:
16344
diff
changeset
|
25 # include <fcntl.h> |
7cf3cc0dcf46
stdioext: Fix last commit.
Bruno Haible <bruno@clisp.org>
parents:
16344
diff
changeset
|
26 #endif |
7cf3cc0dcf46
stdioext: Fix last commit.
Bruno Haible <bruno@clisp.org>
parents:
16344
diff
changeset
|
27 |
8689 | 28 bool |
29 fwritable (FILE *fp) | |
30 { | |
31 /* Most systems provide FILE as a struct and the necessary bitmask in | |
32 <stdio.h>, because they need it for implementing getc() and putc() as | |
33 fast macros. */ | |
10780 | 34 #if defined _IO_ftrylockfile || __GNU_LIBRARY__ == 1 /* GNU libc, BeOS, Haiku, Linux libc5 */ |
8689 | 35 return (fp->_flags & _IO_NO_WRITES) == 0; |
16935
498a2211d839
Write "Mac OS X" instead of "MacOS X".
Bruno Haible <bruno@clisp.org>
parents:
16345
diff
changeset
|
36 #elif defined __sferror || defined __DragonFly__ /* FreeBSD, NetBSD, OpenBSD, DragonFly, Mac OS X, Cygwin */ |
9981
e3d6988a9347
Add tentative support for DragonFly BSD.
Bruno Haible <bruno@clisp.org>
parents:
9980
diff
changeset
|
37 return (fp_->_flags & (__SRW | __SWR)) != 0; |
9881
e21211210418
Port the extended stdio functions to emx+gcc.
Bruno Haible <bruno@clisp.org>
parents:
9876
diff
changeset
|
38 #elif defined __EMX__ /* emx+gcc */ |
e21211210418
Port the extended stdio functions to emx+gcc.
Bruno Haible <bruno@clisp.org>
parents:
9876
diff
changeset
|
39 return (fp->_flags & (_IORW | _IOWRT)) != 0; |
15485
20a2699b8a90
stdioext: Add support for Minix.
Bruno Haible <bruno@clisp.org>
parents:
14380
diff
changeset
|
40 #elif defined __minix /* Minix */ |
20a2699b8a90
stdioext: Add support for Minix.
Bruno Haible <bruno@clisp.org>
parents:
14380
diff
changeset
|
41 return (fp->_flags & _IOWRITE) != 0; |
13997
6fa9f46e6153
Port extended stdio modules to HP NonStop Kernel.
Bruno Haible <bruno@clisp.org>
parents:
12559
diff
changeset
|
42 #elif defined _IOERR /* AIX, HP-UX, IRIX, OSF/1, Solaris, OpenServer, mingw, NonStop Kernel */ |
8689 | 43 return (fp->_flag & (_IORW | _IOWRT)) != 0; |
9280
a1f6fe4c68c1
Add support for QNX (untested).
Bruno Haible <bruno@clisp.org>
parents:
8689
diff
changeset
|
44 #elif defined __QNX__ /* QNX */ |
9456 | 45 return (fp->_Mode & 0x2 /* _MOPENW */) != 0; |
11236
d4475bf2a2bf
Add tentative support for FreeMiNT.
Bruno Haible <bruno@clisp.org>
parents:
10780
diff
changeset
|
46 #elif defined __MINT__ /* Atari FreeMiNT */ |
d4475bf2a2bf
Add tentative support for FreeMiNT.
Bruno Haible <bruno@clisp.org>
parents:
10780
diff
changeset
|
47 return fp->__mode.__write; |
16344
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
48 #elif defined EPLAN9 /* Plan9 */ |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
49 int fd = fp->fd; |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
50 if (fd >= 0) |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
51 { |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
52 int flags = fcntl (fd, F_GETFL, NULL); |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
53 if (flags >= 0) |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
54 { |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
55 flags &= O_ACCMODE; |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
56 return (flags == O_WRONLY || flags == O_RDWR); |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
57 } |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
58 } |
ecfc57537d99
stdioext: Add tentative support for Plan9.
Bruno Haible <bruno@clisp.org>
parents:
16201
diff
changeset
|
59 return 0; |
8689 | 60 #else |
14380
5cee7a3cd6ca
maint: adjust cpp indentation for my modules, as well
Eric Blake <eblake@redhat.com>
parents:
14079
diff
changeset
|
61 # error "Please port gnulib fwritable.c to your platform! Look at the definition of fopen, fdopen on your system, then report this to bug-gnulib." |
8689 | 62 #endif |
63 } |