File: host_delete.php

package info (click to toggle)
boinc 5.4.11-4%2Betch1
  • links: PTS
  • area: main
  • in suites: etch
  • size: 21,440 kB
  • ctags: 16,986
  • sloc: cpp: 70,682; ansic: 45,747; php: 35,513; xml: 10,487; sh: 9,324; python: 4,291; makefile: 1,958; asm: 1,258; perl: 914; sql: 395; csh: 126; pascal: 124
file content (49 lines) | stat: -rw-r--r-- 1,271 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
<?php

require_once("../inc/db.inc");
require_once("../inc/util.inc");
require_once("../inc/host.inc");

function fail($msg) {
    echo "<h2>Error: $msg</h2>";
    page_tail();
    exit();
}

function get_host($hostid, $user) {
    $host = lookup_host($hostid);
    if (!$host || $host->userid != $user->id) {
        fail("We have no record of that computer.");
    }
    return $host;
}

db_init();
$user = get_logged_in_user();

page_head("Delete record of computer");

$hostid = get_int("hostid");
$host = get_host($hostid, $user);
if (host_nresults($host)==0) {
    mysql_query("delete from host where id=$hostid");
} else {
    $config = get_config();
    $results = "existing results";
    if (parse_bool($config, "show_results")) {
        $nresults = host_nresults($host);
        if ($nresults) {
            $results = "<a href=results.php?hostid=$host->id>existing $nresults results</a>";
        }
    }
    fail("You can not delete this computer because the project database still contains work for it. ".
         "You must wait a few days until all the $results for this computer ".
         "have been deleted from the project database.");
}
echo "
    Host deleted.
    <p><a href=hosts_user.php>Return to list of your computers</a>
";
page_tail();

?>