author | Nicola Baldo <nbaldo@cttc.es> |
Fri, 22 Mar 2013 13:14:38 +0100 | |
changeset 9266 | d26408b17360 |
parent 7385 | 10beb0e53130 |
child 10553 | 8c347165bb56 |
permissions | -rw-r--r-- |
7385
10beb0e53130
standardize emacs c++ mode comments
Vedran Miletić <rivanvx@gmail.com>
parents:
7142
diff
changeset
|
1 |
/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */ |
6349 | 2 |
/* |
3 |
* Copyright (c) 2009 CTTC |
|
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: Nicola Baldo <[email protected]> |
|
19 |
*/ |
|
20 |
||
21 |
#include <ns3/object.h> |
|
22 |
#include <ns3/spectrum-interference.h> |
|
23 |
#include <ns3/spectrum-error-model.h> |
|
24 |
#include <ns3/log.h> |
|
25 |
#include <ns3/test.h> |
|
26 |
#include <ns3/simulator.h> |
|
27 |
#include <ns3/packet.h> |
|
28 |
#include <ns3/ptr.h> |
|
29 |
#include <iostream> |
|
30 |
||
31 |
NS_LOG_COMPONENT_DEFINE ("SpectrumInterferenceTest"); |
|
32 |
||
33 |
namespace ns3 { |
|
34 |
||
35 |
||
36 |
||
37 |
||
38 |
class SpectrumInterferenceTestCase : public TestCase |
|
39 |
{ |
|
40 |
public: |
|
41 |
SpectrumInterferenceTestCase (Ptr<SpectrumValue> s, uint32_t txBytes, bool rxCorrect, std::string name); |
|
42 |
virtual ~SpectrumInterferenceTestCase (); |
|
6775
0783f42a364b
Make test cases not return bool valuesMake all TestSuite instances be static
Mitch Watrous <watrous@u.washington.edu>
parents:
6774
diff
changeset
|
43 |
virtual void DoRun (void); |
6349 | 44 |
void RetrieveTestResult (SpectrumInterference* si); |
45 |
||
46 |
private: |
|
47 |
Ptr<SpectrumValue> m_s; |
|
48 |
uint32_t m_txBytes; |
|
49 |
uint32_t m_rxCorrectKnownOutcome; |
|
50 |
Ptr<const SpectrumModel> m_mySpectrumModel; |
|
51 |
}; |
|
52 |
||
53 |
||
54 |
||
55 |
SpectrumInterferenceTestCase::SpectrumInterferenceTestCase (Ptr<SpectrumValue> s, uint32_t txBytes, bool rxCorrect, std::string name) |
|
56 |
: TestCase (name), |
|
57 |
m_s (s), |
|
58 |
m_txBytes (txBytes), |
|
59 |
m_rxCorrectKnownOutcome (rxCorrect), |
|
60 |
m_mySpectrumModel (s->GetSpectrumModel ()) |
|
61 |
{ |
|
62 |
} |
|
63 |
||
64 |
SpectrumInterferenceTestCase::~SpectrumInterferenceTestCase () |
|
65 |
{ |
|
66 |
} |
|
67 |
||
68 |
||
69 |
||
6775
0783f42a364b
Make test cases not return bool valuesMake all TestSuite instances be static
Mitch Watrous <watrous@u.washington.edu>
parents:
6774
diff
changeset
|
70 |
void |
6349 | 71 |
SpectrumInterferenceTestCase::DoRun (void) |
72 |
{ |
|
73 |
Ptr<SpectrumValue> n = Create<SpectrumValue> (m_mySpectrumModel); |
|
74 |
Ptr<SpectrumValue> i1 = Create<SpectrumValue> (m_mySpectrumModel); |
|
75 |
Ptr<SpectrumValue> i2 = Create<SpectrumValue> (m_mySpectrumModel); |
|
76 |
Ptr<SpectrumValue> i3 = Create<SpectrumValue> (m_mySpectrumModel); |
|
77 |
Ptr<SpectrumValue> i4 = Create<SpectrumValue> (m_mySpectrumModel); |
|
78 |
||
79 |
||
80 |
(*n)[0] = 5.000000000000e-19; |
|
81 |
(*n)[1] = 4.545454545455e-19; |
|
82 |
||
83 |
(*i1)[0] = 5.000000000000e-18; |
|
84 |
(*i2)[0] = 5.000000000000e-16; |
|
85 |
(*i3)[0] = 1.581138830084e-16; |
|
86 |
(*i4)[0] = 7.924465962306e-17; |
|
87 |
(*i1)[1] = 1.437398936440e-18; |
|
88 |
(*i2)[1] = 5.722388235428e-16; |
|
89 |
(*i3)[1] = 7.204059965732e-17; |
|
90 |
(*i4)[1] = 5.722388235428e-17; |
|
91 |
||
92 |
||
93 |
SpectrumInterference si; |
|
94 |
si.SetErrorModel (CreateObject<ShannonSpectrumErrorModel> ()); |
|
95 |
si.SetNoisePowerSpectralDensity (n); |
|
96 |
||
97 |
Time ts = Seconds (1); |
|
98 |
Time ds = Seconds (1); |
|
99 |
Time ti1 = Seconds (0); |
|
100 |
Time di1 = Seconds (3); |
|
101 |
Time ti2 = Seconds (0.7); |
|
102 |
Time di2 = Seconds (1); |
|
103 |
Time ti3 = Seconds (1.2); |
|
104 |
Time di3 = Seconds (1); |
|
105 |
Time ti4 = Seconds (1.5); |
|
106 |
Time di4 = Seconds (0.1); |
|
107 |
||
108 |
Simulator::Schedule (ts, &SpectrumInterference::AddSignal, &si, m_s, ds); |
|
109 |
Simulator::Schedule (ti1, &SpectrumInterference::AddSignal, &si, i1, di1); |
|
110 |
Simulator::Schedule (ti2, &SpectrumInterference::AddSignal, &si, i2, di2); |
|
111 |
Simulator::Schedule (ti3, &SpectrumInterference::AddSignal, &si, i3, di3); |
|
112 |
Simulator::Schedule (ti4, &SpectrumInterference::AddSignal, &si, i4, di4); |
|
113 |
||
114 |
Ptr<Packet> p = Create<Packet> (m_txBytes); |
|
115 |
Simulator::Schedule (ts, &SpectrumInterference::StartRx, &si, p, m_s); |
|
116 |
Simulator::Schedule (ts + ds, &SpectrumInterferenceTestCase::RetrieveTestResult, this, &si); |
|
117 |
||
118 |
Simulator::Run (); |
|
119 |
// the above will return and after RetrieveTestResults have |
|
120 |
// been called and after all signals have expired |
|
6409
7cdc1ec988e2
move spectrum-interference test suite into test framework
Tom Henderson <tomh@tomh.org>
parents:
6364
diff
changeset
|
121 |
Simulator::Destroy (); |
6349 | 122 |
} |
123 |
||
124 |
||
125 |
||
126 |
void |
|
127 |
SpectrumInterferenceTestCase::RetrieveTestResult (SpectrumInterference* si) |
|
128 |
{ |
|
7122
e3914d87f1a4
use the right macros to avoid un-needed code. DO NOT USE int values for bool.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
6801
diff
changeset
|
129 |
NS_TEST_ASSERT_MSG_EQ (si->EndRx (), m_rxCorrectKnownOutcome, "no message"); |
6349 | 130 |
} |
131 |
||
132 |
||
133 |
||
134 |
class SpectrumInterferenceTestSuite : public TestSuite |
|
135 |
{ |
|
136 |
public: |
|
137 |
SpectrumInterferenceTestSuite (); |
|
138 |
}; |
|
139 |
||
140 |
SpectrumInterferenceTestSuite::SpectrumInterferenceTestSuite () |
|
141 |
: TestSuite ("spectrum-interference", UNIT) |
|
142 |
{ |
|
143 |
||
144 |
NS_LOG_INFO ("creating SpectrumInterferenceTestSuite"); |
|
145 |
||
146 |
Ptr<const SpectrumModel> m; |
|
147 |
||
148 |
Bands bands; |
|
149 |
struct BandInfo bi; |
|
150 |
||
151 |
bi.fl = 2.400e9; |
|
152 |
bi.fc = 2.410e9; |
|
153 |
bi.fh = 2.420e9; |
|
154 |
bands.push_back (bi); |
|
155 |
||
156 |
bi.fl = 2.420e9; |
|
157 |
bi.fc = 2.431e9; |
|
158 |
bi.fh = 2.442e9; |
|
159 |
bands.push_back (bi); |
|
160 |
||
161 |
m = Create<SpectrumModel> (bands); |
|
162 |
||
163 |
||
164 |
double b; // max deliverable bytes |
|
165 |
||
166 |
const double e = 1e-5; // max tolerated relative error for |
|
167 |
// deliverable bytes |
|
168 |
||
169 |
// Power Spectral Density of the signal of interest = [-46 -48] dBm; |
|
170 |
Ptr<SpectrumValue> s1 = Create<SpectrumValue> (m); |
|
171 |
(*s1)[0] = 1.255943215755e-15; |
|
172 |
(*s1)[1] = 7.204059965732e-16; |
|
173 |
b = 10067205.5632012; |
|
9266
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
174 |
AddTestCase (new SpectrumInterferenceTestCase (s1, 0, true, "sdBm = [-46 -48] tx bytes: 1"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
175 |
AddTestCase (new SpectrumInterferenceTestCase (s1, static_cast<uint32_t> (b * 0.5 + 0.5), true, "sdBm = [-46 -48] tx bytes: b*0.5"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
176 |
AddTestCase (new SpectrumInterferenceTestCase (s1, static_cast<uint32_t> (b * (1 - e) + 0.5), true, "sdBm = [-46 -48] tx bytes: b*(1-e)"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
177 |
AddTestCase (new SpectrumInterferenceTestCase (s1, static_cast<uint32_t> (b * (1 + e) + 0.5), false, "sdBm = [-46 -48] tx bytes: b*(1+e)"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
178 |
AddTestCase (new SpectrumInterferenceTestCase (s1, static_cast<uint32_t> (b * 1.5 + 0.5), false, "sdBm = [-46 -48] tx bytes: b*1.5"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
179 |
AddTestCase (new SpectrumInterferenceTestCase (s1, 0xffffffff, false, "sdBm = [-46 -48] tx bytes: 2^32-1"), TestCase::QUICK); |
6349 | 180 |
|
181 |
// Power Spectral Density of the signal of interest = [-63 -61] dBm; |
|
182 |
Ptr<SpectrumValue> s2 = Create<SpectrumValue> (m); |
|
183 |
(*s2)[0] = 2.505936168136e-17; |
|
184 |
(*s2)[1] = 3.610582885110e-17; |
|
185 |
b = 882401.591840728; |
|
9266
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
186 |
AddTestCase (new SpectrumInterferenceTestCase (s2, 1, true, "sdBm = [-63 -61] tx bytes: 1"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
187 |
AddTestCase (new SpectrumInterferenceTestCase (s2, static_cast<uint32_t> (b * 0.5 + 0.5), true, "sdBm = [-63 -61] tx bytes: b*0.5"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
188 |
AddTestCase (new SpectrumInterferenceTestCase (s2, static_cast<uint32_t> (b * (1 - e) + 0.5), true, "sdBm = [-63 -61] tx bytes: b*(1-e)"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
189 |
AddTestCase (new SpectrumInterferenceTestCase (s2, static_cast<uint32_t> (b * (1 + e) + 0.5), false, "sdBm = [-63 -61] tx bytes: b*(1+e)"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
190 |
AddTestCase (new SpectrumInterferenceTestCase (s2, static_cast<uint32_t> (b * 1.5 + 0.5), false, "sdBm = [-63 -61] tx bytes: b*1.5"), TestCase::QUICK); |
d26408b17360
bug 1563: get rid of default argument value in AddTestCase
Nicola Baldo <nbaldo@cttc.es>
parents:
7385
diff
changeset
|
191 |
AddTestCase (new SpectrumInterferenceTestCase (s2, 0xffffffff, false, "sdBm = [-63 -61] tx bytes: 2^32-1"), TestCase::QUICK); |
6349 | 192 |
|
193 |
} |
|
194 |
||
6774
034f362af24d
Make all TestSuite instances be static
Mitch Watrous <watrous@u.washington.edu>
parents:
6409
diff
changeset
|
195 |
static SpectrumInterferenceTestSuite spectrumInterferenceTestSuite; |
6349 | 196 |
|
197 |
} // namespace ns3 |