mirror of https://github.com/BOINC/boinc.git
354 lines
11 KiB
PHP
354 lines
11 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/db_ops.inc");
|
|
require_once("../inc/util.inc");
|
|
require_once("../project/project.inc");
|
|
|
|
// TODO: get rid of the following. use style sheets
|
|
define("TD", "<td bgcolor=\"#708090\">");
|
|
define("TD2", "<td colspan=\"2\" bgcolor=\"#708090\">");
|
|
define("TD3", "<td colspan=\"3\" bgcolor=\"#708090\">");
|
|
define("TABLE", "<table cellpadding=\"8\" border=\"1\" width=\"100%\">");
|
|
define("TABLE2", "<table width=\"580\">");
|
|
|
|
function admin_page_head($title) {
|
|
return page_head($title);
|
|
}
|
|
|
|
function admin_page_tail() {
|
|
echo "</body></html>\n";
|
|
}
|
|
|
|
// TODO: get rid of all the following
|
|
|
|
function print_checkbox($text,$name,$checked) {
|
|
echo "<input type=\"checkbox\" name=\"$name\""
|
|
. (strlen($checked) ? " checked=\"checked\"" : "") . ">"
|
|
. "$text\n"
|
|
. "<p>\n";
|
|
}
|
|
|
|
function print_radio_button($text,$name,$value,$checked) {
|
|
echo "<input type=\"radio\" name=\"$name\" value=\"$value\""
|
|
. (strlen($checked) ? " checked=\"checked\"" : "") . ">"
|
|
. "$text\n"
|
|
. "<br>\n";
|
|
}
|
|
|
|
function print_text_field($text,$name,$value) {
|
|
echo "$text <input type=\"text\" size=\"10\" name=\"$name\" value=\"$value\">\n"
|
|
. "<p>\n";
|
|
}
|
|
|
|
function row($x, $y) {
|
|
echo "<tr><td valign=\"top\" align=\"right\">$x</td>\n<td>$y</td>\n</tr>\n";
|
|
}
|
|
|
|
function c_row2($color, $x, $y) {
|
|
echo "<tr bgcolor=\"$color\"><td align=\"right\">$x</td><td>$y</td></tr>\n";
|
|
}
|
|
|
|
function show_profile_link_ops($user) {
|
|
if ($user->has_profile) {
|
|
row2("Profile",
|
|
"<a href=\"".URL_BASE."view_profile.php?userid=$user->id\">View</a>"
|
|
);
|
|
}
|
|
}
|
|
|
|
// initialize database connection with username & password from
|
|
// command line instead of config.xml
|
|
//
|
|
function db_init_cli() {
|
|
$config = get_config();
|
|
$db_name = parse_config($config, "<db_name>");
|
|
$host = parse_config($config, "<db_host>");
|
|
if ($host == null) {
|
|
$host = "localhost";
|
|
}
|
|
$in = fopen("php://stdin","r");
|
|
print "Database username (default: owner of mysqld process): ";
|
|
$user = rtrim(fgets($in, 80));
|
|
print "Database password (if any): ";
|
|
$pass = rtrim(fgets($in, 80));
|
|
|
|
$retval = mysql_pconnect($host, $user, $pass);
|
|
if (!$retval) {
|
|
die("Can't connect to DB\n");
|
|
}
|
|
if (!mysql_select_db($db_name)) {
|
|
die("Can't select DB\n");
|
|
}
|
|
}
|
|
|
|
function print_login_form_ops($next_url='') {
|
|
if ($next_url == '') $next_url = $_SERVER['REQUEST_URI'];
|
|
start_table();
|
|
echo "
|
|
<form method=post action=login_action.php>
|
|
<input type=hidden name=next_url value=$next_url>
|
|
";
|
|
row2("Email", "<input name=email_addr size=40>");
|
|
row2("Password", "<input type=password name=passwd size=40>");
|
|
row2(tra("Stay logged in on this computer"), '<input type="checkbox" name="stay_logged_in" checked>');
|
|
row2("", "<input type=submit value=OK>");
|
|
end_table();
|
|
}
|
|
|
|
function get_logged_in_user_ops() {
|
|
global $g_logged_in_user;
|
|
if ($g_logged_in_user) return $g_logged_in_user;
|
|
$authenticator = null;
|
|
if (isset($_COOKIE['auth'])) $authenticator = $_COOKIE['auth'];
|
|
|
|
$authenticator = BoincDb::escape_string($authenticator);
|
|
if ($authenticator) {
|
|
$g_logged_in_user = BoincUser::lookup("authenticator='$authenticator'");
|
|
}
|
|
return $g_logged_in_user;
|
|
}
|
|
|
|
////////// functions for access control of admin web pages /////////////
|
|
|
|
// allow access only if logged in as user in a given set
|
|
//
|
|
function auth_ops_userid($admin_user_ids) {
|
|
$user = get_logged_in_user_ops();
|
|
if (!$user) {
|
|
admin_page_head("Log in");
|
|
echo "You must log in to performance admin functions.<p>\n";
|
|
print_login_form_ops();
|
|
admin_page_tail();
|
|
exit;
|
|
} else if (!in_array($user->id, $admin_user_ids)) {
|
|
admin_page_head("Log in");
|
|
echo "
|
|
You must be logged in as an admin to perform admin functions.
|
|
<p>
|
|
<a href=logout.php>Log out</a>
|
|
";
|
|
admin_page_tail();
|
|
exit;
|
|
}
|
|
}
|
|
|
|
// allow access only to users with ADMIN/DEV flags in forum prefs.
|
|
// If you use this, make sure you know who has these privileges
|
|
//
|
|
function auth_ops_privilege() {
|
|
$user = get_logged_in_user_ops();
|
|
if (!$user) {
|
|
admin_page_head("Log in");
|
|
echo "You must log in to performance admin functions.<p>\n";
|
|
print_login_form_ops();
|
|
admin_page_tail();
|
|
exit;
|
|
}
|
|
BoincForumPrefs::lookup($user);
|
|
if ($user->prefs->privilege(S_ADMIN) || $user->prefs->privilege(S_DEV)) {
|
|
return;
|
|
}
|
|
error_page("Access denied");
|
|
}
|
|
|
|
// if project hasn't specified a policy in project.inc,
|
|
// and no .htaccess, don't allow access
|
|
//
|
|
if (!function_exists('auth_ops')) {
|
|
function auth_ops() {
|
|
if (!file_exists(".htaccess")) {
|
|
error_page("
|
|
You must protect the admin interface
|
|
with either a .htaccess file or an auto_ops() function.
|
|
<p>
|
|
<a href=http://boinc.berkeley.edu/trac/wiki/HtmlOps>See how here</a>"
|
|
);
|
|
}
|
|
}
|
|
}
|
|
|
|
function admin_error_page($msg) {
|
|
admin_page_head("Unable to handle request");
|
|
echo $msg;
|
|
admin_page_tail();
|
|
exit;
|
|
}
|
|
|
|
// given a list of app versions,
|
|
// return a list of the current, non-deprecated ones
|
|
//
|
|
function current_versions($avs) {
|
|
foreach($avs as $av) {
|
|
foreach ($avs as $av2) {
|
|
if ($av->id == $av2->id) continue;
|
|
if ($av->platformid == $av2->platformid && $av->plan_class == $av2->plan_class && $av->version_num > $av2->version_num) {
|
|
$av2->deprecated = 1;
|
|
}
|
|
}
|
|
}
|
|
$x = array();
|
|
foreach($avs as $av) {
|
|
if (!$av->deprecated) $x[] = $av;
|
|
}
|
|
return $x;
|
|
}
|
|
|
|
// cancel WUs with IDs in a given range.
|
|
// This means:
|
|
//
|
|
// - for any results w/ server state UNSENT, set server state to OVER
|
|
// - set the CANCELLED bit in workunit.error_mask
|
|
//
|
|
function cancel_wus($wuid1, $wuid2) {
|
|
$retval = BoincResult::update_aux("server_state=5, outcome=5 where server_state=2 and $wuid1<=workunitid and workunitid<=$wuid2");
|
|
if (!$retval) {
|
|
error_page("Result update failed");
|
|
}
|
|
$retval = BoincWorkunit::update_aux("error_mask=error_mask|16 where $wuid1<=id and id<=$wuid2");
|
|
if (!$retval) {
|
|
error_page("Workunit update failed");
|
|
}
|
|
|
|
// trigger the transitioner (it will set file_delete_state)
|
|
|
|
$now = time();
|
|
$retval = BoincWorkunit::update_aux("transition_time=$now where $wuid1<=id and id<=$wuid2");
|
|
return 0;
|
|
}
|
|
|
|
// like above, but if a workunit has a result that's already sent,
|
|
// don't cancel the workunit
|
|
//
|
|
function cancel_wus_if_unsent($id1, $id2) {
|
|
$wus = BoincWorkunit::enum("id >= $id1 and id <= $id2");
|
|
foreach ($wus as $wu) {
|
|
$results = BoincResult::enum("workunitid=$wu->id and server_state > 2");
|
|
if (count($results)) continue;
|
|
$retval = BoincResult::update_aux("server_state=5, outcome=5 where workunitid=$wu->id");
|
|
if (!$retval) {
|
|
error_page("result update failed");
|
|
}
|
|
if (!$wu->update("error_mask=error_mask|16")) {
|
|
error_page("WU update failed");
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
function app_version_desc($avid) {
|
|
switch ($avid) {
|
|
case ANON_PLATFORM_UNKNOWN:
|
|
return "Anonymous platform: unknown type";
|
|
case ANON_PLATFORM_CPU:
|
|
return "Anonymous platform: CPU";
|
|
case ANON_PLATFORM_NVIDIA:
|
|
return "Anonymous platform: NVIDIA GPU";
|
|
case ANON_PLATFORM_ATI:
|
|
return "Anonymous platform: AMD GPU";
|
|
case ANON_PLATFORM_INTEL:
|
|
return "Anonymous platform: Intel GPU";
|
|
}
|
|
if ($avid <= 0) {
|
|
return "unknown: $avid";
|
|
}
|
|
$av = BoincAppVersion::lookup_id($avid);
|
|
if ($av) {
|
|
$p = BoincPlatform::lookup_id($av->platformid);
|
|
if ($p) {
|
|
return sprintf("%.2f", $av->version_num/100)." $p->name [$av->plan_class]";
|
|
} else {
|
|
return sprintf("%.2f", $av->version_num/100)." MISSING PLATFORM $av->platformid [$av->plan_class]";
|
|
}
|
|
} else {
|
|
return "App version missing ($avid)";
|
|
}
|
|
}
|
|
|
|
////// badge-related stuff
|
|
|
|
function get_badge($name, $title, $image_url) {
|
|
$b = BoincBadge::lookup("name='$name'");
|
|
if ($b) return $b;
|
|
$now = time();
|
|
$id = BoincBadge::insert("(create_time, name, title, image_url) values ($now, '$name', '$title', 'img/$image_url')");
|
|
$b = BoincBadge::lookup_id($id);
|
|
if ($b) return $b;
|
|
die("can't create badge $name\n");
|
|
}
|
|
|
|
function assign_badge($is_user, $item, $badge) {
|
|
$now = time();
|
|
if ($is_user) {
|
|
$bbu = BoincBadgeUser::lookup("user_id=$item->id and badge_id=$badge->id");
|
|
if ($bbu) {
|
|
$bbu->update("reassign_time=$now where user_id=$item->id and badge_id=$badge->id");
|
|
} else {
|
|
BoincBadgeUser::insert("(create_time, user_id, badge_id, reassign_time) values ($now, $item->id, $badge->id, $now)");
|
|
}
|
|
} else {
|
|
$bbt = BoincBadgeTeam::lookup("team_id=$item->id and badge_id=$badge->id");
|
|
if ($bbt) {
|
|
$bbt->update("reassign_time=$now where team_id=$item->id and badge_id=$badge->id");
|
|
} else {
|
|
BoincBadgeTeam::insert("(create_time, team_id, badge_id, reassign_time) values ($now, $item->id, $badge->id, $now)");
|
|
}
|
|
}
|
|
}
|
|
|
|
// unassign all badges except the given one
|
|
//
|
|
function unassign_badges($is_user, $item, $badges, $k) {
|
|
$list = null;
|
|
for ($i=0; $i<count($badges); $i++) {
|
|
if ($i == $k) continue;
|
|
$badge = $badges[$i];
|
|
if ($list) {
|
|
$list .= ",$badge->id";
|
|
} else {
|
|
$list = "$badge->id";
|
|
}
|
|
}
|
|
if ($is_user) {
|
|
BoincBadgeUser::delete("user_id=$item->id and badge_id in ($list)");
|
|
} else {
|
|
BoincBadgeTeam::delete("team_id=$item->id and badge_id in ($list)");
|
|
}
|
|
}
|
|
|
|
////// end badge-related stuff
|
|
|
|
function running_from_web_server() {
|
|
return array_key_exists("SERVER_PORT", $_SERVER);
|
|
}
|
|
|
|
if (isset($cli_only)) {
|
|
if (running_from_web_server()) {
|
|
die("This script is intended to be run from the command line,
|
|
not from the web server."
|
|
);
|
|
}
|
|
}
|
|
|
|
if (!isset($skip_auth_ops) && array_key_exists("SERVER_PORT", $_SERVER)) {
|
|
auth_ops();
|
|
}
|
|
|
|
$cvs_version_tracker[]="\$Id$"; //Generated automatically - do not edit
|
|
?>
|