gnulib: lib/freadable.c annotate

annotate lib/freadable.c @ 40186:8964917f9574

autoupdate

author	Karl Berry <karl@freefriends.org>
date	Mon, 18 Feb 2019 08:02:49 -0800
parents	b06060465f09
children

rev	line source
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	1 /* Retrieve information about a FILE stream.
40057 b06060465f09 maint: Run 'make update-copyright' Paul Eggert <eggert@cs.ucla.edu> parents: 19651 diff changeset	2 Copyright (C) 2007-2019 Free Software Foundation, Inc.
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	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
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	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.
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	8
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	9 This program is distributed in the hope that it will be useful,
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	10 but WITHOUT ANY WARRANTY; without even the implied warranty of
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	12 GNU General Public License for more details.
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	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
19190 9759915b2aca all: prefer https: URLs Paul Eggert <eggert@cs.ucla.edu> parents: 18974 diff changeset	15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	16
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	17 #include <config.h>
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	18
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	19 /* Specification. */
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	20 #include "freadable.h"
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	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
16344 ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	24 #if defined EPLAN9 /* Plan9 */
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	25 # include <fcntl.h>
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	26 #endif
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	27
19651 f58f701d78de stdioext: Fix compilation errors with newer Android headers. Bruno Haible <bruno@clisp.org> parents: 19557 diff changeset	28 /* This file is not used on systems that have the __freadable function,
f58f701d78de stdioext: Fix compilation errors with newer Android headers. Bruno Haible <bruno@clisp.org> parents: 19557 diff changeset	29 namely glibc >= 2.2, Solaris >= 7, Android API >= 23, musl libc. */
f58f701d78de stdioext: Fix compilation errors with newer Android headers. Bruno Haible <bruno@clisp.org> parents: 19557 diff changeset	30
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	31 bool
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	32 freadable (FILE *fp)
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	33 {
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	34 /* Most systems provide FILE as a struct and the necessary bitmask in
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	35 <stdio.h>, because they need it for implementing getc() and putc() as
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	36 fast macros. */
19557 3511f4e8ea85 fflush: be more paranoid about libio.h change Paul Eggert <eggert@cs.ucla.edu> parents: 19550 diff changeset	37 #if defined _IO_EOF_SEEN \|\| defined _IO_ftrylockfile \|\| __GNU_LIBRARY__ == 1
3511f4e8ea85 fflush: be more paranoid about libio.h change Paul Eggert <eggert@cs.ucla.edu> parents: 19550 diff changeset	38 /* GNU libc, BeOS, Haiku, Linux libc5 */
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	39 return (fp->_flags & _IO_NO_READS) == 0;
17902 4578584def8a Fix FILE struct compatibility with Android API level >= 21 Kevin Cernekee <cernekee@google.com> parents: 17848 diff changeset	40 #elif defined __sferror \|\| defined __DragonFly__ \|\| defined __ANDROID__
18655 c9e4105be915 stdioext: Port to Minix 3.2 and newer. Bruno Haible <bruno@clisp.org> parents: 18626 diff changeset	41 /* FreeBSD, NetBSD, OpenBSD, DragonFly, Mac OS X, Cygwin, Minix 3, Android */
9981 e3d6988a9347 Add tentative support for DragonFly BSD. Bruno Haible <bruno@clisp.org> parents: 9980 diff changeset	42 return (fp_->_flags & (__SRW \| __SRD)) != 0;
9881 e21211210418 Port the extended stdio functions to emx+gcc. Bruno Haible <bruno@clisp.org> parents: 9876 diff changeset	43 #elif defined __EMX__ /* emx+gcc */
e21211210418 Port the extended stdio functions to emx+gcc. Bruno Haible <bruno@clisp.org> parents: 9876 diff changeset	44 return (fp->_flags & (_IORW \| _IOREAD)) != 0;
15485 20a2699b8a90 stdioext: Add support for Minix. Bruno Haible <bruno@clisp.org> parents: 14380 diff changeset	45 #elif defined __minix /* Minix */
20a2699b8a90 stdioext: Add support for Minix. Bruno Haible <bruno@clisp.org> parents: 14380 diff changeset	46 return (fp->_flags & _IOREAD) != 0;
18974 6862081ffc74 stdioext: Port to OpenVMS. John Malmberg <wb8tyw@qsl.net> parents: 18655 diff changeset	47 #elif defined _IOERR /* AIX, HP-UX, IRIX, OSF/1, Solaris, OpenServer, mingw, MSVC, NonStop Kernel, OpenVMS */
18552 1c1353d294b3 stdioext: Port to native Windows with MSVC. Bruno Haible <bruno@clisp.org> parents: 18189 diff changeset	48 return (fp_->_flag & (_IORW \| _IOREAD)) != 0;
9280 a1f6fe4c68c1 Add support for QNX (untested). Bruno Haible <bruno@clisp.org> parents: 8687 diff changeset	49 #elif defined __QNX__ /* QNX */
9456 b3c8ee11ddfa Fix port to QNX. Bruno Haible <bruno@clisp.org> parents: 9309 diff changeset	50 return (fp->_Mode & 0x1 /* _MOPENR */) != 0;
11236 d4475bf2a2bf Add tentative support for FreeMiNT. Bruno Haible <bruno@clisp.org> parents: 10780 diff changeset	51 #elif defined __MINT__ /* Atari FreeMiNT */
d4475bf2a2bf Add tentative support for FreeMiNT. Bruno Haible <bruno@clisp.org> parents: 10780 diff changeset	52 return fp->__mode.__read;
16344 ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	53 #elif defined EPLAN9 /* Plan9 */
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	54 int fd = fp->fd;
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	55 if (fd >= 0)
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	56 {
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	57 int flags = fcntl (fd, F_GETFL, NULL);
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	58 if (flags >= 0)
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	59 {
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	60 flags &= O_ACCMODE;
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	61 return (flags == O_RDONLY \|\| flags == O_RDWR);
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	62 }
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	63 }
ecfc57537d99 stdioext: Add tentative support for Plan9. Bruno Haible <bruno@clisp.org> parents: 16201 diff changeset	64 return 0;
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	65 #else
14380 5cee7a3cd6ca maint: adjust cpp indentation for my modules, as well Eric Blake <eblake@redhat.com> parents: 14079 diff changeset	66 # error "Please port gnulib freadable.c to your platform! Look at the definition of fopen, fdopen on your system, then report this to bug-gnulib."
8687 d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	67 #endif
d9b52dd72361 New module 'freadable'. Bruno Haible <bruno@clisp.org> parents: diff changeset	68 }

Mercurial > gnulib

annotate lib/freadable.c @ 40186:8964917f9574