(full_write): Some buggy drivers return 0 when you
[debian/tar] / lib / full-write.c
1 /* full-write.c -- an interface to write that retries after interrupts
2    Copyright 1993, 1994, 1997, 1998, 1999, 2000 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    Copied largely from GNU C's cccp.c.
19    */
20
21 #if HAVE_CONFIG_H
22 # include <config.h>
23 #endif
24
25 #include <sys/types.h>
26
27 #include "safe-read.h"
28
29 #if HAVE_UNISTD_H
30 # include <unistd.h>
31 #endif
32
33 #include <errno.h>
34 #ifndef errno
35 extern int errno;
36 #endif
37
38 /* Write LEN bytes at PTR to descriptor DESC, retrying if interrupted.
39    Return LEN upon success, -1 (setting errno) otherwise.  */
40
41 ssize_t
42 full_write (int desc, const char *ptr, size_t len)
43 {
44   ssize_t total_written = 0;
45
46   while (len > 0)
47     {
48       ssize_t written = write (desc, ptr, len);
49       if (written <= 0)
50         {
51           /* Some buggy drivers return 0 when you fall off a device's end.  */
52           if (written == 0)
53             errno = ENOSPC;
54 #ifdef EINTR
55           if (errno == EINTR)
56             continue;
57 #endif
58           return -1;
59         }
60       total_written += written;
61       ptr += written;
62       len -= written;
63     }
64   return total_written;
65 }