mirror of https://github.com/BOINC/boinc.git
89 lines
2.7 KiB
PHP
Executable File
89 lines
2.7 KiB
PHP
Executable File
#! /usr/bin/env php
|
|
<?php
|
|
// This file is part of BOINC.
|
|
// http://boinc.berkeley.edu
|
|
// Copyright (C) 2012 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/>.
|
|
|
|
// initialize
|
|
// user_submit.logical start_time
|
|
// batch.logical_start_time
|
|
// batch.logical_end_time
|
|
// result.priority
|
|
// based on existing batches
|
|
|
|
require_once("../inc/boinc_db.inc");
|
|
require_once("../inc/submit_db.inc");
|
|
|
|
function process_batch($b) {
|
|
$app = BoincApp::lookup_id($b->app_id);
|
|
if (!$app) {
|
|
echo "no app for batch $b->id\n";
|
|
return;
|
|
}
|
|
if ($b->fraction_done>0 && $b->credit_canonical>0) {
|
|
$credit_total = $b->credit_canonical/$b->fraction_done;
|
|
$fpops_total = $credit_total*(86400e9/200);
|
|
} else {
|
|
$db = BoincDb::get();
|
|
$fpops_total = $db->sum(
|
|
"workunit", "rsc_fpops_est*target_nresults", "where batch=$b->id"
|
|
);
|
|
}
|
|
echo "batch $b->id fpops_total $fpops_total\n";
|
|
if ($fpops_total == 0) {
|
|
return;
|
|
}
|
|
|
|
// adjust the user's logical start time
|
|
//
|
|
$user = BoincUser::lookup_id($b->user_id);
|
|
if (!$user) die("no user $b->user_id\n");
|
|
$us = BoincUserSubmit::lookup_userid("$user->id");
|
|
if (!$us) die("no user submit record\n");
|
|
$lst = $us->logical_start_time;
|
|
$cmd = "cd ../../bin; ./adjust_user_priority --user $user->id --flops $fpops_total --app $app->name";
|
|
system($cmd);
|
|
$us = BoincUserSubmit::lookup_userid("$user->id");
|
|
$let = $us->logical_start_time;
|
|
$let = (int)$let;
|
|
|
|
// set the priority of workunits and results in this batch
|
|
// to the user's new logical start time
|
|
//
|
|
$clause = "priority=$let where batch=$b->id";
|
|
BoincResult::update_aux($clause);
|
|
BoincWorkunit::update_aux($clause);
|
|
}
|
|
|
|
function scan_batches() {
|
|
$batches = BoincBatch::enum("", "order by id");
|
|
foreach ($batches as $b) {
|
|
process_batch($b);
|
|
}
|
|
}
|
|
|
|
function reset_all() {
|
|
BoincUserSubmit::update_aux("logical_start_time=0");
|
|
BoincBatch::update_aux("logical_start_time=0, logical_end_time=0");
|
|
BoincWorkunit::update_aux("priority=0");
|
|
BoincResult::update_aux("priority=0");
|
|
}
|
|
|
|
scan_batches();
|
|
//reset_all();
|
|
|
|
?>
|