utility.cc revision 13999 
1/*
2 * Copyright (c) 2009-2014, 2016-2018 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: Ali Saidi
38 */
39
40#include "arch/arm/utility.hh"
41
42#include <memory>
43
44#include "arch/arm/faults.hh"
45#include "arch/arm/isa_traits.hh"
46#include "arch/arm/system.hh"
47#include "arch/arm/tlb.hh"
48#include "arch/arm/vtophys.hh"
49#include "cpu/base.hh"
50#include "cpu/checker/cpu.hh"
51#include "cpu/thread_context.hh"
52#include "mem/fs_translating_port_proxy.hh"
53#include "sim/full_system.hh"
54
55namespace ArmISA {
56
57void
58initCPU(ThreadContext *tc, int cpuId)
59{
60    // Reset CP15?? What does that mean -- ali
61
62    // FPEXC.EN = 0
63
64    static Fault reset = std::make_shared<Reset>();
65    reset->invoke(tc);
66}
67
68uint64_t
69getArgument(ThreadContext *tc, int &number, uint16_t size, bool fp)
70{
71    if (!FullSystem) {
72        panic("getArgument() only implemented for full system mode.\n");
73        M5_DUMMY_RETURN
74    }
75
76    if (fp)
77        panic("getArgument(): Floating point arguments not implemented\n");
78
79    if (inAArch64(tc)) {
80        if (size == (uint16_t)(-1))
81            size = sizeof(uint64_t);
82
83        if (number < 8 /*NumArgumentRegs64*/) {
84               return tc->readIntReg(number);
85        } else {
86            panic("getArgument(): No support reading stack args for AArch64\n");
87        }
88    } else {
89        if (size == (uint16_t)(-1))
90            // todo: should this not be sizeof(uint32_t) rather?
91            size = ArmISA::MachineBytes;
92
93        if (number < NumArgumentRegs) {
94            // If the argument is 64 bits, it must be in an even regiser
95            // number. Increment the number here if it isn't even.
96            if (size == sizeof(uint64_t)) {
97                if ((number % 2) != 0)
98                    number++;
99                // Read the two halves of the data. Number is inc here to
100                // get the second half of the 64 bit reg.
101                uint64_t tmp;
102                tmp = tc->readIntReg(number++);
103                tmp |= tc->readIntReg(number) << 32;
104                return tmp;
105            } else {
106               return tc->readIntReg(number);
107            }
108        } else {
109            Addr sp = tc->readIntReg(StackPointerReg);
110            FSTranslatingPortProxy &vp = tc->getVirtProxy();
111            uint64_t arg;
112            if (size == sizeof(uint64_t)) {
113                // If the argument is even it must be aligned
114                if ((number % 2) != 0)
115                    number++;
116                arg = vp.read<uint64_t>(sp +
117                        (number-NumArgumentRegs) * sizeof(uint32_t));
118                // since two 32 bit args == 1 64 bit arg, increment number
119                number++;
120            } else {
121                arg = vp.read<uint32_t>(sp +
122                               (number-NumArgumentRegs) * sizeof(uint32_t));
123            }
124            return arg;
125        }
126    }
127    panic("getArgument() should always return\n");
128}
129
130void
131skipFunction(ThreadContext *tc)
132{
133    PCState newPC = tc->pcState();
134    if (inAArch64(tc)) {
135        newPC.set(tc->readIntReg(INTREG_X30));
136    } else {
137        newPC.set(tc->readIntReg(ReturnAddressReg) & ~ULL(1));
138    }
139
140    CheckerCPU *checker = tc->getCheckerCpuPtr();
141    if (checker) {
142        tc->pcStateNoRecord(newPC);
143    } else {
144        tc->pcState(newPC);
145    }
146}
147
148static void
149copyVecRegs(ThreadContext *src, ThreadContext *dest)
150{
151    auto src_mode = RenameMode<ArmISA::ISA>::mode(src->pcState());
152
153    // The way vector registers are copied (VecReg vs VecElem) is relevant
154    // in the O3 model only.
155    if (src_mode == Enums::Full) {
156        for (auto idx = 0; idx < NumVecRegs; idx++)
157            dest->setVecRegFlat(idx, src->readVecRegFlat(idx));
158    } else {
159        for (auto idx = 0; idx < NumVecRegs; idx++)
160            for (auto elem_idx = 0; elem_idx < NumVecElemPerVecReg; elem_idx++)
161                dest->setVecElemFlat(
162                    idx, elem_idx, src->readVecElemFlat(idx, elem_idx));
163    }
164}
165
166void
167copyRegs(ThreadContext *src, ThreadContext *dest)
168{
169    for (int i = 0; i < NumIntRegs; i++)
170        dest->setIntRegFlat(i, src->readIntRegFlat(i));
171
172    for (int i = 0; i < NumFloatRegs; i++)
173        dest->setFloatRegFlat(i, src->readFloatRegFlat(i));
174
175    for (int i = 0; i < NumCCRegs; i++)
176        dest->setCCReg(i, src->readCCReg(i));
177
178    for (int i = 0; i < NumMiscRegs; i++)
179        dest->setMiscRegNoEffect(i, src->readMiscRegNoEffect(i));
180
181    copyVecRegs(src, dest);
182
183    // setMiscReg "with effect" will set the misc register mapping correctly.
184    // e.g. updateRegMap(val)
185    dest->setMiscReg(MISCREG_CPSR, src->readMiscRegNoEffect(MISCREG_CPSR));
186
187    // Copy over the PC State
188    dest->pcState(src->pcState());
189
190    // Invalidate the tlb misc register cache
191    dynamic_cast<TLB *>(dest->getITBPtr())->invalidateMiscReg();
192    dynamic_cast<TLB *>(dest->getDTBPtr())->invalidateMiscReg();
193}
194
195bool
196inSecureState(ThreadContext *tc)
197{
198    SCR scr = inAArch64(tc) ? tc->readMiscReg(MISCREG_SCR_EL3) :
199        tc->readMiscReg(MISCREG_SCR);
200    return ArmSystem::haveSecurity(tc) && inSecureState(
201        scr, tc->readMiscReg(MISCREG_CPSR));
202}
203
204inline bool
205isSecureBelowEL3(ThreadContext *tc)
206{
207    SCR scr = tc->readMiscReg(MISCREG_SCR_EL3);
208    return ArmSystem::haveEL(tc, EL3) && scr.ns == 0;
209}
210
211bool
212inAArch64(ThreadContext *tc)
213{
214    CPSR cpsr = tc->readMiscReg(MISCREG_CPSR);
215    return opModeIs64((OperatingMode) (uint8_t) cpsr.mode);
216}
217
218bool
219longDescFormatInUse(ThreadContext *tc)
220{
221    TTBCR ttbcr = tc->readMiscReg(MISCREG_TTBCR);
222    return ArmSystem::haveLPAE(tc) && ttbcr.eae;
223}
224
225RegVal
226readMPIDR(ArmSystem *arm_sys, ThreadContext *tc)
227{
228    CPSR cpsr = tc->readMiscReg(MISCREG_CPSR);
229    const ExceptionLevel current_el =
230        opModeToEL((OperatingMode) (uint8_t) cpsr.mode);
231
232    const bool is_secure = isSecureBelowEL3(tc);
233
234    switch (current_el) {
235      case EL0:
236        // Note: in MsrMrs instruction we read the register value before
237        // checking access permissions. This means that EL0 entry must
238        // be part of the table even if MPIDR is not accessible in user
239        // mode.
240        warn_once("Trying to read MPIDR at EL0\n");
241        M5_FALLTHROUGH;
242      case EL1:
243        if (ArmSystem::haveEL(tc, EL2) && !is_secure)
244            return tc->readMiscReg(MISCREG_VMPIDR_EL2);
245        else
246            return getMPIDR(arm_sys, tc);
247      case EL2:
248      case EL3:
249        return getMPIDR(arm_sys, tc);
250      default:
251        panic("Invalid EL for reading MPIDR register\n");
252    }
253}
254
255RegVal
256getMPIDR(ArmSystem *arm_sys, ThreadContext *tc)
257{
258    // Multiprocessor Affinity Register MPIDR from Cortex(tm)-A15 Technical
259    // Reference Manual
260    //
261    // bit   31 - Multi-processor extensions available
262    // bit   30 - Uni-processor system
263    // bit   24 - Multi-threaded cores
264    // bit 11-8 - Cluster ID
265    // bit  1-0 - CPU ID
266    //
267    // We deliberately extend both the Cluster ID and CPU ID fields to allow
268    // for simulation of larger systems
269    assert((0 <= tc->cpuId()) && (tc->cpuId() < 256));
270    assert(tc->socketId() < 65536);
271    if (arm_sys->multiThread) {
272       return 0x80000000 | // multiprocessor extensions available
273              0x01000000 | // multi-threaded cores
274              tc->contextId();
275    } else if (arm_sys->multiProc) {
276       return 0x80000000 | // multiprocessor extensions available
277              tc->cpuId() | tc->socketId() << 8;
278    } else {
279       return 0x80000000 |  // multiprocessor extensions available
280              0x40000000 |  // in up system
281              tc->cpuId() | tc->socketId() << 8;
282    }
283}
284
285bool
286ELIs64(ThreadContext *tc, ExceptionLevel el)
287{
288    return !ELIs32(tc, el);
289}
290
291bool
292ELIs32(ThreadContext *tc, ExceptionLevel el)
293{
294    bool known, aarch32;
295    std::tie(known, aarch32) = ELUsingAArch32K(tc, el);
296    panic_if(!known, "EL state is UNKNOWN");
297    return aarch32;
298}
299
300bool
301ELIsInHost(ThreadContext *tc, ExceptionLevel el)
302{
303    if (!ArmSystem::haveVirtualization(tc)) {
304        return false;
305    }
306    HCR hcr = tc->readMiscReg(MISCREG_HCR_EL2);
307    return (!isSecureBelowEL3(tc) && !ELIs32(tc, EL2) && hcr.e2h == 1 &&
308            (el == EL2 || (el == EL0 && hcr.tge == 1)));
309}
310
311std::pair<bool, bool>
312ELUsingAArch32K(ThreadContext *tc, ExceptionLevel el)
313{
314    // Return true if the specified EL is in aarch32 state.
315    const bool have_el3 = ArmSystem::haveSecurity(tc);
316    const bool have_el2 = ArmSystem::haveVirtualization(tc);
317
318    panic_if(el == EL2 && !have_el2, "Asking for EL2 when it doesn't exist");
319    panic_if(el == EL3 && !have_el3, "Asking for EL3 when it doesn't exist");
320
321    bool known, aarch32;
322    known = aarch32 = false;
323    if (ArmSystem::highestELIs64(tc) && ArmSystem::highestEL(tc) == el) {
324        // Target EL is the highest one in a system where
325        // the highest is using AArch64.
326        known = true; aarch32 = false;
327    } else if (!ArmSystem::highestELIs64(tc)) {
328        // All ELs are using AArch32:
329        known = true; aarch32 = true;
330    } else {
331        SCR scr = tc->readMiscReg(MISCREG_SCR_EL3);
332        bool aarch32_below_el3 = (have_el3 && scr.rw == 0);
333
334        HCR hcr = tc->readMiscReg(MISCREG_HCR_EL2);
335        bool aarch32_at_el1 = (aarch32_below_el3
336                               || (have_el2
337                               && !isSecureBelowEL3(tc) && hcr.rw == 0));
338
339        // Only know if EL0 using AArch32 from PSTATE
340        if (el == EL0 && !aarch32_at_el1) {
341            // EL0 controlled by PSTATE
342            CPSR cpsr = tc->readMiscReg(MISCREG_CPSR);
343
344            known = (cpsr.el == EL0);
345            aarch32 = (cpsr.width == 1);
346        } else {
347            known = true;
348            aarch32 = (aarch32_below_el3 && el != EL3)
349                      || (aarch32_at_el1 && (el == EL0 || el == EL1) );
350        }
351    }
352
353    return std::make_pair(known, aarch32);
354}
355
356bool
357isBigEndian64(ThreadContext *tc)
358{
359    switch (opModeToEL(currOpMode(tc))) {
360      case EL3:
361        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL3)).ee;
362      case EL2:
363        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL2)).ee;
364      case EL1:
365        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL1)).ee;
366      case EL0:
367        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL1)).e0e;
368      default:
369        panic("Invalid exception level");
370        break;
371    }
372}
373
374bool
375badMode32(ThreadContext *tc, OperatingMode mode)
376{
377    return unknownMode32(mode) || !ArmSystem::haveEL(tc, opModeToEL(mode));
378}
379
380bool
381badMode(ThreadContext *tc, OperatingMode mode)
382{
383    return unknownMode(mode) || !ArmSystem::haveEL(tc, opModeToEL(mode));
384}
385
386Addr
387purifyTaggedAddr(Addr addr, ThreadContext *tc, ExceptionLevel el,
388                 TTBCR tcr)
389{
390    switch (el) {
391      case EL0:
392      case EL1:
393        if (bits(addr, 55, 48) == 0xFF && tcr.tbi1)
394            return addr | mask(63, 55);
395        else if (!bits(addr, 55, 48) && tcr.tbi0)
396            return bits(addr,55, 0);
397        break;
398      case EL2:
399        assert(ArmSystem::haveVirtualization(tc));
400        tcr = tc->readMiscReg(MISCREG_TCR_EL2);
401        if (tcr.tbi)
402            return addr & mask(56);
403        break;
404      case EL3:
405        assert(ArmSystem::haveSecurity(tc));
406        if (tcr.tbi)
407            return addr & mask(56);
408        break;
409      default:
410        panic("Invalid exception level");
411        break;
412    }
413
414    return addr;  // Nothing to do if this is not a tagged address
415}
416
417Addr
418purifyTaggedAddr(Addr addr, ThreadContext *tc, ExceptionLevel el)
419{
420    TTBCR tcr;
421
422    switch (el) {
423      case EL0:
424      case EL1:
425        tcr = tc->readMiscReg(MISCREG_TCR_EL1);
426        if (bits(addr, 55, 48) == 0xFF && tcr.tbi1)
427            return addr | mask(63, 55);
428        else if (!bits(addr, 55, 48) && tcr.tbi0)
429            return bits(addr,55, 0);
430        break;
431      case EL2:
432        assert(ArmSystem::haveVirtualization(tc));
433        tcr = tc->readMiscReg(MISCREG_TCR_EL2);
434        if (tcr.tbi)
435            return addr & mask(56);
436        break;
437      case EL3:
438        assert(ArmSystem::haveSecurity(tc));
439        tcr = tc->readMiscReg(MISCREG_TCR_EL3);
440        if (tcr.tbi)
441            return addr & mask(56);
442        break;
443      default:
444        panic("Invalid exception level");
445        break;
446    }
447
448    return addr;  // Nothing to do if this is not a tagged address
449}
450
451Addr
452truncPage(Addr addr)
453{
454    return addr & ~(PageBytes - 1);
455}
456
457Addr
458roundPage(Addr addr)
459{
460    return (addr + PageBytes - 1) & ~(PageBytes - 1);
461}
462
463bool
464mcrMrc15TrapToHyp(const MiscRegIndex miscReg, ThreadContext *tc, uint32_t iss)
465{
466    bool        isRead;
467    uint32_t    crm;
468    IntRegIndex rt;
469    uint32_t    crn;
470    uint32_t    opc1;
471    uint32_t    opc2;
472    bool        trapToHype = false;
473
474    const CPSR cpsr = tc->readMiscReg(MISCREG_CPSR);
475    const HCR hcr = tc->readMiscReg(MISCREG_HCR);
476    const SCR scr = tc->readMiscReg(MISCREG_SCR);
477    const HDCR hdcr = tc->readMiscReg(MISCREG_HDCR);
478    const HSTR hstr = tc->readMiscReg(MISCREG_HSTR);
479    const HCPTR hcptr = tc->readMiscReg(MISCREG_HCPTR);
480
481    if (!inSecureState(scr, cpsr) && (cpsr.mode != MODE_HYP)) {
482        mcrMrcIssExtract(iss, isRead, crm, rt, crn, opc1, opc2);
483        trapToHype  = ((uint32_t) hstr) & (1 << crn);
484        trapToHype |= hdcr.tpm  && (crn == 9) && (crm >= 12);
485        trapToHype |= hcr.tidcp && (
486            ((crn ==  9) && ((crm <= 2) || ((crm >= 5) && (crm <= 8)))) ||
487            ((crn == 10) && ((crm <= 1) ||  (crm == 4) || (crm == 8)))  ||
488            ((crn == 11) && ((crm <= 8) ||  (crm == 15)))               );
489
490        if (!trapToHype) {
491            switch (unflattenMiscReg(miscReg)) {
492              case MISCREG_CPACR:
493                trapToHype = hcptr.tcpac;
494                break;
495              case MISCREG_REVIDR:
496              case MISCREG_TCMTR:
497              case MISCREG_TLBTR:
498              case MISCREG_AIDR:
499                trapToHype = hcr.tid1;
500                break;
501              case MISCREG_CTR:
502              case MISCREG_CCSIDR:
503              case MISCREG_CLIDR:
504              case MISCREG_CSSELR:
505                trapToHype = hcr.tid2;
506                break;
507              case MISCREG_ID_PFR0:
508              case MISCREG_ID_PFR1:
509              case MISCREG_ID_DFR0:
510              case MISCREG_ID_AFR0:
511              case MISCREG_ID_MMFR0:
512              case MISCREG_ID_MMFR1:
513              case MISCREG_ID_MMFR2:
514              case MISCREG_ID_MMFR3:
515              case MISCREG_ID_ISAR0:
516              case MISCREG_ID_ISAR1:
517              case MISCREG_ID_ISAR2:
518              case MISCREG_ID_ISAR3:
519              case MISCREG_ID_ISAR4:
520              case MISCREG_ID_ISAR5:
521                trapToHype = hcr.tid3;
522                break;
523              case MISCREG_DCISW:
524              case MISCREG_DCCSW:
525              case MISCREG_DCCISW:
526                trapToHype = hcr.tsw;
527                break;
528              case MISCREG_DCIMVAC:
529              case MISCREG_DCCIMVAC:
530              case MISCREG_DCCMVAC:
531                trapToHype = hcr.tpc;
532                break;
533              case MISCREG_ICIMVAU:
534              case MISCREG_ICIALLU:
535              case MISCREG_ICIALLUIS:
536              case MISCREG_DCCMVAU:
537                trapToHype = hcr.tpu;
538                break;
539              case MISCREG_TLBIALLIS:
540              case MISCREG_TLBIMVAIS:
541              case MISCREG_TLBIASIDIS:
542              case MISCREG_TLBIMVAAIS:
543              case MISCREG_TLBIMVALIS:
544              case MISCREG_TLBIMVAALIS:
545              case MISCREG_DTLBIALL:
546              case MISCREG_ITLBIALL:
547              case MISCREG_DTLBIMVA:
548              case MISCREG_ITLBIMVA:
549              case MISCREG_DTLBIASID:
550              case MISCREG_ITLBIASID:
551              case MISCREG_TLBIMVAA:
552              case MISCREG_TLBIALL:
553              case MISCREG_TLBIMVA:
554              case MISCREG_TLBIMVAL:
555              case MISCREG_TLBIMVAAL:
556              case MISCREG_TLBIASID:
557                trapToHype = hcr.ttlb;
558                break;
559              case MISCREG_ACTLR:
560                trapToHype = hcr.tac;
561                break;
562              case MISCREG_SCTLR:
563              case MISCREG_TTBR0:
564              case MISCREG_TTBR1:
565              case MISCREG_TTBCR:
566              case MISCREG_DACR:
567              case MISCREG_DFSR:
568              case MISCREG_IFSR:
569              case MISCREG_DFAR:
570              case MISCREG_IFAR:
571              case MISCREG_ADFSR:
572              case MISCREG_AIFSR:
573              case MISCREG_PRRR:
574              case MISCREG_NMRR:
575              case MISCREG_MAIR0:
576              case MISCREG_MAIR1:
577              case MISCREG_CONTEXTIDR:
578                trapToHype = hcr.tvm & !isRead;
579                break;
580              case MISCREG_PMCR:
581                trapToHype = hdcr.tpmcr;
582                break;
583              // No default action needed
584              default:
585                break;
586            }
587        }
588    }
589    return trapToHype;
590}
591
592
593bool
594mcrMrc14TrapToHyp(const MiscRegIndex miscReg, HCR hcr, CPSR cpsr, SCR scr,
595                  HDCR hdcr, HSTR hstr, HCPTR hcptr, uint32_t iss)
596{
597    bool        isRead;
598    uint32_t    crm;
599    IntRegIndex rt;
600    uint32_t    crn;
601    uint32_t    opc1;
602    uint32_t    opc2;
603    bool        trapToHype = false;
604
605    if (!inSecureState(scr, cpsr) && (cpsr.mode != MODE_HYP)) {
606        mcrMrcIssExtract(iss, isRead, crm, rt, crn, opc1, opc2);
607        inform("trap check M:%x N:%x 1:%x 2:%x hdcr %x, hcptr %x, hstr %x\n",
608                crm, crn, opc1, opc2, hdcr, hcptr, hstr);
609        trapToHype  = hdcr.tda  && (opc1 == 0);
610        trapToHype |= hcptr.tta && (opc1 == 1);
611        if (!trapToHype) {
612            switch (unflattenMiscReg(miscReg)) {
613              case MISCREG_DBGOSLSR:
614              case MISCREG_DBGOSLAR:
615              case MISCREG_DBGOSDLR:
616              case MISCREG_DBGPRCR:
617                trapToHype = hdcr.tdosa;
618                break;
619              case MISCREG_DBGDRAR:
620              case MISCREG_DBGDSAR:
621                trapToHype = hdcr.tdra;
622                break;
623              case MISCREG_JIDR:
624                trapToHype = hcr.tid0;
625                break;
626              case MISCREG_JOSCR:
627              case MISCREG_JMCR:
628                trapToHype = hstr.tjdbx;
629                break;
630              case MISCREG_TEECR:
631              case MISCREG_TEEHBR:
632                trapToHype = hstr.ttee;
633                break;
634              // No default action needed
635              default:
636                break;
637            }
638        }
639    }
640    return trapToHype;
641}
642
643bool
644mcrrMrrc15TrapToHyp(const MiscRegIndex miscReg, CPSR cpsr, SCR scr, HSTR hstr,
645                    HCR hcr, uint32_t iss)
646{
647    uint32_t    crm;
648    IntRegIndex rt;
649    uint32_t    crn;
650    uint32_t    opc1;
651    uint32_t    opc2;
652    bool        isRead;
653    bool        trapToHype = false;
654
655    if (!inSecureState(scr, cpsr) && (cpsr.mode != MODE_HYP)) {
656        // This is technically the wrong function, but we can re-use it for
657        // the moment because we only need one field, which overlaps with the
658        // mcrmrc layout
659        mcrMrcIssExtract(iss, isRead, crm, rt, crn, opc1, opc2);
660        trapToHype = ((uint32_t) hstr) & (1 << crm);
661
662        if (!trapToHype) {
663            switch (unflattenMiscReg(miscReg)) {
664              case MISCREG_SCTLR:
665              case MISCREG_TTBR0:
666              case MISCREG_TTBR1:
667              case MISCREG_TTBCR:
668              case MISCREG_DACR:
669              case MISCREG_DFSR:
670              case MISCREG_IFSR:
671              case MISCREG_DFAR:
672              case MISCREG_IFAR:
673              case MISCREG_ADFSR:
674              case MISCREG_AIFSR:
675              case MISCREG_PRRR:
676              case MISCREG_NMRR:
677              case MISCREG_MAIR0:
678              case MISCREG_MAIR1:
679              case MISCREG_CONTEXTIDR:
680                trapToHype = hcr.tvm & !isRead;
681                break;
682              // No default action needed
683              default:
684                break;
685            }
686        }
687    }
688    return trapToHype;
689}
690
691bool
692decodeMrsMsrBankedReg(uint8_t sysM, bool r, bool &isIntReg, int &regIdx,
693                      CPSR cpsr, SCR scr, NSACR nsacr, bool checkSecurity)
694{
695    OperatingMode mode = MODE_UNDEFINED;
696    bool          ok = true;
697
698    // R mostly indicates if its a int register or a misc reg, we override
699    // below if the few corner cases
700    isIntReg = !r;
701    // Loosely based on ARM ARM issue C section B9.3.10
702    if (r) {
703        switch (sysM)
704        {
705          case 0xE:
706            regIdx = MISCREG_SPSR_FIQ;
707            mode   = MODE_FIQ;
708            break;
709          case 0x10:
710            regIdx = MISCREG_SPSR_IRQ;
711            mode   = MODE_IRQ;
712            break;
713          case 0x12:
714            regIdx = MISCREG_SPSR_SVC;
715            mode   = MODE_SVC;
716            break;
717          case 0x14:
718            regIdx = MISCREG_SPSR_ABT;
719            mode   = MODE_ABORT;
720            break;
721          case 0x16:
722            regIdx = MISCREG_SPSR_UND;
723            mode   = MODE_UNDEFINED;
724            break;
725          case 0x1C:
726            regIdx = MISCREG_SPSR_MON;
727            mode   = MODE_MON;
728            break;
729          case 0x1E:
730            regIdx = MISCREG_SPSR_HYP;
731            mode   = MODE_HYP;
732            break;
733          default:
734            ok = false;
735            break;
736        }
737    } else {
738        int sysM4To3 = bits(sysM, 4, 3);
739
740        if (sysM4To3 == 0) {
741            mode = MODE_USER;
742            regIdx = intRegInMode(mode, bits(sysM, 2, 0) + 8);
743        } else if (sysM4To3 == 1) {
744            mode = MODE_FIQ;
745            regIdx = intRegInMode(mode, bits(sysM, 2, 0) + 8);
746        } else if (sysM4To3 == 3) {
747            if (bits(sysM, 1) == 0) {
748                mode = MODE_MON;
749                regIdx = intRegInMode(mode, 14 - bits(sysM, 0));
750            } else {
751                mode = MODE_HYP;
752                if (bits(sysM, 0) == 1) {
753                    regIdx = intRegInMode(mode, 13); // R13 in HYP
754                } else {
755                    isIntReg = false;
756                    regIdx   = MISCREG_ELR_HYP;
757                }
758            }
759        } else { // Other Banked registers
760            int sysM2 = bits(sysM, 2);
761            int sysM1 = bits(sysM, 1);
762
763            mode  = (OperatingMode) ( ((sysM2 ||  sysM1) << 0) |
764                                      (1                 << 1) |
765                                      ((sysM2 && !sysM1) << 2) |
766                                      ((sysM2 &&  sysM1) << 3) |
767                                      (1                 << 4) );
768            regIdx = intRegInMode(mode, 14 - bits(sysM, 0));
769            // Don't flatten the register here. This is going to go through
770            // setIntReg() which will do the flattening
771            ok &= mode != cpsr.mode;
772        }
773    }
774
775    // Check that the requested register is accessable from the current mode
776    if (ok && checkSecurity && mode != cpsr.mode) {
777        switch (cpsr.mode)
778        {
779          case MODE_USER:
780            ok = false;
781            break;
782          case MODE_FIQ:
783            ok &=  mode != MODE_HYP;
784            ok &= (mode != MODE_MON) || !scr.ns;
785            break;
786          case MODE_HYP:
787            ok &=  mode != MODE_MON;
788            ok &= (mode != MODE_FIQ) || !nsacr.rfr;
789            break;
790          case MODE_IRQ:
791          case MODE_SVC:
792          case MODE_ABORT:
793          case MODE_UNDEFINED:
794          case MODE_SYSTEM:
795            ok &=  mode != MODE_HYP;
796            ok &= (mode != MODE_MON) || !scr.ns;
797            ok &= (mode != MODE_FIQ) || !nsacr.rfr;
798            break;
799          // can access everything, no further checks required
800          case MODE_MON:
801            break;
802          default:
803            panic("unknown Mode 0x%x\n", cpsr.mode);
804            break;
805        }
806    }
807    return (ok);
808}
809
810bool
811SPAlignmentCheckEnabled(ThreadContext* tc)
812{
813    switch (opModeToEL(currOpMode(tc))) {
814      case EL3:
815        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL3)).sa;
816      case EL2:
817        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL2)).sa;
818      case EL1:
819        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL1)).sa;
820      case EL0:
821        return ((SCTLR) tc->readMiscReg(MISCREG_SCTLR_EL1)).sa0;
822      default:
823        panic("Invalid exception level");
824        break;
825    }
826}
827
828int
829decodePhysAddrRange64(uint8_t pa_enc)
830{
831    switch (pa_enc) {
832      case 0x0:
833        return 32;
834      case 0x1:
835        return 36;
836      case 0x2:
837        return 40;
838      case 0x3:
839        return 42;
840      case 0x4:
841        return 44;
842      case 0x5:
843      case 0x6:
844      case 0x7:
845        return 48;
846      default:
847        panic("Invalid phys. address range encoding");
848    }
849}
850
851uint8_t
852encodePhysAddrRange64(int pa_size)
853{
854    switch (pa_size) {
855      case 32:
856        return 0x0;
857      case 36:
858        return 0x1;
859      case 40:
860        return 0x2;
861      case 42:
862        return 0x3;
863      case 44:
864        return 0x4;
865      case 48:
866        return 0x5;
867      default:
868        panic("Invalid phys. address range");
869    }
870}
871
872} // namespace ArmISA
873