]>
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
);
363 insn
= lduw((void *)(env
->regs
[15] - 2));
366 insn
= ldl((void *)(env
->regs
[15] - 4));
370 if (n
== ARM_NR_cacheflush
) {
371 arm_cache_flush(env
->regs
[0], env
->regs
[1]);
372 } else if (n
== ARM_NR_semihosting
373 || n
== ARM_NR_thumb_semihosting
) {
374 env
->regs
[0] = do_arm_semihosting (env
);
375 } else if (n
>= ARM_SYSCALL_BASE
376 || (env
->thumb
&& n
== ARM_THUMB_SYSCALL
)) {
381 n
-= ARM_SYSCALL_BASE
;
383 env
->regs
[0] = do_syscall(env
,
397 /* just indicate that signals should be handled asap */
399 case EXCP_PREFETCH_ABORT
:
400 case EXCP_DATA_ABORT
:
402 info
.si_signo
= SIGSEGV
;
404 /* XXX: check env->error_code */
405 info
.si_code
= TARGET_SEGV_MAPERR
;
406 info
._sifields
._sigfault
._addr
= env
->cp15_6
;
407 queue_signal(info
.si_signo
, &info
);
414 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
419 info
.si_code
= TARGET_TRAP_BRKPT
;
420 queue_signal(info
.si_signo
, &info
);
426 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
428 cpu_dump_state(env
, stderr
, fprintf
, 0);
431 process_pending_signals(env
);
441 /* WARNING: dealing with register windows _is_ complicated. More info
442 can be found at http://www.sics.se/~psm/sparcstack.html */
443 static inline int get_reg_index(CPUSPARCState
*env
, int cwp
, int index
)
445 index
= (index
+ cwp
* 16) & (16 * NWINDOWS
- 1);
446 /* wrap handling : if cwp is on the last window, then we use the
447 registers 'after' the end */
448 if (index
< 8 && env
->cwp
== (NWINDOWS
- 1))
449 index
+= (16 * NWINDOWS
);
453 /* save the register window 'cwp1' */
454 static inline void save_window_offset(CPUSPARCState
*env
, int cwp1
)
459 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
460 #if defined(DEBUG_WIN)
461 printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n",
464 for(i
= 0; i
< 16; i
++) {
465 put_user(env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)], sp_ptr
);
470 static void save_window(CPUSPARCState
*env
)
472 unsigned int new_wim
;
473 new_wim
= ((env
->wim
>> 1) | (env
->wim
<< (NWINDOWS
- 1))) &
474 ((1LL << NWINDOWS
) - 1);
475 save_window_offset(env
, (env
->cwp
- 2) & (NWINDOWS
- 1));
479 static void restore_window(CPUSPARCState
*env
)
481 unsigned int new_wim
, i
, cwp1
;
482 uint32_t *sp_ptr
, reg
;
484 new_wim
= ((env
->wim
<< 1) | (env
->wim
>> (NWINDOWS
- 1))) &
485 ((1LL << NWINDOWS
) - 1);
487 /* restore the invalid window */
488 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
489 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
490 #if defined(DEBUG_WIN)
491 printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n",
494 for(i
= 0; i
< 16; i
++) {
495 get_user(reg
, sp_ptr
);
496 env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)] = reg
;
502 static void flush_windows(CPUSPARCState
*env
)
508 /* if restore would invoke restore_window(), then we can stop */
509 cwp1
= (env
->cwp
+ offset
) & (NWINDOWS
- 1);
510 if (env
->wim
& (1 << cwp1
))
512 save_window_offset(env
, cwp1
);
515 /* set wim so that restore will reload the registers */
516 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
517 env
->wim
= 1 << cwp1
;
518 #if defined(DEBUG_WIN)
519 printf("flush_windows: nb=%d\n", offset
- 1);
523 void cpu_loop (CPUSPARCState
*env
)
526 target_siginfo_t info
;
529 trapnr
= cpu_sparc_exec (env
);
534 ret
= do_syscall (env
, env
->gregs
[1],
535 env
->regwptr
[0], env
->regwptr
[1],
536 env
->regwptr
[2], env
->regwptr
[3],
537 env
->regwptr
[4], env
->regwptr
[5]);
538 if ((unsigned int)ret
>= (unsigned int)(-515)) {
539 env
->psr
|= PSR_CARRY
;
542 env
->psr
&= ~PSR_CARRY
;
544 env
->regwptr
[0] = ret
;
545 /* next instruction */
547 env
->npc
= env
->npc
+ 4;
549 case 0x83: /* flush windows */
551 /* next instruction */
553 env
->npc
= env
->npc
+ 4;
555 #ifndef TARGET_SPARC64
556 case TT_WIN_OVF
: /* window overflow */
559 case TT_WIN_UNF
: /* window underflow */
565 info
.si_signo
= SIGSEGV
;
567 /* XXX: check env->error_code */
568 info
.si_code
= TARGET_SEGV_MAPERR
;
569 info
._sifields
._sigfault
._addr
= env
->mmuregs
[4];
570 queue_signal(info
.si_signo
, &info
);
576 case 0x100: // XXX, why do we get these?
582 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
587 info
.si_code
= TARGET_TRAP_BRKPT
;
588 queue_signal(info
.si_signo
, &info
);
593 printf ("Unhandled trap: 0x%x\n", trapnr
);
594 cpu_dump_state(env
, stderr
, fprintf
, 0);
597 process_pending_signals (env
);
605 static inline uint64_t cpu_ppc_get_tb (CPUState
*env
)
611 uint32_t cpu_ppc_load_tbl (CPUState
*env
)
613 return cpu_ppc_get_tb(env
) & 0xFFFFFFFF;
616 uint32_t cpu_ppc_load_tbu (CPUState
*env
)
618 return cpu_ppc_get_tb(env
) >> 32;
621 static void cpu_ppc_store_tb (CPUState
*env
, uint64_t value
)
626 void cpu_ppc_store_tbu (CPUState
*env
, uint32_t value
)
628 cpu_ppc_store_tb(env
, ((uint64_t)value
<< 32) | cpu_ppc_load_tbl(env
));
631 void cpu_ppc_store_tbl (CPUState
*env
, uint32_t value
)
633 cpu_ppc_store_tb(env
, ((uint64_t)cpu_ppc_load_tbl(env
) << 32) | value
);
636 uint32_t cpu_ppc_load_decr (CPUState
*env
)
642 void cpu_ppc_store_decr (CPUState
*env
, uint32_t value
)
647 void cpu_loop(CPUPPCState
*env
)
649 target_siginfo_t info
;
654 trapnr
= cpu_ppc_exec(env
);
655 if (trapnr
!= EXCP_SYSCALL_USER
&& trapnr
!= EXCP_BRANCH
&&
656 trapnr
!= EXCP_TRACE
) {
658 cpu_dump_state(env
, logfile
, fprintf
, 0);
664 case EXCP_SYSCALL_USER
:
667 * PPC ABI uses overflow flag in cr0 to signal an error
671 printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env
->gpr
[0],
672 env
->gpr
[3], env
->gpr
[4], env
->gpr
[5], env
->gpr
[6]);
675 ret
= do_syscall(env
, env
->gpr
[0], env
->gpr
[3], env
->gpr
[4],
676 env
->gpr
[5], env
->gpr
[6], env
->gpr
[7],
678 if (ret
> (uint32_t)(-515)) {
684 printf("syscall returned 0x%08x (%d)\n", ret
, ret
);
688 /* Should not happen ! */
689 fprintf(stderr
, "RESET asked... Stop emulation\n");
691 fprintf(logfile
, "RESET asked... Stop emulation\n");
693 case EXCP_MACHINE_CHECK
:
694 fprintf(stderr
, "Machine check exeption... Stop emulation\n");
696 fprintf(logfile
, "RESET asked... Stop emulation\n");
697 info
.si_signo
= TARGET_SIGBUS
;
699 info
.si_code
= TARGET_BUS_OBJERR
;
700 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
701 queue_signal(info
.si_signo
, &info
);
703 fprintf(stderr
, "Invalid data memory access: 0x%08x\n",
706 fprintf(logfile
, "Invalid data memory access: 0x%08x\n",
709 switch (env
->error_code
& 0xFF000000) {
711 info
.si_signo
= TARGET_SIGSEGV
;
713 info
.si_code
= TARGET_SEGV_MAPERR
;
716 info
.si_signo
= TARGET_SIGILL
;
718 info
.si_code
= TARGET_ILL_ILLADR
;
721 info
.si_signo
= TARGET_SIGSEGV
;
723 info
.si_code
= TARGET_SEGV_ACCERR
;
726 /* Let's send a regular segfault... */
727 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
730 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
733 info
.si_signo
= TARGET_SIGSEGV
;
735 info
.si_code
= TARGET_SEGV_MAPERR
;
738 info
._sifields
._sigfault
._addr
= env
->nip
;
739 queue_signal(info
.si_signo
, &info
);
742 fprintf(stderr
, "Invalid instruction fetch\n");
744 fprintf(logfile
, "Invalid instruction fetch\n");
745 switch (env
->error_code
& 0xFF000000) {
747 info
.si_signo
= TARGET_SIGSEGV
;
749 info
.si_code
= TARGET_SEGV_MAPERR
;
753 info
.si_signo
= TARGET_SIGSEGV
;
755 info
.si_code
= TARGET_SEGV_ACCERR
;
758 /* Let's send a regular segfault... */
759 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
762 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
765 info
.si_signo
= TARGET_SIGSEGV
;
767 info
.si_code
= TARGET_SEGV_MAPERR
;
770 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
771 queue_signal(info
.si_signo
, &info
);
774 /* Should not happen ! */
775 fprintf(stderr
, "External interruption... Stop emulation\n");
777 fprintf(logfile
, "External interruption... Stop emulation\n");
780 fprintf(stderr
, "Invalid unaligned memory access\n");
782 fprintf(logfile
, "Invalid unaligned memory access\n");
783 info
.si_signo
= TARGET_SIGBUS
;
785 info
.si_code
= TARGET_BUS_ADRALN
;
786 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
787 queue_signal(info
.si_signo
, &info
);
790 switch (env
->error_code
& ~0xF) {
792 fprintf(stderr
, "Program exception\n");
794 fprintf(logfile
, "Program exception\n");
796 env
->fpscr
[7] |= 0x8;
797 /* Finally, update FEX */
798 if ((((env
->fpscr
[7] & 0x3) << 3) | (env
->fpscr
[6] >> 1)) &
799 ((env
->fpscr
[1] << 1) | (env
->fpscr
[0] >> 3)))
800 env
->fpscr
[7] |= 0x4;
801 info
.si_signo
= TARGET_SIGFPE
;
803 switch (env
->error_code
& 0xF) {
805 info
.si_code
= TARGET_FPE_FLTOVF
;
808 info
.si_code
= TARGET_FPE_FLTUND
;
812 info
.si_code
= TARGET_FPE_FLTDIV
;
815 info
.si_code
= TARGET_FPE_FLTRES
;
818 info
.si_code
= TARGET_FPE_FLTINV
;
827 info
.si_code
= TARGET_FPE_FLTSUB
;
830 fprintf(stderr
, "Unknown floating point exception "
831 "(%02x)\n", env
->error_code
);
833 fprintf(logfile
, "Unknown floating point exception "
834 "(%02x)\n", env
->error_code
& 0xF);
839 fprintf(stderr
, "Invalid instruction\n");
841 fprintf(logfile
, "Invalid instruction\n");
842 info
.si_signo
= TARGET_SIGILL
;
844 switch (env
->error_code
& 0xF) {
845 case EXCP_INVAL_INVAL
:
846 info
.si_code
= TARGET_ILL_ILLOPC
;
848 case EXCP_INVAL_LSWX
:
849 info
.si_code
= TARGET_ILL_ILLOPN
;
852 info
.si_code
= TARGET_ILL_PRVREG
;
855 info
.si_code
= TARGET_ILL_COPROC
;
858 fprintf(stderr
, "Unknown invalid operation (%02x)\n",
859 env
->error_code
& 0xF);
861 fprintf(logfile
, "Unknown invalid operation (%02x)\n",
862 env
->error_code
& 0xF);
864 info
.si_code
= TARGET_ILL_ILLADR
;
869 fprintf(stderr
, "Privilege violation\n");
871 fprintf(logfile
, "Privilege violation\n");
872 info
.si_signo
= TARGET_SIGILL
;
874 switch (env
->error_code
& 0xF) {
876 info
.si_code
= TARGET_ILL_PRVOPC
;
879 info
.si_code
= TARGET_ILL_PRVREG
;
882 fprintf(stderr
, "Unknown privilege violation (%02x)\n",
883 env
->error_code
& 0xF);
884 info
.si_code
= TARGET_ILL_PRVOPC
;
889 fprintf(stderr
, "Tried to call a TRAP\n");
891 fprintf(logfile
, "Tried to call a TRAP\n");
894 /* Should not happen ! */
895 fprintf(stderr
, "Unknown program exception (%02x)\n",
898 fprintf(logfile
, "Unknwon program exception (%02x)\n",
903 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
904 queue_signal(info
.si_signo
, &info
);
907 fprintf(stderr
, "No floating point allowed\n");
909 fprintf(logfile
, "No floating point allowed\n");
910 info
.si_signo
= TARGET_SIGILL
;
912 info
.si_code
= TARGET_ILL_COPROC
;
913 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
914 queue_signal(info
.si_signo
, &info
);
917 /* Should not happen ! */
918 fprintf(stderr
, "Decrementer exception\n");
920 fprintf(logfile
, "Decrementer exception\n");
923 /* Do nothing: we use this to trace execution */
926 /* Should not happen ! */
927 fprintf(stderr
, "Floating point assist exception\n");
929 fprintf(logfile
, "Floating point assist exception\n");
932 /* We reloaded the msr, just go on */
934 fprintf(stderr
, "Tried to go into supervisor mode !\n");
936 fprintf(logfile
, "Tried to go into supervisor mode !\n");
941 /* We stopped because of a jump... */
944 /* Don't know why this should ever happen... */
950 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
955 info
.si_code
= TARGET_TRAP_BRKPT
;
956 queue_signal(info
.si_signo
, &info
);
961 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
964 fprintf(logfile
, "qemu: unhandled CPU exception 0x%02x - "
965 "0x%02x - aborting\n", trapnr
, env
->error_code
);
969 process_pending_signals(env
);
976 printf("qemu-" TARGET_ARCH
" version " QEMU_VERSION
", Copyright (c) 2003-2005 Fabrice Bellard\n"
977 "usage: qemu-" TARGET_ARCH
" [-h] [-g] [-d opts] [-L path] [-s size] program [arguments...]\n"
978 "Linux CPU emulator (compiled for %s emulation)\n"
980 "-h print this help\n"
981 "-g wait gdb connection to port %d\n"
982 "-L path set the elf interpreter prefix (default=%s)\n"
983 "-s size set the stack size in bytes (default=%ld)\n"
987 "-no-code-copy disable code copy acceleration\n"
989 "-d options activate log (logfile=%s)\n"
990 "-p pagesize set the host page size to 'pagesize'\n",
992 DEFAULT_GDBSTUB_PORT
,
999 /* XXX: currently only used for async signals (see signal.c) */
1000 CPUState
*global_env
;
1001 /* used only if single thread */
1002 CPUState
*cpu_single_env
= NULL
;
1004 /* used to free thread contexts */
1005 TaskState
*first_task_state
;
1007 int main(int argc
, char **argv
)
1009 const char *filename
;
1010 struct target_pt_regs regs1
, *regs
= ®s1
;
1011 struct image_info info1
, *info
= &info1
;
1012 TaskState ts1
, *ts
= &ts1
;
1016 int use_gdbstub
= 0;
1022 cpu_set_log_filename(DEBUG_LOGFILE
);
1033 if (!strcmp(r
, "-")) {
1035 } else if (!strcmp(r
, "d")) {
1043 mask
= cpu_str_to_log_mask(r
);
1045 printf("Log items (comma separated):\n");
1046 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
1047 printf("%-10s %s\n", item
->name
, item
->help
);
1052 } else if (!strcmp(r
, "s")) {
1054 x86_stack_size
= strtol(r
, (char **)&r
, 0);
1055 if (x86_stack_size
<= 0)
1058 x86_stack_size
*= 1024 * 1024;
1059 else if (*r
== 'k' || *r
== 'K')
1060 x86_stack_size
*= 1024;
1061 } else if (!strcmp(r
, "L")) {
1062 interp_prefix
= argv
[optind
++];
1063 } else if (!strcmp(r
, "p")) {
1064 qemu_host_page_size
= atoi(argv
[optind
++]);
1065 if (qemu_host_page_size
== 0 ||
1066 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
1067 fprintf(stderr
, "page size must be a power of two\n");
1070 } else if (!strcmp(r
, "g")) {
1073 #ifdef USE_CODE_COPY
1074 if (!strcmp(r
, "no-code-copy")) {
1075 code_copy_enabled
= 0;
1084 filename
= argv
[optind
];
1087 memset(regs
, 0, sizeof(struct target_pt_regs
));
1089 /* Zero out image_info */
1090 memset(info
, 0, sizeof(struct image_info
));
1092 /* Scan interp_prefix dir for replacement files. */
1093 init_paths(interp_prefix
);
1095 /* NOTE: we need to init the CPU at this stage to get
1096 qemu_host_page_size */
1099 if (elf_exec(filename
, argv
+optind
, environ
, regs
, info
) != 0) {
1100 printf("Error loading %s\n", filename
);
1107 fprintf(logfile
, "start_brk 0x%08lx\n" , info
->start_brk
);
1108 fprintf(logfile
, "end_code 0x%08lx\n" , info
->end_code
);
1109 fprintf(logfile
, "start_code 0x%08lx\n" , info
->start_code
);
1110 fprintf(logfile
, "end_data 0x%08lx\n" , info
->end_data
);
1111 fprintf(logfile
, "start_stack 0x%08lx\n" , info
->start_stack
);
1112 fprintf(logfile
, "brk 0x%08lx\n" , info
->brk
);
1113 fprintf(logfile
, "entry 0x%08lx\n" , info
->entry
);
1116 target_set_brk((char *)info
->brk
);
1122 /* build Task State */
1123 memset(ts
, 0, sizeof(TaskState
));
1126 env
->user_mode_only
= 1;
1128 #if defined(TARGET_I386)
1129 cpu_x86_set_cpl(env
, 3);
1131 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1132 env
->hflags
|= HF_PE_MASK
;
1133 if (env
->cpuid_features
& CPUID_SSE
) {
1134 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1135 env
->hflags
|= HF_OSFXSR_MASK
;
1138 /* flags setup : we activate the IRQs by default as in user mode */
1139 env
->eflags
|= IF_MASK
;
1141 /* linux register setup */
1142 env
->regs
[R_EAX
] = regs
->eax
;
1143 env
->regs
[R_EBX
] = regs
->ebx
;
1144 env
->regs
[R_ECX
] = regs
->ecx
;
1145 env
->regs
[R_EDX
] = regs
->edx
;
1146 env
->regs
[R_ESI
] = regs
->esi
;
1147 env
->regs
[R_EDI
] = regs
->edi
;
1148 env
->regs
[R_EBP
] = regs
->ebp
;
1149 env
->regs
[R_ESP
] = regs
->esp
;
1150 env
->eip
= regs
->eip
;
1152 /* linux interrupt setup */
1153 env
->idt
.base
= (long)idt_table
;
1154 env
->idt
.limit
= sizeof(idt_table
) - 1;
1177 /* linux segment setup */
1178 env
->gdt
.base
= (long)gdt_table
;
1179 env
->gdt
.limit
= sizeof(gdt_table
) - 1;
1180 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1181 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1182 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1183 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1184 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1185 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1186 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1187 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1188 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1189 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1190 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1191 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1193 #elif defined(TARGET_ARM)
1196 for(i
= 0; i
< 16; i
++) {
1197 env
->regs
[i
] = regs
->uregs
[i
];
1199 env
->cpsr
= regs
->uregs
[16];
1200 ts
->stack_base
= info
->start_stack
;
1201 ts
->heap_base
= info
->brk
;
1202 /* This will be filled in on the first SYS_HEAPINFO call. */
1205 #elif defined(TARGET_SPARC)
1209 env
->npc
= regs
->npc
;
1211 for(i
= 0; i
< 8; i
++)
1212 env
->gregs
[i
] = regs
->u_regs
[i
];
1213 for(i
= 0; i
< 8; i
++)
1214 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1216 #elif defined(TARGET_PPC)
1221 /* Choose and initialise CPU */
1222 /* XXX: CPU model (or PVR) should be provided on command line */
1223 // ppc_find_by_name("750gx", &def);
1224 // ppc_find_by_name("750fx", &def);
1225 // ppc_find_by_name("750p", &def);
1226 ppc_find_by_name("750", &def
);
1227 // ppc_find_by_name("G3", &def);
1228 // ppc_find_by_name("604r", &def);
1229 // ppc_find_by_name("604e", &def);
1230 // ppc_find_by_name("604", &def);
1232 cpu_abort(cpu_single_env
,
1233 "Unable to find PowerPC CPU definition\n");
1235 cpu_ppc_register(cpu_single_env
, def
);
1237 for (i
= 0; i
< 32; i
++) {
1238 if (i
!= 12 && i
!= 6 && i
!= 13)
1239 env
->msr
[i
] = (regs
->msr
>> i
) & 1;
1241 env
->nip
= regs
->nip
;
1242 for(i
= 0; i
< 32; i
++) {
1243 env
->gpr
[i
] = regs
->gpr
[i
];
1247 #error unsupported target CPU
1251 gdbserver_start (DEFAULT_GDBSTUB_PORT
);
1252 gdb_handlesig(env
, 0);