Magellan Linux

Contents of /trunk/mkinitrd-magellan/busybox/coreutils/tee.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 532 - (show annotations) (download)
Sat Sep 1 22:45:15 2007 UTC (16 years, 8 months ago) by niro
File MIME type: text/plain
File size: 2564 byte(s)
-import if magellan mkinitrd; it is a fork of redhats mkinitrd-5.0.8 with all magellan patches and features; deprecates magellan-src/mkinitrd

1 /* vi: set sw=4 ts=4: */
2 /*
3 * tee implementation for busybox
4 *
5 * Copyright (C) 2003 Manuel Novoa III <mjn3@codepoet.org>
6 *
7 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
8 */
9
10 /* BB_AUDIT SUSv3 compliant */
11 /* http://www.opengroup.org/onlinepubs/007904975/utilities/tee.html */
12
13 #include "busybox.h"
14 #include <signal.h>
15
16 int tee_main(int argc, char **argv)
17 {
18 const char *mode = "w\0a";
19 FILE **files;
20 FILE **fp;
21 char **names;
22 char **np;
23 int flags;
24 int retval = EXIT_SUCCESS;
25 #if ENABLE_FEATURE_TEE_USE_BLOCK_IO
26 ssize_t c;
27 # define buf bb_common_bufsiz1
28 #else
29 int c;
30 #endif
31 flags = getopt32(argc, argv, "ia"); /* 'a' must be 2nd */
32 argc -= optind;
33 argv += optind;
34
35 mode += (flags & 2); /* Since 'a' is the 2nd option... */
36
37 if (flags & 1) {
38 signal(SIGINT, SIG_IGN); /* TODO - switch to sigaction. */
39 }
40 /* gnu tee ignores SIGPIPE in case one of the output files is a pipe
41 * that doesn't consume all its input. Good idea... */
42 signal(SIGPIPE, SIG_IGN); /* TODO - switch to sigaction. */
43
44 /* Allocate an array of FILE *'s, with one extra for a sentinal. */
45 fp = files = xzalloc(sizeof(FILE *) * (argc + 2));
46 np = names = argv - 1;
47
48 files[0] = stdout;
49 goto GOT_NEW_FILE;
50 do {
51 *fp = fopen_or_warn(*argv, mode);
52 if (*fp == NULL) {
53 retval = EXIT_FAILURE;
54 continue;
55 }
56 *np = *argv++;
57 GOT_NEW_FILE:
58 setbuf(*fp++, NULL); /* tee must not buffer output. */
59 np++;
60 } while (*argv);
61 /* names[0] will be filled later */
62
63 #if ENABLE_FEATURE_TEE_USE_BLOCK_IO
64 while ((c = safe_read(STDIN_FILENO, buf, BUFSIZ)) > 0) {
65 fp = files;
66 do
67 fwrite(buf, 1, c, *fp++);
68 while (*fp);
69 }
70 if (c < 0) { /* Make sure read errors are signaled. */
71 retval = EXIT_FAILURE;
72 }
73 #else
74 setvbuf(stdout, NULL, _IONBF, 0);
75 while ((c = getchar()) != EOF) {
76 fp = files;
77 do
78 putc(c, *fp++);
79 while (*fp);
80 }
81 #endif
82
83 /* Now we need to check for i/o errors on stdin and the various
84 * output files. Since we know that the first entry in the output
85 * file table is stdout, we can save one "if ferror" test by
86 * setting the first entry to stdin and checking stdout error
87 * status with fflush_stdout_and_exit()... although fflush()ing
88 * is unnecessary here. */
89 np = names;
90 fp = files;
91 names[0] = (char *) bb_msg_standard_input;
92 files[0] = stdin;
93 do { /* Now check for input and output errors. */
94 /* Checking ferror should be sufficient, but we may want to fclose.
95 * If we do, remember not to close stdin! */
96 die_if_ferror(*fp++, *np++);
97 } while (*fp);
98
99 fflush_stdout_and_exit(retval);
100 }