[ns] ns-allinone-2.28-cygwin-binaries.zip problem(please help)
Sven Ehlert
ehlert at fokus.fraunhofer.de
Wed Jun 8 15:54:40 PDT 2005
Hello,
since you're allready in the Cygwin environment, run ns without the
/cygdrive/c/ statement. This might help.
Greetings
/Sven
Sharmin Azam wrote:
> Hi,
> I downloaded ns-allinone-2.28-cygwin-binaries.zip. from the following link.
> http://www.isi.edu/nsnam/ns/ns-cygwin.html
> But when i tried to run the first tcl program example2.tcl I got the following error:
>
> elora at CSE-f7-UB-306 ~
> $ /cygdrive/c/Cygwin/usr/bin/ns example2.tcl
> application-specific initialization failed: Can't find a usable init.tcl in the
> following directories:
> /cygdrive/c/Cygwin/usr/lib/tcl8.4/ /home/dukat/ns-allinone-2.28/lib/tcl8.4 /
> cygdrive/c/Cygwin/usr/lib/tcl8.4/ /cygdrive/c/Cygwin/usr/lib/tcl8.4 /cygdrive/c/
> Cygwin/lib/tcl8.4 /cygdrive/c/Cygwin/usr/library /cygdrive/c/Cygwin/library /cyg
> drive/c/Cygwin/tcl8.4.5/library /cygdrive/c/tcl8.4.5/library /home/dukat/ns-alli
> none-2.28/lib/tcl8.4
>
> This probably means that Tcl wasn't installed properly.
> Can't find a usable init.tcl in the following directories:
> /cygdrive/c/Cygwin/usr/lib/tcl8.4/ /home/dukat/ns-allinone-2.28/lib/tcl8.4 /
> cygdrive/c/Cygwin/usr/lib/tcl8.4/ /cygdrive/c/Cygwin/usr/lib/tcl8.4 /cygdrive/c/
> Cygwin/lib/tcl8.4 /cygdrive/c/Cygwin/usr/library /cygdrive/c/Cygwin/library /cyg
> drive/c/Cygwin/tcl8.4.5/library /cygdrive/c/tcl8.4.5/library /home/dukat/ns-alli
> none-2.28/lib/tcl8.4
>
> This probably means that Tcl wasn't installed properly.
> while executing
> "error $msg"
> (procedure "tclInit" line 42)
> invoked from within
> "tclInit"
>
> Th code of example2.tcl is:
>
> #Create a simulator object
>
> set ns [new Simulator]
>
> #Define different colors for data flows
>
> $ns color 1 Blue
>
> $ns color 2 Red
>
> #Open the nam trace file
>
> set nf [open out.nam w]
>
> $ns namtrace-all $nf
>
> #Define a 'finish' procedure
>
> proc finish {} {
>
> global ns nf
>
> $ns flush-trace
>
> #Close the trace file
>
> close $nf
>
> #Execute nam on the trace file
>
> exec nam out.nam &
>
> exit 0
>
> }
>
> #Create four nodes
>
> set n0 [$ns node]
>
> set n1 [$ns node]
>
> set n2 [$ns node]
>
> set n3 [$ns node]
>
> #Create links between the nodes
>
> $ns duplex-link $n0 $n2 1Mb 10ms DropTail
>
> $ns duplex-link $n1 $n2 1Mb 10ms DropTail
>
> $ns duplex-link $n3 $n2 1Mb 10ms SFQ
>
> $ns duplex-link-op $n0 $n2 orient right-down
>
> $ns duplex-link-op $n1 $n2 orient right-up
>
> $ns duplex-link-op $n2 $n3 orient right
>
> #Monitor the queue for the link between node 2 and node 3
>
> $ns duplex-link-op $n2 $n3 queuePos 0.5
>
> #Create a UDP agent and attach it to node n0
>
> set udp0 [new Agent/UDP]
>
> $udp0 set class_ 1
>
> $ns attach-agent $n0 $udp0
>
> # Create a CBR traffic source and attach it to udp0
>
> set cbr0 [new Application/Traffic/CBR]
>
> $cbr0 set packetSize_ 500
>
> $cbr0 set interval_ 0.005
>
> $cbr0 attach-agent $udp0
>
> #Create a UDP agent and attach it to node n1
>
> set udp1 [new Agent/UDP]
>
> $udp1 set class_ 2
>
> $ns attach-agent $n1 $udp1
>
> # Create a CBR traffic source and attach it to udp1
>
> set cbr1 [new Application/Traffic/CBR]
>
> $cbr1 set packetSize_ 500
>
> $cbr1 set interval_ 0.005
>
> $cbr1 attach-agent $udp1
>
> #Create a Null agent (a traffic sink) and attach it to node n3
>
> set null0 [new Agent/Null]
>
> $ns attach-agent $n3 $null0
>
> #Connect the traffic sources with the traffic sink
>
> $ns connect $udp0 $null0
>
> $ns connect $udp1 $null0
>
> #Schedule events for the CBR agents
>
> $ns at 0.5 "$cbr0 start"
>
> $ns at 1.0 "$cbr1 start"
>
> $ns at 4.0 "$cbr1 stop"
>
> $ns at 4.5 "$cbr0 stop"
>
> #Call the finish procedure after 5 seconds of simulation time
>
> $ns at 5.0 "finish"
>
> #Run the simulation
>
> $ns run
>
> Can anyone pls help me?
>
> Sharmin
>
>
> __________________________________________________
> Do You Yahoo!?
> Tired of spam? Yahoo! Mail has the best spam protection around
> http://mail.yahoo.com
More information about the Ns-users
mailing list