A Discrete-Event Network Simulator
API
lr-wpan-collision-test.cc
Go to the documentation of this file.
1/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */
2/*
3 * Copyright (c) 2014 Universita' di Firenze, Italy
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 as
7 * published by the Free Software Foundation;
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
17 *
18 * Author: Tommaso Pecorella <tommaso.pecorella@unifi.it>
19 */
20
21#include <ns3/test.h>
22#include <ns3/packet.h>
23#include <ns3/lr-wpan-module.h>
24#include <ns3/mobility-module.h>
25#include <ns3/propagation-module.h>
26#include <ns3/spectrum-module.h>
27#include <ns3/mac16-address.h>
28#include <ns3/mac64-address.h>
29#include <ns3/log.h>
30
31
32using namespace ns3;
33
34NS_LOG_COMPONENT_DEFINE ("lr-wpan-collision-test");
35
43{
44public:
46 virtual ~LrWpanCollisionTestCase ();
47
54private:
55 virtual void DoRun (void);
56
57 uint8_t m_rxPackets;
58};
59
61 : TestCase ("Test the 802.15.4 collision handling")
62{
63 m_rxPackets = 0;
64}
65
67{
68}
69
71{
73}
74
75
76void
78{
79
80 // Create 3 nodes, and a NetDevice for each one
81 Ptr<Node> n0 = CreateObject <Node> ();
82 Ptr<Node> n1 = CreateObject <Node> ();
83 Ptr<Node> n2 = CreateObject <Node> ();
84
85 Ptr<LrWpanNetDevice> dev0 = CreateObject<LrWpanNetDevice> ();
86 Ptr<LrWpanNetDevice> dev1 = CreateObject<LrWpanNetDevice> ();
87 Ptr<LrWpanNetDevice> dev2 = CreateObject<LrWpanNetDevice> ();
88
89 dev0->SetAddress (Mac16Address ("00:01"));
90 dev1->SetAddress (Mac16Address ("00:02"));
91 dev2->SetAddress (Mac16Address ("00:03"));
92
93 // Each device must be attached to the same channel
94 Ptr<SingleModelSpectrumChannel> channel = CreateObject<SingleModelSpectrumChannel> ();
95 Ptr<LogDistancePropagationLossModel> propModel = CreateObject<LogDistancePropagationLossModel> ();
96 Ptr<ConstantSpeedPropagationDelayModel> delayModel = CreateObject<ConstantSpeedPropagationDelayModel> ();
97 channel->AddPropagationLossModel (propModel);
98 channel->SetPropagationDelayModel (delayModel);
99
100 dev0->SetChannel (channel);
101 dev1->SetChannel (channel);
102 dev2->SetChannel (channel);
103
104 // To complete configuration, a LrWpanNetDevice must be added to a node
105 n0->AddDevice (dev0);
106 n1->AddDevice (dev1);
107 n2->AddDevice (dev2);
108
109 Ptr<ConstantPositionMobilityModel> sender0Mobility = CreateObject<ConstantPositionMobilityModel> ();
110 sender0Mobility->SetPosition (Vector (0,0,0));
111 dev0->GetPhy ()->SetMobility (sender0Mobility);
112 n0->AggregateObject (sender0Mobility);
113
114 Ptr<ConstantPositionMobilityModel> sender1Mobility = CreateObject<ConstantPositionMobilityModel> ();
115 // Configure position 10 m distance
116 sender1Mobility->SetPosition (Vector (0,1,0));
117 dev1->GetPhy ()->SetMobility (sender1Mobility);
118 n1->AggregateObject (sender1Mobility);
119
120 Ptr<ConstantPositionMobilityModel> sender2Mobility = CreateObject<ConstantPositionMobilityModel> ();
121 // Configure position 10 m distance
122 sender2Mobility->SetPosition (Vector (30,0,0));
123 dev2->GetPhy ()->SetMobility (sender2Mobility);
124 n2->AggregateObject (sender2Mobility);
125
126 dev0->GetMac ()->SetMcpsDataIndicationCallback (MakeCallback (&LrWpanCollisionTestCase::DataIndication, this));
127
128 // Disable first backoff
129 dev0->GetCsmaCa ()->SetMacMinBE (0);
130 dev1->GetCsmaCa ()->SetMacMinBE (0);
131 dev2->GetCsmaCa ()->SetMacMinBE (0);
132
133 Ptr<Packet> p0 = Create<Packet> (20);
134 Ptr<Packet> p1 = Create<Packet> (60);
135 Ptr<Packet> p2 = Create<Packet> (100);
136
138 params.m_srcAddrMode = SHORT_ADDR;
139 params.m_dstAddrMode = SHORT_ADDR;
140 params.m_dstPanId = 0;
141 params.m_msduHandle = 0;
142 // params.m_txOptions = TX_OPTION_ACK;
143
144 // First case: concurrent tx and no ACKs
145 std::cout << "*** First test " << std::endl;
146 m_rxPackets = 0;
147 params.m_dstAddr = Mac16Address ("00:02");
148 Simulator::Schedule (Seconds (0.1),
149 &LrWpanMac::McpsDataRequest,
150 dev0->GetMac (), params, p0);
151
152 params.m_dstAddr = Mac16Address ("00:01");
153 Simulator::Schedule (Seconds (0.1),
154 &LrWpanMac::McpsDataRequest,
155 dev1->GetMac (), params, p1);
156
158
159 NS_TEST_EXPECT_MSG_EQ (m_rxPackets, 0, "Not received a packet (as expected)");
160
161 // Second case: concurrent tx and ACKs
162 std::cout << "*** Second test " << std::endl;
163 m_rxPackets = 0;
164 params.m_txOptions = TX_OPTION_ACK;
165
166 params.m_dstAddr = Mac16Address ("00:02");
167 Simulator::Schedule (Seconds (0.1),
168 &LrWpanMac::McpsDataRequest,
169 dev0->GetMac (), params, p0);
170
171 params.m_dstAddr = Mac16Address ("00:01");
172 Simulator::Schedule (Seconds (0.1),
173 &LrWpanMac::McpsDataRequest,
174 dev1->GetMac (), params, p1);
175
177
178 NS_TEST_EXPECT_MSG_EQ (m_rxPackets, 1, "Received a packet (as expected)");
179
180 // Third case: two concurrent tx and no ACKs
181 std::cout << "*** Third test " << std::endl;
182 m_rxPackets = 0;
183 params.m_txOptions = 0;
184
185// LogComponentEnable("LrWpanMac",LOG_LEVEL_ALL);
186// LogComponentEnable("LrWpanPhy",LOG_LEVEL_ALL);
187// LogComponentEnableAll (LOG_PREFIX_TIME);
188
189 params.m_dstAddr = Mac16Address ("00:01");
190 Simulator::Schedule (Seconds (0.0001),
191 &LrWpanMac::McpsDataRequest,
192 dev2->GetMac (), params, p2);
193
194 params.m_dstAddr = Mac16Address ("00:01");
195 Simulator::Schedule (Seconds (0.0002),
196 &LrWpanMac::McpsDataRequest,
197 dev1->GetMac (), params, p0);
198
200
201 std::cout << "m_rxPackets = " << int(m_rxPackets) << std::endl;
202 NS_TEST_EXPECT_MSG_EQ (m_rxPackets, 1, "Received a packet (as expected)");
203
204 // Fourth case: two concurrent tx and ACKs
205 std::cout << "*** Fourth test " << std::endl;
206 m_rxPackets = 0;
207 params.m_txOptions = TX_OPTION_ACK;
208
209 params.m_dstAddr = Mac16Address ("00:01");
210 Simulator::Schedule (Seconds (0.1),
211 &LrWpanMac::McpsDataRequest,
212 dev1->GetMac (), params, p0);
213
214 params.m_dstAddr = Mac16Address ("00:01");
215 Simulator::Schedule (Seconds (0.1),
216 &LrWpanMac::McpsDataRequest,
217 dev2->GetMac (), params, p1);
218
220
221 std::cout << "m_rxPackets = " << int(m_rxPackets) << std::endl;
222 NS_TEST_EXPECT_MSG_EQ (m_rxPackets, 2, "Received two packets (as expected)");
223
224 Simulator::Destroy ();
225}
226
234{
235public:
237};
238
240 : TestSuite ("lr-wpan-collision", UNIT)
241{
242 AddTestCase (new LrWpanCollisionTestCase, TestCase::QUICK);
243}
244
void Run(ObjectFactory &factory, uint32_t pop, uint32_t total, uint32_t runs, Ptr< RandomVariableStream > eventStream, bool calRev)
Perform the runs for a single scheduler type.
LrWpan Collision Test.
uint8_t m_rxPackets
Rx packets counter.
void DataIndication(McpsDataIndicationParams params, Ptr< Packet > p)
Function called when DataIndication is hit.
virtual void DoRun(void)
Implementation to actually run this TestCase.
LrWpan Collision TestSuite.
virtual void SetAddress(Address address)
This method indirects to LrWpanMac::SetShortAddress ()
void SetChannel(Ptr< SpectrumChannel > channel)
Set the channel to which the NetDevice, and therefore the PHY, should be attached to.
Ptr< LrWpanPhy > GetPhy(void) const
Get the PHY used by this NetDevice.
Ptr< LrWpanMac > GetMac(void) const
Get the MAC used by this NetDevice.
Ptr< LrWpanCsmaCa > GetCsmaCa(void) const
Get the CSMA/CA implementation used by this NetDevice.
This class can contain 16 bit addresses.
Definition: mac16-address.h:42
uint32_t AddDevice(Ptr< NetDevice > device)
Associate a NetDevice to this node.
Definition: node.cc:130
void AggregateObject(Ptr< Object > other)
Aggregate two Objects together.
Definition: object.cc:252
encapsulates test code
Definition: test.h:994
void AddTestCase(TestCase *testCase, TestDuration duration=QUICK)
Add an individual child TestCase to this test suite.
Definition: test.cc:299
A suite of tests to run.
Definition: test.h:1188
#define NS_LOG_COMPONENT_DEFINE(name)
Define a Log component with a specific name.
Definition: log.h:205
@ TX_OPTION_ACK
TX_OPTION_ACK.
Definition: lr-wpan-mac.h:61
@ SHORT_ADDR
Definition: lr-wpan-mac.h:156
#define NS_TEST_EXPECT_MSG_EQ(actual, limit, msg)
Test that an actual and expected (limit) value are equal and report if not.
Definition: test.h:240
Time Seconds(double value)
Construct a Time in the indicated unit.
Definition: nstime.h:1245
static LrWpanCollisionTestSuite g_lrWpanCollisionTestSuite
Static variable for test initialization.
Every class exported by the ns3 library is enclosed in the ns3 namespace.
Callback< R, Ts... > MakeCallback(R(T::*memPtr)(Ts...), OBJ objPtr)
Build Callbacks for class method members which take varying numbers of arguments and potentially retu...
Definition: callback.h:1648
channel
Definition: third.py:83
MCPS-DATA.indication params.
Definition: lr-wpan-mac.h:364
MCPS-DATA.request params.
Definition: lr-wpan-mac.h:337
LrWpanAddressMode m_srcAddrMode
Source address mode.
Definition: lr-wpan-mac.h:338
LrWpanAddressMode m_dstAddrMode
Destination address mode.
Definition: lr-wpan-mac.h:339
uint16_t m_dstPanId
Destination PAN identifier.
Definition: lr-wpan-mac.h:340
Mac16Address m_dstAddr
Destination address.
Definition: lr-wpan-mac.h:341
uint8_t m_msduHandle
MSDU handle.
Definition: lr-wpan-mac.h:343
uint8_t m_txOptions
Tx Options (bitfield)
Definition: lr-wpan-mac.h:344