Commit ec2ec1ea authored by Jonathon Duerig's avatar Jonathon Duerig

Added a script which generates the events to set up a cloud experiment given...

Added a script which generates the events to set up a cloud experiment given the input of the file generated from the db by init-elabnodes.
parent e5a85c34
#usage: init-by-file.pl proj exp input-file
#
# Input file is generated by init-elabnodes.pl using the -o option.
$proj = $ARGV[0];
$exp = $ARGV[1];
$filename = $ARGV[2];
open(FILE, "<".$filename) or die("Cannot open $filename\n");
while ($line = <FILE>)
{
$line =~ /^10.0.0.([0-9]+) ([0-9.]+) ([0-9.]+) ([0-9.]+) [0-9.]+$/;
print("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 bandwidth=$3\n");
print("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 delay=$4\n");
system("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 bandwidth=$3");
system("/usr/testbed/bin/tevc -e tbres/pelab-generated now elabc-elab-$1 modify dest=$2 delay=$4");
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment