2 * Copyright (c) 1999-2008 Mark D. Hill and David A. Wood
3 * Copyright (c) 2009 Advanced Micro Devices, Inc.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are
8 * met: redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer;
10 * redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution;
13 * neither the name of the copyright holders nor the names of its
14 * contributors may be used to endorse or promote products derived from
15 * this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
20 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
21 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
22 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
23 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 #include "base/random.hh"
31 #include "cpu/testers/rubytest/Check.hh"
32 #include "debug/RubyTest.hh"
33 #include "mem/ruby/common/SubBlock.hh"
34 #include "mem/ruby/system/Sequencer.hh"
35 #include "mem/ruby/system/System.hh"
37 typedef RubyTester::SenderState SenderState
;
39 Check::Check(const Address
& address
, const Address
& pc
,
40 int _num_writers
, int _num_readers
, RubyTester
* _tester
)
41 : m_num_writers(_num_writers
), m_num_readers(_num_readers
),
44 m_status
= TesterStatus_Idle
;
48 changeAddress(address
);
50 m_access_mode
= RubyAccessMode(random_mt
.random(0,
51 RubyAccessMode_NUM
- 1));
58 DPRINTF(RubyTest
, "initiating\n");
61 // currently no protocols support prefetches
62 if (false && (random_mt
.random(0, 0xf) == 0)) {
63 initiatePrefetch(); // Prefetch from random processor
66 if (m_tester_ptr
->getCheckFlush() && (random_mt
.random(0, 0xff) == 0)) {
67 initiateFlush(); // issue a Flush request from random processor
70 if (m_status
== TesterStatus_Idle
) {
72 } else if (m_status
== TesterStatus_Ready
) {
75 // Pending - do nothing
77 "initiating action/check - failed: action/check is pending\n");
82 Check::initiatePrefetch()
84 DPRINTF(RubyTest
, "initiating prefetch\n");
86 int index
= random_mt
.random(0, m_num_readers
- 1);
87 MasterPort
* port
= m_tester_ptr
->getReadableCpuPort(index
);
90 flags
.set(Request::PREFETCH
);
94 // 1 in 8 chance this will be an exclusive prefetch
95 if (random_mt
.random(0, 0x7) != 0) {
96 cmd
= MemCmd::ReadReq
;
98 // if necessary, make the request an instruction fetch
99 if (m_tester_ptr
->isInstReadableCpuPort(index
)) {
100 flags
.set(Request::INST_FETCH
);
103 cmd
= MemCmd::WriteReq
;
104 flags
.set(Request::PF_EXCLUSIVE
);
107 // Prefetches are assumed to be 0 sized
108 Request
*req
= new Request(m_address
.getAddress(), 0, flags
,
109 m_tester_ptr
->masterId(), curTick(), m_pc
.getAddress());
110 req
->setThreadContext(index
, 0);
112 PacketPtr pkt
= new Packet(req
, cmd
);
114 // push the subblock onto the sender state. The sequencer will
115 // update the subblock on the return
116 pkt
->senderState
= new SenderState(m_address
, req
->getSize());
118 if (port
->sendTimingReq(pkt
)) {
119 DPRINTF(RubyTest
, "successfully initiated prefetch.\n");
121 // If the packet did not issue, must delete
122 delete pkt
->senderState
;
127 "prefetch initiation failed because Port was busy.\n");
132 Check::initiateFlush()
135 DPRINTF(RubyTest
, "initiating Flush\n");
137 int index
= random_mt
.random(0, m_num_writers
- 1);
138 MasterPort
* port
= m_tester_ptr
->getWritableCpuPort(index
);
140 Request::Flags flags
;
142 Request
*req
= new Request(m_address
.getAddress(), CHECK_SIZE
, flags
,
143 m_tester_ptr
->masterId(), curTick(), m_pc
.getAddress());
147 cmd
= MemCmd::FlushReq
;
149 PacketPtr pkt
= new Packet(req
, cmd
);
151 // push the subblock onto the sender state. The sequencer will
152 // update the subblock on the return
153 pkt
->senderState
= new SenderState(m_address
, req
->getSize());
155 if (port
->sendTimingReq(pkt
)) {
156 DPRINTF(RubyTest
, "initiating Flush - successful\n");
161 Check::initiateAction()
163 DPRINTF(RubyTest
, "initiating Action\n");
164 assert(m_status
== TesterStatus_Idle
);
166 int index
= random_mt
.random(0, m_num_writers
- 1);
167 MasterPort
* port
= m_tester_ptr
->getWritableCpuPort(index
);
169 Request::Flags flags
;
171 // Create the particular address for the next byte to be written
172 Address
writeAddr(m_address
.getAddress() + m_store_count
);
174 // Stores are assumed to be 1 byte-sized
175 Request
*req
= new Request(writeAddr
.getAddress(), 1, flags
,
176 m_tester_ptr
->masterId(), curTick(),
179 req
->setThreadContext(index
, 0);
182 // 1 out of 8 chance, issue an atomic rather than a write
183 // if ((random() & 0x7) == 0) {
184 // cmd = MemCmd::SwapReq;
186 cmd
= MemCmd::WriteReq
;
189 PacketPtr pkt
= new Packet(req
, cmd
);
190 uint8_t *writeData
= new uint8_t;
191 *writeData
= m_value
+ m_store_count
;
192 pkt
->dataDynamic(writeData
);
194 DPRINTF(RubyTest
, "data 0x%x check 0x%x\n",
195 *(pkt
->getPtr
<uint8_t>()), *writeData
);
197 // push the subblock onto the sender state. The sequencer will
198 // update the subblock on the return
199 pkt
->senderState
= new SenderState(writeAddr
, req
->getSize());
201 if (port
->sendTimingReq(pkt
)) {
202 DPRINTF(RubyTest
, "initiating action - successful\n");
203 DPRINTF(RubyTest
, "status before action update: %s\n",
204 (TesterStatus_to_string(m_status
)).c_str());
205 m_status
= TesterStatus_Action_Pending
;
207 // If the packet did not issue, must delete
208 // Note: No need to delete the data, the packet destructor
210 delete pkt
->senderState
;
214 DPRINTF(RubyTest
, "failed to initiate action - sequencer not ready\n");
217 DPRINTF(RubyTest
, "status after action update: %s\n",
218 (TesterStatus_to_string(m_status
)).c_str());
222 Check::initiateCheck()
224 DPRINTF(RubyTest
, "Initiating Check\n");
225 assert(m_status
== TesterStatus_Ready
);
227 int index
= random_mt
.random(0, m_num_readers
- 1);
228 MasterPort
* port
= m_tester_ptr
->getReadableCpuPort(index
);
230 Request::Flags flags
;
232 // If necessary, make the request an instruction fetch
233 if (m_tester_ptr
->isInstReadableCpuPort(index
)) {
234 flags
.set(Request::INST_FETCH
);
237 // Checks are sized depending on the number of bytes written
238 Request
*req
= new Request(m_address
.getAddress(), CHECK_SIZE
, flags
,
239 m_tester_ptr
->masterId(), curTick(), m_pc
.getAddress());
241 req
->setThreadContext(index
, 0);
242 PacketPtr pkt
= new Packet(req
, MemCmd::ReadReq
);
243 uint8_t *dataArray
= new uint8_t[CHECK_SIZE
];
244 pkt
->dataDynamicArray(dataArray
);
246 // push the subblock onto the sender state. The sequencer will
247 // update the subblock on the return
248 pkt
->senderState
= new SenderState(m_address
, req
->getSize());
250 if (port
->sendTimingReq(pkt
)) {
251 DPRINTF(RubyTest
, "initiating check - successful\n");
252 DPRINTF(RubyTest
, "status before check update: %s\n",
253 TesterStatus_to_string(m_status
).c_str());
254 m_status
= TesterStatus_Check_Pending
;
256 // If the packet did not issue, must delete
257 // Note: No need to delete the data, the packet destructor
259 delete pkt
->senderState
;
263 DPRINTF(RubyTest
, "failed to initiate check - cpu port not ready\n");
266 DPRINTF(RubyTest
, "status after check update: %s\n",
267 TesterStatus_to_string(m_status
).c_str());
271 Check::performCallback(NodeID proc
, SubBlock
* data
, Cycles curTime
)
273 Address address
= data
->getAddress();
275 // This isn't exactly right since we now have multi-byte checks
276 // assert(getAddress() == address);
278 assert(getAddress().getLineAddress() == address
.getLineAddress());
279 assert(data
!= NULL
);
281 DPRINTF(RubyTest
, "RubyTester Callback\n");
284 if (m_status
== TesterStatus_Action_Pending
) {
285 DPRINTF(RubyTest
, "Action callback write value: %d, currently %d\n",
286 (m_value
+ m_store_count
), data
->getByte(0));
287 // Perform store one byte at a time
288 data
->setByte(0, (m_value
+ m_store_count
));
290 if (m_store_count
== CHECK_SIZE
) {
291 m_status
= TesterStatus_Ready
;
293 m_status
= TesterStatus_Idle
;
295 DPRINTF(RubyTest
, "Action callback return data now %d\n",
297 } else if (m_status
== TesterStatus_Check_Pending
) {
298 DPRINTF(RubyTest
, "Check callback\n");
299 // Perform load/check
300 for (int byte_number
=0; byte_number
<CHECK_SIZE
; byte_number
++) {
301 if (uint8_t(m_value
+ byte_number
) != data
->getByte(byte_number
)) {
302 panic("Action/check failure: proc: %d address: %s data: %s "
303 "byte_number: %d m_value+byte_number: %d byte: %d %s"
305 proc
, address
, data
, byte_number
,
306 (int)m_value
+ byte_number
,
307 (int)data
->getByte(byte_number
), *this, curTime
);
310 DPRINTF(RubyTest
, "Action/check success\n");
313 // successful check complete, increment complete
314 m_tester_ptr
->incrementCheckCompletions();
316 m_status
= TesterStatus_Idle
;
320 panic("Unexpected TesterStatus: %s proc: %d data: %s m_status: %s "
321 "time: %d\n", *this, proc
, data
, m_status
, curTime
);
324 DPRINTF(RubyTest
, "proc: %d, Address: 0x%x\n", proc
,
325 getAddress().getLineAddress());
326 DPRINTF(RubyTest
, "Callback done\n");
331 Check::changeAddress(const Address
& address
)
333 assert(m_status
== TesterStatus_Idle
|| m_status
== TesterStatus_Ready
);
334 m_status
= TesterStatus_Idle
;
342 assert(m_status
== TesterStatus_Idle
);
343 m_status
= TesterStatus_Idle
;
344 m_value
= random_mt
.random(0, 0xff); // One byte
349 Check::pickInitiatingNode()
351 assert(m_status
== TesterStatus_Idle
|| m_status
== TesterStatus_Ready
);
352 m_status
= TesterStatus_Idle
;
353 m_initiatingNode
= (random_mt
.random(0, m_num_writers
- 1));
354 DPRINTF(RubyTest
, "picked initiating node %d\n", m_initiatingNode
);
359 Check::print(std::ostream
& out
) const
362 << m_address
<< ", value: "
363 << (int)m_value
<< ", status: "
364 << m_status
<< ", initiating node: "
365 << m_initiatingNode
<< ", store_count: "
367 << "]" << std::flush
;
374 "[%#x, value: %d, status: %s, initiating node: %d, store_count: %d]\n",
375 m_address
.getAddress(), (int)m_value
,
376 TesterStatus_to_string(m_status
).c_str(),
377 m_initiatingNode
, m_store_count
);