|
id>$host->id
| id>tasks
|
";
if ($private) {
echo "$host->domain_name | \n";
echo "$host->venue | \n";
} else {
echo "$i | \n";
if ($show_owner) {
$user = BoincUser::lookup_id($host->userid);
if ($user && $user->show_hosts) {
echo "", user_links($user), " | \n";
} else {
echo "Anonymous | \n";
}
}
}
if ($show_owner) {
// This is used in the "top computers" display
//
printf("
%s |
%s |
%s
%s |
%s
%s | ",
format_credit($host->expavg_credit), format_credit_large($host->total_credit),
$host->p_vendor, $host->p_model,
$host->os_name, $host->os_version
);
} else {
// This is used in constructing list of computers for a given user
//
echo "", format_credit($host->expavg_credit), " | \n";
echo "", format_credit_large($host->total_credit), " | \n";
echo "$host->p_vendor
$host->p_model | \n";
echo "$host->os_name
$host->os_version | \n";
echo "".sched_log_link($host->rpc_time)." | \n";
}
echo "
\n";
}
// return true iff it's possible that the hosts are actually
// the same machine
//
function ghz($x) {
$y = explode(" ", $x);
foreach ($y as $z) {
if (strstr($z, "GHz")) return $z;
if (strstr($z, "MHz")) return $z;
}
}
function cpus_compatible($host1, $host2) {
// we screwed around with Intel processor names,
// so count them as compatible if both contain "Intel" and "Pentium",
// and don't have conflicting clock rate info
// Get rid of cpu capabilities before check
$pos = strpos($host1->p_model, '[');
$host1pm = $host1->p_model;
if($pos) {
$host1pm = trim(substr($host1->p_model, 0, $pos));
}
$pos = strpos($host2->p_model, '[');
$host2pm = $host2->p_model;
if($pos) {
$host2pm = trim(substr($host2->p_model, 0, $pos));
}
$p1 = "$host1->p_vendor $host1pm";
$p2 = "$host2->p_vendor $host2pm";
if (strstr($p1, "Pentium") && strstr($p1, "Intel")
&& strstr($p2, "Pentium") && strstr($p2, "Intel")
) {
$g1 = ghz($p1);
$g2 = ghz($p2);
if ($g1 && $g2) {
if ($g1 != $g2) return false;
} else {
return false;
}
} else if (strstr($p1, "AuthenticAMD") && strstr($p2, "AuthenticAMD")) {
return true;
} else {
if ($host2->p_vendor != $host1->p_vendor) return false;
// they're compatible if models are the same,
// or contents of [family/model/stepping] are the same
if ($host1pm != $host2pm) return false;
}
return true;
}
// does one host strictly precede the other?
//
function times_disjoint($host1, $host2) {
if ($host1->rpc_time < $host2->create_time) return true;
if ($host2->rpc_time < $host1->create_time) return true;
return false;
}
function os_compatible($host1, $host2) {
if (strstr($host1->os_name, "Windows") && strstr($host2->os_name, "Windows")) return true;
if (strstr($host1->os_name, "Linux") && strstr($host2->os_name, "Linux")) return true;
if (strstr($host1->os_name, "Darwin") && strstr($host2->os_name, "Darwin")) return true;
if (strstr($host1->os_name, "SunOS") && strstr($host2->os_name, "SunOS")) return true;
if ($host1->os_name == $host2->os_name) return true;
return false;
}
// Return true if it's possible that the two host records
// correspond to the same host
// NOTE: the cheat-proofing comes from checking
// that their time intervals are disjoint.
// So the CPU/OS checks don't have to be very strict.
//
function hosts_compatible($host1, $host2, $detail) {
// skip disjoint-time check if one host or other has no credit
//
if ($host1->total_credit && $host2->total_credit) {
if (!times_disjoint($host1, $host2)) {
if ($detail) {
$c1 = date_str($host1->create_time);
$r1 = date_str($host1->rpc_time);
$c2 = date_str($host2->create_time);
$r2 = date_str($host2->rpc_time);
echo "