mirror of
https://github.com/moparisthebest/curl
synced 2024-12-22 08:08:50 -05:00
c55d0bb804
made the getinfo() stuff divide with 1000.0 now to enforce floating point since Paul Harrington claims the 7.9.1 still uses even second resolution in the timers there
383 lines
12 KiB
C
383 lines
12 KiB
C
/*****************************************************************************
|
|
* _ _ ____ _
|
|
* Project ___| | | | _ \| |
|
|
* / __| | | | |_) | |
|
|
* | (__| |_| | _ <| |___
|
|
* \___|\___/|_| \_\_____|
|
|
*
|
|
* Copyright (C) 2001, Daniel Stenberg, <daniel@haxx.se>, et al.
|
|
*
|
|
* In order to be useful for every potential user, curl and libcurl are
|
|
* dual-licensed under the MPL and the MIT/X-derivate licenses.
|
|
*
|
|
* You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
|
* copies of the Software, and permit persons to whom the Software is
|
|
* furnished to do so, under the terms of the MPL or the MIT/X-derivate
|
|
* licenses. You may pick one of these licenses.
|
|
*
|
|
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
|
* KIND, either express or implied.
|
|
*
|
|
* $Id$
|
|
*****************************************************************************/
|
|
|
|
#include "setup.h"
|
|
|
|
#include <string.h>
|
|
|
|
#if defined(WIN32) && !defined(__GNUC__) || defined(__MINGW32__)
|
|
#if defined(__MINGW32__)
|
|
#include <winsock.h>
|
|
#endif
|
|
#include <time.h>
|
|
#endif
|
|
|
|
/* 20000318 mgs
|
|
* later we use _scrsize to determine the screen width, this emx library
|
|
* function needs stdlib.h to be included */
|
|
#if defined(__EMX__)
|
|
#include <stdlib.h>
|
|
#endif
|
|
|
|
#include <curl/curl.h>
|
|
#include "urldata.h"
|
|
#include "sendf.h"
|
|
|
|
#include "progress.h"
|
|
|
|
static void time2str(char *r, int t)
|
|
{
|
|
int h = (t/3600);
|
|
int m = (t-(h*3600))/60;
|
|
int s = (t-(h*3600)-(m*60));
|
|
sprintf(r,"%2d:%02d:%02d",h,m,s);
|
|
}
|
|
|
|
/* The point of this function would be to return a string of the input data,
|
|
but never longer than 5 columns. Add suffix k, M, G when suitable... */
|
|
static char *max5data(double bytes, char *max5)
|
|
{
|
|
#define ONE_KILOBYTE 1024
|
|
#define ONE_MEGABYTE (1024*1024)
|
|
|
|
if(bytes < 100000) {
|
|
sprintf(max5, "%5d", (int)bytes);
|
|
return max5;
|
|
}
|
|
if(bytes < (9999*ONE_KILOBYTE)) {
|
|
sprintf(max5, "%4dk", (int)bytes/ONE_KILOBYTE);
|
|
return max5;
|
|
}
|
|
if(bytes < (100*ONE_MEGABYTE)) {
|
|
/* 'XX.XM' is good as long as we're less than 100 megs */
|
|
sprintf(max5, "%4.1fM", bytes/ONE_MEGABYTE);
|
|
return max5;
|
|
}
|
|
sprintf(max5, "%4dM", (int)bytes/ONE_MEGABYTE);
|
|
return max5;
|
|
}
|
|
|
|
/*
|
|
|
|
New proposed interface, 9th of February 2000:
|
|
|
|
pgrsStartNow() - sets start time
|
|
pgrsSetDownloadSize(x) - known expected download size
|
|
pgrsSetUploadSize(x) - known expected upload size
|
|
pgrsSetDownloadCounter() - amount of data currently downloaded
|
|
pgrsSetUploadCounter() - amount of data currently uploaded
|
|
pgrsUpdate() - show progress
|
|
pgrsDone() - transfer complete
|
|
|
|
*/
|
|
|
|
void Curl_pgrsDone(struct connectdata *conn)
|
|
{
|
|
struct SessionHandle *data = conn->data;
|
|
if(!(data->progress.flags & PGRS_HIDE)) {
|
|
data->progress.lastshow=0;
|
|
Curl_pgrsUpdate(conn); /* the final (forced) update */
|
|
if(!data->progress.callback)
|
|
/* only output if we don't use progress callback */
|
|
fprintf(data->set.err, "\n");
|
|
}
|
|
}
|
|
|
|
void Curl_pgrsTime(struct SessionHandle *data, timerid timer)
|
|
{
|
|
switch(timer) {
|
|
default:
|
|
case TIMER_NONE:
|
|
/* mistake filter */
|
|
break;
|
|
case TIMER_STARTSINGLE:
|
|
/* This is set at the start of a single fetch, there may be several
|
|
fetches within an operation, why we add all other times relative
|
|
to this one */
|
|
data->progress.t_startsingle = Curl_tvnow();
|
|
break;
|
|
|
|
case TIMER_NAMELOOKUP:
|
|
data->progress.t_nslookup +=
|
|
(double)Curl_tvdiff(Curl_tvnow(), data->progress.t_startsingle)/1000.0;
|
|
break;
|
|
case TIMER_CONNECT:
|
|
data->progress.t_connect +=
|
|
(double)Curl_tvdiff(Curl_tvnow(), data->progress.t_startsingle)/1000.0;
|
|
break;
|
|
case TIMER_PRETRANSFER:
|
|
data->progress.t_pretransfer +=
|
|
(double)Curl_tvdiff(Curl_tvnow(), data->progress.t_startsingle)/1000.0;
|
|
break;
|
|
case TIMER_POSTRANSFER:
|
|
/* this is the normal end-of-transfer thing */
|
|
break;
|
|
}
|
|
}
|
|
|
|
void Curl_pgrsStartNow(struct SessionHandle *data)
|
|
{
|
|
data->progress.speeder_c = 0; /* reset the progress meter display */
|
|
data->progress.start = Curl_tvnow();
|
|
}
|
|
|
|
void Curl_pgrsSetDownloadCounter(struct SessionHandle *data, double size)
|
|
{
|
|
data->progress.downloaded = size;
|
|
}
|
|
|
|
void Curl_pgrsSetUploadCounter(struct SessionHandle *data, double size)
|
|
{
|
|
data->progress.uploaded = size;
|
|
}
|
|
|
|
void Curl_pgrsSetDownloadSize(struct SessionHandle *data, double size)
|
|
{
|
|
if(size > 0) {
|
|
data->progress.size_dl = size;
|
|
data->progress.flags |= PGRS_DL_SIZE_KNOWN;
|
|
}
|
|
}
|
|
|
|
void Curl_pgrsSetUploadSize(struct SessionHandle *data, double size)
|
|
{
|
|
if(size > 0) {
|
|
data->progress.size_ul = size;
|
|
data->progress.flags |= PGRS_UL_SIZE_KNOWN;
|
|
}
|
|
}
|
|
|
|
/* EXAMPLE OUTPUT to follow:
|
|
|
|
% Total % Received % Xferd Average Speed Time Curr.
|
|
Dload Upload Total Current Left Speed
|
|
100 12345 100 12345 100 12345 12345 12345 12:12:12 12:12:12 12:12:12 12345
|
|
|
|
*/
|
|
|
|
int Curl_pgrsUpdate(struct connectdata *conn)
|
|
{
|
|
struct timeval now;
|
|
int result;
|
|
|
|
char max5[6][10];
|
|
double dlpercen=0;
|
|
double ulpercen=0;
|
|
double total_percen=0;
|
|
|
|
double total_transfer;
|
|
double total_expected_transfer;
|
|
double timespent;
|
|
|
|
struct SessionHandle *data = conn->data;
|
|
|
|
int nowindex = data->progress.speeder_c% CURR_TIME;
|
|
int checkindex;
|
|
|
|
int countindex; /* amount of seconds stored in the speeder array */
|
|
|
|
char time_left[10];
|
|
char time_total[10];
|
|
char time_current[10];
|
|
|
|
double ulestimate=0;
|
|
double dlestimate=0;
|
|
|
|
double total_estimate;
|
|
|
|
|
|
if(data->progress.flags & PGRS_HIDE)
|
|
; /* We do enter this function even if we don't wanna see anything, since
|
|
this is were lots of the calculations are being made that will be used
|
|
even when not displayed! */
|
|
else if(!(data->progress.flags & PGRS_HEADERS_OUT)) {
|
|
if (!data->progress.callback) {
|
|
if(conn->resume_from)
|
|
fprintf(data->set.err, "** Resuming transfer from byte position %d\n",
|
|
conn->resume_from);
|
|
fprintf(data->set.err,
|
|
" %% Total %% Received %% Xferd Average Speed Time Curr.\n"
|
|
" Dload Upload Total Current Left Speed\n");
|
|
}
|
|
data->progress.flags |= PGRS_HEADERS_OUT; /* headers are shown */
|
|
}
|
|
|
|
now = Curl_tvnow(); /* what time is it */
|
|
|
|
/* The exact time spent so far (from the start) */
|
|
timespent = (double)Curl_tvdiff (now, data->progress.start)/1000;
|
|
|
|
data->progress.timespent = (long)timespent;
|
|
|
|
/* The average download speed this far */
|
|
data->progress.dlspeed =
|
|
data->progress.downloaded/(timespent>0.01?timespent:1);
|
|
|
|
/* The average upload speed this far */
|
|
data->progress.ulspeed =
|
|
data->progress.uploaded/(timespent>0.01?timespent:1);
|
|
|
|
if(data->progress.lastshow == Curl_tvlong(now))
|
|
return 0; /* never update this more than once a second if the end isn't
|
|
reached */
|
|
data->progress.lastshow = now.tv_sec;
|
|
|
|
/* Let's do the "current speed" thing, which should use the fastest
|
|
of the dl/ul speeds. Store the fasted speed at entry 'nowindex'. */
|
|
data->progress.speeder[ nowindex ] =
|
|
data->progress.downloaded>data->progress.uploaded?
|
|
data->progress.downloaded:data->progress.uploaded;
|
|
|
|
/* remember the exact time for this moment */
|
|
data->progress.speeder_time [ nowindex ] = now;
|
|
|
|
/* advance our speeder_c counter, which is increased every time we get
|
|
here and we expect it to never wrap as 2^32 is a lot of seconds! */
|
|
data->progress.speeder_c++;
|
|
|
|
/* figure out how many index entries of data we have stored in our speeder
|
|
array. With N_ENTRIES filled in, we have about N_ENTRIES-1 seconds of
|
|
transfer. Imagine, after one second we have filled in two entries,
|
|
after two seconds we've filled in three entries etc. */
|
|
countindex = ((data->progress.speeder_c>=CURR_TIME)?
|
|
CURR_TIME:data->progress.speeder_c) - 1;
|
|
|
|
/* first of all, we don't do this if there's no counted seconds yet */
|
|
if(countindex) {
|
|
long span_ms;
|
|
|
|
/* Get the index position to compare with the 'nowindex' position.
|
|
Get the oldest entry possible. While we have less than CURR_TIME
|
|
entries, the first entry will remain the oldest. */
|
|
checkindex = (data->progress.speeder_c>=CURR_TIME)?
|
|
data->progress.speeder_c%CURR_TIME:0;
|
|
|
|
/* Figure out the exact time for the time span */
|
|
span_ms = Curl_tvdiff(now,
|
|
data->progress.speeder_time[checkindex]);
|
|
if(0 == span_ms)
|
|
span_ms=1; /* at least one millisecond MUST have passed */
|
|
|
|
/* Calculate the average speed the last 'countindex' seconds */
|
|
data->progress.current_speed =
|
|
(data->progress.speeder[nowindex]-
|
|
data->progress.speeder[checkindex])/((double)span_ms/1000);
|
|
}
|
|
else
|
|
/* the first second we use the main average */
|
|
data->progress.current_speed =
|
|
(data->progress.ulspeed>data->progress.dlspeed)?
|
|
data->progress.ulspeed:data->progress.dlspeed;
|
|
|
|
if(data->progress.flags & PGRS_HIDE)
|
|
return 0;
|
|
|
|
else if(data->set.fprogress) {
|
|
/* There's a callback set, so we call that instead of writing
|
|
anything ourselves. This really is the way to go. */
|
|
result= data->set.fprogress(data->set.progress_client,
|
|
data->progress.size_dl,
|
|
data->progress.downloaded,
|
|
data->progress.size_ul,
|
|
data->progress.uploaded);
|
|
if(result)
|
|
failf(data, "Callback aborted");
|
|
return result;
|
|
}
|
|
|
|
/* Figure out the estimated time of arrival for the upload */
|
|
if((data->progress.flags & PGRS_UL_SIZE_KNOWN) && data->progress.ulspeed){
|
|
ulestimate = data->progress.size_ul / data->progress.ulspeed;
|
|
ulpercen = (data->progress.uploaded / data->progress.size_ul)*100;
|
|
}
|
|
|
|
/* ... and the download */
|
|
if((data->progress.flags & PGRS_DL_SIZE_KNOWN) && data->progress.dlspeed) {
|
|
dlestimate = data->progress.size_dl / data->progress.dlspeed;
|
|
dlpercen = (data->progress.downloaded / data->progress.size_dl)*100;
|
|
}
|
|
|
|
/* Now figure out which of them that is slower and use for the for
|
|
total estimate! */
|
|
total_estimate = ulestimate>dlestimate?ulestimate:dlestimate;
|
|
|
|
|
|
/* If we have a total estimate, we can display that and the expected
|
|
time left */
|
|
if(total_estimate) {
|
|
time2str(time_left, total_estimate-(int) data->progress.timespent);
|
|
time2str(time_total, total_estimate);
|
|
}
|
|
else {
|
|
/* otherwise we blank those times */
|
|
strcpy(time_left, "--:--:--");
|
|
strcpy(time_total, "--:--:--");
|
|
}
|
|
/* The time spent so far is always known */
|
|
time2str(time_current, data->progress.timespent);
|
|
|
|
/* Get the total amount of data expected to get transfered */
|
|
total_expected_transfer =
|
|
(data->progress.flags & PGRS_UL_SIZE_KNOWN?
|
|
data->progress.size_ul:data->progress.uploaded)+
|
|
(data->progress.flags & PGRS_DL_SIZE_KNOWN?
|
|
data->progress.size_dl:data->progress.downloaded);
|
|
|
|
/* We have transfered this much so far */
|
|
total_transfer = data->progress.downloaded + data->progress.uploaded;
|
|
|
|
/* Get the percentage of data transfered so far */
|
|
if(total_expected_transfer)
|
|
total_percen=(double)(total_transfer/total_expected_transfer)*100;
|
|
|
|
fprintf(data->set.err,
|
|
"\r%3d %s %3d %s %3d %s %s %s %s %s %s %s",
|
|
(int)total_percen, /* total % */
|
|
max5data(total_expected_transfer, max5[2]), /* total size */
|
|
(int)dlpercen, /* rcvd % */
|
|
max5data(data->progress.downloaded, max5[0]), /* rcvd size */
|
|
(int)ulpercen, /* xfer % */
|
|
max5data(data->progress.uploaded, max5[1]), /* xfer size */
|
|
|
|
max5data(data->progress.dlspeed, max5[3]), /* avrg dl speed */
|
|
max5data(data->progress.ulspeed, max5[4]), /* avrg ul speed */
|
|
time_total, /* total time */
|
|
time_current, /* current time */
|
|
time_left, /* time left */
|
|
max5data(data->progress.current_speed, max5[5]) /* current speed */
|
|
);
|
|
|
|
/* we flush the output stream to make it appear as soon as possible */
|
|
fflush(data->set.err);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* local variables:
|
|
* eval: (load-file "../curl-mode.el")
|
|
* end:
|
|
* vim600: fdm=marker
|
|
* vim: et sw=2 ts=2 sts=2 tw=78
|
|
*/
|