Hi.

  I am implementing a new protocol over the NSIS module on ns-2. The source 
code has compiled successfully. Now, I am running a sample script. The output 
starts off properly (first 6 lines of output below) but then I am getting an 
error as follows. Please give me some hints about this issue. (Script used is 
inline after the output message)

Node n0 sent Pbs query to Node n1.
The requested volume is 20.
Api Call mode will be execed
MRI: IPVersion must be 4 or 6
***Node 0 send 'query' message (Dmode with rao) ***
Send with UDP

--- Classfier::no-slot{} default handler (tcl/lib/ns-lib.tcl) ---
        _o13: no target for slot -1
        _o13 type: Classifier/Hash/Dest
content dump:
classifier _o13
        0 offset
        0 shift
        2147483647 mask
        2 slots
                slot 0: _o19 (Classifier/Port)
                slot 1: _o30 (Connector)
        -1 default
---------- Finished standard no-slot{} default handler ----------

-End of Output

pbs-example.tcl Script:

set ns [new Simulator]
$ns rtproto DV
set tracefd [open example.tr w]
$ns trace-all $tracefd
#Open the nam trace file
set nf [open out.nam w]
$ns namtrace-all $nf

#Define a 'finish' procedure
proc finish {} {
        global ns nf tracefd
        $ns flush-trace
        #Close the trace file
        close $tracefd
        close $nf
        #Execute nam on the trace file
        exec nam out.nam &
        exit 0
}


############ Create Eight nodes #############
set n0 [$ns node]
set n1 [$ns node]

$n0 color blue
$n1 color red

########### Trans with UDP ########
set udp0 [new Agent/UDP]
set udp1 [new Agent/UDP]

$ns attach-agent $n0 $udp0
$ns attach-agent $n1 $udp1

############ Trans with TCP ###############
set tcp0 [new Agent/TCP/SimpleTcp]
set tcp1 [new Agent/TCP/SimpleTcp]

$ns attach-agent $n0 $tcp0
$ns attach-agent $n1 $tcp1

$tcp0 set fid_ 0
$tcp1 set fid_ 0

$tcp0 listen
$tcp1 listen

set app0 [new Application/TcpApp/GistTcpApp $tcp0]
set app1 [new Application/TcpApp/GistTcpApp $tcp1]

########### Set Gist ##############
set gist0 [new Application/Gist]
set gist1 [new Application/Gist]

$gist0 attachAgent $udp0
$gist1 attachAgent $udp1

$app0 setapp $gist0
$app1 setapp $gist1

$gist0 pbs-install
$gist1 pbs-install

########### Create a duplex link between the nodes #############
$ns duplex-link $n0 $n1 1Mb 100ms DropTail

$ns duplex-link-op $n0 $n1 orient right

########### Run the simulation ###########

#debug 1;
$ns at 1.0 "$gist0 pbs query n1 20"
#debug 2;

$ns at 5.0 "finish"

$ns run 


      

Reply via email to