physical.cc revision 4040
1/* 2 * Copyright (c) 2001-2005 The Regents of The University of Michigan 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions are 7 * met: redistributions of source code must retain the above copyright 8 * notice, this list of conditions and the following disclaimer; 9 * redistributions in binary form must reproduce the above copyright 10 * notice, this list of conditions and the following disclaimer in the 11 * documentation and/or other materials provided with the distribution; 12 * neither the name of the copyright holders nor the names of its 13 * contributors may be used to endorse or promote products derived from 14 * this software without specific prior written permission. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 17 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 18 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 19 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 20 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 * 28 * Authors: Ron Dreslinski 29 * Ali Saidi 30 */ 31 32#include <sys/types.h> 33#include <sys/mman.h> 34#include <errno.h> 35#include <fcntl.h> 36#include <unistd.h> 37#include <zlib.h> 38 39#include <iostream> 40#include <string> 41 42#include "arch/isa_traits.hh" 43#include "base/misc.hh" 44#include "config/full_system.hh" 45#include "mem/packet_access.hh" 46#include "mem/physical.hh" 47#include "sim/builder.hh" 48#include "sim/eventq.hh" 49#include "sim/host.hh" 50 51using namespace std; 52using namespace TheISA; 53 54PhysicalMemory::PhysicalMemory(Params *p) 55 : MemObject(p->name), pmemAddr(NULL), port(NULL), lat(p->latency), _params(p) 56{ 57 if (params()->addrRange.size() % TheISA::PageBytes != 0) 58 panic("Memory Size not divisible by page size\n"); 59 60 int map_flags = MAP_ANON | MAP_PRIVATE; 61 pmemAddr = (uint8_t *)mmap(NULL, params()->addrRange.size(), PROT_READ | PROT_WRITE, 62 map_flags, -1, 0); 63 64 if (pmemAddr == (void *)MAP_FAILED) { 65 perror("mmap"); 66 fatal("Could not mmap!\n"); 67 } 68 69 //If requested, initialize all the memory to 0 70 if(params()->zero) 71 memset(pmemAddr, 0, params()->addrRange.size()); 72 73 pagePtr = 0; 74} 75 76void 77PhysicalMemory::init() 78{ 79 if (!port) 80 panic("PhysicalMemory not connected to anything!"); 81 port->sendStatusChange(Port::RangeChange); 82} 83 84PhysicalMemory::~PhysicalMemory() 85{ 86 if (pmemAddr) 87 munmap((char*)pmemAddr, params()->addrRange.size()); 88 //Remove memPorts? 89} 90 91Addr 92PhysicalMemory::new_page() 93{ 94 Addr return_addr = pagePtr << LogVMPageSize; 95 return_addr += start(); 96 97 ++pagePtr; 98 return return_addr; 99} 100 101int 102PhysicalMemory::deviceBlockSize() 103{ 104 //Can accept anysize request 105 return 0; 106} 107 108Tick 109PhysicalMemory::calculateLatency(PacketPtr pkt) 110{ 111 return lat; 112} 113 114 115 116// Add load-locked to tracking list. Should only be called if the 117// operation is a load and the LOCKED flag is set. 118void 119PhysicalMemory::trackLoadLocked(Request *req) 120{ 121 Addr paddr = LockedAddr::mask(req->getPaddr()); 122 123 // first we check if we already have a locked addr for this 124 // xc. Since each xc only gets one, we just update the 125 // existing record with the new address. 126 list<LockedAddr>::iterator i; 127 128 for (i = lockedAddrList.begin(); i != lockedAddrList.end(); ++i) { 129 if (i->matchesContext(req)) { 130 DPRINTF(LLSC, "Modifying lock record: cpu %d thread %d addr %#x\n", 131 req->getCpuNum(), req->getThreadNum(), paddr); 132 i->addr = paddr; 133 return; 134 } 135 } 136 137 // no record for this xc: need to allocate a new one 138 DPRINTF(LLSC, "Adding lock record: cpu %d thread %d addr %#x\n", 139 req->getCpuNum(), req->getThreadNum(), paddr); 140 lockedAddrList.push_front(LockedAddr(req)); 141} 142 143 144// Called on *writes* only... both regular stores and 145// store-conditional operations. Check for conventional stores which 146// conflict with locked addresses, and for success/failure of store 147// conditionals. 148bool 149PhysicalMemory::checkLockedAddrList(Request *req) 150{ 151 Addr paddr = LockedAddr::mask(req->getPaddr()); 152 bool isLocked = req->isLocked(); 153 154 // Initialize return value. Non-conditional stores always 155 // succeed. Assume conditional stores will fail until proven 156 // otherwise. 157 bool success = !isLocked; 158 159 // Iterate over list. Note that there could be multiple matching 160 // records, as more than one context could have done a load locked 161 // to this location. 162 list<LockedAddr>::iterator i = lockedAddrList.begin(); 163 164 while (i != lockedAddrList.end()) { 165 166 if (i->addr == paddr) { 167 // we have a matching address 168 169 if (isLocked && i->matchesContext(req)) { 170 // it's a store conditional, and as far as the memory 171 // system can tell, the requesting context's lock is 172 // still valid. 173 DPRINTF(LLSC, "StCond success: cpu %d thread %d addr %#x\n", 174 req->getCpuNum(), req->getThreadNum(), paddr); 175 success = true; 176 } 177 178 // Get rid of our record of this lock and advance to next 179 DPRINTF(LLSC, "Erasing lock record: cpu %d thread %d addr %#x\n", 180 i->cpuNum, i->threadNum, paddr); 181 i = lockedAddrList.erase(i); 182 } 183 else { 184 // no match: advance to next record 185 ++i; 186 } 187 } 188 189 if (isLocked) { 190 req->setExtraData(success ? 1 : 0); 191 } 192 193 return success; 194} 195 196void 197PhysicalMemory::doFunctionalAccess(PacketPtr pkt) 198{ 199 assert(pkt->getAddr() >= start() && 200 pkt->getAddr() + pkt->getSize() <= start() + size()); 201 202 if (pkt->isRead()) { 203 if (pkt->req->isLocked()) { 204 trackLoadLocked(pkt->req); 205 } 206 memcpy(pkt->getPtr<uint8_t>(), pmemAddr + pkt->getAddr() - start(), 207 pkt->getSize()); 208#if TRACING_ON 209 switch (pkt->getSize()) { 210 case sizeof(uint64_t): 211 DPRINTF(MemoryAccess, "Read of size %i on address 0x%x data 0x%x\n", 212 pkt->getSize(), pkt->getAddr(),pkt->get<uint64_t>()); 213 break; 214 case sizeof(uint32_t): 215 DPRINTF(MemoryAccess, "Read of size %i on address 0x%x data 0x%x\n", 216 pkt->getSize(), pkt->getAddr(),pkt->get<uint32_t>()); 217 break; 218 case sizeof(uint16_t): 219 DPRINTF(MemoryAccess, "Read of size %i on address 0x%x data 0x%x\n", 220 pkt->getSize(), pkt->getAddr(),pkt->get<uint16_t>()); 221 break; 222 case sizeof(uint8_t): 223 DPRINTF(MemoryAccess, "Read of size %i on address 0x%x data 0x%x\n", 224 pkt->getSize(), pkt->getAddr(),pkt->get<uint8_t>()); 225 break; 226 default: 227 DPRINTF(MemoryAccess, "Read of size %i on address 0x%x\n", 228 pkt->getSize(), pkt->getAddr()); 229 } 230#endif 231 } 232 else if (pkt->isWrite()) { 233 if (writeOK(pkt->req)) { 234 memcpy(pmemAddr + pkt->getAddr() - start(), pkt->getPtr<uint8_t>(), 235 pkt->getSize()); 236#if TRACING_ON 237 switch (pkt->getSize()) { 238 case sizeof(uint64_t): 239 DPRINTF(MemoryAccess, "Write of size %i on address 0x%x data 0x%x\n", 240 pkt->getSize(), pkt->getAddr(),pkt->get<uint64_t>()); 241 break; 242 case sizeof(uint32_t): 243 DPRINTF(MemoryAccess, "Write of size %i on address 0x%x data 0x%x\n", 244 pkt->getSize(), pkt->getAddr(),pkt->get<uint32_t>()); 245 break; 246 case sizeof(uint16_t): 247 DPRINTF(MemoryAccess, "Write of size %i on address 0x%x data 0x%x\n", 248 pkt->getSize(), pkt->getAddr(),pkt->get<uint16_t>()); 249 break; 250 case sizeof(uint8_t): 251 DPRINTF(MemoryAccess, "Write of size %i on address 0x%x data 0x%x\n", 252 pkt->getSize(), pkt->getAddr(),pkt->get<uint8_t>()); 253 break; 254 default: 255 DPRINTF(MemoryAccess, "Write of size %i on address 0x%x\n", 256 pkt->getSize(), pkt->getAddr()); 257 } 258#endif 259 } 260 } else if (pkt->isInvalidate()) { 261 //upgrade or invalidate 262 pkt->flags |= SATISFIED; 263 } else if (pkt->isReadWrite()) { 264 IntReg overwrite_val; 265 bool overwrite_mem; 266 uint64_t condition_val64; 267 uint32_t condition_val32; 268 uint64_t test_val64; 269 uint32_t test_val32; 270 271 assert(sizeof(IntReg) >= pkt->getSize()); 272 273 overwrite_mem = true; 274 // keep a copy of our possible write value, and copy what is at the 275 // memory address into the packet 276 memcpy(&overwrite_val, pkt->getPtr<uint8_t>(), pkt->getSize()); 277 memcpy(pkt->getPtr<uint8_t>(), pmemAddr + pkt->getAddr() - start(), 278 pkt->getSize()); 279 280 if (pkt->req->isCondSwap()) { 281 if (pkt->getSize() == sizeof(uint64_t)) { 282 condition_val64 = htog(pkt->req->getExtraData()); 283 memcpy(&test_val64, pmemAddr + pkt->getAddr() - start(), sizeof(uint64_t)); 284 overwrite_mem = test_val64 == condition_val64; 285 } else if (pkt->getSize() == sizeof(uint32_t)) { 286 condition_val32 = htog((uint32_t)pkt->req->getExtraData()); 287 memcpy(&test_val32, pmemAddr + pkt->getAddr() - start(), sizeof(uint32_t)); 288 overwrite_mem = test_val32 == condition_val32; 289 } else 290 panic("Invalid size for conditional read/write\n"); 291 } 292 293 if (overwrite_mem) 294 memcpy(pmemAddr + pkt->getAddr() - start(), 295 &overwrite_val, pkt->getSize()); 296 297#if TRACING_ON 298 switch (pkt->getSize()) { 299 case sizeof(uint64_t): 300 DPRINTF(MemoryAccess, "Read/Write of size %i on address 0x%x old data 0x%x\n", 301 pkt->getSize(), pkt->getAddr(),pkt->get<uint64_t>()); 302 DPRINTF(MemoryAccess, "New Data 0x%x %s conditional (0x%x) and %s \n", 303 overwrite_mem, pkt->req->isCondSwap() ? "was" : "wasn't", 304 condition_val64, overwrite_mem ? "happened" : "didn't happen"); 305 break; 306 case sizeof(uint32_t): 307 DPRINTF(MemoryAccess, "Read/Write of size %i on address 0x%x old data 0x%x\n", 308 pkt->getSize(), pkt->getAddr(),pkt->get<uint32_t>()); 309 DPRINTF(MemoryAccess, "New Data 0x%x %s conditional (0x%x) and %s \n", 310 overwrite_mem, pkt->req->isCondSwap() ? "was" : "wasn't", 311 condition_val32, overwrite_mem ? "happened" : "didn't happen"); 312 break; 313 case sizeof(uint16_t): 314 DPRINTF(MemoryAccess, "Read/Write of size %i on address 0x%x old data 0x%x\n", 315 pkt->getSize(), pkt->getAddr(),pkt->get<uint16_t>()); 316 DPRINTF(MemoryAccess, "New Data 0x%x wasn't conditional and happned\n", 317 overwrite_mem); 318 break; 319 case sizeof(uint8_t): 320 DPRINTF(MemoryAccess, "Read/Write of size %i on address 0x%x old data 0x%x\n", 321 pkt->getSize(), pkt->getAddr(),pkt->get<uint8_t>()); 322 DPRINTF(MemoryAccess, "New Data 0x%x wasn't conditional and happned\n", 323 overwrite_mem); 324 break; 325 default: 326 DPRINTF(MemoryAccess, "Read/Write of size %i on address 0x%x\n", 327 pkt->getSize(), pkt->getAddr()); 328 } 329#endif 330 } else { 331 panic("unimplemented"); 332 } 333 334 pkt->result = Packet::Success; 335} 336 337Port * 338PhysicalMemory::getPort(const std::string &if_name, int idx) 339{ 340 if (if_name == "port" && idx == -1) { 341 if (port != NULL) 342 panic("PhysicalMemory::getPort: additional port requested to memory!"); 343 port = new MemoryPort(name() + "-port", this); 344 return port; 345 } else if (if_name == "functional") { 346 /* special port for functional writes at startup. And for memtester */ 347 return new MemoryPort(name() + "-funcport", this); 348 } else { 349 panic("PhysicalMemory::getPort: unknown port %s requested", if_name); 350 } 351} 352 353void 354PhysicalMemory::recvStatusChange(Port::Status status) 355{ 356} 357 358PhysicalMemory::MemoryPort::MemoryPort(const std::string &_name, 359 PhysicalMemory *_memory) 360 : SimpleTimingPort(_name), memory(_memory) 361{ } 362 363void 364PhysicalMemory::MemoryPort::recvStatusChange(Port::Status status) 365{ 366 memory->recvStatusChange(status); 367} 368 369void 370PhysicalMemory::MemoryPort::getDeviceAddressRanges(AddrRangeList &resp, 371 AddrRangeList &snoop) 372{ 373 memory->getAddressRanges(resp, snoop); 374} 375 376void 377PhysicalMemory::getAddressRanges(AddrRangeList &resp, AddrRangeList &snoop) 378{ 379 snoop.clear(); 380 resp.clear(); 381 resp.push_back(RangeSize(start(), 382 params()->addrRange.size())); 383} 384 385int 386PhysicalMemory::MemoryPort::deviceBlockSize() 387{ 388 return memory->deviceBlockSize(); 389} 390 391Tick 392PhysicalMemory::MemoryPort::recvAtomic(PacketPtr pkt) 393{ 394 memory->doFunctionalAccess(pkt); 395 return memory->calculateLatency(pkt); 396} 397 398void 399PhysicalMemory::MemoryPort::recvFunctional(PacketPtr pkt) 400{ 401 //Since we are overriding the function, make sure to have the impl of the 402 //check or functional accesses here. 403 std::list<std::pair<Tick,PacketPtr> >::iterator i = transmitList.begin(); 404 std::list<std::pair<Tick,PacketPtr> >::iterator end = transmitList.end(); 405 bool notDone = true; 406 407 while (i != end && notDone) { 408 PacketPtr target = i->second; 409 // If the target contains data, and it overlaps the 410 // probed request, need to update data 411 if (target->intersect(pkt)) 412 notDone = fixPacket(pkt, target); 413 i++; 414 } 415 416 // Default implementation of SimpleTimingPort::recvFunctional() 417 // calls recvAtomic() and throws away the latency; we can save a 418 // little here by just not calculating the latency. 419 memory->doFunctionalAccess(pkt); 420} 421 422unsigned int 423PhysicalMemory::drain(Event *de) 424{ 425 int count = port->drain(de); 426 if (count) 427 changeState(Draining); 428 else 429 changeState(Drained); 430 return count; 431} 432 433void 434PhysicalMemory::serialize(ostream &os) 435{ 436 gzFile compressedMem; 437 string filename = name() + ".physmem"; 438 439 SERIALIZE_SCALAR(filename); 440 441 // write memory file 442 string thefile = Checkpoint::dir() + "/" + filename.c_str(); 443 int fd = creat(thefile.c_str(), 0664); 444 if (fd < 0) { 445 perror("creat"); 446 fatal("Can't open physical memory checkpoint file '%s'\n", filename); 447 } 448 449 compressedMem = gzdopen(fd, "wb"); 450 if (compressedMem == NULL) 451 fatal("Insufficient memory to allocate compression state for %s\n", 452 filename); 453 454 if (gzwrite(compressedMem, pmemAddr, params()->addrRange.size()) != params()->addrRange.size()) { 455 fatal("Write failed on physical memory checkpoint file '%s'\n", 456 filename); 457 } 458 459 if (gzclose(compressedMem)) 460 fatal("Close failed on physical memory checkpoint file '%s'\n", 461 filename); 462} 463 464void 465PhysicalMemory::unserialize(Checkpoint *cp, const string §ion) 466{ 467 gzFile compressedMem; 468 long *tempPage; 469 long *pmem_current; 470 uint64_t curSize; 471 uint32_t bytesRead; 472 const int chunkSize = 16384; 473 474 475 string filename; 476 477 UNSERIALIZE_SCALAR(filename); 478 479 filename = cp->cptDir + "/" + filename; 480 481 // mmap memoryfile 482 int fd = open(filename.c_str(), O_RDONLY); 483 if (fd < 0) { 484 perror("open"); 485 fatal("Can't open physical memory checkpoint file '%s'", filename); 486 } 487 488 compressedMem = gzdopen(fd, "rb"); 489 if (compressedMem == NULL) 490 fatal("Insufficient memory to allocate compression state for %s\n", 491 filename); 492 493 // unmap file that was mmaped in the constructor 494 // This is done here to make sure that gzip and open don't muck with our 495 // nice large space of memory before we reallocate it 496 munmap((char*)pmemAddr, params()->addrRange.size()); 497 498 pmemAddr = (uint8_t *)mmap(NULL, params()->addrRange.size(), PROT_READ | PROT_WRITE, 499 MAP_ANON | MAP_PRIVATE, -1, 0); 500 501 if (pmemAddr == (void *)MAP_FAILED) { 502 perror("mmap"); 503 fatal("Could not mmap physical memory!\n"); 504 } 505 506 curSize = 0; 507 tempPage = (long*)malloc(chunkSize); 508 if (tempPage == NULL) 509 fatal("Unable to malloc memory to read file %s\n", filename); 510 511 /* Only copy bytes that are non-zero, so we don't give the VM system hell */ 512 while (curSize < params()->addrRange.size()) { 513 bytesRead = gzread(compressedMem, tempPage, chunkSize); 514 if (bytesRead != chunkSize && bytesRead != params()->addrRange.size() - curSize) 515 fatal("Read failed on physical memory checkpoint file '%s'" 516 " got %d bytes, expected %d or %d bytes\n", 517 filename, bytesRead, chunkSize, params()->addrRange.size()-curSize); 518 519 assert(bytesRead % sizeof(long) == 0); 520 521 for (int x = 0; x < bytesRead/sizeof(long); x++) 522 { 523 if (*(tempPage+x) != 0) { 524 pmem_current = (long*)(pmemAddr + curSize + x * sizeof(long)); 525 *pmem_current = *(tempPage+x); 526 } 527 } 528 curSize += bytesRead; 529 } 530 531 free(tempPage); 532 533 if (gzclose(compressedMem)) 534 fatal("Close failed on physical memory checkpoint file '%s'\n", 535 filename); 536 537} 538 539 540BEGIN_DECLARE_SIM_OBJECT_PARAMS(PhysicalMemory) 541 542 Param<string> file; 543 Param<Range<Addr> > range; 544 Param<Tick> latency; 545 Param<bool> zero; 546 547END_DECLARE_SIM_OBJECT_PARAMS(PhysicalMemory) 548 549BEGIN_INIT_SIM_OBJECT_PARAMS(PhysicalMemory) 550 551 INIT_PARAM_DFLT(file, "memory mapped file", ""), 552 INIT_PARAM(range, "Device Address Range"), 553 INIT_PARAM(latency, "Memory access latency"), 554 INIT_PARAM(zero, "Zero initialize memory") 555 556END_INIT_SIM_OBJECT_PARAMS(PhysicalMemory) 557 558CREATE_SIM_OBJECT(PhysicalMemory) 559{ 560 PhysicalMemory::Params *p = new PhysicalMemory::Params; 561 p->name = getInstanceName(); 562 p->addrRange = range; 563 p->latency = latency; 564 p->zero = zero; 565 return new PhysicalMemory(p); 566} 567 568REGISTER_SIM_OBJECT("PhysicalMemory", PhysicalMemory) 569