echo "<br ALIGN=RIGHT>The " . PROJECT . " main server has been continuously up for " . "{$days}" . " days " . "{$hours}" . " hours " . "{$minutes}" . " minutes.\n<P>";
// tables side by side
echo "<TABLE><TR><TD align=center> \n";
echo "\r\n\t<h2>Server status</h2>\r\n\t<table border=2 cellpadding=6>\r\n\t<tr><th>Program</th><th>Host</th><th>Status</th></tr>\r\n";
$web_running = !file_exists("../../stop_web");
show_status("einstein", "Web server", $web_running);
show_daemon_status("einstein", "Pulsar work generator (LHO)", "make_pulsar_WU_daemon_h");
show_daemon_status("einstein", "Pulsar work generator (LLO)", "make_pulsar_WU_daemon_l");
show_daemon_status("einstein", "BOINC database feeder", "feeder");
show_daemon_status("einstein", "BOINC transitioner", "transitioner");
$sched_running = !file_exists("../../stop_sched");
show_status("einstein", "BOINC scheduler", $sched_running);
show_daemon_status("einstein", "Einstein validator", "einstein_validator");
show_daemon_status("einstein", "Einstein assimilator", "einstein_assimilator");
show_daemon_status("einstein", "BOINC file deleter", "file_deleter");
show_daemon_status("einstein", "BOINC database purger", "db_purge");
echo "\n\t</table> \r\n\t</TD><TD> </TD><TD VALIGN=TOP align=center>\r\n\t\n";
echo "\r\n\r\n\t<h2>Users and Computers</h2>\r\n";
if ($dbrc) {
echo "The database server is not accessable";
} else {
$now = time(0);
$s_day = 24 * 3600;
$d_ago = $now - $s_day;
$s_week = 7 * $s_day;
$w_ago = $now - $s_week;
echo "\r\n\t\t<table border=2 cellpadding=6>\r\n\t\t<tr><th>USERS</th><th>Approximate #</th></tr>\r\n\t";
$n = count_estimate("select count(*) as total from user");
echo "\r\n\t\t<tr><td>in database</td><td>" . number_format($n) . "</td></tr>\r\n\t";
$n = count_estimate("select count(*) as total from user where total_credit>0");
echo "\r\n\t\t<tr><td>with credit</td><td>" . number_format($n) . "</td></tr>\r\n\t";
}
$cmd = parse_element($thisxml, "<cmd>");
list($cmd) = explode(" ", $cmd);
$log = parse_element($thisxml, "<output>");
if (!$log) {
$log = $cmd . ".log";
}
list($log) = explode(".log", $log);
$pid = parse_element($thisxml, "<pid_file>");
if (!$pid) {
$pid = $cmd . ".pid";
}
$disabled = parse_element($thisxml, "<disabled>");
// surrogate for command
list($c) = explode(".", $log);
show_daemon_status($host, $pid, $c, $disabled);
}
$xmlstring = " </daemon_status>\n <database_file_states>\n";
if ($xml) {
echo $xmlstring;
} else {
echo "\n <tr><td align=right><b>" . tra("Running:") . "</b></td>\n <td colspan=2>" . tra("Program is operating normally") . "</td></tr>\n <tr><td align=right><b>" . tra("Not Running:") . "</b></td>\n <td colspan=2>" . tra("Program failed or the project is down") . "</td></tr>\n <tr><td align=right><b>" . tra("Disabled:") . "</b></td>\n <td colspan=2>" . tra("Program is disabled") . "</td></tr>\n </table>\n </td>\n <td valign=top>\n <h2>" . tra("Computing status") . "</h2>\n ";
}
$retval = db_init_aux();
if ($retval) {
echo tra("The database server is not accessible");
} else {
if (!$xml) {
echo "<table border=0 cellpadding=0 cellspacing=0><tr><td>\n <table border=0 cellpadding=4>\n <tr><th>" . tra("Work") . "</th><th>#</th></tr>\n ";
}
// If you are reading these values from a file rather than
if ($host == "") {
$host = $project_host;
}
$cmd = parse_element($thisxml, "<cmd>");
list($ncmd) = explode(" ", $cmd);
$log = parse_element($thisxml, "<output>");
if (!$log) {
$log = $ncmd . ".log";
}
list($nlog) = explode(".log", $log);
$pid = parse_element($thisxml, "<pid_file>");
if (!$pid) {
$pid = $ncmd . ".pid";
}
$disabled = parse_element($thisxml, "<disabled>");
show_daemon_status($host, $nlog, $ncmd, $disabled);
}
$xmlstring = " </daemon_status>\n <database_file_states>\n";
if ($xml) {
echo $xmlstring;
} else {
if ($xmlout) {
fwrite($xmloutfile, $xmlstring);
}
echo "\r\n\t\t<tr><td align=right><b>Running:</b></td>\r\n\t\t<td colspan=2>Program is operating normally</td></tr>\r\n\t\t<tr><td align=right><b>Not Running:</b></td>\r\n\t\t<td colspan=2>Program failed or ran out of work<br>\r\n\t\t (or the project is down)</td></tr>\r\n\t\t<tr><td align=right><b>Disabled:</b></td>\r\n\t\t<td colspan=2>Program has been disabled by staff<br>\r\n\t\t (for debugging/maintenance)</td></tr>\r\n\t\t</table>\r\n\t\t</td>\r\n\t\t<td width=40% valign=top>\r\n\t\t<h2>Database/file status</h2>\r\n\t";
}
$retval = db_init_aux();
if ($retval) {
echo "The database server is not accessible";
} else {
if (!$xml) {
