$project->add_app_version($app_version); $project->install(); // must install projects before adding to hosts $project->install_feeder(); $host->log_flags = "log_flags.xml"; $host->add_user($user, $project); $host->install(); echo "adding work\n"; $work = new Work($app); $work->wu_template = "uc_wu"; $work->result_template = "uc_result"; $work->redundancy = 2; array_push($work->input_files, "input"); $work->install($project); //delete the download_dir immediately $project->delete_downloaddir(); $project->start_servers(); $pid = $host->run_asynch("-exit_when_idle"); echo "sleeping 100 secs\n"; sleep(100); $project->reinstall_downloaddir(null); $status = 0; //wait until the host has stopped running pcntl_waitpid($pid, $status, 0); $project->stop(); $result->server_state = RESULT_SERVER_STATE_OVER; $result->stderr_out = "APP: upper_case: starting, argc 1"; $result->exit_status = 0; $project->check_results(2, $result); $project->compare_file("uc_wu_0_0", "uc_correct_output"); $project->compare_file("uc_wu_1_0", "uc_correct_output");
$host->install(); echo "adding work\n"; $work = new Work($app); $work->wu_template = "uc_wu"; $work->result_template = "uc_result"; $work->redundancy = 2; array_push($work->input_files, "input"); $work->install($project); $project->start_feeder(); //get the path for checking download $source_dir = SRC_DIR; $enc_url = strtr($project->master_url, "/", "_"); $enc_url = substr($enc_url, 7, strlen($enc_url)); $path = "{$host->host_dir}/projects/{$enc_url}/upper_case"; print "\n the path for checking download is :" . $path; $pid = $host->run_asynch("-exit_when_idle -limit_transfer_rate 2048"); $client_pid = $host->get_new_client_pid(null); assert($pid != -1); $first = 0; $file_size = 0; //Check download while (1) { if (file_exists($path)) { $temp = filesize($path); if ($temp < $file_size) { echo "\nfilesize dropped, problem downloading\n"; echo "temp is {$temp}, file_size is {$file_size}\n"; break; } else { if ($temp > $file_size) { print "\n filesize increased, it is : " . $temp;