Home | History | Annotate | Download | only in openssh
      1 /* $OpenBSD: progressmeter.c,v 1.37 2006/08/03 03:34:42 deraadt Exp $ */
      2 /*
      3  * Copyright (c) 2003 Nils Nordman.  All rights reserved.
      4  *
      5  * Redistribution and use in source and binary forms, with or without
      6  * modification, are permitted provided that the following conditions
      7  * are met:
      8  * 1. Redistributions of source code must retain the above copyright
      9  *    notice, this list of conditions and the following disclaimer.
     10  * 2. Redistributions in binary form must reproduce the above copyright
     11  *    notice, this list of conditions and the following disclaimer in the
     12  *    documentation and/or other materials provided with the distribution.
     13  *
     14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     24  */
     25 
     26 #include "includes.h"
     27 
     28 #include <sys/types.h>
     29 #include <sys/ioctl.h>
     30 #include <sys/uio.h>
     31 
     32 #include <errno.h>
     33 #include <signal.h>
     34 #include <stdio.h>
     35 #include <string.h>
     36 #include <time.h>
     37 #include <unistd.h>
     38 
     39 #include "progressmeter.h"
     40 #include "atomicio.h"
     41 #include "misc.h"
     42 
     43 #define DEFAULT_WINSIZE 80
     44 #define MAX_WINSIZE 512
     45 #define PADDING 1		/* padding between the progress indicators */
     46 #define UPDATE_INTERVAL 1	/* update the progress meter every second */
     47 #define STALL_TIME 5		/* we're stalled after this many seconds */
     48 
     49 /* determines whether we can output to the terminal */
     50 static int can_output(void);
     51 
     52 /* formats and inserts the specified size into the given buffer */
     53 static void format_size(char *, int, off_t);
     54 static void format_rate(char *, int, off_t);
     55 
     56 /* window resizing */
     57 static void sig_winch(int);
     58 static void setscreensize(void);
     59 
     60 /* updates the progressmeter to reflect the current state of the transfer */
     61 void refresh_progress_meter(void);
     62 
     63 /* signal handler for updating the progress meter */
     64 static void update_progress_meter(int);
     65 
     66 static time_t start;		/* start progress */
     67 static time_t last_update;	/* last progress update */
     68 static char *file;		/* name of the file being transferred */
     69 static off_t end_pos;		/* ending position of transfer */
     70 static off_t cur_pos;		/* transfer position as of last refresh */
     71 static volatile off_t *counter;	/* progress counter */
     72 static long stalled;		/* how long we have been stalled */
     73 static int bytes_per_second;	/* current speed in bytes per second */
     74 static int win_size;		/* terminal window size */
     75 static volatile sig_atomic_t win_resized; /* for window resizing */
     76 
     77 /* units for format_size */
     78 static const char unit[] = " KMGT";
     79 
     80 static int
     81 can_output(void)
     82 {
     83 	return (getpgrp() == tcgetpgrp(STDOUT_FILENO));
     84 }
     85 
     86 static void
     87 format_rate(char *buf, int size, off_t bytes)
     88 {
     89 	int i;
     90 
     91 	bytes *= 100;
     92 	for (i = 0; bytes >= 100*1000 && unit[i] != 'T'; i++)
     93 		bytes = (bytes + 512) / 1024;
     94 	if (i == 0) {
     95 		i++;
     96 		bytes = (bytes + 512) / 1024;
     97 	}
     98 	snprintf(buf, size, "%3lld.%1lld%c%s",
     99 	    (long long) (bytes + 5) / 100,
    100 	    (long long) (bytes + 5) / 10 % 10,
    101 	    unit[i],
    102 	    i ? "B" : " ");
    103 }
    104 
    105 static void
    106 format_size(char *buf, int size, off_t bytes)
    107 {
    108 	int i;
    109 
    110 	for (i = 0; bytes >= 10000 && unit[i] != 'T'; i++)
    111 		bytes = (bytes + 512) / 1024;
    112 	snprintf(buf, size, "%4lld%c%s",
    113 	    (long long) bytes,
    114 	    unit[i],
    115 	    i ? "B" : " ");
    116 }
    117 
    118 void
    119 refresh_progress_meter(void)
    120 {
    121 	char buf[MAX_WINSIZE + 1];
    122 	time_t now;
    123 	off_t transferred;
    124 	double elapsed;
    125 	int percent;
    126 	off_t bytes_left;
    127 	int cur_speed;
    128 	int hours, minutes, seconds;
    129 	int i, len;
    130 	int file_len;
    131 
    132 	transferred = *counter - cur_pos;
    133 	cur_pos = *counter;
    134 	now = time(NULL);
    135 	bytes_left = end_pos - cur_pos;
    136 
    137 	if (bytes_left > 0)
    138 		elapsed = now - last_update;
    139 	else {
    140 		elapsed = now - start;
    141 		/* Calculate true total speed when done */
    142 		transferred = end_pos;
    143 		bytes_per_second = 0;
    144 	}
    145 
    146 	/* calculate speed */
    147 	if (elapsed != 0)
    148 		cur_speed = (transferred / elapsed);
    149 	else
    150 		cur_speed = transferred;
    151 
    152 #define AGE_FACTOR 0.9
    153 	if (bytes_per_second != 0) {
    154 		bytes_per_second = (bytes_per_second * AGE_FACTOR) +
    155 		    (cur_speed * (1.0 - AGE_FACTOR));
    156 	} else
    157 		bytes_per_second = cur_speed;
    158 
    159 	/* filename */
    160 	buf[0] = '\0';
    161 	file_len = win_size - 35;
    162 	if (file_len > 0) {
    163 		len = snprintf(buf, file_len + 1, "\r%s", file);
    164 		if (len < 0)
    165 			len = 0;
    166 		if (len >= file_len + 1)
    167 			len = file_len;
    168 		for (i = len; i < file_len; i++)
    169 			buf[i] = ' ';
    170 		buf[file_len] = '\0';
    171 	}
    172 
    173 	/* percent of transfer done */
    174 	if (end_pos != 0)
    175 		percent = ((float)cur_pos / end_pos) * 100;
    176 	else
    177 		percent = 100;
    178 	snprintf(buf + strlen(buf), win_size - strlen(buf),
    179 	    " %3d%% ", percent);
    180 
    181 	/* amount transferred */
    182 	format_size(buf + strlen(buf), win_size - strlen(buf),
    183 	    cur_pos);
    184 	strlcat(buf, " ", win_size);
    185 
    186 	/* bandwidth usage */
    187 	format_rate(buf + strlen(buf), win_size - strlen(buf),
    188 	    (off_t)bytes_per_second);
    189 	strlcat(buf, "/s ", win_size);
    190 
    191 	/* ETA */
    192 	if (!transferred)
    193 		stalled += elapsed;
    194 	else
    195 		stalled = 0;
    196 
    197 	if (stalled >= STALL_TIME)
    198 		strlcat(buf, "- stalled -", win_size);
    199 	else if (bytes_per_second == 0 && bytes_left)
    200 		strlcat(buf, "  --:-- ETA", win_size);
    201 	else {
    202 		if (bytes_left > 0)
    203 			seconds = bytes_left / bytes_per_second;
    204 		else
    205 			seconds = elapsed;
    206 
    207 		hours = seconds / 3600;
    208 		seconds -= hours * 3600;
    209 		minutes = seconds / 60;
    210 		seconds -= minutes * 60;
    211 
    212 		if (hours != 0)
    213 			snprintf(buf + strlen(buf), win_size - strlen(buf),
    214 			    "%d:%02d:%02d", hours, minutes, seconds);
    215 		else
    216 			snprintf(buf + strlen(buf), win_size - strlen(buf),
    217 			    "  %02d:%02d", minutes, seconds);
    218 
    219 		if (bytes_left > 0)
    220 			strlcat(buf, " ETA", win_size);
    221 		else
    222 			strlcat(buf, "    ", win_size);
    223 	}
    224 
    225 	atomicio(vwrite, STDOUT_FILENO, buf, win_size - 1);
    226 	last_update = now;
    227 }
    228 
    229 /*ARGSUSED*/
    230 static void
    231 update_progress_meter(int ignore)
    232 {
    233 	int save_errno;
    234 
    235 	save_errno = errno;
    236 
    237 	if (win_resized) {
    238 		setscreensize();
    239 		win_resized = 0;
    240 	}
    241 	if (can_output())
    242 		refresh_progress_meter();
    243 
    244 	signal(SIGALRM, update_progress_meter);
    245 	alarm(UPDATE_INTERVAL);
    246 	errno = save_errno;
    247 }
    248 
    249 void
    250 start_progress_meter(char *f, off_t filesize, off_t *ctr)
    251 {
    252 	start = last_update = time(NULL);
    253 	file = f;
    254 	end_pos = filesize;
    255 	cur_pos = 0;
    256 	counter = ctr;
    257 	stalled = 0;
    258 	bytes_per_second = 0;
    259 
    260 	setscreensize();
    261 	if (can_output())
    262 		refresh_progress_meter();
    263 
    264 	signal(SIGALRM, update_progress_meter);
    265 	signal(SIGWINCH, sig_winch);
    266 	alarm(UPDATE_INTERVAL);
    267 }
    268 
    269 void
    270 stop_progress_meter(void)
    271 {
    272 	alarm(0);
    273 
    274 	if (!can_output())
    275 		return;
    276 
    277 	/* Ensure we complete the progress */
    278 	if (cur_pos != end_pos)
    279 		refresh_progress_meter();
    280 
    281 	atomicio(vwrite, STDOUT_FILENO, "\n", 1);
    282 }
    283 
    284 /*ARGSUSED*/
    285 static void
    286 sig_winch(int sig)
    287 {
    288 	win_resized = 1;
    289 }
    290 
    291 static void
    292 setscreensize(void)
    293 {
    294 	struct winsize winsize;
    295 
    296 	if (ioctl(STDOUT_FILENO, TIOCGWINSZ, &winsize) != -1 &&
    297 	    winsize.ws_col != 0) {
    298 		if (winsize.ws_col > MAX_WINSIZE)
    299 			win_size = MAX_WINSIZE;
    300 		else
    301 			win_size = winsize.ws_col;
    302 	} else
    303 		win_size = DEFAULT_WINSIZE;
    304 	win_size += 1;					/* trailing \0 */
    305 }
    306