Mercurial > hg > octave-kai > gnulib-hg
annotate lib/full-write.c @ 1929:f7d4ee7478d7
(get_date): Rename outermost local `probe' to `quarter'.
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Sun, 29 Aug 1999 12:28:56 +0000 |
| parents | c005b7ff8483 |
| children | a64de2641650 |
| rev | line source |
|---|---|
| 181 | 1 /* full-write.c -- an interface to write that retries after interrupts |
| 1252 | 2 Copyright (C) 1993, 1994, 1997, 1998 Free Software Foundation, Inc. |
| 179 | 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 | |
| 640 | 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. | |
| 179 | 17 |
| 18 Copied largely from GNU C's cccp.c. | |
| 19 */ | |
| 20 | |
| 720 | 21 #if HAVE_CONFIG_H |
| 640 | 22 # include <config.h> |
| 179 | 23 #endif |
| 24 | |
| 25 #include <sys/types.h> | |
| 26 | |
| 720 | 27 #if HAVE_UNISTD_H |
| 640 | 28 # include <unistd.h> |
| 179 | 29 #endif |
| 30 | |
| 31 #include <errno.h> | |
| 380 | 32 #ifndef errno |
| 179 | 33 extern int errno; |
| 34 #endif | |
| 35 | |
| 36 /* Write LEN bytes at PTR to descriptor DESC, retrying if interrupted. | |
|
557
3e36672c3a83
Revert last change. Comment didn't add anything.
Jim Meyering <jim@meyering.net>
parents:
556
diff
changeset
|
37 Return LEN upon success, write's (negative) error code otherwise. */ |
| 179 | 38 |
| 39 int | |
| 1252 | 40 full_write (int desc, const char *ptr, size_t len) |
| 179 | 41 { |
| 181 | 42 int total_written; |
| 43 | |
| 44 total_written = 0; | |
| 179 | 45 while (len > 0) |
| 46 { | |
| 47 int written = write (desc, ptr, len); | |
|
938
28d73bdb3f50
(full_write): Add comment regarding failure due to bug in
Jim Meyering <jim@meyering.net>
parents:
720
diff
changeset
|
48 /* FIXME: write on my slackware Linux 1.2.13 returns zero when |
|
28d73bdb3f50
(full_write): Add comment regarding failure due to bug in
Jim Meyering <jim@meyering.net>
parents:
720
diff
changeset
|
49 I try to write more data than there is room on a floppy disk. |
|
28d73bdb3f50
(full_write): Add comment regarding failure due to bug in
Jim Meyering <jim@meyering.net>
parents:
720
diff
changeset
|
50 This puts dd into an infinite loop. Reproduce with |
|
28d73bdb3f50
(full_write): Add comment regarding failure due to bug in
Jim Meyering <jim@meyering.net>
parents:
720
diff
changeset
|
51 dd if=/dev/zero of=/dev/fd0. */ |
| 179 | 52 if (written < 0) |
| 53 { | |
| 54 #ifdef EINTR | |
| 55 if (errno == EINTR) | |
| 56 continue; | |
| 57 #endif | |
| 58 return written; | |
| 59 } | |
| 181 | 60 total_written += written; |
| 179 | 61 ptr += written; |
| 62 len -= written; | |
| 63 } | |
| 181 | 64 return total_written; |
| 179 | 65 } |