c84c79b924bdd43b98fd73ad8e9502b8e57a5c25
[gnulib.git] / lib / safe-read.c
1 /* An interface to read and write that retries after interrupts.
2    Copyright (C) 1993, 1994, 1998, 2002-2003 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 2, or (at your option)
7    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 General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software Foundation,
16    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
17
18 #if HAVE_CONFIG_H
19 # include <config.h>
20 #endif
21
22 /* Specification.  */
23 #ifdef SAFE_WRITE
24 # include "safe-write.h"
25 #else
26 # include "safe-read.h"
27 #endif
28
29 /* Get ssize_t.  */
30 #include <sys/types.h>
31 #if HAVE_UNISTD_H
32 # include <unistd.h>
33 #endif
34
35 #include <errno.h>
36 #ifndef errno
37 extern int errno;
38 #endif
39
40 #ifdef EINTR
41 # define IS_EINTR(x) ((x) == EINTR)
42 #else
43 # define IS_EINTR(x) 0
44 #endif
45
46 #include <limits.h>
47
48 #ifndef CHAR_BIT
49 # define CHAR_BIT 8
50 #endif
51
52 /* The extra casts work around common compiler bugs.  */
53 #define TYPE_SIGNED(t) (! ((t) 0 < (t) -1))
54 /* The outer cast is needed to work around a bug in Cray C 5.0.3.0.
55    It is necessary at least when t == time_t.  */
56 #define TYPE_MINIMUM(t) ((t) (TYPE_SIGNED (t) \
57                               ? ~ (t) 0 << (sizeof (t) * CHAR_BIT - 1) : (t) 0))
58 #define TYPE_MAXIMUM(t) ((t) (~ (t) 0 - TYPE_MINIMUM (t)))
59
60 #ifndef INT_MAX
61 # define INT_MAX TYPE_MAXIMUM (int)
62 #endif
63
64 #ifdef SAFE_WRITE
65 # define safe_rw safe_write
66 # define rw write
67 #else
68 # define safe_rw safe_read
69 # define rw read
70 # undef const
71 # define const /* empty */
72 #endif
73
74 /* Read(write) up to COUNT bytes at BUF from(to) descriptor FD, retrying if
75    interrupted.  Return the actual number of bytes read(written), zero for EOF,
76    or SAFE_READ_ERROR(SAFE_WRITE_ERROR) upon error.  */
77 size_t
78 safe_rw (int fd, void const *buf, size_t count)
79 {
80   ssize_t result;
81
82   /* POSIX limits COUNT to SSIZE_MAX, but we limit it further, requiring
83      that COUNT <= INT_MAX, to avoid triggering a bug in Tru64 5.1.
84      When decreasing COUNT, keep the file pointer block-aligned.
85      Note that in any case, read(write) may succeed, yet read(write)
86      fewer than COUNT bytes, so the caller must be prepared to handle
87      partial results.  */
88   if (count > INT_MAX)
89     count = INT_MAX & ~8191;
90
91   do
92     {
93       result = rw (fd, buf, count);
94     }
95   while (result < 0 && IS_EINTR (errno));
96
97   return (size_t) result;
98 }