dadada/ns-3-leo
dadada/ns-3-leo
1
0
Fork 0
mirror of https://gitlab.ibr.cs.tu-bs.de/tschuber/ns-3-leo.git synced 2025-06-08 10:03:58 +02:00
Code Issues Releases Wiki Activity

refactor stuff

Browse source
This commit is contained in:
Tim Schubert 2020-07-20 15:48:24 +02:00
parent 57b04d6424
commit 97de8c9d24
15 changed files with 135 additions and 88 deletions
Download patch file Download diff file Expand all files Collapse all files

2
test/ground-node-helper-test-suite.cc
View file

@ -30,7 +30,6 @@ EmptyGndNodeHelperTestCase::EmptyGndNodeHelperTestCase ()
EmptyGndNodeHelperTestCase::~EmptyGndNodeHelperTestCase ()
{
Simulator::Destroy ();
}
void
@ -63,7 +62,6 @@ SomeGndNodeHelperTestCase::SomeGndNodeHelperTestCase ()
SomeGndNodeHelperTestCase::~SomeGndNodeHelperTestCase ()
{
Simulator::Destroy ();
}
void

2
test/isl-test-suite.cc
View file

@ -28,7 +28,6 @@ IslIcmpTestCase::IslIcmpTestCase ()
IslIcmpTestCase::~IslIcmpTestCase ()
{
Simulator::Destroy ();
}
void
@ -80,6 +79,7 @@ IslIcmpTestCase::DoRun (void)
serverApps.Stop (Seconds (10.0));
Simulator::Run ();
Simulator::Destroy ();
}
class IslTestSuite : public TestSuite

85
test/leo-test-suite.cc
View file

@ -30,13 +30,12 @@ LeoTestCase1::LeoTestCase1 ()
LeoTestCase1::~LeoTestCase1 ()
{
Simulator::Destroy ();
}
void
LeoTestCase1::DoRun (void)
{
Time::SetResolution (Time::NS);
Time::SetResolution (Time::MS);
std::vector<std::string> satWps =
{
@ -52,38 +51,78 @@ LeoTestCase1::DoRun (void)
NodeContainer gateways = gndHelper.Install ("contrib/leo/data/test/ground-stations.txt");
NodeContainer terminals = gndHelper.Install ("contrib/leo/data/test/ground-stations.txt");
LeoHelper leo;
leo.SetDeviceAttribute ("DataRate", StringValue ("10Mbps"));
leo.SetChannelAttribute ("PropagationDelay", StringValue ("ns3::ConstantSpeedPropagationDelayModel"));
AodvHelper aodv;
leo.SetRoutingHelper (aodv);
NetDeviceContainer islNet, gwNet, utNet;
NetDeviceContainer allDevices = leo.Install (satellites, gateways, terminals);
IslHelper islCh;
islCh.SetDeviceAttribute ("DataRate", StringValue ("10Mbps"));
islCh.SetDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
islCh.SetChannelAttribute ("PropagationDelay", StringValue ("ns3::ConstantSpeedPropagationDelayModel"));
//// TODO propagation loss from mobility model
islCh.SetChannelAttribute ("PropagationLoss", StringValue ("ns3::RangePropagationLossModel"));
islNet = islCh.Install (satellites);
LeoChannelHelper gwCh;
gwCh.SetGndDeviceAttribute ("DataRate", StringValue ("10Mbps"));
gwCh.SetGndDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
gwCh.SetSatDeviceAttribute ("DataRate", StringValue ("10Mbps"));
gwCh.SetSatDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
gwCh.SetChannelAttribute ("PropagationDelay", StringValue ("ns3::ConstantSpeedPropagationDelayModel"));
// TODO propagation loss from mobility model
gwCh.SetChannelAttribute ("PropagationLoss", StringValue ("ns3::RangePropagationLossModel"));
gwNet = gwCh.Install (satellites, gateways);
LeoChannelHelper utCh;
utCh.SetGndDeviceAttribute ("DataRate", StringValue ("10Mbps"));
utCh.SetGndDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
utCh.SetSatDeviceAttribute ("DataRate", StringValue ("10Mbps"));
utCh.SetSatDeviceAttribute ("ReceiveErrorModel", StringValue ("ns3::BurstErrorModel"));
utCh.SetChannelAttribute ("PropagationDelay", StringValue ("ns3::ConstantSpeedPropagationDelayModel"));
// TODO propagation loss from mobility model
utCh.SetChannelAttribute ("PropagationLoss", StringValue ("ns3::RangePropagationLossModel"));
utNet = utCh.Install (satellites, terminals);
// Install internet stack on nodes
InternetStackHelper stack;
AodvHelper aodv;
stack.SetRoutingHelper (aodv);
stack.Install (satellites);
stack.Install (gateways);
stack.Install (terminals);
// Make all networks addressable for legacy protocol
Ipv4AddressHelper ipv4;
ipv4.SetBase ("10.1.0.0", "255.255.0.0");
Ipv4InterfaceContainer islIp = ipv4.Assign (islNet);
ipv4.SetBase ("10.2.0.0", "255.255.0.0");
Ipv4InterfaceContainer gwIp = ipv4.Assign (gwNet);
ipv4.SetBase ("10.3.0.0", "255.255.0.0");
Ipv4InterfaceContainer utIp = ipv4.Assign (utNet);
ArpCacheHelper arpCache;
arpCache.Install (islNet, islIp);
arpCache.Install (gwNet, gwIp);
arpCache.Install (utNet, utIp);
// we want to ping terminals
UdpEchoServerHelper echoServer (9);
ApplicationContainer serverApps = echoServer.Install (terminals);
// install a client on each of the terminals
// install a client on one of the terminals
ApplicationContainer clientApps;
for (uint32_t i = 1; i < terminals.GetN (); i++)
{
Address remote = terminals.Get (i)->GetObject<Ipv4> ()->GetAddress (1, 0).GetLocal ();
UdpEchoClientHelper echoClient (remote, 9);
echoClient.SetAttribute ("MaxPackets", UintegerValue (1));
echoClient.SetAttribute ("Interval", TimeValue (Seconds (1.0)));
echoClient.SetAttribute ("PacketSize", UintegerValue (1024));
clientApps.Add (echoClient.Install (terminals.Get (i-1)));
}
clientApps.Start (Seconds (2.0));
clientApps.Stop (Seconds (10.0));
Address remote = utIp.GetAddress (1, 0);
UdpEchoClientHelper echoClient (remote, 9);
echoClient.SetAttribute ("MaxPackets", UintegerValue (3));
echoClient.SetAttribute ("Interval", TimeValue (Seconds (1.0)));
echoClient.SetAttribute ("PacketSize", UintegerValue (1024));
clientApps.Add (echoClient.Install (terminals.Get (0)));
serverApps.Start (Seconds (1.0));
serverApps.Stop (Seconds (10.0));
clientApps.Start (Seconds (2.0));
clientApps.Stop (Seconds (9.0));
serverApps.Stop (Seconds (10));
Simulator::Run ();
Simulator::Destroy ();
}
// The TestSuite class names the TestSuite, identifies what type of TestSuite,

2
test/satellite-node-helper-test-suite.cc
View file

@ -29,7 +29,6 @@ EmptySatNodeHelperTestCase::EmptySatNodeHelperTestCase ()
EmptySatNodeHelperTestCase::~EmptySatNodeHelperTestCase ()
{
Simulator::Destroy ();
}
void
@ -62,7 +61,6 @@ SingleSatNodeHelperTestCase::SingleSatNodeHelperTestCase ()
SingleSatNodeHelperTestCase::~SingleSatNodeHelperTestCase ()
{
Simulator::Destroy ();
}
void