1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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>
27
28#include "qapi/error.h"
29#include "qemu.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"
36#include "tcg/tcg.h"
37#include "qemu/timer.h"
38#include "qemu/envlist.h"
39#include "qemu/cutils.h"
40#include "exec/log.h"
41#include "trace/control.h"
42
43int singlestep;
44unsigned long mmap_min_addr;
45uintptr_t guest_base;
46bool have_guest_base;
47unsigned long reserved_va;
48
49static const char *interp_prefix = CONFIG_QEMU_INTERP_PREFIX;
50const char *qemu_uname_release;
51enum BSDType bsd_type;
52
53
54
55
56
57
58unsigned long x86_stack_size = 512 * 1024;
59
60void gemu_log(const char *fmt, ...)
61{
62 va_list ap;
63
64 va_start(ap, fmt);
65 vfprintf(stderr, fmt, ap);
66 va_end(ap);
67}
68
69#if defined(TARGET_I386)
70int cpu_get_pic_interrupt(CPUX86State *env)
71{
72 return -1;
73}
74#endif
75
76void fork_start(void)
77{
78}
79
80void fork_end(int child)
81{
82 if (child) {
83 gdbserver_fork(thread_cpu);
84 }
85}
86
87#ifdef TARGET_I386
88
89
90
91uint64_t cpu_get_tsc(CPUX86State *env)
92{
93 return cpu_get_host_ticks();
94}
95
96static void write_dt(void *ptr, unsigned long addr, unsigned long limit,
97 int flags)
98{
99 unsigned int e1, e2;
100 uint32_t *p;
101 e1 = (addr << 16) | (limit & 0xffff);
102 e2 = ((addr >> 16) & 0xff) | (addr & 0xff000000) | (limit & 0x000f0000);
103 e2 |= flags;
104 p = ptr;
105 p[0] = tswap32(e1);
106 p[1] = tswap32(e2);
107}
108
109static uint64_t *idt_table;
110#ifdef TARGET_X86_64
111static void set_gate64(void *ptr, unsigned int type, unsigned int dpl,
112 uint64_t addr, unsigned int sel)
113{
114 uint32_t *p, e1, e2;
115 e1 = (addr & 0xffff) | (sel << 16);
116 e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
117 p = ptr;
118 p[0] = tswap32(e1);
119 p[1] = tswap32(e2);
120 p[2] = tswap32(addr >> 32);
121 p[3] = 0;
122}
123
124static void set_idt(int n, unsigned int dpl)
125{
126 set_gate64(idt_table + n * 2, 0, dpl, 0, 0);
127}
128#else
129static void set_gate(void *ptr, unsigned int type, unsigned int dpl,
130 uint32_t addr, unsigned int sel)
131{
132 uint32_t *p, e1, e2;
133 e1 = (addr & 0xffff) | (sel << 16);
134 e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
135 p = ptr;
136 p[0] = tswap32(e1);
137 p[1] = tswap32(e2);
138}
139
140
141static void set_idt(int n, unsigned int dpl)
142{
143 set_gate(idt_table + n, 0, dpl, 0, 0);
144}
145#endif
146
147void cpu_loop(CPUX86State *env)
148{
149 CPUState *cs = env_cpu(env);
150 int trapnr;
151 abi_ulong pc;
152
153
154 for (;;) {
155 cpu_exec_start(cs);
156 trapnr = cpu_exec(cs);
157 cpu_exec_end(cs);
158 process_queued_cpu_work(cs);
159
160 switch (trapnr) {
161 case 0x80:
162
163 if (bsd_type == target_freebsd) {
164 abi_ulong params = (abi_ulong) env->regs[R_ESP] +
165 sizeof(int32_t);
166 int32_t syscall_nr = env->regs[R_EAX];
167 int32_t arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8;
168
169 if (syscall_nr == TARGET_FREEBSD_NR_syscall) {
170 get_user_s32(syscall_nr, params);
171 params += sizeof(int32_t);
172 } else if (syscall_nr == TARGET_FREEBSD_NR___syscall) {
173 get_user_s32(syscall_nr, params);
174 params += sizeof(int64_t);
175 }
176 get_user_s32(arg1, params);
177 params += sizeof(int32_t);
178 get_user_s32(arg2, params);
179 params += sizeof(int32_t);
180 get_user_s32(arg3, params);
181 params += sizeof(int32_t);
182 get_user_s32(arg4, params);
183 params += sizeof(int32_t);
184 get_user_s32(arg5, params);
185 params += sizeof(int32_t);
186 get_user_s32(arg6, params);
187 params += sizeof(int32_t);
188 get_user_s32(arg7, params);
189 params += sizeof(int32_t);
190 get_user_s32(arg8, params);
191 env->regs[R_EAX] = do_freebsd_syscall(env,
192 syscall_nr,
193 arg1,
194 arg2,
195 arg3,
196 arg4,
197 arg5,
198 arg6,
199 arg7,
200 arg8);
201 } else {
202 env->regs[R_EAX] = do_openbsd_syscall(env,
203 env->regs[R_EAX],
204 env->regs[R_EBX],
205 env->regs[R_ECX],
206 env->regs[R_EDX],
207 env->regs[R_ESI],
208 env->regs[R_EDI],
209 env->regs[R_EBP]);
210 }
211 if (((abi_ulong)env->regs[R_EAX]) >= (abi_ulong)(-515)) {
212 env->regs[R_EAX] = -env->regs[R_EAX];
213 env->eflags |= CC_C;
214 } else {
215 env->eflags &= ~CC_C;
216 }
217 break;
218#ifndef TARGET_ABI32
219 case EXCP_SYSCALL:
220
221 if (bsd_type == target_freebsd) {
222 env->regs[R_EAX] = do_freebsd_syscall(env,
223 env->regs[R_EAX],
224 env->regs[R_EDI],
225 env->regs[R_ESI],
226 env->regs[R_EDX],
227 env->regs[R_ECX],
228 env->regs[8],
229 env->regs[9], 0, 0);
230 } else {
231 env->regs[R_EAX] = do_openbsd_syscall(env,
232 env->regs[R_EAX],
233 env->regs[R_EDI],
234 env->regs[R_ESI],
235 env->regs[R_EDX],
236 env->regs[10],
237 env->regs[8],
238 env->regs[9]);
239 }
240 env->eip = env->exception_next_eip;
241 if (((abi_ulong)env->regs[R_EAX]) >= (abi_ulong)(-515)) {
242 env->regs[R_EAX] = -env->regs[R_EAX];
243 env->eflags |= CC_C;
244 } else {
245 env->eflags &= ~CC_C;
246 }
247 break;
248#endif
249 case EXCP_INTERRUPT:
250
251 break;
252 default:
253 pc = env->segs[R_CS].base + env->eip;
254 fprintf(stderr,
255 "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
256 (long)pc, trapnr);
257 abort();
258 }
259 process_pending_signals(env);
260 }
261}
262#endif
263
264#ifdef TARGET_SPARC
265#define SPARC64_STACK_BIAS 2047
266
267
268
269
270
271
272static inline int get_reg_index(CPUSPARCState *env, int cwp, int index)
273{
274 index = (index + cwp * 16) % (16 * env->nwindows);
275
276
277
278
279 if (index < 8 && env->cwp == env->nwindows - 1) {
280 index += 16 * env->nwindows;
281 }
282 return index;
283}
284
285
286static inline void save_window_offset(CPUSPARCState *env, int cwp1)
287{
288 unsigned int i;
289 abi_ulong sp_ptr;
290
291 sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
292#ifdef TARGET_SPARC64
293 if (sp_ptr & 3) {
294 sp_ptr += SPARC64_STACK_BIAS;
295 }
296#endif
297#if defined(DEBUG_WIN)
298 printf("win_overflow: sp_ptr=0x" TARGET_ABI_FMT_lx " save_cwp=%d\n",
299 sp_ptr, cwp1);
300#endif
301 for (i = 0; i < 16; i++) {
302
303 put_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
304 sp_ptr += sizeof(abi_ulong);
305 }
306}
307
308static void save_window(CPUSPARCState *env)
309{
310#ifndef TARGET_SPARC64
311 unsigned int new_wim;
312 new_wim = ((env->wim >> 1) | (env->wim << (env->nwindows - 1))) &
313 ((1LL << env->nwindows) - 1);
314 save_window_offset(env, cpu_cwp_dec(env, env->cwp - 2));
315 env->wim = new_wim;
316#else
317
318
319
320
321 save_window_offset(env, cpu_cwp_dec(env, env->cwp - env->cansave - 2));
322 env->cansave++;
323 env->canrestore--;
324#endif
325}
326
327static void restore_window(CPUSPARCState *env)
328{
329#ifndef TARGET_SPARC64
330 unsigned int new_wim;
331#endif
332 unsigned int i, cwp1;
333 abi_ulong sp_ptr;
334
335#ifndef TARGET_SPARC64
336 new_wim = ((env->wim << 1) | (env->wim >> (env->nwindows - 1))) &
337 ((1LL << env->nwindows) - 1);
338#endif
339
340
341 cwp1 = cpu_cwp_inc(env, env->cwp + 1);
342 sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
343#ifdef TARGET_SPARC64
344 if (sp_ptr & 3) {
345 sp_ptr += SPARC64_STACK_BIAS;
346 }
347#endif
348#if defined(DEBUG_WIN)
349 printf("win_underflow: sp_ptr=0x" TARGET_ABI_FMT_lx " load_cwp=%d\n",
350 sp_ptr, cwp1);
351#endif
352 for (i = 0; i < 16; i++) {
353
354 get_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
355 sp_ptr += sizeof(abi_ulong);
356 }
357#ifdef TARGET_SPARC64
358 env->canrestore++;
359 if (env->cleanwin < env->nwindows - 1) {
360 env->cleanwin++;
361 }
362 env->cansave--;
363#else
364 env->wim = new_wim;
365#endif
366}
367
368static void flush_windows(CPUSPARCState *env)
369{
370 int offset, cwp1;
371
372 offset = 1;
373 for (;;) {
374
375 cwp1 = cpu_cwp_inc(env, env->cwp + offset);
376#ifndef TARGET_SPARC64
377 if (env->wim & (1 << cwp1)) {
378 break;
379 }
380#else
381 if (env->canrestore == 0) {
382 break;
383 }
384 env->cansave++;
385 env->canrestore--;
386#endif
387 save_window_offset(env, cwp1);
388 offset++;
389 }
390 cwp1 = cpu_cwp_inc(env, env->cwp + 1);
391#ifndef TARGET_SPARC64
392
393 env->wim = 1 << cwp1;
394#endif
395#if defined(DEBUG_WIN)
396 printf("flush_windows: nb=%d\n", offset - 1);
397#endif
398}
399
400void cpu_loop(CPUSPARCState *env)
401{
402 CPUState *cs = env_cpu(env);
403 int trapnr, ret, syscall_nr;
404
405
406 while (1) {
407 cpu_exec_start(cs);
408 trapnr = cpu_exec(cs);
409 cpu_exec_end(cs);
410 process_queued_cpu_work(cs);
411
412 switch (trapnr) {
413#ifndef TARGET_SPARC64
414 case 0x80:
415#else
416
417 case 0x141:
418 if (bsd_type != target_freebsd) {
419 goto badtrap;
420 }
421
422 case 0x100:
423#endif
424 syscall_nr = env->gregs[1];
425 if (bsd_type == target_freebsd)
426 ret = do_freebsd_syscall(env, syscall_nr,
427 env->regwptr[0], env->regwptr[1],
428 env->regwptr[2], env->regwptr[3],
429 env->regwptr[4], env->regwptr[5],
430 0, 0);
431 else if (bsd_type == target_netbsd)
432 ret = do_netbsd_syscall(env, syscall_nr,
433 env->regwptr[0], env->regwptr[1],
434 env->regwptr[2], env->regwptr[3],
435 env->regwptr[4], env->regwptr[5]);
436 else {
437#if defined(TARGET_SPARC64)
438 syscall_nr &= ~(TARGET_OPENBSD_SYSCALL_G7RFLAG |
439 TARGET_OPENBSD_SYSCALL_G2RFLAG);
440#endif
441 ret = do_openbsd_syscall(env, syscall_nr,
442 env->regwptr[0], env->regwptr[1],
443 env->regwptr[2], env->regwptr[3],
444 env->regwptr[4], env->regwptr[5]);
445 }
446 if ((unsigned int)ret >= (unsigned int)(-515)) {
447 ret = -ret;
448#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
449 env->xcc |= PSR_CARRY;
450#else
451 env->psr |= PSR_CARRY;
452#endif
453 } else {
454#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
455 env->xcc &= ~PSR_CARRY;
456#else
457 env->psr &= ~PSR_CARRY;
458#endif
459 }
460 env->regwptr[0] = ret;
461
462#if defined(TARGET_SPARC64)
463 if (bsd_type == target_openbsd &&
464 env->gregs[1] & TARGET_OPENBSD_SYSCALL_G2RFLAG) {
465 env->pc = env->gregs[2];
466 env->npc = env->pc + 4;
467 } else if (bsd_type == target_openbsd &&
468 env->gregs[1] & TARGET_OPENBSD_SYSCALL_G7RFLAG) {
469 env->pc = env->gregs[7];
470 env->npc = env->pc + 4;
471 } else {
472 env->pc = env->npc;
473 env->npc = env->npc + 4;
474 }
475#else
476 env->pc = env->npc;
477 env->npc = env->npc + 4;
478#endif
479 break;
480 case 0x83:
481#ifdef TARGET_ABI32
482 case 0x103:
483#endif
484 flush_windows(env);
485
486 env->pc = env->npc;
487 env->npc = env->npc + 4;
488 break;
489#ifndef TARGET_SPARC64
490 case TT_WIN_OVF:
491 save_window(env);
492 break;
493 case TT_WIN_UNF:
494 restore_window(env);
495 break;
496 case TT_TFAULT:
497 case TT_DFAULT:
498 break;
499#else
500 case TT_SPILL:
501 save_window(env);
502 break;
503 case TT_FILL:
504 restore_window(env);
505 break;
506 case TT_TFAULT:
507 case TT_DFAULT:
508 break;
509#endif
510 case EXCP_INTERRUPT:
511
512 break;
513 case EXCP_DEBUG:
514 {
515 gdb_handlesig(cs, TARGET_SIGTRAP);
516 }
517 break;
518 default:
519#ifdef TARGET_SPARC64
520 badtrap:
521#endif
522 printf("Unhandled trap: 0x%x\n", trapnr);
523 cpu_dump_state(cs, stderr, 0);
524 exit(1);
525 }
526 process_pending_signals(env);
527 }
528}
529
530#endif
531
532static void usage(void)
533{
534 printf("qemu-" TARGET_NAME " version " QEMU_FULL_VERSION
535 "\n" QEMU_COPYRIGHT "\n"
536 "usage: qemu-" TARGET_NAME " [options] program [arguments...]\n"
537 "BSD CPU emulator (compiled for %s emulation)\n"
538 "\n"
539 "Standard options:\n"
540 "-h print this help\n"
541 "-g port wait gdb connection to port\n"
542 "-L path set the elf interpreter prefix (default=%s)\n"
543 "-s size set the stack size in bytes (default=%ld)\n"
544 "-cpu model select CPU (-cpu help for list)\n"
545 "-drop-ld-preload drop LD_PRELOAD for target process\n"
546 "-E var=value sets/modifies targets environment variable(s)\n"
547 "-U var unsets targets environment variable(s)\n"
548 "-B address set guest_base address to address\n"
549 "-bsd type select emulated BSD type FreeBSD/NetBSD/OpenBSD (default)\n"
550 "\n"
551 "Debug options:\n"
552 "-d item1[,...] enable logging of specified items\n"
553 " (use '-d help' for a list of log items)\n"
554 "-D logfile write logs to 'logfile' (default stderr)\n"
555 "-p pagesize set the host page size to 'pagesize'\n"
556 "-singlestep always run in singlestep mode\n"
557 "-strace log system calls\n"
558 "-trace [[enable=]<pattern>][,events=<file>][,file=<file>]\n"
559 " specify tracing options\n"
560 "\n"
561 "Environment variables:\n"
562 "QEMU_STRACE Print system calls and arguments similar to the\n"
563 " 'strace' program. Enable by setting to any value.\n"
564 "You can use -E and -U options to set/unset environment variables\n"
565 "for target process. It is possible to provide several variables\n"
566 "by repeating the option. For example:\n"
567 " -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n"
568 "Note that if you provide several changes to single variable\n"
569 "last change will stay in effect.\n"
570 "\n"
571 QEMU_HELP_BOTTOM "\n"
572 ,
573 TARGET_NAME,
574 interp_prefix,
575 x86_stack_size);
576 exit(1);
577}
578
579THREAD CPUState *thread_cpu;
580
581bool qemu_cpu_is_self(CPUState *cpu)
582{
583 return thread_cpu == cpu;
584}
585
586void qemu_cpu_kick(CPUState *cpu)
587{
588 cpu_exit(cpu);
589}
590
591
592void init_task_state(TaskState *ts)
593{
594 int i;
595
596 ts->used = 1;
597 ts->first_free = ts->sigqueue_table;
598 for (i = 0; i < MAX_SIGQUEUE_SIZE - 1; i++) {
599 ts->sigqueue_table[i].next = &ts->sigqueue_table[i + 1];
600 }
601 ts->sigqueue_table[i].next = NULL;
602}
603
604int main(int argc, char **argv)
605{
606 const char *filename;
607 const char *cpu_model;
608 const char *cpu_type;
609 const char *log_file = NULL;
610 const char *log_mask = NULL;
611 struct target_pt_regs regs1, *regs = ®s1;
612 struct image_info info1, *info = &info1;
613 TaskState ts1, *ts = &ts1;
614 CPUArchState *env;
615 CPUState *cpu;
616 int optind, rv;
617 const char *r;
618 const char *gdbstub = NULL;
619 char **target_environ, **wrk;
620 envlist_t *envlist = NULL;
621 bsd_type = target_openbsd;
622
623 if (argc <= 1) {
624 usage();
625 }
626
627 error_init(argv[0]);
628 module_call_init(MODULE_INIT_TRACE);
629 qemu_init_cpu_list();
630 module_call_init(MODULE_INIT_QOM);
631
632 envlist = envlist_create();
633
634
635 for (wrk = environ; *wrk != NULL; wrk++) {
636 (void) envlist_setenv(envlist, *wrk);
637 }
638
639 cpu_model = NULL;
640
641 qemu_add_opts(&qemu_trace_opts);
642
643 optind = 1;
644 for (;;) {
645 if (optind >= argc) {
646 break;
647 }
648 r = argv[optind];
649 if (r[0] != '-') {
650 break;
651 }
652 optind++;
653 r++;
654 if (!strcmp(r, "-")) {
655 break;
656 } else if (!strcmp(r, "d")) {
657 if (optind >= argc) {
658 break;
659 }
660 log_mask = argv[optind++];
661 } else if (!strcmp(r, "D")) {
662 if (optind >= argc) {
663 break;
664 }
665 log_file = argv[optind++];
666 } else if (!strcmp(r, "E")) {
667 r = argv[optind++];
668 if (envlist_setenv(envlist, r) != 0) {
669 usage();
670 }
671 } else if (!strcmp(r, "ignore-environment")) {
672 envlist_free(envlist);
673 envlist = envlist_create();
674 } else if (!strcmp(r, "U")) {
675 r = argv[optind++];
676 if (envlist_unsetenv(envlist, r) != 0) {
677 usage();
678 }
679 } else if (!strcmp(r, "s")) {
680 r = argv[optind++];
681 rv = qemu_strtoul(r, &r, 0, &x86_stack_size);
682 if (rv < 0 || x86_stack_size <= 0) {
683 usage();
684 }
685 if (*r == 'M') {
686 x86_stack_size *= MiB;
687 } else if (*r == 'k' || *r == 'K') {
688 x86_stack_size *= KiB;
689 }
690 } else if (!strcmp(r, "L")) {
691 interp_prefix = argv[optind++];
692 } else if (!strcmp(r, "p")) {
693 qemu_host_page_size = atoi(argv[optind++]);
694 if (qemu_host_page_size == 0 ||
695 (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
696 fprintf(stderr, "page size must be a power of two\n");
697 exit(1);
698 }
699 } else if (!strcmp(r, "g")) {
700 gdbstub = g_strdup(argv[optind++]);
701 } else if (!strcmp(r, "r")) {
702 qemu_uname_release = argv[optind++];
703 } else if (!strcmp(r, "cpu")) {
704 cpu_model = argv[optind++];
705 if (is_help_option(cpu_model)) {
706
707#if defined(cpu_list)
708 cpu_list();
709#endif
710 exit(1);
711 }
712 } else if (!strcmp(r, "B")) {
713 rv = qemu_strtoul(argv[optind++], NULL, 0, &guest_base);
714 if (rv < 0) {
715 usage();
716 }
717 have_guest_base = true;
718 } else if (!strcmp(r, "drop-ld-preload")) {
719 (void) envlist_unsetenv(envlist, "LD_PRELOAD");
720 } else if (!strcmp(r, "bsd")) {
721 if (!strcasecmp(argv[optind], "freebsd")) {
722 bsd_type = target_freebsd;
723 } else if (!strcasecmp(argv[optind], "netbsd")) {
724 bsd_type = target_netbsd;
725 } else if (!strcasecmp(argv[optind], "openbsd")) {
726 bsd_type = target_openbsd;
727 } else {
728 usage();
729 }
730 optind++;
731 } else if (!strcmp(r, "singlestep")) {
732 singlestep = 1;
733 } else if (!strcmp(r, "strace")) {
734 do_strace = 1;
735 } else if (!strcmp(r, "trace")) {
736 trace_opt_parse(optarg);
737 } else {
738 usage();
739 }
740 }
741
742
743 qemu_log_needs_buffers();
744 qemu_set_log_filename(log_file, &error_fatal);
745 if (log_mask) {
746 int mask;
747
748 mask = qemu_str_to_log_mask(log_mask);
749 if (!mask) {
750 qemu_print_log_usage(stdout);
751 exit(1);
752 }
753 qemu_set_log(mask);
754 }
755
756 if (optind >= argc) {
757 usage();
758 }
759 filename = argv[optind];
760
761 if (!trace_init_backends()) {
762 exit(1);
763 }
764 trace_init_file();
765
766
767 memset(regs, 0, sizeof(struct target_pt_regs));
768
769
770 memset(info, 0, sizeof(struct image_info));
771
772
773 init_paths(interp_prefix);
774
775 if (cpu_model == NULL) {
776#if defined(TARGET_I386)
777#ifdef TARGET_X86_64
778 cpu_model = "qemu64";
779#else
780 cpu_model = "qemu32";
781#endif
782#elif defined(TARGET_SPARC)
783#ifdef TARGET_SPARC64
784 cpu_model = "TI UltraSparc II";
785#else
786 cpu_model = "Fujitsu MB86904";
787#endif
788#else
789 cpu_model = "any";
790#endif
791 }
792
793 cpu_type = parse_cpu_option(cpu_model);
794
795 {
796 AccelClass *ac = ACCEL_GET_CLASS(current_accel());
797
798 accel_init_interfaces(ac);
799 ac->init_machine(NULL);
800 }
801 cpu = cpu_create(cpu_type);
802 env = cpu->env_ptr;
803#if defined(TARGET_SPARC) || defined(TARGET_PPC)
804 cpu_reset(cpu);
805#endif
806 thread_cpu = cpu;
807
808 if (getenv("QEMU_STRACE")) {
809 do_strace = 1;
810 }
811
812 target_environ = envlist_to_environ(envlist, NULL);
813 envlist_free(envlist);
814
815
816
817
818
819 guest_base = HOST_PAGE_ALIGN(guest_base);
820
821
822
823
824
825
826
827
828
829 if (!have_guest_base) {
830 FILE *fp;
831
832 fp = fopen("/proc/sys/vm/mmap_min_addr", "r");
833 if (fp != NULL) {
834 unsigned long tmp;
835 if (fscanf(fp, "%lu", &tmp) == 1) {
836 mmap_min_addr = tmp;
837 qemu_log_mask(CPU_LOG_PAGE, "host mmap_min_addr=0x%lx\n",
838 mmap_min_addr);
839 }
840 fclose(fp);
841 }
842 }
843
844 if (loader_exec(filename, argv + optind, target_environ, regs, info) != 0) {
845 printf("Error loading %s\n", filename);
846 _exit(1);
847 }
848
849 for (wrk = target_environ; *wrk; wrk++) {
850 g_free(*wrk);
851 }
852
853 g_free(target_environ);
854
855 if (qemu_loglevel_mask(CPU_LOG_PAGE)) {
856 qemu_log("guest_base %p\n", (void *)guest_base);
857 log_page_dump("binary load");
858
859 qemu_log("start_brk 0x" TARGET_ABI_FMT_lx "\n", info->start_brk);
860 qemu_log("end_code 0x" TARGET_ABI_FMT_lx "\n", info->end_code);
861 qemu_log("start_code 0x" TARGET_ABI_FMT_lx "\n",
862 info->start_code);
863 qemu_log("start_data 0x" TARGET_ABI_FMT_lx "\n",
864 info->start_data);
865 qemu_log("end_data 0x" TARGET_ABI_FMT_lx "\n", info->end_data);
866 qemu_log("start_stack 0x" TARGET_ABI_FMT_lx "\n",
867 info->start_stack);
868 qemu_log("brk 0x" TARGET_ABI_FMT_lx "\n", info->brk);
869 qemu_log("entry 0x" TARGET_ABI_FMT_lx "\n", info->entry);
870 }
871
872 target_set_brk(info->brk);
873 syscall_init();
874 signal_init();
875
876
877
878
879
880
881 tcg_prologue_init(tcg_ctx);
882
883
884 memset(ts, 0, sizeof(TaskState));
885 init_task_state(ts);
886 ts->info = info;
887 cpu->opaque = ts;
888
889#if defined(TARGET_I386)
890 env->cr[0] = CR0_PG_MASK | CR0_WP_MASK | CR0_PE_MASK;
891 env->hflags |= HF_PE_MASK | HF_CPL_MASK;
892 if (env->features[FEAT_1_EDX] & CPUID_SSE) {
893 env->cr[4] |= CR4_OSFXSR_MASK;
894 env->hflags |= HF_OSFXSR_MASK;
895 }
896#ifndef TARGET_ABI32
897
898 if (!(env->features[FEAT_8000_0001_EDX] & CPUID_EXT2_LM)) {
899 fprintf(stderr, "The selected x86 CPU does not support 64 bit mode\n");
900 exit(1);
901 }
902 env->cr[4] |= CR4_PAE_MASK;
903 env->efer |= MSR_EFER_LMA | MSR_EFER_LME;
904 env->hflags |= HF_LMA_MASK;
905#endif
906
907
908 env->eflags |= IF_MASK;
909
910
911#ifndef TARGET_ABI32
912 env->regs[R_EAX] = regs->rax;
913 env->regs[R_EBX] = regs->rbx;
914 env->regs[R_ECX] = regs->rcx;
915 env->regs[R_EDX] = regs->rdx;
916 env->regs[R_ESI] = regs->rsi;
917 env->regs[R_EDI] = regs->rdi;
918 env->regs[R_EBP] = regs->rbp;
919 env->regs[R_ESP] = regs->rsp;
920 env->eip = regs->rip;
921#else
922 env->regs[R_EAX] = regs->eax;
923 env->regs[R_EBX] = regs->ebx;
924 env->regs[R_ECX] = regs->ecx;
925 env->regs[R_EDX] = regs->edx;
926 env->regs[R_ESI] = regs->esi;
927 env->regs[R_EDI] = regs->edi;
928 env->regs[R_EBP] = regs->ebp;
929 env->regs[R_ESP] = regs->esp;
930 env->eip = regs->eip;
931#endif
932
933
934#ifndef TARGET_ABI32
935 env->idt.limit = 511;
936#else
937 env->idt.limit = 255;
938#endif
939 env->idt.base = target_mmap(0, sizeof(uint64_t) * (env->idt.limit + 1),
940 PROT_READ | PROT_WRITE,
941 MAP_ANONYMOUS | MAP_PRIVATE, -1, 0);
942 idt_table = g2h_untagged(env->idt.base);
943 set_idt(0, 0);
944 set_idt(1, 0);
945 set_idt(2, 0);
946 set_idt(3, 3);
947 set_idt(4, 3);
948 set_idt(5, 0);
949 set_idt(6, 0);
950 set_idt(7, 0);
951 set_idt(8, 0);
952 set_idt(9, 0);
953 set_idt(10, 0);
954 set_idt(11, 0);
955 set_idt(12, 0);
956 set_idt(13, 0);
957 set_idt(14, 0);
958 set_idt(15, 0);
959 set_idt(16, 0);
960 set_idt(17, 0);
961 set_idt(18, 0);
962 set_idt(19, 0);
963 set_idt(0x80, 3);
964
965
966 {
967 uint64_t *gdt_table;
968 env->gdt.base = target_mmap(0, sizeof(uint64_t) * TARGET_GDT_ENTRIES,
969 PROT_READ | PROT_WRITE,
970 MAP_ANONYMOUS | MAP_PRIVATE, -1, 0);
971 env->gdt.limit = sizeof(uint64_t) * TARGET_GDT_ENTRIES - 1;
972 gdt_table = g2h_untagged(env->gdt.base);
973#ifdef TARGET_ABI32
974 write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
975 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
976 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
977#else
978
979 write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
980 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
981 DESC_L_MASK |
982 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
983#endif
984 write_dt(&gdt_table[__USER_DS >> 3], 0, 0xfffff,
985 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
986 (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT));
987 }
988
989 cpu_x86_load_seg(env, R_CS, __USER_CS);
990 cpu_x86_load_seg(env, R_SS, __USER_DS);
991#ifdef TARGET_ABI32
992 cpu_x86_load_seg(env, R_DS, __USER_DS);
993 cpu_x86_load_seg(env, R_ES, __USER_DS);
994 cpu_x86_load_seg(env, R_FS, __USER_DS);
995 cpu_x86_load_seg(env, R_GS, __USER_DS);
996
997 env->segs[R_FS].selector = 0;
998#else
999 cpu_x86_load_seg(env, R_DS, 0);
1000 cpu_x86_load_seg(env, R_ES, 0);
1001 cpu_x86_load_seg(env, R_FS, 0);
1002 cpu_x86_load_seg(env, R_GS, 0);
1003#endif
1004#elif defined(TARGET_SPARC)
1005 {
1006 int i;
1007 env->pc = regs->pc;
1008 env->npc = regs->npc;
1009 env->y = regs->y;
1010 for (i = 0; i < 8; i++) {
1011 env->gregs[i] = regs->u_regs[i];
1012 }
1013 for (i = 0; i < 8; i++) {
1014 env->regwptr[i] = regs->u_regs[i + 8];
1015 }
1016 }
1017#else
1018#error unsupported target CPU
1019#endif
1020
1021 if (gdbstub) {
1022 gdbserver_start(gdbstub);
1023 gdb_handlesig(cpu, 0);
1024 }
1025 cpu_loop(env);
1026
1027 return 0;
1028}
1029
