]>
git.proxmox.com Git - qemu.git/blob - linux-user/main.c
126a9193edc641c8be6f58cccaea2d140c2ea444
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 */
282 pc
= env
->segs
[R_CS
].base
+ env
->eip
;
283 fprintf(stderr
, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
287 process_pending_signals(env
);
294 /* XXX: find a better solution */
295 extern void tb_invalidate_page_range(target_ulong start
, target_ulong end
);
297 static void arm_cache_flush(target_ulong start
, target_ulong last
)
299 target_ulong addr
, last1
;
305 last1
= ((addr
+ TARGET_PAGE_SIZE
) & TARGET_PAGE_MASK
) - 1;
308 tb_invalidate_page_range(addr
, last1
+ 1);
315 void cpu_loop(CPUARMState
*env
)
318 unsigned int n
, insn
;
319 target_siginfo_t info
;
322 trapnr
= cpu_arm_exec(env
);
326 TaskState
*ts
= env
->opaque
;
329 /* we handle the FPU emulation here, as Linux */
330 /* we get the opcode */
331 opcode
= ldl_raw((uint8_t *)env
->regs
[15]);
333 if (EmulateAll(opcode
, &ts
->fpa
, env
->regs
) == 0) {
334 info
.si_signo
= SIGILL
;
336 info
.si_code
= TARGET_ILL_ILLOPN
;
337 info
._sifields
._sigfault
._addr
= env
->regs
[15];
338 queue_signal(info
.si_signo
, &info
);
348 insn
= ldl((void *)(env
->regs
[15] - 4));
350 if (n
== ARM_NR_cacheflush
) {
351 arm_cache_flush(env
->regs
[0], env
->regs
[1]);
352 } else if (n
>= ARM_SYSCALL_BASE
) {
354 n
-= ARM_SYSCALL_BASE
;
355 env
->regs
[0] = do_syscall(env
,
369 /* just indicate that signals should be handled asap */
371 case EXCP_PREFETCH_ABORT
:
372 case EXCP_DATA_ABORT
:
374 info
.si_signo
= SIGSEGV
;
376 /* XXX: check env->error_code */
377 info
.si_code
= TARGET_SEGV_MAPERR
;
378 info
._sifields
._sigfault
._addr
= env
->cp15_6
;
379 queue_signal(info
.si_signo
, &info
);
384 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
386 cpu_dump_state(env
, stderr
, fprintf
, 0);
389 process_pending_signals(env
);
399 /* WARNING: dealing with register windows _is_ complicated. More info
400 can be found at http://www.sics.se/~psm/sparcstack.html */
401 static inline int get_reg_index(CPUSPARCState
*env
, int cwp
, int index
)
403 index
= (index
+ cwp
* 16) & (16 * NWINDOWS
- 1);
404 /* wrap handling : if cwp is on the last window, then we use the
405 registers 'after' the end */
406 if (index
< 8 && env
->cwp
== (NWINDOWS
- 1))
407 index
+= (16 * NWINDOWS
);
411 /* save the register window 'cwp1' */
412 static inline void save_window_offset(CPUSPARCState
*env
, int cwp1
)
417 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
418 #if defined(DEBUG_WIN)
419 printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n",
422 for(i
= 0; i
< 16; i
++) {
423 put_user(env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)], sp_ptr
);
428 static void save_window(CPUSPARCState
*env
)
430 unsigned int new_wim
;
431 new_wim
= ((env
->wim
>> 1) | (env
->wim
<< (NWINDOWS
- 1))) &
432 ((1LL << NWINDOWS
) - 1);
433 save_window_offset(env
, (env
->cwp
- 2) & (NWINDOWS
- 1));
437 static void restore_window(CPUSPARCState
*env
)
439 unsigned int new_wim
, i
, cwp1
;
440 uint32_t *sp_ptr
, reg
;
442 new_wim
= ((env
->wim
<< 1) | (env
->wim
>> (NWINDOWS
- 1))) &
443 ((1LL << NWINDOWS
) - 1);
445 /* restore the invalid window */
446 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
447 sp_ptr
= (uint32_t *)(env
->regbase
[get_reg_index(env
, cwp1
, 6)]);
448 #if defined(DEBUG_WIN)
449 printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n",
452 for(i
= 0; i
< 16; i
++) {
453 get_user(reg
, sp_ptr
);
454 env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)] = reg
;
460 static void flush_windows(CPUSPARCState
*env
)
466 /* if restore would invoke restore_window(), then we can stop */
467 cwp1
= (env
->cwp
+ offset
) & (NWINDOWS
- 1);
468 if (env
->wim
& (1 << cwp1
))
470 save_window_offset(env
, cwp1
);
473 /* set wim so that restore will reload the registers */
474 cwp1
= (env
->cwp
+ 1) & (NWINDOWS
- 1);
475 env
->wim
= 1 << cwp1
;
476 #if defined(DEBUG_WIN)
477 printf("flush_windows: nb=%d\n", offset
- 1);
481 void cpu_loop (CPUSPARCState
*env
)
484 target_siginfo_t info
;
487 trapnr
= cpu_sparc_exec (env
);
492 ret
= do_syscall (env
, env
->gregs
[1],
493 env
->regwptr
[0], env
->regwptr
[1],
494 env
->regwptr
[2], env
->regwptr
[3],
495 env
->regwptr
[4], env
->regwptr
[5]);
496 if ((unsigned int)ret
>= (unsigned int)(-515)) {
497 env
->psr
|= PSR_CARRY
;
500 env
->psr
&= ~PSR_CARRY
;
502 env
->regwptr
[0] = ret
;
503 /* next instruction */
505 env
->npc
= env
->npc
+ 4;
507 case 0x83: /* flush windows */
509 /* next instruction */
511 env
->npc
= env
->npc
+ 4;
513 case TT_WIN_OVF
: /* window overflow */
516 case TT_WIN_UNF
: /* window underflow */
522 info
.si_signo
= SIGSEGV
;
524 /* XXX: check env->error_code */
525 info
.si_code
= TARGET_SEGV_MAPERR
;
526 info
._sifields
._sigfault
._addr
= env
->mmuregs
[4];
527 queue_signal(info
.si_signo
, &info
);
530 case 0x100: // XXX, why do we get these?
533 printf ("Unhandled trap: 0x%x\n", trapnr
);
534 cpu_dump_state(env
, stderr
, fprintf
, 0);
537 process_pending_signals (env
);
545 static inline uint64_t cpu_ppc_get_tb (CPUState
*env
)
551 uint32_t cpu_ppc_load_tbl (CPUState
*env
)
553 return cpu_ppc_get_tb(env
) & 0xFFFFFFFF;
556 uint32_t cpu_ppc_load_tbu (CPUState
*env
)
558 return cpu_ppc_get_tb(env
) >> 32;
561 static void cpu_ppc_store_tb (CPUState
*env
, uint64_t value
)
566 void cpu_ppc_store_tbu (CPUState
*env
, uint32_t value
)
568 cpu_ppc_store_tb(env
, ((uint64_t)value
<< 32) | cpu_ppc_load_tbl(env
));
571 void cpu_ppc_store_tbl (CPUState
*env
, uint32_t value
)
573 cpu_ppc_store_tb(env
, ((uint64_t)cpu_ppc_load_tbl(env
) << 32) | value
);
576 uint32_t cpu_ppc_load_decr (CPUState
*env
)
582 void cpu_ppc_store_decr (CPUState
*env
, uint32_t value
)
587 void cpu_loop(CPUPPCState
*env
)
589 target_siginfo_t info
;
594 trapnr
= cpu_ppc_exec(env
);
595 if (trapnr
!= EXCP_SYSCALL_USER
&& trapnr
!= EXCP_BRANCH
&&
596 trapnr
!= EXCP_TRACE
) {
598 cpu_dump_state(env
, logfile
, fprintf
, 0);
604 case EXCP_SYSCALL_USER
:
607 * PPC ABI uses overflow flag in cr0 to signal an error
611 printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env
->gpr
[0],
612 env
->gpr
[3], env
->gpr
[4], env
->gpr
[5], env
->gpr
[6]);
615 ret
= do_syscall(env
, env
->gpr
[0], env
->gpr
[3], env
->gpr
[4],
616 env
->gpr
[5], env
->gpr
[6], env
->gpr
[7],
618 if (ret
> (uint32_t)(-515)) {
624 printf("syscall returned 0x%08x (%d)\n", ret
, ret
);
628 /* Should not happen ! */
629 fprintf(stderr
, "RESET asked... Stop emulation\n");
631 fprintf(logfile
, "RESET asked... Stop emulation\n");
633 case EXCP_MACHINE_CHECK
:
634 fprintf(stderr
, "Machine check exeption... Stop emulation\n");
636 fprintf(logfile
, "RESET asked... Stop emulation\n");
637 info
.si_signo
= TARGET_SIGBUS
;
639 info
.si_code
= TARGET_BUS_OBJERR
;
640 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
641 queue_signal(info
.si_signo
, &info
);
643 fprintf(stderr
, "Invalid data memory access: 0x%08x\n", env
->spr
[DAR
]);
645 fprintf(logfile
, "Invalid data memory access: 0x%08x\n",
648 switch (env
->error_code
& 0xF) {
649 case EXCP_DSI_TRANSLATE
:
650 info
.si_signo
= TARGET_SIGSEGV
;
652 info
.si_code
= TARGET_SEGV_MAPERR
;
654 case EXCP_DSI_NOTSUP
:
655 case EXCP_DSI_EXTERNAL
:
656 info
.si_signo
= TARGET_SIGILL
;
658 info
.si_code
= TARGET_ILL_ILLADR
;
661 info
.si_signo
= TARGET_SIGSEGV
;
663 info
.si_code
= TARGET_SEGV_ACCERR
;
666 info
.si_signo
= TARGET_SIGTRAP
;
668 info
.si_code
= TARGET_TRAP_BRKPT
;
671 /* Let's send a regular segfault... */
672 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
675 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
678 info
.si_signo
= TARGET_SIGSEGV
;
680 info
.si_code
= TARGET_SEGV_MAPERR
;
683 info
._sifields
._sigfault
._addr
= env
->nip
;
684 queue_signal(info
.si_signo
, &info
);
687 fprintf(stderr
, "Invalid instruction fetch\n");
689 fprintf(logfile
, "Invalid instruction fetch\n");
690 switch (env
->error_code
) {
691 case EXCP_ISI_TRANSLATE
:
692 info
.si_signo
= TARGET_SIGSEGV
;
694 info
.si_code
= TARGET_SEGV_MAPERR
;
697 info
.si_signo
= TARGET_SIGILL
;
699 info
.si_code
= TARGET_ILL_ILLADR
;
701 case EXCP_ISI_NOEXEC
:
703 info
.si_signo
= TARGET_SIGSEGV
;
705 info
.si_code
= TARGET_SEGV_ACCERR
;
708 /* Let's send a regular segfault... */
709 fprintf(stderr
, "Invalid segfault errno (%02x)\n",
712 fprintf(logfile
, "Invalid segfault errno (%02x)\n",
715 info
.si_signo
= TARGET_SIGSEGV
;
717 info
.si_code
= TARGET_SEGV_MAPERR
;
720 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
721 queue_signal(info
.si_signo
, &info
);
724 /* Should not happen ! */
725 fprintf(stderr
, "External interruption... Stop emulation\n");
727 fprintf(logfile
, "External interruption... Stop emulation\n");
730 fprintf(stderr
, "Invalid unaligned memory access\n");
732 fprintf(logfile
, "Invalid unaligned memory access\n");
733 info
.si_signo
= TARGET_SIGBUS
;
735 info
.si_code
= TARGET_BUS_ADRALN
;
736 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
737 queue_signal(info
.si_signo
, &info
);
740 switch (env
->error_code
& ~0xF) {
742 fprintf(stderr
, "Program exception\n");
744 fprintf(logfile
, "Program exception\n");
746 env
->fpscr
[7] |= 0x8;
747 /* Finally, update FEX */
748 if ((((env
->fpscr
[7] & 0x3) << 3) | (env
->fpscr
[6] >> 1)) &
749 ((env
->fpscr
[1] << 1) | (env
->fpscr
[0] >> 3)))
750 env
->fpscr
[7] |= 0x4;
751 info
.si_signo
= TARGET_SIGFPE
;
753 switch (env
->error_code
& 0xF) {
755 info
.si_code
= TARGET_FPE_FLTOVF
;
758 info
.si_code
= TARGET_FPE_FLTUND
;
762 info
.si_code
= TARGET_FPE_FLTDIV
;
765 info
.si_code
= TARGET_FPE_FLTRES
;
768 info
.si_code
= TARGET_FPE_FLTINV
;
777 info
.si_code
= TARGET_FPE_FLTSUB
;
780 fprintf(stderr
, "Unknown floating point exception "
781 "(%02x)\n", env
->error_code
);
783 fprintf(logfile
, "Unknown floating point exception "
784 "(%02x)\n", env
->error_code
& 0xF);
789 fprintf(stderr
, "Invalid instruction\n");
791 fprintf(logfile
, "Invalid instruction\n");
792 info
.si_signo
= TARGET_SIGILL
;
794 switch (env
->error_code
& 0xF) {
795 case EXCP_INVAL_INVAL
:
796 info
.si_code
= TARGET_ILL_ILLOPC
;
798 case EXCP_INVAL_LSWX
:
799 info
.si_code
= TARGET_ILL_ILLOPN
;
802 info
.si_code
= TARGET_ILL_PRVREG
;
805 info
.si_code
= TARGET_ILL_COPROC
;
808 fprintf(stderr
, "Unknown invalid operation (%02x)\n",
809 env
->error_code
& 0xF);
811 fprintf(logfile
, "Unknown invalid operation (%02x)\n",
812 env
->error_code
& 0xF);
814 info
.si_code
= TARGET_ILL_ILLADR
;
819 fprintf(stderr
, "Privilege violation\n");
821 fprintf(logfile
, "Privilege violation\n");
822 info
.si_signo
= TARGET_SIGILL
;
824 switch (env
->error_code
& 0xF) {
826 info
.si_code
= TARGET_ILL_PRVOPC
;
829 info
.si_code
= TARGET_ILL_PRVREG
;
832 fprintf(stderr
, "Unknown privilege violation (%02x)\n",
833 env
->error_code
& 0xF);
834 info
.si_code
= TARGET_ILL_PRVOPC
;
839 fprintf(stderr
, "Tried to call a TRAP\n");
841 fprintf(logfile
, "Tried to call a TRAP\n");
844 /* Should not happen ! */
845 fprintf(stderr
, "Unknown program exception (%02x)\n",
848 fprintf(logfile
, "Unknwon program exception (%02x)\n",
853 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
854 queue_signal(info
.si_signo
, &info
);
857 fprintf(stderr
, "No floating point allowed\n");
859 fprintf(logfile
, "No floating point allowed\n");
860 info
.si_signo
= TARGET_SIGILL
;
862 info
.si_code
= TARGET_ILL_COPROC
;
863 info
._sifields
._sigfault
._addr
= env
->nip
- 4;
864 queue_signal(info
.si_signo
, &info
);
867 /* Should not happen ! */
868 fprintf(stderr
, "Decrementer exception\n");
870 fprintf(logfile
, "Decrementer exception\n");
872 case EXCP_RESA
: /* Implementation specific */
873 /* Should not happen ! */
874 fprintf(stderr
, "RESA exception should never happen !\n");
876 fprintf(logfile
, "RESA exception should never happen !\n");
878 case EXCP_RESB
: /* Implementation specific */
879 /* Should not happen ! */
880 fprintf(stderr
, "RESB exception should never happen !\n");
882 fprintf(logfile
, "RESB exception should never happen !\n");
885 /* Do nothing: we use this to trace execution */
888 /* Should not happen ! */
889 fprintf(stderr
, "Floating point assist exception\n");
891 fprintf(logfile
, "Floating point assist exception\n");
894 /* We reloaded the msr, just go on */
896 fprintf(stderr
, "Tried to go into supervisor mode !\n");
898 fprintf(logfile
, "Tried to go into supervisor mode !\n");
903 /* We stopped because of a jump... */
906 /* Should not occur: we always are in user mode */
907 fprintf(stderr
, "Return from interrupt ?\n");
909 fprintf(logfile
, "Return from interrupt ?\n");
912 /* Don't know why this should ever happen... */
917 fprintf(stderr
, "qemu: unhandled CPU exception 0x%x - aborting\n",
920 fprintf(logfile
, "qemu: unhandled CPU exception 0x%02x - "
921 "0x%02x - aborting\n", trapnr
, env
->error_code
);
925 process_pending_signals(env
);
932 printf("qemu-" TARGET_ARCH
" version " QEMU_VERSION
", Copyright (c) 2003-2004 Fabrice Bellard\n"
933 "usage: qemu-" TARGET_ARCH
" [-h] [-d opts] [-L path] [-s size] program [arguments...]\n"
934 "Linux CPU emulator (compiled for %s emulation)\n"
936 "-h print this help\n"
937 "-L path set the elf interpreter prefix (default=%s)\n"
938 "-s size set the stack size in bytes (default=%ld)\n"
942 "-no-code-copy disable code copy acceleration\n"
944 "-d options activate log (logfile=%s)\n"
945 "-p pagesize set the host page size to 'pagesize'\n",
953 /* XXX: currently only used for async signals (see signal.c) */
954 CPUState
*global_env
;
955 /* used only if single thread */
956 CPUState
*cpu_single_env
= NULL
;
958 /* used to free thread contexts */
959 TaskState
*first_task_state
;
961 int main(int argc
, char **argv
)
963 const char *filename
;
964 struct target_pt_regs regs1
, *regs
= ®s1
;
965 struct image_info info1
, *info
= &info1
;
966 TaskState ts1
, *ts
= &ts1
;
975 cpu_set_log_filename(DEBUG_LOGFILE
);
986 if (!strcmp(r
, "-")) {
988 } else if (!strcmp(r
, "d")) {
996 mask
= cpu_str_to_log_mask(r
);
998 printf("Log items (comma separated):\n");
999 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
1000 printf("%-10s %s\n", item
->name
, item
->help
);
1005 } else if (!strcmp(r
, "s")) {
1007 x86_stack_size
= strtol(r
, (char **)&r
, 0);
1008 if (x86_stack_size
<= 0)
1011 x86_stack_size
*= 1024 * 1024;
1012 else if (*r
== 'k' || *r
== 'K')
1013 x86_stack_size
*= 1024;
1014 } else if (!strcmp(r
, "L")) {
1015 interp_prefix
= argv
[optind
++];
1016 } else if (!strcmp(r
, "p")) {
1017 qemu_host_page_size
= atoi(argv
[optind
++]);
1018 if (qemu_host_page_size
== 0 ||
1019 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
1020 fprintf(stderr
, "page size must be a power of two\n");
1024 #ifdef USE_CODE_COPY
1025 if (!strcmp(r
, "no-code-copy")) {
1026 code_copy_enabled
= 0;
1035 filename
= argv
[optind
];
1038 memset(regs
, 0, sizeof(struct target_pt_regs
));
1040 /* Zero out image_info */
1041 memset(info
, 0, sizeof(struct image_info
));
1043 /* Scan interp_prefix dir for replacement files. */
1044 init_paths(interp_prefix
);
1046 /* NOTE: we need to init the CPU at this stage to get
1047 qemu_host_page_size */
1050 if (elf_exec(filename
, argv
+optind
, environ
, regs
, info
) != 0) {
1051 printf("Error loading %s\n", filename
);
1058 fprintf(logfile
, "start_brk 0x%08lx\n" , info
->start_brk
);
1059 fprintf(logfile
, "end_code 0x%08lx\n" , info
->end_code
);
1060 fprintf(logfile
, "start_code 0x%08lx\n" , info
->start_code
);
1061 fprintf(logfile
, "end_data 0x%08lx\n" , info
->end_data
);
1062 fprintf(logfile
, "start_stack 0x%08lx\n" , info
->start_stack
);
1063 fprintf(logfile
, "brk 0x%08lx\n" , info
->brk
);
1064 fprintf(logfile
, "entry 0x%08lx\n" , info
->entry
);
1067 target_set_brk((char *)info
->brk
);
1073 /* build Task State */
1074 memset(ts
, 0, sizeof(TaskState
));
1077 env
->user_mode_only
= 1;
1079 #if defined(TARGET_I386)
1080 cpu_x86_set_cpl(env
, 3);
1082 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1083 env
->hflags
|= HF_PE_MASK
;
1084 if (env
->cpuid_features
& CPUID_SSE
) {
1085 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1086 env
->hflags
|= HF_OSFXSR_MASK
;
1089 /* flags setup : we activate the IRQs by default as in user mode */
1090 env
->eflags
|= IF_MASK
;
1092 /* linux register setup */
1093 env
->regs
[R_EAX
] = regs
->eax
;
1094 env
->regs
[R_EBX
] = regs
->ebx
;
1095 env
->regs
[R_ECX
] = regs
->ecx
;
1096 env
->regs
[R_EDX
] = regs
->edx
;
1097 env
->regs
[R_ESI
] = regs
->esi
;
1098 env
->regs
[R_EDI
] = regs
->edi
;
1099 env
->regs
[R_EBP
] = regs
->ebp
;
1100 env
->regs
[R_ESP
] = regs
->esp
;
1101 env
->eip
= regs
->eip
;
1103 /* linux interrupt setup */
1104 env
->idt
.base
= (long)idt_table
;
1105 env
->idt
.limit
= sizeof(idt_table
) - 1;
1128 /* linux segment setup */
1129 env
->gdt
.base
= (long)gdt_table
;
1130 env
->gdt
.limit
= sizeof(gdt_table
) - 1;
1131 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1132 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1133 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1134 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1135 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1136 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1137 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1138 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1139 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1140 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1141 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1142 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1144 #elif defined(TARGET_ARM)
1147 for(i
= 0; i
< 16; i
++) {
1148 env
->regs
[i
] = regs
->uregs
[i
];
1150 env
->cpsr
= regs
->uregs
[16];
1152 #elif defined(TARGET_SPARC)
1156 env
->npc
= regs
->npc
;
1158 for(i
= 0; i
< 8; i
++)
1159 env
->gregs
[i
] = regs
->u_regs
[i
];
1160 for(i
= 0; i
< 8; i
++)
1161 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1163 #elif defined(TARGET_PPC)
1166 for (i
= 0; i
< 32; i
++) {
1167 if (i
!= 12 && i
!= 6 && i
!= 13)
1168 env
->msr
[i
] = (regs
->msr
>> i
) & 1;
1170 env
->nip
= regs
->nip
;
1171 for(i
= 0; i
< 32; i
++) {
1172 env
->gpr
[i
] = regs
->gpr
[i
];
1176 #error unsupported target CPU