tcp-script

在Linux下做的QuadTree的程序

#
# Random Number Generator Seed: 26028
#
#
# 2 connecting to 3 at time 161.159
#
set cbr_(0) [$ns_ create-connection  CBR $node(1) CBR $node(2) 0]
$cbr_(0) set packetSize_ 1024
$cbr_(0) set interval_ 0.125
$cbr_(0) set random_ 1
$cbr_(0) set maxpkts_ 10000
$ns_ at 161.159 "$cbr_(0) start"
#
# 3 connecting to 4 at time 155.818
#
set cbr_(1) [$ns_ create-connection  CBR $node(2) CBR $node(3) 0]
$cbr_(1) set packetSize_ 1024
$cbr_(1) set interval_ 0.125
$cbr_(1) set random_ 1
$cbr_(1) set maxpkts_ 10000
$ns_ at 155.818 "$cbr_(1) start"
#
# 7 connecting to 8 at time 33.6052
#
set cbr_(2) [$ns_ create-connection  CBR $node(6) CBR $node(7) 0]
$cbr_(2) set packetSize_ 1024
$cbr_(2) set interval_ 0.125
$cbr_(2) set random_ 1
$cbr_(2) set maxpkts_ 10000
$ns_ at 33.6052 "$cbr_(2) start"
#
# 8 connecting to 9 at time 66.4798
#
set cbr_(3) [$ns_ create-connection  CBR $node(7) CBR $node(8) 0]
$cbr_(3) set packetSize_ 1024
$cbr_(3) set interval_ 0.125
$cbr_(3) set random_ 1
$cbr_(3) set maxpkts_ 10000
$ns_ at 66.4798 "$cbr_(3) start"
#
# 8 connecting to 10 at time 65.8852
#
set cbr_(4) [$ns_ create-connection  CBR $node(7) CBR $node(9) 0]
$cbr_(4) set packetSize_ 1024
$cbr_(4) set interval_ 0.125
$cbr_(4) set random_ 1
$cbr_(4) set maxpkts_ 10000
$ns_ at 65.8852 "$cbr_(4) start"
#
# 9 connecting to 10 at time 89.8986
#
set cbr_(5) [$ns_ create-connection  CBR $node(8) CBR $node(9) 0]
$cbr_(5) set packetSize_ 1024
$cbr_(5) set interval_ 0.125
$cbr_(5) set random_ 1
$cbr_(5) set maxpkts_ 10000
$ns_ at 89.8986 "$cbr_(5) start"
#
# 9 connecting to 11 at time 6.59378
#
set cbr_(6) [$ns_ create-connection  CBR $node(8) CBR $node(10) 0]
$cbr_(6) set packetSize_ 1024
$cbr_(6) set interval_ 0.125
$cbr_(6) set random_ 1
$cbr_(6) set maxpkts_ 10000
$ns_ at 6.59378 "$cbr_(6) start"
#
# 10 connecting to 11 at time 66.3103
#
set cbr_(7) [$ns_ create-connection  CBR $node(9) CBR $node(10) 0]
$cbr_(7) set packetSize_ 1024
$cbr_(7) set interval_ 0.125
$cbr_(7) set random_ 1
$cbr_(7) set maxpkts_ 10000
$ns_ at 66.3103 "$cbr_(7) start"
#
# 11 connecting to 12 at time 138.556
#
set cbr_(8) [$ns_ create-connection  CBR $node(10) CBR $node(11) 0]
$cbr_(8) set packetSize_ 1024
$cbr_(8) set interval_ 0.125
$cbr_(8) set random_ 1
$cbr_(8) set maxpkts_ 10000
$ns_ at 138.556 "$cbr_(8) start"
#
# 14 connecting to 15 at time 72.1953
#
set cbr_(9) [$ns_ create-connection  CBR $node(13) CBR $node(14) 0]
$cbr_(9) set packetSize_ 1024
$cbr_(9) set interval_ 0.125
$cbr_(9) set random_ 1
$cbr_(9) set maxpkts_ 10000
$ns_ at 72.1953 "$cbr_(9) start"
#
# 14 connecting to 16 at time 5.72871
#
set cbr_(10) [$ns_ create-connection  CBR $node(13) CBR $node(15) 0]
$cbr_(10) set packetSize_ 1024
$cbr_(10) set interval_ 0.125
$cbr_(10) set random_ 1
$cbr_(10) set maxpkts_ 10000
$ns_ at 5.72871 "$cbr_(10) start"
#
# 15 connecting to 16 at time 119.192
#
set cbr_(11) [$ns_ create-connection  CBR $node(14) CBR $node(15) 0]
$cbr_(11) set packetSize_ 1024
$cbr_(11) set interval_ 0.125
$cbr_(11) set random_ 1
$cbr_(11) set maxpkts_ 10000
$ns_ at 119.192 "$cbr_(11) start"
#
# 15 connecting to 17 at time 36.4951
#
set cbr_(12) [$ns_ create-connection  CBR $node(14) CBR $node(16) 0]
$cbr_(12) set packetSize_ 1024
$cbr_(12) set interval_ 0.125
$cbr_(12) set random_ 1
$cbr_(12) set maxpkts_ 10000
$ns_ at 36.4951 "$cbr_(12) start"
#
# 16 connecting to 17 at time 105.983
#
set cbr_(13) [$ns_ create-connection  CBR $node(15) CBR $node(16) 0]
$cbr_(13) set packetSize_ 1024
$cbr_(13) set interval_ 0.125
$cbr_(13) set random_ 1
$cbr_(13) set maxpkts_ 10000
$ns_ at 105.983 "$cbr_(13) start"
#
# 17 connecting to 18 at time 88.3038
#
set cbr_(14) [$ns_ create-connection  CBR $node(16) CBR $node(17) 0]
$cbr_(14) set packetSize_ 1024
$cbr_(14) set interval_ 0.125
$cbr_(14) set random_ 1
$cbr_(14) set maxpkts_ 10000
$ns_ at 88.3038 "$cbr_(14) start"
#
# 17 connecting to 19 at time 22.7734
#
set cbr_(15) [$ns_ create-connection  CBR $node(16) CBR $node(18) 0]
$cbr_(15) set packetSize_ 1024
$cbr_(15) set interval_ 0.125
$cbr_(15) set random_ 1
$cbr_(15) set maxpkts_ 10000
$ns_ at 22.7734 "$cbr_(15) start"
#
# 19 connecting to 20 at time 50.4788
#
set cbr_(16) [$ns_ create-connection  CBR $node(18) CBR $node(19) 0]
$cbr_(16) set packetSize_ 1024
$cbr_(16) set interval_ 0.125
$cbr_(16) set random_ 1
$cbr_(16) set maxpkts_ 10000
$ns_ at 50.4788 "$cbr_(16) start"
#
# 21 connecting to 22 at time 129.793
#
set cbr_(17) [$ns_ create-connection  CBR $node(20) CBR $node(21) 0]
$cbr_(17) set packetSize_ 1024
$cbr_(17) set interval_ 0.125
$cbr_(17) set random_ 1
$cbr_(17) set maxpkts_ 10000
$ns_ at 129.793 "$cbr_(17) start"
#
# 21 connecting to 23 at time 6.2859
#
set cbr_(18) [$ns_ create-connection  CBR $node(20) CBR $node(22) 0]
$cbr_(18) set packetSize_ 1024
$cbr_(18) set interval_ 0.125
$cbr_(18) set random_ 1
$cbr_(18) set maxpkts_ 10000
$ns_ at 6.2859 "$cbr_(18) start"
#
# 22 connecting to 23 at time 147.393
#
set cbr_(19) [$ns_ create-connection  CBR $node(21) CBR $node(22) 0]
$cbr_(19) set packetSize_ 1024
$cbr_(19) set interval_ 0.125
$cbr_(19) set random_ 1
$cbr_(19) set maxpkts_ 10000
$ns_ at 147.393 "$cbr_(19) start"
#
# 22 connecting to 24 at time 72.884
#
set cbr_(20) [$ns_ create-connection  CBR $node(21) CBR $node(23) 0]
$cbr_(20) set packetSize_ 1024
$cbr_(20) set interval_ 0.125
$cbr_(20) set random_ 1
$cbr_(20) set maxpkts_ 10000
$ns_ at 72.884 "$cbr_(20) start"
#
# 24 connecting to 25 at time 156.269
#
set cbr_(21) [$ns_ create-connection  CBR $node(23) CBR $node(24) 0]
$cbr_(21) set packetSize_ 1024
$cbr_(21) set interval_ 0.125
$cbr_(21) set random_ 1
$cbr_(21) set maxpkts_ 10000
$ns_ at 156.269 "$cbr_(21) start"
#
# 28 connecting to 29 at time 58.6941
#
set cbr_(22) [$ns_ create-connection  CBR $node(27) CBR $node(28) 0]
$cbr_(22) set packetSize_ 1024
$cbr_(22) set interval_ 0.125
$cbr_(22) set random_ 1
$cbr_(22) set maxpkts_ 10000
$ns_ at 58.6941 "$cbr_(22) start"
#
# 28 connecting to 30 at time 72.4283
#
set cbr_(23) [$ns_ create-connection  CBR $node(27) CBR $node(29) 0]
$cbr_(23) set packetSize_ 1024
$cbr_(23) set interval_ 0.125
$cbr_(23) set random_ 1
$cbr_(23) set maxpkts_ 10000
$ns_ at 72.4283 "$cbr_(23) start"
#
# 29 connecting to 30 at time 49.5431
#
set cbr_(24) [$ns_ create-connection  CBR $node(28) CBR $node(29) 0]
$cbr_(24) set packetSize_ 1024
$cbr_(24) set interval_ 0.125
$cbr_(24) set random_ 1
$cbr_(24) set maxpkts_ 10000
$ns_ at 49.5431 "$cbr_(24) start"
#
# 29 connecting to 31 at time 170.799
#
set cbr_(25) [$ns_ create-connection  CBR $node(28) CBR $node(30) 0]
$cbr_(25) set packetSize_ 1024
$cbr_(25) set interval_ 0.125
$cbr_(25) set random_ 1
$cbr_(25) set maxpkts_ 10000
$ns_ at 170.799 "$cbr_(25) start"
#
# 30 connecting to 31 at time 13.4001
#
set cbr_(26) [$ns_ create-connection  CBR $node(29) CBR $node(30) 0]
$cbr_(26) set packetSize_ 1024
$cbr_(26) set interval_ 0.125
$cbr_(26) set random_ 1
$cbr_(26) set maxpkts_ 10000
$ns_ at 13.4001 "$cbr_(26) start"
#
# 30 connecting to 32 at time 35.6088
#
set cbr_(27) [$ns_ create-connection  CBR $node(29) CBR $node(31) 0]
$cbr_(27) set packetSize_ 1024
$cbr_(27) set interval_ 0.125
$cbr_(27) set random_ 1
$cbr_(27) set maxpkts_ 10000
$ns_ at 35.6088 "$cbr_(27) start"
#
# 31 connecting to 32 at time 66.2971
#
set cbr_(28) [$ns_ create-connection  CBR $node(30) CBR $node(31) 0]
$cbr_(28) set packetSize_ 1024
$cbr_(28) set interval_ 0.125
$cbr_(28) set random_ 1
$cbr_(28) set maxpkts_ 10000
$ns_ at 66.2971 "$cbr_(28) start"
#
# 31 connecting to 33 at time 55.9237
#
set cbr_(29) [$ns_ create-connection  CBR $node(30) CBR $node(32) 0]
$cbr_(29) set packetSize_ 1024
$cbr_(29) set interval_ 0.125
$cbr_(29) set random_ 1
$cbr_(29) set maxpkts_ 10000
$ns_ at 55.9237 "$cbr_(29) start"
#
# 32 connecting to 33 at time 8.50134
#
set cbr_(30) [$ns_ create-connection  CBR $node(31) CBR $node(32) 0]
$cbr_(30) set packetSize_ 1024
$cbr_(30) set interval_ 0.125
$cbr_(30) set random_ 1
$cbr_(30) set maxpkts_ 10000
$ns_ at 8.50134 "$cbr_(30) start"
#
# 33 connecting to 34 at time 57.7605
#
set cbr_(31) [$ns_ create-connection  CBR $node(32) CBR $node(33) 0]
$cbr_(31) set packetSize_ 1024
$cbr_(31) set interval_ 0.125
$cbr_(31) set random_ 1
$cbr_(31) set maxpkts_ 10000
$ns_ at 57.7605 "$cbr_(31) start"
#
# 33 connecting to 35 at time 40.5282
#
set cbr_(32) [$ns_ create-connection  CBR $node(32) CBR $node(34) 0]
$cbr_(32) set packetSize_ 1024
$cbr_(32) set interval_ 0.125
$cbr_(32) set random_ 1
$cbr_(32) set maxpkts_ 10000
$ns_ at 40.5282 "$cbr_(32) start"
#
# 35 connecting to 36 at time 73.4216
#
set cbr_(33) [$ns_ create-connection  CBR $node(34) CBR $node(35) 0]
$cbr_(33) set packetSize_ 1024
$cbr_(33) set interval_ 0.125
$cbr_(33) set random_ 1
$cbr_(33) set maxpkts_ 10000
$ns_ at 73.4216 "$cbr_(33) start"
#
# 36 connecting to 37 at time 72.7674
#
set cbr_(34) [$ns_ create-connection  CBR $node(35) CBR $node(36) 0]
$cbr_(34) set packetSize_ 1024
$cbr_(34) set interval_ 0.125
$cbr_(34) set random_ 1
$cbr_(34) set maxpkts_ 10000
$ns_ at 72.7674 "$cbr_(34) start"
#
# 38 connecting to 39 at time 151.268
#
set cbr_(35) [$ns_ create-connection  CBR $node(37) CBR $node(38) 0]
$cbr_(35) set packetSize_ 1024
$cbr_(35) set interval_ 0.125
$cbr_(35) set random_ 1
$cbr_(35) set maxpkts_ 10000
$ns_ at 151.268 "$cbr_(35) start"
#
# 38 connecting to 40 at time 47.7294
#
set cbr_(36) [$ns_ create-connection  CBR $node(37) CBR $node(39) 0]
$cbr_(36) set packetSize_ 1024
$cbr_(36) set interval_ 0.125
$cbr_(36) set random_ 1
$cbr_(36) set maxpkts_ 10000
$ns_ at 47.7294 "$cbr_(36) start"
#
# 39 connecting to 40 at time 148.723
#
set cbr_(37) [$ns_ create-connection  CBR $node(38) CBR $node(39) 0]
$cbr_(37) set packetSize_ 1024
$cbr_(37) set interval_ 0.125
$cbr_(37) set random_ 1
$cbr_(37) set maxpkts_ 10000
$ns_ at 148.723 "$cbr_(37) start"
#
# 40 connecting to 41 at time 124.779
#
set cbr_(38) [$ns_ create-connection  CBR $node(39) CBR $node(40) 0]
$cbr_(38) set packetSize_ 1024
$cbr_(38) set interval_ 0.125
$cbr_(38) set random_ 1
$cbr_(38) set maxpkts_ 10000
$ns_ at 124.779 "$cbr_(38) start"
#
# 41 connecting to 42 at time 77.1644
#
set cbr_(39) [$ns_ create-connection  CBR $node(40) CBR $node(41) 0]
$cbr_(39) set packetSize_ 1024
$cbr_(39) set interval_ 0.125
$cbr_(39) set random_ 1
$cbr_(39) set maxpkts_ 10000
$ns_ at 77.1644 "$cbr_(39) start"
#
# 41 connecting to 43 at time 1.7993
#
set cbr_(40) [$ns_ create-connection  CBR $node(40) CBR $node(42) 0]
$cbr_(40) set packetSize_ 1024
$cbr_(40) set interval_ 0.125
$cbr_(40) set random_ 1
$cbr_(40) set maxpkts_ 10000
$ns_ at 1.7993 "$cbr_(40) start"
#
# 44 connecting to 45 at time 136.095
#
set cbr_(41) [$ns_ create-connection  CBR $node(43) CBR $node(44) 0]
$cbr_(41) set packetSize_ 1024
$cbr_(41) set interval_ 0.125
$cbr_(41) set random_ 1
$cbr_(41) set maxpkts_ 10000
$ns_ at 136.095 "$cbr_(41) start"
#
# 47 connecting to 48 at time 136.364
#
set cbr_(42) [$ns_ create-connection  CBR $node(46) CBR $node(47) 0]
$cbr_(42) set packetSize_ 1024
$cbr_(42) set interval_ 0.125
$cbr_(42) set random_ 1
$cbr_(42) set maxpkts_ 10000
$ns_ at 136.364 "$cbr_(42) start"
#
# 47 connecting to 49 at time 107.333
#
set cbr_(43) [$ns_ create-connection  CBR $node(46) CBR $node(48) 0]
$cbr_(43) set packetSize_ 1024
$cbr_(43) set interval_ 0.125
$cbr_(43) set random_ 1
$cbr_(43) set maxpkts_ 10000
$ns_ at 107.333 "$cbr_(43) start"
#
# 48 connecting to 49 at time 40.4776
#
set cbr_(44) [$ns_ create-connection  CBR $node(47) CBR $node(48) 0]
$cbr_(44) set packetSize_ 1024
$cbr_(44) set interval_ 0.125
$cbr_(44) set random_ 1
$cbr_(44) set maxpkts_ 10000
$ns_ at 40.4776 "$cbr_(44) start"
#
# 48 connecting to 50 at time 87.826
#
set cbr_(45) [$ns_ create-connection  CBR $node(47) CBR $node(49) 0]
$cbr_(45) set packetSize_ 1024
$cbr_(45) set interval_ 0.125
$cbr_(45) set random_ 1
$cbr_(45) set maxpkts_ 10000
$ns_ at 87.826 "$cbr_(45) start"
#
# 49 connecting to 50 at time 37.4484
#
set cbr_(46) [$ns_ create-connection  CBR $node(48) CBR $node(49) 0]
$cbr_(46) set packetSize_ 1024
$cbr_(46) set interval_ 0.125
$cbr_(46) set random_ 1
$cbr_(46) set maxpkts_ 10000
$ns_ at 37.4484 "$cbr_(46) start"
#
# 50 connecting to 1 at time 151.006
#
set cbr_(47) [$ns_ create-connection  CBR $node(49) CBR $node(0) 0]
$cbr_(47) set packetSize_ 1024
$cbr_(47) set interval_ 0.125
$cbr_(47) set random_ 1
$cbr_(47) set maxpkts_ 10000
$ns_ at 151.006 "$cbr_(47) start"
#
#Total TCP sources/connections: 32/48
#