isa.cc revision 7408 
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 * Redistribution and use in source and binary forms, with or without
15 * modification, are permitted provided that the following conditions are
16 * met: redistributions of source code must retain the above copyright
17 * notice, this list of conditions and the following disclaimer;
18 * redistributions in binary form must reproduce the above copyright
19 * notice, this list of conditions and the following disclaimer in the
20 * documentation and/or other materials provided with the distribution;
21 * neither the name of the copyright holders nor the names of its
22 * contributors may be used to endorse or promote products derived from
23 * this software without specific prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
28 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
29 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
30 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
31 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
32 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
33 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
34 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
35 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36 *
37 * Authors: Gabe Black
38 *          Ali Saidi
39 */
40
41#include "arch/arm/isa.hh"
42
43namespace ArmISA
44{
45
46MiscReg
47ISA::readMiscRegNoEffect(int misc_reg)
48{
49    assert(misc_reg < NumMiscRegs);
50    if (misc_reg == MISCREG_SPSR) {
51        CPSR cpsr = miscRegs[MISCREG_CPSR];
52        switch (cpsr.mode) {
53          case MODE_USER:
54            return miscRegs[MISCREG_SPSR];
55          case MODE_FIQ:
56            return miscRegs[MISCREG_SPSR_FIQ];
57          case MODE_IRQ:
58            return miscRegs[MISCREG_SPSR_IRQ];
59          case MODE_SVC:
60            return miscRegs[MISCREG_SPSR_SVC];
61          case MODE_MON:
62            return miscRegs[MISCREG_SPSR_MON];
63          case MODE_ABORT:
64            return miscRegs[MISCREG_SPSR_ABT];
65          case MODE_UNDEFINED:
66            return miscRegs[MISCREG_SPSR_UND];
67          default:
68            return miscRegs[MISCREG_SPSR];
69        }
70    }
71    return miscRegs[misc_reg];
72}
73
74
75MiscReg
76ISA::readMiscReg(int misc_reg, ThreadContext *tc)
77{
78    if (misc_reg == MISCREG_CPSR) {
79        CPSR cpsr = miscRegs[misc_reg];
80        Addr pc = tc->readPC();
81        if (pc & (ULL(1) << PcJBitShift))
82            cpsr.j = 1;
83        else
84            cpsr.j = 0;
85        if (pc & (ULL(1) << PcTBitShift))
86            cpsr.t = 1;
87        else
88            cpsr.t = 0;
89        return cpsr;
90    }
91    if (misc_reg >= MISCREG_CP15_UNIMP_START &&
92        misc_reg < MISCREG_CP15_END) {
93        panic("Unimplemented CP15 register %s read.\n",
94              miscRegName[misc_reg]);
95    }
96    switch (misc_reg) {
97      case MISCREG_CLIDR:
98        warn("The clidr register always reports 0 caches.\n");
99        break;
100      case MISCREG_CCSIDR:
101        warn("The ccsidr register isn't implemented and "
102                "always reads as 0.\n");
103        break;
104      case MISCREG_ID_PFR0:
105        return 0x1031; // ThumbEE | !Jazelle | Thumb | ARM
106    }
107    return readMiscRegNoEffect(misc_reg);
108}
109
110void
111ISA::setMiscRegNoEffect(int misc_reg, const MiscReg &val)
112{
113    assert(misc_reg < NumMiscRegs);
114    if (misc_reg == MISCREG_SPSR) {
115        CPSR cpsr = miscRegs[MISCREG_CPSR];
116        switch (cpsr.mode) {
117          case MODE_USER:
118            miscRegs[MISCREG_SPSR] = val;
119            return;
120          case MODE_FIQ:
121            miscRegs[MISCREG_SPSR_FIQ] = val;
122            return;
123          case MODE_IRQ:
124            miscRegs[MISCREG_SPSR_IRQ] = val;
125            return;
126          case MODE_SVC:
127            miscRegs[MISCREG_SPSR_SVC] = val;
128            return;
129          case MODE_MON:
130            miscRegs[MISCREG_SPSR_MON] = val;
131            return;
132          case MODE_ABORT:
133            miscRegs[MISCREG_SPSR_ABT] = val;
134            return;
135          case MODE_UNDEFINED:
136            miscRegs[MISCREG_SPSR_UND] = val;
137            return;
138          default:
139            miscRegs[MISCREG_SPSR] = val;
140            return;
141        }
142    }
143    miscRegs[misc_reg] = val;
144}
145
146void
147ISA::setMiscReg(int misc_reg, const MiscReg &val, ThreadContext *tc)
148{
149    MiscReg newVal = val;
150    if (misc_reg == MISCREG_CPSR) {
151        updateRegMap(val);
152        CPSR cpsr = val;
153        DPRINTF(Arm, "Updating CPSR to %#x f:%d i:%d a:%d mode:%#x\n",
154                cpsr, cpsr.f, cpsr.i, cpsr.a, cpsr.mode);
155        Addr npc = tc->readNextPC() & ~PcModeMask;
156        if (cpsr.j)
157            npc = npc | (ULL(1) << PcJBitShift);
158        if (cpsr.t)
159            npc = npc | (ULL(1) << PcTBitShift);
160
161        tc->setNextPC(npc);
162    } else if (misc_reg >= MISCREG_CP15_UNIMP_START &&
163        misc_reg < MISCREG_CP15_END) {
164        panic("Unimplemented CP15 register %s wrote with %#x.\n",
165              miscRegName[misc_reg], val);
166    } else {
167        switch (misc_reg) {
168          case MISCREG_ITSTATE:
169            {
170                ITSTATE itstate = newVal;
171                CPSR cpsr = miscRegs[MISCREG_CPSR];
172                cpsr.it1 = itstate.bottom2;
173                cpsr.it2 = itstate.top6;
174                miscRegs[MISCREG_CPSR] = cpsr;
175                DPRINTF(MiscRegs,
176                        "Updating ITSTATE -> %#x in CPSR -> %#x.\n",
177                        (uint8_t)itstate, (uint32_t)cpsr);
178            }
179            break;
180          case MISCREG_CPACR:
181            {
182                CPACR newCpacr = 0;
183                CPACR valCpacr = val;
184                newCpacr.cp10 = valCpacr.cp10;
185                newCpacr.cp11 = valCpacr.cp11;
186                if (newCpacr.cp10 != 0x3 || newCpacr.cp11 != 3) {
187                    panic("Disabling coprocessors isn't implemented.\n");
188                }
189                newVal = newCpacr;
190            }
191            break;
192          case MISCREG_CSSELR:
193            warn("The csselr register isn't implemented.\n");
194            break;
195          case MISCREG_FPSCR:
196            {
197                const uint32_t ones = (uint32_t)(-1);
198                FPSCR fpscrMask = 0;
199                fpscrMask.ioc = ones;
200                fpscrMask.dzc = ones;
201                fpscrMask.ofc = ones;
202                fpscrMask.ufc = ones;
203                fpscrMask.ixc = ones;
204                fpscrMask.idc = ones;
205                fpscrMask.len = ones;
206                fpscrMask.stride = ones;
207                fpscrMask.rMode = ones;
208                fpscrMask.fz = ones;
209                fpscrMask.dn = ones;
210                fpscrMask.ahp = ones;
211                fpscrMask.qc = ones;
212                fpscrMask.v = ones;
213                fpscrMask.c = ones;
214                fpscrMask.z = ones;
215                fpscrMask.n = ones;
216                newVal = (newVal & (uint32_t)fpscrMask) |
217                         (miscRegs[MISCREG_FPSCR] & ~(uint32_t)fpscrMask);
218            }
219            break;
220          case MISCREG_FPEXC:
221            {
222                const uint32_t fpexcMask = 0x60000000;
223                newVal = (newVal & fpexcMask) |
224                         (miscRegs[MISCREG_FPEXC] & ~fpexcMask);
225            }
226            break;
227          case MISCREG_SCTLR:
228            {
229                DPRINTF(MiscRegs, "Writing SCTLR: %#x\n", newVal);
230                SCTLR sctlr = miscRegs[MISCREG_SCTLR];
231                SCTLR new_sctlr = newVal;
232                new_sctlr.nmfi =  (bool)sctlr.nmfi;
233                miscRegs[MISCREG_SCTLR] = (MiscReg)new_sctlr;
234                return;
235            }
236          case MISCREG_TLBTR:
237          case MISCREG_MVFR0:
238          case MISCREG_MVFR1:
239          case MISCREG_MPIDR:
240          case MISCREG_FPSID:
241            return;
242          case MISCREG_TLBIALLIS:
243          case MISCREG_TLBIALL:
244            warn("Need to flush all TLBs in MP\n");
245            tc->getITBPtr()->flushAll();
246            tc->getDTBPtr()->flushAll();
247            return;
248          case MISCREG_ITLBIALL:
249            tc->getITBPtr()->flushAll();
250            return;
251          case MISCREG_DTLBIALL:
252            tc->getDTBPtr()->flushAll();
253            return;
254          case MISCREG_TLBIMVAIS:
255          case MISCREG_TLBIMVA:
256            warn("Need to flush all TLBs in MP\n");
257            tc->getITBPtr()->flushMvaAsid(mbits(newVal, 31, 12),
258                    bits(newVal, 7,0));
259            tc->getDTBPtr()->flushMvaAsid(mbits(newVal, 31, 12),
260                    bits(newVal, 7,0));
261            return;
262          case MISCREG_TLBIASIDIS:
263          case MISCREG_TLBIASID:
264            warn("Need to flush all TLBs in MP\n");
265            tc->getITBPtr()->flushAsid(bits(newVal, 7,0));
266            tc->getDTBPtr()->flushAsid(bits(newVal, 7,0));
267            return;
268          case MISCREG_TLBIMVAAIS:
269          case MISCREG_TLBIMVAA:
270            warn("Need to flush all TLBs in MP\n");
271            tc->getITBPtr()->flushMva(mbits(newVal, 31,12));
272            tc->getDTBPtr()->flushMva(mbits(newVal, 31,12));
273            return;
274          case MISCREG_ITLBIMVA:
275            tc->getITBPtr()->flushMvaAsid(mbits(newVal, 31, 12),
276                    bits(newVal, 7,0));
277            return;
278          case MISCREG_DTLBIMVA:
279            tc->getDTBPtr()->flushMvaAsid(mbits(newVal, 31, 12),
280                    bits(newVal, 7,0));
281            return;
282          case MISCREG_ITLBIASID:
283            tc->getITBPtr()->flushAsid(bits(newVal, 7,0));
284            return;
285          case MISCREG_DTLBIASID:
286            tc->getDTBPtr()->flushAsid(bits(newVal, 7,0));
287            return;
288        }
289    }
290    setMiscRegNoEffect(misc_reg, newVal);
291}
292
293}
294