function delete_teams()
{
global $days, $test;
$query = "nusers < 2 and seti_id=0 and total_credit=0";
if ($days) {
$x = time() - $days * 86400;
$query .= " and create_time > {$x}";
}
$teams = BoincTeam::enum($query);
foreach ($teams as $team) {
$n = team_count_members($team->id);
if ($n > 1) {
continue;
}
if (!has_link($team->description)) {
continue;
}
$user = BoincUser::lookup_id($team->userid);
if ($user) {
$n = BoincPost::count("user={$user->id}");
if ($n) {
continue;
}
$n = BoincHost::count("userid={$user->id}");
if ($n) {
continue;
}
}
if ($test) {
echo "would delete team:\n";
echo " ID: {$team->id}\n";
echo " name: {$team->name}\n";
echo " description: {$team->description}\n";
} else {
$team->delete();
echo "deleted team ID {$team->id} name {$team->name}\n";
if ($user) {
do_delete_user($user);
}
}
}
}
function delete_profiles()
{
global $test, $days;
$profiles = BoincProfile::enum("");
foreach ($profiles as $p) {
if (has_link($p->response1) || has_link($p->response2)) {
$user = BoincUser::lookup_id($p->userid);
if (!$user) {
echo "profile has missing user: %p->userid\n";
continue;
}
if ($days) {
if ($user->create_time < time() - $days * 86400) {
continue;
}
}
$n = BoincHost::count("userid={$p->userid}");
if ($n) {
continue;
}
$n = BoincPost::count("user={$p->userid}");
if ($n) {
continue;
}
delete_user($user);
if ($test) {
echo "\n{$p->userid}\n{$p->response1}\n{$p->response2}\n";
}
}
}
}
