mirror of https://github.com/BOINC/boinc.git
77 lines
2.2 KiB
PHP
77 lines
2.2 KiB
PHP
<?php
|
|
// This file is part of BOINC.
|
|
// http://boinc.berkeley.edu
|
|
// Copyright (C) 2008 University of California
|
|
//
|
|
// BOINC 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 3 of the License, or (at your option) any later version.
|
|
//
|
|
// BOINC 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.
|
|
//
|
|
// You should have received a copy of the GNU Lesser General Public License
|
|
// along with BOINC. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
|
|
|
require_once("../inc/util.inc");
|
|
require_once("../inc/db.inc");
|
|
require_once("../inc/wap.inc");
|
|
require_once("../inc/cache.inc");
|
|
|
|
function show_credit_wap($user) {
|
|
$retstr = "<br/>User TotCred: " . format_credit($user->total_credit) . "<br/>";
|
|
$retstr .= "User AvgCred: " . format_credit($user->expavg_credit) . "<br/>";
|
|
return $retstr;
|
|
}
|
|
|
|
function show_user_wap($user) {
|
|
wap_begin();
|
|
if (!$user) {
|
|
echo "<br/>User not found!<br/>";
|
|
wap_end();
|
|
return;
|
|
}
|
|
|
|
// keep a 'running tab' in wapstr in case exceeds 1K WAP limit
|
|
|
|
$wapstr = PROJECT . "<br/>Account Data<br/>for $user->name<br/>Time: " . wap_timestamp();
|
|
$wapstr .= show_credit_wap($user);
|
|
if ($user->teamid) {
|
|
$team = BoincTeam::lookup_id($user->teamid);
|
|
$wapstr .= "<br/>Team: $team->name<br/>";
|
|
$wapstr .= "Team TotCred: " . format_credit($team->total_credit) . "<br/>";
|
|
$wapstr .= "Team AvgCred: " . format_credit($team->expavg_credit) . "<br/>";
|
|
|
|
} else {
|
|
$wapstr .= "<br/>Team: None<br/>";
|
|
}
|
|
|
|
// don't want to send more than 1KB probably?
|
|
if (strlen($wapstr)>1024) {
|
|
echo substr($wapstr,0,1024);
|
|
} else {
|
|
echo $wapstr;
|
|
}
|
|
|
|
wap_end();
|
|
}
|
|
|
|
$userid = get_int('id');
|
|
|
|
$cache_args = "userid=".$userid;
|
|
start_cache(USER_PAGE_TTL, $cache_args);
|
|
|
|
$user = BoincUser::lookup_id($userid);
|
|
if (!$user) {
|
|
error_page("No such user");
|
|
}
|
|
show_user_wap($user);
|
|
|
|
end_cache(USER_PAGE_TTL, $cache_args);
|
|
?>
|