function query_batch($r) { xml_start_tag("query_batch"); list($user, $user_submit) = authenticate_user($r, null); $batch = get_batch($r); if ($batch->user_id != $user->id) { xml_error(-1, "BOINC server: not owner of batch"); } $wus = BoincWorkunit::enum("batch = {$batch->id}"); $batch = get_batch_params($batch, $wus); $get_cpu_time = (int) $r->get_cpu_time; print_batch_params($batch, $get_cpu_time); $n_outfiles = n_outfiles($wus[0]); foreach ($wus as $wu) { echo " <job>\n <id>{$wu->id}</id>\n <name>{$wu->name}</name>\n <canonical_instance_id>{$wu->canonical_resultid}</canonical_instance_id>\n <n_outfiles>{$n_outfiles}</n_outfiles>\n </job>\n"; } echo "</query_batch>\n"; }
function query_batch($r) { list($user, $user_submit) = authenticate_user($r, null); $batch_id = (int) $r->batch_id; $batch = BoincBatch::lookup_id($batch_id); if (!$batch) { error("no such batch"); } if ($batch->user_id != $user->id) { error("not owner"); } $wus = BoincWorkunit::enum("batch = {$batch_id}"); $batch = get_batch_params($batch, $wus); echo "<batch>\n"; print_batch_params($batch); $n_outfiles = n_outfiles($wus[0]); foreach ($wus as $wu) { echo " <job>\n <id>{$wu->id}</id>\n <canonical_instance_id>{$wu->canonical_resultid}</canonical_instance_id>\n <n_outfiles>{$n_outfiles}</n_outfiles>\n </job>\n"; } echo "</batch>\n"; }