]> git.proxmox.com Git - mirror_qemu.git/blame - linux-user/main.c
Fix input-linux reading from device
[mirror_qemu.git] / linux-user / main.c
CommitLineData
31e31b8a 1/*
93ac68bc 2 * qemu user main
5fafdf24 3 *
68d0f70e 4 * Copyright (c) 2003-2008 Fabrice Bellard
31e31b8a
FB
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
8167ee88 17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
31e31b8a 18 */
d39594e9 19#include "qemu/osdep.h"
67a1de0d 20#include "qemu-version.h"
edf8e2af 21#include <sys/syscall.h>
703e0e89 22#include <sys/resource.h>
31e31b8a 23
daa76aa4 24#include "qapi/error.h"
3ef693a0 25#include "qemu.h"
f348b6d1 26#include "qemu/path.h"
6533dd6e 27#include "qemu/config-file.h"
f348b6d1
VB
28#include "qemu/cutils.h"
29#include "qemu/help_option.h"
2b41f10e 30#include "cpu.h"
63c91552 31#include "exec/exec-all.h"
9002ec79 32#include "tcg.h"
1de7afc9
PB
33#include "qemu/timer.h"
34#include "qemu/envlist.h"
d8fd2954 35#include "elf.h"
508127e2 36#include "exec/log.h"
6533dd6e
LV
37#include "trace/control.h"
38#include "glib-compat.h"
04a6dfeb 39
d088d664
AJ
40char *exec_path;
41
1b530a6d 42int singlestep;
8cb76755
SW
43static const char *filename;
44static const char *argv0;
45static int gdbstub_port;
46static envlist_t *envlist;
51fb256a 47static const char *cpu_model;
379f6698
PB
48unsigned long mmap_min_addr;
49unsigned long guest_base;
50int have_guest_base;
120a9848
PB
51
52#define EXCP_DUMP(env, fmt, ...) \
53do { \
54 CPUState *cs = ENV_GET_CPU(env); \
55 fprintf(stderr, fmt , ## __VA_ARGS__); \
56 cpu_dump_state(cs, stderr, fprintf, 0); \
57 if (qemu_log_separate()) { \
58 qemu_log(fmt, ## __VA_ARGS__); \
59 log_cpu_state(cs, 0); \
60 } \
61} while (0)
62
288e65b9
AG
63#if (TARGET_LONG_BITS == 32) && (HOST_LONG_BITS == 64)
64/*
65 * When running 32-on-64 we should make sure we can fit all of the possible
66 * guest address space into a contiguous chunk of virtual host memory.
67 *
68 * This way we will never overlap with our own libraries or binaries or stack
69 * or anything else that QEMU maps.
70 */
a0a839b6
MV
71# if defined(TARGET_MIPS) || defined(TARGET_NIOS2)
72/*
73 * MIPS only supports 31 bits of virtual address space for user space.
74 * Nios2 also only supports 31 bits.
75 */
314992b1
AG
76unsigned long reserved_va = 0x77000000;
77# else
288e65b9 78unsigned long reserved_va = 0xf7000000;
314992b1 79# endif
288e65b9 80#else
68a1c816 81unsigned long reserved_va;
379f6698 82#endif
1b530a6d 83
d03f9c32 84static void usage(int exitcode);
fc9c5412 85
7ee2822c 86static const char *interp_prefix = CONFIG_QEMU_INTERP_PREFIX;
e586822a 87const char *qemu_uname_release;
586314f2 88
9de5e440
FB
89/* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
90 we allocate a bigger stack. Need a better solution, for example
91 by remapping the process stack directly at the right place */
703e0e89 92unsigned long guest_stack_size = 8 * 1024 * 1024UL;
31e31b8a
FB
93
94void gemu_log(const char *fmt, ...)
95{
96 va_list ap;
97
98 va_start(ap, fmt);
99 vfprintf(stderr, fmt, ap);
100 va_end(ap);
101}
102
8fcd3692 103#if defined(TARGET_I386)
05390248 104int cpu_get_pic_interrupt(CPUX86State *env)
92ccca6a
FB
105{
106 return -1;
107}
8fcd3692 108#endif
92ccca6a 109
d5975363
PB
110/***********************************************************/
111/* Helper routines for implementing atomic operations. */
112
d5975363
PB
113/* Make sure everything is in a consistent state for calling fork(). */
114void fork_start(void)
115{
267f685b 116 cpu_list_lock();
677ef623 117 qemu_mutex_lock(&tcg_ctx.tb_ctx.tb_lock);
d032d1b4 118 mmap_fork_start();
d5975363
PB
119}
120
121void fork_end(int child)
122{
d032d1b4 123 mmap_fork_end(child);
d5975363 124 if (child) {
bdc44640 125 CPUState *cpu, *next_cpu;
d5975363
PB
126 /* Child processes created by fork() only have a single thread.
127 Discard information about the parent threads. */
bdc44640
AF
128 CPU_FOREACH_SAFE(cpu, next_cpu) {
129 if (cpu != thread_cpu) {
014628a7 130 QTAILQ_REMOVE(&cpus, cpu, node);
bdc44640
AF
131 }
132 }
677ef623 133 qemu_mutex_init(&tcg_ctx.tb_ctx.tb_lock);
267f685b 134 qemu_init_cpu_list();
f7ec7f7b 135 gdbserver_fork(thread_cpu);
d5975363 136 } else {
677ef623 137 qemu_mutex_unlock(&tcg_ctx.tb_ctx.tb_lock);
267f685b 138 cpu_list_unlock();
d5975363 139 }
d5975363
PB
140}
141
a541f297
FB
142#ifdef TARGET_I386
143/***********************************************************/
144/* CPUX86 core interface */
145
28ab0e2e
FB
146uint64_t cpu_get_tsc(CPUX86State *env)
147{
4a7428c5 148 return cpu_get_host_ticks();
28ab0e2e
FB
149}
150
5fafdf24 151static void write_dt(void *ptr, unsigned long addr, unsigned long limit,
f4beb510 152 int flags)
6dbad63e 153{
f4beb510 154 unsigned int e1, e2;
53a5960a 155 uint32_t *p;
6dbad63e
FB
156 e1 = (addr << 16) | (limit & 0xffff);
157 e2 = ((addr >> 16) & 0xff) | (addr & 0xff000000) | (limit & 0x000f0000);
f4beb510 158 e2 |= flags;
53a5960a 159 p = ptr;
d538e8f5 160 p[0] = tswap32(e1);
161 p[1] = tswap32(e2);
f4beb510
FB
162}
163
e441570f 164static uint64_t *idt_table;
eb38c52c 165#ifdef TARGET_X86_64
d2fd1af7
FB
166static void set_gate64(void *ptr, unsigned int type, unsigned int dpl,
167 uint64_t addr, unsigned int sel)
f4beb510 168{
4dbc422b 169 uint32_t *p, e1, e2;
f4beb510
FB
170 e1 = (addr & 0xffff) | (sel << 16);
171 e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
53a5960a 172 p = ptr;
4dbc422b
FB
173 p[0] = tswap32(e1);
174 p[1] = tswap32(e2);
175 p[2] = tswap32(addr >> 32);
176 p[3] = 0;
6dbad63e 177}
d2fd1af7
FB
178/* only dpl matters as we do only user space emulation */
179static void set_idt(int n, unsigned int dpl)
180{
181 set_gate64(idt_table + n * 2, 0, dpl, 0, 0);
182}
183#else
d2fd1af7
FB
184static void set_gate(void *ptr, unsigned int type, unsigned int dpl,
185 uint32_t addr, unsigned int sel)
186{
4dbc422b 187 uint32_t *p, e1, e2;
d2fd1af7
FB
188 e1 = (addr & 0xffff) | (sel << 16);
189 e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
190 p = ptr;
4dbc422b
FB
191 p[0] = tswap32(e1);
192 p[1] = tswap32(e2);
d2fd1af7
FB
193}
194
f4beb510
FB
195/* only dpl matters as we do only user space emulation */
196static void set_idt(int n, unsigned int dpl)
197{
198 set_gate(idt_table + n, 0, dpl, 0, 0);
199}
d2fd1af7 200#endif
31e31b8a 201
89e957e7 202void cpu_loop(CPUX86State *env)
1b6b029e 203{
db6b81d4 204 CPUState *cs = CPU(x86_env_get_cpu(env));
bc8a22cc 205 int trapnr;
992f48a0 206 abi_ulong pc;
0284b03b 207 abi_ulong ret;
c227f099 208 target_siginfo_t info;
851e67a1 209
1b6b029e 210 for(;;) {
b040bc9c 211 cpu_exec_start(cs);
8642c1b8 212 trapnr = cpu_exec(cs);
b040bc9c 213 cpu_exec_end(cs);
d148d90e
SF
214 process_queued_cpu_work(cs);
215
bc8a22cc 216 switch(trapnr) {
f4beb510 217 case 0x80:
d2fd1af7 218 /* linux syscall from int $0x80 */
0284b03b
TB
219 ret = do_syscall(env,
220 env->regs[R_EAX],
221 env->regs[R_EBX],
222 env->regs[R_ECX],
223 env->regs[R_EDX],
224 env->regs[R_ESI],
225 env->regs[R_EDI],
226 env->regs[R_EBP],
227 0, 0);
228 if (ret == -TARGET_ERESTARTSYS) {
229 env->eip -= 2;
230 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
231 env->regs[R_EAX] = ret;
232 }
f4beb510 233 break;
d2fd1af7
FB
234#ifndef TARGET_ABI32
235 case EXCP_SYSCALL:
5ba18547 236 /* linux syscall from syscall instruction */
0284b03b
TB
237 ret = do_syscall(env,
238 env->regs[R_EAX],
239 env->regs[R_EDI],
240 env->regs[R_ESI],
241 env->regs[R_EDX],
242 env->regs[10],
243 env->regs[8],
244 env->regs[9],
245 0, 0);
246 if (ret == -TARGET_ERESTARTSYS) {
247 env->eip -= 2;
248 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
249 env->regs[R_EAX] = ret;
250 }
d2fd1af7
FB
251 break;
252#endif
f4beb510
FB
253 case EXCP0B_NOSEG:
254 case EXCP0C_STACK:
a86b3c64 255 info.si_signo = TARGET_SIGBUS;
f4beb510
FB
256 info.si_errno = 0;
257 info.si_code = TARGET_SI_KERNEL;
258 info._sifields._sigfault._addr = 0;
9d2803f7 259 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
f4beb510 260 break;
1b6b029e 261 case EXCP0D_GPF:
d2fd1af7 262 /* XXX: potential problem if ABI32 */
84409ddb 263#ifndef TARGET_X86_64
851e67a1 264 if (env->eflags & VM_MASK) {
89e957e7 265 handle_vm86_fault(env);
84409ddb
JM
266 } else
267#endif
268 {
a86b3c64 269 info.si_signo = TARGET_SIGSEGV;
f4beb510
FB
270 info.si_errno = 0;
271 info.si_code = TARGET_SI_KERNEL;
272 info._sifields._sigfault._addr = 0;
9d2803f7 273 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1b6b029e
FB
274 }
275 break;
b689bc57 276 case EXCP0E_PAGE:
a86b3c64 277 info.si_signo = TARGET_SIGSEGV;
b689bc57
FB
278 info.si_errno = 0;
279 if (!(env->error_code & 1))
280 info.si_code = TARGET_SEGV_MAPERR;
281 else
282 info.si_code = TARGET_SEGV_ACCERR;
970a87a6 283 info._sifields._sigfault._addr = env->cr[2];
9d2803f7 284 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
b689bc57 285 break;
9de5e440 286 case EXCP00_DIVZ:
84409ddb 287#ifndef TARGET_X86_64
bc8a22cc 288 if (env->eflags & VM_MASK) {
447db213 289 handle_vm86_trap(env, trapnr);
84409ddb
JM
290 } else
291#endif
292 {
bc8a22cc 293 /* division by zero */
a86b3c64 294 info.si_signo = TARGET_SIGFPE;
bc8a22cc
FB
295 info.si_errno = 0;
296 info.si_code = TARGET_FPE_INTDIV;
297 info._sifields._sigfault._addr = env->eip;
9d2803f7 298 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
bc8a22cc 299 }
9de5e440 300 break;
01df040b 301 case EXCP01_DB:
447db213 302 case EXCP03_INT3:
84409ddb 303#ifndef TARGET_X86_64
447db213
FB
304 if (env->eflags & VM_MASK) {
305 handle_vm86_trap(env, trapnr);
84409ddb
JM
306 } else
307#endif
308 {
a86b3c64 309 info.si_signo = TARGET_SIGTRAP;
447db213 310 info.si_errno = 0;
01df040b 311 if (trapnr == EXCP01_DB) {
447db213
FB
312 info.si_code = TARGET_TRAP_BRKPT;
313 info._sifields._sigfault._addr = env->eip;
314 } else {
315 info.si_code = TARGET_SI_KERNEL;
316 info._sifields._sigfault._addr = 0;
317 }
9d2803f7 318 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
447db213
FB
319 }
320 break;
9de5e440
FB
321 case EXCP04_INTO:
322 case EXCP05_BOUND:
84409ddb 323#ifndef TARGET_X86_64
bc8a22cc 324 if (env->eflags & VM_MASK) {
447db213 325 handle_vm86_trap(env, trapnr);
84409ddb
JM
326 } else
327#endif
328 {
a86b3c64 329 info.si_signo = TARGET_SIGSEGV;
bc8a22cc 330 info.si_errno = 0;
b689bc57 331 info.si_code = TARGET_SI_KERNEL;
bc8a22cc 332 info._sifields._sigfault._addr = 0;
9d2803f7 333 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
bc8a22cc 334 }
9de5e440
FB
335 break;
336 case EXCP06_ILLOP:
a86b3c64 337 info.si_signo = TARGET_SIGILL;
9de5e440
FB
338 info.si_errno = 0;
339 info.si_code = TARGET_ILL_ILLOPN;
340 info._sifields._sigfault._addr = env->eip;
9d2803f7 341 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
9de5e440
FB
342 break;
343 case EXCP_INTERRUPT:
344 /* just indicate that signals should be handled asap */
345 break;
1fddef4b
FB
346 case EXCP_DEBUG:
347 {
348 int sig;
349
db6b81d4 350 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
1fddef4b
FB
351 if (sig)
352 {
353 info.si_signo = sig;
354 info.si_errno = 0;
355 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 356 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1fddef4b
FB
357 }
358 }
359 break;
fdbc2b57
RH
360 case EXCP_ATOMIC:
361 cpu_exec_step_atomic(cs);
362 break;
1b6b029e 363 default:
970a87a6 364 pc = env->segs[R_CS].base + env->eip;
120a9848
PB
365 EXCP_DUMP(env, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
366 (long)pc, trapnr);
1b6b029e
FB
367 abort();
368 }
66fb9763 369 process_pending_signals(env);
1b6b029e
FB
370 }
371}
b346ff46
FB
372#endif
373
374#ifdef TARGET_ARM
375
49017bd8 376#define get_user_code_u32(x, gaddr, env) \
d8fd2954 377 ({ abi_long __r = get_user_u32((x), (gaddr)); \
f9fd40eb 378 if (!__r && bswap_code(arm_sctlr_b(env))) { \
d8fd2954
PB
379 (x) = bswap32(x); \
380 } \
381 __r; \
382 })
383
49017bd8 384#define get_user_code_u16(x, gaddr, env) \
d8fd2954 385 ({ abi_long __r = get_user_u16((x), (gaddr)); \
f9fd40eb 386 if (!__r && bswap_code(arm_sctlr_b(env))) { \
d8fd2954
PB
387 (x) = bswap16(x); \
388 } \
389 __r; \
390 })
391
c3ae85fc
PB
392#define get_user_data_u32(x, gaddr, env) \
393 ({ abi_long __r = get_user_u32((x), (gaddr)); \
394 if (!__r && arm_cpu_bswap_data(env)) { \
395 (x) = bswap32(x); \
396 } \
397 __r; \
398 })
399
400#define get_user_data_u16(x, gaddr, env) \
401 ({ abi_long __r = get_user_u16((x), (gaddr)); \
402 if (!__r && arm_cpu_bswap_data(env)) { \
403 (x) = bswap16(x); \
404 } \
405 __r; \
406 })
407
408#define put_user_data_u32(x, gaddr, env) \
409 ({ typeof(x) __x = (x); \
410 if (arm_cpu_bswap_data(env)) { \
411 __x = bswap32(__x); \
412 } \
413 put_user_u32(__x, (gaddr)); \
414 })
415
416#define put_user_data_u16(x, gaddr, env) \
417 ({ typeof(x) __x = (x); \
418 if (arm_cpu_bswap_data(env)) { \
419 __x = bswap16(__x); \
420 } \
421 put_user_u16(__x, (gaddr)); \
422 })
423
1861c454
PM
424#ifdef TARGET_ABI32
425/* Commpage handling -- there is no commpage for AArch64 */
426
97cc7560
DDAG
427/*
428 * See the Linux kernel's Documentation/arm/kernel_user_helpers.txt
429 * Input:
430 * r0 = pointer to oldval
431 * r1 = pointer to newval
432 * r2 = pointer to target value
433 *
434 * Output:
435 * r0 = 0 if *ptr was changed, non-0 if no exchange happened
436 * C set if *ptr was changed, clear if no exchange happened
437 *
438 * Note segv's in kernel helpers are a bit tricky, we can set the
439 * data address sensibly but the PC address is just the entry point.
440 */
441static void arm_kernel_cmpxchg64_helper(CPUARMState *env)
442{
443 uint64_t oldval, newval, val;
444 uint32_t addr, cpsr;
445 target_siginfo_t info;
446
447 /* Based on the 32 bit code in do_kernel_trap */
448
449 /* XXX: This only works between threads, not between processes.
450 It's probably possible to implement this with native host
451 operations. However things like ldrex/strex are much harder so
452 there's not much point trying. */
453 start_exclusive();
454 cpsr = cpsr_read(env);
455 addr = env->regs[2];
456
457 if (get_user_u64(oldval, env->regs[0])) {
abf1172f 458 env->exception.vaddress = env->regs[0];
97cc7560
DDAG
459 goto segv;
460 };
461
462 if (get_user_u64(newval, env->regs[1])) {
abf1172f 463 env->exception.vaddress = env->regs[1];
97cc7560
DDAG
464 goto segv;
465 };
466
467 if (get_user_u64(val, addr)) {
abf1172f 468 env->exception.vaddress = addr;
97cc7560
DDAG
469 goto segv;
470 }
471
472 if (val == oldval) {
473 val = newval;
474
475 if (put_user_u64(val, addr)) {
abf1172f 476 env->exception.vaddress = addr;
97cc7560
DDAG
477 goto segv;
478 };
479
480 env->regs[0] = 0;
481 cpsr |= CPSR_C;
482 } else {
483 env->regs[0] = -1;
484 cpsr &= ~CPSR_C;
485 }
50866ba5 486 cpsr_write(env, cpsr, CPSR_C, CPSRWriteByInstr);
97cc7560
DDAG
487 end_exclusive();
488 return;
489
490segv:
491 end_exclusive();
492 /* We get the PC of the entry address - which is as good as anything,
493 on a real kernel what you get depends on which mode it uses. */
a86b3c64 494 info.si_signo = TARGET_SIGSEGV;
97cc7560
DDAG
495 info.si_errno = 0;
496 /* XXX: check env->error_code */
497 info.si_code = TARGET_SEGV_MAPERR;
abf1172f 498 info._sifields._sigfault._addr = env->exception.vaddress;
9d2803f7 499 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
97cc7560
DDAG
500}
501
fbb4a2e3
PB
502/* Handle a jump to the kernel code page. */
503static int
504do_kernel_trap(CPUARMState *env)
505{
506 uint32_t addr;
507 uint32_t cpsr;
508 uint32_t val;
509
510 switch (env->regs[15]) {
511 case 0xffff0fa0: /* __kernel_memory_barrier */
512 /* ??? No-op. Will need to do better for SMP. */
513 break;
514 case 0xffff0fc0: /* __kernel_cmpxchg */
d5975363
PB
515 /* XXX: This only works between threads, not between processes.
516 It's probably possible to implement this with native host
517 operations. However things like ldrex/strex are much harder so
518 there's not much point trying. */
519 start_exclusive();
fbb4a2e3
PB
520 cpsr = cpsr_read(env);
521 addr = env->regs[2];
522 /* FIXME: This should SEGV if the access fails. */
523 if (get_user_u32(val, addr))
524 val = ~env->regs[0];
525 if (val == env->regs[0]) {
526 val = env->regs[1];
527 /* FIXME: Check for segfaults. */
528 put_user_u32(val, addr);
529 env->regs[0] = 0;
530 cpsr |= CPSR_C;
531 } else {
532 env->regs[0] = -1;
533 cpsr &= ~CPSR_C;
534 }
50866ba5 535 cpsr_write(env, cpsr, CPSR_C, CPSRWriteByInstr);
d5975363 536 end_exclusive();
fbb4a2e3
PB
537 break;
538 case 0xffff0fe0: /* __kernel_get_tls */
b8d43285 539 env->regs[0] = cpu_get_tls(env);
fbb4a2e3 540 break;
97cc7560
DDAG
541 case 0xffff0f60: /* __kernel_cmpxchg64 */
542 arm_kernel_cmpxchg64_helper(env);
543 break;
544
fbb4a2e3
PB
545 default:
546 return 1;
547 }
548 /* Jump back to the caller. */
549 addr = env->regs[14];
550 if (addr & 1) {
551 env->thumb = 1;
552 addr &= ~1;
553 }
554 env->regs[15] = addr;
555
556 return 0;
557}
558
b346ff46
FB
559void cpu_loop(CPUARMState *env)
560{
0315c31c 561 CPUState *cs = CPU(arm_env_get_cpu(env));
b346ff46
FB
562 int trapnr;
563 unsigned int n, insn;
c227f099 564 target_siginfo_t info;
b5ff1b31 565 uint32_t addr;
f0267ef7 566 abi_ulong ret;
3b46e624 567
b346ff46 568 for(;;) {
0315c31c 569 cpu_exec_start(cs);
8642c1b8 570 trapnr = cpu_exec(cs);
0315c31c 571 cpu_exec_end(cs);
d148d90e
SF
572 process_queued_cpu_work(cs);
573
b346ff46
FB
574 switch(trapnr) {
575 case EXCP_UDEF:
7517748e 576 case EXCP_NOCP:
e13886e3 577 case EXCP_INVSTATE:
c6981055 578 {
0429a971 579 TaskState *ts = cs->opaque;
c6981055 580 uint32_t opcode;
6d9a42be 581 int rc;
c6981055
FB
582
583 /* we handle the FPU emulation here, as Linux */
584 /* we get the opcode */
2f619698 585 /* FIXME - what to do if get_user() fails? */
49017bd8 586 get_user_code_u32(opcode, env->regs[15], env);
3b46e624 587
6d9a42be
AJ
588 rc = EmulateAll(opcode, &ts->fpa, env);
589 if (rc == 0) { /* illegal instruction */
a86b3c64 590 info.si_signo = TARGET_SIGILL;
c6981055
FB
591 info.si_errno = 0;
592 info.si_code = TARGET_ILL_ILLOPN;
593 info._sifields._sigfault._addr = env->regs[15];
9d2803f7 594 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
6d9a42be
AJ
595 } else if (rc < 0) { /* FP exception */
596 int arm_fpe=0;
597
598 /* translate softfloat flags to FPSR flags */
599 if (-rc & float_flag_invalid)
600 arm_fpe |= BIT_IOC;
601 if (-rc & float_flag_divbyzero)
602 arm_fpe |= BIT_DZC;
603 if (-rc & float_flag_overflow)
604 arm_fpe |= BIT_OFC;
605 if (-rc & float_flag_underflow)
606 arm_fpe |= BIT_UFC;
607 if (-rc & float_flag_inexact)
608 arm_fpe |= BIT_IXC;
609
610 FPSR fpsr = ts->fpa.fpsr;
611 //printf("fpsr 0x%x, arm_fpe 0x%x\n",fpsr,arm_fpe);
612
613 if (fpsr & (arm_fpe << 16)) { /* exception enabled? */
a86b3c64 614 info.si_signo = TARGET_SIGFPE;
6d9a42be
AJ
615 info.si_errno = 0;
616
617 /* ordered by priority, least first */
618 if (arm_fpe & BIT_IXC) info.si_code = TARGET_FPE_FLTRES;
619 if (arm_fpe & BIT_UFC) info.si_code = TARGET_FPE_FLTUND;
620 if (arm_fpe & BIT_OFC) info.si_code = TARGET_FPE_FLTOVF;
621 if (arm_fpe & BIT_DZC) info.si_code = TARGET_FPE_FLTDIV;
622 if (arm_fpe & BIT_IOC) info.si_code = TARGET_FPE_FLTINV;
623
624 info._sifields._sigfault._addr = env->regs[15];
9d2803f7 625 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
6d9a42be
AJ
626 } else {
627 env->regs[15] += 4;
628 }
629
630 /* accumulate unenabled exceptions */
631 if ((!(fpsr & BIT_IXE)) && (arm_fpe & BIT_IXC))
632 fpsr |= BIT_IXC;
633 if ((!(fpsr & BIT_UFE)) && (arm_fpe & BIT_UFC))
634 fpsr |= BIT_UFC;
635 if ((!(fpsr & BIT_OFE)) && (arm_fpe & BIT_OFC))
636 fpsr |= BIT_OFC;
637 if ((!(fpsr & BIT_DZE)) && (arm_fpe & BIT_DZC))
638 fpsr |= BIT_DZC;
639 if ((!(fpsr & BIT_IOE)) && (arm_fpe & BIT_IOC))
640 fpsr |= BIT_IOC;
641 ts->fpa.fpsr=fpsr;
642 } else { /* everything OK */
c6981055
FB
643 /* increment PC */
644 env->regs[15] += 4;
645 }
646 }
b346ff46
FB
647 break;
648 case EXCP_SWI:
06c949e6 649 case EXCP_BKPT:
b346ff46 650 {
ce4defa0 651 env->eabi = 1;
b346ff46 652 /* system call */
06c949e6
PB
653 if (trapnr == EXCP_BKPT) {
654 if (env->thumb) {
2f619698 655 /* FIXME - what to do if get_user() fails? */
49017bd8 656 get_user_code_u16(insn, env->regs[15], env);
06c949e6
PB
657 n = insn & 0xff;
658 env->regs[15] += 2;
659 } else {
2f619698 660 /* FIXME - what to do if get_user() fails? */
49017bd8 661 get_user_code_u32(insn, env->regs[15], env);
06c949e6
PB
662 n = (insn & 0xf) | ((insn >> 4) & 0xff0);
663 env->regs[15] += 4;
664 }
192c7bd9 665 } else {
06c949e6 666 if (env->thumb) {
2f619698 667 /* FIXME - what to do if get_user() fails? */
49017bd8 668 get_user_code_u16(insn, env->regs[15] - 2, env);
06c949e6
PB
669 n = insn & 0xff;
670 } else {
2f619698 671 /* FIXME - what to do if get_user() fails? */
49017bd8 672 get_user_code_u32(insn, env->regs[15] - 4, env);
06c949e6
PB
673 n = insn & 0xffffff;
674 }
192c7bd9
FB
675 }
676
6f1f31c0 677 if (n == ARM_NR_cacheflush) {
dcfd14b3 678 /* nop */
a4f81979
FB
679 } else if (n == ARM_NR_semihosting
680 || n == ARM_NR_thumb_semihosting) {
681 env->regs[0] = do_arm_semihosting (env);
3a1363ac 682 } else if (n == 0 || n >= ARM_SYSCALL_BASE || env->thumb) {
b346ff46 683 /* linux syscall */
ce4defa0 684 if (env->thumb || n == 0) {
192c7bd9
FB
685 n = env->regs[7];
686 } else {
687 n -= ARM_SYSCALL_BASE;
ce4defa0 688 env->eabi = 0;
192c7bd9 689 }
fbb4a2e3
PB
690 if ( n > ARM_NR_BASE) {
691 switch (n) {
692 case ARM_NR_cacheflush:
dcfd14b3 693 /* nop */
fbb4a2e3
PB
694 break;
695 case ARM_NR_set_tls:
696 cpu_set_tls(env, env->regs[0]);
697 env->regs[0] = 0;
698 break;
d5355087
HL
699 case ARM_NR_breakpoint:
700 env->regs[15] -= env->thumb ? 2 : 4;
701 goto excp_debug;
fbb4a2e3
PB
702 default:
703 gemu_log("qemu: Unsupported ARM syscall: 0x%x\n",
704 n);
705 env->regs[0] = -TARGET_ENOSYS;
706 break;
707 }
708 } else {
f0267ef7
TB
709 ret = do_syscall(env,
710 n,
711 env->regs[0],
712 env->regs[1],
713 env->regs[2],
714 env->regs[3],
715 env->regs[4],
716 env->regs[5],
717 0, 0);
718 if (ret == -TARGET_ERESTARTSYS) {
719 env->regs[15] -= env->thumb ? 2 : 4;
720 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
721 env->regs[0] = ret;
722 }
fbb4a2e3 723 }
b346ff46
FB
724 } else {
725 goto error;
726 }
727 }
728 break;
19a6e31c
PM
729 case EXCP_SEMIHOST:
730 env->regs[0] = do_arm_semihosting(env);
731 break;
43fff238
FB
732 case EXCP_INTERRUPT:
733 /* just indicate that signals should be handled asap */
734 break;
68016c62
FB
735 case EXCP_PREFETCH_ABORT:
736 case EXCP_DATA_ABORT:
abf1172f 737 addr = env->exception.vaddress;
68016c62 738 {
a86b3c64 739 info.si_signo = TARGET_SIGSEGV;
68016c62
FB
740 info.si_errno = 0;
741 /* XXX: check env->error_code */
742 info.si_code = TARGET_SEGV_MAPERR;
b5ff1b31 743 info._sifields._sigfault._addr = addr;
9d2803f7 744 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
68016c62
FB
745 }
746 break;
1fddef4b 747 case EXCP_DEBUG:
d5355087 748 excp_debug:
1fddef4b
FB
749 {
750 int sig;
751
db6b81d4 752 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
1fddef4b
FB
753 if (sig)
754 {
755 info.si_signo = sig;
756 info.si_errno = 0;
757 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 758 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1fddef4b
FB
759 }
760 }
761 break;
fbb4a2e3
PB
762 case EXCP_KERNEL_TRAP:
763 if (do_kernel_trap(env))
764 goto error;
765 break;
f911e0a3
PM
766 case EXCP_YIELD:
767 /* nothing to do here for user-mode, just resume guest code */
768 break;
fdbc2b57
RH
769 case EXCP_ATOMIC:
770 cpu_exec_step_atomic(cs);
771 break;
b346ff46
FB
772 default:
773 error:
120a9848 774 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
b346ff46
FB
775 abort();
776 }
777 process_pending_signals(env);
778 }
779}
780
1861c454
PM
781#else
782
783/* AArch64 main loop */
784void cpu_loop(CPUARMState *env)
785{
786 CPUState *cs = CPU(arm_env_get_cpu(env));
787 int trapnr, sig;
f0267ef7 788 abi_long ret;
1861c454 789 target_siginfo_t info;
1861c454
PM
790
791 for (;;) {
792 cpu_exec_start(cs);
8642c1b8 793 trapnr = cpu_exec(cs);
1861c454 794 cpu_exec_end(cs);
d148d90e 795 process_queued_cpu_work(cs);
1861c454
PM
796
797 switch (trapnr) {
798 case EXCP_SWI:
f0267ef7
TB
799 ret = do_syscall(env,
800 env->xregs[8],
801 env->xregs[0],
802 env->xregs[1],
803 env->xregs[2],
804 env->xregs[3],
805 env->xregs[4],
806 env->xregs[5],
807 0, 0);
808 if (ret == -TARGET_ERESTARTSYS) {
809 env->pc -= 4;
810 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
811 env->xregs[0] = ret;
812 }
1861c454
PM
813 break;
814 case EXCP_INTERRUPT:
815 /* just indicate that signals should be handled asap */
816 break;
817 case EXCP_UDEF:
a86b3c64 818 info.si_signo = TARGET_SIGILL;
1861c454
PM
819 info.si_errno = 0;
820 info.si_code = TARGET_ILL_ILLOPN;
821 info._sifields._sigfault._addr = env->pc;
9d2803f7 822 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1861c454
PM
823 break;
824 case EXCP_PREFETCH_ABORT:
1861c454 825 case EXCP_DATA_ABORT:
a86b3c64 826 info.si_signo = TARGET_SIGSEGV;
1861c454
PM
827 info.si_errno = 0;
828 /* XXX: check env->error_code */
829 info.si_code = TARGET_SEGV_MAPERR;
686581ad 830 info._sifields._sigfault._addr = env->exception.vaddress;
9d2803f7 831 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1861c454
PM
832 break;
833 case EXCP_DEBUG:
834 case EXCP_BKPT:
835 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
836 if (sig) {
837 info.si_signo = sig;
838 info.si_errno = 0;
839 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 840 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1861c454
PM
841 }
842 break;
8012c84f
PM
843 case EXCP_SEMIHOST:
844 env->xregs[0] = do_arm_semihosting(env);
845 break;
f911e0a3
PM
846 case EXCP_YIELD:
847 /* nothing to do here for user-mode, just resume guest code */
848 break;
fdbc2b57
RH
849 case EXCP_ATOMIC:
850 cpu_exec_step_atomic(cs);
851 break;
1861c454 852 default:
120a9848 853 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
1861c454
PM
854 abort();
855 }
856 process_pending_signals(env);
fa2ef212
MM
857 /* Exception return on AArch64 always clears the exclusive monitor,
858 * so any return to running guest code implies this.
fa2ef212
MM
859 */
860 env->exclusive_addr = -1;
1861c454
PM
861 }
862}
863#endif /* ndef TARGET_ABI32 */
864
b346ff46 865#endif
1b6b029e 866
d2fbca94
GX
867#ifdef TARGET_UNICORE32
868
05390248 869void cpu_loop(CPUUniCore32State *env)
d2fbca94 870{
0315c31c 871 CPUState *cs = CPU(uc32_env_get_cpu(env));
d2fbca94
GX
872 int trapnr;
873 unsigned int n, insn;
874 target_siginfo_t info;
875
876 for (;;) {
0315c31c 877 cpu_exec_start(cs);
8642c1b8 878 trapnr = cpu_exec(cs);
0315c31c 879 cpu_exec_end(cs);
d148d90e
SF
880 process_queued_cpu_work(cs);
881
d2fbca94
GX
882 switch (trapnr) {
883 case UC32_EXCP_PRIV:
884 {
885 /* system call */
886 get_user_u32(insn, env->regs[31] - 4);
887 n = insn & 0xffffff;
888
889 if (n >= UC32_SYSCALL_BASE) {
890 /* linux syscall */
891 n -= UC32_SYSCALL_BASE;
892 if (n == UC32_SYSCALL_NR_set_tls) {
893 cpu_set_tls(env, env->regs[0]);
894 env->regs[0] = 0;
895 } else {
256cb6af 896 abi_long ret = do_syscall(env,
d2fbca94
GX
897 n,
898 env->regs[0],
899 env->regs[1],
900 env->regs[2],
901 env->regs[3],
902 env->regs[4],
5945cfcb
PM
903 env->regs[5],
904 0, 0);
256cb6af
TB
905 if (ret == -TARGET_ERESTARTSYS) {
906 env->regs[31] -= 4;
907 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
908 env->regs[0] = ret;
909 }
d2fbca94
GX
910 }
911 } else {
912 goto error;
913 }
914 }
915 break;
d48813dd
GX
916 case UC32_EXCP_DTRAP:
917 case UC32_EXCP_ITRAP:
a86b3c64 918 info.si_signo = TARGET_SIGSEGV;
d2fbca94
GX
919 info.si_errno = 0;
920 /* XXX: check env->error_code */
921 info.si_code = TARGET_SEGV_MAPERR;
922 info._sifields._sigfault._addr = env->cp0.c4_faultaddr;
9d2803f7 923 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
d2fbca94
GX
924 break;
925 case EXCP_INTERRUPT:
926 /* just indicate that signals should be handled asap */
927 break;
928 case EXCP_DEBUG:
929 {
930 int sig;
931
db6b81d4 932 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
d2fbca94
GX
933 if (sig) {
934 info.si_signo = sig;
935 info.si_errno = 0;
936 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 937 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
d2fbca94
GX
938 }
939 }
940 break;
fdbc2b57
RH
941 case EXCP_ATOMIC:
942 cpu_exec_step_atomic(cs);
943 break;
d2fbca94
GX
944 default:
945 goto error;
946 }
947 process_pending_signals(env);
948 }
949
950error:
120a9848 951 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
d2fbca94
GX
952 abort();
953}
954#endif
955
93ac68bc 956#ifdef TARGET_SPARC
ed23fbd9 957#define SPARC64_STACK_BIAS 2047
93ac68bc 958
060366c5
FB
959//#define DEBUG_WIN
960
2623cbaf
FB
961/* WARNING: dealing with register windows _is_ complicated. More info
962 can be found at http://www.sics.se/~psm/sparcstack.html */
060366c5
FB
963static inline int get_reg_index(CPUSPARCState *env, int cwp, int index)
964{
1a14026e 965 index = (index + cwp * 16) % (16 * env->nwindows);
060366c5
FB
966 /* wrap handling : if cwp is on the last window, then we use the
967 registers 'after' the end */
1a14026e
BS
968 if (index < 8 && env->cwp == env->nwindows - 1)
969 index += 16 * env->nwindows;
060366c5
FB
970 return index;
971}
972
2623cbaf
FB
973/* save the register window 'cwp1' */
974static inline void save_window_offset(CPUSPARCState *env, int cwp1)
060366c5 975{
2623cbaf 976 unsigned int i;
992f48a0 977 abi_ulong sp_ptr;
3b46e624 978
53a5960a 979 sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
ed23fbd9
BS
980#ifdef TARGET_SPARC64
981 if (sp_ptr & 3)
982 sp_ptr += SPARC64_STACK_BIAS;
983#endif
060366c5 984#if defined(DEBUG_WIN)
2daf0284
BS
985 printf("win_overflow: sp_ptr=0x" TARGET_ABI_FMT_lx " save_cwp=%d\n",
986 sp_ptr, cwp1);
060366c5 987#endif
2623cbaf 988 for(i = 0; i < 16; i++) {
2f619698
FB
989 /* FIXME - what to do if put_user() fails? */
990 put_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
992f48a0 991 sp_ptr += sizeof(abi_ulong);
2623cbaf 992 }
060366c5
FB
993}
994
995static void save_window(CPUSPARCState *env)
996{
5ef54116 997#ifndef TARGET_SPARC64
2623cbaf 998 unsigned int new_wim;
1a14026e
BS
999 new_wim = ((env->wim >> 1) | (env->wim << (env->nwindows - 1))) &
1000 ((1LL << env->nwindows) - 1);
1001 save_window_offset(env, cpu_cwp_dec(env, env->cwp - 2));
2623cbaf 1002 env->wim = new_wim;
5ef54116 1003#else
1a14026e 1004 save_window_offset(env, cpu_cwp_dec(env, env->cwp - 2));
5ef54116
FB
1005 env->cansave++;
1006 env->canrestore--;
1007#endif
060366c5
FB
1008}
1009
1010static void restore_window(CPUSPARCState *env)
1011{
eda52953
BS
1012#ifndef TARGET_SPARC64
1013 unsigned int new_wim;
1014#endif
1015 unsigned int i, cwp1;
992f48a0 1016 abi_ulong sp_ptr;
3b46e624 1017
eda52953 1018#ifndef TARGET_SPARC64
1a14026e
BS
1019 new_wim = ((env->wim << 1) | (env->wim >> (env->nwindows - 1))) &
1020 ((1LL << env->nwindows) - 1);
eda52953 1021#endif
3b46e624 1022
060366c5 1023 /* restore the invalid window */
1a14026e 1024 cwp1 = cpu_cwp_inc(env, env->cwp + 1);
53a5960a 1025 sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
ed23fbd9
BS
1026#ifdef TARGET_SPARC64
1027 if (sp_ptr & 3)
1028 sp_ptr += SPARC64_STACK_BIAS;
1029#endif
060366c5 1030#if defined(DEBUG_WIN)
2daf0284
BS
1031 printf("win_underflow: sp_ptr=0x" TARGET_ABI_FMT_lx " load_cwp=%d\n",
1032 sp_ptr, cwp1);
060366c5 1033#endif
2623cbaf 1034 for(i = 0; i < 16; i++) {
2f619698
FB
1035 /* FIXME - what to do if get_user() fails? */
1036 get_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
992f48a0 1037 sp_ptr += sizeof(abi_ulong);
2623cbaf 1038 }
5ef54116
FB
1039#ifdef TARGET_SPARC64
1040 env->canrestore++;
1a14026e
BS
1041 if (env->cleanwin < env->nwindows - 1)
1042 env->cleanwin++;
5ef54116 1043 env->cansave--;
eda52953
BS
1044#else
1045 env->wim = new_wim;
5ef54116 1046#endif
060366c5
FB
1047}
1048
1049static void flush_windows(CPUSPARCState *env)
1050{
1051 int offset, cwp1;
2623cbaf
FB
1052
1053 offset = 1;
060366c5
FB
1054 for(;;) {
1055 /* if restore would invoke restore_window(), then we can stop */
1a14026e 1056 cwp1 = cpu_cwp_inc(env, env->cwp + offset);
eda52953 1057#ifndef TARGET_SPARC64
060366c5
FB
1058 if (env->wim & (1 << cwp1))
1059 break;
eda52953
BS
1060#else
1061 if (env->canrestore == 0)
1062 break;
1063 env->cansave++;
1064 env->canrestore--;
1065#endif
2623cbaf 1066 save_window_offset(env, cwp1);
060366c5
FB
1067 offset++;
1068 }
1a14026e 1069 cwp1 = cpu_cwp_inc(env, env->cwp + 1);
eda52953
BS
1070#ifndef TARGET_SPARC64
1071 /* set wim so that restore will reload the registers */
2623cbaf 1072 env->wim = 1 << cwp1;
eda52953 1073#endif
2623cbaf
FB
1074#if defined(DEBUG_WIN)
1075 printf("flush_windows: nb=%d\n", offset - 1);
80a9d035 1076#endif
2623cbaf 1077}
060366c5 1078
93ac68bc
FB
1079void cpu_loop (CPUSPARCState *env)
1080{
878096ee 1081 CPUState *cs = CPU(sparc_env_get_cpu(env));
2cc20260
RH
1082 int trapnr;
1083 abi_long ret;
c227f099 1084 target_siginfo_t info;
3b46e624 1085
060366c5 1086 while (1) {
b040bc9c 1087 cpu_exec_start(cs);
8642c1b8 1088 trapnr = cpu_exec(cs);
b040bc9c 1089 cpu_exec_end(cs);
d148d90e 1090 process_queued_cpu_work(cs);
3b46e624 1091
20132b96
RH
1092 /* Compute PSR before exposing state. */
1093 if (env->cc_op != CC_OP_FLAGS) {
1094 cpu_get_psr(env);
1095 }
1096
060366c5 1097 switch (trapnr) {
5ef54116 1098#ifndef TARGET_SPARC64
5fafdf24 1099 case 0x88:
060366c5 1100 case 0x90:
5ef54116 1101#else
cb33da57 1102 case 0x110:
5ef54116
FB
1103 case 0x16d:
1104#endif
060366c5 1105 ret = do_syscall (env, env->gregs[1],
5fafdf24
TS
1106 env->regwptr[0], env->regwptr[1],
1107 env->regwptr[2], env->regwptr[3],
5945cfcb
PM
1108 env->regwptr[4], env->regwptr[5],
1109 0, 0);
c0bea68f
TB
1110 if (ret == -TARGET_ERESTARTSYS || ret == -TARGET_QEMU_ESIGRETURN) {
1111 break;
1112 }
2cc20260 1113 if ((abi_ulong)ret >= (abi_ulong)(-515)) {
992f48a0 1114#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
27908725
FB
1115 env->xcc |= PSR_CARRY;
1116#else
060366c5 1117 env->psr |= PSR_CARRY;
27908725 1118#endif
060366c5
FB
1119 ret = -ret;
1120 } else {
992f48a0 1121#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
27908725
FB
1122 env->xcc &= ~PSR_CARRY;
1123#else
060366c5 1124 env->psr &= ~PSR_CARRY;
27908725 1125#endif
060366c5
FB
1126 }
1127 env->regwptr[0] = ret;
1128 /* next instruction */
1129 env->pc = env->npc;
1130 env->npc = env->npc + 4;
1131 break;
1132 case 0x83: /* flush windows */
992f48a0
BS
1133#ifdef TARGET_ABI32
1134 case 0x103:
1135#endif
2623cbaf 1136 flush_windows(env);
060366c5
FB
1137 /* next instruction */
1138 env->pc = env->npc;
1139 env->npc = env->npc + 4;
1140 break;
3475187d 1141#ifndef TARGET_SPARC64
060366c5
FB
1142 case TT_WIN_OVF: /* window overflow */
1143 save_window(env);
1144 break;
1145 case TT_WIN_UNF: /* window underflow */
1146 restore_window(env);
1147 break;
61ff6f58
FB
1148 case TT_TFAULT:
1149 case TT_DFAULT:
1150 {
59f7182f 1151 info.si_signo = TARGET_SIGSEGV;
61ff6f58
FB
1152 info.si_errno = 0;
1153 /* XXX: check env->error_code */
1154 info.si_code = TARGET_SEGV_MAPERR;
1155 info._sifields._sigfault._addr = env->mmuregs[4];
9d2803f7 1156 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
61ff6f58
FB
1157 }
1158 break;
3475187d 1159#else
5ef54116
FB
1160 case TT_SPILL: /* window overflow */
1161 save_window(env);
1162 break;
1163 case TT_FILL: /* window underflow */
1164 restore_window(env);
1165 break;
7f84a729
BS
1166 case TT_TFAULT:
1167 case TT_DFAULT:
1168 {
59f7182f 1169 info.si_signo = TARGET_SIGSEGV;
7f84a729
BS
1170 info.si_errno = 0;
1171 /* XXX: check env->error_code */
1172 info.si_code = TARGET_SEGV_MAPERR;
1173 if (trapnr == TT_DFAULT)
96df2bc9 1174 info._sifields._sigfault._addr = env->dmmu.mmuregs[4];
7f84a729 1175 else
8194f35a 1176 info._sifields._sigfault._addr = cpu_tsptr(env)->tpc;
9d2803f7 1177 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
7f84a729
BS
1178 }
1179 break;
27524dc3 1180#ifndef TARGET_ABI32
5bfb56b2
BS
1181 case 0x16e:
1182 flush_windows(env);
1183 sparc64_get_context(env);
1184 break;
1185 case 0x16f:
1186 flush_windows(env);
1187 sparc64_set_context(env);
1188 break;
27524dc3 1189#endif
3475187d 1190#endif
48dc41eb
FB
1191 case EXCP_INTERRUPT:
1192 /* just indicate that signals should be handled asap */
1193 break;
75f22e4e
RH
1194 case TT_ILL_INSN:
1195 {
1196 info.si_signo = TARGET_SIGILL;
1197 info.si_errno = 0;
1198 info.si_code = TARGET_ILL_ILLOPC;
1199 info._sifields._sigfault._addr = env->pc;
9d2803f7 1200 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
75f22e4e
RH
1201 }
1202 break;
1fddef4b
FB
1203 case EXCP_DEBUG:
1204 {
1205 int sig;
1206
db6b81d4 1207 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
1fddef4b
FB
1208 if (sig)
1209 {
1210 info.si_signo = sig;
1211 info.si_errno = 0;
1212 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 1213 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1fddef4b
FB
1214 }
1215 }
1216 break;
fdbc2b57
RH
1217 case EXCP_ATOMIC:
1218 cpu_exec_step_atomic(cs);
1219 break;
060366c5
FB
1220 default:
1221 printf ("Unhandled trap: 0x%x\n", trapnr);
878096ee 1222 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 1223 exit(EXIT_FAILURE);
060366c5
FB
1224 }
1225 process_pending_signals (env);
1226 }
93ac68bc
FB
1227}
1228
1229#endif
1230
67867308 1231#ifdef TARGET_PPC
05390248 1232static inline uint64_t cpu_ppc_get_tb(CPUPPCState *env)
9fddaa0c 1233{
4a7428c5 1234 return cpu_get_host_ticks();
9fddaa0c 1235}
3b46e624 1236
05390248 1237uint64_t cpu_ppc_load_tbl(CPUPPCState *env)
9fddaa0c 1238{
e3ea6529 1239 return cpu_ppc_get_tb(env);
9fddaa0c 1240}
3b46e624 1241
05390248 1242uint32_t cpu_ppc_load_tbu(CPUPPCState *env)
9fddaa0c
FB
1243{
1244 return cpu_ppc_get_tb(env) >> 32;
1245}
3b46e624 1246
05390248 1247uint64_t cpu_ppc_load_atbl(CPUPPCState *env)
9fddaa0c 1248{
b711de95 1249 return cpu_ppc_get_tb(env);
9fddaa0c 1250}
5fafdf24 1251
05390248 1252uint32_t cpu_ppc_load_atbu(CPUPPCState *env)
9fddaa0c 1253{
a062e36c 1254 return cpu_ppc_get_tb(env) >> 32;
9fddaa0c 1255}
76a66253 1256
05390248 1257uint32_t cpu_ppc601_load_rtcu(CPUPPCState *env)
76a66253
JM
1258__attribute__ (( alias ("cpu_ppc_load_tbu") ));
1259
05390248 1260uint32_t cpu_ppc601_load_rtcl(CPUPPCState *env)
9fddaa0c 1261{
76a66253 1262 return cpu_ppc_load_tbl(env) & 0x3FFFFF80;
9fddaa0c 1263}
76a66253 1264
a750fc0b 1265/* XXX: to be fixed */
73b01960 1266int ppc_dcr_read (ppc_dcr_t *dcr_env, int dcrn, uint32_t *valp)
a750fc0b
JM
1267{
1268 return -1;
1269}
1270
73b01960 1271int ppc_dcr_write (ppc_dcr_t *dcr_env, int dcrn, uint32_t val)
a750fc0b
JM
1272{
1273 return -1;
1274}
1275
56f066bb
NF
1276static int do_store_exclusive(CPUPPCState *env)
1277{
1278 target_ulong addr;
1279 target_ulong page_addr;
e22c357b 1280 target_ulong val, val2 __attribute__((unused)) = 0;
56f066bb
NF
1281 int flags;
1282 int segv = 0;
1283
1284 addr = env->reserve_ea;
1285 page_addr = addr & TARGET_PAGE_MASK;
1286 start_exclusive();
1287 mmap_lock();
1288 flags = page_get_flags(page_addr);
1289 if ((flags & PAGE_READ) == 0) {
1290 segv = 1;
1291 } else {
1292 int reg = env->reserve_info & 0x1f;
4b1daa72 1293 int size = env->reserve_info >> 5;
56f066bb
NF
1294 int stored = 0;
1295
1296 if (addr == env->reserve_addr) {
1297 switch (size) {
1298 case 1: segv = get_user_u8(val, addr); break;
1299 case 2: segv = get_user_u16(val, addr); break;
1300 case 4: segv = get_user_u32(val, addr); break;
1301#if defined(TARGET_PPC64)
1302 case 8: segv = get_user_u64(val, addr); break;
27b95bfe
TM
1303 case 16: {
1304 segv = get_user_u64(val, addr);
1305 if (!segv) {
1306 segv = get_user_u64(val2, addr + 8);
1307 }
1308 break;
1309 }
56f066bb
NF
1310#endif
1311 default: abort();
1312 }
1313 if (!segv && val == env->reserve_val) {
1314 val = env->gpr[reg];
1315 switch (size) {
1316 case 1: segv = put_user_u8(val, addr); break;
1317 case 2: segv = put_user_u16(val, addr); break;
1318 case 4: segv = put_user_u32(val, addr); break;
1319#if defined(TARGET_PPC64)
1320 case 8: segv = put_user_u64(val, addr); break;
27b95bfe
TM
1321 case 16: {
1322 if (val2 == env->reserve_val2) {
e22c357b
DK
1323 if (msr_le) {
1324 val2 = val;
1325 val = env->gpr[reg+1];
1326 } else {
1327 val2 = env->gpr[reg+1];
1328 }
27b95bfe
TM
1329 segv = put_user_u64(val, addr);
1330 if (!segv) {
1331 segv = put_user_u64(val2, addr + 8);
1332 }
1333 }
1334 break;
1335 }
56f066bb
NF
1336#endif
1337 default: abort();
1338 }
1339 if (!segv) {
1340 stored = 1;
1341 }
1342 }
1343 }
1344 env->crf[0] = (stored << 1) | xer_so;
1345 env->reserve_addr = (target_ulong)-1;
1346 }
1347 if (!segv) {
1348 env->nip += 4;
1349 }
1350 mmap_unlock();
1351 end_exclusive();
1352 return segv;
1353}
1354
67867308
FB
1355void cpu_loop(CPUPPCState *env)
1356{
0315c31c 1357 CPUState *cs = CPU(ppc_env_get_cpu(env));
c227f099 1358 target_siginfo_t info;
61190b14 1359 int trapnr;
9e0e2f96 1360 target_ulong ret;
3b46e624 1361
67867308 1362 for(;;) {
0315c31c 1363 cpu_exec_start(cs);
8642c1b8 1364 trapnr = cpu_exec(cs);
0315c31c 1365 cpu_exec_end(cs);
d148d90e
SF
1366 process_queued_cpu_work(cs);
1367
67867308 1368 switch(trapnr) {
e1833e1f
JM
1369 case POWERPC_EXCP_NONE:
1370 /* Just go on */
67867308 1371 break;
e1833e1f 1372 case POWERPC_EXCP_CRITICAL: /* Critical input */
a47dddd7 1373 cpu_abort(cs, "Critical interrupt while in user mode. "
e1833e1f 1374 "Aborting\n");
61190b14 1375 break;
e1833e1f 1376 case POWERPC_EXCP_MCHECK: /* Machine check exception */
a47dddd7 1377 cpu_abort(cs, "Machine check exception while in user mode. "
e1833e1f
JM
1378 "Aborting\n");
1379 break;
1380 case POWERPC_EXCP_DSI: /* Data storage exception */
e1833e1f 1381 /* XXX: check this. Seems bugged */
2be0071f
FB
1382 switch (env->error_code & 0xFF000000) {
1383 case 0x40000000:
ba4a8df8 1384 case 0x42000000:
61190b14
FB
1385 info.si_signo = TARGET_SIGSEGV;
1386 info.si_errno = 0;
1387 info.si_code = TARGET_SEGV_MAPERR;
1388 break;
2be0071f 1389 case 0x04000000:
61190b14
FB
1390 info.si_signo = TARGET_SIGILL;
1391 info.si_errno = 0;
1392 info.si_code = TARGET_ILL_ILLADR;
1393 break;
2be0071f 1394 case 0x08000000:
61190b14
FB
1395 info.si_signo = TARGET_SIGSEGV;
1396 info.si_errno = 0;
1397 info.si_code = TARGET_SEGV_ACCERR;
1398 break;
61190b14
FB
1399 default:
1400 /* Let's send a regular segfault... */
e1833e1f
JM
1401 EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
1402 env->error_code);
61190b14
FB
1403 info.si_signo = TARGET_SIGSEGV;
1404 info.si_errno = 0;
1405 info.si_code = TARGET_SEGV_MAPERR;
1406 break;
1407 }
67867308 1408 info._sifields._sigfault._addr = env->nip;
9d2803f7 1409 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
67867308 1410 break;
e1833e1f 1411 case POWERPC_EXCP_ISI: /* Instruction storage exception */
e1833e1f 1412 /* XXX: check this */
2be0071f
FB
1413 switch (env->error_code & 0xFF000000) {
1414 case 0x40000000:
61190b14 1415 info.si_signo = TARGET_SIGSEGV;
67867308 1416 info.si_errno = 0;
61190b14
FB
1417 info.si_code = TARGET_SEGV_MAPERR;
1418 break;
2be0071f
FB
1419 case 0x10000000:
1420 case 0x08000000:
61190b14
FB
1421 info.si_signo = TARGET_SIGSEGV;
1422 info.si_errno = 0;
1423 info.si_code = TARGET_SEGV_ACCERR;
1424 break;
1425 default:
1426 /* Let's send a regular segfault... */
e1833e1f
JM
1427 EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
1428 env->error_code);
61190b14
FB
1429 info.si_signo = TARGET_SIGSEGV;
1430 info.si_errno = 0;
1431 info.si_code = TARGET_SEGV_MAPERR;
1432 break;
1433 }
1434 info._sifields._sigfault._addr = env->nip - 4;
9d2803f7 1435 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
67867308 1436 break;
e1833e1f 1437 case POWERPC_EXCP_EXTERNAL: /* External input */
a47dddd7 1438 cpu_abort(cs, "External interrupt while in user mode. "
e1833e1f
JM
1439 "Aborting\n");
1440 break;
1441 case POWERPC_EXCP_ALIGN: /* Alignment exception */
e1833e1f 1442 /* XXX: check this */
61190b14 1443 info.si_signo = TARGET_SIGBUS;
67867308 1444 info.si_errno = 0;
61190b14 1445 info.si_code = TARGET_BUS_ADRALN;
6bb9a0a9 1446 info._sifields._sigfault._addr = env->nip;
9d2803f7 1447 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
67867308 1448 break;
e1833e1f 1449 case POWERPC_EXCP_PROGRAM: /* Program exception */
9b2fadda 1450 case POWERPC_EXCP_HV_EMU: /* HV emulation */
e1833e1f 1451 /* XXX: check this */
61190b14 1452 switch (env->error_code & ~0xF) {
e1833e1f 1453 case POWERPC_EXCP_FP:
61190b14
FB
1454 info.si_signo = TARGET_SIGFPE;
1455 info.si_errno = 0;
1456 switch (env->error_code & 0xF) {
e1833e1f 1457 case POWERPC_EXCP_FP_OX:
61190b14
FB
1458 info.si_code = TARGET_FPE_FLTOVF;
1459 break;
e1833e1f 1460 case POWERPC_EXCP_FP_UX:
61190b14
FB
1461 info.si_code = TARGET_FPE_FLTUND;
1462 break;
e1833e1f
JM
1463 case POWERPC_EXCP_FP_ZX:
1464 case POWERPC_EXCP_FP_VXZDZ:
61190b14
FB
1465 info.si_code = TARGET_FPE_FLTDIV;
1466 break;
e1833e1f 1467 case POWERPC_EXCP_FP_XX:
61190b14
FB
1468 info.si_code = TARGET_FPE_FLTRES;
1469 break;
e1833e1f 1470 case POWERPC_EXCP_FP_VXSOFT:
61190b14
FB
1471 info.si_code = TARGET_FPE_FLTINV;
1472 break;
7c58044c 1473 case POWERPC_EXCP_FP_VXSNAN:
e1833e1f
JM
1474 case POWERPC_EXCP_FP_VXISI:
1475 case POWERPC_EXCP_FP_VXIDI:
1476 case POWERPC_EXCP_FP_VXIMZ:
1477 case POWERPC_EXCP_FP_VXVC:
1478 case POWERPC_EXCP_FP_VXSQRT:
1479 case POWERPC_EXCP_FP_VXCVI:
61190b14
FB
1480 info.si_code = TARGET_FPE_FLTSUB;
1481 break;
1482 default:
e1833e1f
JM
1483 EXCP_DUMP(env, "Unknown floating point exception (%02x)\n",
1484 env->error_code);
1485 break;
61190b14 1486 }
e1833e1f
JM
1487 break;
1488 case POWERPC_EXCP_INVAL:
61190b14
FB
1489 info.si_signo = TARGET_SIGILL;
1490 info.si_errno = 0;
1491 switch (env->error_code & 0xF) {
e1833e1f 1492 case POWERPC_EXCP_INVAL_INVAL:
61190b14
FB
1493 info.si_code = TARGET_ILL_ILLOPC;
1494 break;
e1833e1f 1495 case POWERPC_EXCP_INVAL_LSWX:
a750fc0b 1496 info.si_code = TARGET_ILL_ILLOPN;
61190b14 1497 break;
e1833e1f 1498 case POWERPC_EXCP_INVAL_SPR:
61190b14
FB
1499 info.si_code = TARGET_ILL_PRVREG;
1500 break;
e1833e1f 1501 case POWERPC_EXCP_INVAL_FP:
61190b14
FB
1502 info.si_code = TARGET_ILL_COPROC;
1503 break;
1504 default:
e1833e1f
JM
1505 EXCP_DUMP(env, "Unknown invalid operation (%02x)\n",
1506 env->error_code & 0xF);
61190b14
FB
1507 info.si_code = TARGET_ILL_ILLADR;
1508 break;
1509 }
1510 break;
e1833e1f 1511 case POWERPC_EXCP_PRIV:
61190b14
FB
1512 info.si_signo = TARGET_SIGILL;
1513 info.si_errno = 0;
1514 switch (env->error_code & 0xF) {
e1833e1f 1515 case POWERPC_EXCP_PRIV_OPC:
61190b14
FB
1516 info.si_code = TARGET_ILL_PRVOPC;
1517 break;
e1833e1f 1518 case POWERPC_EXCP_PRIV_REG:
61190b14 1519 info.si_code = TARGET_ILL_PRVREG;
e1833e1f 1520 break;
61190b14 1521 default:
e1833e1f
JM
1522 EXCP_DUMP(env, "Unknown privilege violation (%02x)\n",
1523 env->error_code & 0xF);
61190b14
FB
1524 info.si_code = TARGET_ILL_PRVOPC;
1525 break;
1526 }
1527 break;
e1833e1f 1528 case POWERPC_EXCP_TRAP:
a47dddd7 1529 cpu_abort(cs, "Tried to call a TRAP\n");
e1833e1f 1530 break;
61190b14
FB
1531 default:
1532 /* Should not happen ! */
a47dddd7 1533 cpu_abort(cs, "Unknown program exception (%02x)\n",
e1833e1f
JM
1534 env->error_code);
1535 break;
61190b14 1536 }
bd6fefe7 1537 info._sifields._sigfault._addr = env->nip;
9d2803f7 1538 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
67867308 1539 break;
e1833e1f 1540 case POWERPC_EXCP_FPU: /* Floating-point unavailable exception */
61190b14 1541 info.si_signo = TARGET_SIGILL;
67867308 1542 info.si_errno = 0;
61190b14 1543 info.si_code = TARGET_ILL_COPROC;
bd6fefe7 1544 info._sifields._sigfault._addr = env->nip;
9d2803f7 1545 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
67867308 1546 break;
e1833e1f 1547 case POWERPC_EXCP_SYSCALL: /* System call exception */
a47dddd7 1548 cpu_abort(cs, "Syscall exception while in user mode. "
e1833e1f 1549 "Aborting\n");
61190b14 1550 break;
e1833e1f 1551 case POWERPC_EXCP_APU: /* Auxiliary processor unavailable */
e1833e1f
JM
1552 info.si_signo = TARGET_SIGILL;
1553 info.si_errno = 0;
1554 info.si_code = TARGET_ILL_COPROC;
bd6fefe7 1555 info._sifields._sigfault._addr = env->nip;
9d2803f7 1556 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
61190b14 1557 break;
e1833e1f 1558 case POWERPC_EXCP_DECR: /* Decrementer exception */
a47dddd7 1559 cpu_abort(cs, "Decrementer interrupt while in user mode. "
e1833e1f 1560 "Aborting\n");
61190b14 1561 break;
e1833e1f 1562 case POWERPC_EXCP_FIT: /* Fixed-interval timer interrupt */
a47dddd7 1563 cpu_abort(cs, "Fix interval timer interrupt while in user mode. "
e1833e1f
JM
1564 "Aborting\n");
1565 break;
1566 case POWERPC_EXCP_WDT: /* Watchdog timer interrupt */
a47dddd7 1567 cpu_abort(cs, "Watchdog timer interrupt while in user mode. "
e1833e1f
JM
1568 "Aborting\n");
1569 break;
1570 case POWERPC_EXCP_DTLB: /* Data TLB error */
a47dddd7 1571 cpu_abort(cs, "Data TLB exception while in user mode. "
e1833e1f
JM
1572 "Aborting\n");
1573 break;
1574 case POWERPC_EXCP_ITLB: /* Instruction TLB error */
a47dddd7 1575 cpu_abort(cs, "Instruction TLB exception while in user mode. "
e1833e1f
JM
1576 "Aborting\n");
1577 break;
e1833e1f 1578 case POWERPC_EXCP_SPEU: /* SPE/embedded floating-point unavail. */
e1833e1f
JM
1579 info.si_signo = TARGET_SIGILL;
1580 info.si_errno = 0;
1581 info.si_code = TARGET_ILL_COPROC;
bd6fefe7 1582 info._sifields._sigfault._addr = env->nip;
9d2803f7 1583 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e1833e1f
JM
1584 break;
1585 case POWERPC_EXCP_EFPDI: /* Embedded floating-point data IRQ */
a47dddd7 1586 cpu_abort(cs, "Embedded floating-point data IRQ not handled\n");
e1833e1f
JM
1587 break;
1588 case POWERPC_EXCP_EFPRI: /* Embedded floating-point round IRQ */
a47dddd7 1589 cpu_abort(cs, "Embedded floating-point round IRQ not handled\n");
e1833e1f
JM
1590 break;
1591 case POWERPC_EXCP_EPERFM: /* Embedded performance monitor IRQ */
a47dddd7 1592 cpu_abort(cs, "Performance monitor exception not handled\n");
e1833e1f
JM
1593 break;
1594 case POWERPC_EXCP_DOORI: /* Embedded doorbell interrupt */
a47dddd7 1595 cpu_abort(cs, "Doorbell interrupt while in user mode. "
e1833e1f
JM
1596 "Aborting\n");
1597 break;
1598 case POWERPC_EXCP_DOORCI: /* Embedded doorbell critical interrupt */
a47dddd7 1599 cpu_abort(cs, "Doorbell critical interrupt while in user mode. "
e1833e1f
JM
1600 "Aborting\n");
1601 break;
1602 case POWERPC_EXCP_RESET: /* System reset exception */
a47dddd7 1603 cpu_abort(cs, "Reset interrupt while in user mode. "
e1833e1f
JM
1604 "Aborting\n");
1605 break;
e1833e1f 1606 case POWERPC_EXCP_DSEG: /* Data segment exception */
a47dddd7 1607 cpu_abort(cs, "Data segment exception while in user mode. "
e1833e1f
JM
1608 "Aborting\n");
1609 break;
1610 case POWERPC_EXCP_ISEG: /* Instruction segment exception */
a47dddd7 1611 cpu_abort(cs, "Instruction segment exception "
e1833e1f
JM
1612 "while in user mode. Aborting\n");
1613 break;
e85e7c6e 1614 /* PowerPC 64 with hypervisor mode support */
e1833e1f 1615 case POWERPC_EXCP_HDECR: /* Hypervisor decrementer exception */
a47dddd7 1616 cpu_abort(cs, "Hypervisor decrementer interrupt "
e1833e1f
JM
1617 "while in user mode. Aborting\n");
1618 break;
e1833e1f
JM
1619 case POWERPC_EXCP_TRACE: /* Trace exception */
1620 /* Nothing to do:
1621 * we use this exception to emulate step-by-step execution mode.
1622 */
1623 break;
e85e7c6e 1624 /* PowerPC 64 with hypervisor mode support */
e1833e1f 1625 case POWERPC_EXCP_HDSI: /* Hypervisor data storage exception */
a47dddd7 1626 cpu_abort(cs, "Hypervisor data storage exception "
e1833e1f
JM
1627 "while in user mode. Aborting\n");
1628 break;
1629 case POWERPC_EXCP_HISI: /* Hypervisor instruction storage excp */
a47dddd7 1630 cpu_abort(cs, "Hypervisor instruction storage exception "
e1833e1f
JM
1631 "while in user mode. Aborting\n");
1632 break;
1633 case POWERPC_EXCP_HDSEG: /* Hypervisor data segment exception */
a47dddd7 1634 cpu_abort(cs, "Hypervisor data segment exception "
e1833e1f
JM
1635 "while in user mode. Aborting\n");
1636 break;
1637 case POWERPC_EXCP_HISEG: /* Hypervisor instruction segment excp */
a47dddd7 1638 cpu_abort(cs, "Hypervisor instruction segment exception "
e1833e1f
JM
1639 "while in user mode. Aborting\n");
1640 break;
e1833e1f 1641 case POWERPC_EXCP_VPU: /* Vector unavailable exception */
e1833e1f
JM
1642 info.si_signo = TARGET_SIGILL;
1643 info.si_errno = 0;
1644 info.si_code = TARGET_ILL_COPROC;
bd6fefe7 1645 info._sifields._sigfault._addr = env->nip;
9d2803f7 1646 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e1833e1f
JM
1647 break;
1648 case POWERPC_EXCP_PIT: /* Programmable interval timer IRQ */
a47dddd7 1649 cpu_abort(cs, "Programmable interval timer interrupt "
e1833e1f
JM
1650 "while in user mode. Aborting\n");
1651 break;
1652 case POWERPC_EXCP_IO: /* IO error exception */
a47dddd7 1653 cpu_abort(cs, "IO error exception while in user mode. "
e1833e1f
JM
1654 "Aborting\n");
1655 break;
1656 case POWERPC_EXCP_RUNM: /* Run mode exception */
a47dddd7 1657 cpu_abort(cs, "Run mode exception while in user mode. "
e1833e1f
JM
1658 "Aborting\n");
1659 break;
1660 case POWERPC_EXCP_EMUL: /* Emulation trap exception */
a47dddd7 1661 cpu_abort(cs, "Emulation trap exception not handled\n");
e1833e1f
JM
1662 break;
1663 case POWERPC_EXCP_IFTLB: /* Instruction fetch TLB error */
a47dddd7 1664 cpu_abort(cs, "Instruction fetch TLB exception "
e1833e1f
JM
1665 "while in user-mode. Aborting");
1666 break;
1667 case POWERPC_EXCP_DLTLB: /* Data load TLB miss */
a47dddd7 1668 cpu_abort(cs, "Data load TLB exception while in user-mode. "
e1833e1f
JM
1669 "Aborting");
1670 break;
1671 case POWERPC_EXCP_DSTLB: /* Data store TLB miss */
a47dddd7 1672 cpu_abort(cs, "Data store TLB exception while in user-mode. "
e1833e1f
JM
1673 "Aborting");
1674 break;
1675 case POWERPC_EXCP_FPA: /* Floating-point assist exception */
a47dddd7 1676 cpu_abort(cs, "Floating-point assist exception not handled\n");
e1833e1f
JM
1677 break;
1678 case POWERPC_EXCP_IABR: /* Instruction address breakpoint */
a47dddd7 1679 cpu_abort(cs, "Instruction address breakpoint exception "
e1833e1f
JM
1680 "not handled\n");
1681 break;
1682 case POWERPC_EXCP_SMI: /* System management interrupt */
a47dddd7 1683 cpu_abort(cs, "System management interrupt while in user mode. "
e1833e1f
JM
1684 "Aborting\n");
1685 break;
1686 case POWERPC_EXCP_THERM: /* Thermal interrupt */
a47dddd7 1687 cpu_abort(cs, "Thermal interrupt interrupt while in user mode. "
e1833e1f
JM
1688 "Aborting\n");
1689 break;
1690 case POWERPC_EXCP_PERFM: /* Embedded performance monitor IRQ */
a47dddd7 1691 cpu_abort(cs, "Performance monitor exception not handled\n");
e1833e1f
JM
1692 break;
1693 case POWERPC_EXCP_VPUA: /* Vector assist exception */
a47dddd7 1694 cpu_abort(cs, "Vector assist exception not handled\n");
e1833e1f
JM
1695 break;
1696 case POWERPC_EXCP_SOFTP: /* Soft patch exception */
a47dddd7 1697 cpu_abort(cs, "Soft patch exception not handled\n");
e1833e1f
JM
1698 break;
1699 case POWERPC_EXCP_MAINT: /* Maintenance exception */
a47dddd7 1700 cpu_abort(cs, "Maintenance exception while in user mode. "
e1833e1f
JM
1701 "Aborting\n");
1702 break;
1703 case POWERPC_EXCP_STOP: /* stop translation */
1704 /* We did invalidate the instruction cache. Go on */
1705 break;
1706 case POWERPC_EXCP_BRANCH: /* branch instruction: */
1707 /* We just stopped because of a branch. Go on */
1708 break;
1709 case POWERPC_EXCP_SYSCALL_USER:
1710 /* system call in user-mode emulation */
1711 /* WARNING:
1712 * PPC ABI uses overflow flag in cr0 to signal an error
1713 * in syscalls.
1714 */
e1833e1f 1715 env->crf[0] &= ~0x1;
2635531f 1716 env->nip += 4;
e1833e1f
JM
1717 ret = do_syscall(env, env->gpr[0], env->gpr[3], env->gpr[4],
1718 env->gpr[5], env->gpr[6], env->gpr[7],
5945cfcb 1719 env->gpr[8], 0, 0);
6db9d00e 1720 if (ret == -TARGET_ERESTARTSYS) {
2635531f 1721 env->nip -= 4;
6db9d00e
TB
1722 break;
1723 }
9e0e2f96 1724 if (ret == (target_ulong)(-TARGET_QEMU_ESIGRETURN)) {
bcd4933a
NF
1725 /* Returning from a successful sigreturn syscall.
1726 Avoid corrupting register state. */
1727 break;
1728 }
9e0e2f96 1729 if (ret > (target_ulong)(-515)) {
e1833e1f
JM
1730 env->crf[0] |= 0x1;
1731 ret = -ret;
61190b14 1732 }
e1833e1f 1733 env->gpr[3] = ret;
e1833e1f 1734 break;
56f066bb
NF
1735 case POWERPC_EXCP_STCX:
1736 if (do_store_exclusive(env)) {
1737 info.si_signo = TARGET_SIGSEGV;
1738 info.si_errno = 0;
1739 info.si_code = TARGET_SEGV_MAPERR;
1740 info._sifields._sigfault._addr = env->nip;
9d2803f7 1741 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
56f066bb
NF
1742 }
1743 break;
71f75756
AJ
1744 case EXCP_DEBUG:
1745 {
1746 int sig;
1747
db6b81d4 1748 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
71f75756
AJ
1749 if (sig) {
1750 info.si_signo = sig;
1751 info.si_errno = 0;
1752 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 1753 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
71f75756
AJ
1754 }
1755 }
1756 break;
56ba31ff
JM
1757 case EXCP_INTERRUPT:
1758 /* just indicate that signals should be handled asap */
1759 break;
fdbc2b57
RH
1760 case EXCP_ATOMIC:
1761 cpu_exec_step_atomic(cs);
1762 break;
e1833e1f 1763 default:
8223f345 1764 cpu_abort(cs, "Unknown exception 0x%x. Aborting\n", trapnr);
e1833e1f 1765 break;
67867308
FB
1766 }
1767 process_pending_signals(env);
1768 }
1769}
1770#endif
1771
048f6b4d
FB
1772#ifdef TARGET_MIPS
1773
ff4f7382
RH
1774# ifdef TARGET_ABI_MIPSO32
1775# define MIPS_SYS(name, args) args,
048f6b4d 1776static const uint8_t mips_syscall_args[] = {
29fb0f25 1777 MIPS_SYS(sys_syscall , 8) /* 4000 */
048f6b4d
FB
1778 MIPS_SYS(sys_exit , 1)
1779 MIPS_SYS(sys_fork , 0)
1780 MIPS_SYS(sys_read , 3)
1781 MIPS_SYS(sys_write , 3)
1782 MIPS_SYS(sys_open , 3) /* 4005 */
1783 MIPS_SYS(sys_close , 1)
1784 MIPS_SYS(sys_waitpid , 3)
1785 MIPS_SYS(sys_creat , 2)
1786 MIPS_SYS(sys_link , 2)
1787 MIPS_SYS(sys_unlink , 1) /* 4010 */
1788 MIPS_SYS(sys_execve , 0)
1789 MIPS_SYS(sys_chdir , 1)
1790 MIPS_SYS(sys_time , 1)
1791 MIPS_SYS(sys_mknod , 3)
1792 MIPS_SYS(sys_chmod , 2) /* 4015 */
1793 MIPS_SYS(sys_lchown , 3)
1794 MIPS_SYS(sys_ni_syscall , 0)
1795 MIPS_SYS(sys_ni_syscall , 0) /* was sys_stat */
1796 MIPS_SYS(sys_lseek , 3)
1797 MIPS_SYS(sys_getpid , 0) /* 4020 */
1798 MIPS_SYS(sys_mount , 5)
868e34d7 1799 MIPS_SYS(sys_umount , 1)
048f6b4d
FB
1800 MIPS_SYS(sys_setuid , 1)
1801 MIPS_SYS(sys_getuid , 0)
1802 MIPS_SYS(sys_stime , 1) /* 4025 */
1803 MIPS_SYS(sys_ptrace , 4)
1804 MIPS_SYS(sys_alarm , 1)
1805 MIPS_SYS(sys_ni_syscall , 0) /* was sys_fstat */
1806 MIPS_SYS(sys_pause , 0)
1807 MIPS_SYS(sys_utime , 2) /* 4030 */
1808 MIPS_SYS(sys_ni_syscall , 0)
1809 MIPS_SYS(sys_ni_syscall , 0)
1810 MIPS_SYS(sys_access , 2)
1811 MIPS_SYS(sys_nice , 1)
1812 MIPS_SYS(sys_ni_syscall , 0) /* 4035 */
1813 MIPS_SYS(sys_sync , 0)
1814 MIPS_SYS(sys_kill , 2)
1815 MIPS_SYS(sys_rename , 2)
1816 MIPS_SYS(sys_mkdir , 2)
1817 MIPS_SYS(sys_rmdir , 1) /* 4040 */
1818 MIPS_SYS(sys_dup , 1)
1819 MIPS_SYS(sys_pipe , 0)
1820 MIPS_SYS(sys_times , 1)
1821 MIPS_SYS(sys_ni_syscall , 0)
1822 MIPS_SYS(sys_brk , 1) /* 4045 */
1823 MIPS_SYS(sys_setgid , 1)
1824 MIPS_SYS(sys_getgid , 0)
1825 MIPS_SYS(sys_ni_syscall , 0) /* was signal(2) */
1826 MIPS_SYS(sys_geteuid , 0)
1827 MIPS_SYS(sys_getegid , 0) /* 4050 */
1828 MIPS_SYS(sys_acct , 0)
868e34d7 1829 MIPS_SYS(sys_umount2 , 2)
048f6b4d
FB
1830 MIPS_SYS(sys_ni_syscall , 0)
1831 MIPS_SYS(sys_ioctl , 3)
1832 MIPS_SYS(sys_fcntl , 3) /* 4055 */
1833 MIPS_SYS(sys_ni_syscall , 2)
1834 MIPS_SYS(sys_setpgid , 2)
1835 MIPS_SYS(sys_ni_syscall , 0)
1836 MIPS_SYS(sys_olduname , 1)
1837 MIPS_SYS(sys_umask , 1) /* 4060 */
1838 MIPS_SYS(sys_chroot , 1)
1839 MIPS_SYS(sys_ustat , 2)
1840 MIPS_SYS(sys_dup2 , 2)
1841 MIPS_SYS(sys_getppid , 0)
1842 MIPS_SYS(sys_getpgrp , 0) /* 4065 */
1843 MIPS_SYS(sys_setsid , 0)
1844 MIPS_SYS(sys_sigaction , 3)
1845 MIPS_SYS(sys_sgetmask , 0)
1846 MIPS_SYS(sys_ssetmask , 1)
1847 MIPS_SYS(sys_setreuid , 2) /* 4070 */
1848 MIPS_SYS(sys_setregid , 2)
1849 MIPS_SYS(sys_sigsuspend , 0)
1850 MIPS_SYS(sys_sigpending , 1)
1851 MIPS_SYS(sys_sethostname , 2)
1852 MIPS_SYS(sys_setrlimit , 2) /* 4075 */
1853 MIPS_SYS(sys_getrlimit , 2)
1854 MIPS_SYS(sys_getrusage , 2)
1855 MIPS_SYS(sys_gettimeofday, 2)
1856 MIPS_SYS(sys_settimeofday, 2)
1857 MIPS_SYS(sys_getgroups , 2) /* 4080 */
1858 MIPS_SYS(sys_setgroups , 2)
1859 MIPS_SYS(sys_ni_syscall , 0) /* old_select */
1860 MIPS_SYS(sys_symlink , 2)
1861 MIPS_SYS(sys_ni_syscall , 0) /* was sys_lstat */
1862 MIPS_SYS(sys_readlink , 3) /* 4085 */
1863 MIPS_SYS(sys_uselib , 1)
1864 MIPS_SYS(sys_swapon , 2)
1865 MIPS_SYS(sys_reboot , 3)
1866 MIPS_SYS(old_readdir , 3)
1867 MIPS_SYS(old_mmap , 6) /* 4090 */
1868 MIPS_SYS(sys_munmap , 2)
1869 MIPS_SYS(sys_truncate , 2)
1870 MIPS_SYS(sys_ftruncate , 2)
1871 MIPS_SYS(sys_fchmod , 2)
1872 MIPS_SYS(sys_fchown , 3) /* 4095 */
1873 MIPS_SYS(sys_getpriority , 2)
1874 MIPS_SYS(sys_setpriority , 3)
1875 MIPS_SYS(sys_ni_syscall , 0)
1876 MIPS_SYS(sys_statfs , 2)
1877 MIPS_SYS(sys_fstatfs , 2) /* 4100 */
1878 MIPS_SYS(sys_ni_syscall , 0) /* was ioperm(2) */
1879 MIPS_SYS(sys_socketcall , 2)
1880 MIPS_SYS(sys_syslog , 3)
1881 MIPS_SYS(sys_setitimer , 3)
1882 MIPS_SYS(sys_getitimer , 2) /* 4105 */
1883 MIPS_SYS(sys_newstat , 2)
1884 MIPS_SYS(sys_newlstat , 2)
1885 MIPS_SYS(sys_newfstat , 2)
1886 MIPS_SYS(sys_uname , 1)
1887 MIPS_SYS(sys_ni_syscall , 0) /* 4110 was iopl(2) */
1888 MIPS_SYS(sys_vhangup , 0)
1889 MIPS_SYS(sys_ni_syscall , 0) /* was sys_idle() */
1890 MIPS_SYS(sys_ni_syscall , 0) /* was sys_vm86 */
1891 MIPS_SYS(sys_wait4 , 4)
1892 MIPS_SYS(sys_swapoff , 1) /* 4115 */
1893 MIPS_SYS(sys_sysinfo , 1)
1894 MIPS_SYS(sys_ipc , 6)
1895 MIPS_SYS(sys_fsync , 1)
1896 MIPS_SYS(sys_sigreturn , 0)
18113962 1897 MIPS_SYS(sys_clone , 6) /* 4120 */
048f6b4d
FB
1898 MIPS_SYS(sys_setdomainname, 2)
1899 MIPS_SYS(sys_newuname , 1)
1900 MIPS_SYS(sys_ni_syscall , 0) /* sys_modify_ldt */
1901 MIPS_SYS(sys_adjtimex , 1)
1902 MIPS_SYS(sys_mprotect , 3) /* 4125 */
1903 MIPS_SYS(sys_sigprocmask , 3)
1904 MIPS_SYS(sys_ni_syscall , 0) /* was create_module */
1905 MIPS_SYS(sys_init_module , 5)
1906 MIPS_SYS(sys_delete_module, 1)
1907 MIPS_SYS(sys_ni_syscall , 0) /* 4130 was get_kernel_syms */
1908 MIPS_SYS(sys_quotactl , 0)
1909 MIPS_SYS(sys_getpgid , 1)
1910 MIPS_SYS(sys_fchdir , 1)
1911 MIPS_SYS(sys_bdflush , 2)
1912 MIPS_SYS(sys_sysfs , 3) /* 4135 */
1913 MIPS_SYS(sys_personality , 1)
1914 MIPS_SYS(sys_ni_syscall , 0) /* for afs_syscall */
1915 MIPS_SYS(sys_setfsuid , 1)
1916 MIPS_SYS(sys_setfsgid , 1)
1917 MIPS_SYS(sys_llseek , 5) /* 4140 */
1918 MIPS_SYS(sys_getdents , 3)
1919 MIPS_SYS(sys_select , 5)
1920 MIPS_SYS(sys_flock , 2)
1921 MIPS_SYS(sys_msync , 3)
1922 MIPS_SYS(sys_readv , 3) /* 4145 */
1923 MIPS_SYS(sys_writev , 3)
1924 MIPS_SYS(sys_cacheflush , 3)
1925 MIPS_SYS(sys_cachectl , 3)
1926 MIPS_SYS(sys_sysmips , 4)
1927 MIPS_SYS(sys_ni_syscall , 0) /* 4150 */
1928 MIPS_SYS(sys_getsid , 1)
1929 MIPS_SYS(sys_fdatasync , 0)
1930 MIPS_SYS(sys_sysctl , 1)
1931 MIPS_SYS(sys_mlock , 2)
1932 MIPS_SYS(sys_munlock , 2) /* 4155 */
1933 MIPS_SYS(sys_mlockall , 1)
1934 MIPS_SYS(sys_munlockall , 0)
1935 MIPS_SYS(sys_sched_setparam, 2)
1936 MIPS_SYS(sys_sched_getparam, 2)
1937 MIPS_SYS(sys_sched_setscheduler, 3) /* 4160 */
1938 MIPS_SYS(sys_sched_getscheduler, 1)
1939 MIPS_SYS(sys_sched_yield , 0)
1940 MIPS_SYS(sys_sched_get_priority_max, 1)
1941 MIPS_SYS(sys_sched_get_priority_min, 1)
1942 MIPS_SYS(sys_sched_rr_get_interval, 2) /* 4165 */
1943 MIPS_SYS(sys_nanosleep, 2)
b0932e06 1944 MIPS_SYS(sys_mremap , 5)
048f6b4d
FB
1945 MIPS_SYS(sys_accept , 3)
1946 MIPS_SYS(sys_bind , 3)
1947 MIPS_SYS(sys_connect , 3) /* 4170 */
1948 MIPS_SYS(sys_getpeername , 3)
1949 MIPS_SYS(sys_getsockname , 3)
1950 MIPS_SYS(sys_getsockopt , 5)
1951 MIPS_SYS(sys_listen , 2)
1952 MIPS_SYS(sys_recv , 4) /* 4175 */
1953 MIPS_SYS(sys_recvfrom , 6)
1954 MIPS_SYS(sys_recvmsg , 3)
1955 MIPS_SYS(sys_send , 4)
1956 MIPS_SYS(sys_sendmsg , 3)
1957 MIPS_SYS(sys_sendto , 6) /* 4180 */
1958 MIPS_SYS(sys_setsockopt , 5)
1959 MIPS_SYS(sys_shutdown , 2)
1960 MIPS_SYS(sys_socket , 3)
1961 MIPS_SYS(sys_socketpair , 4)
1962 MIPS_SYS(sys_setresuid , 3) /* 4185 */
1963 MIPS_SYS(sys_getresuid , 3)
1964 MIPS_SYS(sys_ni_syscall , 0) /* was sys_query_module */
1965 MIPS_SYS(sys_poll , 3)
1966 MIPS_SYS(sys_nfsservctl , 3)
1967 MIPS_SYS(sys_setresgid , 3) /* 4190 */
1968 MIPS_SYS(sys_getresgid , 3)
1969 MIPS_SYS(sys_prctl , 5)
1970 MIPS_SYS(sys_rt_sigreturn, 0)
1971 MIPS_SYS(sys_rt_sigaction, 4)
1972 MIPS_SYS(sys_rt_sigprocmask, 4) /* 4195 */
1973 MIPS_SYS(sys_rt_sigpending, 2)
1974 MIPS_SYS(sys_rt_sigtimedwait, 4)
1975 MIPS_SYS(sys_rt_sigqueueinfo, 3)
1976 MIPS_SYS(sys_rt_sigsuspend, 0)
1977 MIPS_SYS(sys_pread64 , 6) /* 4200 */
1978 MIPS_SYS(sys_pwrite64 , 6)
1979 MIPS_SYS(sys_chown , 3)
1980 MIPS_SYS(sys_getcwd , 2)
1981 MIPS_SYS(sys_capget , 2)
1982 MIPS_SYS(sys_capset , 2) /* 4205 */
053ebb27 1983 MIPS_SYS(sys_sigaltstack , 2)
048f6b4d
FB
1984 MIPS_SYS(sys_sendfile , 4)
1985 MIPS_SYS(sys_ni_syscall , 0)
1986 MIPS_SYS(sys_ni_syscall , 0)
1987 MIPS_SYS(sys_mmap2 , 6) /* 4210 */
1988 MIPS_SYS(sys_truncate64 , 4)
1989 MIPS_SYS(sys_ftruncate64 , 4)
1990 MIPS_SYS(sys_stat64 , 2)
1991 MIPS_SYS(sys_lstat64 , 2)
1992 MIPS_SYS(sys_fstat64 , 2) /* 4215 */
1993 MIPS_SYS(sys_pivot_root , 2)
1994 MIPS_SYS(sys_mincore , 3)
1995 MIPS_SYS(sys_madvise , 3)
1996 MIPS_SYS(sys_getdents64 , 3)
1997 MIPS_SYS(sys_fcntl64 , 3) /* 4220 */
1998 MIPS_SYS(sys_ni_syscall , 0)
1999 MIPS_SYS(sys_gettid , 0)
2000 MIPS_SYS(sys_readahead , 5)
2001 MIPS_SYS(sys_setxattr , 5)
2002 MIPS_SYS(sys_lsetxattr , 5) /* 4225 */
2003 MIPS_SYS(sys_fsetxattr , 5)
2004 MIPS_SYS(sys_getxattr , 4)
2005 MIPS_SYS(sys_lgetxattr , 4)
2006 MIPS_SYS(sys_fgetxattr , 4)
2007 MIPS_SYS(sys_listxattr , 3) /* 4230 */
2008 MIPS_SYS(sys_llistxattr , 3)
2009 MIPS_SYS(sys_flistxattr , 3)
2010 MIPS_SYS(sys_removexattr , 2)
2011 MIPS_SYS(sys_lremovexattr, 2)
2012 MIPS_SYS(sys_fremovexattr, 2) /* 4235 */
2013 MIPS_SYS(sys_tkill , 2)
2014 MIPS_SYS(sys_sendfile64 , 5)
43be1343 2015 MIPS_SYS(sys_futex , 6)
048f6b4d
FB
2016 MIPS_SYS(sys_sched_setaffinity, 3)
2017 MIPS_SYS(sys_sched_getaffinity, 3) /* 4240 */
2018 MIPS_SYS(sys_io_setup , 2)
2019 MIPS_SYS(sys_io_destroy , 1)
2020 MIPS_SYS(sys_io_getevents, 5)
2021 MIPS_SYS(sys_io_submit , 3)
2022 MIPS_SYS(sys_io_cancel , 3) /* 4245 */
2023 MIPS_SYS(sys_exit_group , 1)
2024 MIPS_SYS(sys_lookup_dcookie, 3)
2025 MIPS_SYS(sys_epoll_create, 1)
2026 MIPS_SYS(sys_epoll_ctl , 4)
2027 MIPS_SYS(sys_epoll_wait , 3) /* 4250 */
2028 MIPS_SYS(sys_remap_file_pages, 5)
2029 MIPS_SYS(sys_set_tid_address, 1)
2030 MIPS_SYS(sys_restart_syscall, 0)
2031 MIPS_SYS(sys_fadvise64_64, 7)
2032 MIPS_SYS(sys_statfs64 , 3) /* 4255 */
2033 MIPS_SYS(sys_fstatfs64 , 2)
2034 MIPS_SYS(sys_timer_create, 3)
2035 MIPS_SYS(sys_timer_settime, 4)
2036 MIPS_SYS(sys_timer_gettime, 2)
2037 MIPS_SYS(sys_timer_getoverrun, 1) /* 4260 */
2038 MIPS_SYS(sys_timer_delete, 1)
2039 MIPS_SYS(sys_clock_settime, 2)
2040 MIPS_SYS(sys_clock_gettime, 2)
2041 MIPS_SYS(sys_clock_getres, 2)
2042 MIPS_SYS(sys_clock_nanosleep, 4) /* 4265 */
2043 MIPS_SYS(sys_tgkill , 3)
2044 MIPS_SYS(sys_utimes , 2)
2045 MIPS_SYS(sys_mbind , 4)
2046 MIPS_SYS(sys_ni_syscall , 0) /* sys_get_mempolicy */
2047 MIPS_SYS(sys_ni_syscall , 0) /* 4270 sys_set_mempolicy */
2048 MIPS_SYS(sys_mq_open , 4)
2049 MIPS_SYS(sys_mq_unlink , 1)
2050 MIPS_SYS(sys_mq_timedsend, 5)
2051 MIPS_SYS(sys_mq_timedreceive, 5)
2052 MIPS_SYS(sys_mq_notify , 2) /* 4275 */
2053 MIPS_SYS(sys_mq_getsetattr, 3)
2054 MIPS_SYS(sys_ni_syscall , 0) /* sys_vserver */
2055 MIPS_SYS(sys_waitid , 4)
2056 MIPS_SYS(sys_ni_syscall , 0) /* available, was setaltroot */
2057 MIPS_SYS(sys_add_key , 5)
388bb21a 2058 MIPS_SYS(sys_request_key, 4)
048f6b4d 2059 MIPS_SYS(sys_keyctl , 5)
6f5b89a0 2060 MIPS_SYS(sys_set_thread_area, 1)
388bb21a
TS
2061 MIPS_SYS(sys_inotify_init, 0)
2062 MIPS_SYS(sys_inotify_add_watch, 3) /* 4285 */
2063 MIPS_SYS(sys_inotify_rm_watch, 2)
2064 MIPS_SYS(sys_migrate_pages, 4)
2065 MIPS_SYS(sys_openat, 4)
2066 MIPS_SYS(sys_mkdirat, 3)
2067 MIPS_SYS(sys_mknodat, 4) /* 4290 */
2068 MIPS_SYS(sys_fchownat, 5)
2069 MIPS_SYS(sys_futimesat, 3)
2070 MIPS_SYS(sys_fstatat64, 4)
2071 MIPS_SYS(sys_unlinkat, 3)
2072 MIPS_SYS(sys_renameat, 4) /* 4295 */
2073 MIPS_SYS(sys_linkat, 5)
2074 MIPS_SYS(sys_symlinkat, 3)
2075 MIPS_SYS(sys_readlinkat, 4)
2076 MIPS_SYS(sys_fchmodat, 3)
2077 MIPS_SYS(sys_faccessat, 3) /* 4300 */
2078 MIPS_SYS(sys_pselect6, 6)
2079 MIPS_SYS(sys_ppoll, 5)
2080 MIPS_SYS(sys_unshare, 1)
b0932e06 2081 MIPS_SYS(sys_splice, 6)
388bb21a
TS
2082 MIPS_SYS(sys_sync_file_range, 7) /* 4305 */
2083 MIPS_SYS(sys_tee, 4)
2084 MIPS_SYS(sys_vmsplice, 4)
2085 MIPS_SYS(sys_move_pages, 6)
2086 MIPS_SYS(sys_set_robust_list, 2)
2087 MIPS_SYS(sys_get_robust_list, 3) /* 4310 */
2088 MIPS_SYS(sys_kexec_load, 4)
2089 MIPS_SYS(sys_getcpu, 3)
2090 MIPS_SYS(sys_epoll_pwait, 6)
2091 MIPS_SYS(sys_ioprio_set, 3)
2092 MIPS_SYS(sys_ioprio_get, 2)
d979e8eb
PM
2093 MIPS_SYS(sys_utimensat, 4)
2094 MIPS_SYS(sys_signalfd, 3)
2095 MIPS_SYS(sys_ni_syscall, 0) /* was timerfd */
2096 MIPS_SYS(sys_eventfd, 1)
2097 MIPS_SYS(sys_fallocate, 6) /* 4320 */
2098 MIPS_SYS(sys_timerfd_create, 2)
2099 MIPS_SYS(sys_timerfd_gettime, 2)
2100 MIPS_SYS(sys_timerfd_settime, 4)
2101 MIPS_SYS(sys_signalfd4, 4)
2102 MIPS_SYS(sys_eventfd2, 2) /* 4325 */
2103 MIPS_SYS(sys_epoll_create1, 1)
2104 MIPS_SYS(sys_dup3, 3)
2105 MIPS_SYS(sys_pipe2, 2)
2106 MIPS_SYS(sys_inotify_init1, 1)
2e6eeb67
AM
2107 MIPS_SYS(sys_preadv, 5) /* 4330 */
2108 MIPS_SYS(sys_pwritev, 5)
d979e8eb
PM
2109 MIPS_SYS(sys_rt_tgsigqueueinfo, 4)
2110 MIPS_SYS(sys_perf_event_open, 5)
2111 MIPS_SYS(sys_accept4, 4)
2112 MIPS_SYS(sys_recvmmsg, 5) /* 4335 */
2113 MIPS_SYS(sys_fanotify_init, 2)
2114 MIPS_SYS(sys_fanotify_mark, 6)
2115 MIPS_SYS(sys_prlimit64, 4)
2116 MIPS_SYS(sys_name_to_handle_at, 5)
2117 MIPS_SYS(sys_open_by_handle_at, 3) /* 4340 */
2118 MIPS_SYS(sys_clock_adjtime, 2)
2119 MIPS_SYS(sys_syncfs, 1)
2e6eeb67
AM
2120 MIPS_SYS(sys_sendmmsg, 4)
2121 MIPS_SYS(sys_setns, 2)
2122 MIPS_SYS(sys_process_vm_readv, 6) /* 345 */
2123 MIPS_SYS(sys_process_vm_writev, 6)
2124 MIPS_SYS(sys_kcmp, 5)
2125 MIPS_SYS(sys_finit_module, 3)
2126 MIPS_SYS(sys_sched_setattr, 2)
2127 MIPS_SYS(sys_sched_getattr, 3) /* 350 */
2128 MIPS_SYS(sys_renameat2, 5)
2129 MIPS_SYS(sys_seccomp, 3)
2130 MIPS_SYS(sys_getrandom, 3)
2131 MIPS_SYS(sys_memfd_create, 2)
2132 MIPS_SYS(sys_bpf, 3) /* 355 */
2133 MIPS_SYS(sys_execveat, 5)
2134 MIPS_SYS(sys_userfaultfd, 1)
2135 MIPS_SYS(sys_membarrier, 2)
2136 MIPS_SYS(sys_mlock2, 3)
2137 MIPS_SYS(sys_copy_file_range, 6) /* 360 */
2138 MIPS_SYS(sys_preadv2, 6)
2139 MIPS_SYS(sys_pwritev2, 6)
048f6b4d 2140};
ff4f7382
RH
2141# undef MIPS_SYS
2142# endif /* O32 */
048f6b4d 2143
590bc601
PB
2144static int do_store_exclusive(CPUMIPSState *env)
2145{
2146 target_ulong addr;
2147 target_ulong page_addr;
2148 target_ulong val;
2149 int flags;
2150 int segv = 0;
2151 int reg;
2152 int d;
2153
5499b6ff 2154 addr = env->lladdr;
590bc601
PB
2155 page_addr = addr & TARGET_PAGE_MASK;
2156 start_exclusive();
2157 mmap_lock();
2158 flags = page_get_flags(page_addr);
2159 if ((flags & PAGE_READ) == 0) {
2160 segv = 1;
2161 } else {
2162 reg = env->llreg & 0x1f;
2163 d = (env->llreg & 0x20) != 0;
2164 if (d) {
2165 segv = get_user_s64(val, addr);
2166 } else {
2167 segv = get_user_s32(val, addr);
2168 }
2169 if (!segv) {
2170 if (val != env->llval) {
2171 env->active_tc.gpr[reg] = 0;
2172 } else {
2173 if (d) {
2174 segv = put_user_u64(env->llnewval, addr);
2175 } else {
2176 segv = put_user_u32(env->llnewval, addr);
2177 }
2178 if (!segv) {
2179 env->active_tc.gpr[reg] = 1;
2180 }
2181 }
2182 }
2183 }
5499b6ff 2184 env->lladdr = -1;
590bc601
PB
2185 if (!segv) {
2186 env->active_tc.PC += 4;
2187 }
2188 mmap_unlock();
2189 end_exclusive();
2190 return segv;
2191}
2192
54b2f42c
MI
2193/* Break codes */
2194enum {
2195 BRK_OVERFLOW = 6,
2196 BRK_DIVZERO = 7
2197};
2198
2199static int do_break(CPUMIPSState *env, target_siginfo_t *info,
2200 unsigned int code)
2201{
2202 int ret = -1;
2203
2204 switch (code) {
2205 case BRK_OVERFLOW:
2206 case BRK_DIVZERO:
2207 info->si_signo = TARGET_SIGFPE;
2208 info->si_errno = 0;
2209 info->si_code = (code == BRK_OVERFLOW) ? FPE_INTOVF : FPE_INTDIV;
9d2803f7 2210 queue_signal(env, info->si_signo, QEMU_SI_FAULT, &*info);
54b2f42c
MI
2211 ret = 0;
2212 break;
2213 default:
b51910ba
PJ
2214 info->si_signo = TARGET_SIGTRAP;
2215 info->si_errno = 0;
9d2803f7 2216 queue_signal(env, info->si_signo, QEMU_SI_FAULT, &*info);
b51910ba 2217 ret = 0;
54b2f42c
MI
2218 break;
2219 }
2220
2221 return ret;
2222}
2223
048f6b4d
FB
2224void cpu_loop(CPUMIPSState *env)
2225{
0315c31c 2226 CPUState *cs = CPU(mips_env_get_cpu(env));
c227f099 2227 target_siginfo_t info;
ff4f7382
RH
2228 int trapnr;
2229 abi_long ret;
2230# ifdef TARGET_ABI_MIPSO32
048f6b4d 2231 unsigned int syscall_num;
ff4f7382 2232# endif
048f6b4d
FB
2233
2234 for(;;) {
0315c31c 2235 cpu_exec_start(cs);
8642c1b8 2236 trapnr = cpu_exec(cs);
0315c31c 2237 cpu_exec_end(cs);
d148d90e
SF
2238 process_queued_cpu_work(cs);
2239
048f6b4d
FB
2240 switch(trapnr) {
2241 case EXCP_SYSCALL:
b5dc7732 2242 env->active_tc.PC += 4;
ff4f7382
RH
2243# ifdef TARGET_ABI_MIPSO32
2244 syscall_num = env->active_tc.gpr[2] - 4000;
388bb21a 2245 if (syscall_num >= sizeof(mips_syscall_args)) {
7c2f6157 2246 ret = -TARGET_ENOSYS;
388bb21a
TS
2247 } else {
2248 int nb_args;
992f48a0
BS
2249 abi_ulong sp_reg;
2250 abi_ulong arg5 = 0, arg6 = 0, arg7 = 0, arg8 = 0;
388bb21a
TS
2251
2252 nb_args = mips_syscall_args[syscall_num];
b5dc7732 2253 sp_reg = env->active_tc.gpr[29];
388bb21a
TS
2254 switch (nb_args) {
2255 /* these arguments are taken from the stack */
94c19610
ACH
2256 case 8:
2257 if ((ret = get_user_ual(arg8, sp_reg + 28)) != 0) {
2258 goto done_syscall;
2259 }
2260 case 7:
2261 if ((ret = get_user_ual(arg7, sp_reg + 24)) != 0) {
2262 goto done_syscall;
2263 }
2264 case 6:
2265 if ((ret = get_user_ual(arg6, sp_reg + 20)) != 0) {
2266 goto done_syscall;
2267 }
2268 case 5:
2269 if ((ret = get_user_ual(arg5, sp_reg + 16)) != 0) {
2270 goto done_syscall;
2271 }
388bb21a
TS
2272 default:
2273 break;
048f6b4d 2274 }
b5dc7732
TS
2275 ret = do_syscall(env, env->active_tc.gpr[2],
2276 env->active_tc.gpr[4],
2277 env->active_tc.gpr[5],
2278 env->active_tc.gpr[6],
2279 env->active_tc.gpr[7],
5945cfcb 2280 arg5, arg6, arg7, arg8);
388bb21a 2281 }
94c19610 2282done_syscall:
ff4f7382
RH
2283# else
2284 ret = do_syscall(env, env->active_tc.gpr[2],
2285 env->active_tc.gpr[4], env->active_tc.gpr[5],
2286 env->active_tc.gpr[6], env->active_tc.gpr[7],
2287 env->active_tc.gpr[8], env->active_tc.gpr[9],
2288 env->active_tc.gpr[10], env->active_tc.gpr[11]);
2289# endif /* O32 */
2eb3ae27
TB
2290 if (ret == -TARGET_ERESTARTSYS) {
2291 env->active_tc.PC -= 4;
2292 break;
2293 }
0b1bcb00
PB
2294 if (ret == -TARGET_QEMU_ESIGRETURN) {
2295 /* Returning from a successful sigreturn syscall.
2296 Avoid clobbering register state. */
2297 break;
2298 }
ff4f7382 2299 if ((abi_ulong)ret >= (abi_ulong)-1133) {
b5dc7732 2300 env->active_tc.gpr[7] = 1; /* error flag */
388bb21a
TS
2301 ret = -ret;
2302 } else {
b5dc7732 2303 env->active_tc.gpr[7] = 0; /* error flag */
048f6b4d 2304 }
b5dc7732 2305 env->active_tc.gpr[2] = ret;
048f6b4d 2306 break;
ca7c2b1b
TS
2307 case EXCP_TLBL:
2308 case EXCP_TLBS:
e6e5bd2d
WT
2309 case EXCP_AdEL:
2310 case EXCP_AdES:
e4474235
PB
2311 info.si_signo = TARGET_SIGSEGV;
2312 info.si_errno = 0;
2313 /* XXX: check env->error_code */
2314 info.si_code = TARGET_SEGV_MAPERR;
2315 info._sifields._sigfault._addr = env->CP0_BadVAddr;
9d2803f7 2316 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e4474235 2317 break;
6900e84b 2318 case EXCP_CpU:
048f6b4d 2319 case EXCP_RI:
bc1ad2de
FB
2320 info.si_signo = TARGET_SIGILL;
2321 info.si_errno = 0;
2322 info.si_code = 0;
9d2803f7 2323 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
048f6b4d 2324 break;
106ec879
FB
2325 case EXCP_INTERRUPT:
2326 /* just indicate that signals should be handled asap */
2327 break;
d08b2a28
PB
2328 case EXCP_DEBUG:
2329 {
2330 int sig;
2331
db6b81d4 2332 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
d08b2a28
PB
2333 if (sig)
2334 {
2335 info.si_signo = sig;
2336 info.si_errno = 0;
2337 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 2338 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
d08b2a28
PB
2339 }
2340 }
2341 break;
590bc601
PB
2342 case EXCP_SC:
2343 if (do_store_exclusive(env)) {
2344 info.si_signo = TARGET_SIGSEGV;
2345 info.si_errno = 0;
2346 info.si_code = TARGET_SEGV_MAPERR;
2347 info._sifields._sigfault._addr = env->active_tc.PC;
9d2803f7 2348 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
590bc601
PB
2349 }
2350 break;
853c3240
JL
2351 case EXCP_DSPDIS:
2352 info.si_signo = TARGET_SIGILL;
2353 info.si_errno = 0;
2354 info.si_code = TARGET_ILL_ILLOPC;
9d2803f7 2355 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
853c3240 2356 break;
54b2f42c
MI
2357 /* The code below was inspired by the MIPS Linux kernel trap
2358 * handling code in arch/mips/kernel/traps.c.
2359 */
2360 case EXCP_BREAK:
2361 {
2362 abi_ulong trap_instr;
2363 unsigned int code;
2364
a0333817
KCY
2365 if (env->hflags & MIPS_HFLAG_M16) {
2366 if (env->insn_flags & ASE_MICROMIPS) {
2367 /* microMIPS mode */
1308c464
KCY
2368 ret = get_user_u16(trap_instr, env->active_tc.PC);
2369 if (ret != 0) {
2370 goto error;
2371 }
a0333817 2372
1308c464
KCY
2373 if ((trap_instr >> 10) == 0x11) {
2374 /* 16-bit instruction */
2375 code = trap_instr & 0xf;
2376 } else {
2377 /* 32-bit instruction */
2378 abi_ulong instr_lo;
2379
2380 ret = get_user_u16(instr_lo,
2381 env->active_tc.PC + 2);
2382 if (ret != 0) {
2383 goto error;
2384 }
2385 trap_instr = (trap_instr << 16) | instr_lo;
2386 code = ((trap_instr >> 6) & ((1 << 20) - 1));
2387 /* Unfortunately, microMIPS also suffers from
2388 the old assembler bug... */
2389 if (code >= (1 << 10)) {
2390 code >>= 10;
2391 }
2392 }
a0333817
KCY
2393 } else {
2394 /* MIPS16e mode */
2395 ret = get_user_u16(trap_instr, env->active_tc.PC);
2396 if (ret != 0) {
2397 goto error;
2398 }
2399 code = (trap_instr >> 6) & 0x3f;
a0333817
KCY
2400 }
2401 } else {
f01a361b 2402 ret = get_user_u32(trap_instr, env->active_tc.PC);
1308c464
KCY
2403 if (ret != 0) {
2404 goto error;
2405 }
54b2f42c 2406
1308c464
KCY
2407 /* As described in the original Linux kernel code, the
2408 * below checks on 'code' are to work around an old
2409 * assembly bug.
2410 */
2411 code = ((trap_instr >> 6) & ((1 << 20) - 1));
2412 if (code >= (1 << 10)) {
2413 code >>= 10;
2414 }
54b2f42c
MI
2415 }
2416
2417 if (do_break(env, &info, code) != 0) {
2418 goto error;
2419 }
2420 }
2421 break;
2422 case EXCP_TRAP:
2423 {
2424 abi_ulong trap_instr;
2425 unsigned int code = 0;
2426
a0333817
KCY
2427 if (env->hflags & MIPS_HFLAG_M16) {
2428 /* microMIPS mode */
2429 abi_ulong instr[2];
2430
2431 ret = get_user_u16(instr[0], env->active_tc.PC) ||
2432 get_user_u16(instr[1], env->active_tc.PC + 2);
2433
2434 trap_instr = (instr[0] << 16) | instr[1];
2435 } else {
f01a361b 2436 ret = get_user_u32(trap_instr, env->active_tc.PC);
a0333817
KCY
2437 }
2438
54b2f42c
MI
2439 if (ret != 0) {
2440 goto error;
2441 }
2442
2443 /* The immediate versions don't provide a code. */
2444 if (!(trap_instr & 0xFC000000)) {
a0333817
KCY
2445 if (env->hflags & MIPS_HFLAG_M16) {
2446 /* microMIPS mode */
2447 code = ((trap_instr >> 12) & ((1 << 4) - 1));
2448 } else {
2449 code = ((trap_instr >> 6) & ((1 << 10) - 1));
2450 }
54b2f42c
MI
2451 }
2452
2453 if (do_break(env, &info, code) != 0) {
2454 goto error;
2455 }
2456 }
2457 break;
fdbc2b57
RH
2458 case EXCP_ATOMIC:
2459 cpu_exec_step_atomic(cs);
2460 break;
048f6b4d 2461 default:
54b2f42c 2462error:
120a9848 2463 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
048f6b4d
FB
2464 abort();
2465 }
2466 process_pending_signals(env);
2467 }
2468}
2469#endif
2470
a0a839b6
MV
2471#ifdef TARGET_NIOS2
2472
2473void cpu_loop(CPUNios2State *env)
2474{
2475 CPUState *cs = ENV_GET_CPU(env);
2476 Nios2CPU *cpu = NIOS2_CPU(cs);
2477 target_siginfo_t info;
2478 int trapnr, gdbsig, ret;
2479
2480 for (;;) {
2481 cpu_exec_start(cs);
2482 trapnr = cpu_exec(cs);
2483 cpu_exec_end(cs);
2484 gdbsig = 0;
2485
2486 switch (trapnr) {
2487 case EXCP_INTERRUPT:
2488 /* just indicate that signals should be handled asap */
2489 break;
2490 case EXCP_TRAP:
2491 if (env->regs[R_AT] == 0) {
2492 abi_long ret;
2493 qemu_log_mask(CPU_LOG_INT, "\nSyscall\n");
2494
2495 ret = do_syscall(env, env->regs[2],
2496 env->regs[4], env->regs[5], env->regs[6],
2497 env->regs[7], env->regs[8], env->regs[9],
2498 0, 0);
2499
2500 if (env->regs[2] == 0) { /* FIXME: syscall 0 workaround */
2501 ret = 0;
2502 }
2503
2504 env->regs[2] = abs(ret);
2505 /* Return value is 0..4096 */
2506 env->regs[7] = (ret > 0xfffffffffffff000ULL);
2507 env->regs[CR_ESTATUS] = env->regs[CR_STATUS];
2508 env->regs[CR_STATUS] &= ~0x3;
2509 env->regs[R_EA] = env->regs[R_PC] + 4;
2510 env->regs[R_PC] += 4;
2511 break;
2512 } else {
2513 qemu_log_mask(CPU_LOG_INT, "\nTrap\n");
2514
2515 env->regs[CR_ESTATUS] = env->regs[CR_STATUS];
2516 env->regs[CR_STATUS] &= ~0x3;
2517 env->regs[R_EA] = env->regs[R_PC] + 4;
2518 env->regs[R_PC] = cpu->exception_addr;
2519
2520 gdbsig = TARGET_SIGTRAP;
2521 break;
2522 }
2523 case 0xaa:
2524 switch (env->regs[R_PC]) {
2525 /*case 0x1000:*/ /* TODO:__kuser_helper_version */
2526 case 0x1004: /* __kuser_cmpxchg */
2527 start_exclusive();
2528 if (env->regs[4] & 0x3) {
2529 goto kuser_fail;
2530 }
2531 ret = get_user_u32(env->regs[2], env->regs[4]);
2532 if (ret) {
2533 end_exclusive();
2534 goto kuser_fail;
2535 }
2536 env->regs[2] -= env->regs[5];
2537 if (env->regs[2] == 0) {
2538 put_user_u32(env->regs[6], env->regs[4]);
2539 }
2540 end_exclusive();
2541 env->regs[R_PC] = env->regs[R_RA];
2542 break;
2543 /*case 0x1040:*/ /* TODO:__kuser_sigtramp */
2544 default:
2545 ;
2546kuser_fail:
2547 info.si_signo = TARGET_SIGSEGV;
2548 info.si_errno = 0;
2549 /* TODO: check env->error_code */
2550 info.si_code = TARGET_SEGV_MAPERR;
2551 info._sifields._sigfault._addr = env->regs[R_PC];
2552 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2553 }
2554 break;
2555 default:
2556 EXCP_DUMP(env, "\nqemu: unhandled CPU exception %#x - aborting\n",
2557 trapnr);
2558 gdbsig = TARGET_SIGILL;
2559 break;
2560 }
2561 if (gdbsig) {
2562 gdb_handlesig(cs, gdbsig);
2563 if (gdbsig != TARGET_SIGTRAP) {
2564 exit(EXIT_FAILURE);
2565 }
2566 }
2567
2568 process_pending_signals(env);
2569 }
2570}
2571
2572#endif /* TARGET_NIOS2 */
2573
d962783e
JL
2574#ifdef TARGET_OPENRISC
2575
2576void cpu_loop(CPUOpenRISCState *env)
2577{
878096ee 2578 CPUState *cs = CPU(openrisc_env_get_cpu(env));
a0adc417 2579 int trapnr;
7fe7231a 2580 abi_long ret;
a0adc417 2581 target_siginfo_t info;
d962783e
JL
2582
2583 for (;;) {
b040bc9c 2584 cpu_exec_start(cs);
8642c1b8 2585 trapnr = cpu_exec(cs);
b040bc9c 2586 cpu_exec_end(cs);
d148d90e 2587 process_queued_cpu_work(cs);
d962783e
JL
2588
2589 switch (trapnr) {
d962783e
JL
2590 case EXCP_SYSCALL:
2591 env->pc += 4; /* 0xc00; */
7fe7231a
TB
2592 ret = do_syscall(env,
2593 env->gpr[11], /* return value */
2594 env->gpr[3], /* r3 - r7 are params */
2595 env->gpr[4],
2596 env->gpr[5],
2597 env->gpr[6],
2598 env->gpr[7],
2599 env->gpr[8], 0, 0);
2600 if (ret == -TARGET_ERESTARTSYS) {
2601 env->pc -= 4;
2602 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
2603 env->gpr[11] = ret;
2604 }
d962783e 2605 break;
a0adc417
RH
2606 case EXCP_DPF:
2607 case EXCP_IPF:
2608 case EXCP_RANGE:
2609 info.si_signo = TARGET_SIGSEGV;
2610 info.si_errno = 0;
2611 info.si_code = TARGET_SEGV_MAPERR;
2612 info._sifields._sigfault._addr = env->pc;
2613 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2614 break;
2615 case EXCP_ALIGN:
2616 info.si_signo = TARGET_SIGBUS;
2617 info.si_errno = 0;
2618 info.si_code = TARGET_BUS_ADRALN;
2619 info._sifields._sigfault._addr = env->pc;
2620 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2621 break;
2622 case EXCP_ILLEGAL:
2623 info.si_signo = TARGET_SIGILL;
2624 info.si_errno = 0;
2625 info.si_code = TARGET_ILL_ILLOPC;
2626 info._sifields._sigfault._addr = env->pc;
2627 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2628 break;
d962783e 2629 case EXCP_FPE:
a0adc417
RH
2630 info.si_signo = TARGET_SIGFPE;
2631 info.si_errno = 0;
2632 info.si_code = 0;
2633 info._sifields._sigfault._addr = env->pc;
2634 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
d962783e 2635 break;
a0adc417
RH
2636 case EXCP_INTERRUPT:
2637 /* We processed the pending cpu work above. */
d962783e 2638 break;
a0adc417
RH
2639 case EXCP_DEBUG:
2640 trapnr = gdb_handlesig(cs, TARGET_SIGTRAP);
2641 if (trapnr) {
2642 info.si_signo = trapnr;
2643 info.si_errno = 0;
2644 info.si_code = TARGET_TRAP_BRKPT;
2645 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2646 }
d962783e 2647 break;
fdbc2b57
RH
2648 case EXCP_ATOMIC:
2649 cpu_exec_step_atomic(cs);
2650 break;
d962783e 2651 default:
a0adc417 2652 g_assert_not_reached();
d962783e 2653 }
d962783e
JL
2654 process_pending_signals(env);
2655 }
2656}
2657
2658#endif /* TARGET_OPENRISC */
2659
fdf9b3e8 2660#ifdef TARGET_SH4
05390248 2661void cpu_loop(CPUSH4State *env)
fdf9b3e8 2662{
878096ee 2663 CPUState *cs = CPU(sh_env_get_cpu(env));
fdf9b3e8 2664 int trapnr, ret;
c227f099 2665 target_siginfo_t info;
3b46e624 2666
fdf9b3e8 2667 while (1) {
b040bc9c 2668 cpu_exec_start(cs);
8642c1b8 2669 trapnr = cpu_exec(cs);
b040bc9c 2670 cpu_exec_end(cs);
d148d90e 2671 process_queued_cpu_work(cs);
3b46e624 2672
fdf9b3e8
FB
2673 switch (trapnr) {
2674 case 0x160:
0b6d3ae0 2675 env->pc += 2;
5fafdf24
TS
2676 ret = do_syscall(env,
2677 env->gregs[3],
2678 env->gregs[4],
2679 env->gregs[5],
2680 env->gregs[6],
2681 env->gregs[7],
2682 env->gregs[0],
5945cfcb
PM
2683 env->gregs[1],
2684 0, 0);
ba412496
TB
2685 if (ret == -TARGET_ERESTARTSYS) {
2686 env->pc -= 2;
2687 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
2688 env->gregs[0] = ret;
2689 }
fdf9b3e8 2690 break;
c3b5bc8a
TS
2691 case EXCP_INTERRUPT:
2692 /* just indicate that signals should be handled asap */
2693 break;
355fb23d
PB
2694 case EXCP_DEBUG:
2695 {
2696 int sig;
2697
db6b81d4 2698 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
355fb23d
PB
2699 if (sig)
2700 {
2701 info.si_signo = sig;
2702 info.si_errno = 0;
2703 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 2704 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
355fb23d
PB
2705 }
2706 }
2707 break;
c3b5bc8a
TS
2708 case 0xa0:
2709 case 0xc0:
a86b3c64 2710 info.si_signo = TARGET_SIGSEGV;
c3b5bc8a
TS
2711 info.si_errno = 0;
2712 info.si_code = TARGET_SEGV_MAPERR;
2713 info._sifields._sigfault._addr = env->tea;
9d2803f7 2714 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
c3b5bc8a
TS
2715 break;
2716
fdbc2b57
RH
2717 case EXCP_ATOMIC:
2718 cpu_exec_step_atomic(cs);
2719 break;
fdf9b3e8
FB
2720 default:
2721 printf ("Unhandled trap: 0x%x\n", trapnr);
878096ee 2722 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 2723 exit(EXIT_FAILURE);
fdf9b3e8
FB
2724 }
2725 process_pending_signals (env);
2726 }
2727}
2728#endif
2729
48733d19 2730#ifdef TARGET_CRIS
05390248 2731void cpu_loop(CPUCRISState *env)
48733d19 2732{
878096ee 2733 CPUState *cs = CPU(cris_env_get_cpu(env));
48733d19 2734 int trapnr, ret;
c227f099 2735 target_siginfo_t info;
48733d19
TS
2736
2737 while (1) {
b040bc9c 2738 cpu_exec_start(cs);
8642c1b8 2739 trapnr = cpu_exec(cs);
b040bc9c 2740 cpu_exec_end(cs);
d148d90e
SF
2741 process_queued_cpu_work(cs);
2742
48733d19
TS
2743 switch (trapnr) {
2744 case 0xaa:
2745 {
a86b3c64 2746 info.si_signo = TARGET_SIGSEGV;
48733d19
TS
2747 info.si_errno = 0;
2748 /* XXX: check env->error_code */
2749 info.si_code = TARGET_SEGV_MAPERR;
e00c1e71 2750 info._sifields._sigfault._addr = env->pregs[PR_EDA];
9d2803f7 2751 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
48733d19
TS
2752 }
2753 break;
b6d3abda
EI
2754 case EXCP_INTERRUPT:
2755 /* just indicate that signals should be handled asap */
2756 break;
48733d19
TS
2757 case EXCP_BREAK:
2758 ret = do_syscall(env,
2759 env->regs[9],
2760 env->regs[10],
2761 env->regs[11],
2762 env->regs[12],
2763 env->regs[13],
2764 env->pregs[7],
5945cfcb
PM
2765 env->pregs[11],
2766 0, 0);
62050865
TB
2767 if (ret == -TARGET_ERESTARTSYS) {
2768 env->pc -= 2;
2769 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
2770 env->regs[10] = ret;
2771 }
48733d19
TS
2772 break;
2773 case EXCP_DEBUG:
2774 {
2775 int sig;
2776
db6b81d4 2777 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
48733d19
TS
2778 if (sig)
2779 {
2780 info.si_signo = sig;
2781 info.si_errno = 0;
2782 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 2783 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
48733d19
TS
2784 }
2785 }
2786 break;
fdbc2b57
RH
2787 case EXCP_ATOMIC:
2788 cpu_exec_step_atomic(cs);
2789 break;
48733d19
TS
2790 default:
2791 printf ("Unhandled trap: 0x%x\n", trapnr);
878096ee 2792 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 2793 exit(EXIT_FAILURE);
48733d19
TS
2794 }
2795 process_pending_signals (env);
2796 }
2797}
2798#endif
2799
b779e29e 2800#ifdef TARGET_MICROBLAZE
05390248 2801void cpu_loop(CPUMBState *env)
b779e29e 2802{
878096ee 2803 CPUState *cs = CPU(mb_env_get_cpu(env));
b779e29e 2804 int trapnr, ret;
c227f099 2805 target_siginfo_t info;
b779e29e
EI
2806
2807 while (1) {
b040bc9c 2808 cpu_exec_start(cs);
8642c1b8 2809 trapnr = cpu_exec(cs);
b040bc9c 2810 cpu_exec_end(cs);
d148d90e
SF
2811 process_queued_cpu_work(cs);
2812
b779e29e
EI
2813 switch (trapnr) {
2814 case 0xaa:
2815 {
a86b3c64 2816 info.si_signo = TARGET_SIGSEGV;
b779e29e
EI
2817 info.si_errno = 0;
2818 /* XXX: check env->error_code */
2819 info.si_code = TARGET_SEGV_MAPERR;
2820 info._sifields._sigfault._addr = 0;
9d2803f7 2821 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
b779e29e
EI
2822 }
2823 break;
2824 case EXCP_INTERRUPT:
2825 /* just indicate that signals should be handled asap */
2826 break;
2827 case EXCP_BREAK:
2828 /* Return address is 4 bytes after the call. */
2829 env->regs[14] += 4;
d7dce494 2830 env->sregs[SR_PC] = env->regs[14];
b779e29e
EI
2831 ret = do_syscall(env,
2832 env->regs[12],
2833 env->regs[5],
2834 env->regs[6],
2835 env->regs[7],
2836 env->regs[8],
2837 env->regs[9],
5945cfcb
PM
2838 env->regs[10],
2839 0, 0);
4134ecfe
TB
2840 if (ret == -TARGET_ERESTARTSYS) {
2841 /* Wind back to before the syscall. */
2842 env->sregs[SR_PC] -= 4;
2843 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
2844 env->regs[3] = ret;
2845 }
d7749ab7
PM
2846 /* All syscall exits result in guest r14 being equal to the
2847 * PC we return to, because the kernel syscall exit "rtbd" does
2848 * this. (This is true even for sigreturn(); note that r14 is
2849 * not a userspace-usable register, as the kernel may clobber it
2850 * at any point.)
2851 */
2852 env->regs[14] = env->sregs[SR_PC];
b779e29e 2853 break;
b76da7e3
EI
2854 case EXCP_HW_EXCP:
2855 env->regs[17] = env->sregs[SR_PC] + 4;
2856 if (env->iflags & D_FLAG) {
2857 env->sregs[SR_ESR] |= 1 << 12;
2858 env->sregs[SR_PC] -= 4;
b4916d7b 2859 /* FIXME: if branch was immed, replay the imm as well. */
b76da7e3
EI
2860 }
2861
2862 env->iflags &= ~(IMM_FLAG | D_FLAG);
2863
2864 switch (env->sregs[SR_ESR] & 31) {
22a78d64 2865 case ESR_EC_DIVZERO:
a86b3c64 2866 info.si_signo = TARGET_SIGFPE;
22a78d64
EI
2867 info.si_errno = 0;
2868 info.si_code = TARGET_FPE_FLTDIV;
2869 info._sifields._sigfault._addr = 0;
9d2803f7 2870 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
22a78d64 2871 break;
b76da7e3 2872 case ESR_EC_FPU:
a86b3c64 2873 info.si_signo = TARGET_SIGFPE;
b76da7e3
EI
2874 info.si_errno = 0;
2875 if (env->sregs[SR_FSR] & FSR_IO) {
2876 info.si_code = TARGET_FPE_FLTINV;
2877 }
2878 if (env->sregs[SR_FSR] & FSR_DZ) {
2879 info.si_code = TARGET_FPE_FLTDIV;
2880 }
2881 info._sifields._sigfault._addr = 0;
9d2803f7 2882 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
b76da7e3
EI
2883 break;
2884 default:
2885 printf ("Unhandled hw-exception: 0x%x\n",
2e42d52d 2886 env->sregs[SR_ESR] & ESR_EC_MASK);
878096ee 2887 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 2888 exit(EXIT_FAILURE);
b76da7e3
EI
2889 break;
2890 }
2891 break;
b779e29e
EI
2892 case EXCP_DEBUG:
2893 {
2894 int sig;
2895
db6b81d4 2896 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
b779e29e
EI
2897 if (sig)
2898 {
2899 info.si_signo = sig;
2900 info.si_errno = 0;
2901 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 2902 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
b779e29e
EI
2903 }
2904 }
2905 break;
fdbc2b57
RH
2906 case EXCP_ATOMIC:
2907 cpu_exec_step_atomic(cs);
2908 break;
b779e29e
EI
2909 default:
2910 printf ("Unhandled trap: 0x%x\n", trapnr);
878096ee 2911 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 2912 exit(EXIT_FAILURE);
b779e29e
EI
2913 }
2914 process_pending_signals (env);
2915 }
2916}
2917#endif
2918
e6e5906b
PB
2919#ifdef TARGET_M68K
2920
2921void cpu_loop(CPUM68KState *env)
2922{
878096ee 2923 CPUState *cs = CPU(m68k_env_get_cpu(env));
e6e5906b
PB
2924 int trapnr;
2925 unsigned int n;
c227f099 2926 target_siginfo_t info;
0429a971 2927 TaskState *ts = cs->opaque;
3b46e624 2928
e6e5906b 2929 for(;;) {
b040bc9c 2930 cpu_exec_start(cs);
8642c1b8 2931 trapnr = cpu_exec(cs);
b040bc9c 2932 cpu_exec_end(cs);
d148d90e
SF
2933 process_queued_cpu_work(cs);
2934
e6e5906b
PB
2935 switch(trapnr) {
2936 case EXCP_ILLEGAL:
2937 {
2938 if (ts->sim_syscalls) {
2939 uint16_t nr;
d8d5119c 2940 get_user_u16(nr, env->pc + 2);
e6e5906b
PB
2941 env->pc += 4;
2942 do_m68k_simcall(env, nr);
2943 } else {
2944 goto do_sigill;
2945 }
2946 }
2947 break;
a87295e8 2948 case EXCP_HALT_INSN:
e6e5906b 2949 /* Semihosing syscall. */
a87295e8 2950 env->pc += 4;
e6e5906b
PB
2951 do_m68k_semihosting(env, env->dregs[0]);
2952 break;
2953 case EXCP_LINEA:
2954 case EXCP_LINEF:
2955 case EXCP_UNSUPPORTED:
2956 do_sigill:
a86b3c64 2957 info.si_signo = TARGET_SIGILL;
e6e5906b
PB
2958 info.si_errno = 0;
2959 info.si_code = TARGET_ILL_ILLOPN;
2960 info._sifields._sigfault._addr = env->pc;
0ccb9c1d
LV
2961 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2962 break;
2963 case EXCP_DIV0:
2964 info.si_signo = TARGET_SIGFPE;
2965 info.si_errno = 0;
2966 info.si_code = TARGET_FPE_INTDIV;
2967 info._sifields._sigfault._addr = env->pc;
9d2803f7 2968 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e6e5906b
PB
2969 break;
2970 case EXCP_TRAP0:
2971 {
7ccb84a9 2972 abi_long ret;
e6e5906b
PB
2973 ts->sim_syscalls = 0;
2974 n = env->dregs[0];
2975 env->pc += 2;
7ccb84a9
TB
2976 ret = do_syscall(env,
2977 n,
2978 env->dregs[1],
2979 env->dregs[2],
2980 env->dregs[3],
2981 env->dregs[4],
2982 env->dregs[5],
2983 env->aregs[0],
2984 0, 0);
2985 if (ret == -TARGET_ERESTARTSYS) {
2986 env->pc -= 2;
2987 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
2988 env->dregs[0] = ret;
2989 }
e6e5906b
PB
2990 }
2991 break;
2992 case EXCP_INTERRUPT:
2993 /* just indicate that signals should be handled asap */
2994 break;
2995 case EXCP_ACCESS:
2996 {
a86b3c64 2997 info.si_signo = TARGET_SIGSEGV;
e6e5906b
PB
2998 info.si_errno = 0;
2999 /* XXX: check env->error_code */
3000 info.si_code = TARGET_SEGV_MAPERR;
3001 info._sifields._sigfault._addr = env->mmu.ar;
9d2803f7 3002 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e6e5906b
PB
3003 }
3004 break;
3005 case EXCP_DEBUG:
3006 {
3007 int sig;
3008
db6b81d4 3009 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
e6e5906b
PB
3010 if (sig)
3011 {
3012 info.si_signo = sig;
3013 info.si_errno = 0;
3014 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 3015 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
e6e5906b
PB
3016 }
3017 }
3018 break;
fdbc2b57
RH
3019 case EXCP_ATOMIC:
3020 cpu_exec_step_atomic(cs);
3021 break;
e6e5906b 3022 default:
120a9848 3023 EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
e6e5906b
PB
3024 abort();
3025 }
3026 process_pending_signals(env);
3027 }
3028}
3029#endif /* TARGET_M68K */
3030
7a3148a9 3031#ifdef TARGET_ALPHA
05390248 3032void cpu_loop(CPUAlphaState *env)
7a3148a9 3033{
878096ee 3034 CPUState *cs = CPU(alpha_env_get_cpu(env));
e96efcfc 3035 int trapnr;
c227f099 3036 target_siginfo_t info;
6049f4f8 3037 abi_long sysret;
3b46e624 3038
7a3148a9 3039 while (1) {
b040bc9c 3040 cpu_exec_start(cs);
8642c1b8 3041 trapnr = cpu_exec(cs);
b040bc9c 3042 cpu_exec_end(cs);
d148d90e 3043 process_queued_cpu_work(cs);
3b46e624 3044
ac316ca4
RH
3045 /* All of the traps imply a transition through PALcode, which
3046 implies an REI instruction has been executed. Which means
3047 that the intr_flag should be cleared. */
3048 env->intr_flag = 0;
3049
7a3148a9
JM
3050 switch (trapnr) {
3051 case EXCP_RESET:
3052 fprintf(stderr, "Reset requested. Exit\n");
4d1275c2 3053 exit(EXIT_FAILURE);
7a3148a9
JM
3054 break;
3055 case EXCP_MCHK:
3056 fprintf(stderr, "Machine check exception. Exit\n");
4d1275c2 3057 exit(EXIT_FAILURE);
7a3148a9 3058 break;
07b6c13b
RH
3059 case EXCP_SMP_INTERRUPT:
3060 case EXCP_CLK_INTERRUPT:
3061 case EXCP_DEV_INTERRUPT:
5fafdf24 3062 fprintf(stderr, "External interrupt. Exit\n");
4d1275c2 3063 exit(EXIT_FAILURE);
7a3148a9 3064 break;
07b6c13b 3065 case EXCP_MMFAULT:
6910b8f6 3066 env->lock_addr = -1;
6049f4f8
RH
3067 info.si_signo = TARGET_SIGSEGV;
3068 info.si_errno = 0;
129d8aa5 3069 info.si_code = (page_get_flags(env->trap_arg0) & PAGE_VALID
0be1d07c 3070 ? TARGET_SEGV_ACCERR : TARGET_SEGV_MAPERR);
129d8aa5 3071 info._sifields._sigfault._addr = env->trap_arg0;
9d2803f7 3072 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
7a3148a9 3073 break;
7a3148a9 3074 case EXCP_UNALIGN:
6910b8f6 3075 env->lock_addr = -1;
6049f4f8
RH
3076 info.si_signo = TARGET_SIGBUS;
3077 info.si_errno = 0;
3078 info.si_code = TARGET_BUS_ADRALN;
129d8aa5 3079 info._sifields._sigfault._addr = env->trap_arg0;
9d2803f7 3080 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
7a3148a9
JM
3081 break;
3082 case EXCP_OPCDEC:
6049f4f8 3083 do_sigill:
6910b8f6 3084 env->lock_addr = -1;
6049f4f8
RH
3085 info.si_signo = TARGET_SIGILL;
3086 info.si_errno = 0;
3087 info.si_code = TARGET_ILL_ILLOPC;
3088 info._sifields._sigfault._addr = env->pc;
9d2803f7 3089 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
7a3148a9 3090 break;
07b6c13b
RH
3091 case EXCP_ARITH:
3092 env->lock_addr = -1;
3093 info.si_signo = TARGET_SIGFPE;
3094 info.si_errno = 0;
3095 info.si_code = TARGET_FPE_FLTINV;
3096 info._sifields._sigfault._addr = env->pc;
9d2803f7 3097 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
07b6c13b 3098 break;
7a3148a9 3099 case EXCP_FEN:
6049f4f8 3100 /* No-op. Linux simply re-enables the FPU. */
7a3148a9 3101 break;
07b6c13b 3102 case EXCP_CALL_PAL:
6910b8f6 3103 env->lock_addr = -1;
07b6c13b 3104 switch (env->error_code) {
6049f4f8
RH
3105 case 0x80:
3106 /* BPT */
3107 info.si_signo = TARGET_SIGTRAP;
3108 info.si_errno = 0;
3109 info.si_code = TARGET_TRAP_BRKPT;
3110 info._sifields._sigfault._addr = env->pc;
9d2803f7 3111 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
6049f4f8
RH
3112 break;
3113 case 0x81:
3114 /* BUGCHK */
3115 info.si_signo = TARGET_SIGTRAP;
3116 info.si_errno = 0;
3117 info.si_code = 0;
3118 info._sifields._sigfault._addr = env->pc;
9d2803f7 3119 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
6049f4f8
RH
3120 break;
3121 case 0x83:
3122 /* CALLSYS */
3123 trapnr = env->ir[IR_V0];
3124 sysret = do_syscall(env, trapnr,
3125 env->ir[IR_A0], env->ir[IR_A1],
3126 env->ir[IR_A2], env->ir[IR_A3],
5945cfcb
PM
3127 env->ir[IR_A4], env->ir[IR_A5],
3128 0, 0);
338c858c
TB
3129 if (sysret == -TARGET_ERESTARTSYS) {
3130 env->pc -= 4;
3131 break;
3132 }
3133 if (sysret == -TARGET_QEMU_ESIGRETURN) {
a5b3b13b
RH
3134 break;
3135 }
3136 /* Syscall writes 0 to V0 to bypass error check, similar
0e141977
RH
3137 to how this is handled internal to Linux kernel.
3138 (Ab)use trapnr temporarily as boolean indicating error. */
3139 trapnr = (env->ir[IR_V0] != 0 && sysret < 0);
3140 env->ir[IR_V0] = (trapnr ? -sysret : sysret);
3141 env->ir[IR_A3] = trapnr;
6049f4f8
RH
3142 break;
3143 case 0x86:
3144 /* IMB */
3145 /* ??? We can probably elide the code using page_unprotect
3146 that is checking for self-modifying code. Instead we
3147 could simply call tb_flush here. Until we work out the
3148 changes required to turn off the extra write protection,
3149 this can be a no-op. */
3150 break;
3151 case 0x9E:
3152 /* RDUNIQUE */
3153 /* Handled in the translator for usermode. */
3154 abort();
3155 case 0x9F:
3156 /* WRUNIQUE */
3157 /* Handled in the translator for usermode. */
3158 abort();
3159 case 0xAA:
3160 /* GENTRAP */
3161 info.si_signo = TARGET_SIGFPE;
3162 switch (env->ir[IR_A0]) {
3163 case TARGET_GEN_INTOVF:
3164 info.si_code = TARGET_FPE_INTOVF;
3165 break;
3166 case TARGET_GEN_INTDIV:
3167 info.si_code = TARGET_FPE_INTDIV;
3168 break;
3169 case TARGET_GEN_FLTOVF:
3170 info.si_code = TARGET_FPE_FLTOVF;
3171 break;
3172 case TARGET_GEN_FLTUND:
3173 info.si_code = TARGET_FPE_FLTUND;
3174 break;
3175 case TARGET_GEN_FLTINV:
3176 info.si_code = TARGET_FPE_FLTINV;
3177 break;
3178 case TARGET_GEN_FLTINE:
3179 info.si_code = TARGET_FPE_FLTRES;
3180 break;
3181 case TARGET_GEN_ROPRAND:
3182 info.si_code = 0;
3183 break;
3184 default:
3185 info.si_signo = TARGET_SIGTRAP;
3186 info.si_code = 0;
3187 break;
3188 }
3189 info.si_errno = 0;
3190 info._sifields._sigfault._addr = env->pc;
9d2803f7 3191 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
6049f4f8
RH
3192 break;
3193 default:
3194 goto do_sigill;
3195 }
7a3148a9 3196 break;
7a3148a9 3197 case EXCP_DEBUG:
db6b81d4 3198 info.si_signo = gdb_handlesig(cs, TARGET_SIGTRAP);
6049f4f8 3199 if (info.si_signo) {
6910b8f6 3200 env->lock_addr = -1;
6049f4f8
RH
3201 info.si_errno = 0;
3202 info.si_code = TARGET_TRAP_BRKPT;
9d2803f7 3203 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
7a3148a9
JM
3204 }
3205 break;
d0f20495
RH
3206 case EXCP_INTERRUPT:
3207 /* Just indicate that signals should be handled asap. */
3208 break;
fdbc2b57
RH
3209 case EXCP_ATOMIC:
3210 cpu_exec_step_atomic(cs);
3211 break;
7a3148a9
JM
3212 default:
3213 printf ("Unhandled trap: 0x%x\n", trapnr);
878096ee 3214 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 3215 exit(EXIT_FAILURE);
7a3148a9
JM
3216 }
3217 process_pending_signals (env);
3218 }
3219}
3220#endif /* TARGET_ALPHA */
3221
a4c075f1
UH
3222#ifdef TARGET_S390X
3223void cpu_loop(CPUS390XState *env)
3224{
878096ee 3225 CPUState *cs = CPU(s390_env_get_cpu(env));
d5a103cd 3226 int trapnr, n, sig;
a4c075f1 3227 target_siginfo_t info;
d5a103cd 3228 target_ulong addr;
47405ab6 3229 abi_long ret;
a4c075f1
UH
3230
3231 while (1) {
b040bc9c 3232 cpu_exec_start(cs);
8642c1b8 3233 trapnr = cpu_exec(cs);
b040bc9c 3234 cpu_exec_end(cs);
d148d90e
SF
3235 process_queued_cpu_work(cs);
3236
a4c075f1
UH
3237 switch (trapnr) {
3238 case EXCP_INTERRUPT:
d5a103cd 3239 /* Just indicate that signals should be handled asap. */
a4c075f1 3240 break;
a4c075f1 3241
d5a103cd
RH
3242 case EXCP_SVC:
3243 n = env->int_svc_code;
3244 if (!n) {
3245 /* syscalls > 255 */
3246 n = env->regs[1];
a4c075f1 3247 }
d5a103cd 3248 env->psw.addr += env->int_svc_ilen;
47405ab6
TB
3249 ret = do_syscall(env, n, env->regs[2], env->regs[3],
3250 env->regs[4], env->regs[5],
3251 env->regs[6], env->regs[7], 0, 0);
3252 if (ret == -TARGET_ERESTARTSYS) {
3253 env->psw.addr -= env->int_svc_ilen;
3254 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
3255 env->regs[2] = ret;
3256 }
a4c075f1 3257 break;
d5a103cd
RH
3258
3259 case EXCP_DEBUG:
db6b81d4 3260 sig = gdb_handlesig(cs, TARGET_SIGTRAP);
d5a103cd
RH
3261 if (sig) {
3262 n = TARGET_TRAP_BRKPT;
3263 goto do_signal_pc;
a4c075f1
UH
3264 }
3265 break;
d5a103cd
RH
3266 case EXCP_PGM:
3267 n = env->int_pgm_code;
3268 switch (n) {
3269 case PGM_OPERATION:
3270 case PGM_PRIVILEGED:
a86b3c64 3271 sig = TARGET_SIGILL;
d5a103cd
RH
3272 n = TARGET_ILL_ILLOPC;
3273 goto do_signal_pc;
3274 case PGM_PROTECTION:
3275 case PGM_ADDRESSING:
a86b3c64 3276 sig = TARGET_SIGSEGV;
a4c075f1 3277 /* XXX: check env->error_code */
d5a103cd
RH
3278 n = TARGET_SEGV_MAPERR;
3279 addr = env->__excp_addr;
3280 goto do_signal;
3281 case PGM_EXECUTE:
3282 case PGM_SPECIFICATION:
3283 case PGM_SPECIAL_OP:
3284 case PGM_OPERAND:
3285 do_sigill_opn:
a86b3c64 3286 sig = TARGET_SIGILL;
d5a103cd
RH
3287 n = TARGET_ILL_ILLOPN;
3288 goto do_signal_pc;
3289
3290 case PGM_FIXPT_OVERFLOW:
a86b3c64 3291 sig = TARGET_SIGFPE;
d5a103cd
RH
3292 n = TARGET_FPE_INTOVF;
3293 goto do_signal_pc;
3294 case PGM_FIXPT_DIVIDE:
a86b3c64 3295 sig = TARGET_SIGFPE;
d5a103cd
RH
3296 n = TARGET_FPE_INTDIV;
3297 goto do_signal_pc;
3298
3299 case PGM_DATA:
3300 n = (env->fpc >> 8) & 0xff;
3301 if (n == 0xff) {
3302 /* compare-and-trap */
3303 goto do_sigill_opn;
3304 } else {
3305 /* An IEEE exception, simulated or otherwise. */
3306 if (n & 0x80) {
3307 n = TARGET_FPE_FLTINV;
3308 } else if (n & 0x40) {
3309 n = TARGET_FPE_FLTDIV;
3310 } else if (n & 0x20) {
3311 n = TARGET_FPE_FLTOVF;
3312 } else if (n & 0x10) {
3313 n = TARGET_FPE_FLTUND;
3314 } else if (n & 0x08) {
3315 n = TARGET_FPE_FLTRES;
3316 } else {
3317 /* ??? Quantum exception; BFP, DFP error. */
3318 goto do_sigill_opn;
3319 }
a86b3c64 3320 sig = TARGET_SIGFPE;
d5a103cd
RH
3321 goto do_signal_pc;
3322 }
3323
3324 default:
3325 fprintf(stderr, "Unhandled program exception: %#x\n", n);
878096ee 3326 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 3327 exit(EXIT_FAILURE);
a4c075f1
UH
3328 }
3329 break;
d5a103cd
RH
3330
3331 do_signal_pc:
3332 addr = env->psw.addr;
3333 do_signal:
3334 info.si_signo = sig;
3335 info.si_errno = 0;
3336 info.si_code = n;
3337 info._sifields._sigfault._addr = addr;
9d2803f7 3338 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
a4c075f1 3339 break;
d5a103cd 3340
fdbc2b57
RH
3341 case EXCP_ATOMIC:
3342 cpu_exec_step_atomic(cs);
3343 break;
a4c075f1 3344 default:
d5a103cd 3345 fprintf(stderr, "Unhandled trap: 0x%x\n", trapnr);
878096ee 3346 cpu_dump_state(cs, stderr, fprintf, 0);
4d1275c2 3347 exit(EXIT_FAILURE);
a4c075f1
UH
3348 }
3349 process_pending_signals (env);
3350 }
3351}
3352
3353#endif /* TARGET_S390X */
3354
b16189b2
CG
3355#ifdef TARGET_TILEGX
3356
b16189b2
CG
3357static void gen_sigill_reg(CPUTLGState *env)
3358{
3359 target_siginfo_t info;
3360
3361 info.si_signo = TARGET_SIGILL;
3362 info.si_errno = 0;
3363 info.si_code = TARGET_ILL_PRVREG;
3364 info._sifields._sigfault._addr = env->pc;
9d2803f7 3365 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
b16189b2
CG
3366}
3367
a0577d2a 3368static void do_signal(CPUTLGState *env, int signo, int sigcode)
dd8070d8
CG
3369{
3370 target_siginfo_t info;
3371
a0577d2a 3372 info.si_signo = signo;
dd8070d8 3373 info.si_errno = 0;
dd8070d8 3374 info._sifields._sigfault._addr = env->pc;
a0577d2a
RH
3375
3376 if (signo == TARGET_SIGSEGV) {
3377 /* The passed in sigcode is a dummy; check for a page mapping
3378 and pass either MAPERR or ACCERR. */
3379 target_ulong addr = env->excaddr;
3380 info._sifields._sigfault._addr = addr;
3381 if (page_check_range(addr, 1, PAGE_VALID) < 0) {
3382 sigcode = TARGET_SEGV_MAPERR;
3383 } else {
3384 sigcode = TARGET_SEGV_ACCERR;
3385 }
3386 }
3387 info.si_code = sigcode;
3388
9d2803f7 3389 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
dd8070d8
CG
3390}
3391
a0577d2a
RH
3392static void gen_sigsegv_maperr(CPUTLGState *env, target_ulong addr)
3393{
3394 env->excaddr = addr;
3395 do_signal(env, TARGET_SIGSEGV, 0);
3396}
3397
0583b233
RH
3398static void set_regval(CPUTLGState *env, uint8_t reg, uint64_t val)
3399{
3400 if (unlikely(reg >= TILEGX_R_COUNT)) {
3401 switch (reg) {
3402 case TILEGX_R_SN:
3403 case TILEGX_R_ZERO:
3404 return;
3405 case TILEGX_R_IDN0:
3406 case TILEGX_R_IDN1:
3407 case TILEGX_R_UDN0:
3408 case TILEGX_R_UDN1:
3409 case TILEGX_R_UDN2:
3410 case TILEGX_R_UDN3:
3411 gen_sigill_reg(env);
3412 return;
3413 default:
3414 g_assert_not_reached();
3415 }
3416 }
3417 env->regs[reg] = val;
3418}
3419
3420/*
3421 * Compare the 8-byte contents of the CmpValue SPR with the 8-byte value in
3422 * memory at the address held in the first source register. If the values are
3423 * not equal, then no memory operation is performed. If the values are equal,
3424 * the 8-byte quantity from the second source register is written into memory
3425 * at the address held in the first source register. In either case, the result
3426 * of the instruction is the value read from memory. The compare and write to
3427 * memory are atomic and thus can be used for synchronization purposes. This
3428 * instruction only operates for addresses aligned to a 8-byte boundary.
3429 * Unaligned memory access causes an Unaligned Data Reference interrupt.
3430 *
3431 * Functional Description (64-bit)
3432 * uint64_t memVal = memoryReadDoubleWord (rf[SrcA]);
3433 * rf[Dest] = memVal;
3434 * if (memVal == SPR[CmpValueSPR])
3435 * memoryWriteDoubleWord (rf[SrcA], rf[SrcB]);
3436 *
3437 * Functional Description (32-bit)
3438 * uint64_t memVal = signExtend32 (memoryReadWord (rf[SrcA]));
3439 * rf[Dest] = memVal;
3440 * if (memVal == signExtend32 (SPR[CmpValueSPR]))
3441 * memoryWriteWord (rf[SrcA], rf[SrcB]);
3442 *
3443 *
3444 * This function also processes exch and exch4 which need not process SPR.
3445 */
3446static void do_exch(CPUTLGState *env, bool quad, bool cmp)
3447{
3448 target_ulong addr;
3449 target_long val, sprval;
3450
3451 start_exclusive();
3452
3453 addr = env->atomic_srca;
3454 if (quad ? get_user_s64(val, addr) : get_user_s32(val, addr)) {
3455 goto sigsegv_maperr;
3456 }
3457
3458 if (cmp) {
3459 if (quad) {
3460 sprval = env->spregs[TILEGX_SPR_CMPEXCH];
3461 } else {
3462 sprval = sextract64(env->spregs[TILEGX_SPR_CMPEXCH], 0, 32);
3463 }
3464 }
3465
3466 if (!cmp || val == sprval) {
3467 target_long valb = env->atomic_srcb;
3468 if (quad ? put_user_u64(valb, addr) : put_user_u32(valb, addr)) {
3469 goto sigsegv_maperr;
3470 }
3471 }
3472
3473 set_regval(env, env->atomic_dstr, val);
3474 end_exclusive();
3475 return;
3476
3477 sigsegv_maperr:
3478 end_exclusive();
3479 gen_sigsegv_maperr(env, addr);
3480}
3481
3482static void do_fetch(CPUTLGState *env, int trapnr, bool quad)
3483{
3484 int8_t write = 1;
3485 target_ulong addr;
3486 target_long val, valb;
3487
3488 start_exclusive();
3489
3490 addr = env->atomic_srca;
3491 valb = env->atomic_srcb;
3492 if (quad ? get_user_s64(val, addr) : get_user_s32(val, addr)) {
3493 goto sigsegv_maperr;
3494 }
3495
3496 switch (trapnr) {
3497 case TILEGX_EXCP_OPCODE_FETCHADD:
3498 case TILEGX_EXCP_OPCODE_FETCHADD4:
3499 valb += val;
3500 break;
3501 case TILEGX_EXCP_OPCODE_FETCHADDGEZ:
3502 valb += val;
3503 if (valb < 0) {
3504 write = 0;
3505 }
3506 break;
3507 case TILEGX_EXCP_OPCODE_FETCHADDGEZ4:
3508 valb += val;
3509 if ((int32_t)valb < 0) {
3510 write = 0;
3511 }
3512 break;
3513 case TILEGX_EXCP_OPCODE_FETCHAND:
3514 case TILEGX_EXCP_OPCODE_FETCHAND4:
3515 valb &= val;
3516 break;
3517 case TILEGX_EXCP_OPCODE_FETCHOR:
3518 case TILEGX_EXCP_OPCODE_FETCHOR4:
3519 valb |= val;
3520 break;
3521 default:
3522 g_assert_not_reached();
3523 }
3524
3525 if (write) {
3526 if (quad ? put_user_u64(valb, addr) : put_user_u32(valb, addr)) {
3527 goto sigsegv_maperr;
3528 }
3529 }
3530
3531 set_regval(env, env->atomic_dstr, val);
3532 end_exclusive();
3533 return;
3534
3535 sigsegv_maperr:
3536 end_exclusive();
3537 gen_sigsegv_maperr(env, addr);
3538}
3539
b16189b2
CG
3540void cpu_loop(CPUTLGState *env)
3541{
3542 CPUState *cs = CPU(tilegx_env_get_cpu(env));
3543 int trapnr;
3544
3545 while (1) {
3546 cpu_exec_start(cs);
8642c1b8 3547 trapnr = cpu_exec(cs);
b16189b2 3548 cpu_exec_end(cs);
d148d90e
SF
3549 process_queued_cpu_work(cs);
3550
b16189b2
CG
3551 switch (trapnr) {
3552 case TILEGX_EXCP_SYSCALL:
a9175169
PM
3553 {
3554 abi_ulong ret = do_syscall(env, env->regs[TILEGX_R_NR],
3555 env->regs[0], env->regs[1],
3556 env->regs[2], env->regs[3],
3557 env->regs[4], env->regs[5],
3558 env->regs[6], env->regs[7]);
3559 if (ret == -TARGET_ERESTARTSYS) {
3560 env->pc -= 8;
3561 } else if (ret != -TARGET_QEMU_ESIGRETURN) {
3562 env->regs[TILEGX_R_RE] = ret;
3563 env->regs[TILEGX_R_ERR] = TILEGX_IS_ERRNO(ret) ? -ret : 0;
3564 }
b16189b2 3565 break;
a9175169 3566 }
0583b233
RH
3567 case TILEGX_EXCP_OPCODE_EXCH:
3568 do_exch(env, true, false);
3569 break;
3570 case TILEGX_EXCP_OPCODE_EXCH4:
3571 do_exch(env, false, false);
3572 break;
3573 case TILEGX_EXCP_OPCODE_CMPEXCH:
3574 do_exch(env, true, true);
3575 break;
3576 case TILEGX_EXCP_OPCODE_CMPEXCH4:
3577 do_exch(env, false, true);
3578 break;
3579 case TILEGX_EXCP_OPCODE_FETCHADD:
3580 case TILEGX_EXCP_OPCODE_FETCHADDGEZ:
3581 case TILEGX_EXCP_OPCODE_FETCHAND:
3582 case TILEGX_EXCP_OPCODE_FETCHOR:
3583 do_fetch(env, trapnr, true);
3584 break;
3585 case TILEGX_EXCP_OPCODE_FETCHADD4:
3586 case TILEGX_EXCP_OPCODE_FETCHADDGEZ4:
3587 case TILEGX_EXCP_OPCODE_FETCHAND4:
3588 case TILEGX_EXCP_OPCODE_FETCHOR4:
3589 do_fetch(env, trapnr, false);
3590 break;
dd8070d8 3591 case TILEGX_EXCP_SIGNAL:
a0577d2a 3592 do_signal(env, env->signo, env->sigcode);
dd8070d8 3593 break;
b16189b2
CG
3594 case TILEGX_EXCP_REG_IDN_ACCESS:
3595 case TILEGX_EXCP_REG_UDN_ACCESS:
3596 gen_sigill_reg(env);
3597 break;
fdbc2b57
RH
3598 case EXCP_ATOMIC:
3599 cpu_exec_step_atomic(cs);
3600 break;
b16189b2
CG
3601 default:
3602 fprintf(stderr, "trapnr is %d[0x%x].\n", trapnr, trapnr);
3603 g_assert_not_reached();
3604 }
3605 process_pending_signals(env);
3606 }
3607}
3608
3609#endif
3610
7c248bcd
RH
3611#ifdef TARGET_HPPA
3612
3613static abi_ulong hppa_lws(CPUHPPAState *env)
3614{
3615 uint32_t which = env->gr[20];
3616 abi_ulong addr = env->gr[26];
3617 abi_ulong old = env->gr[25];
3618 abi_ulong new = env->gr[24];
3619 abi_ulong size, ret;
3620
3621 switch (which) {
3622 default:
3623 return -TARGET_ENOSYS;
3624
3625 case 0: /* elf32 atomic 32bit cmpxchg */
3626 if ((addr & 3) || !access_ok(VERIFY_WRITE, addr, 4)) {
3627 return -TARGET_EFAULT;
3628 }
3629 old = tswap32(old);
3630 new = tswap32(new);
3631 ret = atomic_cmpxchg((uint32_t *)g2h(addr), old, new);
3632 ret = tswap32(ret);
3633 break;
3634
3635 case 2: /* elf32 atomic "new" cmpxchg */
3636 size = env->gr[23];
3637 if (size >= 4) {
3638 return -TARGET_ENOSYS;
3639 }
3640 if (((addr | old | new) & ((1 << size) - 1))
3641 || !access_ok(VERIFY_WRITE, addr, 1 << size)
3642 || !access_ok(VERIFY_READ, old, 1 << size)
3643 || !access_ok(VERIFY_READ, new, 1 << size)) {
3644 return -TARGET_EFAULT;
3645 }
3646 /* Note that below we use host-endian loads so that the cmpxchg
3647 can be host-endian as well. */
3648 switch (size) {
3649 case 0:
3650 old = *(uint8_t *)g2h(old);
3651 new = *(uint8_t *)g2h(new);
3652 ret = atomic_cmpxchg((uint8_t *)g2h(addr), old, new);
3653 ret = ret != old;
3654 break;
3655 case 1:
3656 old = *(uint16_t *)g2h(old);
3657 new = *(uint16_t *)g2h(new);
3658 ret = atomic_cmpxchg((uint16_t *)g2h(addr), old, new);
3659 ret = ret != old;
3660 break;
3661 case 2:
3662 old = *(uint32_t *)g2h(old);
3663 new = *(uint32_t *)g2h(new);
3664 ret = atomic_cmpxchg((uint32_t *)g2h(addr), old, new);
3665 ret = ret != old;
3666 break;
3667 case 3:
3668 {
3669 uint64_t o64, n64, r64;
3670 o64 = *(uint64_t *)g2h(old);
3671 n64 = *(uint64_t *)g2h(new);
3672#ifdef CONFIG_ATOMIC64
3673 r64 = atomic_cmpxchg__nocheck((uint64_t *)g2h(addr), o64, n64);
3674 ret = r64 != o64;
3675#else
3676 start_exclusive();
3677 r64 = *(uint64_t *)g2h(addr);
3678 ret = 1;
3679 if (r64 == o64) {
3680 *(uint64_t *)g2h(addr) = n64;
3681 ret = 0;
3682 }
3683 end_exclusive();
3684#endif
3685 }
3686 break;
3687 }
3688 break;
3689 }
3690
3691 env->gr[28] = ret;
3692 return 0;
3693}
3694
3695void cpu_loop(CPUHPPAState *env)
3696{
3697 CPUState *cs = CPU(hppa_env_get_cpu(env));
3698 target_siginfo_t info;
3699 abi_ulong ret;
3700 int trapnr;
3701
3702 while (1) {
3703 cpu_exec_start(cs);
3704 trapnr = cpu_exec(cs);
3705 cpu_exec_end(cs);
3706 process_queued_cpu_work(cs);
3707
3708 switch (trapnr) {
3709 case EXCP_SYSCALL:
3710 ret = do_syscall(env, env->gr[20],
3711 env->gr[26], env->gr[25],
3712 env->gr[24], env->gr[23],
3713 env->gr[22], env->gr[21], 0, 0);
3714 switch (ret) {
3715 default:
3716 env->gr[28] = ret;
3717 /* We arrived here by faking the gateway page. Return. */
3718 env->iaoq_f = env->gr[31];
3719 env->iaoq_b = env->gr[31] + 4;
3720 break;
3721 case -TARGET_ERESTARTSYS:
3722 case -TARGET_QEMU_ESIGRETURN:
3723 break;
3724 }
3725 break;
3726 case EXCP_SYSCALL_LWS:
3727 env->gr[21] = hppa_lws(env);
3728 /* We arrived here by faking the gateway page. Return. */
3729 env->iaoq_f = env->gr[31];
3730 env->iaoq_b = env->gr[31] + 4;
3731 break;
3732 case EXCP_SIGSEGV:
3733 info.si_signo = TARGET_SIGSEGV;
3734 info.si_errno = 0;
3735 info.si_code = TARGET_SEGV_ACCERR;
3736 info._sifields._sigfault._addr = env->ior;
3737 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3738 break;
3739 case EXCP_SIGILL:
3740 info.si_signo = TARGET_SIGILL;
3741 info.si_errno = 0;
3742 info.si_code = TARGET_ILL_ILLOPN;
3743 info._sifields._sigfault._addr = env->iaoq_f;
3744 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3745 break;
3746 case EXCP_SIGFPE:
3747 info.si_signo = TARGET_SIGFPE;
3748 info.si_errno = 0;
3749 info.si_code = 0;
3750 info._sifields._sigfault._addr = env->iaoq_f;
3751 queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3752 break;
3753 case EXCP_DEBUG:
3754 trapnr = gdb_handlesig(cs, TARGET_SIGTRAP);
3755 if (trapnr) {
3756 info.si_signo = trapnr;
3757 info.si_errno = 0;
3758 info.si_code = TARGET_TRAP_BRKPT;
3759 queue_signal(env, trapnr, QEMU_SI_FAULT, &info);
3760 }
3761 break;
3762 case EXCP_INTERRUPT:
3763 /* just indicate that signals should be handled asap */
3764 break;
3765 default:
3766 g_assert_not_reached();
3767 }
3768 process_pending_signals(env);
3769 }
3770}
3771
3772#endif /* TARGET_HPPA */
3773
a2247f8e 3774THREAD CPUState *thread_cpu;
59faf6d6 3775
178f9429
SF
3776bool qemu_cpu_is_self(CPUState *cpu)
3777{
3778 return thread_cpu == cpu;
3779}
3780
3781void qemu_cpu_kick(CPUState *cpu)
3782{
3783 cpu_exit(cpu);
3784}
3785
edf8e2af
MW
3786void task_settid(TaskState *ts)
3787{
3788 if (ts->ts_tid == 0) {
edf8e2af 3789 ts->ts_tid = (pid_t)syscall(SYS_gettid);
edf8e2af
MW
3790 }
3791}
3792
3793void stop_all_tasks(void)
3794{
3795 /*
3796 * We trust that when using NPTL, start_exclusive()
3797 * handles thread stopping correctly.
3798 */
3799 start_exclusive();
3800}
3801
c3a92833 3802/* Assumes contents are already zeroed. */
624f7979
PB
3803void init_task_state(TaskState *ts)
3804{
624f7979 3805 ts->used = 1;
624f7979 3806}
fc9c5412 3807
30ba0ee5
AF
3808CPUArchState *cpu_copy(CPUArchState *env)
3809{
ff4700b0 3810 CPUState *cpu = ENV_GET_CPU(env);
2994fd96 3811 CPUState *new_cpu = cpu_init(cpu_model);
61c7480f 3812 CPUArchState *new_env = new_cpu->env_ptr;
30ba0ee5
AF
3813 CPUBreakpoint *bp;
3814 CPUWatchpoint *wp;
30ba0ee5
AF
3815
3816 /* Reset non arch specific state */
75a34036 3817 cpu_reset(new_cpu);
30ba0ee5
AF
3818
3819 memcpy(new_env, env, sizeof(CPUArchState));
3820
3821 /* Clone all break/watchpoints.
3822 Note: Once we support ptrace with hw-debug register access, make sure
3823 BP_CPU break/watchpoints are handled correctly on clone. */
1d085f6c
TB
3824 QTAILQ_INIT(&new_cpu->breakpoints);
3825 QTAILQ_INIT(&new_cpu->watchpoints);
f0c3c505 3826 QTAILQ_FOREACH(bp, &cpu->breakpoints, entry) {
b3310ab3 3827 cpu_breakpoint_insert(new_cpu, bp->pc, bp->flags, NULL);
30ba0ee5 3828 }
ff4700b0 3829 QTAILQ_FOREACH(wp, &cpu->watchpoints, entry) {
05068c0d 3830 cpu_watchpoint_insert(new_cpu, wp->vaddr, wp->len, wp->flags, NULL);
30ba0ee5 3831 }
30ba0ee5
AF
3832
3833 return new_env;
3834}
3835
fc9c5412
JS
3836static void handle_arg_help(const char *arg)
3837{
4d1275c2 3838 usage(EXIT_SUCCESS);
fc9c5412
JS
3839}
3840
3841static void handle_arg_log(const char *arg)
3842{
3843 int mask;
fc9c5412 3844
4fde1eba 3845 mask = qemu_str_to_log_mask(arg);
fc9c5412 3846 if (!mask) {
59a6fa6e 3847 qemu_print_log_usage(stdout);
4d1275c2 3848 exit(EXIT_FAILURE);
fc9c5412 3849 }
f2937a33 3850 qemu_log_needs_buffers();
24537a01 3851 qemu_set_log(mask);
fc9c5412
JS
3852}
3853
50171d42
CWR
3854static void handle_arg_log_filename(const char *arg)
3855{
daa76aa4 3856 qemu_set_log_filename(arg, &error_fatal);
50171d42
CWR
3857}
3858
fc9c5412
JS
3859static void handle_arg_set_env(const char *arg)
3860{
3861 char *r, *p, *token;
3862 r = p = strdup(arg);
3863 while ((token = strsep(&p, ",")) != NULL) {
3864 if (envlist_setenv(envlist, token) != 0) {
4d1275c2 3865 usage(EXIT_FAILURE);
fc9c5412
JS
3866 }
3867 }
3868 free(r);
3869}
3870
3871static void handle_arg_unset_env(const char *arg)
3872{
3873 char *r, *p, *token;
3874 r = p = strdup(arg);
3875 while ((token = strsep(&p, ",")) != NULL) {
3876 if (envlist_unsetenv(envlist, token) != 0) {
4d1275c2 3877 usage(EXIT_FAILURE);
fc9c5412
JS
3878 }
3879 }
3880 free(r);
3881}
3882
3883static void handle_arg_argv0(const char *arg)
3884{
3885 argv0 = strdup(arg);
3886}
3887
3888static void handle_arg_stack_size(const char *arg)
3889{
3890 char *p;
3891 guest_stack_size = strtoul(arg, &p, 0);
3892 if (guest_stack_size == 0) {
4d1275c2 3893 usage(EXIT_FAILURE);
fc9c5412
JS
3894 }
3895
3896 if (*p == 'M') {
3897 guest_stack_size *= 1024 * 1024;
3898 } else if (*p == 'k' || *p == 'K') {
3899 guest_stack_size *= 1024;
3900 }
3901}
3902
3903static void handle_arg_ld_prefix(const char *arg)
3904{
3905 interp_prefix = strdup(arg);
3906}
3907
3908static void handle_arg_pagesize(const char *arg)
3909{
3910 qemu_host_page_size = atoi(arg);
3911 if (qemu_host_page_size == 0 ||
3912 (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
3913 fprintf(stderr, "page size must be a power of two\n");
4d1275c2 3914 exit(EXIT_FAILURE);
fc9c5412
JS
3915 }
3916}
3917
c5e4a5a9
MR
3918static void handle_arg_randseed(const char *arg)
3919{
3920 unsigned long long seed;
3921
3922 if (parse_uint_full(arg, &seed, 0) != 0 || seed > UINT_MAX) {
3923 fprintf(stderr, "Invalid seed number: %s\n", arg);
4d1275c2 3924 exit(EXIT_FAILURE);
c5e4a5a9
MR
3925 }
3926 srand(seed);
3927}
3928
fc9c5412
JS
3929static void handle_arg_gdb(const char *arg)
3930{
3931 gdbstub_port = atoi(arg);
3932}
3933
3934static void handle_arg_uname(const char *arg)
3935{
3936 qemu_uname_release = strdup(arg);
3937}
3938
3939static void handle_arg_cpu(const char *arg)
3940{
3941 cpu_model = strdup(arg);
c8057f95 3942 if (cpu_model == NULL || is_help_option(cpu_model)) {
fc9c5412 3943 /* XXX: implement xxx_cpu_list for targets that still miss it */
e916cbf8
PM
3944#if defined(cpu_list)
3945 cpu_list(stdout, &fprintf);
fc9c5412 3946#endif
4d1275c2 3947 exit(EXIT_FAILURE);
fc9c5412
JS
3948 }
3949}
3950
fc9c5412
JS
3951static void handle_arg_guest_base(const char *arg)
3952{
3953 guest_base = strtol(arg, NULL, 0);
3954 have_guest_base = 1;
3955}
3956
3957static void handle_arg_reserved_va(const char *arg)
3958{
3959 char *p;
3960 int shift = 0;
3961 reserved_va = strtoul(arg, &p, 0);
3962 switch (*p) {
3963 case 'k':
3964 case 'K':
3965 shift = 10;
3966 break;
3967 case 'M':
3968 shift = 20;
3969 break;
3970 case 'G':
3971 shift = 30;
3972 break;
3973 }
3974 if (shift) {
3975 unsigned long unshifted = reserved_va;
3976 p++;
3977 reserved_va <<= shift;
3978 if (((reserved_va >> shift) != unshifted)
3979#if HOST_LONG_BITS > TARGET_VIRT_ADDR_SPACE_BITS
3980 || (reserved_va > (1ul << TARGET_VIRT_ADDR_SPACE_BITS))
3981#endif
3982 ) {
3983 fprintf(stderr, "Reserved virtual address too big\n");
4d1275c2 3984 exit(EXIT_FAILURE);
fc9c5412
JS
3985 }
3986 }
3987 if (*p) {
3988 fprintf(stderr, "Unrecognised -R size suffix '%s'\n", p);
4d1275c2 3989 exit(EXIT_FAILURE);
fc9c5412
JS
3990 }
3991}
fc9c5412
JS
3992
3993static void handle_arg_singlestep(const char *arg)
3994{
3995 singlestep = 1;
3996}
3997
3998static void handle_arg_strace(const char *arg)
3999{
4000 do_strace = 1;
4001}
4002
4003static void handle_arg_version(const char *arg)
4004{
2e59915d 4005 printf("qemu-" TARGET_NAME " version " QEMU_VERSION QEMU_PKGVERSION
0781dd6e 4006 "\n" QEMU_COPYRIGHT "\n");
4d1275c2 4007 exit(EXIT_SUCCESS);
fc9c5412
JS
4008}
4009
6533dd6e
LV
4010static char *trace_file;
4011static void handle_arg_trace(const char *arg)
4012{
4013 g_free(trace_file);
4014 trace_file = trace_opt_parse(arg);
4015}
4016
fc9c5412
JS
4017struct qemu_argument {
4018 const char *argv;
4019 const char *env;
4020 bool has_arg;
4021 void (*handle_opt)(const char *arg);
4022 const char *example;
4023 const char *help;
4024};
4025
42644cee 4026static const struct qemu_argument arg_table[] = {
fc9c5412
JS
4027 {"h", "", false, handle_arg_help,
4028 "", "print this help"},
daaf8c8e
MI
4029 {"help", "", false, handle_arg_help,
4030 "", ""},
fc9c5412
JS
4031 {"g", "QEMU_GDB", true, handle_arg_gdb,
4032 "port", "wait gdb connection to 'port'"},
4033 {"L", "QEMU_LD_PREFIX", true, handle_arg_ld_prefix,
4034 "path", "set the elf interpreter prefix to 'path'"},
4035 {"s", "QEMU_STACK_SIZE", true, handle_arg_stack_size,
4036 "size", "set the stack size to 'size' bytes"},
4037 {"cpu", "QEMU_CPU", true, handle_arg_cpu,
c8057f95 4038 "model", "select CPU (-cpu help for list)"},
fc9c5412
JS
4039 {"E", "QEMU_SET_ENV", true, handle_arg_set_env,
4040 "var=value", "sets targets environment variable (see below)"},
4041 {"U", "QEMU_UNSET_ENV", true, handle_arg_unset_env,
4042 "var", "unsets targets environment variable (see below)"},
4043 {"0", "QEMU_ARGV0", true, handle_arg_argv0,
4044 "argv0", "forces target process argv[0] to be 'argv0'"},
4045 {"r", "QEMU_UNAME", true, handle_arg_uname,
4046 "uname", "set qemu uname release string to 'uname'"},
fc9c5412
JS
4047 {"B", "QEMU_GUEST_BASE", true, handle_arg_guest_base,
4048 "address", "set guest_base address to 'address'"},
4049 {"R", "QEMU_RESERVED_VA", true, handle_arg_reserved_va,
4050 "size", "reserve 'size' bytes for guest virtual address space"},
fc9c5412 4051 {"d", "QEMU_LOG", true, handle_arg_log,
989b697d
PM
4052 "item[,...]", "enable logging of specified items "
4053 "(use '-d help' for a list of items)"},
50171d42 4054 {"D", "QEMU_LOG_FILENAME", true, handle_arg_log_filename,
989b697d 4055 "logfile", "write logs to 'logfile' (default stderr)"},
fc9c5412
JS
4056 {"p", "QEMU_PAGESIZE", true, handle_arg_pagesize,
4057 "pagesize", "set the host page size to 'pagesize'"},
4058 {"singlestep", "QEMU_SINGLESTEP", false, handle_arg_singlestep,
4059 "", "run in singlestep mode"},
4060 {"strace", "QEMU_STRACE", false, handle_arg_strace,
4061 "", "log system calls"},
c5e4a5a9
MR
4062 {"seed", "QEMU_RAND_SEED", true, handle_arg_randseed,
4063 "", "Seed for pseudo-random number generator"},
6533dd6e
LV
4064 {"trace", "QEMU_TRACE", true, handle_arg_trace,
4065 "", "[[enable=]<pattern>][,events=<file>][,file=<file>]"},
fc9c5412 4066 {"version", "QEMU_VERSION", false, handle_arg_version,
1386d4c0 4067 "", "display version information and exit"},
fc9c5412
JS
4068 {NULL, NULL, false, NULL, NULL, NULL}
4069};
4070
d03f9c32 4071static void usage(int exitcode)
fc9c5412 4072{
42644cee 4073 const struct qemu_argument *arginfo;
fc9c5412
JS
4074 int maxarglen;
4075 int maxenvlen;
4076
2e59915d
PB
4077 printf("usage: qemu-" TARGET_NAME " [options] program [arguments...]\n"
4078 "Linux CPU emulator (compiled for " TARGET_NAME " emulation)\n"
fc9c5412
JS
4079 "\n"
4080 "Options and associated environment variables:\n"
4081 "\n");
4082
63ec54d7
PM
4083 /* Calculate column widths. We must always have at least enough space
4084 * for the column header.
4085 */
4086 maxarglen = strlen("Argument");
4087 maxenvlen = strlen("Env-variable");
fc9c5412
JS
4088
4089 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
63ec54d7
PM
4090 int arglen = strlen(arginfo->argv);
4091 if (arginfo->has_arg) {
4092 arglen += strlen(arginfo->example) + 1;
4093 }
fc9c5412
JS
4094 if (strlen(arginfo->env) > maxenvlen) {
4095 maxenvlen = strlen(arginfo->env);
4096 }
63ec54d7
PM
4097 if (arglen > maxarglen) {
4098 maxarglen = arglen;
fc9c5412
JS
4099 }
4100 }
4101
63ec54d7
PM
4102 printf("%-*s %-*s Description\n", maxarglen+1, "Argument",
4103 maxenvlen, "Env-variable");
fc9c5412
JS
4104
4105 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
4106 if (arginfo->has_arg) {
4107 printf("-%s %-*s %-*s %s\n", arginfo->argv,
63ec54d7
PM
4108 (int)(maxarglen - strlen(arginfo->argv) - 1),
4109 arginfo->example, maxenvlen, arginfo->env, arginfo->help);
fc9c5412 4110 } else {
63ec54d7 4111 printf("-%-*s %-*s %s\n", maxarglen, arginfo->argv,
fc9c5412
JS
4112 maxenvlen, arginfo->env,
4113 arginfo->help);
4114 }
4115 }
4116
4117 printf("\n"
4118 "Defaults:\n"
4119 "QEMU_LD_PREFIX = %s\n"
989b697d 4120 "QEMU_STACK_SIZE = %ld byte\n",
fc9c5412 4121 interp_prefix,
989b697d 4122 guest_stack_size);
fc9c5412
JS
4123
4124 printf("\n"
4125 "You can use -E and -U options or the QEMU_SET_ENV and\n"
4126 "QEMU_UNSET_ENV environment variables to set and unset\n"
4127 "environment variables for the target process.\n"
4128 "It is possible to provide several variables by separating them\n"
4129 "by commas in getsubopt(3) style. Additionally it is possible to\n"
4130 "provide the -E and -U options multiple times.\n"
4131 "The following lines are equivalent:\n"
4132 " -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n"
4133 " -E var1=val2,var2=val2 -U LD_PRELOAD,LD_DEBUG\n"
4134 " QEMU_SET_ENV=var1=val2,var2=val2 QEMU_UNSET_ENV=LD_PRELOAD,LD_DEBUG\n"
4135 "Note that if you provide several changes to a single variable\n"
4136 "the last change will stay in effect.\n");
4137
d03f9c32 4138 exit(exitcode);
fc9c5412
JS
4139}
4140
4141static int parse_args(int argc, char **argv)
4142{
4143 const char *r;
4144 int optind;
42644cee 4145 const struct qemu_argument *arginfo;
fc9c5412
JS
4146
4147 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
4148 if (arginfo->env == NULL) {
4149 continue;
4150 }
4151
4152 r = getenv(arginfo->env);
4153 if (r != NULL) {
4154 arginfo->handle_opt(r);
4155 }
4156 }
4157
4158 optind = 1;
4159 for (;;) {
4160 if (optind >= argc) {
4161 break;
4162 }
4163 r = argv[optind];
4164 if (r[0] != '-') {
4165 break;
4166 }
4167 optind++;
4168 r++;
4169 if (!strcmp(r, "-")) {
4170 break;
4171 }
ba02577c
MI
4172 /* Treat --foo the same as -foo. */
4173 if (r[0] == '-') {
4174 r++;
4175 }
fc9c5412
JS
4176
4177 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
4178 if (!strcmp(r, arginfo->argv)) {
fc9c5412 4179 if (arginfo->has_arg) {
1386d4c0 4180 if (optind >= argc) {
138940bf
MI
4181 (void) fprintf(stderr,
4182 "qemu: missing argument for option '%s'\n", r);
4d1275c2 4183 exit(EXIT_FAILURE);
1386d4c0
PM
4184 }
4185 arginfo->handle_opt(argv[optind]);
fc9c5412 4186 optind++;
1386d4c0
PM
4187 } else {
4188 arginfo->handle_opt(NULL);
fc9c5412 4189 }
fc9c5412
JS
4190 break;
4191 }
4192 }
4193
4194 /* no option matched the current argv */
4195 if (arginfo->handle_opt == NULL) {
138940bf 4196 (void) fprintf(stderr, "qemu: unknown option '%s'\n", r);
4d1275c2 4197 exit(EXIT_FAILURE);
fc9c5412
JS
4198 }
4199 }
4200
4201 if (optind >= argc) {
138940bf 4202 (void) fprintf(stderr, "qemu: no user program specified\n");
4d1275c2 4203 exit(EXIT_FAILURE);
fc9c5412
JS
4204 }
4205
4206 filename = argv[optind];
4207 exec_path = argv[optind];
4208
4209 return optind;
4210}
4211
902b3d5c 4212int main(int argc, char **argv, char **envp)
31e31b8a 4213{
01ffc75b 4214 struct target_pt_regs regs1, *regs = &regs1;
31e31b8a 4215 struct image_info info1, *info = &info1;
edf8e2af 4216 struct linux_binprm bprm;
48e15fc2 4217 TaskState *ts;
9349b4f9 4218 CPUArchState *env;
db6b81d4 4219 CPUState *cpu;
586314f2 4220 int optind;
04a6dfeb 4221 char **target_environ, **wrk;
7d8cec95
AJ
4222 char **target_argv;
4223 int target_argc;
7d8cec95 4224 int i;
fd4d81dd 4225 int ret;
03cfd8fa 4226 int execfd;
b12b6a18 4227
fe4db84d 4228 module_call_init(MODULE_INIT_TRACE);
267f685b 4229 qemu_init_cpu_list();
ce008c1f
AF
4230 module_call_init(MODULE_INIT_QOM);
4231
04a6dfeb
AJ
4232 if ((envlist = envlist_create()) == NULL) {
4233 (void) fprintf(stderr, "Unable to allocate envlist\n");
4d1275c2 4234 exit(EXIT_FAILURE);
04a6dfeb
AJ
4235 }
4236
4237 /* add current environment into the list */
4238 for (wrk = environ; *wrk != NULL; wrk++) {
4239 (void) envlist_setenv(envlist, *wrk);
4240 }
4241
703e0e89
RH
4242 /* Read the stack limit from the kernel. If it's "unlimited",
4243 then we can do little else besides use the default. */
4244 {
4245 struct rlimit lim;
4246 if (getrlimit(RLIMIT_STACK, &lim) == 0
81bbe906
TY
4247 && lim.rlim_cur != RLIM_INFINITY
4248 && lim.rlim_cur == (target_long)lim.rlim_cur) {
703e0e89
RH
4249 guest_stack_size = lim.rlim_cur;
4250 }
4251 }
4252
b1f9be31 4253 cpu_model = NULL;
b5ec5ce0 4254
c5e4a5a9
MR
4255 srand(time(NULL));
4256
6533dd6e
LV
4257 qemu_add_opts(&qemu_trace_opts);
4258
fc9c5412 4259 optind = parse_args(argc, argv);
586314f2 4260
6533dd6e
LV
4261 if (!trace_init_backends()) {
4262 exit(1);
4263 }
4264 trace_init_file(trace_file);
4265
31e31b8a 4266 /* Zero out regs */
01ffc75b 4267 memset(regs, 0, sizeof(struct target_pt_regs));
31e31b8a
FB
4268
4269 /* Zero out image_info */
4270 memset(info, 0, sizeof(struct image_info));
4271
edf8e2af
MW
4272 memset(&bprm, 0, sizeof (bprm));
4273
74cd30b8
FB
4274 /* Scan interp_prefix dir for replacement files. */
4275 init_paths(interp_prefix);
4276
4a24a758
PM
4277 init_qemu_uname_release();
4278
46027c07 4279 if (cpu_model == NULL) {
aaed909a 4280#if defined(TARGET_I386)
46027c07
FB
4281#ifdef TARGET_X86_64
4282 cpu_model = "qemu64";
4283#else
4284 cpu_model = "qemu32";
4285#endif
aaed909a 4286#elif defined(TARGET_ARM)
088ab16c 4287 cpu_model = "any";
d2fbca94
GX
4288#elif defined(TARGET_UNICORE32)
4289 cpu_model = "any";
aaed909a
FB
4290#elif defined(TARGET_M68K)
4291 cpu_model = "any";
4292#elif defined(TARGET_SPARC)
4293#ifdef TARGET_SPARC64
4294 cpu_model = "TI UltraSparc II";
4295#else
4296 cpu_model = "Fujitsu MB86904";
46027c07 4297#endif
aaed909a
FB
4298#elif defined(TARGET_MIPS)
4299#if defined(TARGET_ABI_MIPSN32) || defined(TARGET_ABI_MIPSN64)
74797f40 4300 cpu_model = "5KEf";
aaed909a
FB
4301#else
4302 cpu_model = "24Kf";
4303#endif
d962783e
JL
4304#elif defined TARGET_OPENRISC
4305 cpu_model = "or1200";
aaed909a 4306#elif defined(TARGET_PPC)
a74029f6 4307# ifdef TARGET_PPC64
de3f1b98 4308 cpu_model = "POWER8";
a74029f6 4309# else
aaed909a 4310 cpu_model = "750";
a74029f6 4311# endif
91c45a38
RH
4312#elif defined TARGET_SH4
4313 cpu_model = TYPE_SH7785_CPU;
d8923bc7
DH
4314#elif defined TARGET_S390X
4315 cpu_model = "qemu";
aaed909a
FB
4316#else
4317 cpu_model = "any";
4318#endif
4319 }
d5ab9713 4320 tcg_exec_init(0);
83fb7adf
FB
4321 /* NOTE: we need to init the CPU at this stage to get
4322 qemu_host_page_size */
2994fd96
EH
4323 cpu = cpu_init(cpu_model);
4324 if (!cpu) {
aaed909a 4325 fprintf(stderr, "Unable to find CPU definition\n");
4d1275c2 4326 exit(EXIT_FAILURE);
aaed909a 4327 }
2994fd96 4328 env = cpu->env_ptr;
0ac46af3 4329 cpu_reset(cpu);
b55a37c9 4330
db6b81d4 4331 thread_cpu = cpu;
3b46e624 4332
b6741956
FB
4333 if (getenv("QEMU_STRACE")) {
4334 do_strace = 1;
b92c47c1
TS
4335 }
4336
c5e4a5a9
MR
4337 if (getenv("QEMU_RAND_SEED")) {
4338 handle_arg_randseed(getenv("QEMU_RAND_SEED"));
4339 }
4340
04a6dfeb
AJ
4341 target_environ = envlist_to_environ(envlist, NULL);
4342 envlist_free(envlist);
b12b6a18 4343
379f6698
PB
4344 /*
4345 * Now that page sizes are configured in cpu_init() we can do
4346 * proper page alignment for guest_base.
4347 */
4348 guest_base = HOST_PAGE_ALIGN(guest_base);
68a1c816 4349
806d1021
MI
4350 if (reserved_va || have_guest_base) {
4351 guest_base = init_guest_space(guest_base, reserved_va, 0,
4352 have_guest_base);
4353 if (guest_base == (unsigned long)-1) {
097b8cb8
PM
4354 fprintf(stderr, "Unable to reserve 0x%lx bytes of virtual address "
4355 "space for use as guest address space (check your virtual "
4356 "memory ulimit setting or reserve less using -R option)\n",
4357 reserved_va);
4d1275c2 4358 exit(EXIT_FAILURE);
68a1c816 4359 }
97cc7560 4360
806d1021
MI
4361 if (reserved_va) {
4362 mmap_next_start = reserved_va;
97cc7560
DDAG
4363 }
4364 }
379f6698
PB
4365
4366 /*
4367 * Read in mmap_min_addr kernel parameter. This value is used
4368 * When loading the ELF image to determine whether guest_base
14f24e14 4369 * is needed. It is also used in mmap_find_vma.
379f6698 4370 */
14f24e14 4371 {
379f6698
PB
4372 FILE *fp;
4373
4374 if ((fp = fopen("/proc/sys/vm/mmap_min_addr", "r")) != NULL) {
4375 unsigned long tmp;
4376 if (fscanf(fp, "%lu", &tmp) == 1) {
4377 mmap_min_addr = tmp;
13829020 4378 qemu_log_mask(CPU_LOG_PAGE, "host mmap_min_addr=0x%lx\n", mmap_min_addr);
379f6698
PB
4379 }
4380 fclose(fp);
4381 }
4382 }
379f6698 4383
7d8cec95
AJ
4384 /*
4385 * Prepare copy of argv vector for target.
4386 */
4387 target_argc = argc - optind;
4388 target_argv = calloc(target_argc + 1, sizeof (char *));
4389 if (target_argv == NULL) {
4390 (void) fprintf(stderr, "Unable to allocate memory for target_argv\n");
4d1275c2 4391 exit(EXIT_FAILURE);
7d8cec95
AJ
4392 }
4393
4394 /*
4395 * If argv0 is specified (using '-0' switch) we replace
4396 * argv[0] pointer with the given one.
4397 */
4398 i = 0;
4399 if (argv0 != NULL) {
4400 target_argv[i++] = strdup(argv0);
4401 }
4402 for (; i < target_argc; i++) {
4403 target_argv[i] = strdup(argv[optind + i]);
4404 }
4405 target_argv[target_argc] = NULL;
4406
c78d65e8 4407 ts = g_new0(TaskState, 1);
edf8e2af
MW
4408 init_task_state(ts);
4409 /* build Task State */
4410 ts->info = info;
4411 ts->bprm = &bprm;
0429a971 4412 cpu->opaque = ts;
edf8e2af
MW
4413 task_settid(ts);
4414
0b959cf5
RH
4415 execfd = qemu_getauxval(AT_EXECFD);
4416 if (execfd == 0) {
03cfd8fa 4417 execfd = open(filename, O_RDONLY);
0b959cf5
RH
4418 if (execfd < 0) {
4419 printf("Error while loading %s: %s\n", filename, strerror(errno));
4d1275c2 4420 _exit(EXIT_FAILURE);
0b959cf5 4421 }
03cfd8fa
LV
4422 }
4423
4424 ret = loader_exec(execfd, filename, target_argv, target_environ, regs,
fd4d81dd
AP
4425 info, &bprm);
4426 if (ret != 0) {
885c1d10 4427 printf("Error while loading %s: %s\n", filename, strerror(-ret));
4d1275c2 4428 _exit(EXIT_FAILURE);
b12b6a18
TS
4429 }
4430
4431 for (wrk = target_environ; *wrk; wrk++) {
4432 free(*wrk);
31e31b8a 4433 }
3b46e624 4434
b12b6a18
TS
4435 free(target_environ);
4436
13829020 4437 if (qemu_loglevel_mask(CPU_LOG_PAGE)) {
379f6698 4438 qemu_log("guest_base 0x%lx\n", guest_base);
2e77eac6
BS
4439 log_page_dump();
4440
4441 qemu_log("start_brk 0x" TARGET_ABI_FMT_lx "\n", info->start_brk);
4442 qemu_log("end_code 0x" TARGET_ABI_FMT_lx "\n", info->end_code);
7c4ee5bc
RH
4443 qemu_log("start_code 0x" TARGET_ABI_FMT_lx "\n", info->start_code);
4444 qemu_log("start_data 0x" TARGET_ABI_FMT_lx "\n", info->start_data);
2e77eac6 4445 qemu_log("end_data 0x" TARGET_ABI_FMT_lx "\n", info->end_data);
7c4ee5bc 4446 qemu_log("start_stack 0x" TARGET_ABI_FMT_lx "\n", info->start_stack);
2e77eac6
BS
4447 qemu_log("brk 0x" TARGET_ABI_FMT_lx "\n", info->brk);
4448 qemu_log("entry 0x" TARGET_ABI_FMT_lx "\n", info->entry);
7c4ee5bc
RH
4449 qemu_log("argv_start 0x" TARGET_ABI_FMT_lx "\n", info->arg_start);
4450 qemu_log("env_start 0x" TARGET_ABI_FMT_lx "\n",
4451 info->arg_end + (abi_ulong)sizeof(abi_ulong));
4452 qemu_log("auxv_start 0x" TARGET_ABI_FMT_lx "\n", info->saved_auxv);
2e77eac6 4453 }
31e31b8a 4454
53a5960a 4455 target_set_brk(info->brk);
31e31b8a 4456 syscall_init();
66fb9763 4457 signal_init();
31e31b8a 4458
9002ec79
RH
4459 /* Now that we've loaded the binary, GUEST_BASE is fixed. Delay
4460 generating the prologue until now so that the prologue can take
4461 the real value of GUEST_BASE into account. */
4462 tcg_prologue_init(&tcg_ctx);
9002ec79 4463
b346ff46 4464#if defined(TARGET_I386)
3802ce26 4465 env->cr[0] = CR0_PG_MASK | CR0_WP_MASK | CR0_PE_MASK;
b98dbc90 4466 env->hflags |= HF_PE_MASK | HF_CPL_MASK;
0514ef2f 4467 if (env->features[FEAT_1_EDX] & CPUID_SSE) {
1bde465e
FB
4468 env->cr[4] |= CR4_OSFXSR_MASK;
4469 env->hflags |= HF_OSFXSR_MASK;
4470 }
d2fd1af7 4471#ifndef TARGET_ABI32
4dbc422b 4472 /* enable 64 bit mode if possible */
0514ef2f 4473 if (!(env->features[FEAT_8000_0001_EDX] & CPUID_EXT2_LM)) {
4dbc422b 4474 fprintf(stderr, "The selected x86 CPU does not support 64 bit mode\n");
4d1275c2 4475 exit(EXIT_FAILURE);
4dbc422b 4476 }
d2fd1af7 4477 env->cr[4] |= CR4_PAE_MASK;
4dbc422b 4478 env->efer |= MSR_EFER_LMA | MSR_EFER_LME;
d2fd1af7
FB
4479 env->hflags |= HF_LMA_MASK;
4480#endif
1bde465e 4481
415e561f
FB
4482 /* flags setup : we activate the IRQs by default as in user mode */
4483 env->eflags |= IF_MASK;
3b46e624 4484
6dbad63e 4485 /* linux register setup */
d2fd1af7 4486#ifndef TARGET_ABI32
84409ddb
JM
4487 env->regs[R_EAX] = regs->rax;
4488 env->regs[R_EBX] = regs->rbx;
4489 env->regs[R_ECX] = regs->rcx;
4490 env->regs[R_EDX] = regs->rdx;
4491 env->regs[R_ESI] = regs->rsi;
4492 env->regs[R_EDI] = regs->rdi;
4493 env->regs[R_EBP] = regs->rbp;
4494 env->regs[R_ESP] = regs->rsp;
4495 env->eip = regs->rip;
4496#else
0ecfa993
FB
4497 env->regs[R_EAX] = regs->eax;
4498 env->regs[R_EBX] = regs->ebx;
4499 env->regs[R_ECX] = regs->ecx;
4500 env->regs[R_EDX] = regs->edx;
4501 env->regs[R_ESI] = regs->esi;
4502 env->regs[R_EDI] = regs->edi;
4503 env->regs[R_EBP] = regs->ebp;
4504 env->regs[R_ESP] = regs->esp;
dab2ed99 4505 env->eip = regs->eip;
84409ddb 4506#endif
31e31b8a 4507
f4beb510 4508 /* linux interrupt setup */
e441570f
AZ
4509#ifndef TARGET_ABI32
4510 env->idt.limit = 511;
4511#else
4512 env->idt.limit = 255;
4513#endif
4514 env->idt.base = target_mmap(0, sizeof(uint64_t) * (env->idt.limit + 1),
4515 PROT_READ|PROT_WRITE,
4516 MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
4517 idt_table = g2h(env->idt.base);
f4beb510
FB
4518 set_idt(0, 0);
4519 set_idt(1, 0);
4520 set_idt(2, 0);
4521 set_idt(3, 3);
4522 set_idt(4, 3);
ec95da6c 4523 set_idt(5, 0);
f4beb510
FB
4524 set_idt(6, 0);
4525 set_idt(7, 0);
4526 set_idt(8, 0);
4527 set_idt(9, 0);
4528 set_idt(10, 0);
4529 set_idt(11, 0);
4530 set_idt(12, 0);
4531 set_idt(13, 0);
4532 set_idt(14, 0);
4533 set_idt(15, 0);
4534 set_idt(16, 0);
4535 set_idt(17, 0);
4536 set_idt(18, 0);
4537 set_idt(19, 0);
4538 set_idt(0x80, 3);
4539
6dbad63e 4540 /* linux segment setup */
8d18e893
FB
4541 {
4542 uint64_t *gdt_table;
e441570f
AZ
4543 env->gdt.base = target_mmap(0, sizeof(uint64_t) * TARGET_GDT_ENTRIES,
4544 PROT_READ|PROT_WRITE,
4545 MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
8d18e893 4546 env->gdt.limit = sizeof(uint64_t) * TARGET_GDT_ENTRIES - 1;
e441570f 4547 gdt_table = g2h(env->gdt.base);
d2fd1af7 4548#ifdef TARGET_ABI32
8d18e893
FB
4549 write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
4550 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
4551 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
d2fd1af7
FB
4552#else
4553 /* 64 bit code segment */
4554 write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
4555 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
4556 DESC_L_MASK |
4557 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
4558#endif
8d18e893
FB
4559 write_dt(&gdt_table[__USER_DS >> 3], 0, 0xfffff,
4560 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
4561 (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT));
4562 }
6dbad63e 4563 cpu_x86_load_seg(env, R_CS, __USER_CS);
d2fd1af7
FB
4564 cpu_x86_load_seg(env, R_SS, __USER_DS);
4565#ifdef TARGET_ABI32
6dbad63e
FB
4566 cpu_x86_load_seg(env, R_DS, __USER_DS);
4567 cpu_x86_load_seg(env, R_ES, __USER_DS);
6dbad63e
FB
4568 cpu_x86_load_seg(env, R_FS, __USER_DS);
4569 cpu_x86_load_seg(env, R_GS, __USER_DS);
d6eb40f6
TS
4570 /* This hack makes Wine work... */
4571 env->segs[R_FS].selector = 0;
d2fd1af7
FB
4572#else
4573 cpu_x86_load_seg(env, R_DS, 0);
4574 cpu_x86_load_seg(env, R_ES, 0);
4575 cpu_x86_load_seg(env, R_FS, 0);
4576 cpu_x86_load_seg(env, R_GS, 0);
4577#endif
99033cae
AG
4578#elif defined(TARGET_AARCH64)
4579 {
4580 int i;
4581
4582 if (!(arm_feature(env, ARM_FEATURE_AARCH64))) {
4583 fprintf(stderr,
4584 "The selected ARM CPU does not support 64 bit mode\n");
4d1275c2 4585 exit(EXIT_FAILURE);
99033cae
AG
4586 }
4587
4588 for (i = 0; i < 31; i++) {
4589 env->xregs[i] = regs->regs[i];
4590 }
4591 env->pc = regs->pc;
4592 env->xregs[31] = regs->sp;
4593 }
b346ff46
FB
4594#elif defined(TARGET_ARM)
4595 {
4596 int i;
ae087923
PM
4597 cpsr_write(env, regs->uregs[16], CPSR_USER | CPSR_EXEC,
4598 CPSRWriteByInstr);
b346ff46
FB
4599 for(i = 0; i < 16; i++) {
4600 env->regs[i] = regs->uregs[i];
4601 }
f9fd40eb 4602#ifdef TARGET_WORDS_BIGENDIAN
d8fd2954
PB
4603 /* Enable BE8. */
4604 if (EF_ARM_EABI_VERSION(info->elf_flags) >= EF_ARM_EABI_VER4
4605 && (info->elf_flags & EF_ARM_BE8)) {
9c5a7460
PC
4606 env->uncached_cpsr |= CPSR_E;
4607 env->cp15.sctlr_el[1] |= SCTLR_E0E;
f9fd40eb
PB
4608 } else {
4609 env->cp15.sctlr_el[1] |= SCTLR_B;
d8fd2954 4610 }
f9fd40eb 4611#endif
b346ff46 4612 }
d2fbca94
GX
4613#elif defined(TARGET_UNICORE32)
4614 {
4615 int i;
4616 cpu_asr_write(env, regs->uregs[32], 0xffffffff);
4617 for (i = 0; i < 32; i++) {
4618 env->regs[i] = regs->uregs[i];
4619 }
4620 }
93ac68bc 4621#elif defined(TARGET_SPARC)
060366c5
FB
4622 {
4623 int i;
4624 env->pc = regs->pc;
4625 env->npc = regs->npc;
4626 env->y = regs->y;
4627 for(i = 0; i < 8; i++)
4628 env->gregs[i] = regs->u_regs[i];
4629 for(i = 0; i < 8; i++)
4630 env->regwptr[i] = regs->u_regs[i + 8];
4631 }
67867308
FB
4632#elif defined(TARGET_PPC)
4633 {
4634 int i;
3fc6c082 4635
0411a972 4636#if defined(TARGET_PPC64)
c8361129 4637 int flag = (env->insns_flags2 & PPC2_BOOKE206) ? MSR_CM : MSR_SF;
0411a972 4638#if defined(TARGET_ABI32)
c8361129 4639 env->msr &= ~((target_ulong)1 << flag);
e85e7c6e 4640#else
c8361129 4641 env->msr |= (target_ulong)1 << flag;
0411a972 4642#endif
84409ddb 4643#endif
67867308
FB
4644 env->nip = regs->nip;
4645 for(i = 0; i < 32; i++) {
4646 env->gpr[i] = regs->gpr[i];
4647 }
4648 }
e6e5906b
PB
4649#elif defined(TARGET_M68K)
4650 {
e6e5906b
PB
4651 env->pc = regs->pc;
4652 env->dregs[0] = regs->d0;
4653 env->dregs[1] = regs->d1;
4654 env->dregs[2] = regs->d2;
4655 env->dregs[3] = regs->d3;
4656 env->dregs[4] = regs->d4;
4657 env->dregs[5] = regs->d5;
4658 env->dregs[6] = regs->d6;
4659 env->dregs[7] = regs->d7;
4660 env->aregs[0] = regs->a0;
4661 env->aregs[1] = regs->a1;
4662 env->aregs[2] = regs->a2;
4663 env->aregs[3] = regs->a3;
4664 env->aregs[4] = regs->a4;
4665 env->aregs[5] = regs->a5;
4666 env->aregs[6] = regs->a6;
4667 env->aregs[7] = regs->usp;
4668 env->sr = regs->sr;
4669 ts->sim_syscalls = 1;
4670 }
b779e29e
EI
4671#elif defined(TARGET_MICROBLAZE)
4672 {
4673 env->regs[0] = regs->r0;
4674 env->regs[1] = regs->r1;
4675 env->regs[2] = regs->r2;
4676 env->regs[3] = regs->r3;
4677 env->regs[4] = regs->r4;
4678 env->regs[5] = regs->r5;
4679 env->regs[6] = regs->r6;
4680 env->regs[7] = regs->r7;
4681 env->regs[8] = regs->r8;
4682 env->regs[9] = regs->r9;
4683 env->regs[10] = regs->r10;
4684 env->regs[11] = regs->r11;
4685 env->regs[12] = regs->r12;
4686 env->regs[13] = regs->r13;
4687 env->regs[14] = regs->r14;
4688 env->regs[15] = regs->r15;
4689 env->regs[16] = regs->r16;
4690 env->regs[17] = regs->r17;
4691 env->regs[18] = regs->r18;
4692 env->regs[19] = regs->r19;
4693 env->regs[20] = regs->r20;
4694 env->regs[21] = regs->r21;
4695 env->regs[22] = regs->r22;
4696 env->regs[23] = regs->r23;
4697 env->regs[24] = regs->r24;
4698 env->regs[25] = regs->r25;
4699 env->regs[26] = regs->r26;
4700 env->regs[27] = regs->r27;
4701 env->regs[28] = regs->r28;
4702 env->regs[29] = regs->r29;
4703 env->regs[30] = regs->r30;
4704 env->regs[31] = regs->r31;
4705 env->sregs[SR_PC] = regs->pc;
4706 }
048f6b4d
FB
4707#elif defined(TARGET_MIPS)
4708 {
4709 int i;
4710
4711 for(i = 0; i < 32; i++) {
b5dc7732 4712 env->active_tc.gpr[i] = regs->regs[i];
048f6b4d 4713 }
0fddbbf2
NF
4714 env->active_tc.PC = regs->cp0_epc & ~(target_ulong)1;
4715 if (regs->cp0_epc & 1) {
4716 env->hflags |= MIPS_HFLAG_M16;
4717 }
599bc5e8
AM
4718 if (((info->elf_flags & EF_MIPS_NAN2008) != 0) !=
4719 ((env->active_fpu.fcr31 & (1 << FCR31_NAN2008)) != 0)) {
4720 if ((env->active_fpu.fcr31_rw_bitmask &
4721 (1 << FCR31_NAN2008)) == 0) {
4722 fprintf(stderr, "ELF binary's NaN mode not supported by CPU\n");
4723 exit(1);
4724 }
4725 if ((info->elf_flags & EF_MIPS_NAN2008) != 0) {
4726 env->active_fpu.fcr31 |= (1 << FCR31_NAN2008);
4727 } else {
4728 env->active_fpu.fcr31 &= ~(1 << FCR31_NAN2008);
4729 }
4730 restore_snan_bit_mode(env);
4731 }
048f6b4d 4732 }
a0a839b6
MV
4733#elif defined(TARGET_NIOS2)
4734 {
4735 env->regs[0] = 0;
4736 env->regs[1] = regs->r1;
4737 env->regs[2] = regs->r2;
4738 env->regs[3] = regs->r3;
4739 env->regs[4] = regs->r4;
4740 env->regs[5] = regs->r5;
4741 env->regs[6] = regs->r6;
4742 env->regs[7] = regs->r7;
4743 env->regs[8] = regs->r8;
4744 env->regs[9] = regs->r9;
4745 env->regs[10] = regs->r10;
4746 env->regs[11] = regs->r11;
4747 env->regs[12] = regs->r12;
4748 env->regs[13] = regs->r13;
4749 env->regs[14] = regs->r14;
4750 env->regs[15] = regs->r15;
4751 /* TODO: unsigned long orig_r2; */
4752 env->regs[R_RA] = regs->ra;
4753 env->regs[R_FP] = regs->fp;
4754 env->regs[R_SP] = regs->sp;
4755 env->regs[R_GP] = regs->gp;
4756 env->regs[CR_ESTATUS] = regs->estatus;
4757 env->regs[R_EA] = regs->ea;
4758 /* TODO: unsigned long orig_r7; */
4759
4760 /* Emulate eret when starting thread. */
4761 env->regs[R_PC] = regs->ea;
4762 }
d962783e
JL
4763#elif defined(TARGET_OPENRISC)
4764 {
4765 int i;
4766
4767 for (i = 0; i < 32; i++) {
4768 env->gpr[i] = regs->gpr[i];
4769 }
d962783e 4770 env->pc = regs->pc;
84775c43 4771 cpu_set_sr(env, regs->sr);
d962783e 4772 }
fdf9b3e8
FB
4773#elif defined(TARGET_SH4)
4774 {
4775 int i;
4776
4777 for(i = 0; i < 16; i++) {
4778 env->gregs[i] = regs->regs[i];
4779 }
4780 env->pc = regs->pc;
4781 }
7a3148a9
JM
4782#elif defined(TARGET_ALPHA)
4783 {
4784 int i;
4785
4786 for(i = 0; i < 28; i++) {
992f48a0 4787 env->ir[i] = ((abi_ulong *)regs)[i];
7a3148a9 4788 }
dad081ee 4789 env->ir[IR_SP] = regs->usp;
7a3148a9 4790 env->pc = regs->pc;
7a3148a9 4791 }
48733d19
TS
4792#elif defined(TARGET_CRIS)
4793 {
4794 env->regs[0] = regs->r0;
4795 env->regs[1] = regs->r1;
4796 env->regs[2] = regs->r2;
4797 env->regs[3] = regs->r3;
4798 env->regs[4] = regs->r4;
4799 env->regs[5] = regs->r5;
4800 env->regs[6] = regs->r6;
4801 env->regs[7] = regs->r7;
4802 env->regs[8] = regs->r8;
4803 env->regs[9] = regs->r9;
4804 env->regs[10] = regs->r10;
4805 env->regs[11] = regs->r11;
4806 env->regs[12] = regs->r12;
4807 env->regs[13] = regs->r13;
4808 env->regs[14] = info->start_stack;
4809 env->regs[15] = regs->acr;
4810 env->pc = regs->erp;
4811 }
a4c075f1
UH
4812#elif defined(TARGET_S390X)
4813 {
4814 int i;
4815 for (i = 0; i < 16; i++) {
4816 env->regs[i] = regs->gprs[i];
4817 }
4818 env->psw.mask = regs->psw.mask;
4819 env->psw.addr = regs->psw.addr;
4820 }
b16189b2
CG
4821#elif defined(TARGET_TILEGX)
4822 {
4823 int i;
4824 for (i = 0; i < TILEGX_R_COUNT; i++) {
4825 env->regs[i] = regs->regs[i];
4826 }
4827 for (i = 0; i < TILEGX_SPR_COUNT; i++) {
4828 env->spregs[i] = 0;
4829 }
4830 env->pc = regs->pc;
4831 }
7c248bcd
RH
4832#elif defined(TARGET_HPPA)
4833 {
4834 int i;
4835 for (i = 1; i < 32; i++) {
4836 env->gr[i] = regs->gr[i];
4837 }
4838 env->iaoq_f = regs->iaoq[0];
4839 env->iaoq_b = regs->iaoq[1];
4840 }
b346ff46
FB
4841#else
4842#error unsupported target CPU
4843#endif
31e31b8a 4844
d2fbca94 4845#if defined(TARGET_ARM) || defined(TARGET_M68K) || defined(TARGET_UNICORE32)
a87295e8
PB
4846 ts->stack_base = info->start_stack;
4847 ts->heap_base = info->brk;
4848 /* This will be filled in on the first SYS_HEAPINFO call. */
4849 ts->heap_limit = 0;
4850#endif
4851
74c33bed 4852 if (gdbstub_port) {
ff7a981a
PM
4853 if (gdbserver_start(gdbstub_port) < 0) {
4854 fprintf(stderr, "qemu: could not open gdbserver on port %d\n",
4855 gdbstub_port);
4d1275c2 4856 exit(EXIT_FAILURE);
ff7a981a 4857 }
db6b81d4 4858 gdb_handlesig(cpu, 0);
1fddef4b 4859 }
1b6b029e
FB
4860 cpu_loop(env);
4861 /* never exits */
31e31b8a
FB
4862 return 0;
4863}