1 /* 2 * qemu user cpu loop 3 * 4 * Copyright (c) 2003-2008 Fabrice Bellard 5 * 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 2 of the License, or 9 * (at your option) any later version. 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, see <http://www.gnu.org/licenses/>. 18 */ 19 20 #include "qemu/osdep.h" 21 #include "qemu-common.h" 22 #include "qemu.h" 23 #include "user-internals.h" 24 #include "cpu_loop-common.h" 25 #include "signal-common.h" 26 #include "qemu/guest-random.h" 27 #include "semihosting/common-semi.h" 28 #include "target/arm/syndrome.h" 29 30 #define get_user_code_u32(x, gaddr, env) \ 31 ({ abi_long __r = get_user_u32((x), (gaddr)); \ 32 if (!__r && bswap_code(arm_sctlr_b(env))) { \ 33 (x) = bswap32(x); \ 34 } \ 35 __r; \ 36 }) 37 38 #define get_user_code_u16(x, gaddr, env) \ 39 ({ abi_long __r = get_user_u16((x), (gaddr)); \ 40 if (!__r && bswap_code(arm_sctlr_b(env))) { \ 41 (x) = bswap16(x); \ 42 } \ 43 __r; \ 44 }) 45 46 #define get_user_data_u32(x, gaddr, env) \ 47 ({ abi_long __r = get_user_u32((x), (gaddr)); \ 48 if (!__r && arm_cpu_bswap_data(env)) { \ 49 (x) = bswap32(x); \ 50 } \ 51 __r; \ 52 }) 53 54 #define get_user_data_u16(x, gaddr, env) \ 55 ({ abi_long __r = get_user_u16((x), (gaddr)); \ 56 if (!__r && arm_cpu_bswap_data(env)) { \ 57 (x) = bswap16(x); \ 58 } \ 59 __r; \ 60 }) 61 62 #define put_user_data_u32(x, gaddr, env) \ 63 ({ typeof(x) __x = (x); \ 64 if (arm_cpu_bswap_data(env)) { \ 65 __x = bswap32(__x); \ 66 } \ 67 put_user_u32(__x, (gaddr)); \ 68 }) 69 70 #define put_user_data_u16(x, gaddr, env) \ 71 ({ typeof(x) __x = (x); \ 72 if (arm_cpu_bswap_data(env)) { \ 73 __x = bswap16(__x); \ 74 } \ 75 put_user_u16(__x, (gaddr)); \ 76 }) 77 78 /* AArch64 main loop */ 79 void cpu_loop(CPUARMState *env) 80 { 81 CPUState *cs = env_cpu(env); 82 int trapnr, ec, fsc; 83 abi_long ret; 84 target_siginfo_t info; 85 86 for (;;) { 87 cpu_exec_start(cs); 88 trapnr = cpu_exec(cs); 89 cpu_exec_end(cs); 90 process_queued_cpu_work(cs); 91 92 switch (trapnr) { 93 case EXCP_SWI: 94 ret = do_syscall(env, 95 env->xregs[8], 96 env->xregs[0], 97 env->xregs[1], 98 env->xregs[2], 99 env->xregs[3], 100 env->xregs[4], 101 env->xregs[5], 102 0, 0); 103 if (ret == -TARGET_ERESTARTSYS) { 104 env->pc -= 4; 105 } else if (ret != -TARGET_QEMU_ESIGRETURN) { 106 env->xregs[0] = ret; 107 } 108 break; 109 case EXCP_INTERRUPT: 110 /* just indicate that signals should be handled asap */ 111 break; 112 case EXCP_UDEF: 113 info.si_signo = TARGET_SIGILL; 114 info.si_errno = 0; 115 info.si_code = TARGET_ILL_ILLOPN; 116 info._sifields._sigfault._addr = env->pc; 117 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info); 118 break; 119 case EXCP_PREFETCH_ABORT: 120 case EXCP_DATA_ABORT: 121 info.si_signo = TARGET_SIGSEGV; 122 info.si_errno = 0; 123 info._sifields._sigfault._addr = env->exception.vaddress; 124 125 /* We should only arrive here with EC in {DATAABORT, INSNABORT}. */ 126 ec = syn_get_ec(env->exception.syndrome); 127 assert(ec == EC_DATAABORT || ec == EC_INSNABORT); 128 129 /* Both EC have the same format for FSC, or close enough. */ 130 fsc = extract32(env->exception.syndrome, 0, 6); 131 switch (fsc) { 132 case 0x04 ... 0x07: /* Translation fault, level {0-3} */ 133 info.si_code = TARGET_SEGV_MAPERR; 134 break; 135 case 0x09 ... 0x0b: /* Access flag fault, level {1-3} */ 136 case 0x0d ... 0x0f: /* Permission fault, level {1-3} */ 137 info.si_code = TARGET_SEGV_ACCERR; 138 break; 139 case 0x11: /* Synchronous Tag Check Fault */ 140 info.si_code = TARGET_SEGV_MTESERR; 141 break; 142 default: 143 g_assert_not_reached(); 144 } 145 146 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info); 147 break; 148 case EXCP_DEBUG: 149 case EXCP_BKPT: 150 info.si_signo = TARGET_SIGTRAP; 151 info.si_errno = 0; 152 info.si_code = TARGET_TRAP_BRKPT; 153 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info); 154 break; 155 case EXCP_SEMIHOST: 156 env->xregs[0] = do_common_semihosting(cs); 157 env->pc += 4; 158 break; 159 case EXCP_YIELD: 160 /* nothing to do here for user-mode, just resume guest code */ 161 break; 162 case EXCP_ATOMIC: 163 cpu_exec_step_atomic(cs); 164 break; 165 default: 166 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr); 167 abort(); 168 } 169 170 /* Check for MTE asynchronous faults */ 171 if (unlikely(env->cp15.tfsr_el[0])) { 172 env->cp15.tfsr_el[0] = 0; 173 info.si_signo = TARGET_SIGSEGV; 174 info.si_errno = 0; 175 info._sifields._sigfault._addr = 0; 176 info.si_code = TARGET_SEGV_MTEAERR; 177 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info); 178 } 179 180 process_pending_signals(env); 181 /* Exception return on AArch64 always clears the exclusive monitor, 182 * so any return to running guest code implies this. 183 */ 184 env->exclusive_addr = -1; 185 } 186 } 187 188 void target_cpu_copy_regs(CPUArchState *env, struct target_pt_regs *regs) 189 { 190 ARMCPU *cpu = env_archcpu(env); 191 CPUState *cs = env_cpu(env); 192 TaskState *ts = cs->opaque; 193 struct image_info *info = ts->info; 194 int i; 195 196 if (!(arm_feature(env, ARM_FEATURE_AARCH64))) { 197 fprintf(stderr, 198 "The selected ARM CPU does not support 64 bit mode\n"); 199 exit(EXIT_FAILURE); 200 } 201 202 for (i = 0; i < 31; i++) { 203 env->xregs[i] = regs->regs[i]; 204 } 205 env->pc = regs->pc; 206 env->xregs[31] = regs->sp; 207 #ifdef TARGET_WORDS_BIGENDIAN 208 env->cp15.sctlr_el[1] |= SCTLR_E0E; 209 for (i = 1; i < 4; ++i) { 210 env->cp15.sctlr_el[i] |= SCTLR_EE; 211 } 212 arm_rebuild_hflags(env); 213 #endif 214 215 if (cpu_isar_feature(aa64_pauth, cpu)) { 216 qemu_guest_getrandom_nofail(&env->keys, sizeof(env->keys)); 217 } 218 219 ts->stack_base = info->start_stack; 220 ts->heap_base = info->brk; 221 /* This will be filled in on the first SYS_HEAPINFO call. */ 222 ts->heap_limit = 0; 223 } 224