Nodes and Links

The node contains only its node id and the port number for the next agent. A link only contains the values of its bandwidth and delay.

SessionNode instproc init {} {
    $self instvar id_ np_
    set id_ [Node getid]
    set np_ 0

SessionSim instproc simplex-link { n1 n2 bw delay type } {
    $self instvar bw_ delay_
    set sid [$n1 id]
    set did [$n2 id]

    set bw_($sid:$did) [expr [string trimright $bw Mb] * 1000000]
    set delay_($sid:$did) [expr [string trimright $delay ms] * 0.001]

Tom Henderson 2011-11-05