HELP ME PLEASEEEE!
I have the same problem of Nicolas.
i show there the enigmaaa...
******************************************************
Hello,
I would like to know if it was possible to implement RTP in a satellites
network, and if it's possible, how can I do it?
Indeed, I would like to make real-time (RTP+RTCP) communications between 2
'terrestrial' nodes, using a geo-stationnary satellite to link both of them.
I already handled TCL scripts of satellites networks, but when I implement a
RTP
session on the 2 terrestrial nodes and the satellite, no packet forwards on the
terminal-satellite link.
Thanks for your help!
Nicolas Dubien.
********* Script **********
global ns
set ns [new Simulator -multicast on]
$ns rtproto Static
# Global configuration parameters
global opt
set opt(chan) Channel/Sat
set opt(bw_up) 2Mb
set opt(bw_down) 2Mb
set opt(bw_isl) 25Mb
set opt(phy) Phy/Sat
set opt(mac) Mac/Sat
set opt(ifq) Queue/DropTail
set opt(qlim) 50
set opt(ll) LL/Sat
set opt(wiredRouting) ON
proc finish {} {
global ns f
$ns flush-trace
close $f
exit 0
}
# XXX This tracing enabling must precede link and node creation
set f [open out.tr w]
$ns trace-all $f
# Set up satellite and terrestrial nodes
$ns node-config -satNodeType geo \
-llType $opt(ll) \
-ifqType $opt(ifq) \
-ifqLen $opt(qlim) \
-macType $opt(mac) \
-phyType $opt(phy) \
-channelType $opt(chan) \
-downlinkBW $opt(bw_down) \
-wiredRouting $opt(wiredRouting)
# GEO satellite at 15 degrees longitude East
set n(1) [$ns node]; $n(1) set-position 15
# Two terminals: one in Helsinki and one in Lyon
$ns node-config -satNodeType terminal
set n(2) [$ns node]; $n(2) set-position 60.15 25.3; # Helsinki
set n(3) [$ns node]; $n(3) set-position 45.45 4.50; # Lyon
# Add GSLs to geo satellites
$n(2) add-gsl geo $opt(ll) $opt(ifq) $opt(qlim) $opt(mac) $opt(bw_up) \
$opt(phy) [$n(1) set downlink_] [$n(1) set uplink_]; # Sat <--> Helsinki
$n(3) add-gsl geo $opt(ll) $opt(ifq) $opt(qlim) $opt(mac) $opt(bw_up) \
$opt(phy) [$n(1) set downlink_] [$n(1) set uplink_]; # Sat <--> Lyon
# Another terrestrial node
$ns unset satNodeType_
set n(4) [$ns node]; # Espoo
# Add link between Helsinki terminal and Espoo node
$ns duplex-link $n(2) $n(4) 5Mb 2ms DropTail; # Helsinki <--> Espoo
#Trace
$ns trace-all-satlinks $f
#Multicast
set mproto DM
set mrthandle [$ns mrtproto $mproto {}]
set group [Node allocaddr]
#RTP Session
for {set i 1} {$i <= 4} {incr i} {
set s($i) [new Session/RTP]
$s($i) session_bw 400kb/s
$s($i) attach-node $n($i)
}
# Satellite routing
set satrouteobject_ [new SatRouteObject]
$satrouteobject_ compute_routes
# Join
$ns at 1.0 "$s(1) join-group $group"; $ns at 1.1 "$s(1) start"
$ns at 1.0 "$s(2) join-group $group"; $ns at 1.1 "$s(2) start"
$ns at 1.0 "$s(3) join-group $group"; $ns at 1.1 "$s(3) start"
$ns at 1.0 "$s(4) join-group $group"; $ns at 1.1 "$s(4) start"
# Emission
$ns at 2.0 "$s(2) transmit 400kb/s"
$ns at 5.0 "finish"
$ns run
------------------------------------------------------
Passa a Infostrada. ADSL e Telefono senza limiti e senza canone Telecom
http://click.libero.it/infostrada
