- Timestamp:
- Oct 29, 2007 4:51:17 PM (17 years ago)
- Branches:
- axis_example, compt_changes, info-ops, master, version-1.30, version-2.00, version-3.01, version-3.02
- Children:
- 22bb7f8
- Parents:
- fd7a59b
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
fedkit/splitter.pl
rfd7a59b re5fee75 29 29 # (changed during devel) 30 30 my $tclsh; # tclsh to call directly (changed during devel) 31 my $muxmax; # Maximum number of links/lans over 1 gw pair 31 32 my @tarfiles; # Tarfiles in use by this experiment 32 33 my @rpms; # Rpms in use by this experiment … … 441 442 $tb_config = $opts{'testbeds'} || "./testbeds"; # testbed configurations 442 443 $local_script_dir = $opts{'scriptdir'}; # Local scripts 444 $muxmax = $opts{'muxlimit'} || 3; # Number of connections muxed on one 445 # gateway 443 446 444 447 $max_children = $opts{'p'} || $opts{'maxchildren'} … … 484 487 my $pipe = new IO::Pipe; 485 488 # NB no more -p call on parse call. 486 $pipe->reader("$tclsh $tcl_splitter -s - m $master $pid $gid $eid $tcl") ||487 die "Cannot execute $tclsh $tcl_splitter -s - m $master $pid $gid $eid $tcl:$!\n";489 $pipe->reader("$tclsh $tcl_splitter -s -x $muxmax -m $master $pid $gid $eid $tcl") || 490 die "Cannot execute $tclsh $tcl_splitter -s -x $muxmax -m $master $pid $gid $eid $tcl:$!\n"; 488 491 489 492 # Parsing variables … … 933 936 containing this experiment on the master testbed. 934 937 935 =item Tclparse936 937 The pathname to the experiment parsing program. Only developers should set938 this.939 940 =item Tclsh941 942 The pathname to the local oTcl shell. Only developers should set943 this.944 945 938 =item Timeout 946 939 … … 955 948 any value avoids this swap out. (This behavior can be requested on the command 956 949 line by specifying B<-F>.) 950 951 =item MuxLimit 952 953 The maximum bumber of links/lans carried by one gateway pair 954 955 =item Tclparse 956 957 The pathname to the experiment parsing program. Only developers should set 958 this. 959 960 =item Tclsh 961 962 The pathname to the local oTcl shell. Only developers should set 963 this. 957 964 958 965 =back
Note: See TracChangeset
for help on using the changeset viewer.