system.cc revision 8741:491297d019f3
1/* 2 * Copyright (c) 2002-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: Ali Saidi 29 * Nathan Binkert 30 */ 31 32#include <sys/signal.h> 33 34#include "arch/alpha/ev5.hh" 35#include "arch/alpha/system.hh" 36#include "arch/vtophys.hh" 37#include "base/loader/object_file.hh" 38#include "base/loader/symtab.hh" 39#include "base/trace.hh" 40#include "debug/Loader.hh" 41#include "mem/physical.hh" 42#include "mem/vport.hh" 43#include "params/AlphaSystem.hh" 44#include "sim/byteswap.hh" 45 46using namespace AlphaISA; 47 48AlphaSystem::AlphaSystem(Params *p) 49 : System(p), intrFreq(0) 50{ 51 consoleSymtab = new SymbolTable; 52 palSymtab = new SymbolTable; 53 54 55 /** 56 * Load the pal, and console code into memory 57 */ 58 // Load Console Code 59 console = createObjectFile(params()->console); 60 if (console == NULL) 61 fatal("Could not load console file %s", params()->console); 62 63 // Load pal file 64 pal = createObjectFile(params()->pal); 65 if (pal == NULL) 66 fatal("Could not load PALcode file %s", params()->pal); 67 68 69 // Load program sections into memory 70 pal->loadSections(functionalPort, loadAddrMask); 71 console->loadSections(functionalPort, loadAddrMask); 72 73 // load symbols 74 if (!console->loadGlobalSymbols(consoleSymtab)) 75 panic("could not load console symbols\n"); 76 77 if (!pal->loadGlobalSymbols(palSymtab)) 78 panic("could not load pal symbols\n"); 79 80 if (!pal->loadLocalSymbols(palSymtab)) 81 panic("could not load pal symbols\n"); 82 83 if (!console->loadGlobalSymbols(debugSymbolTable)) 84 panic("could not load console symbols\n"); 85 86 if (!pal->loadGlobalSymbols(debugSymbolTable)) 87 panic("could not load pal symbols\n"); 88 89 if (!pal->loadLocalSymbols(debugSymbolTable)) 90 panic("could not load pal symbols\n"); 91 92 Addr addr = 0; 93#ifndef NDEBUG 94 consolePanicEvent = addConsoleFuncEvent<BreakPCEvent>("panic"); 95#endif 96 97 /** 98 * Copy the osflags (kernel arguments) into the consoles 99 * memory. (Presently Linux does not use the console service 100 * routine to get these command line arguments, but Tru64 and 101 * others do.) 102 */ 103 if (consoleSymtab->findAddress("env_booted_osflags", addr)) { 104 virtPort->writeBlob(addr, (uint8_t*)params()->boot_osflags.c_str(), 105 strlen(params()->boot_osflags.c_str())); 106 } 107 108 /** 109 * Set the hardware reset parameter block system type and revision 110 * information to Tsunami. 111 */ 112 if (consoleSymtab->findAddress("m5_rpb", addr)) { 113 uint64_t data; 114 data = htog(params()->system_type); 115 virtPort->write(addr+0x50, data); 116 data = htog(params()->system_rev); 117 virtPort->write(addr+0x58, data); 118 } else 119 panic("could not find hwrpb\n"); 120} 121 122AlphaSystem::~AlphaSystem() 123{ 124 delete consoleSymtab; 125 delete console; 126 delete pal; 127#ifdef DEBUG 128 delete consolePanicEvent; 129#endif 130} 131 132/** 133 * This function fixes up addresses that are used to match PCs for 134 * hooking simulator events on to target function executions. 135 * 136 * Alpha binaries may have multiple global offset table (GOT) 137 * sections. A function that uses the GOT starts with a 138 * two-instruction prolog which sets the global pointer (gp == r29) to 139 * the appropriate GOT section. The proper gp value is calculated 140 * based on the function address, which must be passed by the caller 141 * in the procedure value register (pv aka t12 == r27). This sequence 142 * looks like the following: 143 * 144 * opcode Ra Rb offset 145 * ldah gp,X(pv) 09 29 27 X 146 * lda gp,Y(gp) 08 29 29 Y 147 * 148 * for some constant offsets X and Y. The catch is that the linker 149 * (or maybe even the compiler, I'm not sure) may recognize that the 150 * caller and callee are using the same GOT section, making this 151 * prolog redundant, and modify the call target to skip these 152 * instructions. If we check for execution of the first instruction 153 * of a function (the one the symbol points to) to detect when to skip 154 * it, we'll miss all these modified calls. It might work to 155 * unconditionally check for the third instruction, but not all 156 * functions have this prolog, and there's some chance that those 157 * first two instructions could have undesired consequences. So we do 158 * the Right Thing and pattern-match the first two instructions of the 159 * function to decide where to patch. 160 * 161 * Eventually this code should be moved into an ISA-specific file. 162 */ 163Addr 164AlphaSystem::fixFuncEventAddr(Addr addr) 165{ 166 // mask for just the opcode, Ra, and Rb fields (not the offset) 167 const uint32_t inst_mask = 0xffff0000; 168 // ldah gp,X(pv): opcode 9, Ra = 29, Rb = 27 169 const uint32_t gp_ldah_pattern = (9 << 26) | (29 << 21) | (27 << 16); 170 // lda gp,Y(gp): opcode 8, Ra = 29, rb = 29 171 const uint32_t gp_lda_pattern = (8 << 26) | (29 << 21) | (29 << 16); 172 173 uint32_t i1 = virtPort->read<uint32_t>(addr); 174 uint32_t i2 = virtPort->read<uint32_t>(addr + sizeof(MachInst)); 175 176 if ((i1 & inst_mask) == gp_ldah_pattern && 177 (i2 & inst_mask) == gp_lda_pattern) { 178 Addr new_addr = addr + 2 * sizeof(MachInst); 179 DPRINTF(Loader, "fixFuncEventAddr: %p -> %p", addr, new_addr); 180 return new_addr; 181 } else { 182 return addr; 183 } 184} 185 186void 187AlphaSystem::setAlphaAccess(Addr access) 188{ 189 Addr addr = 0; 190 if (consoleSymtab->findAddress("m5AlphaAccess", addr)) { 191 virtPort->write(addr, htog(Phys2K0Seg(access))); 192 } else { 193 panic("could not find m5AlphaAccess\n"); 194 } 195} 196 197void 198AlphaSystem::serialize(std::ostream &os) 199{ 200 System::serialize(os); 201 consoleSymtab->serialize("console_symtab", os); 202 palSymtab->serialize("pal_symtab", os); 203} 204 205void 206AlphaSystem::unserialize(Checkpoint *cp, const std::string §ion) 207{ 208 System::unserialize(cp,section); 209 consoleSymtab->unserialize("console_symtab", cp, section); 210 palSymtab->unserialize("pal_symtab", cp, section); 211} 212 213AlphaSystem * 214AlphaSystemParams::create() 215{ 216 return new AlphaSystem(this); 217} 218