Ns-2 Simulation Code and Examples: Home Memb Ers Itmben CH Sats Archiv E Gm:Sigmetrics02 Gm:Spie02 Ns-2

Home
Memb ns-2 Simulation Code and Examples

ers
itmBen
ch Simulation results in [GM:sigmetrics02] and [GM:spie02] were all performed in ns-2.
SaTS
Archiv Size-aware scheduling consists of two parts: packet classification and packet
e differentiation. Therefore, corresponding modules (size-aware classifier and
corresponding AQM schemes like RIO-PS) need to be installed. Step-by-step instructions
can be found here.
When all the modules have been installed, we now see an illustrative scenario in which
flows of size 5 packets or below being identified as short flows, and enjoy high priorities
in packet delivery. Figure 1 depicts the simulation topology.
Figure 1: Simulation Topology
In this simple example, there are two parallel TCP sessions sharing a single bottleneck
link between
node 1 and node 2 (of capacity 700kb).
# Create a dumbbell topology
$ns duplex-link $s(0) $n(0) 1Mb 5ms DropTail
$ns duplex-link $s(1) $n(0) 1Mb 5ms DropTail
$ns duplex-link $n(0) $n(1) 1Mb 20ms RED/myRIO

$ns duplex-link $n(1) $n(2) 700Kb 25ms RED/myRIO
$ns duplex-link $n(2) $r(0) 1Mb 5ms DropTail

$ns duplex-link $n(2) $r(1) 1Mb 5ms DropTail
One of the sessions runs from node 3 to node 5, periodically transmitting 1000 packets.
Therefore, all flows in this session are long according to our definition. On the contrary,
in the session from node 4 to node 6, only 4 packets are transmitted in each flow. The
simulation script is shown below:
# Create sessions
proc build-fore-tcp { idx size intv stime } {
global ns ftcp fsink
set ftcp($idx) [new Agent/TCP/Newreno]

set fsink($idx) [new Agent/TCPSink]
$ns at $stime "start-conn 1 $idx $intv $size"

}
proc start-conn { firsttime idx intv size } {

global ns ftcp fsink s r
set now [$ns now]
if { $firsttime == 0 } {
$ns detach-agent $s([expr $idx%2]) $ftcp($idx)
$ns detach-agent $r([expr $idx%2]) $fsink($idx)
$ftcp($idx) reset
$fsink($idx) reset
}
$ns attach-agent $s([expr $idx%2]) $ftcp($idx)
$ns attach-agent $r([expr $idx%2]) $fsink($idx)
$ns connect $ftcp($idx) $fsink($idx)
$ftcp($idx) set fid_ 0
$ftcp($idx) proc done {} "close-conn $idx $intv $size"

$ftcp($idx) advanceby $size
}
proc close-conn { idx intv size } {

global ns
set now [$ns now]

$ns at [expr $now + $intv] "start-conn 0 $idx $intv $size"
puts "at $now + $intv start next"
}
set forel_intv 1
set fores_intv 0.05
set ssize 4
set lsize 1000
build-fore-tcp 1 $ssize 1 0.1
build-fore-tcp 0 $lsize $forel_intv 0.5
for {set i 0} {$i < 5} { incr i} {
build-fore-tcp [expr 2*$i+3] $ssize $fores_intv [expr 1.2+

$i*0.1]
}
Node 0 is the "size-aware classifier", which counts the incoming packets from each flow.
Once the count exceeds a certain threshold (in this case 5), the remaining packets from
the corresponding flow are identified as long flow packets. In the simulation, long flow
packets are colored in blue. All the other packets, i.e., packets from flows of size less
than 5, and the first 5 packets from a long flow, are all identified as short flow packets,
and colored in red in the simulation.
To upload a size-aware classifier with threshold set to 5 to node 0, do the following:

# Load a size-aware classifier to node 0
set cls [new Classifier/Hash/SizeAware 128]

$cls set default_ -1
$cls set flowlen_thr_ 5
$cls set refresh_intv_ 2
$cls set dynamic_update_ 0
set n(0) [node_with_classifier $cls]
As a result, all packets between node 4 and node 6 are colored in red:
Figure 2: Packets from short flows.
For flows of size bigger than 5, the first 5 packets are colored in red, and the remaining
packets are colored in blue:
Figure 3: Packets from long flows.
At the bottleneck link (link between node 1 and node 2), a differentiated dropping
scheme is employed. This is achieved by:
$ns duplex-link $n(1) $n(2) 700Kb 25ms RED/myRIO
$ns duplex-link-op $n(1) $n(2) orient right
Queue/RED/myRIO set gentle_ true

Queue/RED/myRIO set thresh_ 1
Queue/RED/myRIO set maxthresh_ 15
Queue/RED/myRIO set weight_ 10
Queue/RED/myRIO set setbit_ false
set redq [[$ns link $n(1) $n(2)] queue]

$redq set q_weight_ [expr 1.0/2]
$redq set linterm_ [expr 4.0]
$ns queue-limit $n(1) $n(0) 30
Notice that to obtain a more drastic effect of size-aware differentiation, we choose a

relatively high ratio between long and short flow packet dropping rate (weight_ is set to
10).
When congestion happens, low priority packets are dropped at a faster rate (on average
10 times faster) than that for high priority packets. This is illustrated in Figure 4:
Figure 4: More blue packets are dropped than red packets
As a result, high priority flows, or short flows, are transmitted at a rate higher than that of
low priority flows, or long flows, as TCP flows are responsive to packet drops. That is
the basic scheme of our size-aware scheduling. Figure 5 shows packets generated from
the two sessions, after some packets are dropped:
Figure 5: Red packets are generated faster than blue packets.
The figures in [GM:sigmetrics02] and [GM:spie02] were generated by simulation scripts

similar to that under the directory /foo/bar/size/sim-script/
Reference
[GM:sigmetrics02] L. Guo and I. Matta. "Scheduling Flows with Unknown Sizes:
Approximate Analysis". Proc. ACM SIGMETRICS'02 (poster), Los Angeles, CA, June
2002. [.ps], [.pdf] Full paper available as BU CS Technical Report TR-2002-09.
[GM:spie02] L. Guo and Ibrahim Matta. Differentiated Control of Web Traffic: A
Numerical Analysis. Proc. SPIE ITCOM'2002: Scalability and Traffic Control in IP
Networks, Boston, MA, August 2002.

Ns-2 Simulation Code and Examples: Home Memb Ers Itmben CH Sats Archiv E Gm:Sigmetrics02 Gm:Spie02 Ns-2

Uploaded by

Copyright:

Available Formats

Ns-2 Simulation Code and Examples: Home Memb Ers Itmben CH Sats Archiv E Gm:Sigmetrics02 Gm:Spie02 Ns-2

Uploaded by

Document Information

Original Title

Copyright

Available Formats

Share this document

Share or Embed Document

Sharing Options

Did you find this document useful?

Is this content inappropriate?

Copyright:

Available Formats

Ns-2 Simulation Code and Examples: Home Memb Ers Itmben CH Sats Archiv E Gm:Sigmetrics02 Gm:Spie02 Ns-2

Uploaded by

Copyright:

Available Formats

Home

Memb ns-2 Simulation Code and Examples

Figure 1: Simulation Topology

$ns duplex-link $n(0) $n(1) 1Mb 20ms RED/myRIO

$ns duplex-link $n(2) $r(0) 1Mb 5ms DropTail

set ftcp($idx) [new Agent/TCP/Newreno]

$ns at $stime "start-conn 1 $idx $intv $size"

proc start-conn { firsttime idx intv size } {

set now [$ns now]

$ftcp($idx) proc done {} "close-conn $idx $intv $size"

proc close-conn { idx intv size } {

set now [$ns now]

for {set i 0} {$i < 5} { incr i} {

build-fore-tcp [expr 2*$i+3] $ssize $fores_intv [expr 1.2+

To upload a size-aware classifier with threshold set to 5 to node 0, do the following:

set cls [new Classifier/Hash/SizeAware 128]

Queue/RED/myRIO set gentle_ true

set redq [[$ns link $n(1) $n(2)] queue]

Notice that to obtain a more drastic effect of size-aware differentiation, we choose a

Figure 4: More blue packets are dropped than red packets

The figures in [GM:sigmetrics02] and [GM:spie02] were generated by simulation scripts

You might also like