4 * Copyright (c) 2003-2008 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, see <http://www.gnu.org/licenses/>.
20 #include "qemu/osdep.h"
21 #include "qemu-common.h"
22 #include "qemu/units.h"
23 #include "qemu/accel.h"
24 #include "sysemu/tcg.h"
25 #include "qemu-version.h"
26 #include <machine/trap.h>
28 #include "qapi/error.h"
30 #include "qemu/config-file.h"
31 #include "qemu/error-report.h"
32 #include "qemu/path.h"
33 #include "qemu/help_option.h"
34 #include "qemu/module.h"
35 #include "exec/exec-all.h"
37 #include "qemu/timer.h"
38 #include "qemu/envlist.h"
40 #include "trace/control.h"
43 unsigned long mmap_min_addr
;
46 unsigned long reserved_va
;
48 static const char *interp_prefix
= CONFIG_QEMU_INTERP_PREFIX
;
49 const char *qemu_uname_release
;
50 extern char **environ
;
51 enum BSDType bsd_type
;
53 /* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
54 we allocate a bigger stack. Need a better solution, for example
55 by remapping the process stack directly at the right place */
56 unsigned long x86_stack_size
= 512 * 1024;
58 void gemu_log(const char *fmt
, ...)
63 vfprintf(stderr
, fmt
, ap
);
67 #if defined(TARGET_I386)
68 int cpu_get_pic_interrupt(CPUX86State
*env
)
78 void fork_end(int child
)
81 gdbserver_fork(thread_cpu
);
86 /***********************************************************/
87 /* CPUX86 core interface */
89 uint64_t cpu_get_tsc(CPUX86State
*env
)
91 return cpu_get_host_ticks();
94 static void write_dt(void *ptr
, unsigned long addr
, unsigned long limit
,
99 e1
= (addr
<< 16) | (limit
& 0xffff);
100 e2
= ((addr
>> 16) & 0xff) | (addr
& 0xff000000) | (limit
& 0x000f0000);
107 static uint64_t *idt_table
;
109 static void set_gate64(void *ptr
, unsigned int type
, unsigned int dpl
,
110 uint64_t addr
, unsigned int sel
)
113 e1
= (addr
& 0xffff) | (sel
<< 16);
114 e2
= (addr
& 0xffff0000) | 0x8000 | (dpl
<< 13) | (type
<< 8);
118 p
[2] = tswap32(addr
>> 32);
121 /* only dpl matters as we do only user space emulation */
122 static void set_idt(int n
, unsigned int dpl
)
124 set_gate64(idt_table
+ n
* 2, 0, dpl
, 0, 0);
127 static void set_gate(void *ptr
, unsigned int type
, unsigned int dpl
,
128 uint32_t addr
, unsigned int sel
)
131 e1
= (addr
& 0xffff) | (sel
<< 16);
132 e2
= (addr
& 0xffff0000) | 0x8000 | (dpl
<< 13) | (type
<< 8);
138 /* only dpl matters as we do only user space emulation */
139 static void set_idt(int n
, unsigned int dpl
)
141 set_gate(idt_table
+ n
, 0, dpl
, 0, 0);
145 void cpu_loop(CPUX86State
*env
)
147 CPUState
*cs
= env_cpu(env
);
150 //target_siginfo_t info;
154 trapnr
= cpu_exec(cs
);
156 process_queued_cpu_work(cs
);
160 /* syscall from int $0x80 */
161 if (bsd_type
== target_freebsd
) {
162 abi_ulong params
= (abi_ulong
) env
->regs
[R_ESP
] +
164 int32_t syscall_nr
= env
->regs
[R_EAX
];
165 int32_t arg1
, arg2
, arg3
, arg4
, arg5
, arg6
, arg7
, arg8
;
167 if (syscall_nr
== TARGET_FREEBSD_NR_syscall
) {
168 get_user_s32(syscall_nr
, params
);
169 params
+= sizeof(int32_t);
170 } else if (syscall_nr
== TARGET_FREEBSD_NR___syscall
) {
171 get_user_s32(syscall_nr
, params
);
172 params
+= sizeof(int64_t);
174 get_user_s32(arg1
, params
);
175 params
+= sizeof(int32_t);
176 get_user_s32(arg2
, params
);
177 params
+= sizeof(int32_t);
178 get_user_s32(arg3
, params
);
179 params
+= sizeof(int32_t);
180 get_user_s32(arg4
, params
);
181 params
+= sizeof(int32_t);
182 get_user_s32(arg5
, params
);
183 params
+= sizeof(int32_t);
184 get_user_s32(arg6
, params
);
185 params
+= sizeof(int32_t);
186 get_user_s32(arg7
, params
);
187 params
+= sizeof(int32_t);
188 get_user_s32(arg8
, params
);
189 env
->regs
[R_EAX
] = do_freebsd_syscall(env
,
199 } else { //if (bsd_type == target_openbsd)
200 env
->regs
[R_EAX
] = do_openbsd_syscall(env
,
209 if (((abi_ulong
)env
->regs
[R_EAX
]) >= (abi_ulong
)(-515)) {
210 env
->regs
[R_EAX
] = -env
->regs
[R_EAX
];
213 env
->eflags
&= ~CC_C
;
218 /* syscall from syscall instruction */
219 if (bsd_type
== target_freebsd
)
220 env
->regs
[R_EAX
] = do_freebsd_syscall(env
,
228 else { //if (bsd_type == target_openbsd)
229 env
->regs
[R_EAX
] = do_openbsd_syscall(env
,
238 env
->eip
= env
->exception_next_eip
;
239 if (((abi_ulong
)env
->regs
[R_EAX
]) >= (abi_ulong
)(-515)) {
240 env
->regs
[R_EAX
] = -env
->regs
[R_EAX
];
243 env
->eflags
&= ~CC_C
;
250 info
.si_signo
= SIGBUS
;
252 info
.si_code
= TARGET_SI_KERNEL
;
253 info
._sifields
._sigfault
._addr
= 0;
254 queue_signal(env
, info
.si_signo
, &info
);
257 /* XXX: potential problem if ABI32 */
258 #ifndef TARGET_X86_64
259 if (env
->eflags
& VM_MASK
) {
260 handle_vm86_fault(env
);
264 info
.si_signo
= SIGSEGV
;
266 info
.si_code
= TARGET_SI_KERNEL
;
267 info
._sifields
._sigfault
._addr
= 0;
268 queue_signal(env
, info
.si_signo
, &info
);
272 info
.si_signo
= SIGSEGV
;
274 if (!(env
->error_code
& 1))
275 info
.si_code
= TARGET_SEGV_MAPERR
;
277 info
.si_code
= TARGET_SEGV_ACCERR
;
278 info
._sifields
._sigfault
._addr
= env
->cr
[2];
279 queue_signal(env
, info
.si_signo
, &info
);
282 #ifndef TARGET_X86_64
283 if (env
->eflags
& VM_MASK
) {
284 handle_vm86_trap(env
, trapnr
);
288 /* division by zero */
289 info
.si_signo
= SIGFPE
;
291 info
.si_code
= TARGET_FPE_INTDIV
;
292 info
._sifields
._sigfault
._addr
= env
->eip
;
293 queue_signal(env
, info
.si_signo
, &info
);
298 #ifndef TARGET_X86_64
299 if (env
->eflags
& VM_MASK
) {
300 handle_vm86_trap(env
, trapnr
);
304 info
.si_signo
= SIGTRAP
;
306 if (trapnr
== EXCP01_DB
) {
307 info
.si_code
= TARGET_TRAP_BRKPT
;
308 info
._sifields
._sigfault
._addr
= env
->eip
;
310 info
.si_code
= TARGET_SI_KERNEL
;
311 info
._sifields
._sigfault
._addr
= 0;
313 queue_signal(env
, info
.si_signo
, &info
);
318 #ifndef TARGET_X86_64
319 if (env
->eflags
& VM_MASK
) {
320 handle_vm86_trap(env
, trapnr
);
324 info
.si_signo
= SIGSEGV
;
326 info
.si_code
= TARGET_SI_KERNEL
;
327 info
._sifields
._sigfault
._addr
= 0;
328 queue_signal(env
, info
.si_signo
, &info
);
332 info
.si_signo
= SIGILL
;
334 info
.si_code
= TARGET_ILL_ILLOPN
;
335 info
._sifields
._sigfault
._addr
= env
->eip
;
336 queue_signal(env
, info
.si_signo
, &info
);
340 /* just indicate that signals should be handled asap */
347 sig
= gdb_handlesig (env
, TARGET_SIGTRAP
);
352 info
.si_code
= TARGET_TRAP_BRKPT
;
353 queue_signal(env
, info
.si_signo
, &info
);
359 pc
= env
->segs
[R_CS
].base
+ env
->eip
;
360 fprintf(stderr
, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
364 process_pending_signals(env
);
370 #define SPARC64_STACK_BIAS 2047
373 /* WARNING: dealing with register windows _is_ complicated. More info
374 can be found at http://www.sics.se/~psm/sparcstack.html */
375 static inline int get_reg_index(CPUSPARCState
*env
, int cwp
, int index
)
377 index
= (index
+ cwp
* 16) % (16 * env
->nwindows
);
378 /* wrap handling : if cwp is on the last window, then we use the
379 registers 'after' the end */
380 if (index
< 8 && env
->cwp
== env
->nwindows
- 1)
381 index
+= 16 * env
->nwindows
;
385 /* save the register window 'cwp1' */
386 static inline void save_window_offset(CPUSPARCState
*env
, int cwp1
)
391 sp_ptr
= env
->regbase
[get_reg_index(env
, cwp1
, 6)];
392 #ifdef TARGET_SPARC64
394 sp_ptr
+= SPARC64_STACK_BIAS
;
396 #if defined(DEBUG_WIN)
397 printf("win_overflow: sp_ptr=0x" TARGET_ABI_FMT_lx
" save_cwp=%d\n",
400 for(i
= 0; i
< 16; i
++) {
401 /* FIXME - what to do if put_user() fails? */
402 put_user_ual(env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)], sp_ptr
);
403 sp_ptr
+= sizeof(abi_ulong
);
407 static void save_window(CPUSPARCState
*env
)
409 #ifndef TARGET_SPARC64
410 unsigned int new_wim
;
411 new_wim
= ((env
->wim
>> 1) | (env
->wim
<< (env
->nwindows
- 1))) &
412 ((1LL << env
->nwindows
) - 1);
413 save_window_offset(env
, cpu_cwp_dec(env
, env
->cwp
- 2));
417 * cansave is zero if the spill trap handler is triggered by `save` and
418 * nonzero if triggered by a `flushw`
420 save_window_offset(env
, cpu_cwp_dec(env
, env
->cwp
- env
->cansave
- 2));
426 static void restore_window(CPUSPARCState
*env
)
428 #ifndef TARGET_SPARC64
429 unsigned int new_wim
;
431 unsigned int i
, cwp1
;
434 #ifndef TARGET_SPARC64
435 new_wim
= ((env
->wim
<< 1) | (env
->wim
>> (env
->nwindows
- 1))) &
436 ((1LL << env
->nwindows
) - 1);
439 /* restore the invalid window */
440 cwp1
= cpu_cwp_inc(env
, env
->cwp
+ 1);
441 sp_ptr
= env
->regbase
[get_reg_index(env
, cwp1
, 6)];
442 #ifdef TARGET_SPARC64
444 sp_ptr
+= SPARC64_STACK_BIAS
;
446 #if defined(DEBUG_WIN)
447 printf("win_underflow: sp_ptr=0x" TARGET_ABI_FMT_lx
" load_cwp=%d\n",
450 for(i
= 0; i
< 16; i
++) {
451 /* FIXME - what to do if get_user() fails? */
452 get_user_ual(env
->regbase
[get_reg_index(env
, cwp1
, 8 + i
)], sp_ptr
);
453 sp_ptr
+= sizeof(abi_ulong
);
455 #ifdef TARGET_SPARC64
457 if (env
->cleanwin
< env
->nwindows
- 1)
465 static void flush_windows(CPUSPARCState
*env
)
471 /* if restore would invoke restore_window(), then we can stop */
472 cwp1
= cpu_cwp_inc(env
, env
->cwp
+ offset
);
473 #ifndef TARGET_SPARC64
474 if (env
->wim
& (1 << cwp1
))
477 if (env
->canrestore
== 0)
482 save_window_offset(env
, cwp1
);
485 cwp1
= cpu_cwp_inc(env
, env
->cwp
+ 1);
486 #ifndef TARGET_SPARC64
487 /* set wim so that restore will reload the registers */
488 env
->wim
= 1 << cwp1
;
490 #if defined(DEBUG_WIN)
491 printf("flush_windows: nb=%d\n", offset
- 1);
495 void cpu_loop(CPUSPARCState
*env
)
497 CPUState
*cs
= env_cpu(env
);
498 int trapnr
, ret
, syscall_nr
;
499 //target_siginfo_t info;
503 trapnr
= cpu_exec(cs
);
505 process_queued_cpu_work(cs
);
508 #ifndef TARGET_SPARC64
511 /* FreeBSD uses 0x141 for syscalls too */
513 if (bsd_type
!= target_freebsd
)
518 syscall_nr
= env
->gregs
[1];
519 if (bsd_type
== target_freebsd
)
520 ret
= do_freebsd_syscall(env
, syscall_nr
,
521 env
->regwptr
[0], env
->regwptr
[1],
522 env
->regwptr
[2], env
->regwptr
[3],
523 env
->regwptr
[4], env
->regwptr
[5], 0, 0);
524 else if (bsd_type
== target_netbsd
)
525 ret
= do_netbsd_syscall(env
, syscall_nr
,
526 env
->regwptr
[0], env
->regwptr
[1],
527 env
->regwptr
[2], env
->regwptr
[3],
528 env
->regwptr
[4], env
->regwptr
[5]);
529 else { //if (bsd_type == target_openbsd)
530 #if defined(TARGET_SPARC64)
531 syscall_nr
&= ~(TARGET_OPENBSD_SYSCALL_G7RFLAG
|
532 TARGET_OPENBSD_SYSCALL_G2RFLAG
);
534 ret
= do_openbsd_syscall(env
, syscall_nr
,
535 env
->regwptr
[0], env
->regwptr
[1],
536 env
->regwptr
[2], env
->regwptr
[3],
537 env
->regwptr
[4], env
->regwptr
[5]);
539 if ((unsigned int)ret
>= (unsigned int)(-515)) {
541 #if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
542 env
->xcc
|= PSR_CARRY
;
544 env
->psr
|= PSR_CARRY
;
547 #if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
548 env
->xcc
&= ~PSR_CARRY
;
550 env
->psr
&= ~PSR_CARRY
;
553 env
->regwptr
[0] = ret
;
554 /* next instruction */
555 #if defined(TARGET_SPARC64)
556 if (bsd_type
== target_openbsd
&&
557 env
->gregs
[1] & TARGET_OPENBSD_SYSCALL_G2RFLAG
) {
558 env
->pc
= env
->gregs
[2];
559 env
->npc
= env
->pc
+ 4;
560 } else if (bsd_type
== target_openbsd
&&
561 env
->gregs
[1] & TARGET_OPENBSD_SYSCALL_G7RFLAG
) {
562 env
->pc
= env
->gregs
[7];
563 env
->npc
= env
->pc
+ 4;
566 env
->npc
= env
->npc
+ 4;
570 env
->npc
= env
->npc
+ 4;
573 case 0x83: /* flush windows */
578 /* next instruction */
580 env
->npc
= env
->npc
+ 4;
582 #ifndef TARGET_SPARC64
583 case TT_WIN_OVF
: /* window overflow */
586 case TT_WIN_UNF
: /* window underflow */
593 info
.si_signo
= SIGSEGV
;
595 /* XXX: check env->error_code */
596 info
.si_code
= TARGET_SEGV_MAPERR
;
597 info
._sifields
._sigfault
._addr
= env
->mmuregs
[4];
598 queue_signal(env
, info
.si_signo
, &info
);
603 case TT_SPILL
: /* window overflow */
606 case TT_FILL
: /* window underflow */
613 info
.si_signo
= SIGSEGV
;
615 /* XXX: check env->error_code */
616 info
.si_code
= TARGET_SEGV_MAPERR
;
617 if (trapnr
== TT_DFAULT
)
618 info
._sifields
._sigfault
._addr
= env
->dmmuregs
[4];
620 info
._sifields
._sigfault
._addr
= env
->tsptr
->tpc
;
621 //queue_signal(env, info.si_signo, &info);
627 /* just indicate that signals should be handled asap */
634 gdb_handlesig(cs
, TARGET_SIGTRAP
);
640 info
.si_code
= TARGET_TRAP_BRKPT
;
641 //queue_signal(env, info.si_signo, &info);
647 #ifdef TARGET_SPARC64
650 printf ("Unhandled trap: 0x%x\n", trapnr
);
651 cpu_dump_state(cs
, stderr
, 0);
654 process_pending_signals (env
);
660 static void usage(void)
662 printf("qemu-" TARGET_NAME
" version " QEMU_FULL_VERSION
663 "\n" QEMU_COPYRIGHT
"\n"
664 "usage: qemu-" TARGET_NAME
" [options] program [arguments...]\n"
665 "BSD CPU emulator (compiled for %s emulation)\n"
667 "Standard options:\n"
668 "-h print this help\n"
669 "-g port wait gdb connection to port\n"
670 "-L path set the elf interpreter prefix (default=%s)\n"
671 "-s size set the stack size in bytes (default=%ld)\n"
672 "-cpu model select CPU (-cpu help for list)\n"
673 "-drop-ld-preload drop LD_PRELOAD for target process\n"
674 "-E var=value sets/modifies targets environment variable(s)\n"
675 "-U var unsets targets environment variable(s)\n"
676 "-B address set guest_base address to address\n"
677 "-bsd type select emulated BSD type FreeBSD/NetBSD/OpenBSD (default)\n"
680 "-d item1[,...] enable logging of specified items\n"
681 " (use '-d help' for a list of log items)\n"
682 "-D logfile write logs to 'logfile' (default stderr)\n"
683 "-p pagesize set the host page size to 'pagesize'\n"
684 "-singlestep always run in singlestep mode\n"
685 "-strace log system calls\n"
686 "-trace [[enable=]<pattern>][,events=<file>][,file=<file>]\n"
687 " specify tracing options\n"
689 "Environment variables:\n"
690 "QEMU_STRACE Print system calls and arguments similar to the\n"
691 " 'strace' program. Enable by setting to any value.\n"
692 "You can use -E and -U options to set/unset environment variables\n"
693 "for target process. It is possible to provide several variables\n"
694 "by repeating the option. For example:\n"
695 " -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n"
696 "Note that if you provide several changes to single variable\n"
697 "last change will stay in effect.\n"
699 QEMU_HELP_BOTTOM
"\n"
707 THREAD CPUState
*thread_cpu
;
709 bool qemu_cpu_is_self(CPUState
*cpu
)
711 return thread_cpu
== cpu
;
714 void qemu_cpu_kick(CPUState
*cpu
)
719 /* Assumes contents are already zeroed. */
720 void init_task_state(TaskState
*ts
)
725 ts
->first_free
= ts
->sigqueue_table
;
726 for (i
= 0; i
< MAX_SIGQUEUE_SIZE
- 1; i
++) {
727 ts
->sigqueue_table
[i
].next
= &ts
->sigqueue_table
[i
+ 1];
729 ts
->sigqueue_table
[i
].next
= NULL
;
732 int main(int argc
, char **argv
)
734 const char *filename
;
735 const char *cpu_model
;
736 const char *cpu_type
;
737 const char *log_file
= NULL
;
738 const char *log_mask
= NULL
;
739 struct target_pt_regs regs1
, *regs
= ®s1
;
740 struct image_info info1
, *info
= &info1
;
741 TaskState ts1
, *ts
= &ts1
;
746 const char *gdbstub
= NULL
;
747 char **target_environ
, **wrk
;
748 envlist_t
*envlist
= NULL
;
749 bsd_type
= target_openbsd
;
755 module_call_init(MODULE_INIT_TRACE
);
756 qemu_init_cpu_list();
757 module_call_init(MODULE_INIT_QOM
);
759 envlist
= envlist_create();
761 /* add current environment into the list */
762 for (wrk
= environ
; *wrk
!= NULL
; wrk
++) {
763 (void) envlist_setenv(envlist
, *wrk
);
768 qemu_add_opts(&qemu_trace_opts
);
779 if (!strcmp(r
, "-")) {
781 } else if (!strcmp(r
, "d")) {
782 if (optind
>= argc
) {
785 log_mask
= argv
[optind
++];
786 } else if (!strcmp(r
, "D")) {
787 if (optind
>= argc
) {
790 log_file
= argv
[optind
++];
791 } else if (!strcmp(r
, "E")) {
793 if (envlist_setenv(envlist
, r
) != 0)
795 } else if (!strcmp(r
, "ignore-environment")) {
796 envlist_free(envlist
);
797 envlist
= envlist_create();
798 } else if (!strcmp(r
, "U")) {
800 if (envlist_unsetenv(envlist
, r
) != 0)
802 } else if (!strcmp(r
, "s")) {
804 x86_stack_size
= strtol(r
, (char **)&r
, 0);
805 if (x86_stack_size
<= 0)
808 x86_stack_size
*= MiB
;
809 else if (*r
== 'k' || *r
== 'K')
810 x86_stack_size
*= KiB
;
811 } else if (!strcmp(r
, "L")) {
812 interp_prefix
= argv
[optind
++];
813 } else if (!strcmp(r
, "p")) {
814 qemu_host_page_size
= atoi(argv
[optind
++]);
815 if (qemu_host_page_size
== 0 ||
816 (qemu_host_page_size
& (qemu_host_page_size
- 1)) != 0) {
817 fprintf(stderr
, "page size must be a power of two\n");
820 } else if (!strcmp(r
, "g")) {
821 gdbstub
= g_strdup(argv
[optind
++]);
822 } else if (!strcmp(r
, "r")) {
823 qemu_uname_release
= argv
[optind
++];
824 } else if (!strcmp(r
, "cpu")) {
825 cpu_model
= argv
[optind
++];
826 if (is_help_option(cpu_model
)) {
827 /* XXX: implement xxx_cpu_list for targets that still miss it */
828 #if defined(cpu_list)
833 } else if (!strcmp(r
, "B")) {
834 guest_base
= strtol(argv
[optind
++], NULL
, 0);
835 have_guest_base
= true;
836 } else if (!strcmp(r
, "drop-ld-preload")) {
837 (void) envlist_unsetenv(envlist
, "LD_PRELOAD");
838 } else if (!strcmp(r
, "bsd")) {
839 if (!strcasecmp(argv
[optind
], "freebsd")) {
840 bsd_type
= target_freebsd
;
841 } else if (!strcasecmp(argv
[optind
], "netbsd")) {
842 bsd_type
= target_netbsd
;
843 } else if (!strcasecmp(argv
[optind
], "openbsd")) {
844 bsd_type
= target_openbsd
;
849 } else if (!strcmp(r
, "singlestep")) {
851 } else if (!strcmp(r
, "strace")) {
853 } else if (!strcmp(r
, "trace")) {
854 trace_opt_parse(optarg
);
861 qemu_log_needs_buffers();
862 qemu_set_log_filename(log_file
, &error_fatal
);
866 mask
= qemu_str_to_log_mask(log_mask
);
868 qemu_print_log_usage(stdout
);
874 if (optind
>= argc
) {
877 filename
= argv
[optind
];
879 if (!trace_init_backends()) {
885 memset(regs
, 0, sizeof(struct target_pt_regs
));
887 /* Zero out image_info */
888 memset(info
, 0, sizeof(struct image_info
));
890 /* Scan interp_prefix dir for replacement files. */
891 init_paths(interp_prefix
);
893 if (cpu_model
== NULL
) {
894 #if defined(TARGET_I386)
896 cpu_model
= "qemu64";
898 cpu_model
= "qemu32";
900 #elif defined(TARGET_SPARC)
901 #ifdef TARGET_SPARC64
902 cpu_model
= "TI UltraSparc II";
904 cpu_model
= "Fujitsu MB86904";
911 cpu_type
= parse_cpu_option(cpu_model
);
912 /* init tcg before creating CPUs and to get qemu_host_page_size */
914 AccelClass
*ac
= ACCEL_GET_CLASS(current_accel());
916 ac
->init_machine(NULL
);
917 accel_init_interfaces(ac
);
919 cpu
= cpu_create(cpu_type
);
921 #if defined(TARGET_SPARC) || defined(TARGET_PPC)
926 if (getenv("QEMU_STRACE")) {
930 target_environ
= envlist_to_environ(envlist
, NULL
);
931 envlist_free(envlist
);
934 * Now that page sizes are configured in tcg_exec_init() we can do
935 * proper page alignment for guest_base.
937 guest_base
= HOST_PAGE_ALIGN(guest_base
);
940 * Read in mmap_min_addr kernel parameter. This value is used
941 * When loading the ELF image to determine whether guest_base
944 * When user has explicitly set the quest base, we skip this
947 if (!have_guest_base
) {
950 if ((fp
= fopen("/proc/sys/vm/mmap_min_addr", "r")) != NULL
) {
952 if (fscanf(fp
, "%lu", &tmp
) == 1) {
954 qemu_log_mask(CPU_LOG_PAGE
, "host mmap_min_addr=0x%lx\n", mmap_min_addr
);
960 if (loader_exec(filename
, argv
+optind
, target_environ
, regs
, info
) != 0) {
961 printf("Error loading %s\n", filename
);
965 for (wrk
= target_environ
; *wrk
; wrk
++) {
969 g_free(target_environ
);
971 if (qemu_loglevel_mask(CPU_LOG_PAGE
)) {
972 qemu_log("guest_base %p\n", (void *)guest_base
);
973 log_page_dump("binary load");
975 qemu_log("start_brk 0x" TARGET_ABI_FMT_lx
"\n", info
->start_brk
);
976 qemu_log("end_code 0x" TARGET_ABI_FMT_lx
"\n", info
->end_code
);
977 qemu_log("start_code 0x" TARGET_ABI_FMT_lx
"\n",
979 qemu_log("start_data 0x" TARGET_ABI_FMT_lx
"\n",
981 qemu_log("end_data 0x" TARGET_ABI_FMT_lx
"\n", info
->end_data
);
982 qemu_log("start_stack 0x" TARGET_ABI_FMT_lx
"\n",
984 qemu_log("brk 0x" TARGET_ABI_FMT_lx
"\n", info
->brk
);
985 qemu_log("entry 0x" TARGET_ABI_FMT_lx
"\n", info
->entry
);
988 target_set_brk(info
->brk
);
992 /* Now that we've loaded the binary, GUEST_BASE is fixed. Delay
993 generating the prologue until now so that the prologue can take
994 the real value of GUEST_BASE into account. */
995 tcg_prologue_init(tcg_ctx
);
998 /* build Task State */
999 memset(ts
, 0, sizeof(TaskState
));
1000 init_task_state(ts
);
1004 #if defined(TARGET_I386)
1005 env
->cr
[0] = CR0_PG_MASK
| CR0_WP_MASK
| CR0_PE_MASK
;
1006 env
->hflags
|= HF_PE_MASK
| HF_CPL_MASK
;
1007 if (env
->features
[FEAT_1_EDX
] & CPUID_SSE
) {
1008 env
->cr
[4] |= CR4_OSFXSR_MASK
;
1009 env
->hflags
|= HF_OSFXSR_MASK
;
1011 #ifndef TARGET_ABI32
1012 /* enable 64 bit mode if possible */
1013 if (!(env
->features
[FEAT_8000_0001_EDX
] & CPUID_EXT2_LM
)) {
1014 fprintf(stderr
, "The selected x86 CPU does not support 64 bit mode\n");
1017 env
->cr
[4] |= CR4_PAE_MASK
;
1018 env
->efer
|= MSR_EFER_LMA
| MSR_EFER_LME
;
1019 env
->hflags
|= HF_LMA_MASK
;
1022 /* flags setup : we activate the IRQs by default as in user mode */
1023 env
->eflags
|= IF_MASK
;
1025 /* linux register setup */
1026 #ifndef TARGET_ABI32
1027 env
->regs
[R_EAX
] = regs
->rax
;
1028 env
->regs
[R_EBX
] = regs
->rbx
;
1029 env
->regs
[R_ECX
] = regs
->rcx
;
1030 env
->regs
[R_EDX
] = regs
->rdx
;
1031 env
->regs
[R_ESI
] = regs
->rsi
;
1032 env
->regs
[R_EDI
] = regs
->rdi
;
1033 env
->regs
[R_EBP
] = regs
->rbp
;
1034 env
->regs
[R_ESP
] = regs
->rsp
;
1035 env
->eip
= regs
->rip
;
1037 env
->regs
[R_EAX
] = regs
->eax
;
1038 env
->regs
[R_EBX
] = regs
->ebx
;
1039 env
->regs
[R_ECX
] = regs
->ecx
;
1040 env
->regs
[R_EDX
] = regs
->edx
;
1041 env
->regs
[R_ESI
] = regs
->esi
;
1042 env
->regs
[R_EDI
] = regs
->edi
;
1043 env
->regs
[R_EBP
] = regs
->ebp
;
1044 env
->regs
[R_ESP
] = regs
->esp
;
1045 env
->eip
= regs
->eip
;
1048 /* linux interrupt setup */
1049 #ifndef TARGET_ABI32
1050 env
->idt
.limit
= 511;
1052 env
->idt
.limit
= 255;
1054 env
->idt
.base
= target_mmap(0, sizeof(uint64_t) * (env
->idt
.limit
+ 1),
1055 PROT_READ
|PROT_WRITE
,
1056 MAP_ANONYMOUS
|MAP_PRIVATE
, -1, 0);
1057 idt_table
= g2h_untagged(env
->idt
.base
);
1080 /* linux segment setup */
1082 uint64_t *gdt_table
;
1083 env
->gdt
.base
= target_mmap(0, sizeof(uint64_t) * TARGET_GDT_ENTRIES
,
1084 PROT_READ
|PROT_WRITE
,
1085 MAP_ANONYMOUS
|MAP_PRIVATE
, -1, 0);
1086 env
->gdt
.limit
= sizeof(uint64_t) * TARGET_GDT_ENTRIES
- 1;
1087 gdt_table
= g2h_untagged(env
->gdt
.base
);
1089 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1090 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1091 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1093 /* 64 bit code segment */
1094 write_dt(&gdt_table
[__USER_CS
>> 3], 0, 0xfffff,
1095 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1097 (3 << DESC_DPL_SHIFT
) | (0xa << DESC_TYPE_SHIFT
));
1099 write_dt(&gdt_table
[__USER_DS
>> 3], 0, 0xfffff,
1100 DESC_G_MASK
| DESC_B_MASK
| DESC_P_MASK
| DESC_S_MASK
|
1101 (3 << DESC_DPL_SHIFT
) | (0x2 << DESC_TYPE_SHIFT
));
1104 cpu_x86_load_seg(env
, R_CS
, __USER_CS
);
1105 cpu_x86_load_seg(env
, R_SS
, __USER_DS
);
1107 cpu_x86_load_seg(env
, R_DS
, __USER_DS
);
1108 cpu_x86_load_seg(env
, R_ES
, __USER_DS
);
1109 cpu_x86_load_seg(env
, R_FS
, __USER_DS
);
1110 cpu_x86_load_seg(env
, R_GS
, __USER_DS
);
1111 /* This hack makes Wine work... */
1112 env
->segs
[R_FS
].selector
= 0;
1114 cpu_x86_load_seg(env
, R_DS
, 0);
1115 cpu_x86_load_seg(env
, R_ES
, 0);
1116 cpu_x86_load_seg(env
, R_FS
, 0);
1117 cpu_x86_load_seg(env
, R_GS
, 0);
1119 #elif defined(TARGET_SPARC)
1123 env
->npc
= regs
->npc
;
1125 for(i
= 0; i
< 8; i
++)
1126 env
->gregs
[i
] = regs
->u_regs
[i
];
1127 for(i
= 0; i
< 8; i
++)
1128 env
->regwptr
[i
] = regs
->u_regs
[i
+ 8];
1131 #error unsupported target CPU
1135 gdbserver_start(gdbstub
);
1136 gdb_handlesig(cpu
, 0);