mirror of https://github.com/BOINC/boinc.git
33 lines
722 B
PHP
33 lines
722 B
PHP
|
<?php
|
||
|
|
|
||
|
|
// delete results without a corresponding workunit.
|
||
|
|
// (in principle these shouldn't exist)
|
||
|
|
|
||
|
|
error_reporting(E_ALL);
|
||
|
|
ini_set('display_errors', true);
|
||
|
|
ini_set('display_startup_errors', true);
|
||
|
|
|
||
|
|
require_once("../inc/boinc_db.inc");
|
||
|
|
|
||
|
|
$ndel = 0;
|
||
|
|
while (1) {
|
||
|
|
$rs = BoincResult::enum("true order by id limit 100");
|
||
|
|
$found = false;
|
||
|
|
foreach ($rs as $r) {
|
||
|
|
$wu = BoincWorkunit::lookup_id($r->workunitid);
|
||
|
|
if ($wu) {
|
||
|
|
echo "$r->id has a WU\n";
|
||
|
|
$found = true;
|
||
|
|
break;
|
||
|
|
} else {
|
||
|
|
echo "$r->id has no WU - deleting\n";
|
||
|
|
$ndel++;
|
||
|
|
$r->delete();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($found) break;
|
||
|
|
}
|
||
|
|
echo "Done - deleted $ndel results\n";
|
||
|
|
|
||
|
|
?>
|