4 * Copyright (c) 2003 Fabrice Bellard
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.
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.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
29 #define DEBUG_LOGFILE "/tmp/qemu.log"
32 #include <crt_externs.h>
33 # define environ (*_NSGetEnviron())
36 static const char *interp_prefix
= CONFIG_QEMU_PREFIX
;
37 const char *qemu_uname_release
= CONFIG_UNAME_RELEASE
;
39 #if defined(__i386__) && !defined(CONFIG_STATIC)
40 /* Force usage of an ELF interpreter even if it is an ELF shared
42 const char interp
[] __attribute__((section(".interp"))) = "/lib/ld-linux.so.2";
45 /* for recent libc, we add these dummy symbols which are not declared
46 when generating a linked object (bug in ld ?) */
47 #if (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 3)) && !defined(CONFIG_STATIC)
48 long __preinit_array_start
[0];
49 long __preinit_array_end
[0];
50 long __init_array_start
[0];
51 long __init_array_end
[0];
52 long __fini_array_start
[0];
53 long __fini_array_end
[0];
56 /* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
57 we allocate a bigger stack. Need a better solution, for example
58 by remapping the process stack directly at the right place */
59 unsigned long x86_stack_size
= 512 * 1024;
61 void gemu_log(const char *fmt
, ...)
66 vfprintf(stderr
, fmt
, ap
);
70 void cpu_outb(CPUState
*env
, int addr
, int val
)
72 fprintf(stderr
, "outb: port=0x%04x, data=%02x\n", addr
, val
);
75 void cpu_outw(CPUState
*env
, int addr
, int val
)
77 fprintf(stderr
, "outw: port=0x%04x, data=%04x\n", addr
, val
);
80 void cpu_outl(CPUState
*env
, int addr
, int val
)
82 fprintf(stderr
, "outl: port=0x%04x, data=%08x\n", addr
, val
);
85 int cpu_inb(CPUState
*env
, int addr
)
87 fprintf(stderr
, "inb: port=0x%04x\n", addr
);
91 int cpu_inw(CPUState
*env
, int addr
)
93 fprintf(stderr
, "inw: port=0x%04x\n", addr
);
97 int cpu_inl(CPUState
*env
, int addr
)
99 fprintf(stderr
, "inl: port=0x%04x\n", addr
);
103 int cpu_get_pic_interrupt(CPUState
*env
)
108 /* timers for rdtsc */
112 static uint64_t emu_time
;
114 int64_t cpu_get_real_ticks(void)
122 /***********************************************************/
123 /* CPUX86 core interface */
125 void cpu_smm_update(CPUState
*env
)
129 uint64_t cpu_get_tsc(CPUX86State
*env
)
131 return cpu_get_real_ticks();
134 static void write_dt(void *ptr
, unsigned long addr
, unsigned long limit
,
139 e1
= (addr
<< 16) | (limit
& 0xffff);
140 e2
= ((addr
>> 16) & 0xff) | (addr
& 0xff000000) | (limit
& 0x000f0000);
147 static void set_gate(void *ptr
, unsigned int type
, unsigned int dpl
,
148 unsigned long addr
, unsigned int sel
)
152 e1
= (addr
& 0xffff) | (sel
<< 16);
153 e2
= (addr
& 0xffff0000) | 0x8000 | (dpl
<< 13) | (type
<< 8);
159 uint64_t gdt_table
[6];
160 uint64_t idt_table
[256];
162 /* only dpl matters as we do only user space emulation */
163 static void set_idt(int n
, unsigned int dpl
)
165 set_gate(idt_table
+ n
, 0, dpl
, 0, 0);
168 void cpu_loop(CPUX86State
*env
)
172 target_siginfo_t info
;
175 trapnr
= cpu_x86_exec(env
);
179 env
->regs
[R_EAX
] = do_syscall(env
,
190 info
.si_signo
= SIGBUS
;
192 info
.si_code
= TARGET_SI_KERNEL
;
193 info
._sifields
._sigfault
._addr
= 0;
194 queue_signal(info
.si_signo
, &info
);
197 #ifndef TARGET_X86_64
198 if (env
->eflags
& VM_MASK
) {
199 handle_vm86_fault(env
);
203 info
.si_signo
= SIGSEGV
;
205 info
.si_code
= TARGET_SI_KERNEL
;
206 info
._sifields
._sigfault
._addr
= 0;
207 queue_signal(info
.si_signo
, &info
);
211 info
.si_signo
= SIGSEGV
;
213 if (!(env
->error_code
& 1))
214 info
.si_code
= TARGET_SEGV_MAPERR
;
216 info
.si_code
= TARGET_SEGV_ACCERR
;
217 info
._sifields
._sigfault
._addr
= env
->cr
[2];
218 queue_signal(info
.si_signo
, &info
);
221 #ifndef TARGET_X86_64
222 if (env
->eflags
& VM_MASK
) {
223 handle_vm86_trap(env
, trapnr
);
227 /* division by zero */
228 info
.si_signo
= SIGFPE
;
230 info
.si_code
= TARGET_FPE_INTDIV
;
231 info
._sifields
._sigfault
._addr
= env
->eip
;
232 queue_signal(info
.si_signo
, &info
);
237 #ifndef TARGET_X86_64
238 if (env
->eflags
& VM_MASK
) {
239 handle_vm86_trap(env
, trapnr
);
243 info
.si_signo
= SIGTRAP
;
245 if (trapnr
== EXCP01_SSTP
) {
246 info
.si_code
= TARGET_TRAP_BRKPT
;
247 info
._sifields
._sigfault
._addr
= env
->eip
;
249 info
.si_code
= TARGET_SI_KERNEL
;
250 info
._sifields
._sigfault
._addr
= 0;
252 queue_signal(info
.si_signo
, &info
);
257 #ifndef TARGET_X86_64
258 if (env
->eflags
& VM_MASK
) {
259 handle_vm86_trap(env
, trapnr
);
263 info
.si_signo
= SIGSEGV
;
265 info
.si_code
= TARGET_SI_KERNEL
;
266 info
._sifields
._sigfault
._addr
= 0;
267 queue_signal(info
.si_signo
, &info
);
271 info
.si_signo
= SIGILL
;
273 info
.si_code
= TARGET_ILL_ILLOPN
;
274 info
._sifields
._sigfault
._addr
= env
->eip
;
275 queue_signal(info
.si_signo
, &info
);
278 /* just indicate that signals should be handled asap */
284 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
289 info
.si_code
= TARGET_TRAP_BRKPT
;
290 queue_signal(info
.si_signo
, &info
);
295 pc
= env
->segs
[R_CS
].base
+ env
->eip
;
296 fprintf(stderr
, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
300 process_pending_signals(env
);
307 /* XXX: find a better solution */
308 extern void tb_invalidate_page_range(target_ulong start
, target_ulong end
);
310 static void arm_cache_flush(target_ulong start
, target_ulong last
)
312 target_ulong addr
, last1
;
318 last1
= ((addr
+ TARGET_PAGE_SIZE
) & TARGET_PAGE_MASK
) - 1;
321 tb_invalidate_page_range(addr
, last1
+ 1);
328 void cpu_loop(CPUARMState
*env
)
331 unsigned int n
, insn
;
332 target_siginfo_t info
;
336 trapnr
= cpu_arm_exec(env
);
340 TaskState
*ts
= env
->opaque
;
343 /* we handle the FPU emulation here, as Linux */
344 /* we get the opcode */
345 opcode
= tget32(env
->regs
[15]);
347 if (EmulateAll(opcode
, &ts
->fpa
, env
) == 0) {
348 info
.si_signo
= SIGILL
;
350 info
.si_code
= TARGET_ILL_ILLOPN
;
351 info
._sifields
._sigfault
._addr
= env
->regs
[15];
352 queue_signal(info
.si_signo
, &info
);
364 if (trapnr
== EXCP_BKPT
) {
366 insn
= tget16(env
->regs
[15]);
370 insn
= tget32(env
->regs
[15]);
371 n
= (insn
& 0xf) | ((insn
>> 4) & 0xff0);
376 insn
= tget16(env
->regs
[15] - 2);
379 insn
= tget32(env
->regs
[15] - 4);
384 if (n
== ARM_NR_cacheflush
) {
385 arm_cache_flush(env
->regs
[0], env
->regs
[1]);
386 } else if (n
== ARM_NR_semihosting
387 || n
== ARM_NR_thumb_semihosting
) {
388 env
->regs
[0] = do_arm_semihosting (env
);
389 } else if (n
== 0 || n
>= ARM_SYSCALL_BASE
390 || (env
->thumb
&& n
== ARM_THUMB_SYSCALL
)) {
392 if (env
->thumb
|| n
== 0) {
395 n
-= ARM_SYSCALL_BASE
;
398 env
->regs
[0] = do_syscall(env
,
412 /* just indicate that signals should be handled asap */
414 case EXCP_PREFETCH_ABORT
:
415 addr
= env
->cp15
.c6_data
;
417 case EXCP_DATA_ABORT
:
418 addr
= env
->cp15
.c6_insn
;
422 info
.si_signo
= SIGSEGV
;
424 /* XXX: check env->error_code */
425 info
.si_code
= TARGET_SEGV_MAPERR
;
426 info
._sifields
._sigfault
._addr
= addr
;
427 queue_signal(info
.si_signo
, &info
);
434 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
439 info
.si_code
= TARGET_TRAP_BRKPT
;
440 queue_signal(info
.si_signo
, &info
);
446 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
448 cpu_dump_state(env
, stderr
, fprintf
, 0);
451 process_pending_signals(env
);
461 /* WARNING: dealing with register windows _is_ complicated. More info
462 can be found at http://www.sics.se/~psm/sparcstack.html */
463 static inline int get_reg_index(CPUSPARCState
*env
, int cwp
, int index
)
465 index
= (index
+ cwp
* 16) & (16 * NWINDOWS
- 1);
466 /* wrap handling : if cwp is on the last window, then we use the
467 registers 'after' the end */
468 if (index
< 8 && env
->cwp
== (NWINDOWS
- 1))
469 index
+= (16 * NWINDOWS
);
473 /* save the register window 'cwp1' */
474 static inline void save_window_offset(CPUSPARCState
*env
, int cwp1
)
479 sp_ptr
= env
->regbase
[get_reg_index(env
, cwp1
, 6)];
480 #if defined(DEBUG_WIN)
481 printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n",
484 for(i
= 0; i
< 16; i
++) {
485 tputl(sp_ptr
, env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)]);
486 sp_ptr
+= sizeof(target_ulong
);
490 static void save_window(CPUSPARCState
*env
)
492 #ifndef TARGET_SPARC64
493 unsigned int new_wim
;
494 new_wim
= ((env
->wim
>> 1) | (env
->wim
<< (NWINDOWS
- 1))) &
495 ((1LL << NWINDOWS
) - 1);
496 save_window_offset(env
, (env
->cwp
- 2) & (NWINDOWS
- 1));
499 save_window_offset(env
, (env
->cwp
- 2) & (NWINDOWS
- 1));
505 static void restore_window(CPUSPARCState
*env
)
507 unsigned int new_wim
, i
, cwp1
;
510 new_wim
= ((env
->wim
<< 1) | (env
->wim
>> (NWINDOWS
- 1))) &
511 ((1LL << NWINDOWS
) - 1);
513 /* restore the invalid window */
514 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
515 sp_ptr
= env
->regbase
[get_reg_index(env
, cwp1
, 6)];
516 #if defined(DEBUG_WIN)
517 printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n",
520 for(i
= 0; i
< 16; i
++) {
521 env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)] = tgetl(sp_ptr
);
522 sp_ptr
+= sizeof(target_ulong
);
525 #ifdef TARGET_SPARC64
527 if (env
->cleanwin
< NWINDOWS
- 1)
533 static void flush_windows(CPUSPARCState
*env
)
539 /* if restore would invoke restore_window(), then we can stop */
540 cwp1
= (env
->cwp
+ offset
) & (NWINDOWS
- 1);
541 if (env
->wim
& (1 << cwp1
))
543 save_window_offset(env
, cwp1
);
546 /* set wim so that restore will reload the registers */
547 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
548 env
->wim
= 1 << cwp1
;
549 #if defined(DEBUG_WIN)
550 printf("flush_windows: nb=%d\n", offset
- 1);
554 void cpu_loop (CPUSPARCState
*env
)
557 target_siginfo_t info
;
560 trapnr
= cpu_sparc_exec (env
);
563 #ifndef TARGET_SPARC64
569 ret
= do_syscall (env
, env
->gregs
[1],
570 env
->regwptr
[0], env
->regwptr
[1],
571 env
->regwptr
[2], env
->regwptr
[3],
572 env
->regwptr
[4], env
->regwptr
[5]);
573 if ((unsigned int)ret
>= (unsigned int)(-515)) {
574 #ifdef TARGET_SPARC64
575 env
->xcc
|= PSR_CARRY
;
577 env
->psr
|= PSR_CARRY
;
581 #ifdef TARGET_SPARC64
582 env
->xcc
&= ~PSR_CARRY
;
584 env
->psr
&= ~PSR_CARRY
;
587 env
->regwptr
[0] = ret
;
588 /* next instruction */
590 env
->npc
= env
->npc
+ 4;
592 case 0x83: /* flush windows */
594 /* next instruction */
596 env
->npc
= env
->npc
+ 4;
598 #ifndef TARGET_SPARC64
599 case TT_WIN_OVF
: /* window overflow */
602 case TT_WIN_UNF
: /* window underflow */
608 info
.si_signo
= SIGSEGV
;
610 /* XXX: check env->error_code */
611 info
.si_code
= TARGET_SEGV_MAPERR
;
612 info
._sifields
._sigfault
._addr
= env
->mmuregs
[4];
613 queue_signal(info
.si_signo
, &info
);
617 case TT_SPILL
: /* window overflow */
620 case TT_FILL
: /* window underflow */
626 /* just indicate that signals should be handled asap */
632 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
637 info
.si_code
= TARGET_TRAP_BRKPT
;
638 queue_signal(info
.si_signo
, &info
);
643 printf ("Unhandled trap: 0x%x\n", trapnr
);
644 cpu_dump_state(env
, stderr
, fprintf
, 0);
647 process_pending_signals (env
);
655 static inline uint64_t cpu_ppc_get_tb (CPUState
*env
)
661 uint32_t cpu_ppc_load_tbl (CPUState
*env
)
663 return cpu_ppc_get_tb(env
) & 0xFFFFFFFF;
666 uint32_t cpu_ppc_load_tbu (CPUState
*env
)
668 return cpu_ppc_get_tb(env
) >> 32;
671 static void cpu_ppc_store_tb (CPUState
*env
, uint64_t value
)
676 void cpu_ppc_store_tbu (CPUState
*env
, uint32_t value
)
678 cpu_ppc_store_tb(env
, ((uint64_t)value
<< 32) | cpu_ppc_load_tbl(env
));
681 void cpu_ppc_store_tbl (CPUState
*env
, uint32_t value
)
683 cpu_ppc_store_tb(env
, ((uint64_t)cpu_ppc_load_tbl(env
) << 32) | value
);
686 void cpu_ppc601_store_rtcu (CPUState
*env
, uint32_t value
)
687 __attribute__ (( alias ("cpu_ppc_store_tbu") ));
689 uint32_t cpu_ppc601_load_rtcu (CPUState
*env
)
690 __attribute__ (( alias ("cpu_ppc_load_tbu") ));
692 void cpu_ppc601_store_rtcl (CPUState
*env
, uint32_t value
)
694 cpu_ppc_store_tbl(env
, value
& 0x3FFFFF80);
697 uint32_t cpu_ppc601_load_rtcl (CPUState
*env
)
699 return cpu_ppc_load_tbl(env
) & 0x3FFFFF80;
702 void cpu_loop(CPUPPCState
*env
)
704 target_siginfo_t info
;
709 trapnr
= cpu_ppc_exec(env
);
710 if (trapnr
!= EXCP_SYSCALL_USER
&& trapnr
!= EXCP_BRANCH
&&
711 trapnr
!= EXCP_TRACE
) {
713 cpu_dump_state(env
, logfile
, fprintf
, 0);
719 case EXCP_SYSCALL_USER
:
722 * PPC ABI uses overflow flag in cr0 to signal an error
726 printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env
->gpr
[0],
727 env
->gpr
[3], env
->gpr
[4], env
->gpr
[5], env
->gpr
[6]);
730 ret
= do_syscall(env
, env
->gpr
[0], env
->gpr
[3], env
->gpr
[4],
731 env
->gpr
[5], env
->gpr
[6], env
->gpr
[7],
733 if (ret
> (uint32_t)(-515)) {
739 printf("syscall returned 0x%08x (%d)\n", ret
, ret
);
743 /* Should not happen ! */
744 fprintf(stderr
, "RESET asked... Stop emulation\n");
746 fprintf(logfile
, "RESET asked... Stop emulation\n");
748 case EXCP_MACHINE_CHECK
:
749 fprintf(stderr
, "Machine check exeption... Stop emulation\n");
751 fprintf(logfile
, "RESET asked... Stop emulation\n");
752 info
.si_signo
= TARGET_SIGBUS
;
754 info
.si_code
= TARGET_BUS_OBJERR
;
755 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
756 queue_signal(info
.si_signo
, &info
);
758 fprintf(stderr
, "Invalid data memory access: 0x" ADDRX
"\n",
761 fprintf(logfile
, "Invalid data memory access: 0x" ADDRX
"\n",
764 switch (env
->error_code
& 0xFF000000) {
766 info
.si_signo
= TARGET_SIGSEGV
;
768 info
.si_code
= TARGET_SEGV_MAPERR
;
771 info
.si_signo
= TARGET_SIGILL
;
773 info
.si_code
= TARGET_ILL_ILLADR
;
776 info
.si_signo
= TARGET_SIGSEGV
;
778 info
.si_code
= TARGET_SEGV_ACCERR
;
781 /* Let's send a regular segfault... */
782 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
785 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
788 info
.si_signo
= TARGET_SIGSEGV
;
790 info
.si_code
= TARGET_SEGV_MAPERR
;
793 info
._sifields
._sigfault
._addr
= env
->nip
;
794 queue_signal(info
.si_signo
, &info
);
797 fprintf(stderr
, "Invalid instruction fetch\n");
799 fprintf(logfile
, "Invalid instruction fetch\n");
800 switch (env
->error_code
& 0xFF000000) {
802 info
.si_signo
= TARGET_SIGSEGV
;
804 info
.si_code
= TARGET_SEGV_MAPERR
;
808 info
.si_signo
= TARGET_SIGSEGV
;
810 info
.si_code
= TARGET_SEGV_ACCERR
;
813 /* Let's send a regular segfault... */
814 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
817 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
820 info
.si_signo
= TARGET_SIGSEGV
;
822 info
.si_code
= TARGET_SEGV_MAPERR
;
825 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
826 queue_signal(info
.si_signo
, &info
);
829 /* Should not happen ! */
830 fprintf(stderr
, "External interruption... Stop emulation\n");
832 fprintf(logfile
, "External interruption... Stop emulation\n");
835 fprintf(stderr
, "Invalid unaligned memory access\n");
837 fprintf(logfile
, "Invalid unaligned memory access\n");
838 info
.si_signo
= TARGET_SIGBUS
;
840 info
.si_code
= TARGET_BUS_ADRALN
;
841 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
842 queue_signal(info
.si_signo
, &info
);
845 switch (env
->error_code
& ~0xF) {
847 fprintf(stderr
, "Program exception\n");
849 fprintf(logfile
, "Program exception\n");
851 env
->fpscr
[7] |= 0x8;
852 /* Finally, update FEX */
853 if ((((env
->fpscr
[7] & 0x3) << 3) | (env
->fpscr
[6] >> 1)) &
854 ((env
->fpscr
[1] << 1) | (env
->fpscr
[0] >> 3)))
855 env
->fpscr
[7] |= 0x4;
856 info
.si_signo
= TARGET_SIGFPE
;
858 switch (env
->error_code
& 0xF) {
860 info
.si_code
= TARGET_FPE_FLTOVF
;
863 info
.si_code
= TARGET_FPE_FLTUND
;
867 info
.si_code
= TARGET_FPE_FLTDIV
;
870 info
.si_code
= TARGET_FPE_FLTRES
;
873 info
.si_code
= TARGET_FPE_FLTINV
;
882 info
.si_code
= TARGET_FPE_FLTSUB
;
885 fprintf(stderr
, "Unknown floating point exception "
886 "(%02x)\n", env
->error_code
);
888 fprintf(logfile
, "Unknown floating point exception "
889 "(%02x)\n", env
->error_code
& 0xF);
894 fprintf(stderr
, "Invalid instruction\n");
896 fprintf(logfile
, "Invalid instruction\n");
897 info
.si_signo
= TARGET_SIGILL
;
899 switch (env
->error_code
& 0xF) {
900 case EXCP_INVAL_INVAL
:
901 info
.si_code
= TARGET_ILL_ILLOPC
;
903 case EXCP_INVAL_LSWX
:
904 info
.si_code
= TARGET_ILL_ILLOPN
;
907 info
.si_code
= TARGET_ILL_PRVREG
;
910 info
.si_code
= TARGET_ILL_COPROC
;
913 fprintf(stderr
, "Unknown invalid operation (%02x)\n",
914 env
->error_code
& 0xF);
916 fprintf(logfile
, "Unknown invalid operation (%02x)\n",
917 env
->error_code
& 0xF);
919 info
.si_code
= TARGET_ILL_ILLADR
;
924 fprintf(stderr
, "Privilege violation\n");
926 fprintf(logfile
, "Privilege violation\n");
927 info
.si_signo
= TARGET_SIGILL
;
929 switch (env
->error_code
& 0xF) {
931 info
.si_code
= TARGET_ILL_PRVOPC
;
934 info
.si_code
= TARGET_ILL_PRVREG
;
937 fprintf(stderr
, "Unknown privilege violation (%02x)\n",
938 env
->error_code
& 0xF);
939 info
.si_code
= TARGET_ILL_PRVOPC
;
944 fprintf(stderr
, "Tried to call a TRAP\n");
946 fprintf(logfile
, "Tried to call a TRAP\n");
949 /* Should not happen ! */
950 fprintf(stderr
, "Unknown program exception (%02x)\n",
953 fprintf(logfile
, "Unknwon program exception (%02x)\n",
958 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
959 queue_signal(info
.si_signo
, &info
);
962 fprintf(stderr
, "No floating point allowed\n");
964 fprintf(logfile
, "No floating point allowed\n");
965 info
.si_signo
= TARGET_SIGILL
;
967 info
.si_code
= TARGET_ILL_COPROC
;
968 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
969 queue_signal(info
.si_signo
, &info
);
972 /* Should not happen ! */
973 fprintf(stderr
, "Decrementer exception\n");
975 fprintf(logfile
, "Decrementer exception\n");
978 /* Do nothing: we use this to trace execution */
981 /* Should not happen ! */
982 fprintf(stderr
, "Floating point assist exception\n");
984 fprintf(logfile
, "Floating point assist exception\n");
987 /* We reloaded the msr, just go on */
989 fprintf(stderr
, "Tried to go into supervisor mode !\n");
991 fprintf(logfile
, "Tried to go into supervisor mode !\n");
996 /* We stopped because of a jump... */
999 /* Don't know why this should ever happen... */
1005 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1008 info
.si_signo
= sig
;
1010 info
.si_code
= TARGET_TRAP_BRKPT
;
1011 queue_signal(info
.si_signo
, &info
);
1016 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1019 fprintf(logfile
, "qemu: unhandled CPU exception 0x%02x - "
1020 "0x%02x - aborting\n", trapnr
, env
->error_code
);
1024 process_pending_signals(env
);
1031 #define MIPS_SYS(name, args) args,
1033 static const uint8_t mips_syscall_args
[] = {
1034 MIPS_SYS(sys_syscall
, 0) /* 4000 */
1035 MIPS_SYS(sys_exit
, 1)
1036 MIPS_SYS(sys_fork
, 0)
1037 MIPS_SYS(sys_read
, 3)
1038 MIPS_SYS(sys_write
, 3)
1039 MIPS_SYS(sys_open
, 3) /* 4005 */
1040 MIPS_SYS(sys_close
, 1)
1041 MIPS_SYS(sys_waitpid
, 3)
1042 MIPS_SYS(sys_creat
, 2)
1043 MIPS_SYS(sys_link
, 2)
1044 MIPS_SYS(sys_unlink
, 1) /* 4010 */
1045 MIPS_SYS(sys_execve
, 0)
1046 MIPS_SYS(sys_chdir
, 1)
1047 MIPS_SYS(sys_time
, 1)
1048 MIPS_SYS(sys_mknod
, 3)
1049 MIPS_SYS(sys_chmod
, 2) /* 4015 */
1050 MIPS_SYS(sys_lchown
, 3)
1051 MIPS_SYS(sys_ni_syscall
, 0)
1052 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_stat */
1053 MIPS_SYS(sys_lseek
, 3)
1054 MIPS_SYS(sys_getpid
, 0) /* 4020 */
1055 MIPS_SYS(sys_mount
, 5)
1056 MIPS_SYS(sys_oldumount
, 1)
1057 MIPS_SYS(sys_setuid
, 1)
1058 MIPS_SYS(sys_getuid
, 0)
1059 MIPS_SYS(sys_stime
, 1) /* 4025 */
1060 MIPS_SYS(sys_ptrace
, 4)
1061 MIPS_SYS(sys_alarm
, 1)
1062 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_fstat */
1063 MIPS_SYS(sys_pause
, 0)
1064 MIPS_SYS(sys_utime
, 2) /* 4030 */
1065 MIPS_SYS(sys_ni_syscall
, 0)
1066 MIPS_SYS(sys_ni_syscall
, 0)
1067 MIPS_SYS(sys_access
, 2)
1068 MIPS_SYS(sys_nice
, 1)
1069 MIPS_SYS(sys_ni_syscall
, 0) /* 4035 */
1070 MIPS_SYS(sys_sync
, 0)
1071 MIPS_SYS(sys_kill
, 2)
1072 MIPS_SYS(sys_rename
, 2)
1073 MIPS_SYS(sys_mkdir
, 2)
1074 MIPS_SYS(sys_rmdir
, 1) /* 4040 */
1075 MIPS_SYS(sys_dup
, 1)
1076 MIPS_SYS(sys_pipe
, 0)
1077 MIPS_SYS(sys_times
, 1)
1078 MIPS_SYS(sys_ni_syscall
, 0)
1079 MIPS_SYS(sys_brk
, 1) /* 4045 */
1080 MIPS_SYS(sys_setgid
, 1)
1081 MIPS_SYS(sys_getgid
, 0)
1082 MIPS_SYS(sys_ni_syscall
, 0) /* was signal(2) */
1083 MIPS_SYS(sys_geteuid
, 0)
1084 MIPS_SYS(sys_getegid
, 0) /* 4050 */
1085 MIPS_SYS(sys_acct
, 0)
1086 MIPS_SYS(sys_umount
, 2)
1087 MIPS_SYS(sys_ni_syscall
, 0)
1088 MIPS_SYS(sys_ioctl
, 3)
1089 MIPS_SYS(sys_fcntl
, 3) /* 4055 */
1090 MIPS_SYS(sys_ni_syscall
, 2)
1091 MIPS_SYS(sys_setpgid
, 2)
1092 MIPS_SYS(sys_ni_syscall
, 0)
1093 MIPS_SYS(sys_olduname
, 1)
1094 MIPS_SYS(sys_umask
, 1) /* 4060 */
1095 MIPS_SYS(sys_chroot
, 1)
1096 MIPS_SYS(sys_ustat
, 2)
1097 MIPS_SYS(sys_dup2
, 2)
1098 MIPS_SYS(sys_getppid
, 0)
1099 MIPS_SYS(sys_getpgrp
, 0) /* 4065 */
1100 MIPS_SYS(sys_setsid
, 0)
1101 MIPS_SYS(sys_sigaction
, 3)
1102 MIPS_SYS(sys_sgetmask
, 0)
1103 MIPS_SYS(sys_ssetmask
, 1)
1104 MIPS_SYS(sys_setreuid
, 2) /* 4070 */
1105 MIPS_SYS(sys_setregid
, 2)
1106 MIPS_SYS(sys_sigsuspend
, 0)
1107 MIPS_SYS(sys_sigpending
, 1)
1108 MIPS_SYS(sys_sethostname
, 2)
1109 MIPS_SYS(sys_setrlimit
, 2) /* 4075 */
1110 MIPS_SYS(sys_getrlimit
, 2)
1111 MIPS_SYS(sys_getrusage
, 2)
1112 MIPS_SYS(sys_gettimeofday
, 2)
1113 MIPS_SYS(sys_settimeofday
, 2)
1114 MIPS_SYS(sys_getgroups
, 2) /* 4080 */
1115 MIPS_SYS(sys_setgroups
, 2)
1116 MIPS_SYS(sys_ni_syscall
, 0) /* old_select */
1117 MIPS_SYS(sys_symlink
, 2)
1118 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_lstat */
1119 MIPS_SYS(sys_readlink
, 3) /* 4085 */
1120 MIPS_SYS(sys_uselib
, 1)
1121 MIPS_SYS(sys_swapon
, 2)
1122 MIPS_SYS(sys_reboot
, 3)
1123 MIPS_SYS(old_readdir
, 3)
1124 MIPS_SYS(old_mmap
, 6) /* 4090 */
1125 MIPS_SYS(sys_munmap
, 2)
1126 MIPS_SYS(sys_truncate
, 2)
1127 MIPS_SYS(sys_ftruncate
, 2)
1128 MIPS_SYS(sys_fchmod
, 2)
1129 MIPS_SYS(sys_fchown
, 3) /* 4095 */
1130 MIPS_SYS(sys_getpriority
, 2)
1131 MIPS_SYS(sys_setpriority
, 3)
1132 MIPS_SYS(sys_ni_syscall
, 0)
1133 MIPS_SYS(sys_statfs
, 2)
1134 MIPS_SYS(sys_fstatfs
, 2) /* 4100 */
1135 MIPS_SYS(sys_ni_syscall
, 0) /* was ioperm(2) */
1136 MIPS_SYS(sys_socketcall
, 2)
1137 MIPS_SYS(sys_syslog
, 3)
1138 MIPS_SYS(sys_setitimer
, 3)
1139 MIPS_SYS(sys_getitimer
, 2) /* 4105 */
1140 MIPS_SYS(sys_newstat
, 2)
1141 MIPS_SYS(sys_newlstat
, 2)
1142 MIPS_SYS(sys_newfstat
, 2)
1143 MIPS_SYS(sys_uname
, 1)
1144 MIPS_SYS(sys_ni_syscall
, 0) /* 4110 was iopl(2) */
1145 MIPS_SYS(sys_vhangup
, 0)
1146 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_idle() */
1147 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_vm86 */
1148 MIPS_SYS(sys_wait4
, 4)
1149 MIPS_SYS(sys_swapoff
, 1) /* 4115 */
1150 MIPS_SYS(sys_sysinfo
, 1)
1151 MIPS_SYS(sys_ipc
, 6)
1152 MIPS_SYS(sys_fsync
, 1)
1153 MIPS_SYS(sys_sigreturn
, 0)
1154 MIPS_SYS(sys_clone
, 0) /* 4120 */
1155 MIPS_SYS(sys_setdomainname
, 2)
1156 MIPS_SYS(sys_newuname
, 1)
1157 MIPS_SYS(sys_ni_syscall
, 0) /* sys_modify_ldt */
1158 MIPS_SYS(sys_adjtimex
, 1)
1159 MIPS_SYS(sys_mprotect
, 3) /* 4125 */
1160 MIPS_SYS(sys_sigprocmask
, 3)
1161 MIPS_SYS(sys_ni_syscall
, 0) /* was create_module */
1162 MIPS_SYS(sys_init_module
, 5)
1163 MIPS_SYS(sys_delete_module
, 1)
1164 MIPS_SYS(sys_ni_syscall
, 0) /* 4130 was get_kernel_syms */
1165 MIPS_SYS(sys_quotactl
, 0)
1166 MIPS_SYS(sys_getpgid
, 1)
1167 MIPS_SYS(sys_fchdir
, 1)
1168 MIPS_SYS(sys_bdflush
, 2)
1169 MIPS_SYS(sys_sysfs
, 3) /* 4135 */
1170 MIPS_SYS(sys_personality
, 1)
1171 MIPS_SYS(sys_ni_syscall
, 0) /* for afs_syscall */
1172 MIPS_SYS(sys_setfsuid
, 1)
1173 MIPS_SYS(sys_setfsgid
, 1)
1174 MIPS_SYS(sys_llseek
, 5) /* 4140 */
1175 MIPS_SYS(sys_getdents
, 3)
1176 MIPS_SYS(sys_select
, 5)
1177 MIPS_SYS(sys_flock
, 2)
1178 MIPS_SYS(sys_msync
, 3)
1179 MIPS_SYS(sys_readv
, 3) /* 4145 */
1180 MIPS_SYS(sys_writev
, 3)
1181 MIPS_SYS(sys_cacheflush
, 3)
1182 MIPS_SYS(sys_cachectl
, 3)
1183 MIPS_SYS(sys_sysmips
, 4)
1184 MIPS_SYS(sys_ni_syscall
, 0) /* 4150 */
1185 MIPS_SYS(sys_getsid
, 1)
1186 MIPS_SYS(sys_fdatasync
, 0)
1187 MIPS_SYS(sys_sysctl
, 1)
1188 MIPS_SYS(sys_mlock
, 2)
1189 MIPS_SYS(sys_munlock
, 2) /* 4155 */
1190 MIPS_SYS(sys_mlockall
, 1)
1191 MIPS_SYS(sys_munlockall
, 0)
1192 MIPS_SYS(sys_sched_setparam
, 2)
1193 MIPS_SYS(sys_sched_getparam
, 2)
1194 MIPS_SYS(sys_sched_setscheduler
, 3) /* 4160 */
1195 MIPS_SYS(sys_sched_getscheduler
, 1)
1196 MIPS_SYS(sys_sched_yield
, 0)
1197 MIPS_SYS(sys_sched_get_priority_max
, 1)
1198 MIPS_SYS(sys_sched_get_priority_min
, 1)
1199 MIPS_SYS(sys_sched_rr_get_interval
, 2) /* 4165 */
1200 MIPS_SYS(sys_nanosleep
, 2)
1201 MIPS_SYS(sys_mremap
, 4)
1202 MIPS_SYS(sys_accept
, 3)
1203 MIPS_SYS(sys_bind
, 3)
1204 MIPS_SYS(sys_connect
, 3) /* 4170 */
1205 MIPS_SYS(sys_getpeername
, 3)
1206 MIPS_SYS(sys_getsockname
, 3)
1207 MIPS_SYS(sys_getsockopt
, 5)
1208 MIPS_SYS(sys_listen
, 2)
1209 MIPS_SYS(sys_recv
, 4) /* 4175 */
1210 MIPS_SYS(sys_recvfrom
, 6)
1211 MIPS_SYS(sys_recvmsg
, 3)
1212 MIPS_SYS(sys_send
, 4)
1213 MIPS_SYS(sys_sendmsg
, 3)
1214 MIPS_SYS(sys_sendto
, 6) /* 4180 */
1215 MIPS_SYS(sys_setsockopt
, 5)
1216 MIPS_SYS(sys_shutdown
, 2)
1217 MIPS_SYS(sys_socket
, 3)
1218 MIPS_SYS(sys_socketpair
, 4)
1219 MIPS_SYS(sys_setresuid
, 3) /* 4185 */
1220 MIPS_SYS(sys_getresuid
, 3)
1221 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_query_module */
1222 MIPS_SYS(sys_poll
, 3)
1223 MIPS_SYS(sys_nfsservctl
, 3)
1224 MIPS_SYS(sys_setresgid
, 3) /* 4190 */
1225 MIPS_SYS(sys_getresgid
, 3)
1226 MIPS_SYS(sys_prctl
, 5)
1227 MIPS_SYS(sys_rt_sigreturn
, 0)
1228 MIPS_SYS(sys_rt_sigaction
, 4)
1229 MIPS_SYS(sys_rt_sigprocmask
, 4) /* 4195 */
1230 MIPS_SYS(sys_rt_sigpending
, 2)
1231 MIPS_SYS(sys_rt_sigtimedwait
, 4)
1232 MIPS_SYS(sys_rt_sigqueueinfo
, 3)
1233 MIPS_SYS(sys_rt_sigsuspend
, 0)
1234 MIPS_SYS(sys_pread64
, 6) /* 4200 */
1235 MIPS_SYS(sys_pwrite64
, 6)
1236 MIPS_SYS(sys_chown
, 3)
1237 MIPS_SYS(sys_getcwd
, 2)
1238 MIPS_SYS(sys_capget
, 2)
1239 MIPS_SYS(sys_capset
, 2) /* 4205 */
1240 MIPS_SYS(sys_sigaltstack
, 0)
1241 MIPS_SYS(sys_sendfile
, 4)
1242 MIPS_SYS(sys_ni_syscall
, 0)
1243 MIPS_SYS(sys_ni_syscall
, 0)
1244 MIPS_SYS(sys_mmap2
, 6) /* 4210 */
1245 MIPS_SYS(sys_truncate64
, 4)
1246 MIPS_SYS(sys_ftruncate64
, 4)
1247 MIPS_SYS(sys_stat64
, 2)
1248 MIPS_SYS(sys_lstat64
, 2)
1249 MIPS_SYS(sys_fstat64
, 2) /* 4215 */
1250 MIPS_SYS(sys_pivot_root
, 2)
1251 MIPS_SYS(sys_mincore
, 3)
1252 MIPS_SYS(sys_madvise
, 3)
1253 MIPS_SYS(sys_getdents64
, 3)
1254 MIPS_SYS(sys_fcntl64
, 3) /* 4220 */
1255 MIPS_SYS(sys_ni_syscall
, 0)
1256 MIPS_SYS(sys_gettid
, 0)
1257 MIPS_SYS(sys_readahead
, 5)
1258 MIPS_SYS(sys_setxattr
, 5)
1259 MIPS_SYS(sys_lsetxattr
, 5) /* 4225 */
1260 MIPS_SYS(sys_fsetxattr
, 5)
1261 MIPS_SYS(sys_getxattr
, 4)
1262 MIPS_SYS(sys_lgetxattr
, 4)
1263 MIPS_SYS(sys_fgetxattr
, 4)
1264 MIPS_SYS(sys_listxattr
, 3) /* 4230 */
1265 MIPS_SYS(sys_llistxattr
, 3)
1266 MIPS_SYS(sys_flistxattr
, 3)
1267 MIPS_SYS(sys_removexattr
, 2)
1268 MIPS_SYS(sys_lremovexattr
, 2)
1269 MIPS_SYS(sys_fremovexattr
, 2) /* 4235 */
1270 MIPS_SYS(sys_tkill
, 2)
1271 MIPS_SYS(sys_sendfile64
, 5)
1272 MIPS_SYS(sys_futex
, 2)
1273 MIPS_SYS(sys_sched_setaffinity
, 3)
1274 MIPS_SYS(sys_sched_getaffinity
, 3) /* 4240 */
1275 MIPS_SYS(sys_io_setup
, 2)
1276 MIPS_SYS(sys_io_destroy
, 1)
1277 MIPS_SYS(sys_io_getevents
, 5)
1278 MIPS_SYS(sys_io_submit
, 3)
1279 MIPS_SYS(sys_io_cancel
, 3) /* 4245 */
1280 MIPS_SYS(sys_exit_group
, 1)
1281 MIPS_SYS(sys_lookup_dcookie
, 3)
1282 MIPS_SYS(sys_epoll_create
, 1)
1283 MIPS_SYS(sys_epoll_ctl
, 4)
1284 MIPS_SYS(sys_epoll_wait
, 3) /* 4250 */
1285 MIPS_SYS(sys_remap_file_pages
, 5)
1286 MIPS_SYS(sys_set_tid_address
, 1)
1287 MIPS_SYS(sys_restart_syscall
, 0)
1288 MIPS_SYS(sys_fadvise64_64
, 7)
1289 MIPS_SYS(sys_statfs64
, 3) /* 4255 */
1290 MIPS_SYS(sys_fstatfs64
, 2)
1291 MIPS_SYS(sys_timer_create
, 3)
1292 MIPS_SYS(sys_timer_settime
, 4)
1293 MIPS_SYS(sys_timer_gettime
, 2)
1294 MIPS_SYS(sys_timer_getoverrun
, 1) /* 4260 */
1295 MIPS_SYS(sys_timer_delete
, 1)
1296 MIPS_SYS(sys_clock_settime
, 2)
1297 MIPS_SYS(sys_clock_gettime
, 2)
1298 MIPS_SYS(sys_clock_getres
, 2)
1299 MIPS_SYS(sys_clock_nanosleep
, 4) /* 4265 */
1300 MIPS_SYS(sys_tgkill
, 3)
1301 MIPS_SYS(sys_utimes
, 2)
1302 MIPS_SYS(sys_mbind
, 4)
1303 MIPS_SYS(sys_ni_syscall
, 0) /* sys_get_mempolicy */
1304 MIPS_SYS(sys_ni_syscall
, 0) /* 4270 sys_set_mempolicy */
1305 MIPS_SYS(sys_mq_open
, 4)
1306 MIPS_SYS(sys_mq_unlink
, 1)
1307 MIPS_SYS(sys_mq_timedsend
, 5)
1308 MIPS_SYS(sys_mq_timedreceive
, 5)
1309 MIPS_SYS(sys_mq_notify
, 2) /* 4275 */
1310 MIPS_SYS(sys_mq_getsetattr
, 3)
1311 MIPS_SYS(sys_ni_syscall
, 0) /* sys_vserver */
1312 MIPS_SYS(sys_waitid
, 4)
1313 MIPS_SYS(sys_ni_syscall
, 0) /* available, was setaltroot */
1314 MIPS_SYS(sys_add_key
, 5)
1315 MIPS_SYS(sys_request_key
, 4)
1316 MIPS_SYS(sys_keyctl
, 5)
1317 MIPS_SYS(sys_set_thread_area
, 1)
1318 MIPS_SYS(sys_inotify_init
, 0)
1319 MIPS_SYS(sys_inotify_add_watch
, 3) /* 4285 */
1320 MIPS_SYS(sys_inotify_rm_watch
, 2)
1321 MIPS_SYS(sys_migrate_pages
, 4)
1322 MIPS_SYS(sys_openat
, 4)
1323 MIPS_SYS(sys_mkdirat
, 3)
1324 MIPS_SYS(sys_mknodat
, 4) /* 4290 */
1325 MIPS_SYS(sys_fchownat
, 5)
1326 MIPS_SYS(sys_futimesat
, 3)
1327 MIPS_SYS(sys_fstatat64
, 4)
1328 MIPS_SYS(sys_unlinkat
, 3)
1329 MIPS_SYS(sys_renameat
, 4) /* 4295 */
1330 MIPS_SYS(sys_linkat
, 5)
1331 MIPS_SYS(sys_symlinkat
, 3)
1332 MIPS_SYS(sys_readlinkat
, 4)
1333 MIPS_SYS(sys_fchmodat
, 3)
1334 MIPS_SYS(sys_faccessat
, 3) /* 4300 */
1335 MIPS_SYS(sys_pselect6
, 6)
1336 MIPS_SYS(sys_ppoll
, 5)
1337 MIPS_SYS(sys_unshare
, 1)
1338 MIPS_SYS(sys_splice
, 4)
1339 MIPS_SYS(sys_sync_file_range
, 7) /* 4305 */
1340 MIPS_SYS(sys_tee
, 4)
1341 MIPS_SYS(sys_vmsplice
, 4)
1342 MIPS_SYS(sys_move_pages
, 6)
1343 MIPS_SYS(sys_set_robust_list
, 2)
1344 MIPS_SYS(sys_get_robust_list
, 3) /* 4310 */
1345 MIPS_SYS(sys_kexec_load
, 4)
1346 MIPS_SYS(sys_getcpu
, 3)
1347 MIPS_SYS(sys_epoll_pwait
, 6)
1348 MIPS_SYS(sys_ioprio_set
, 3)
1349 MIPS_SYS(sys_ioprio_get
, 2)
1354 void cpu_loop(CPUMIPSState
*env
)
1356 target_siginfo_t info
;
1358 unsigned int syscall_num
;
1361 trapnr
= cpu_mips_exec(env
);
1364 syscall_num
= env
->gpr
[2] - 4000;
1366 if (syscall_num
>= sizeof(mips_syscall_args
)) {
1370 target_ulong sp_reg
;
1371 target_ulong arg5
= 0, arg6
= 0, arg7
= 0, arg8
= 0;
1373 nb_args
= mips_syscall_args
[syscall_num
];
1374 sp_reg
= env
->gpr
[29];
1376 /* these arguments are taken from the stack */
1377 case 8: arg8
= tgetl(sp_reg
+ 28);
1378 case 7: arg7
= tgetl(sp_reg
+ 24);
1379 case 6: arg6
= tgetl(sp_reg
+ 20);
1380 case 5: arg5
= tgetl(sp_reg
+ 16);
1384 ret
= do_syscall(env
, env
->gpr
[2],
1385 env
->gpr
[4], env
->gpr
[5],
1386 env
->gpr
[6], env
->gpr
[7],
1387 arg5
, arg6
/*, arg7, arg8*/);
1389 if ((unsigned int)ret
>= (unsigned int)(-1133)) {
1390 env
->gpr
[7] = 1; /* error flag */
1393 env
->gpr
[7] = 0; /* error flag */
1401 info
.si_signo
= TARGET_SIGILL
;
1404 queue_signal(info
.si_signo
, &info
);
1406 case EXCP_INTERRUPT
:
1407 /* just indicate that signals should be handled asap */
1413 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1416 info
.si_signo
= sig
;
1418 info
.si_code
= TARGET_TRAP_BRKPT
;
1419 queue_signal(info
.si_signo
, &info
);
1425 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1427 cpu_dump_state(env
, stderr
, fprintf
, 0);
1430 process_pending_signals(env
);
1436 void cpu_loop (CPUState
*env
)
1439 target_siginfo_t info
;
1442 trapnr
= cpu_sh4_exec (env
);
1446 ret
= do_syscall(env
,
1454 env
->gregs
[0] = ret
;
1461 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1464 info
.si_signo
= sig
;
1466 info
.si_code
= TARGET_TRAP_BRKPT
;
1467 queue_signal(info
.si_signo
, &info
);
1472 printf ("Unhandled trap: 0x%x\n", trapnr
);
1473 cpu_dump_state(env
, stderr
, fprintf
, 0);
1476 process_pending_signals (env
);
1483 void cpu_loop(CPUM68KState
*env
)
1487 target_siginfo_t info
;
1488 TaskState
*ts
= env
->opaque
;
1491 trapnr
= cpu_m68k_exec(env
);
1495 if (ts
->sim_syscalls
) {
1497 nr
= lduw(env
->pc
+ 2);
1499 do_m68k_simcall(env
, nr
);
1506 /* Semihosing syscall. */
1508 do_m68k_semihosting(env
, env
->dregs
[0]);
1512 case EXCP_UNSUPPORTED
:
1514 info
.si_signo
= SIGILL
;
1516 info
.si_code
= TARGET_ILL_ILLOPN
;
1517 info
._sifields
._sigfault
._addr
= env
->pc
;
1518 queue_signal(info
.si_signo
, &info
);
1522 ts
->sim_syscalls
= 0;
1525 env
->dregs
[0] = do_syscall(env
,
1535 case EXCP_INTERRUPT
:
1536 /* just indicate that signals should be handled asap */
1540 info
.si_signo
= SIGSEGV
;
1542 /* XXX: check env->error_code */
1543 info
.si_code
= TARGET_SEGV_MAPERR
;
1544 info
._sifields
._sigfault
._addr
= env
->mmu
.ar
;
1545 queue_signal(info
.si_signo
, &info
);
1552 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1555 info
.si_signo
= sig
;
1557 info
.si_code
= TARGET_TRAP_BRKPT
;
1558 queue_signal(info
.si_signo
, &info
);
1563 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1565 cpu_dump_state(env
, stderr
, fprintf
, 0);
1568 process_pending_signals(env
);
1571 #endif /* TARGET_M68K */
1574 void cpu_loop (CPUState
*env
)
1577 target_siginfo_t info
;
1580 trapnr
= cpu_alpha_exec (env
);
1584 fprintf(stderr
, "Reset requested. Exit\n");
1588 fprintf(stderr
, "Machine check exception. Exit\n");
1592 fprintf(stderr
, "Arithmetic trap.\n");
1595 case EXCP_HW_INTERRUPT
:
1596 fprintf(stderr
, "External interrupt. Exit\n");
1600 fprintf(stderr
, "MMU data fault\n");
1603 case EXCP_DTB_MISS_PAL
:
1604 fprintf(stderr
, "MMU data TLB miss in PALcode\n");
1608 fprintf(stderr
, "MMU instruction TLB miss\n");
1612 fprintf(stderr
, "MMU instruction access violation\n");
1615 case EXCP_DTB_MISS_NATIVE
:
1616 fprintf(stderr
, "MMU data TLB miss\n");
1620 fprintf(stderr
, "Unaligned access\n");
1624 fprintf(stderr
, "Invalid instruction\n");
1628 fprintf(stderr
, "Floating-point not allowed\n");
1631 case EXCP_CALL_PAL
... (EXCP_CALL_PALP
- 1):
1632 fprintf(stderr
, "Call to PALcode\n");
1633 call_pal(env
, (trapnr
>> 6) | 0x80);
1635 case EXCP_CALL_PALP
... (EXCP_CALL_PALE
- 1):
1636 fprintf(stderr
, "Priviledged call to PALcode\n");
1643 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1646 info
.si_signo
= sig
;
1648 info
.si_code
= TARGET_TRAP_BRKPT
;
1649 queue_signal(info
.si_signo
, &info
);
1654 printf ("Unhandled trap: 0x%x\n", trapnr
);
1655 cpu_dump_state(env
, stderr
, fprintf
, 0);
1658 process_pending_signals (env
);
1661 #endif /* TARGET_ALPHA */
1665 printf("qemu-" TARGET_ARCH
" version " QEMU_VERSION
", Copyright (c) 2003-2007 Fabrice Bellard\n"
1666 "usage: qemu-" TARGET_ARCH
" [-h] [-g] [-d opts] [-L path] [-s size] [-cpu model] program [arguments...]\n"
1667 "Linux CPU emulator (compiled for %s emulation)\n"
1669 "-h print this help\n"
1670 "-g port wait gdb connection to port\n"
1671 "-L path set the elf interpreter prefix (default=%s)\n"
1672 "-s size set the stack size in bytes (default=%ld)\n"
1673 "-cpu model select CPU (-cpu ? for list)\n"
1676 #ifdef USE_CODE_COPY
1677 "-no-code-copy disable code copy acceleration\n"
1679 "-d options activate log (logfile=%s)\n"
1680 "-p pagesize set the host page size to 'pagesize'\n",
1688 /* XXX: currently only used for async signals (see signal.c) */
1689 CPUState
*global_env
;
1691 /* used to free thread contexts */
1692 TaskState
*first_task_state
;
1694 int main(int argc
, char **argv
)
1696 const char *filename
;
1697 const char *cpu_model
;
1698 struct target_pt_regs regs1
, *regs
= ®s1
;
1699 struct image_info info1
, *info
= &info1
;
1700 TaskState ts1
, *ts
= &ts1
;
1704 int gdbstub_port
= 0;
1710 cpu_set_log_filename(DEBUG_LOGFILE
);
1722 if (!strcmp(r
, "-")) {
1724 } else if (!strcmp(r
, "d")) {
1732 mask
= cpu_str_to_log_mask(r
);
1734 printf("Log items (comma separated):\n");
1735 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
1736 printf("%-10s %s\n", item
->name
, item
->help
);
1741 } else if (!strcmp(r
, "s")) {
1743 x86_stack_size
= strtol(r
, (char **)&r
, 0);
1744 if (x86_stack_size
<= 0)
1747 x86_stack_size
*= 1024 * 1024;
1748 else if (*r
== 'k' || *r
== 'K')
1749 x86_stack_size
*= 1024;
1750 } else if (!strcmp(r
, "L")) {
1751 interp_prefix
= argv
[optind
++];
1752 } else if (!strcmp(r
, "p")) {
1753 qemu_host_page_size
= atoi(argv
[optind
++]);
1754 if (qemu_host_page_size
== 0 ||
1755 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
1756 fprintf(stderr
, "page size must be a power of two\n");
1759 } else if (!strcmp(r
, "g")) {
1760 gdbstub_port
= atoi(argv
[optind
++]);
1761 } else if (!strcmp(r
, "r")) {
1762 qemu_uname_release
= argv
[optind
++];
1763 } else if (!strcmp(r
, "cpu")) {
1764 cpu_model
= argv
[optind
++];
1765 if (strcmp(cpu_model
, "?") == 0) {
1766 #if defined(TARGET_PPC)
1767 ppc_cpu_list(stdout
, &fprintf
);
1768 #elif defined(TARGET_ARM)
1770 #elif defined(TARGET_MIPS)
1771 mips_cpu_list(stdout
, &fprintf
);
1772 #elif defined(TARGET_SPARC)
1773 sparc_cpu_list(stdout
, &fprintf
);
1778 #ifdef USE_CODE_COPY
1779 if (!strcmp(r
, "no-code-copy")) {
1780 code_copy_enabled
= 0;
1789 filename
= argv
[optind
];
1792 memset(regs
, 0, sizeof(struct target_pt_regs
));
1794 /* Zero out image_info */
1795 memset(info
, 0, sizeof(struct image_info
));
1797 /* Scan interp_prefix dir for replacement files. */
1798 init_paths(interp_prefix
);
1800 /* NOTE: we need to init the CPU at this stage to get
1801 qemu_host_page_size */
1805 if (loader_exec(filename
, argv
+optind
, environ
, regs
, info
) != 0) {
1806 printf("Error loading %s\n", filename
);
1813 fprintf(logfile
, "start_brk 0x%08lx\n" , info
->start_brk
);
1814 fprintf(logfile
, "end_code 0x%08lx\n" , info
->end_code
);
1815 fprintf(logfile
, "start_code 0x%08lx\n" , info
->start_code
);
1816 fprintf(logfile
, "start_data 0x%08lx\n" , info
->start_data
);
1817 fprintf(logfile
, "end_data 0x%08lx\n" , info
->end_data
);
1818 fprintf(logfile
, "start_stack 0x%08lx\n" , info
->start_stack
);
1819 fprintf(logfile
, "brk 0x%08lx\n" , info
->brk
);
1820 fprintf(logfile
, "entry 0x%08lx\n" , info
->entry
);
1823 target_set_brk(info
->brk
);
1827 /* build Task State */
1828 memset(ts
, 0, sizeof(TaskState
));
1832 env
->user_mode_only
= 1;
1834 #if defined(TARGET_I386)
1835 cpu_x86_set_cpl(env
, 3);
1837 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1838 env
->hflags
|= HF_PE_MASK
;
1839 if (env
->cpuid_features
& CPUID_SSE
) {
1840 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1841 env
->hflags
|= HF_OSFXSR_MASK
;
1844 /* flags setup : we activate the IRQs by default as in user mode */
1845 env
->eflags
|= IF_MASK
;
1847 /* linux register setup */
1848 #if defined(TARGET_X86_64)
1849 env
->regs
[R_EAX
] = regs
->rax
;
1850 env
->regs
[R_EBX
] = regs
->rbx
;
1851 env
->regs
[R_ECX
] = regs
->rcx
;
1852 env
->regs
[R_EDX
] = regs
->rdx
;
1853 env
->regs
[R_ESI
] = regs
->rsi
;
1854 env
->regs
[R_EDI
] = regs
->rdi
;
1855 env
->regs
[R_EBP
] = regs
->rbp
;
1856 env
->regs
[R_ESP
] = regs
->rsp
;
1857 env
->eip
= regs
->rip
;
1859 env
->regs
[R_EAX
] = regs
->eax
;
1860 env
->regs
[R_EBX
] = regs
->ebx
;
1861 env
->regs
[R_ECX
] = regs
->ecx
;
1862 env
->regs
[R_EDX
] = regs
->edx
;
1863 env
->regs
[R_ESI
] = regs
->esi
;
1864 env
->regs
[R_EDI
] = regs
->edi
;
1865 env
->regs
[R_EBP
] = regs
->ebp
;
1866 env
->regs
[R_ESP
] = regs
->esp
;
1867 env
->eip
= regs
->eip
;
1870 /* linux interrupt setup */
1871 env
->idt
.base
= h2g(idt_table
);
1872 env
->idt
.limit
= sizeof(idt_table
) - 1;
1895 /* linux segment setup */
1896 env
->gdt
.base
= h2g(gdt_table
);
1897 env
->gdt
.limit
= sizeof(gdt_table
) - 1;
1898 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1899 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1900 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1901 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1902 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1903 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1904 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1905 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1906 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1907 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1908 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1909 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1911 #elif defined(TARGET_ARM)
1914 if (cpu_model
== NULL
)
1915 cpu_model
= "arm926";
1916 cpu_arm_set_model(env
, cpu_model
);
1917 cpsr_write(env
, regs
->uregs
[16], 0xffffffff);
1918 for(i
= 0; i
< 16; i
++) {
1919 env
->regs
[i
] = regs
->uregs
[i
];
1921 ts
->stack_base
= info
->start_stack
;
1922 ts
->heap_base
= info
->brk
;
1923 /* This will be filled in on the first SYS_HEAPINFO call. */
1926 #elif defined(TARGET_SPARC)
1929 const sparc_def_t
*def
;
1930 #ifdef TARGET_SPARC64
1931 if (cpu_model
== NULL
)
1932 cpu_model
= "TI UltraSparc II";
1934 if (cpu_model
== NULL
)
1935 cpu_model
= "Fujitsu MB86904";
1937 sparc_find_by_name(cpu_model
, &def
);
1939 fprintf(stderr
, "Unable to find Sparc CPU definition\n");
1942 cpu_sparc_register(env
, def
);
1944 env
->npc
= regs
->npc
;
1946 for(i
= 0; i
< 8; i
++)
1947 env
->gregs
[i
] = regs
->u_regs
[i
];
1948 for(i
= 0; i
< 8; i
++)
1949 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1951 #elif defined(TARGET_PPC)
1956 /* Choose and initialise CPU */
1957 if (cpu_model
== NULL
)
1959 ppc_find_by_name(cpu_model
, &def
);
1962 "Unable to find PowerPC CPU definition\n");
1964 cpu_ppc_register(env
, def
);
1966 for (i
= 0; i
< 32; i
++) {
1967 if (i
!= 12 && i
!= 6 && i
!= 13)
1968 env
->msr
[i
] = (regs
->msr
>> i
) & 1;
1970 #if defined(TARGET_PPC64)
1973 env
->nip
= regs
->nip
;
1974 for(i
= 0; i
< 32; i
++) {
1975 env
->gpr
[i
] = regs
->gpr
[i
];
1978 #elif defined(TARGET_M68K)
1980 if (cpu_model
== NULL
)
1981 cpu_model
= "cfv4e";
1982 if (cpu_m68k_set_model(env
, cpu_model
)) {
1983 cpu_abort(cpu_single_env
,
1984 "Unable to find m68k CPU definition\n");
1987 env
->dregs
[0] = regs
->d0
;
1988 env
->dregs
[1] = regs
->d1
;
1989 env
->dregs
[2] = regs
->d2
;
1990 env
->dregs
[3] = regs
->d3
;
1991 env
->dregs
[4] = regs
->d4
;
1992 env
->dregs
[5] = regs
->d5
;
1993 env
->dregs
[6] = regs
->d6
;
1994 env
->dregs
[7] = regs
->d7
;
1995 env
->aregs
[0] = regs
->a0
;
1996 env
->aregs
[1] = regs
->a1
;
1997 env
->aregs
[2] = regs
->a2
;
1998 env
->aregs
[3] = regs
->a3
;
1999 env
->aregs
[4] = regs
->a4
;
2000 env
->aregs
[5] = regs
->a5
;
2001 env
->aregs
[6] = regs
->a6
;
2002 env
->aregs
[7] = regs
->usp
;
2004 ts
->sim_syscalls
= 1;
2006 #elif defined(TARGET_MIPS)
2011 /* Choose and initialise CPU */
2012 if (cpu_model
== NULL
)
2014 mips_find_by_name(cpu_model
, &def
);
2016 cpu_abort(env
, "Unable to find MIPS CPU definition\n");
2017 cpu_mips_register(env
, def
);
2019 for(i
= 0; i
< 32; i
++) {
2020 env
->gpr
[i
] = regs
->regs
[i
];
2022 env
->PC
= regs
->cp0_epc
;
2023 if (env
->CP0_Config1
& (1 << CP0C1_FP
)) {
2024 env
->CP0_Status
|= (1 << CP0St_CU1
);
2027 #elif defined(TARGET_SH4)
2031 for(i
= 0; i
< 16; i
++) {
2032 env
->gregs
[i
] = regs
->regs
[i
];
2036 #elif defined(TARGET_ALPHA)
2040 for(i
= 0; i
< 28; i
++) {
2041 env
->ir
[i
] = ((target_ulong
*)regs
)[i
];
2043 env
->ipr
[IPR_USP
] = regs
->usp
;
2044 env
->ir
[30] = regs
->usp
;
2046 env
->unique
= regs
->unique
;
2049 #error unsupported target CPU
2053 gdbserver_start (gdbstub_port
);
2054 gdb_handlesig(env
, 0);