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 info
.si_signo
= SIGSEGV
;
628 /* XXX: check env->error_code */
629 info
.si_code
= TARGET_SEGV_MAPERR
;
630 if (trapnr
== TT_DFAULT
)
631 info
._sifields
._sigfault
._addr
= env
->dmmuregs
[4];
633 info
._sifields
._sigfault
._addr
= env
->tpc
[env
->tl
];
634 queue_signal(info
.si_signo
, &info
);
639 /* just indicate that signals should be handled asap */
645 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
650 info
.si_code
= TARGET_TRAP_BRKPT
;
651 queue_signal(info
.si_signo
, &info
);
656 printf ("Unhandled trap: 0x%x\n", trapnr
);
657 cpu_dump_state(env
, stderr
, fprintf
, 0);
660 process_pending_signals (env
);
668 static inline uint64_t cpu_ppc_get_tb (CPUState
*env
)
674 uint32_t cpu_ppc_load_tbl (CPUState
*env
)
676 return cpu_ppc_get_tb(env
) & 0xFFFFFFFF;
679 uint32_t cpu_ppc_load_tbu (CPUState
*env
)
681 return cpu_ppc_get_tb(env
) >> 32;
684 static void cpu_ppc_store_tb (CPUState
*env
, uint64_t value
)
689 void cpu_ppc_store_tbu (CPUState
*env
, uint32_t value
)
691 cpu_ppc_store_tb(env
, ((uint64_t)value
<< 32) | cpu_ppc_load_tbl(env
));
694 void cpu_ppc_store_tbl (CPUState
*env
, uint32_t value
)
696 cpu_ppc_store_tb(env
, ((uint64_t)cpu_ppc_load_tbl(env
) << 32) | value
);
699 void cpu_ppc601_store_rtcu (CPUState
*env
, uint32_t value
)
700 __attribute__ (( alias ("cpu_ppc_store_tbu") ));
702 uint32_t cpu_ppc601_load_rtcu (CPUState
*env
)
703 __attribute__ (( alias ("cpu_ppc_load_tbu") ));
705 void cpu_ppc601_store_rtcl (CPUState
*env
, uint32_t value
)
707 cpu_ppc_store_tbl(env
, value
& 0x3FFFFF80);
710 uint32_t cpu_ppc601_load_rtcl (CPUState
*env
)
712 return cpu_ppc_load_tbl(env
) & 0x3FFFFF80;
715 void cpu_loop(CPUPPCState
*env
)
717 target_siginfo_t info
;
722 trapnr
= cpu_ppc_exec(env
);
723 if (trapnr
!= EXCP_SYSCALL_USER
&& trapnr
!= EXCP_BRANCH
&&
724 trapnr
!= EXCP_TRACE
) {
726 cpu_dump_state(env
, logfile
, fprintf
, 0);
732 case EXCP_SYSCALL_USER
:
735 * PPC ABI uses overflow flag in cr0 to signal an error
739 printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env
->gpr
[0],
740 env
->gpr
[3], env
->gpr
[4], env
->gpr
[5], env
->gpr
[6]);
743 ret
= do_syscall(env
, env
->gpr
[0], env
->gpr
[3], env
->gpr
[4],
744 env
->gpr
[5], env
->gpr
[6], env
->gpr
[7],
746 if (ret
> (uint32_t)(-515)) {
752 printf("syscall returned 0x%08x (%d)\n", ret
, ret
);
756 /* Should not happen ! */
757 fprintf(stderr
, "RESET asked... Stop emulation\n");
759 fprintf(logfile
, "RESET asked... Stop emulation\n");
761 case EXCP_MACHINE_CHECK
:
762 fprintf(stderr
, "Machine check exeption... Stop emulation\n");
764 fprintf(logfile
, "RESET asked... Stop emulation\n");
765 info
.si_signo
= TARGET_SIGBUS
;
767 info
.si_code
= TARGET_BUS_OBJERR
;
768 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
769 queue_signal(info
.si_signo
, &info
);
771 fprintf(stderr
, "Invalid data memory access: 0x" ADDRX
"\n",
774 fprintf(logfile
, "Invalid data memory access: 0x" ADDRX
"\n",
777 switch (env
->error_code
& 0xFF000000) {
779 info
.si_signo
= TARGET_SIGSEGV
;
781 info
.si_code
= TARGET_SEGV_MAPERR
;
784 info
.si_signo
= TARGET_SIGILL
;
786 info
.si_code
= TARGET_ILL_ILLADR
;
789 info
.si_signo
= TARGET_SIGSEGV
;
791 info
.si_code
= TARGET_SEGV_ACCERR
;
794 /* Let's send a regular segfault... */
795 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
798 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
801 info
.si_signo
= TARGET_SIGSEGV
;
803 info
.si_code
= TARGET_SEGV_MAPERR
;
806 info
._sifields
._sigfault
._addr
= env
->nip
;
807 queue_signal(info
.si_signo
, &info
);
810 fprintf(stderr
, "Invalid instruction fetch\n");
812 fprintf(logfile
, "Invalid instruction fetch\n");
813 switch (env
->error_code
& 0xFF000000) {
815 info
.si_signo
= TARGET_SIGSEGV
;
817 info
.si_code
= TARGET_SEGV_MAPERR
;
821 info
.si_signo
= TARGET_SIGSEGV
;
823 info
.si_code
= TARGET_SEGV_ACCERR
;
826 /* Let's send a regular segfault... */
827 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
830 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
833 info
.si_signo
= TARGET_SIGSEGV
;
835 info
.si_code
= TARGET_SEGV_MAPERR
;
838 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
839 queue_signal(info
.si_signo
, &info
);
842 /* Should not happen ! */
843 fprintf(stderr
, "External interruption... Stop emulation\n");
845 fprintf(logfile
, "External interruption... Stop emulation\n");
848 fprintf(stderr
, "Invalid unaligned memory access\n");
850 fprintf(logfile
, "Invalid unaligned memory access\n");
851 info
.si_signo
= TARGET_SIGBUS
;
853 info
.si_code
= TARGET_BUS_ADRALN
;
854 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
855 queue_signal(info
.si_signo
, &info
);
858 switch (env
->error_code
& ~0xF) {
860 fprintf(stderr
, "Program exception\n");
862 fprintf(logfile
, "Program exception\n");
864 env
->fpscr
[7] |= 0x8;
865 /* Finally, update FEX */
866 if ((((env
->fpscr
[7] & 0x3) << 3) | (env
->fpscr
[6] >> 1)) &
867 ((env
->fpscr
[1] << 1) | (env
->fpscr
[0] >> 3)))
868 env
->fpscr
[7] |= 0x4;
869 info
.si_signo
= TARGET_SIGFPE
;
871 switch (env
->error_code
& 0xF) {
873 info
.si_code
= TARGET_FPE_FLTOVF
;
876 info
.si_code
= TARGET_FPE_FLTUND
;
880 info
.si_code
= TARGET_FPE_FLTDIV
;
883 info
.si_code
= TARGET_FPE_FLTRES
;
886 info
.si_code
= TARGET_FPE_FLTINV
;
895 info
.si_code
= TARGET_FPE_FLTSUB
;
898 fprintf(stderr
, "Unknown floating point exception "
899 "(%02x)\n", env
->error_code
);
901 fprintf(logfile
, "Unknown floating point exception "
902 "(%02x)\n", env
->error_code
& 0xF);
907 fprintf(stderr
, "Invalid instruction\n");
909 fprintf(logfile
, "Invalid instruction\n");
910 info
.si_signo
= TARGET_SIGILL
;
912 switch (env
->error_code
& 0xF) {
913 case EXCP_INVAL_INVAL
:
914 info
.si_code
= TARGET_ILL_ILLOPC
;
916 case EXCP_INVAL_LSWX
:
917 info
.si_code
= TARGET_ILL_ILLOPN
;
920 info
.si_code
= TARGET_ILL_PRVREG
;
923 info
.si_code
= TARGET_ILL_COPROC
;
926 fprintf(stderr
, "Unknown invalid operation (%02x)\n",
927 env
->error_code
& 0xF);
929 fprintf(logfile
, "Unknown invalid operation (%02x)\n",
930 env
->error_code
& 0xF);
932 info
.si_code
= TARGET_ILL_ILLADR
;
937 fprintf(stderr
, "Privilege violation\n");
939 fprintf(logfile
, "Privilege violation\n");
940 info
.si_signo
= TARGET_SIGILL
;
942 switch (env
->error_code
& 0xF) {
944 info
.si_code
= TARGET_ILL_PRVOPC
;
947 info
.si_code
= TARGET_ILL_PRVREG
;
950 fprintf(stderr
, "Unknown privilege violation (%02x)\n",
951 env
->error_code
& 0xF);
952 info
.si_code
= TARGET_ILL_PRVOPC
;
957 fprintf(stderr
, "Tried to call a TRAP\n");
959 fprintf(logfile
, "Tried to call a TRAP\n");
962 /* Should not happen ! */
963 fprintf(stderr
, "Unknown program exception (%02x)\n",
966 fprintf(logfile
, "Unknwon program exception (%02x)\n",
971 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
972 queue_signal(info
.si_signo
, &info
);
975 fprintf(stderr
, "No floating point allowed\n");
977 fprintf(logfile
, "No floating point allowed\n");
978 info
.si_signo
= TARGET_SIGILL
;
980 info
.si_code
= TARGET_ILL_COPROC
;
981 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
982 queue_signal(info
.si_signo
, &info
);
985 /* Should not happen ! */
986 fprintf(stderr
, "Decrementer exception\n");
988 fprintf(logfile
, "Decrementer exception\n");
991 /* Do nothing: we use this to trace execution */
994 /* Should not happen ! */
995 fprintf(stderr
, "Floating point assist exception\n");
997 fprintf(logfile
, "Floating point assist exception\n");
1000 /* We reloaded the msr, just go on */
1002 fprintf(stderr
, "Tried to go into supervisor mode !\n");
1004 fprintf(logfile
, "Tried to go into supervisor mode !\n");
1009 /* We stopped because of a jump... */
1011 case EXCP_INTERRUPT
:
1012 /* Don't know why this should ever happen... */
1018 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1021 info
.si_signo
= sig
;
1023 info
.si_code
= TARGET_TRAP_BRKPT
;
1024 queue_signal(info
.si_signo
, &info
);
1029 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1032 fprintf(logfile
, "qemu: unhandled CPU exception 0x%02x - "
1033 "0x%02x - aborting\n", trapnr
, env
->error_code
);
1037 process_pending_signals(env
);
1044 #define MIPS_SYS(name, args) args,
1046 static const uint8_t mips_syscall_args
[] = {
1047 MIPS_SYS(sys_syscall
, 0) /* 4000 */
1048 MIPS_SYS(sys_exit
, 1)
1049 MIPS_SYS(sys_fork
, 0)
1050 MIPS_SYS(sys_read
, 3)
1051 MIPS_SYS(sys_write
, 3)
1052 MIPS_SYS(sys_open
, 3) /* 4005 */
1053 MIPS_SYS(sys_close
, 1)
1054 MIPS_SYS(sys_waitpid
, 3)
1055 MIPS_SYS(sys_creat
, 2)
1056 MIPS_SYS(sys_link
, 2)
1057 MIPS_SYS(sys_unlink
, 1) /* 4010 */
1058 MIPS_SYS(sys_execve
, 0)
1059 MIPS_SYS(sys_chdir
, 1)
1060 MIPS_SYS(sys_time
, 1)
1061 MIPS_SYS(sys_mknod
, 3)
1062 MIPS_SYS(sys_chmod
, 2) /* 4015 */
1063 MIPS_SYS(sys_lchown
, 3)
1064 MIPS_SYS(sys_ni_syscall
, 0)
1065 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_stat */
1066 MIPS_SYS(sys_lseek
, 3)
1067 MIPS_SYS(sys_getpid
, 0) /* 4020 */
1068 MIPS_SYS(sys_mount
, 5)
1069 MIPS_SYS(sys_oldumount
, 1)
1070 MIPS_SYS(sys_setuid
, 1)
1071 MIPS_SYS(sys_getuid
, 0)
1072 MIPS_SYS(sys_stime
, 1) /* 4025 */
1073 MIPS_SYS(sys_ptrace
, 4)
1074 MIPS_SYS(sys_alarm
, 1)
1075 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_fstat */
1076 MIPS_SYS(sys_pause
, 0)
1077 MIPS_SYS(sys_utime
, 2) /* 4030 */
1078 MIPS_SYS(sys_ni_syscall
, 0)
1079 MIPS_SYS(sys_ni_syscall
, 0)
1080 MIPS_SYS(sys_access
, 2)
1081 MIPS_SYS(sys_nice
, 1)
1082 MIPS_SYS(sys_ni_syscall
, 0) /* 4035 */
1083 MIPS_SYS(sys_sync
, 0)
1084 MIPS_SYS(sys_kill
, 2)
1085 MIPS_SYS(sys_rename
, 2)
1086 MIPS_SYS(sys_mkdir
, 2)
1087 MIPS_SYS(sys_rmdir
, 1) /* 4040 */
1088 MIPS_SYS(sys_dup
, 1)
1089 MIPS_SYS(sys_pipe
, 0)
1090 MIPS_SYS(sys_times
, 1)
1091 MIPS_SYS(sys_ni_syscall
, 0)
1092 MIPS_SYS(sys_brk
, 1) /* 4045 */
1093 MIPS_SYS(sys_setgid
, 1)
1094 MIPS_SYS(sys_getgid
, 0)
1095 MIPS_SYS(sys_ni_syscall
, 0) /* was signal(2) */
1096 MIPS_SYS(sys_geteuid
, 0)
1097 MIPS_SYS(sys_getegid
, 0) /* 4050 */
1098 MIPS_SYS(sys_acct
, 0)
1099 MIPS_SYS(sys_umount
, 2)
1100 MIPS_SYS(sys_ni_syscall
, 0)
1101 MIPS_SYS(sys_ioctl
, 3)
1102 MIPS_SYS(sys_fcntl
, 3) /* 4055 */
1103 MIPS_SYS(sys_ni_syscall
, 2)
1104 MIPS_SYS(sys_setpgid
, 2)
1105 MIPS_SYS(sys_ni_syscall
, 0)
1106 MIPS_SYS(sys_olduname
, 1)
1107 MIPS_SYS(sys_umask
, 1) /* 4060 */
1108 MIPS_SYS(sys_chroot
, 1)
1109 MIPS_SYS(sys_ustat
, 2)
1110 MIPS_SYS(sys_dup2
, 2)
1111 MIPS_SYS(sys_getppid
, 0)
1112 MIPS_SYS(sys_getpgrp
, 0) /* 4065 */
1113 MIPS_SYS(sys_setsid
, 0)
1114 MIPS_SYS(sys_sigaction
, 3)
1115 MIPS_SYS(sys_sgetmask
, 0)
1116 MIPS_SYS(sys_ssetmask
, 1)
1117 MIPS_SYS(sys_setreuid
, 2) /* 4070 */
1118 MIPS_SYS(sys_setregid
, 2)
1119 MIPS_SYS(sys_sigsuspend
, 0)
1120 MIPS_SYS(sys_sigpending
, 1)
1121 MIPS_SYS(sys_sethostname
, 2)
1122 MIPS_SYS(sys_setrlimit
, 2) /* 4075 */
1123 MIPS_SYS(sys_getrlimit
, 2)
1124 MIPS_SYS(sys_getrusage
, 2)
1125 MIPS_SYS(sys_gettimeofday
, 2)
1126 MIPS_SYS(sys_settimeofday
, 2)
1127 MIPS_SYS(sys_getgroups
, 2) /* 4080 */
1128 MIPS_SYS(sys_setgroups
, 2)
1129 MIPS_SYS(sys_ni_syscall
, 0) /* old_select */
1130 MIPS_SYS(sys_symlink
, 2)
1131 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_lstat */
1132 MIPS_SYS(sys_readlink
, 3) /* 4085 */
1133 MIPS_SYS(sys_uselib
, 1)
1134 MIPS_SYS(sys_swapon
, 2)
1135 MIPS_SYS(sys_reboot
, 3)
1136 MIPS_SYS(old_readdir
, 3)
1137 MIPS_SYS(old_mmap
, 6) /* 4090 */
1138 MIPS_SYS(sys_munmap
, 2)
1139 MIPS_SYS(sys_truncate
, 2)
1140 MIPS_SYS(sys_ftruncate
, 2)
1141 MIPS_SYS(sys_fchmod
, 2)
1142 MIPS_SYS(sys_fchown
, 3) /* 4095 */
1143 MIPS_SYS(sys_getpriority
, 2)
1144 MIPS_SYS(sys_setpriority
, 3)
1145 MIPS_SYS(sys_ni_syscall
, 0)
1146 MIPS_SYS(sys_statfs
, 2)
1147 MIPS_SYS(sys_fstatfs
, 2) /* 4100 */
1148 MIPS_SYS(sys_ni_syscall
, 0) /* was ioperm(2) */
1149 MIPS_SYS(sys_socketcall
, 2)
1150 MIPS_SYS(sys_syslog
, 3)
1151 MIPS_SYS(sys_setitimer
, 3)
1152 MIPS_SYS(sys_getitimer
, 2) /* 4105 */
1153 MIPS_SYS(sys_newstat
, 2)
1154 MIPS_SYS(sys_newlstat
, 2)
1155 MIPS_SYS(sys_newfstat
, 2)
1156 MIPS_SYS(sys_uname
, 1)
1157 MIPS_SYS(sys_ni_syscall
, 0) /* 4110 was iopl(2) */
1158 MIPS_SYS(sys_vhangup
, 0)
1159 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_idle() */
1160 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_vm86 */
1161 MIPS_SYS(sys_wait4
, 4)
1162 MIPS_SYS(sys_swapoff
, 1) /* 4115 */
1163 MIPS_SYS(sys_sysinfo
, 1)
1164 MIPS_SYS(sys_ipc
, 6)
1165 MIPS_SYS(sys_fsync
, 1)
1166 MIPS_SYS(sys_sigreturn
, 0)
1167 MIPS_SYS(sys_clone
, 0) /* 4120 */
1168 MIPS_SYS(sys_setdomainname
, 2)
1169 MIPS_SYS(sys_newuname
, 1)
1170 MIPS_SYS(sys_ni_syscall
, 0) /* sys_modify_ldt */
1171 MIPS_SYS(sys_adjtimex
, 1)
1172 MIPS_SYS(sys_mprotect
, 3) /* 4125 */
1173 MIPS_SYS(sys_sigprocmask
, 3)
1174 MIPS_SYS(sys_ni_syscall
, 0) /* was create_module */
1175 MIPS_SYS(sys_init_module
, 5)
1176 MIPS_SYS(sys_delete_module
, 1)
1177 MIPS_SYS(sys_ni_syscall
, 0) /* 4130 was get_kernel_syms */
1178 MIPS_SYS(sys_quotactl
, 0)
1179 MIPS_SYS(sys_getpgid
, 1)
1180 MIPS_SYS(sys_fchdir
, 1)
1181 MIPS_SYS(sys_bdflush
, 2)
1182 MIPS_SYS(sys_sysfs
, 3) /* 4135 */
1183 MIPS_SYS(sys_personality
, 1)
1184 MIPS_SYS(sys_ni_syscall
, 0) /* for afs_syscall */
1185 MIPS_SYS(sys_setfsuid
, 1)
1186 MIPS_SYS(sys_setfsgid
, 1)
1187 MIPS_SYS(sys_llseek
, 5) /* 4140 */
1188 MIPS_SYS(sys_getdents
, 3)
1189 MIPS_SYS(sys_select
, 5)
1190 MIPS_SYS(sys_flock
, 2)
1191 MIPS_SYS(sys_msync
, 3)
1192 MIPS_SYS(sys_readv
, 3) /* 4145 */
1193 MIPS_SYS(sys_writev
, 3)
1194 MIPS_SYS(sys_cacheflush
, 3)
1195 MIPS_SYS(sys_cachectl
, 3)
1196 MIPS_SYS(sys_sysmips
, 4)
1197 MIPS_SYS(sys_ni_syscall
, 0) /* 4150 */
1198 MIPS_SYS(sys_getsid
, 1)
1199 MIPS_SYS(sys_fdatasync
, 0)
1200 MIPS_SYS(sys_sysctl
, 1)
1201 MIPS_SYS(sys_mlock
, 2)
1202 MIPS_SYS(sys_munlock
, 2) /* 4155 */
1203 MIPS_SYS(sys_mlockall
, 1)
1204 MIPS_SYS(sys_munlockall
, 0)
1205 MIPS_SYS(sys_sched_setparam
, 2)
1206 MIPS_SYS(sys_sched_getparam
, 2)
1207 MIPS_SYS(sys_sched_setscheduler
, 3) /* 4160 */
1208 MIPS_SYS(sys_sched_getscheduler
, 1)
1209 MIPS_SYS(sys_sched_yield
, 0)
1210 MIPS_SYS(sys_sched_get_priority_max
, 1)
1211 MIPS_SYS(sys_sched_get_priority_min
, 1)
1212 MIPS_SYS(sys_sched_rr_get_interval
, 2) /* 4165 */
1213 MIPS_SYS(sys_nanosleep
, 2)
1214 MIPS_SYS(sys_mremap
, 4)
1215 MIPS_SYS(sys_accept
, 3)
1216 MIPS_SYS(sys_bind
, 3)
1217 MIPS_SYS(sys_connect
, 3) /* 4170 */
1218 MIPS_SYS(sys_getpeername
, 3)
1219 MIPS_SYS(sys_getsockname
, 3)
1220 MIPS_SYS(sys_getsockopt
, 5)
1221 MIPS_SYS(sys_listen
, 2)
1222 MIPS_SYS(sys_recv
, 4) /* 4175 */
1223 MIPS_SYS(sys_recvfrom
, 6)
1224 MIPS_SYS(sys_recvmsg
, 3)
1225 MIPS_SYS(sys_send
, 4)
1226 MIPS_SYS(sys_sendmsg
, 3)
1227 MIPS_SYS(sys_sendto
, 6) /* 4180 */
1228 MIPS_SYS(sys_setsockopt
, 5)
1229 MIPS_SYS(sys_shutdown
, 2)
1230 MIPS_SYS(sys_socket
, 3)
1231 MIPS_SYS(sys_socketpair
, 4)
1232 MIPS_SYS(sys_setresuid
, 3) /* 4185 */
1233 MIPS_SYS(sys_getresuid
, 3)
1234 MIPS_SYS(sys_ni_syscall
, 0) /* was sys_query_module */
1235 MIPS_SYS(sys_poll
, 3)
1236 MIPS_SYS(sys_nfsservctl
, 3)
1237 MIPS_SYS(sys_setresgid
, 3) /* 4190 */
1238 MIPS_SYS(sys_getresgid
, 3)
1239 MIPS_SYS(sys_prctl
, 5)
1240 MIPS_SYS(sys_rt_sigreturn
, 0)
1241 MIPS_SYS(sys_rt_sigaction
, 4)
1242 MIPS_SYS(sys_rt_sigprocmask
, 4) /* 4195 */
1243 MIPS_SYS(sys_rt_sigpending
, 2)
1244 MIPS_SYS(sys_rt_sigtimedwait
, 4)
1245 MIPS_SYS(sys_rt_sigqueueinfo
, 3)
1246 MIPS_SYS(sys_rt_sigsuspend
, 0)
1247 MIPS_SYS(sys_pread64
, 6) /* 4200 */
1248 MIPS_SYS(sys_pwrite64
, 6)
1249 MIPS_SYS(sys_chown
, 3)
1250 MIPS_SYS(sys_getcwd
, 2)
1251 MIPS_SYS(sys_capget
, 2)
1252 MIPS_SYS(sys_capset
, 2) /* 4205 */
1253 MIPS_SYS(sys_sigaltstack
, 0)
1254 MIPS_SYS(sys_sendfile
, 4)
1255 MIPS_SYS(sys_ni_syscall
, 0)
1256 MIPS_SYS(sys_ni_syscall
, 0)
1257 MIPS_SYS(sys_mmap2
, 6) /* 4210 */
1258 MIPS_SYS(sys_truncate64
, 4)
1259 MIPS_SYS(sys_ftruncate64
, 4)
1260 MIPS_SYS(sys_stat64
, 2)
1261 MIPS_SYS(sys_lstat64
, 2)
1262 MIPS_SYS(sys_fstat64
, 2) /* 4215 */
1263 MIPS_SYS(sys_pivot_root
, 2)
1264 MIPS_SYS(sys_mincore
, 3)
1265 MIPS_SYS(sys_madvise
, 3)
1266 MIPS_SYS(sys_getdents64
, 3)
1267 MIPS_SYS(sys_fcntl64
, 3) /* 4220 */
1268 MIPS_SYS(sys_ni_syscall
, 0)
1269 MIPS_SYS(sys_gettid
, 0)
1270 MIPS_SYS(sys_readahead
, 5)
1271 MIPS_SYS(sys_setxattr
, 5)
1272 MIPS_SYS(sys_lsetxattr
, 5) /* 4225 */
1273 MIPS_SYS(sys_fsetxattr
, 5)
1274 MIPS_SYS(sys_getxattr
, 4)
1275 MIPS_SYS(sys_lgetxattr
, 4)
1276 MIPS_SYS(sys_fgetxattr
, 4)
1277 MIPS_SYS(sys_listxattr
, 3) /* 4230 */
1278 MIPS_SYS(sys_llistxattr
, 3)
1279 MIPS_SYS(sys_flistxattr
, 3)
1280 MIPS_SYS(sys_removexattr
, 2)
1281 MIPS_SYS(sys_lremovexattr
, 2)
1282 MIPS_SYS(sys_fremovexattr
, 2) /* 4235 */
1283 MIPS_SYS(sys_tkill
, 2)
1284 MIPS_SYS(sys_sendfile64
, 5)
1285 MIPS_SYS(sys_futex
, 2)
1286 MIPS_SYS(sys_sched_setaffinity
, 3)
1287 MIPS_SYS(sys_sched_getaffinity
, 3) /* 4240 */
1288 MIPS_SYS(sys_io_setup
, 2)
1289 MIPS_SYS(sys_io_destroy
, 1)
1290 MIPS_SYS(sys_io_getevents
, 5)
1291 MIPS_SYS(sys_io_submit
, 3)
1292 MIPS_SYS(sys_io_cancel
, 3) /* 4245 */
1293 MIPS_SYS(sys_exit_group
, 1)
1294 MIPS_SYS(sys_lookup_dcookie
, 3)
1295 MIPS_SYS(sys_epoll_create
, 1)
1296 MIPS_SYS(sys_epoll_ctl
, 4)
1297 MIPS_SYS(sys_epoll_wait
, 3) /* 4250 */
1298 MIPS_SYS(sys_remap_file_pages
, 5)
1299 MIPS_SYS(sys_set_tid_address
, 1)
1300 MIPS_SYS(sys_restart_syscall
, 0)
1301 MIPS_SYS(sys_fadvise64_64
, 7)
1302 MIPS_SYS(sys_statfs64
, 3) /* 4255 */
1303 MIPS_SYS(sys_fstatfs64
, 2)
1304 MIPS_SYS(sys_timer_create
, 3)
1305 MIPS_SYS(sys_timer_settime
, 4)
1306 MIPS_SYS(sys_timer_gettime
, 2)
1307 MIPS_SYS(sys_timer_getoverrun
, 1) /* 4260 */
1308 MIPS_SYS(sys_timer_delete
, 1)
1309 MIPS_SYS(sys_clock_settime
, 2)
1310 MIPS_SYS(sys_clock_gettime
, 2)
1311 MIPS_SYS(sys_clock_getres
, 2)
1312 MIPS_SYS(sys_clock_nanosleep
, 4) /* 4265 */
1313 MIPS_SYS(sys_tgkill
, 3)
1314 MIPS_SYS(sys_utimes
, 2)
1315 MIPS_SYS(sys_mbind
, 4)
1316 MIPS_SYS(sys_ni_syscall
, 0) /* sys_get_mempolicy */
1317 MIPS_SYS(sys_ni_syscall
, 0) /* 4270 sys_set_mempolicy */
1318 MIPS_SYS(sys_mq_open
, 4)
1319 MIPS_SYS(sys_mq_unlink
, 1)
1320 MIPS_SYS(sys_mq_timedsend
, 5)
1321 MIPS_SYS(sys_mq_timedreceive
, 5)
1322 MIPS_SYS(sys_mq_notify
, 2) /* 4275 */
1323 MIPS_SYS(sys_mq_getsetattr
, 3)
1324 MIPS_SYS(sys_ni_syscall
, 0) /* sys_vserver */
1325 MIPS_SYS(sys_waitid
, 4)
1326 MIPS_SYS(sys_ni_syscall
, 0) /* available, was setaltroot */
1327 MIPS_SYS(sys_add_key
, 5)
1328 MIPS_SYS(sys_request_key
, 4)
1329 MIPS_SYS(sys_keyctl
, 5)
1330 MIPS_SYS(sys_set_thread_area
, 1)
1331 MIPS_SYS(sys_inotify_init
, 0)
1332 MIPS_SYS(sys_inotify_add_watch
, 3) /* 4285 */
1333 MIPS_SYS(sys_inotify_rm_watch
, 2)
1334 MIPS_SYS(sys_migrate_pages
, 4)
1335 MIPS_SYS(sys_openat
, 4)
1336 MIPS_SYS(sys_mkdirat
, 3)
1337 MIPS_SYS(sys_mknodat
, 4) /* 4290 */
1338 MIPS_SYS(sys_fchownat
, 5)
1339 MIPS_SYS(sys_futimesat
, 3)
1340 MIPS_SYS(sys_fstatat64
, 4)
1341 MIPS_SYS(sys_unlinkat
, 3)
1342 MIPS_SYS(sys_renameat
, 4) /* 4295 */
1343 MIPS_SYS(sys_linkat
, 5)
1344 MIPS_SYS(sys_symlinkat
, 3)
1345 MIPS_SYS(sys_readlinkat
, 4)
1346 MIPS_SYS(sys_fchmodat
, 3)
1347 MIPS_SYS(sys_faccessat
, 3) /* 4300 */
1348 MIPS_SYS(sys_pselect6
, 6)
1349 MIPS_SYS(sys_ppoll
, 5)
1350 MIPS_SYS(sys_unshare
, 1)
1351 MIPS_SYS(sys_splice
, 4)
1352 MIPS_SYS(sys_sync_file_range
, 7) /* 4305 */
1353 MIPS_SYS(sys_tee
, 4)
1354 MIPS_SYS(sys_vmsplice
, 4)
1355 MIPS_SYS(sys_move_pages
, 6)
1356 MIPS_SYS(sys_set_robust_list
, 2)
1357 MIPS_SYS(sys_get_robust_list
, 3) /* 4310 */
1358 MIPS_SYS(sys_kexec_load
, 4)
1359 MIPS_SYS(sys_getcpu
, 3)
1360 MIPS_SYS(sys_epoll_pwait
, 6)
1361 MIPS_SYS(sys_ioprio_set
, 3)
1362 MIPS_SYS(sys_ioprio_get
, 2)
1367 void cpu_loop(CPUMIPSState
*env
)
1369 target_siginfo_t info
;
1371 unsigned int syscall_num
;
1374 trapnr
= cpu_mips_exec(env
);
1377 syscall_num
= env
->gpr
[2][env
->current_tc
] - 4000;
1378 env
->PC
[env
->current_tc
] += 4;
1379 if (syscall_num
>= sizeof(mips_syscall_args
)) {
1383 target_ulong sp_reg
;
1384 target_ulong arg5
= 0, arg6
= 0, arg7
= 0, arg8
= 0;
1386 nb_args
= mips_syscall_args
[syscall_num
];
1387 sp_reg
= env
->gpr
[29][env
->current_tc
];
1389 /* these arguments are taken from the stack */
1390 case 8: arg8
= tgetl(sp_reg
+ 28);
1391 case 7: arg7
= tgetl(sp_reg
+ 24);
1392 case 6: arg6
= tgetl(sp_reg
+ 20);
1393 case 5: arg5
= tgetl(sp_reg
+ 16);
1397 ret
= do_syscall(env
, env
->gpr
[2][env
->current_tc
],
1398 env
->gpr
[4][env
->current_tc
],
1399 env
->gpr
[5][env
->current_tc
],
1400 env
->gpr
[6][env
->current_tc
],
1401 env
->gpr
[7][env
->current_tc
],
1402 arg5
, arg6
/*, arg7, arg8*/);
1404 if ((unsigned int)ret
>= (unsigned int)(-1133)) {
1405 env
->gpr
[7][env
->current_tc
] = 1; /* error flag */
1408 env
->gpr
[7][env
->current_tc
] = 0; /* error flag */
1410 env
->gpr
[2][env
->current_tc
] = ret
;
1416 info
.si_signo
= TARGET_SIGILL
;
1419 queue_signal(info
.si_signo
, &info
);
1421 case EXCP_INTERRUPT
:
1422 /* just indicate that signals should be handled asap */
1428 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1431 info
.si_signo
= sig
;
1433 info
.si_code
= TARGET_TRAP_BRKPT
;
1434 queue_signal(info
.si_signo
, &info
);
1440 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1442 cpu_dump_state(env
, stderr
, fprintf
, 0);
1445 process_pending_signals(env
);
1451 void cpu_loop (CPUState
*env
)
1454 target_siginfo_t info
;
1457 trapnr
= cpu_sh4_exec (env
);
1461 ret
= do_syscall(env
,
1469 env
->gregs
[0] = ret
;
1476 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1479 info
.si_signo
= sig
;
1481 info
.si_code
= TARGET_TRAP_BRKPT
;
1482 queue_signal(info
.si_signo
, &info
);
1487 printf ("Unhandled trap: 0x%x\n", trapnr
);
1488 cpu_dump_state(env
, stderr
, fprintf
, 0);
1491 process_pending_signals (env
);
1498 void cpu_loop(CPUM68KState
*env
)
1502 target_siginfo_t info
;
1503 TaskState
*ts
= env
->opaque
;
1506 trapnr
= cpu_m68k_exec(env
);
1510 if (ts
->sim_syscalls
) {
1512 nr
= lduw(env
->pc
+ 2);
1514 do_m68k_simcall(env
, nr
);
1520 case EXCP_HALT_INSN
:
1521 /* Semihosing syscall. */
1523 do_m68k_semihosting(env
, env
->dregs
[0]);
1527 case EXCP_UNSUPPORTED
:
1529 info
.si_signo
= SIGILL
;
1531 info
.si_code
= TARGET_ILL_ILLOPN
;
1532 info
._sifields
._sigfault
._addr
= env
->pc
;
1533 queue_signal(info
.si_signo
, &info
);
1537 ts
->sim_syscalls
= 0;
1540 env
->dregs
[0] = do_syscall(env
,
1550 case EXCP_INTERRUPT
:
1551 /* just indicate that signals should be handled asap */
1555 info
.si_signo
= SIGSEGV
;
1557 /* XXX: check env->error_code */
1558 info
.si_code
= TARGET_SEGV_MAPERR
;
1559 info
._sifields
._sigfault
._addr
= env
->mmu
.ar
;
1560 queue_signal(info
.si_signo
, &info
);
1567 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1570 info
.si_signo
= sig
;
1572 info
.si_code
= TARGET_TRAP_BRKPT
;
1573 queue_signal(info
.si_signo
, &info
);
1578 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
1580 cpu_dump_state(env
, stderr
, fprintf
, 0);
1583 process_pending_signals(env
);
1586 #endif /* TARGET_M68K */
1589 void cpu_loop (CPUState
*env
)
1592 target_siginfo_t info
;
1595 trapnr
= cpu_alpha_exec (env
);
1599 fprintf(stderr
, "Reset requested. Exit\n");
1603 fprintf(stderr
, "Machine check exception. Exit\n");
1607 fprintf(stderr
, "Arithmetic trap.\n");
1610 case EXCP_HW_INTERRUPT
:
1611 fprintf(stderr
, "External interrupt. Exit\n");
1615 fprintf(stderr
, "MMU data fault\n");
1618 case EXCP_DTB_MISS_PAL
:
1619 fprintf(stderr
, "MMU data TLB miss in PALcode\n");
1623 fprintf(stderr
, "MMU instruction TLB miss\n");
1627 fprintf(stderr
, "MMU instruction access violation\n");
1630 case EXCP_DTB_MISS_NATIVE
:
1631 fprintf(stderr
, "MMU data TLB miss\n");
1635 fprintf(stderr
, "Unaligned access\n");
1639 fprintf(stderr
, "Invalid instruction\n");
1643 fprintf(stderr
, "Floating-point not allowed\n");
1646 case EXCP_CALL_PAL
... (EXCP_CALL_PALP
- 1):
1647 fprintf(stderr
, "Call to PALcode\n");
1648 call_pal(env
, (trapnr
>> 6) | 0x80);
1650 case EXCP_CALL_PALP
... (EXCP_CALL_PALE
- 1):
1651 fprintf(stderr
, "Privileged call to PALcode\n");
1658 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
1661 info
.si_signo
= sig
;
1663 info
.si_code
= TARGET_TRAP_BRKPT
;
1664 queue_signal(info
.si_signo
, &info
);
1669 printf ("Unhandled trap: 0x%x\n", trapnr
);
1670 cpu_dump_state(env
, stderr
, fprintf
, 0);
1673 process_pending_signals (env
);
1676 #endif /* TARGET_ALPHA */
1680 printf("qemu-" TARGET_ARCH
" version " QEMU_VERSION
", Copyright (c) 2003-2007 Fabrice Bellard\n"
1681 "usage: qemu-" TARGET_ARCH
" [-h] [-g] [-d opts] [-L path] [-s size] [-cpu model] program [arguments...]\n"
1682 "Linux CPU emulator (compiled for %s emulation)\n"
1684 "-h print this help\n"
1685 "-g port wait gdb connection to port\n"
1686 "-L path set the elf interpreter prefix (default=%s)\n"
1687 "-s size set the stack size in bytes (default=%ld)\n"
1688 "-cpu model select CPU (-cpu ? for list)\n"
1689 "-drop-ld-preload drop LD_PRELOAD for target process\n"
1692 #ifdef USE_CODE_COPY
1693 "-no-code-copy disable code copy acceleration\n"
1695 "-d options activate log (logfile=%s)\n"
1696 "-p pagesize set the host page size to 'pagesize'\n",
1704 /* XXX: currently only used for async signals (see signal.c) */
1705 CPUState
*global_env
;
1707 /* used to free thread contexts */
1708 TaskState
*first_task_state
;
1710 int main(int argc
, char **argv
)
1712 const char *filename
;
1713 const char *cpu_model
;
1714 struct target_pt_regs regs1
, *regs
= ®s1
;
1715 struct image_info info1
, *info
= &info1
;
1716 TaskState ts1
, *ts
= &ts1
;
1720 int gdbstub_port
= 0;
1721 int drop_ld_preload
= 0, environ_count
= 0;
1722 char **target_environ
, **wrk
, **dst
;
1728 cpu_set_log_filename(DEBUG_LOGFILE
);
1740 if (!strcmp(r
, "-")) {
1742 } else if (!strcmp(r
, "d")) {
1750 mask
= cpu_str_to_log_mask(r
);
1752 printf("Log items (comma separated):\n");
1753 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
1754 printf("%-10s %s\n", item
->name
, item
->help
);
1759 } else if (!strcmp(r
, "s")) {
1761 x86_stack_size
= strtol(r
, (char **)&r
, 0);
1762 if (x86_stack_size
<= 0)
1765 x86_stack_size
*= 1024 * 1024;
1766 else if (*r
== 'k' || *r
== 'K')
1767 x86_stack_size
*= 1024;
1768 } else if (!strcmp(r
, "L")) {
1769 interp_prefix
= argv
[optind
++];
1770 } else if (!strcmp(r
, "p")) {
1771 qemu_host_page_size
= atoi(argv
[optind
++]);
1772 if (qemu_host_page_size
== 0 ||
1773 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
1774 fprintf(stderr
, "page size must be a power of two\n");
1777 } else if (!strcmp(r
, "g")) {
1778 gdbstub_port
= atoi(argv
[optind
++]);
1779 } else if (!strcmp(r
, "r")) {
1780 qemu_uname_release
= argv
[optind
++];
1781 } else if (!strcmp(r
, "cpu")) {
1782 cpu_model
= argv
[optind
++];
1783 if (strcmp(cpu_model
, "?") == 0) {
1784 #if defined(TARGET_PPC)
1785 ppc_cpu_list(stdout
, &fprintf
);
1786 #elif defined(TARGET_ARM)
1788 #elif defined(TARGET_MIPS)
1789 mips_cpu_list(stdout
, &fprintf
);
1790 #elif defined(TARGET_SPARC)
1791 sparc_cpu_list(stdout
, &fprintf
);
1795 } else if (!strcmp(r
, "drop-ld-preload")) {
1796 drop_ld_preload
= 1;
1798 #ifdef USE_CODE_COPY
1799 if (!strcmp(r
, "no-code-copy")) {
1800 code_copy_enabled
= 0;
1809 filename
= argv
[optind
];
1812 memset(regs
, 0, sizeof(struct target_pt_regs
));
1814 /* Zero out image_info */
1815 memset(info
, 0, sizeof(struct image_info
));
1817 /* Scan interp_prefix dir for replacement files. */
1818 init_paths(interp_prefix
);
1820 /* NOTE: we need to init the CPU at this stage to get
1821 qemu_host_page_size */
1829 target_environ
= malloc((environ_count
+ 1) * sizeof(char *));
1830 if (!target_environ
)
1832 for (wrk
= environ
, dst
= target_environ
; *wrk
; wrk
++) {
1833 if (drop_ld_preload
&& !strncmp(*wrk
, "LD_PRELOAD=", 11))
1835 *(dst
++) = strdup(*wrk
);
1837 *dst
= NULL
; /* NULL terminate target_environ */
1839 if (loader_exec(filename
, argv
+optind
, target_environ
, regs
, info
) != 0) {
1840 printf("Error loading %s\n", filename
);
1844 for (wrk
= target_environ
; *wrk
; wrk
++) {
1848 free(target_environ
);
1853 fprintf(logfile
, "start_brk 0x%08lx\n" , info
->start_brk
);
1854 fprintf(logfile
, "end_code 0x%08lx\n" , info
->end_code
);
1855 fprintf(logfile
, "start_code 0x%08lx\n" , info
->start_code
);
1856 fprintf(logfile
, "start_data 0x%08lx\n" , info
->start_data
);
1857 fprintf(logfile
, "end_data 0x%08lx\n" , info
->end_data
);
1858 fprintf(logfile
, "start_stack 0x%08lx\n" , info
->start_stack
);
1859 fprintf(logfile
, "brk 0x%08lx\n" , info
->brk
);
1860 fprintf(logfile
, "entry 0x%08lx\n" , info
->entry
);
1863 target_set_brk(info
->brk
);
1867 /* build Task State */
1868 memset(ts
, 0, sizeof(TaskState
));
1872 env
->user_mode_only
= 1;
1874 #if defined(TARGET_I386)
1875 cpu_x86_set_cpl(env
, 3);
1877 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1878 env
->hflags
|= HF_PE_MASK
;
1879 if (env
->cpuid_features
& CPUID_SSE
) {
1880 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1881 env
->hflags
|= HF_OSFXSR_MASK
;
1884 /* flags setup : we activate the IRQs by default as in user mode */
1885 env
->eflags
|= IF_MASK
;
1887 /* linux register setup */
1888 #if defined(TARGET_X86_64)
1889 env
->regs
[R_EAX
] = regs
->rax
;
1890 env
->regs
[R_EBX
] = regs
->rbx
;
1891 env
->regs
[R_ECX
] = regs
->rcx
;
1892 env
->regs
[R_EDX
] = regs
->rdx
;
1893 env
->regs
[R_ESI
] = regs
->rsi
;
1894 env
->regs
[R_EDI
] = regs
->rdi
;
1895 env
->regs
[R_EBP
] = regs
->rbp
;
1896 env
->regs
[R_ESP
] = regs
->rsp
;
1897 env
->eip
= regs
->rip
;
1899 env
->regs
[R_EAX
] = regs
->eax
;
1900 env
->regs
[R_EBX
] = regs
->ebx
;
1901 env
->regs
[R_ECX
] = regs
->ecx
;
1902 env
->regs
[R_EDX
] = regs
->edx
;
1903 env
->regs
[R_ESI
] = regs
->esi
;
1904 env
->regs
[R_EDI
] = regs
->edi
;
1905 env
->regs
[R_EBP
] = regs
->ebp
;
1906 env
->regs
[R_ESP
] = regs
->esp
;
1907 env
->eip
= regs
->eip
;
1910 /* linux interrupt setup */
1911 env
->idt
.base
= h2g(idt_table
);
1912 env
->idt
.limit
= sizeof(idt_table
) - 1;
1935 /* linux segment setup */
1936 env
->gdt
.base
= h2g(gdt_table
);
1937 env
->gdt
.limit
= sizeof(gdt_table
) - 1;
1938 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1939 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1940 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1941 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1942 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1943 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1944 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1945 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1946 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1947 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1948 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1949 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1951 /* This hack makes Wine work... */
1952 env
->segs
[R_FS
].selector
= 0;
1953 #elif defined(TARGET_ARM)
1956 if (cpu_model
== NULL
)
1957 cpu_model
= "arm926";
1958 cpu_arm_set_model(env
, cpu_model
);
1959 cpsr_write(env
, regs
->uregs
[16], 0xffffffff);
1960 for(i
= 0; i
< 16; i
++) {
1961 env
->regs
[i
] = regs
->uregs
[i
];
1964 #elif defined(TARGET_SPARC)
1967 const sparc_def_t
*def
;
1968 #ifdef TARGET_SPARC64
1969 if (cpu_model
== NULL
)
1970 cpu_model
= "TI UltraSparc II";
1972 if (cpu_model
== NULL
)
1973 cpu_model
= "Fujitsu MB86904";
1975 sparc_find_by_name(cpu_model
, &def
);
1977 fprintf(stderr
, "Unable to find Sparc CPU definition\n");
1980 cpu_sparc_register(env
, def
);
1982 env
->npc
= regs
->npc
;
1984 for(i
= 0; i
< 8; i
++)
1985 env
->gregs
[i
] = regs
->u_regs
[i
];
1986 for(i
= 0; i
< 8; i
++)
1987 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1989 #elif defined(TARGET_PPC)
1994 /* Choose and initialise CPU */
1995 if (cpu_model
== NULL
)
1997 ppc_find_by_name(cpu_model
, &def
);
2000 "Unable to find PowerPC CPU definition\n");
2002 cpu_ppc_register(env
, def
);
2004 for (i
= 0; i
< 32; i
++) {
2005 if (i
!= 12 && i
!= 6 && i
!= 13)
2006 env
->msr
[i
] = (regs
->msr
>> i
) & 1;
2008 #if defined(TARGET_PPC64)
2011 env
->nip
= regs
->nip
;
2012 for(i
= 0; i
< 32; i
++) {
2013 env
->gpr
[i
] = regs
->gpr
[i
];
2016 #elif defined(TARGET_M68K)
2018 if (cpu_model
== NULL
)
2020 if (cpu_m68k_set_model(env
, cpu_model
)) {
2021 cpu_abort(cpu_single_env
,
2022 "Unable to find m68k CPU definition\n");
2025 env
->dregs
[0] = regs
->d0
;
2026 env
->dregs
[1] = regs
->d1
;
2027 env
->dregs
[2] = regs
->d2
;
2028 env
->dregs
[3] = regs
->d3
;
2029 env
->dregs
[4] = regs
->d4
;
2030 env
->dregs
[5] = regs
->d5
;
2031 env
->dregs
[6] = regs
->d6
;
2032 env
->dregs
[7] = regs
->d7
;
2033 env
->aregs
[0] = regs
->a0
;
2034 env
->aregs
[1] = regs
->a1
;
2035 env
->aregs
[2] = regs
->a2
;
2036 env
->aregs
[3] = regs
->a3
;
2037 env
->aregs
[4] = regs
->a4
;
2038 env
->aregs
[5] = regs
->a5
;
2039 env
->aregs
[6] = regs
->a6
;
2040 env
->aregs
[7] = regs
->usp
;
2042 ts
->sim_syscalls
= 1;
2044 #elif defined(TARGET_MIPS)
2049 /* Choose and initialise CPU */
2050 if (cpu_model
== NULL
)
2052 mips_find_by_name(cpu_model
, &def
);
2054 cpu_abort(env
, "Unable to find MIPS CPU definition\n");
2055 cpu_mips_register(env
, def
);
2057 for(i
= 0; i
< 32; i
++) {
2058 env
->gpr
[i
][env
->current_tc
] = regs
->regs
[i
];
2060 env
->PC
[env
->current_tc
] = regs
->cp0_epc
;
2062 #elif defined(TARGET_SH4)
2066 for(i
= 0; i
< 16; i
++) {
2067 env
->gregs
[i
] = regs
->regs
[i
];
2071 #elif defined(TARGET_ALPHA)
2075 for(i
= 0; i
< 28; i
++) {
2076 env
->ir
[i
] = ((target_ulong
*)regs
)[i
];
2078 env
->ipr
[IPR_USP
] = regs
->usp
;
2079 env
->ir
[30] = regs
->usp
;
2081 env
->unique
= regs
->unique
;
2084 #error unsupported target CPU
2087 #if defined(TARGET_ARM) || defined(TARGET_M68K)
2088 ts
->stack_base
= info
->start_stack
;
2089 ts
->heap_base
= info
->brk
;
2090 /* This will be filled in on the first SYS_HEAPINFO call. */
2095 gdbserver_start (gdbstub_port
);
2096 gdb_handlesig(env
, 0);