tlb.cc revision 7603:66d853e566d2
1/* 2 * Copyright (c) 2010 ARM Limited 3 * All rights reserved 4 * 5 * The license below extends only to copyright in the software and shall 6 * not be construed as granting a license to any other intellectual 7 * property including but not limited to intellectual property relating 8 * to a hardware implementation of the functionality of the software 9 * licensed hereunder. You may use the software subject to the license 10 * terms below provided that you ensure that this notice is replicated 11 * unmodified and in its entirety in all distributions of the software, 12 * modified or unmodified, in source code or in binary form. 13 * 14 * Copyright (c) 2001-2005 The Regents of The University of Michigan 15 * All rights reserved. 16 * 17 * Redistribution and use in source and binary forms, with or without 18 * modification, are permitted provided that the following conditions are 19 * met: redistributions of source code must retain the above copyright 20 * notice, this list of conditions and the following disclaimer; 21 * redistributions in binary form must reproduce the above copyright 22 * notice, this list of conditions and the following disclaimer in the 23 * documentation and/or other materials provided with the distribution; 24 * neither the name of the copyright holders nor the names of its 25 * contributors may be used to endorse or promote products derived from 26 * this software without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 29 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 30 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 31 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 32 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 33 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 34 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 35 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 36 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 37 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 38 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 39 * 40 * Authors: Ali Saidi 41 * Nathan Binkert 42 * Steve Reinhardt 43 */ 44 45#include <string> 46#include <vector> 47 48#include "arch/arm/faults.hh" 49#include "arch/arm/pagetable.hh" 50#include "arch/arm/tlb.hh" 51#include "arch/arm/utility.hh" 52#include "base/inifile.hh" 53#include "base/str.hh" 54#include "base/trace.hh" 55#include "cpu/thread_context.hh" 56#include "mem/page_table.hh" 57#include "params/ArmTLB.hh" 58#include "sim/process.hh" 59 60#if FULL_SYSTEM 61#include "arch/arm/table_walker.hh" 62#endif 63 64using namespace std; 65using namespace ArmISA; 66 67TLB::TLB(const Params *p) 68 : BaseTLB(p), size(p->size), nlu(0) 69#if FULL_SYSTEM 70 , tableWalker(p->walker) 71#endif 72{ 73 table = new TlbEntry[size]; 74 memset(table, 0, sizeof(TlbEntry[size])); 75 76#if FULL_SYSTEM 77 tableWalker->setTlb(this); 78#endif 79} 80 81TLB::~TLB() 82{ 83 if (table) 84 delete [] table; 85} 86 87TlbEntry* 88TLB::lookup(Addr va, uint8_t cid) 89{ 90 // XXX This should either turn into a TlbMap or add caching 91 92 TlbEntry *retval = NULL; 93 94 // Do some kind of caching, fast indexing, anything 95 96 int x = 0; 97 while (retval == NULL && x < size) { 98 if (table[x].match(va, cid)) { 99 retval = &table[x]; 100 if (x == nlu) 101 nextnlu(); 102 103 break; 104 } 105 x++; 106 } 107 108 DPRINTF(TLBVerbose, "Lookup %#x, cid %#x -> %s ppn %#x size: %#x pa: %#x ap:%d\n", 109 va, cid, retval ? "hit" : "miss", retval ? retval->pfn : 0, 110 retval ? retval->size : 0, retval ? retval->pAddr(va) : 0, 111 retval ? retval->ap : 0); 112 ; 113 return retval; 114} 115 116// insert a new TLB entry 117void 118TLB::insert(Addr addr, TlbEntry &entry) 119{ 120 DPRINTF(TLB, "Inserting entry into TLB with pfn:%#x size:%#x vpn: %#x" 121 " asid:%d N:%d global:%d valid:%d nc:%d sNp:%d xn:%d ap:%#x" 122 " domain:%#x\n", entry.pfn, entry.size, entry.vpn, entry.asid, 123 entry.N, entry.global, entry.valid, entry.nonCacheable, entry.sNp, 124 entry.xn, entry.ap, entry.domain); 125 126 if (table[nlu].valid) 127 DPRINTF(TLB, " - Replacing Valid entry %#x, asn %d ppn %#x size: %#x ap:%d\n", 128 table[nlu].vpn << table[nlu].N, table[nlu].asid, table[nlu].pfn << table[nlu].N, 129 table[nlu].size, table[nlu].ap); 130 131 // XXX Update caching, lookup table etc 132 table[nlu] = entry; 133 134 // XXX Figure out how entries are generally inserted in ARM 135 nextnlu(); 136} 137 138void 139TLB::printTlb() 140{ 141 int x = 0; 142 TlbEntry *te; 143 DPRINTF(TLB, "Current TLB contents:\n"); 144 while (x < size) { 145 te = &table[x]; 146 if (te->valid) 147 DPRINTF(TLB, " * %#x, asn %d ppn %#x size: %#x ap:%d\n", 148 te->vpn << te->N, te->asid, te->pfn << te->N, te->size, te->ap); 149 x++; 150 } 151} 152 153 154void 155TLB::flushAll() 156{ 157 DPRINTF(TLB, "Flushing all TLB entries\n"); 158 int x = 0; 159 TlbEntry *te; 160 while (x < size) { 161 te = &table[x]; 162 if (te->valid) 163 DPRINTF(TLB, " - %#x, asn %d ppn %#x size: %#x ap:%d\n", 164 te->vpn << te->N, te->asid, te->pfn << te->N, te->size, te->ap); 165 x++; 166 } 167 168 memset(table, 0, sizeof(TlbEntry[size])); 169 nlu = 0; 170} 171 172 173void 174TLB::flushMvaAsid(Addr mva, uint64_t asn) 175{ 176 DPRINTF(TLB, "Flushing mva %#x asid: %#x\n", mva, asn); 177 TlbEntry *te; 178 179 te = lookup(mva, asn); 180 while (te != NULL) { 181 DPRINTF(TLB, " - %#x, asn %d ppn %#x size: %#x ap:%d\n", 182 te->vpn << te->N, te->asid, te->pfn << te->N, te->size, te->ap); 183 te->valid = false; 184 te = lookup(mva,asn); 185 } 186} 187 188void 189TLB::flushAsid(uint64_t asn) 190{ 191 DPRINTF(TLB, "Flushing all entries with asid: %#x\n", asn); 192 193 int x = 0; 194 TlbEntry *te; 195 196 while (x < size) { 197 te = &table[x]; 198 if (te->asid == asn) { 199 te->valid = false; 200 DPRINTF(TLB, " - %#x, asn %d ppn %#x size: %#x ap:%d\n", 201 te->vpn << te->N, te->asid, te->pfn << te->N, te->size, te->ap); 202 } 203 x++; 204 } 205} 206 207void 208TLB::flushMva(Addr mva) 209{ 210 DPRINTF(TLB, "Flushing all entries with mva: %#x\n", mva); 211 212 int x = 0; 213 TlbEntry *te; 214 215 while (x < size) { 216 te = &table[x]; 217 Addr v = te->vpn << te->N; 218 if (mva >= v && mva < v + te->size) { 219 te->valid = false; 220 DPRINTF(TLB, " - %#x, asn %d ppn %#x size: %#x ap:%d\n", 221 te->vpn << te->N, te->asid, te->pfn << te->N, te->size, te->ap); 222 } 223 x++; 224 } 225} 226 227void 228TLB::serialize(ostream &os) 229{ 230 panic("Implement Serialize\n"); 231} 232 233void 234TLB::unserialize(Checkpoint *cp, const string §ion) 235{ 236 237 panic("Need to properly unserialize TLB\n"); 238} 239 240void 241TLB::regStats() 242{ 243 read_hits 244 .name(name() + ".read_hits") 245 .desc("DTB read hits") 246 ; 247 248 read_misses 249 .name(name() + ".read_misses") 250 .desc("DTB read misses") 251 ; 252 253 254 read_accesses 255 .name(name() + ".read_accesses") 256 .desc("DTB read accesses") 257 ; 258 259 write_hits 260 .name(name() + ".write_hits") 261 .desc("DTB write hits") 262 ; 263 264 write_misses 265 .name(name() + ".write_misses") 266 .desc("DTB write misses") 267 ; 268 269 270 write_accesses 271 .name(name() + ".write_accesses") 272 .desc("DTB write accesses") 273 ; 274 275 hits 276 .name(name() + ".hits") 277 .desc("DTB hits") 278 ; 279 280 misses 281 .name(name() + ".misses") 282 .desc("DTB misses") 283 ; 284 285 accesses 286 .name(name() + ".accesses") 287 .desc("DTB accesses") 288 ; 289 290 hits = read_hits + write_hits; 291 misses = read_misses + write_misses; 292 accesses = read_accesses + write_accesses; 293} 294 295#if !FULL_SYSTEM 296Fault 297TLB::translateSe(RequestPtr req, ThreadContext *tc, Mode mode, 298 Translation *translation, bool &delay, bool timing) 299{ 300 // XXX Cache misc registers and have miscreg write function inv cache 301 Addr vaddr = req->getVaddr() & ~PcModeMask; 302 SCTLR sctlr = tc->readMiscReg(MISCREG_SCTLR); 303 uint32_t flags = req->getFlags(); 304 305 bool is_fetch = (mode == Execute); 306 bool is_write = (mode == Write); 307 308 if (!is_fetch) { 309 assert(flags & MustBeOne); 310 if (sctlr.a || !(flags & AllowUnaligned)) { 311 if (vaddr & flags & AlignmentMask) { 312 return new DataAbort(vaddr, 0, is_write, ArmFault::AlignmentFault); 313 } 314 } 315 } 316 317 Addr paddr; 318 Process *p = tc->getProcessPtr(); 319 320 if (!p->pTable->translate(vaddr, paddr)) 321 return Fault(new GenericPageTableFault(vaddr)); 322 req->setPaddr(paddr); 323 324 return NoFault; 325} 326 327#else // FULL_SYSTEM 328 329Fault 330TLB::trickBoxCheck(RequestPtr req, Mode mode, uint8_t domain, bool sNp) 331{ 332 return NoFault; 333} 334 335Fault 336TLB::walkTrickBoxCheck(Addr pa, Addr va, Addr sz, bool is_exec, 337 bool is_write, uint8_t domain, bool sNp) 338{ 339 return NoFault; 340} 341 342Fault 343TLB::translateFs(RequestPtr req, ThreadContext *tc, Mode mode, 344 Translation *translation, bool &delay, bool timing) 345{ 346 // XXX Cache misc registers and have miscreg write function inv cache 347 Addr vaddr = req->getVaddr() & ~PcModeMask; 348 SCTLR sctlr = tc->readMiscReg(MISCREG_SCTLR); 349 CPSR cpsr = tc->readMiscReg(MISCREG_CPSR); 350 uint32_t flags = req->getFlags(); 351 352 bool is_fetch = (mode == Execute); 353 bool is_write = (mode == Write); 354 bool is_priv = (cpsr.mode != MODE_USER) && !(flags & UserMode); 355 356 DPRINTF(TLBVerbose, "CPSR is user:%d UserMode:%d\n", cpsr.mode == MODE_USER, flags 357 & UserMode); 358 // If this is a clrex instruction, provide a PA of 0 with no fault 359 // This will force the monitor to set the tracked address to 0 360 // a bit of a hack but this effectively clrears this processors monitor 361 if (flags & Clrex){ 362 req->setPaddr(0); 363 return NoFault; 364 } 365 if (!is_fetch) { 366 assert(flags & MustBeOne); 367 if (sctlr.a || !(flags & AllowUnaligned)) { 368 if (vaddr & flags & AlignmentMask) { 369 return new DataAbort(vaddr, 0, is_write, ArmFault::AlignmentFault); 370 } 371 } 372 } 373 374 uint32_t context_id = tc->readMiscReg(MISCREG_CONTEXTIDR); 375 Fault fault; 376 377 378 if (!sctlr.m) { 379 req->setPaddr(vaddr); 380 if (sctlr.tre == 0) { 381 req->setFlags(Request::UNCACHEABLE); 382 } else { 383 PRRR prrr = tc->readMiscReg(MISCREG_PRRR); 384 NMRR nmrr = tc->readMiscReg(MISCREG_NMRR); 385 386 if (nmrr.ir0 == 0 || nmrr.or0 == 0 || prrr.tr0 != 0x2) 387 req->setFlags(Request::UNCACHEABLE); 388 } 389 390 // Set memory attributes 391 TlbEntry temp_te; 392 tableWalker->memAttrs(tc, temp_te, sctlr, 0, 1); 393 temp_te.shareable = true; 394 DPRINTF(TLBVerbose, "(No MMU) setting memory attributes: shareable:\ 395 %d, innerAttrs: %d, outerAttrs: %d\n", temp_te.shareable, 396 temp_te.innerAttrs, temp_te.outerAttrs); 397 setAttr(temp_te.attributes); 398 399 return trickBoxCheck(req, mode, 0, false); 400 } 401 402 DPRINTF(TLBVerbose, "Translating vaddr=%#x context=%d\n", vaddr, context_id); 403 // Translation enabled 404 405 TlbEntry *te = lookup(vaddr, context_id); 406 if (te == NULL) { 407 // start translation table walk, pass variables rather than 408 // re-retreaving in table walker for speed 409 DPRINTF(TLB, "TLB Miss: Starting hardware table walker for %#x(%d)\n", 410 vaddr, context_id); 411 fault = tableWalker->walk(req, tc, context_id, mode, translation, 412 timing); 413 if (timing) { 414 delay = true; 415 // for timing mode, return and wait for table walk 416 return fault; 417 } 418 if (fault) 419 return fault; 420 421 te = lookup(vaddr, context_id); 422 if (!te) 423 printTlb(); 424 assert(te); 425 } 426 427 // Set memory attributes 428 DPRINTF(TLBVerbose, 429 "Setting memory attributes: shareable: %d, innerAttrs: %d, \ 430 outerAttrs: %d\n", 431 te->shareable, te->innerAttrs, te->outerAttrs); 432 setAttr(te->attributes); 433 434 uint32_t dacr = tc->readMiscReg(MISCREG_DACR); 435 switch ( (dacr >> (te->domain * 2)) & 0x3) { 436 case 0: 437 DPRINTF(TLB, "TLB Fault: Data abort on domain. DACR: %#x domain: %#x" 438 " write:%d sNp:%d\n", dacr, te->domain, is_write, te->sNp); 439 if (is_fetch) 440 return new PrefetchAbort(vaddr, 441 (te->sNp ? ArmFault::Domain0 : ArmFault::Domain1)); 442 else 443 return new DataAbort(vaddr, te->domain, is_write, 444 (te->sNp ? ArmFault::Domain0 : ArmFault::Domain1)); 445 case 1: 446 // Continue with permissions check 447 break; 448 case 2: 449 panic("UNPRED domain\n"); 450 case 3: 451 req->setPaddr(te->pAddr(vaddr)); 452 fault = trickBoxCheck(req, mode, te->domain, te->sNp); 453 if (fault) 454 return fault; 455 return NoFault; 456 } 457 458 uint8_t ap = te->ap; 459 460 if (sctlr.afe == 1) 461 ap |= 1; 462 463 bool abt; 464 465 /* if (!sctlr.xp) 466 ap &= 0x3; 467*/ 468 switch (ap) { 469 case 0: 470 DPRINTF(TLB, "Access permissions 0, checking rs:%#x\n", (int)sctlr.rs); 471 if (!sctlr.xp) { 472 switch ((int)sctlr.rs) { 473 case 2: 474 abt = is_write; 475 break; 476 case 1: 477 abt = is_write || !is_priv; 478 break; 479 case 0: 480 case 3: 481 default: 482 abt = true; 483 break; 484 } 485 } else { 486 abt = true; 487 } 488 break; 489 case 1: 490 abt = !is_priv; 491 break; 492 case 2: 493 abt = !is_priv && is_write; 494 break; 495 case 3: 496 abt = false; 497 break; 498 case 4: 499 panic("UNPRED premissions\n"); 500 case 5: 501 abt = !is_priv || is_write; 502 break; 503 case 6: 504 case 7: 505 abt = is_write; 506 break; 507 default: 508 panic("Unknown permissions\n"); 509 } 510 if ((is_fetch) && (abt || te->xn)) { 511 DPRINTF(TLB, "TLB Fault: Prefetch abort on permission check. AP:%d priv:%d" 512 " write:%d sNp:%d\n", ap, is_priv, is_write, te->sNp); 513 return new PrefetchAbort(vaddr, 514 (te->sNp ? ArmFault::Permission0 : 515 ArmFault::Permission1)); 516 } else if (abt) { 517 DPRINTF(TLB, "TLB Fault: Data abort on permission check. AP:%d priv:%d" 518 " write:%d sNp:%d\n", ap, is_priv, is_write, te->sNp); 519 return new DataAbort(vaddr, te->domain, is_write, 520 (te->sNp ? ArmFault::Permission0 : 521 ArmFault::Permission1)); 522 } 523 524 req->setPaddr(te->pAddr(vaddr)); 525 // Check for a trickbox generated address fault 526 fault = trickBoxCheck(req, mode, te->domain, te->sNp); 527 if (fault) 528 return fault; 529 530 return NoFault; 531} 532 533#endif 534 535Fault 536TLB::translateAtomic(RequestPtr req, ThreadContext *tc, Mode mode) 537{ 538 bool delay = false; 539 Fault fault; 540#if FULL_SYSTEM 541 fault = translateFs(req, tc, mode, NULL, delay, false); 542#else 543 fault = translateSe(req, tc, mode, NULL, delay, false); 544#endif 545 assert(!delay); 546 return fault; 547} 548 549Fault 550TLB::translateTiming(RequestPtr req, ThreadContext *tc, 551 Translation *translation, Mode mode) 552{ 553 assert(translation); 554 bool delay = false; 555 Fault fault; 556#if FULL_SYSTEM 557 fault = translateFs(req, tc, mode, translation, delay, true); 558#else 559 fault = translateSe(req, tc, mode, translation, delay, true); 560#endif 561 if (!delay) 562 translation->finish(fault, req, tc, mode); 563 return fault; 564} 565 566ArmISA::TLB * 567ArmTLBParams::create() 568{ 569 return new ArmISA::TLB(this); 570} 571