progressmeter.c

   1 /*
   2  * Copyright (c) 1999 Theo de Raadt.  All rights reserved.
   3  * Copyright (c) 1999 Aaron Campbell.  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 /*
  27  * Copyright (c) 1997-2003 The NetBSD Foundation, Inc.
  28  * All rights reserved.
  29  *
  30  * This code is derived from software contributed to The NetBSD Foundation
  31  * by Luke Mewburn.
  32  *
  33  * This code is derived from software contributed to The NetBSD Foundation
  34  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
  35  * NASA Ames Research Center.
  36  *
  37  * Redistribution and use in source and binary forms, with or without
  38  * modification, are permitted provided that the following conditions
  39  * are met:
  40  * 1. Redistributions of source code must retain the above copyright
  41  *    notice, this list of conditions and the following disclaimer.
  42  * 2. Redistributions in binary form must reproduce the above copyright
  43  *    notice, this list of conditions and the following disclaimer in the
  44  *    documentation and/or other materials provided with the distribution.
  45  * 3. All advertising materials mentioning features or use of this software
  46  *    must display the following acknowledgement:
  47  *      This product includes software developed by the NetBSD
  48  *      Foundation, Inc. and its contributors.
  49  * 4. Neither the name of The NetBSD Foundation nor the names of its
  50  *    contributors may be used to endorse or promote products derived
  51  *    from this software without specific prior written permission.
  52  *
  53  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  54  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  55  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  56  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  57  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  58  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  59  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  60  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  61  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  62  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  63  * POSSIBILITY OF SUCH DAMAGE.
  64  */
  65
  66 #include "includes.h"
  67 RCSID("$OpenBSD: progressmeter.c,v 1.6 2003/04/07 21:58:05 millert Exp $");
  68
  69 #ifdef HAVE_LIBGEN_H
  70 #include <libgen.h>
  71 #endif
  72
  73 #include "atomicio.h"
  74 #include "progressmeter.h"
  75
  76 /* Number of seconds before xfer considered "stalled". */
  77 #define STALLTIME       5
  78 /* alarm() interval for updating progress meter. */
  79 #define PROGRESSTIME    1
  80
  81 /* Signal handler used for updating the progress meter. */
  82 static void update_progress_meter(int);
  83
  84 /* Returns non-zero if we are the foreground process. */
  85 static int foregroundproc(void);
  86
  87 /* Returns width of the terminal (for progress meter calculations). */
  88 static int get_tty_width(void);
  89
  90 /* Visual statistics about files as they are transferred. */
  91 static void draw_progress_meter(void);
  92
  93 /* Time a transfer started. */
  94 static struct timeval start;
  95
  96 /* Number of bytes of current file transferred so far. */
  97 static volatile off_t *statbytes;
  98
  99 /* Total size of current file. */
 100 static off_t totalbytes;
 101
 102 /* Name of current file being transferred. */
 103 static char *curfile;
 104
 105 /* Time of last update. */
 106 static struct timeval lastupdate;
 107
 108 /* Size at the time of the last update. */
 109 static off_t lastsize;
 110
 111 void
 112 start_progress_meter(char *file, off_t filesize, off_t *counter)
 113 {
 114         if ((curfile = basename(file)) == NULL)
 115                 curfile = file;
 116
 117         totalbytes = filesize;
 118         statbytes = counter;
 119         (void) gettimeofday(&start, (struct timezone *) 0);
 120         lastupdate = start;
 121         lastsize = 0;
 122
 123         draw_progress_meter();
 124         signal(SIGALRM, update_progress_meter);
 125         alarm(PROGRESSTIME);
 126 }
 127
 128 void
 129 stop_progress_meter()
 130 {
 131         alarm(0);
 132         draw_progress_meter();
 133         if (foregroundproc() != 0)
 134                 atomicio(write, fileno(stdout), "\n", 1);
 135 }
 136
 137 static void
 138 update_progress_meter(int ignore)
 139 {
 140         int save_errno = errno;
 141
 142         draw_progress_meter();
 143         signal(SIGALRM, update_progress_meter);
 144         alarm(PROGRESSTIME);
 145         errno = save_errno;
 146 }
 147
 148 static int
 149 foregroundproc(void)
 150 {
 151         static pid_t pgrp = -1;
 152         int ctty_pgrp;
 153
 154         if (pgrp == -1)
 155                 pgrp = getpgrp();
 156
 157 #ifdef HAVE_TCGETPGRP
 158         return ((ctty_pgrp = tcgetpgrp(STDOUT_FILENO)) != -1 &&
 159                         ctty_pgrp == pgrp);
 160 #else
 161         return ((ioctl(STDOUT_FILENO, TIOCGPGRP, &ctty_pgrp) != -1 &&
 162                  ctty_pgrp == pgrp));
 163 #endif
 164 }
 165
 166 static void
 167 draw_progress_meter()
 168 {
 169         static const char spaces[] = "                          "
 170             "                                                   "
 171             "                                                   "
 172             "                                                   "
 173             "                                                   "
 174             "                                                   ";
 175         static const char prefixes[] = " KMGTP";
 176         struct timeval now, td, wait;
 177         off_t cursize, abbrevsize, bytespersec;
 178         double elapsed;
 179         int ratio, remaining, i, ai, bi, nspaces;
 180         char buf[512];
 181
 182         if (foregroundproc() == 0)
 183                 return;
 184
 185         (void) gettimeofday(&now, (struct timezone *) 0);
 186         cursize = *statbytes;
 187         if (totalbytes != 0) {
 188                 ratio = 100.0 * cursize / totalbytes;
 189                 ratio = MAX(ratio, 0);
 190                 ratio = MIN(ratio, 100);
 191         } else
 192                 ratio = 100;
 193
 194         abbrevsize = cursize;
 195         for (ai = 0; abbrevsize >= 10000 && ai < sizeof(prefixes); ai++)
 196                 abbrevsize >>= 10;
 197
 198         timersub(&now, &lastupdate, &wait);
 199         if (cursize > lastsize) {
 200                 lastupdate = now;
 201                 lastsize = cursize;
 202                 wait.tv_sec = 0;
 203         }
 204         timersub(&now, &start, &td);
 205         elapsed = td.tv_sec + (td.tv_usec / 1000000.0);
 206
 207         bytespersec = 0;
 208         if (cursize > 0) {
 209                 bytespersec = cursize;
 210                 if (elapsed > 0.0)
 211                         bytespersec /= elapsed;
 212         }
 213         for (bi = 1; bytespersec >= 1024000 && bi < sizeof(prefixes); bi++)
 214                 bytespersec >>= 10;
 215
 216         nspaces = MIN(get_tty_width() - 79, sizeof(spaces) - 1);
 217
 218         snprintf(buf, sizeof(buf),
 219             "\r%-45.45s%.*s%3d%% %4lld%c%c %3lld.%01d%cB/s",
 220             curfile,
 221             nspaces,
 222             spaces,
 223             ratio,
 224             (int64_t)abbrevsize,
 225             prefixes[ai],
 226             ai == 0 ? ' ' : 'B',
 227             (int64_t)(bytespersec / 1024),
 228             (int)((bytespersec % 1024) * 10 / 1024),
 229             prefixes[bi]
 230         );
 231
 232         if (cursize <= 0 || elapsed <= 0.0 || cursize > totalbytes) {
 233                 snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
 234                     "   --:-- ETA");
 235         } else if (wait.tv_sec >= STALLTIME) {
 236                 snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
 237                     " - stalled -");
 238         } else {
 239                 if (cursize != totalbytes)
 240                         remaining = (int)(totalbytes / (cursize / elapsed) -
 241                             elapsed);
 242                 else
 243                         remaining = elapsed;
 244
 245                 i = remaining / 3600;
 246                 if (i)
 247                         snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
 248                             "%2d:", i);
 249                 else
 250                         snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
 251                             "   ");
 252                 i = remaining % 3600;
 253                 snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
 254                     "%02d:%02d%s", i / 60, i % 60,
 255                     (cursize != totalbytes) ? " ETA" : "    ");
 256         }
 257         atomicio(write, fileno(stdout), buf, strlen(buf));
 258 }
 259
 260 static int
 261 get_tty_width(void)
 262 {
 263         struct winsize winsize;
 264
 265         if (ioctl(fileno(stdout), TIOCGWINSZ, &winsize) != -1)
 266                 return (winsize.ws_col ? winsize.ws_col : 80);
 267         else
 268                 return (80);
 269 }