]>
git.proxmox.com Git - mirror_qemu.git/blob - linux-user/main.c
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
;
38 #if defined(__i386__) && !defined(CONFIG_STATIC)
39 /* Force usage of an ELF interpreter even if it is an ELF shared
41 const char interp
[] __attribute__((section(".interp"))) = "/lib/ld-linux.so.2";
44 /* for recent libc, we add these dummy symbols which are not declared
45 when generating a linked object (bug in ld ?) */
46 #if (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 3)) && !defined(CONFIG_STATIC)
47 long __preinit_array_start
[0];
48 long __preinit_array_end
[0];
49 long __init_array_start
[0];
50 long __init_array_end
[0];
51 long __fini_array_start
[0];
52 long __fini_array_end
[0];
55 /* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
56 we allocate a bigger stack. Need a better solution, for example
57 by remapping the process stack directly at the right place */
58 unsigned long x86_stack_size
= 512 * 1024;
60 void gemu_log(const char *fmt
, ...)
65 vfprintf(stderr
, fmt
, ap
);
69 void cpu_outb(CPUState
*env
, int addr
, int val
)
71 fprintf(stderr
, "outb: port=0x%04x, data=%02x\n", addr
, val
);
74 void cpu_outw(CPUState
*env
, int addr
, int val
)
76 fprintf(stderr
, "outw: port=0x%04x, data=%04x\n", addr
, val
);
79 void cpu_outl(CPUState
*env
, int addr
, int val
)
81 fprintf(stderr
, "outl: port=0x%04x, data=%08x\n", addr
, val
);
84 int cpu_inb(CPUState
*env
, int addr
)
86 fprintf(stderr
, "inb: port=0x%04x\n", addr
);
90 int cpu_inw(CPUState
*env
, int addr
)
92 fprintf(stderr
, "inw: port=0x%04x\n", addr
);
96 int cpu_inl(CPUState
*env
, int addr
)
98 fprintf(stderr
, "inl: port=0x%04x\n", addr
);
102 int cpu_get_pic_interrupt(CPUState
*env
)
107 /* timers for rdtsc */
109 #if defined(__i386__)
111 int64_t cpu_get_real_ticks(void)
114 asm volatile ("rdtsc" : "=A" (val
));
118 #elif defined(__x86_64__)
120 int64_t cpu_get_real_ticks(void)
124 asm volatile("rdtsc" : "=a" (low
), "=d" (high
));
133 static uint64_t emu_time
;
135 int64_t cpu_get_real_ticks(void)
143 /***********************************************************/
144 /* CPUX86 core interface */
146 uint64_t cpu_get_tsc(CPUX86State
*env
)
148 return cpu_get_real_ticks();
151 static void write_dt(void *ptr
, unsigned long addr
, unsigned long limit
,
155 e1
= (addr
<< 16) | (limit
& 0xffff);
156 e2
= ((addr
>> 16) & 0xff) | (addr
& 0xff000000) | (limit
& 0x000f0000);
158 stl((uint8_t *)ptr
, e1
);
159 stl((uint8_t *)ptr
+ 4, e2
);
162 static void set_gate(void *ptr
, unsigned int type
, unsigned int dpl
,
163 unsigned long addr
, unsigned int sel
)
166 e1
= (addr
& 0xffff) | (sel
<< 16);
167 e2
= (addr
& 0xffff0000) | 0x8000 | (dpl
<< 13) | (type
<< 8);
168 stl((uint8_t *)ptr
, e1
);
169 stl((uint8_t *)ptr
+ 4, e2
);
172 uint64_t gdt_table
[6];
173 uint64_t idt_table
[256];
175 /* only dpl matters as we do only user space emulation */
176 static void set_idt(int n
, unsigned int dpl
)
178 set_gate(idt_table
+ n
, 0, dpl
, 0, 0);
181 void cpu_loop(CPUX86State
*env
)
185 target_siginfo_t info
;
188 trapnr
= cpu_x86_exec(env
);
192 env
->regs
[R_EAX
] = do_syscall(env
,
203 info
.si_signo
= SIGBUS
;
205 info
.si_code
= TARGET_SI_KERNEL
;
206 info
._sifields
._sigfault
._addr
= 0;
207 queue_signal(info
.si_signo
, &info
);
210 if (env
->eflags
& VM_MASK
) {
211 handle_vm86_fault(env
);
213 info
.si_signo
= SIGSEGV
;
215 info
.si_code
= TARGET_SI_KERNEL
;
216 info
._sifields
._sigfault
._addr
= 0;
217 queue_signal(info
.si_signo
, &info
);
221 info
.si_signo
= SIGSEGV
;
223 if (!(env
->error_code
& 1))
224 info
.si_code
= TARGET_SEGV_MAPERR
;
226 info
.si_code
= TARGET_SEGV_ACCERR
;
227 info
._sifields
._sigfault
._addr
= env
->cr
[2];
228 queue_signal(info
.si_signo
, &info
);
231 if (env
->eflags
& VM_MASK
) {
232 handle_vm86_trap(env
, trapnr
);
234 /* division by zero */
235 info
.si_signo
= SIGFPE
;
237 info
.si_code
= TARGET_FPE_INTDIV
;
238 info
._sifields
._sigfault
._addr
= env
->eip
;
239 queue_signal(info
.si_signo
, &info
);
244 if (env
->eflags
& VM_MASK
) {
245 handle_vm86_trap(env
, trapnr
);
247 info
.si_signo
= SIGTRAP
;
249 if (trapnr
== EXCP01_SSTP
) {
250 info
.si_code
= TARGET_TRAP_BRKPT
;
251 info
._sifields
._sigfault
._addr
= env
->eip
;
253 info
.si_code
= TARGET_SI_KERNEL
;
254 info
._sifields
._sigfault
._addr
= 0;
256 queue_signal(info
.si_signo
, &info
);
261 if (env
->eflags
& VM_MASK
) {
262 handle_vm86_trap(env
, trapnr
);
264 info
.si_signo
= SIGSEGV
;
266 info
.si_code
= TARGET_SI_KERNEL
;
267 info
._sifields
._sigfault
._addr
= 0;
268 queue_signal(info
.si_signo
, &info
);
272 info
.si_signo
= SIGILL
;
274 info
.si_code
= TARGET_ILL_ILLOPN
;
275 info
._sifields
._sigfault
._addr
= env
->eip
;
276 queue_signal(info
.si_signo
, &info
);
279 /* just indicate that signals should be handled asap */
285 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
290 info
.si_code
= TARGET_TRAP_BRKPT
;
291 queue_signal(info
.si_signo
, &info
);
296 pc
= env
->segs
[R_CS
].base
+ env
->eip
;
297 fprintf(stderr
, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
301 process_pending_signals(env
);
308 /* XXX: find a better solution */
309 extern void tb_invalidate_page_range(target_ulong start
, target_ulong end
);
311 static void arm_cache_flush(target_ulong start
, target_ulong last
)
313 target_ulong addr
, last1
;
319 last1
= ((addr
+ TARGET_PAGE_SIZE
) & TARGET_PAGE_MASK
) - 1;
322 tb_invalidate_page_range(addr
, last1
+ 1);
329 void cpu_loop(CPUARMState
*env
)
332 unsigned int n
, insn
;
333 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
= ldl_raw((uint8_t *)env
->regs
[15]);
347 if (EmulateAll(opcode
, &ts
->fpa
, env
->regs
) == 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
);
362 insn
= ldl((void *)(env
->regs
[15] - 4));
364 if (n
== ARM_NR_cacheflush
) {
365 arm_cache_flush(env
->regs
[0], env
->regs
[1]);
366 } else if (n
>= ARM_SYSCALL_BASE
) {
368 n
-= ARM_SYSCALL_BASE
;
369 env
->regs
[0] = do_syscall(env
,
383 /* just indicate that signals should be handled asap */
385 case EXCP_PREFETCH_ABORT
:
386 case EXCP_DATA_ABORT
:
388 info
.si_signo
= SIGSEGV
;
390 /* XXX: check env->error_code */
391 info
.si_code
= TARGET_SEGV_MAPERR
;
392 info
._sifields
._sigfault
._addr
= env
->cp15_6
;
393 queue_signal(info
.si_signo
, &info
);
400 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
405 info
.si_code
= TARGET_TRAP_BRKPT
;
406 queue_signal(info
.si_signo
, &info
);
412 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
414 cpu_dump_state(env
, stderr
, fprintf
, 0);
417 process_pending_signals(env
);
427 /* WARNING: dealing with register windows _is_ complicated. More info
428 can be found at http://www.sics.se/~psm/sparcstack.html */
429 static inline int get_reg_index(CPUSPARCState
*env
, int cwp
, int index
)
431 index
= (index
+ cwp
* 16) & (16 * NWINDOWS
- 1);
432 /* wrap handling : if cwp is on the last window, then we use the
433 registers 'after' the end */
434 if (index
< 8 && env
->cwp
== (NWINDOWS
- 1))
435 index
+= (16 * NWINDOWS
);
439 /* save the register window 'cwp1' */
440 static inline void save_window_offset(CPUSPARCState
*env
, int cwp1
)
445 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
446 #if defined(DEBUG_WIN)
447 printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n",
450 for(i
= 0; i
< 16; i
++) {
451 put_user(env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)], sp_ptr
);
456 static void save_window(CPUSPARCState
*env
)
458 unsigned int new_wim
;
459 new_wim
= ((env
->wim
>> 1) | (env
->wim
<< (NWINDOWS
- 1))) &
460 ((1LL << NWINDOWS
) - 1);
461 save_window_offset(env
, (env
->cwp
- 2) & (NWINDOWS
- 1));
465 static void restore_window(CPUSPARCState
*env
)
467 unsigned int new_wim
, i
, cwp1
;
468 uint32_t *sp_ptr
, reg
;
470 new_wim
= ((env
->wim
<< 1) | (env
->wim
>> (NWINDOWS
- 1))) &
471 ((1LL << NWINDOWS
) - 1);
473 /* restore the invalid window */
474 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
475 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
476 #if defined(DEBUG_WIN)
477 printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n",
480 for(i
= 0; i
< 16; i
++) {
481 get_user(reg
, sp_ptr
);
482 env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)] = reg
;
488 static void flush_windows(CPUSPARCState
*env
)
494 /* if restore would invoke restore_window(), then we can stop */
495 cwp1
= (env
->cwp
+ offset
) & (NWINDOWS
- 1);
496 if (env
->wim
& (1 << cwp1
))
498 save_window_offset(env
, cwp1
);
501 /* set wim so that restore will reload the registers */
502 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
503 env
->wim
= 1 << cwp1
;
504 #if defined(DEBUG_WIN)
505 printf("flush_windows: nb=%d\n", offset
- 1);
509 void cpu_loop (CPUSPARCState
*env
)
512 target_siginfo_t info
;
515 trapnr
= cpu_sparc_exec (env
);
520 ret
= do_syscall (env
, env
->gregs
[1],
521 env
->regwptr
[0], env
->regwptr
[1],
522 env
->regwptr
[2], env
->regwptr
[3],
523 env
->regwptr
[4], env
->regwptr
[5]);
524 if ((unsigned int)ret
>= (unsigned int)(-515)) {
525 env
->psr
|= PSR_CARRY
;
528 env
->psr
&= ~PSR_CARRY
;
530 env
->regwptr
[0] = ret
;
531 /* next instruction */
533 env
->npc
= env
->npc
+ 4;
535 case 0x83: /* flush windows */
537 /* next instruction */
539 env
->npc
= env
->npc
+ 4;
541 case TT_WIN_OVF
: /* window overflow */
544 case TT_WIN_UNF
: /* window underflow */
550 info
.si_signo
= SIGSEGV
;
552 /* XXX: check env->error_code */
553 info
.si_code
= TARGET_SEGV_MAPERR
;
554 info
._sifields
._sigfault
._addr
= env
->mmuregs
[4];
555 queue_signal(info
.si_signo
, &info
);
558 case 0x100: // XXX, why do we get these?
564 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
569 info
.si_code
= TARGET_TRAP_BRKPT
;
570 queue_signal(info
.si_signo
, &info
);
575 printf ("Unhandled trap: 0x%x\n", trapnr
);
576 cpu_dump_state(env
, stderr
, fprintf
, 0);
579 process_pending_signals (env
);
587 static inline uint64_t cpu_ppc_get_tb (CPUState
*env
)
593 uint32_t cpu_ppc_load_tbl (CPUState
*env
)
595 return cpu_ppc_get_tb(env
) & 0xFFFFFFFF;
598 uint32_t cpu_ppc_load_tbu (CPUState
*env
)
600 return cpu_ppc_get_tb(env
) >> 32;
603 static void cpu_ppc_store_tb (CPUState
*env
, uint64_t value
)
608 void cpu_ppc_store_tbu (CPUState
*env
, uint32_t value
)
610 cpu_ppc_store_tb(env
, ((uint64_t)value
<< 32) | cpu_ppc_load_tbl(env
));
613 void cpu_ppc_store_tbl (CPUState
*env
, uint32_t value
)
615 cpu_ppc_store_tb(env
, ((uint64_t)cpu_ppc_load_tbl(env
) << 32) | value
);
618 uint32_t cpu_ppc_load_decr (CPUState
*env
)
624 void cpu_ppc_store_decr (CPUState
*env
, uint32_t value
)
629 void cpu_loop(CPUPPCState
*env
)
631 target_siginfo_t info
;
636 trapnr
= cpu_ppc_exec(env
);
637 if (trapnr
!= EXCP_SYSCALL_USER
&& trapnr
!= EXCP_BRANCH
&&
638 trapnr
!= EXCP_TRACE
) {
640 cpu_dump_state(env
, logfile
, fprintf
, 0);
646 case EXCP_SYSCALL_USER
:
649 * PPC ABI uses overflow flag in cr0 to signal an error
653 printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env
->gpr
[0],
654 env
->gpr
[3], env
->gpr
[4], env
->gpr
[5], env
->gpr
[6]);
657 ret
= do_syscall(env
, env
->gpr
[0], env
->gpr
[3], env
->gpr
[4],
658 env
->gpr
[5], env
->gpr
[6], env
->gpr
[7],
660 if (ret
> (uint32_t)(-515)) {
666 printf("syscall returned 0x%08x (%d)\n", ret
, ret
);
670 /* Should not happen ! */
671 fprintf(stderr
, "RESET asked... Stop emulation\n");
673 fprintf(logfile
, "RESET asked... Stop emulation\n");
675 case EXCP_MACHINE_CHECK
:
676 fprintf(stderr
, "Machine check exeption... Stop emulation\n");
678 fprintf(logfile
, "RESET asked... Stop emulation\n");
679 info
.si_signo
= TARGET_SIGBUS
;
681 info
.si_code
= TARGET_BUS_OBJERR
;
682 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
683 queue_signal(info
.si_signo
, &info
);
685 fprintf(stderr
, "Invalid data memory access: 0x%08x\n", env
->spr
[DAR
]);
687 fprintf(logfile
, "Invalid data memory access: 0x%08x\n",
690 switch (env
->error_code
& 0xF) {
691 case EXCP_DSI_TRANSLATE
:
692 info
.si_signo
= TARGET_SIGSEGV
;
694 info
.si_code
= TARGET_SEGV_MAPERR
;
696 case EXCP_DSI_NOTSUP
:
697 case EXCP_DSI_EXTERNAL
:
698 info
.si_signo
= TARGET_SIGILL
;
700 info
.si_code
= TARGET_ILL_ILLADR
;
703 info
.si_signo
= TARGET_SIGSEGV
;
705 info
.si_code
= TARGET_SEGV_ACCERR
;
708 info
.si_signo
= TARGET_SIGTRAP
;
710 info
.si_code
= TARGET_TRAP_BRKPT
;
713 /* Let's send a regular segfault... */
714 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
717 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
720 info
.si_signo
= TARGET_SIGSEGV
;
722 info
.si_code
= TARGET_SEGV_MAPERR
;
725 info
._sifields
._sigfault
._addr
= env
->nip
;
726 queue_signal(info
.si_signo
, &info
);
729 fprintf(stderr
, "Invalid instruction fetch\n");
731 fprintf(logfile
, "Invalid instruction fetch\n");
732 switch (env
->error_code
) {
733 case EXCP_ISI_TRANSLATE
:
734 info
.si_signo
= TARGET_SIGSEGV
;
736 info
.si_code
= TARGET_SEGV_MAPERR
;
739 info
.si_signo
= TARGET_SIGILL
;
741 info
.si_code
= TARGET_ILL_ILLADR
;
743 case EXCP_ISI_NOEXEC
:
745 info
.si_signo
= TARGET_SIGSEGV
;
747 info
.si_code
= TARGET_SEGV_ACCERR
;
750 /* Let's send a regular segfault... */
751 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
754 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
757 info
.si_signo
= TARGET_SIGSEGV
;
759 info
.si_code
= TARGET_SEGV_MAPERR
;
762 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
763 queue_signal(info
.si_signo
, &info
);
766 /* Should not happen ! */
767 fprintf(stderr
, "External interruption... Stop emulation\n");
769 fprintf(logfile
, "External interruption... Stop emulation\n");
772 fprintf(stderr
, "Invalid unaligned memory access\n");
774 fprintf(logfile
, "Invalid unaligned memory access\n");
775 info
.si_signo
= TARGET_SIGBUS
;
777 info
.si_code
= TARGET_BUS_ADRALN
;
778 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
779 queue_signal(info
.si_signo
, &info
);
782 switch (env
->error_code
& ~0xF) {
784 fprintf(stderr
, "Program exception\n");
786 fprintf(logfile
, "Program exception\n");
788 env
->fpscr
[7] |= 0x8;
789 /* Finally, update FEX */
790 if ((((env
->fpscr
[7] & 0x3) << 3) | (env
->fpscr
[6] >> 1)) &
791 ((env
->fpscr
[1] << 1) | (env
->fpscr
[0] >> 3)))
792 env
->fpscr
[7] |= 0x4;
793 info
.si_signo
= TARGET_SIGFPE
;
795 switch (env
->error_code
& 0xF) {
797 info
.si_code
= TARGET_FPE_FLTOVF
;
800 info
.si_code
= TARGET_FPE_FLTUND
;
804 info
.si_code
= TARGET_FPE_FLTDIV
;
807 info
.si_code
= TARGET_FPE_FLTRES
;
810 info
.si_code
= TARGET_FPE_FLTINV
;
819 info
.si_code
= TARGET_FPE_FLTSUB
;
822 fprintf(stderr
, "Unknown floating point exception "
823 "(%02x)\n", env
->error_code
);
825 fprintf(logfile
, "Unknown floating point exception "
826 "(%02x)\n", env
->error_code
& 0xF);
831 fprintf(stderr
, "Invalid instruction\n");
833 fprintf(logfile
, "Invalid instruction\n");
834 info
.si_signo
= TARGET_SIGILL
;
836 switch (env
->error_code
& 0xF) {
837 case EXCP_INVAL_INVAL
:
838 info
.si_code
= TARGET_ILL_ILLOPC
;
840 case EXCP_INVAL_LSWX
:
841 info
.si_code
= TARGET_ILL_ILLOPN
;
844 info
.si_code
= TARGET_ILL_PRVREG
;
847 info
.si_code
= TARGET_ILL_COPROC
;
850 fprintf(stderr
, "Unknown invalid operation (%02x)\n",
851 env
->error_code
& 0xF);
853 fprintf(logfile
, "Unknown invalid operation (%02x)\n",
854 env
->error_code
& 0xF);
856 info
.si_code
= TARGET_ILL_ILLADR
;
861 fprintf(stderr
, "Privilege violation\n");
863 fprintf(logfile
, "Privilege violation\n");
864 info
.si_signo
= TARGET_SIGILL
;
866 switch (env
->error_code
& 0xF) {
868 info
.si_code
= TARGET_ILL_PRVOPC
;
871 info
.si_code
= TARGET_ILL_PRVREG
;
874 fprintf(stderr
, "Unknown privilege violation (%02x)\n",
875 env
->error_code
& 0xF);
876 info
.si_code
= TARGET_ILL_PRVOPC
;
881 fprintf(stderr
, "Tried to call a TRAP\n");
883 fprintf(logfile
, "Tried to call a TRAP\n");
886 /* Should not happen ! */
887 fprintf(stderr
, "Unknown program exception (%02x)\n",
890 fprintf(logfile
, "Unknwon program exception (%02x)\n",
895 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
896 queue_signal(info
.si_signo
, &info
);
899 fprintf(stderr
, "No floating point allowed\n");
901 fprintf(logfile
, "No floating point allowed\n");
902 info
.si_signo
= TARGET_SIGILL
;
904 info
.si_code
= TARGET_ILL_COPROC
;
905 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
906 queue_signal(info
.si_signo
, &info
);
909 /* Should not happen ! */
910 fprintf(stderr
, "Decrementer exception\n");
912 fprintf(logfile
, "Decrementer exception\n");
914 case EXCP_RESA
: /* Implementation specific */
915 /* Should not happen ! */
916 fprintf(stderr
, "RESA exception should never happen !\n");
918 fprintf(logfile
, "RESA exception should never happen !\n");
920 case EXCP_RESB
: /* Implementation specific */
921 /* Should not happen ! */
922 fprintf(stderr
, "RESB exception should never happen !\n");
924 fprintf(logfile
, "RESB exception should never happen !\n");
927 /* Do nothing: we use this to trace execution */
930 /* Should not happen ! */
931 fprintf(stderr
, "Floating point assist exception\n");
933 fprintf(logfile
, "Floating point assist exception\n");
936 /* We reloaded the msr, just go on */
938 fprintf(stderr
, "Tried to go into supervisor mode !\n");
940 fprintf(logfile
, "Tried to go into supervisor mode !\n");
945 /* We stopped because of a jump... */
948 /* Should not occur: we always are in user mode */
949 fprintf(stderr
, "Return from interrupt ?\n");
951 fprintf(logfile
, "Return from interrupt ?\n");
954 /* Don't know why this should ever happen... */
960 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
965 info
.si_code
= TARGET_TRAP_BRKPT
;
966 queue_signal(info
.si_signo
, &info
);
971 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
974 fprintf(logfile
, "qemu: unhandled CPU exception 0x%02x - "
975 "0x%02x - aborting\n", trapnr
, env
->error_code
);
979 process_pending_signals(env
);
986 printf("qemu-" TARGET_ARCH
" version " QEMU_VERSION
", Copyright (c) 2003-2004 Fabrice Bellard\n"
987 "usage: qemu-" TARGET_ARCH
" [-h] [-g] [-d opts] [-L path] [-s size] program [arguments...]\n"
988 "Linux CPU emulator (compiled for %s emulation)\n"
990 "-h print this help\n"
991 "-g wait gdb connection to port %d\n"
992 "-L path set the elf interpreter prefix (default=%s)\n"
993 "-s size set the stack size in bytes (default=%ld)\n"
997 "-no-code-copy disable code copy acceleration\n"
999 "-d options activate log (logfile=%s)\n"
1000 "-p pagesize set the host page size to 'pagesize'\n",
1002 DEFAULT_GDBSTUB_PORT
,
1009 /* XXX: currently only used for async signals (see signal.c) */
1010 CPUState
*global_env
;
1011 /* used only if single thread */
1012 CPUState
*cpu_single_env
= NULL
;
1014 /* used to free thread contexts */
1015 TaskState
*first_task_state
;
1017 int main(int argc
, char **argv
)
1019 const char *filename
;
1020 struct target_pt_regs regs1
, *regs
= ®s1
;
1021 struct image_info info1
, *info
= &info1
;
1022 TaskState ts1
, *ts
= &ts1
;
1026 int use_gdbstub
= 0;
1032 cpu_set_log_filename(DEBUG_LOGFILE
);
1043 if (!strcmp(r
, "-")) {
1045 } else if (!strcmp(r
, "d")) {
1053 mask
= cpu_str_to_log_mask(r
);
1055 printf("Log items (comma separated):\n");
1056 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
1057 printf("%-10s %s\n", item
->name
, item
->help
);
1062 } else if (!strcmp(r
, "s")) {
1064 x86_stack_size
= strtol(r
, (char **)&r
, 0);
1065 if (x86_stack_size
<= 0)
1068 x86_stack_size
*= 1024 * 1024;
1069 else if (*r
== 'k' || *r
== 'K')
1070 x86_stack_size
*= 1024;
1071 } else if (!strcmp(r
, "L")) {
1072 interp_prefix
= argv
[optind
++];
1073 } else if (!strcmp(r
, "p")) {
1074 qemu_host_page_size
= atoi(argv
[optind
++]);
1075 if (qemu_host_page_size
== 0 ||
1076 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
1077 fprintf(stderr
, "page size must be a power of two\n");
1080 } else if (!strcmp(r
, "g")) {
1083 #ifdef USE_CODE_COPY
1084 if (!strcmp(r
, "no-code-copy")) {
1085 code_copy_enabled
= 0;
1094 filename
= argv
[optind
];
1097 memset(regs
, 0, sizeof(struct target_pt_regs
));
1099 /* Zero out image_info */
1100 memset(info
, 0, sizeof(struct image_info
));
1102 /* Scan interp_prefix dir for replacement files. */
1103 init_paths(interp_prefix
);
1105 /* NOTE: we need to init the CPU at this stage to get
1106 qemu_host_page_size */
1109 if (elf_exec(filename
, argv
+optind
, environ
, regs
, info
) != 0) {
1110 printf("Error loading %s\n", filename
);
1117 fprintf(logfile
, "start_brk 0x%08lx\n" , info
->start_brk
);
1118 fprintf(logfile
, "end_code 0x%08lx\n" , info
->end_code
);
1119 fprintf(logfile
, "start_code 0x%08lx\n" , info
->start_code
);
1120 fprintf(logfile
, "end_data 0x%08lx\n" , info
->end_data
);
1121 fprintf(logfile
, "start_stack 0x%08lx\n" , info
->start_stack
);
1122 fprintf(logfile
, "brk 0x%08lx\n" , info
->brk
);
1123 fprintf(logfile
, "entry 0x%08lx\n" , info
->entry
);
1126 target_set_brk((char *)info
->brk
);
1132 /* build Task State */
1133 memset(ts
, 0, sizeof(TaskState
));
1136 env
->user_mode_only
= 1;
1138 #if defined(TARGET_I386)
1139 cpu_x86_set_cpl(env
, 3);
1141 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1142 env
->hflags
|= HF_PE_MASK
;
1143 if (env
->cpuid_features
& CPUID_SSE
) {
1144 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1145 env
->hflags
|= HF_OSFXSR_MASK
;
1148 /* flags setup : we activate the IRQs by default as in user mode */
1149 env
->eflags
|= IF_MASK
;
1151 /* linux register setup */
1152 env
->regs
[R_EAX
] = regs
->eax
;
1153 env
->regs
[R_EBX
] = regs
->ebx
;
1154 env
->regs
[R_ECX
] = regs
->ecx
;
1155 env
->regs
[R_EDX
] = regs
->edx
;
1156 env
->regs
[R_ESI
] = regs
->esi
;
1157 env
->regs
[R_EDI
] = regs
->edi
;
1158 env
->regs
[R_EBP
] = regs
->ebp
;
1159 env
->regs
[R_ESP
] = regs
->esp
;
1160 env
->eip
= regs
->eip
;
1162 /* linux interrupt setup */
1163 env
->idt
.base
= (long)idt_table
;
1164 env
->idt
.limit
= sizeof(idt_table
) - 1;
1187 /* linux segment setup */
1188 env
->gdt
.base
= (long)gdt_table
;
1189 env
->gdt
.limit
= sizeof(gdt_table
) - 1;
1190 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1191 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1192 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1193 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1194 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1195 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1196 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1197 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1198 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1199 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1200 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1201 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1203 #elif defined(TARGET_ARM)
1206 for(i
= 0; i
< 16; i
++) {
1207 env
->regs
[i
] = regs
->uregs
[i
];
1209 env
->cpsr
= regs
->uregs
[16];
1211 #elif defined(TARGET_SPARC)
1215 env
->npc
= regs
->npc
;
1217 for(i
= 0; i
< 8; i
++)
1218 env
->gregs
[i
] = regs
->u_regs
[i
];
1219 for(i
= 0; i
< 8; i
++)
1220 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1222 #elif defined(TARGET_PPC)
1225 for (i
= 0; i
< 32; i
++) {
1226 if (i
!= 12 && i
!= 6 && i
!= 13)
1227 env
->msr
[i
] = (regs
->msr
>> i
) & 1;
1229 env
->nip
= regs
->nip
;
1230 for(i
= 0; i
< 32; i
++) {
1231 env
->gpr
[i
] = regs
->gpr
[i
];
1235 #error unsupported target CPU
1239 gdbserver_start (DEFAULT_GDBSTUB_PORT
);
1240 gdb_handlesig(env
, 0);