这个代码是tcl程序
源代码在线查看: one_protocol
#!/bin/tcsh
#Short-RTT TCP Friendliness
#./one_plan 300 20 5 1 1 $1 4 0 4 2 1
#./one_plan 300 100 5 1 1 $1 4 0 4 2 1
#./one_plan 300 300 5 1 1 $1 4 0 4 2 1
#./one_plan 300 500 5 1 1 $1 4 0 4 2 1
#./one_plan 300 1000 5 1 1 $1 4 0 4 2 1
#Long-RTT TCP Friendliness
./one_plan 300 20 50 1 1 $1 4 0 4 2 1
./one_plan 300 100 50 1 1 $1 4 0 4 2 1
./one_plan 300 300 50 1 1 $1 4 0 4 2 1
./one_plan 300 500 50 1 1 $1 4 0 4 2 1
./one_plan 300 1000 50 1 1 $1 4 0 4 2 1
#Stability
./one_plan 500 2500 10 1 2 $1 4 100 4 3 1
./one_plan 500 2500 10 1 0.2 $1 4 100 4 3 1