temporarily disable elisp exception tests
[bpt/guile.git] / lib / binary-io.h
CommitLineData
3d458a81 1/* Binary mode I/O.
5e69ceb7 2 Copyright (C) 2001, 2003, 2005, 2008-2014 Free Software Foundation, Inc.
3d458a81
AW
3
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU Lesser General Public License as published by
6 the Free Software Foundation; either version 3 of the License, or
7 (at your option) any later version.
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 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
16
17#ifndef _BINARY_H
18#define _BINARY_H
19
20/* For systems that distinguish between text and binary I/O.
21 O_BINARY is guaranteed by the gnulib <fcntl.h>. */
22#include <fcntl.h>
23
24/* The MSVC7 <stdio.h> doesn't like to be included after '#define fileno ...',
25 so we include it here first. */
26#include <stdio.h>
27
5e69ceb7
MW
28#ifndef _GL_INLINE_HEADER_BEGIN
29 #error "Please include config.h first."
30#endif
7ae4e75a
LC
31_GL_INLINE_HEADER_BEGIN
32#ifndef BINARY_IO_INLINE
33# define BINARY_IO_INLINE _GL_INLINE
34#endif
35
005de2e8
LC
36/* set_binary_mode (fd, mode)
37 sets the binary/text I/O mode of file descriptor fd to the given mode
38 (must be O_BINARY or O_TEXT) and returns the previous mode. */
3d458a81
AW
39#if O_BINARY
40# if defined __EMX__ || defined __DJGPP__ || defined __CYGWIN__
41# include <io.h> /* declares setmode() */
005de2e8 42# define set_binary_mode setmode
3d458a81 43# else
005de2e8 44# define set_binary_mode _setmode
3d458a81
AW
45# undef fileno
46# define fileno _fileno
47# endif
3d458a81 48#else
005de2e8 49 /* On reasonable systems, binary I/O is the only choice. */
7ae4e75a 50 /* Use a function rather than a macro, to avoid gcc warnings
005de2e8 51 "warning: statement with no effect". */
7ae4e75a 52BINARY_IO_INLINE int
005de2e8
LC
53set_binary_mode (int fd, int mode)
54{
55 (void) fd;
56 (void) mode;
57 return O_BINARY;
58}
59#endif
60
61/* SET_BINARY (fd);
62 changes the file descriptor fd to perform binary I/O. */
63#ifdef __DJGPP__
64# include <unistd.h> /* declares isatty() */
65 /* Avoid putting stdin/stdout in binary mode if it is connected to
66 the console, because that would make it impossible for the user
67 to interrupt the program through Ctrl-C or Ctrl-Break. */
68# define SET_BINARY(fd) ((void) (!isatty (fd) ? (set_binary_mode (fd, O_BINARY), 0) : 0))
69#else
70# define SET_BINARY(fd) ((void) set_binary_mode (fd, O_BINARY))
3d458a81
AW
71#endif
72
7ae4e75a
LC
73_GL_INLINE_HEADER_END
74
3d458a81 75#endif /* _BINARY_H */