progress.c revision 1.2
1/*	$NetBSD: progress.c,v 1.2 2003/01/22 03:13:32 enami Exp $ */
2
3/*-
4 * Copyright (c) 2003 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by John Hawkinson.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of The NetBSD Foundation nor the names of its
19 *    contributors may be used to endorse or promote products derived
20 *    from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
23 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
24 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
25 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
26 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32 * POSSIBILITY OF SUCH DAMAGE.
33 */
34
35#include <sys/cdefs.h>
36#ifndef lint
37__RCSID("$NetBSD: progress.c,v 1.2 2003/01/22 03:13:32 enami Exp $");
38#endif				/* not lint */
39
40#include <sys/types.h>
41#include <sys/param.h>
42#include <sys/socket.h>
43#include <sys/ioctl.h>
44#include <sys/time.h>
45#include <sys/wait.h>
46#include <netinet/in.h>
47#include <arpa/ftp.h>
48
49#include <ctype.h>
50#include <err.h>
51#include <errno.h>
52#include <fcntl.h>
53#include <glob.h>
54#include <signal.h>
55#include <limits.h>
56#include <netdb.h>
57#include <stdio.h>
58#include <stdlib.h>
59#include <string.h>
60#include <termios.h>
61#include <time.h>
62#include <tzfile.h>
63#include <unistd.h>
64
65#define GLOBAL			/* force GLOBAL decls in progressbar.h to be
66				 * declared */
67#include "progressbar.h"
68
69static void usage(void);
70int main(int, char *[]);
71
72static void
73usage(void)
74{
75	fprintf(stderr,
76	    "usage: %s [-z] [-f file] [-l length] cmd [args...]\n",
77	    getprogname());
78	exit(1);
79}
80
81
82int
83main(int argc, char *argv[])
84{
85	static char fb_buf[BUFSIZ];
86	char *infile = NULL;
87	pid_t pid;
88	int ch, fd, outpipe[2], waitstat;
89	int lflag = 0, zflag = 0;
90	ssize_t nr, nw, off;
91	struct stat statb;
92
93	setprogname(argv[0]);
94
95	/* defaults: Read from stdin, 0 filesize (no completion estimate) */
96	fd = STDIN_FILENO;
97	filesize = 0;
98
99	while ((ch = getopt(argc, argv, "f:l:z")) != -1)
100		switch (ch) {
101		case 'f':
102			infile = optarg;
103			break;
104		case 'l':
105			lflag++;
106			filesize = strtoull(optarg, NULL, 0);
107			break;
108		case 'z':
109			zflag++;
110			break;
111		default:
112		case '?':
113			usage();
114			/* NOTREACHED */
115		}
116	argc -= optind;
117	argv += optind;
118
119	if (argc < 1)
120		usage();
121	if (infile && (fd = open(infile, O_RDONLY, 0)) < 0)
122		err(1, "%s", infile);
123
124	/* stat() to get the filesize unless overridden, or -z */
125	if (!zflag && !lflag && (fstat(fd, &statb) == 0))
126		filesize = statb.st_size;
127
128	/* gzip -l the file if we have the name and -z is given */
129	if (zflag && !lflag && infile != NULL) {
130		FILE *gzipsizepipe;
131		char buf[256], *cmd;
132		long size;
133
134		/*
135		 * Read second word of last line of gzip -l output. Looks like:
136		 * % gzip -l ../etc.tgz
137		 *   compressed uncompressed  ratio uncompressed_name
138		 * 	 119737       696320  82.8% ../etc.tar
139		 */
140
141		asprintf(&cmd, "gzip -l %s", infile);
142		if ((gzipsizepipe = popen(cmd, "r")) == NULL)
143			err(1, "reading compressed file length");
144		for (; fgets(buf, 256, gzipsizepipe) != NULL;)
145		    continue;
146		sscanf(buf, "%*d %ld", &size);
147		filesize = size;
148		if (pclose(gzipsizepipe) < 0)
149			err(1, "closing compressed file length pipe");
150		free(cmd);
151	}
152	/* Pipe input through gzip -dc if -z is given */
153	if (zflag) {
154		pid_t gzippid;
155		int gzippipe[2];
156
157		if (pipe(gzippipe) < 0)
158			err(1, "gzip pipe");
159		gzippid = fork();
160		if (gzippid < 0)
161			err(1, "fork for gzip");
162
163		if (gzippid) {
164			/* parent */
165			dup2(gzippipe[0], fd);
166			close(gzippipe[0]);
167			close(gzippipe[1]);
168		} else {
169			dup2(gzippipe[1], STDOUT_FILENO);
170			dup2(fd, STDIN_FILENO);
171			close(gzippipe[0]);
172			close(gzippipe[1]);
173			if (execlp("gzip", "gzip", "-dc", NULL))
174				err(1, "exec()ing gzip");
175		}
176	}
177
178	/* Initialize progressbar.c's global state */
179	bytes = 0;
180	progress = 1;
181	ttyout = stdout;
182	ttywidth = 80;
183
184	if (pipe(outpipe) < 0)
185		err(1, "output pipe");
186	pid = fork();
187	if (pid < 0)
188		err(1, "fork for output pipe");
189
190	if (pid == 0) {
191		/* child */
192		dup2(outpipe[0], STDIN_FILENO);
193		close(outpipe[0]);
194		close(outpipe[1]);
195		execvp(argv[0], argv);
196		err(1, "could not exec %s", argv[0]);
197	}
198	close(outpipe[0]);
199
200	progressmeter(-1);
201	while ((nr = read(fd, fb_buf, BUFSIZ)) > 0)
202		for (off = 0; nr; nr -= nw, off += nw, bytes += nw)
203			if ((nw = write(outpipe[1], fb_buf + off,
204			    (size_t) nr)) < 0)
205				err(1, "writing %d bytes to output pipe", nr);
206	close(outpipe[1]);
207
208	wait(&waitstat);
209
210	progressmeter(1);
211	return 0;
212}
213