Rooba
/
boinc
mirror of https://github.com/BOINC/boinc.git
1
0
Fork 0
Code Issues 1 Packages Projects Releases Wiki Activity

*** empty log message *** 

svn path=/trunk/boinc/; revision=616
This commit is contained in:
Hamid Aghdaee 2002-11-15 00:28:55 +00:00
parent dd1e4c2a18
commit 9f4c65aaef
1 changed files with 150 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

150
test/test_pers.php Normal file
View File

@ -0,0 +1,150 @@
#! /usr/local/bin/php
<?php
//This tests the persistent file transfers for download and upload. It interrupts them in the middle and makes sure that the filesize never decreases along interrupted transfers.
include_once("test.inc");
set_time_limit(10000000000);
$project = new Project;
$user = new User();
$host = new Host($user);
$app = new App("upper_case");
$app_version = new App_Version($app);
$project->add_user($user);
$project->add_app($app);
$project->add_app_version($app_version);
$project->install(); // must install projects before adding to hosts
$host->log_flags = "log_flags.xml";
$host->add_project($project);
$host->install();
echo "adding work\n";
$work = new Work($app);
$work->wu_template = "uc_wu";
$work->result_template = "uc_result";
$work->nresults = 2;
array_push($work->input_files, "input");
$work->install($project);
$project->start_feeder();
//get the path for checking download
$source_dir = get_env_var("BOINC_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");
$boinc_pid = $host->get_new_boincpid(null);
assert($pid != -1);
echo "\n boinc_pid is $boinc_pid";
$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;
if(($temp > 40000) && ($first ==0))
{
print "\n stopping and rerunning the client";
echo "\n now killing boinc_pid : $boinc_pid";
$host->kill($boinc_pid, null);
$host->run_asynch("-exit_when_idle -limit_transfer_rate 2048");
$boinc_pid = $host->get_new_boincpid($boinc_pid);
echo "\nNow executing : $boinc_pid";
$first++;
}
}
$file_size = $temp;
if($file_size == filesize("$source_dir/apps/upper_case"))
{
echo "\n download test succeeded";
break;
}
}
}
$file_size = 0;
$path= "$project->project_dir/upload/uc_wu_0_0";
$first =0;
print "\nupload path is: ".$path;
echo "\n Now checking upload";
while(1)
{
// echo "\n checking upload";
if(file_exists($path))
{
// echo "\nfile exists is download";
$temp = filesize($path);
if($temp < $file_size)
{
echo "\nfilesize dropped, problem uploading\n";
echo "temp is $temp, file_size if $file_size\n";
break;
}
if($temp > $file_size)
{
print "\n filesize increased, it is : ".$temp;
if(($temp > 20000) && ($first ==0))
{
print "\n stopping and rerunning the client";
print "\nkilling $boinc_pid";
$host->kill($boinc_pid,null);
$host->run_asynch("-exit_when_idle -limit_transfer_rate 2048");
$boinc_pid = $host->get_new_boincpid($boinc_pid);
echo "\nnew boinc_pid is $boinc_pid";
$first++;
}
}
$file_size = $temp;
if($file_size == filesize("$source_dir/test/uc_correct_output"))
{
print "\n all of the files has been uploaded";
print "\n stopping and rerunning the client";
$host->kill($boinc_pid, null);
$host->run("-exit_when_idle");
break;
}
}
}
$project->stop();
$result->state = RESULT_STATE_DONE;
$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");
?>