2005-01-20 23:22:22 +00:00
|
|
|
// Berkeley Open Infrastructure for Network Computing
|
|
|
|
// http://boinc.berkeley.edu
|
|
|
|
// Copyright (C) 2005 University of California
|
2003-08-20 18:56:52 +00:00
|
|
|
//
|
2005-01-20 23:22:22 +00:00
|
|
|
// This is free software; you can redistribute it and/or
|
|
|
|
// modify it under the terms of the GNU Lesser General Public
|
|
|
|
// License as published by the Free Software Foundation;
|
|
|
|
// either version 2.1 of the License, or (at your option) any later version.
|
2003-08-20 18:56:52 +00:00
|
|
|
//
|
2005-01-20 23:22:22 +00:00
|
|
|
// This software is distributed in the hope that it will be useful,
|
|
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
// See the GNU Lesser General Public License for more details.
|
2002-04-30 22:22:54 +00:00
|
|
|
//
|
2005-01-20 23:22:22 +00:00
|
|
|
// To view the GNU Lesser General Public License visit
|
|
|
|
// http://www.gnu.org/copyleft/lesser.html
|
|
|
|
// or write to the Free Software Foundation, Inc.,
|
|
|
|
// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
2002-04-30 22:22:54 +00:00
|
|
|
|
2004-03-04 11:41:43 +00:00
|
|
|
#ifdef _WIN32
|
2004-06-16 23:16:08 +00:00
|
|
|
#include "boinc_win.h"
|
2004-03-04 11:41:43 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef _WIN32
|
2004-07-13 13:54:09 +00:00
|
|
|
#include <cstdio>
|
|
|
|
#include <ctime>
|
|
|
|
#include <cmath>
|
2004-03-04 11:41:43 +00:00
|
|
|
#endif
|
2002-04-30 22:22:54 +00:00
|
|
|
|
|
|
|
#include "parse.h"
|
2003-02-24 21:25:16 +00:00
|
|
|
#include "util.h"
|
2002-04-30 22:22:54 +00:00
|
|
|
#include "error_numbers.h"
|
2004-04-08 08:15:23 +00:00
|
|
|
#include "client_msgs.h"
|
2005-03-29 23:56:50 +00:00
|
|
|
#include "network.h"
|
2002-04-30 22:22:54 +00:00
|
|
|
|
|
|
|
#include "time_stats.h"
|
|
|
|
|
|
|
|
// exponential decay constant.
|
|
|
|
// The last 30 days have a weight of 1/e;
|
|
|
|
// everything before that has a weight of (1-1/e)
|
|
|
|
|
2003-08-07 23:38:38 +00:00
|
|
|
const float ALPHA = (SECONDS_PER_DAY*30);
|
2005-01-28 21:46:41 +00:00
|
|
|
//const float ALPHA = 60; // for testing
|
2002-04-30 22:22:54 +00:00
|
|
|
|
|
|
|
TIME_STATS::TIME_STATS() {
|
|
|
|
last_update = 0;
|
2002-07-15 23:21:20 +00:00
|
|
|
first = true;
|
2002-04-30 22:22:54 +00:00
|
|
|
on_frac = 1;
|
|
|
|
connected_frac = 1;
|
|
|
|
active_frac = 1;
|
|
|
|
}
|
|
|
|
|
2002-07-15 23:21:20 +00:00
|
|
|
// Update time statistics based on current activities
|
2005-01-28 19:01:08 +00:00
|
|
|
// NOTE: we don't set the state-file dirty flag here,
|
|
|
|
// so these get written to disk only when other activities
|
|
|
|
// cause this to happen. Maybe should change this.
|
2002-07-15 23:21:20 +00:00
|
|
|
//
|
2005-04-04 21:14:49 +00:00
|
|
|
void TIME_STATS::update(double now, bool is_active) {
|
2005-01-28 19:01:08 +00:00
|
|
|
double dt, w1, w2;
|
2002-04-30 22:22:54 +00:00
|
|
|
|
|
|
|
if (last_update == 0) {
|
|
|
|
// this is the first time this client has executed.
|
2005-01-28 21:46:41 +00:00
|
|
|
// Assume that everything is active
|
2002-04-30 22:22:54 +00:00
|
|
|
|
|
|
|
on_frac = 1;
|
2005-01-28 21:46:41 +00:00
|
|
|
connected_frac = 1;
|
|
|
|
active_frac = 1;
|
2002-04-30 22:22:54 +00:00
|
|
|
first = false;
|
|
|
|
last_update = now;
|
|
|
|
} else {
|
|
|
|
dt = now - last_update;
|
2005-01-28 19:01:08 +00:00
|
|
|
if (dt <= 10) return;
|
2005-01-28 21:46:41 +00:00
|
|
|
w1 = 1 - exp(-dt/ALPHA); // weight for recent period
|
|
|
|
w2 = 1 - w1; // weight for everything before that
|
|
|
|
// (close to zero if long gap)
|
2005-04-04 21:14:49 +00:00
|
|
|
int connected_state = get_connected_state();
|
2002-04-30 22:22:54 +00:00
|
|
|
if (first) {
|
|
|
|
// the client has just started; this is the first call.
|
2005-01-28 21:46:41 +00:00
|
|
|
//
|
2002-04-30 22:22:54 +00:00
|
|
|
on_frac *= w2;
|
|
|
|
first = false;
|
|
|
|
} else {
|
|
|
|
on_frac = w1 + w2*on_frac;
|
2005-01-28 21:46:41 +00:00
|
|
|
if (connected_frac < 0) connected_frac = 0;
|
|
|
|
switch (connected_state) {
|
|
|
|
case CONNECTED_STATE_NOT_CONNECTED:
|
|
|
|
connected_frac *= w2;
|
|
|
|
break;
|
|
|
|
case CONNECTED_STATE_CONNECTED:
|
|
|
|
connected_frac *= w2;
|
|
|
|
connected_frac += w1;
|
|
|
|
break;
|
|
|
|
case CONNECTED_STATE_UNKNOWN:
|
|
|
|
connected_frac = -1;
|
|
|
|
}
|
2002-04-30 22:22:54 +00:00
|
|
|
active_frac *= w2;
|
|
|
|
if (is_active) active_frac += w1;
|
|
|
|
}
|
|
|
|
last_update = now;
|
|
|
|
}
|
2005-01-28 21:46:41 +00:00
|
|
|
#if 0
|
|
|
|
msg_printf(0, MSG_INFO, "on %f; active %f; conn %f",
|
|
|
|
on_frac, active_frac, connected_frac
|
|
|
|
);
|
|
|
|
#endif
|
2002-04-30 22:22:54 +00:00
|
|
|
}
|
|
|
|
|
2002-07-15 23:21:20 +00:00
|
|
|
// Write XML based time statistics
|
|
|
|
//
|
2004-06-12 04:45:36 +00:00
|
|
|
int TIME_STATS::write(MIOFILE& out, bool to_server) {
|
|
|
|
out.printf(
|
2002-04-30 22:22:54 +00:00
|
|
|
"<time_stats>\n"
|
|
|
|
" <on_frac>%f</on_frac>\n"
|
|
|
|
" <connected_frac>%f</connected_frac>\n"
|
|
|
|
" <active_frac>%f</active_frac>\n",
|
|
|
|
on_frac,
|
|
|
|
connected_frac,
|
|
|
|
active_frac
|
|
|
|
);
|
|
|
|
if (!to_server) {
|
2004-06-12 04:45:36 +00:00
|
|
|
out.printf(
|
2005-01-28 20:03:57 +00:00
|
|
|
" <last_update>%f</last_update>\n",
|
2002-04-30 22:22:54 +00:00
|
|
|
last_update
|
|
|
|
);
|
|
|
|
}
|
2004-06-12 04:45:36 +00:00
|
|
|
out.printf("</time_stats>\n");
|
2002-04-30 22:22:54 +00:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2002-07-15 23:21:20 +00:00
|
|
|
// Parse XML based time statistics, usually from client_state.xml
|
|
|
|
//
|
2004-06-12 04:45:36 +00:00
|
|
|
int TIME_STATS::parse(MIOFILE& in) {
|
2002-04-30 22:22:54 +00:00
|
|
|
char buf[256];
|
2002-08-15 22:03:41 +00:00
|
|
|
|
2004-05-18 22:47:08 +00:00
|
|
|
SCOPE_MSG_LOG scope_messages(log_messages, CLIENT_MSG_LOG::DEBUG_STATE);
|
|
|
|
|
2004-06-12 04:45:36 +00:00
|
|
|
while (in.fgets(buf, 256)) {
|
2002-04-30 22:22:54 +00:00
|
|
|
if (match_tag(buf, "</time_stats>")) return 0;
|
2005-01-28 20:03:57 +00:00
|
|
|
else if (parse_double(buf, "<last_update>", last_update)) continue;
|
2002-04-30 22:22:54 +00:00
|
|
|
else if (parse_double(buf, "<on_frac>", on_frac)) continue;
|
|
|
|
else if (parse_double(buf, "<connected_frac>", connected_frac)) continue;
|
|
|
|
else if (parse_double(buf, "<active_frac>", active_frac)) continue;
|
2004-05-18 22:47:08 +00:00
|
|
|
else scope_messages.printf("TIME_STATS::parse(): unrecognized: %s\n", buf);
|
2002-04-30 22:22:54 +00:00
|
|
|
}
|
|
|
|
return ERR_XML_PARSE;
|
|
|
|
}
|
2004-12-08 00:40:19 +00:00
|
|
|
|
2005-01-02 18:29:53 +00:00
|
|
|
const char *BOINC_RCSID_472504d8c2 = "$Id$";
|