#!/usr/local/bin/php -q
<?php
// $Id$
// tests whether command-line arg passing works
include_once "test.inc";
test_msg("standard concat application");
$project = new Project();
$project->add_core_and_version();
$project->add_app_and_version("concat");
$user = new User();
$host = new Host($user);
$project->add_user($user);
$project->install();
// must install projects before adding to hosts
$project->install_feeder();
$host->add_user($user, $project);
$host->install();
$work = new Work($app);
$work->wu_template = "concat_wu";
$work->result_template = "concat_result";
$work->redundancy = 2;
array_push($work->input_files, "input");
array_push($work->input_files, "input");
$work->install($project);
$project->start_servers();
$host->run("-exit_when_idle -skip_cpu_benchmarks");
$project->stop();
$result->server_state = RESULT_SERVER_STATE_OVER;
$project->check_results(2, $result);
$project->compare_file("concat_wu_0_0", "concat_correct_output");
$project->compare_file("concat_wu_1_0", "concat_correct_output");
<?php
// $Id$
// This tests whether the client handles multiple projects,
// and whether CPU time is divided correctly between projects
// The client should do work for project 2 5 times faster
// than for project 1
include_once "test.inc";
test_msg("multiple projects with resource share");
$project1 = new Project();
$project2 = new Project();
$user = new User();
$host = new Host($user);
$project1->add_core_and_version();
$project1->add_app_and_version("upper_case");
$project2->add_core_and_version();
$project2->add_app_and_version("upper_case");
$work = new Work();
$work->wu_template = "uc_wu";
$work->result_template = "uc_result";
$work->redundancy = 5;
$work->delay_bound = 60;
array_push($work->input_files, "input");
$project1->resource_share = 1;
$project1->shmem_key = "0x12344321";
$project1->short_name = "Project1";
$project1->long_name = "Project1";
$project1->add_user($user);
$project1->install();
// must install projects before adding to hosts
$project1->install_feeder();
$project2->resource_share = 5;