]> git.proxmox.com Git - mirror_qemu.git/blame - linux-user/main.c
Merge remote-tracking branch 'remotes/thibault/tags/samuel-thibault' into staging
[mirror_qemu.git] / linux-user / main.c
CommitLineData
31e31b8a 1/*
93ac68bc 2 * qemu user main
5fafdf24 3 *
68d0f70e 4 * Copyright (c) 2003-2008 Fabrice Bellard
31e31b8a
FB
5 *
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.
10 *
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.
15 *
16 * You should have received a copy of the GNU General Public License
8167ee88 17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
31e31b8a 18 */
14a48c1d 19
d39594e9 20#include "qemu/osdep.h"
a8d25326 21#include "qemu-common.h"
b52713c1 22#include "qemu/units.h"
14a48c1d 23#include "sysemu/tcg.h"
67a1de0d 24#include "qemu-version.h"
edf8e2af 25#include <sys/syscall.h>
703e0e89 26#include <sys/resource.h>
31e31b8a 27
daa76aa4 28#include "qapi/error.h"
3ef693a0 29#include "qemu.h"
f348b6d1 30#include "qemu/path.h"
dc5e9ac7 31#include "qemu/queue.h"
6533dd6e 32#include "qemu/config-file.h"
f348b6d1 33#include "qemu/cutils.h"
f5852efa 34#include "qemu/error-report.h"
f348b6d1 35#include "qemu/help_option.h"
0b8fa32f 36#include "qemu/module.h"
2b41f10e 37#include "cpu.h"
63c91552 38#include "exec/exec-all.h"
9002ec79 39#include "tcg.h"
1de7afc9
PB
40#include "qemu/timer.h"
41#include "qemu/envlist.h"
5ebdd774 42#include "qemu/guest-random.h"
d8fd2954 43#include "elf.h"
6533dd6e 44#include "trace/control.h"
542ca434 45#include "target_elf.h"
cd71c089 46#include "cpu_loop-common.h"
a573e9ba 47#include "crypto/init.h"
04a6dfeb 48
d088d664
AJ
49char *exec_path;
50
1b530a6d 51int singlestep;
8cb76755
SW
52static const char *argv0;
53static int gdbstub_port;
54static envlist_t *envlist;
51fb256a 55static const char *cpu_model;
2278b939 56static const char *cpu_type;
5ebdd774 57static const char *seed_optarg;
379f6698
PB
58unsigned long mmap_min_addr;
59unsigned long guest_base;
60int have_guest_base;
120a9848 61
288e65b9
AG
62/*
63 * When running 32-on-64 we should make sure we can fit all of the possible
64 * guest address space into a contiguous chunk of virtual host memory.
65 *
66 * This way we will never overlap with our own libraries or binaries or stack
67 * or anything else that QEMU maps.
18e80c55
RH
68 *
69 * Many cpus reserve the high bit (or more than one for some 64-bit cpus)
70 * of the address for the kernel. Some cpus rely on this and user space
71 * uses the high bit(s) for pointer tagging and the like. For them, we
72 * must preserve the expected address space.
288e65b9 73 */
18e80c55
RH
74#ifndef MAX_RESERVED_VA
75# if HOST_LONG_BITS > TARGET_VIRT_ADDR_SPACE_BITS
76# if TARGET_VIRT_ADDR_SPACE_BITS == 32 && \
77 (TARGET_LONG_BITS == 32 || defined(TARGET_ABI32))
78/* There are a number of places where we assign reserved_va to a variable
79 of type abi_ulong and expect it to fit. Avoid the last page. */
8f67b9c6 80# define MAX_RESERVED_VA(CPU) (0xfffffffful & TARGET_PAGE_MASK)
18e80c55 81# else
8f67b9c6 82# define MAX_RESERVED_VA(CPU) (1ul << TARGET_VIRT_ADDR_SPACE_BITS)
18e80c55 83# endif
314992b1 84# else
8f67b9c6 85# define MAX_RESERVED_VA(CPU) 0
314992b1 86# endif
18e80c55
RH
87#endif
88
68a1c816 89unsigned long reserved_va;
1b530a6d 90
d03f9c32 91static void usage(int exitcode);
fc9c5412 92
7ee2822c 93static const char *interp_prefix = CONFIG_QEMU_INTERP_PREFIX;
e586822a 94const char *qemu_uname_release;
586314f2 95
9de5e440
FB
96/* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
97 we allocate a bigger stack. Need a better solution, for example
98 by remapping the process stack directly at the right place */
703e0e89 99unsigned long guest_stack_size = 8 * 1024 * 1024UL;
31e31b8a
FB
100
101void gemu_log(const char *fmt, ...)
102{
103 va_list ap;
104
105 va_start(ap, fmt);
106 vfprintf(stderr, fmt, ap);
107 va_end(ap);
108}
109
8fcd3692 110#if defined(TARGET_I386)
05390248 111int cpu_get_pic_interrupt(CPUX86State *env)
92ccca6a
FB
112{
113 return -1;
114}
8fcd3692 115#endif
92ccca6a 116
d5975363
PB
117/***********************************************************/
118/* Helper routines for implementing atomic operations. */
119
d5975363
PB
120/* Make sure everything is in a consistent state for calling fork(). */
121void fork_start(void)
122{
06065c45 123 start_exclusive();
d032d1b4 124 mmap_fork_start();
024949ca 125 cpu_list_lock();
d5975363
PB
126}
127
128void fork_end(int child)
129{
d032d1b4 130 mmap_fork_end(child);
d5975363 131 if (child) {
bdc44640 132 CPUState *cpu, *next_cpu;
d5975363
PB
133 /* Child processes created by fork() only have a single thread.
134 Discard information about the parent threads. */
bdc44640
AF
135 CPU_FOREACH_SAFE(cpu, next_cpu) {
136 if (cpu != thread_cpu) {
068a5ea0 137 QTAILQ_REMOVE_RCU(&cpus, cpu, node);
bdc44640
AF
138 }
139 }
267f685b 140 qemu_init_cpu_list();
f7ec7f7b 141 gdbserver_fork(thread_cpu);
06065c45
PM
142 /* qemu_init_cpu_list() takes care of reinitializing the
143 * exclusive state, so we don't need to end_exclusive() here.
144 */
d5975363 145 } else {
267f685b 146 cpu_list_unlock();
06065c45 147 end_exclusive();
d5975363 148 }
d5975363
PB
149}
150
b44316fb 151__thread CPUState *thread_cpu;
59faf6d6 152
178f9429
SF
153bool qemu_cpu_is_self(CPUState *cpu)
154{
155 return thread_cpu == cpu;
156}
157
158void qemu_cpu_kick(CPUState *cpu)
159{
160 cpu_exit(cpu);
161}
162
edf8e2af
MW
163void task_settid(TaskState *ts)
164{
165 if (ts->ts_tid == 0) {
edf8e2af 166 ts->ts_tid = (pid_t)syscall(SYS_gettid);
edf8e2af
MW
167 }
168}
169
170void stop_all_tasks(void)
171{
172 /*
173 * We trust that when using NPTL, start_exclusive()
174 * handles thread stopping correctly.
175 */
176 start_exclusive();
177}
178
c3a92833 179/* Assumes contents are already zeroed. */
624f7979
PB
180void init_task_state(TaskState *ts)
181{
624f7979 182 ts->used = 1;
5bfce0b7
PM
183 ts->sigaltstack_used = (struct target_sigaltstack) {
184 .ss_sp = 0,
185 .ss_size = 0,
186 .ss_flags = TARGET_SS_DISABLE,
187 };
624f7979 188}
fc9c5412 189
30ba0ee5
AF
190CPUArchState *cpu_copy(CPUArchState *env)
191{
29a0af61 192 CPUState *cpu = env_cpu(env);
2278b939 193 CPUState *new_cpu = cpu_create(cpu_type);
61c7480f 194 CPUArchState *new_env = new_cpu->env_ptr;
30ba0ee5
AF
195 CPUBreakpoint *bp;
196 CPUWatchpoint *wp;
30ba0ee5
AF
197
198 /* Reset non arch specific state */
75a34036 199 cpu_reset(new_cpu);
30ba0ee5
AF
200
201 memcpy(new_env, env, sizeof(CPUArchState));
202
203 /* Clone all break/watchpoints.
204 Note: Once we support ptrace with hw-debug register access, make sure
205 BP_CPU break/watchpoints are handled correctly on clone. */
1d085f6c
TB
206 QTAILQ_INIT(&new_cpu->breakpoints);
207 QTAILQ_INIT(&new_cpu->watchpoints);
f0c3c505 208 QTAILQ_FOREACH(bp, &cpu->breakpoints, entry) {
b3310ab3 209 cpu_breakpoint_insert(new_cpu, bp->pc, bp->flags, NULL);
30ba0ee5 210 }
ff4700b0 211 QTAILQ_FOREACH(wp, &cpu->watchpoints, entry) {
05068c0d 212 cpu_watchpoint_insert(new_cpu, wp->vaddr, wp->len, wp->flags, NULL);
30ba0ee5 213 }
30ba0ee5
AF
214
215 return new_env;
216}
217
fc9c5412
JS
218static void handle_arg_help(const char *arg)
219{
4d1275c2 220 usage(EXIT_SUCCESS);
fc9c5412
JS
221}
222
223static void handle_arg_log(const char *arg)
224{
225 int mask;
fc9c5412 226
4fde1eba 227 mask = qemu_str_to_log_mask(arg);
fc9c5412 228 if (!mask) {
59a6fa6e 229 qemu_print_log_usage(stdout);
4d1275c2 230 exit(EXIT_FAILURE);
fc9c5412 231 }
f2937a33 232 qemu_log_needs_buffers();
24537a01 233 qemu_set_log(mask);
fc9c5412
JS
234}
235
8423fa90
AB
236static void handle_arg_dfilter(const char *arg)
237{
7f4341e8 238 qemu_set_dfilter_ranges(arg, &error_fatal);
8423fa90
AB
239}
240
50171d42
CWR
241static void handle_arg_log_filename(const char *arg)
242{
daa76aa4 243 qemu_set_log_filename(arg, &error_fatal);
50171d42
CWR
244}
245
fc9c5412
JS
246static void handle_arg_set_env(const char *arg)
247{
248 char *r, *p, *token;
249 r = p = strdup(arg);
250 while ((token = strsep(&p, ",")) != NULL) {
251 if (envlist_setenv(envlist, token) != 0) {
4d1275c2 252 usage(EXIT_FAILURE);
fc9c5412
JS
253 }
254 }
255 free(r);
256}
257
258static void handle_arg_unset_env(const char *arg)
259{
260 char *r, *p, *token;
261 r = p = strdup(arg);
262 while ((token = strsep(&p, ",")) != NULL) {
263 if (envlist_unsetenv(envlist, token) != 0) {
4d1275c2 264 usage(EXIT_FAILURE);
fc9c5412
JS
265 }
266 }
267 free(r);
268}
269
270static void handle_arg_argv0(const char *arg)
271{
272 argv0 = strdup(arg);
273}
274
275static void handle_arg_stack_size(const char *arg)
276{
277 char *p;
278 guest_stack_size = strtoul(arg, &p, 0);
279 if (guest_stack_size == 0) {
4d1275c2 280 usage(EXIT_FAILURE);
fc9c5412
JS
281 }
282
283 if (*p == 'M') {
b52713c1 284 guest_stack_size *= MiB;
fc9c5412 285 } else if (*p == 'k' || *p == 'K') {
b52713c1 286 guest_stack_size *= KiB;
fc9c5412
JS
287 }
288}
289
290static void handle_arg_ld_prefix(const char *arg)
291{
292 interp_prefix = strdup(arg);
293}
294
295static void handle_arg_pagesize(const char *arg)
296{
297 qemu_host_page_size = atoi(arg);
298 if (qemu_host_page_size == 0 ||
299 (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
300 fprintf(stderr, "page size must be a power of two\n");
4d1275c2 301 exit(EXIT_FAILURE);
fc9c5412
JS
302 }
303}
304
5ebdd774 305static void handle_arg_seed(const char *arg)
c5e4a5a9 306{
5ebdd774 307 seed_optarg = arg;
c5e4a5a9
MR
308}
309
fc9c5412
JS
310static void handle_arg_gdb(const char *arg)
311{
312 gdbstub_port = atoi(arg);
313}
314
315static void handle_arg_uname(const char *arg)
316{
317 qemu_uname_release = strdup(arg);
318}
319
320static void handle_arg_cpu(const char *arg)
321{
322 cpu_model = strdup(arg);
c8057f95 323 if (cpu_model == NULL || is_help_option(cpu_model)) {
fc9c5412 324 /* XXX: implement xxx_cpu_list for targets that still miss it */
e916cbf8 325#if defined(cpu_list)
0442428a 326 cpu_list();
fc9c5412 327#endif
4d1275c2 328 exit(EXIT_FAILURE);
fc9c5412
JS
329 }
330}
331
fc9c5412
JS
332static void handle_arg_guest_base(const char *arg)
333{
334 guest_base = strtol(arg, NULL, 0);
335 have_guest_base = 1;
336}
337
338static void handle_arg_reserved_va(const char *arg)
339{
340 char *p;
341 int shift = 0;
342 reserved_va = strtoul(arg, &p, 0);
343 switch (*p) {
344 case 'k':
345 case 'K':
346 shift = 10;
347 break;
348 case 'M':
349 shift = 20;
350 break;
351 case 'G':
352 shift = 30;
353 break;
354 }
355 if (shift) {
356 unsigned long unshifted = reserved_va;
357 p++;
358 reserved_va <<= shift;
8f67b9c6 359 if (reserved_va >> shift != unshifted) {
fc9c5412 360 fprintf(stderr, "Reserved virtual address too big\n");
4d1275c2 361 exit(EXIT_FAILURE);
fc9c5412
JS
362 }
363 }
364 if (*p) {
365 fprintf(stderr, "Unrecognised -R size suffix '%s'\n", p);
4d1275c2 366 exit(EXIT_FAILURE);
fc9c5412
JS
367 }
368}
fc9c5412
JS
369
370static void handle_arg_singlestep(const char *arg)
371{
372 singlestep = 1;
373}
374
375static void handle_arg_strace(const char *arg)
376{
377 do_strace = 1;
378}
379
380static void handle_arg_version(const char *arg)
381{
7e563bfb 382 printf("qemu-" TARGET_NAME " version " QEMU_FULL_VERSION
0781dd6e 383 "\n" QEMU_COPYRIGHT "\n");
4d1275c2 384 exit(EXIT_SUCCESS);
fc9c5412
JS
385}
386
6533dd6e
LV
387static char *trace_file;
388static void handle_arg_trace(const char *arg)
389{
390 g_free(trace_file);
391 trace_file = trace_opt_parse(arg);
392}
393
130ea832
MF
394#if defined(TARGET_XTENSA)
395static void handle_arg_abi_call0(const char *arg)
396{
397 xtensa_set_abi_call0();
398}
399#endif
400
fc9c5412
JS
401struct qemu_argument {
402 const char *argv;
403 const char *env;
404 bool has_arg;
405 void (*handle_opt)(const char *arg);
406 const char *example;
407 const char *help;
408};
409
42644cee 410static const struct qemu_argument arg_table[] = {
fc9c5412
JS
411 {"h", "", false, handle_arg_help,
412 "", "print this help"},
daaf8c8e
MI
413 {"help", "", false, handle_arg_help,
414 "", ""},
fc9c5412
JS
415 {"g", "QEMU_GDB", true, handle_arg_gdb,
416 "port", "wait gdb connection to 'port'"},
417 {"L", "QEMU_LD_PREFIX", true, handle_arg_ld_prefix,
418 "path", "set the elf interpreter prefix to 'path'"},
419 {"s", "QEMU_STACK_SIZE", true, handle_arg_stack_size,
420 "size", "set the stack size to 'size' bytes"},
421 {"cpu", "QEMU_CPU", true, handle_arg_cpu,
c8057f95 422 "model", "select CPU (-cpu help for list)"},
fc9c5412
JS
423 {"E", "QEMU_SET_ENV", true, handle_arg_set_env,
424 "var=value", "sets targets environment variable (see below)"},
425 {"U", "QEMU_UNSET_ENV", true, handle_arg_unset_env,
426 "var", "unsets targets environment variable (see below)"},
427 {"0", "QEMU_ARGV0", true, handle_arg_argv0,
428 "argv0", "forces target process argv[0] to be 'argv0'"},
429 {"r", "QEMU_UNAME", true, handle_arg_uname,
430 "uname", "set qemu uname release string to 'uname'"},
fc9c5412
JS
431 {"B", "QEMU_GUEST_BASE", true, handle_arg_guest_base,
432 "address", "set guest_base address to 'address'"},
433 {"R", "QEMU_RESERVED_VA", true, handle_arg_reserved_va,
434 "size", "reserve 'size' bytes for guest virtual address space"},
fc9c5412 435 {"d", "QEMU_LOG", true, handle_arg_log,
989b697d
PM
436 "item[,...]", "enable logging of specified items "
437 "(use '-d help' for a list of items)"},
8423fa90
AB
438 {"dfilter", "QEMU_DFILTER", true, handle_arg_dfilter,
439 "range[,...]","filter logging based on address range"},
50171d42 440 {"D", "QEMU_LOG_FILENAME", true, handle_arg_log_filename,
989b697d 441 "logfile", "write logs to 'logfile' (default stderr)"},
fc9c5412
JS
442 {"p", "QEMU_PAGESIZE", true, handle_arg_pagesize,
443 "pagesize", "set the host page size to 'pagesize'"},
444 {"singlestep", "QEMU_SINGLESTEP", false, handle_arg_singlestep,
445 "", "run in singlestep mode"},
446 {"strace", "QEMU_STRACE", false, handle_arg_strace,
447 "", "log system calls"},
5ebdd774 448 {"seed", "QEMU_RAND_SEED", true, handle_arg_seed,
c5e4a5a9 449 "", "Seed for pseudo-random number generator"},
6533dd6e
LV
450 {"trace", "QEMU_TRACE", true, handle_arg_trace,
451 "", "[[enable=]<pattern>][,events=<file>][,file=<file>]"},
fc9c5412 452 {"version", "QEMU_VERSION", false, handle_arg_version,
1386d4c0 453 "", "display version information and exit"},
130ea832
MF
454#if defined(TARGET_XTENSA)
455 {"xtensa-abi-call0", "QEMU_XTENSA_ABI_CALL0", false, handle_arg_abi_call0,
456 "", "assume CALL0 Xtensa ABI"},
457#endif
fc9c5412
JS
458 {NULL, NULL, false, NULL, NULL, NULL}
459};
460
d03f9c32 461static void usage(int exitcode)
fc9c5412 462{
42644cee 463 const struct qemu_argument *arginfo;
fc9c5412
JS
464 int maxarglen;
465 int maxenvlen;
466
2e59915d
PB
467 printf("usage: qemu-" TARGET_NAME " [options] program [arguments...]\n"
468 "Linux CPU emulator (compiled for " TARGET_NAME " emulation)\n"
fc9c5412
JS
469 "\n"
470 "Options and associated environment variables:\n"
471 "\n");
472
63ec54d7
PM
473 /* Calculate column widths. We must always have at least enough space
474 * for the column header.
475 */
476 maxarglen = strlen("Argument");
477 maxenvlen = strlen("Env-variable");
fc9c5412
JS
478
479 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
63ec54d7
PM
480 int arglen = strlen(arginfo->argv);
481 if (arginfo->has_arg) {
482 arglen += strlen(arginfo->example) + 1;
483 }
fc9c5412
JS
484 if (strlen(arginfo->env) > maxenvlen) {
485 maxenvlen = strlen(arginfo->env);
486 }
63ec54d7
PM
487 if (arglen > maxarglen) {
488 maxarglen = arglen;
fc9c5412
JS
489 }
490 }
491
63ec54d7
PM
492 printf("%-*s %-*s Description\n", maxarglen+1, "Argument",
493 maxenvlen, "Env-variable");
fc9c5412
JS
494
495 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
496 if (arginfo->has_arg) {
497 printf("-%s %-*s %-*s %s\n", arginfo->argv,
63ec54d7
PM
498 (int)(maxarglen - strlen(arginfo->argv) - 1),
499 arginfo->example, maxenvlen, arginfo->env, arginfo->help);
fc9c5412 500 } else {
63ec54d7 501 printf("-%-*s %-*s %s\n", maxarglen, arginfo->argv,
fc9c5412
JS
502 maxenvlen, arginfo->env,
503 arginfo->help);
504 }
505 }
506
507 printf("\n"
508 "Defaults:\n"
509 "QEMU_LD_PREFIX = %s\n"
989b697d 510 "QEMU_STACK_SIZE = %ld byte\n",
fc9c5412 511 interp_prefix,
989b697d 512 guest_stack_size);
fc9c5412
JS
513
514 printf("\n"
515 "You can use -E and -U options or the QEMU_SET_ENV and\n"
516 "QEMU_UNSET_ENV environment variables to set and unset\n"
517 "environment variables for the target process.\n"
518 "It is possible to provide several variables by separating them\n"
519 "by commas in getsubopt(3) style. Additionally it is possible to\n"
520 "provide the -E and -U options multiple times.\n"
521 "The following lines are equivalent:\n"
522 " -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n"
523 " -E var1=val2,var2=val2 -U LD_PRELOAD,LD_DEBUG\n"
524 " QEMU_SET_ENV=var1=val2,var2=val2 QEMU_UNSET_ENV=LD_PRELOAD,LD_DEBUG\n"
525 "Note that if you provide several changes to a single variable\n"
f5048cb7
EB
526 "the last change will stay in effect.\n"
527 "\n"
528 QEMU_HELP_BOTTOM "\n");
fc9c5412 529
d03f9c32 530 exit(exitcode);
fc9c5412
JS
531}
532
533static int parse_args(int argc, char **argv)
534{
535 const char *r;
536 int optind;
42644cee 537 const struct qemu_argument *arginfo;
fc9c5412
JS
538
539 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
540 if (arginfo->env == NULL) {
541 continue;
542 }
543
544 r = getenv(arginfo->env);
545 if (r != NULL) {
546 arginfo->handle_opt(r);
547 }
548 }
549
550 optind = 1;
551 for (;;) {
552 if (optind >= argc) {
553 break;
554 }
555 r = argv[optind];
556 if (r[0] != '-') {
557 break;
558 }
559 optind++;
560 r++;
561 if (!strcmp(r, "-")) {
562 break;
563 }
ba02577c
MI
564 /* Treat --foo the same as -foo. */
565 if (r[0] == '-') {
566 r++;
567 }
fc9c5412
JS
568
569 for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
570 if (!strcmp(r, arginfo->argv)) {
fc9c5412 571 if (arginfo->has_arg) {
1386d4c0 572 if (optind >= argc) {
138940bf
MI
573 (void) fprintf(stderr,
574 "qemu: missing argument for option '%s'\n", r);
4d1275c2 575 exit(EXIT_FAILURE);
1386d4c0
PM
576 }
577 arginfo->handle_opt(argv[optind]);
fc9c5412 578 optind++;
1386d4c0
PM
579 } else {
580 arginfo->handle_opt(NULL);
fc9c5412 581 }
fc9c5412
JS
582 break;
583 }
584 }
585
586 /* no option matched the current argv */
587 if (arginfo->handle_opt == NULL) {
138940bf 588 (void) fprintf(stderr, "qemu: unknown option '%s'\n", r);
4d1275c2 589 exit(EXIT_FAILURE);
fc9c5412
JS
590 }
591 }
592
593 if (optind >= argc) {
138940bf 594 (void) fprintf(stderr, "qemu: no user program specified\n");
4d1275c2 595 exit(EXIT_FAILURE);
fc9c5412
JS
596 }
597
fc9c5412
JS
598 exec_path = argv[optind];
599
600 return optind;
601}
602
902b3d5c 603int main(int argc, char **argv, char **envp)
31e31b8a 604{
01ffc75b 605 struct target_pt_regs regs1, *regs = &regs1;
31e31b8a 606 struct image_info info1, *info = &info1;
edf8e2af 607 struct linux_binprm bprm;
48e15fc2 608 TaskState *ts;
9349b4f9 609 CPUArchState *env;
db6b81d4 610 CPUState *cpu;
586314f2 611 int optind;
04a6dfeb 612 char **target_environ, **wrk;
7d8cec95
AJ
613 char **target_argv;
614 int target_argc;
7d8cec95 615 int i;
fd4d81dd 616 int ret;
03cfd8fa 617 int execfd;
8f67b9c6 618 unsigned long max_reserved_va;
b12b6a18 619
f5852efa 620 error_init(argv[0]);
fe4db84d 621 module_call_init(MODULE_INIT_TRACE);
267f685b 622 qemu_init_cpu_list();
ce008c1f
AF
623 module_call_init(MODULE_INIT_QOM);
624
ec45bbe5 625 envlist = envlist_create();
04a6dfeb
AJ
626
627 /* add current environment into the list */
628 for (wrk = environ; *wrk != NULL; wrk++) {
629 (void) envlist_setenv(envlist, *wrk);
630 }
631
703e0e89
RH
632 /* Read the stack limit from the kernel. If it's "unlimited",
633 then we can do little else besides use the default. */
634 {
635 struct rlimit lim;
636 if (getrlimit(RLIMIT_STACK, &lim) == 0
81bbe906
TY
637 && lim.rlim_cur != RLIM_INFINITY
638 && lim.rlim_cur == (target_long)lim.rlim_cur) {
703e0e89
RH
639 guest_stack_size = lim.rlim_cur;
640 }
641 }
642
b1f9be31 643 cpu_model = NULL;
b5ec5ce0 644
6533dd6e
LV
645 qemu_add_opts(&qemu_trace_opts);
646
fc9c5412 647 optind = parse_args(argc, argv);
586314f2 648
6533dd6e
LV
649 if (!trace_init_backends()) {
650 exit(1);
651 }
652 trace_init_file(trace_file);
653
31e31b8a 654 /* Zero out regs */
01ffc75b 655 memset(regs, 0, sizeof(struct target_pt_regs));
31e31b8a
FB
656
657 /* Zero out image_info */
658 memset(info, 0, sizeof(struct image_info));
659
edf8e2af
MW
660 memset(&bprm, 0, sizeof (bprm));
661
74cd30b8
FB
662 /* Scan interp_prefix dir for replacement files. */
663 init_paths(interp_prefix);
664
4a24a758
PM
665 init_qemu_uname_release();
666
768fe76e
YS
667 execfd = qemu_getauxval(AT_EXECFD);
668 if (execfd == 0) {
9d3019bc 669 execfd = open(exec_path, O_RDONLY);
768fe76e 670 if (execfd < 0) {
9d3019bc 671 printf("Error while loading %s: %s\n", exec_path, strerror(errno));
768fe76e
YS
672 _exit(EXIT_FAILURE);
673 }
674 }
675
46027c07 676 if (cpu_model == NULL) {
768fe76e 677 cpu_model = cpu_get_model(get_elf_eflags(execfd));
aaed909a 678 }
c1c8cfe5 679 cpu_type = parse_cpu_option(cpu_model);
2278b939 680
2b5249b8 681 /* init tcg before creating CPUs and to get qemu_host_page_size */
d5ab9713 682 tcg_exec_init(0);
2278b939
IM
683
684 cpu = cpu_create(cpu_type);
2994fd96 685 env = cpu->env_ptr;
0ac46af3 686 cpu_reset(cpu);
db6b81d4 687 thread_cpu = cpu;
3b46e624 688
8f67b9c6
RH
689 /*
690 * Reserving too much vm space via mmap can run into problems
691 * with rlimits, oom due to page table creation, etc. We will
692 * still try it, if directed by the command-line option, but
693 * not by default.
694 */
695 max_reserved_va = MAX_RESERVED_VA(cpu);
696 if (reserved_va != 0) {
697 if (max_reserved_va && reserved_va > max_reserved_va) {
698 fprintf(stderr, "Reserved virtual address too big\n");
699 exit(EXIT_FAILURE);
700 }
701 } else if (HOST_LONG_BITS == 64 && TARGET_VIRT_ADDR_SPACE_BITS <= 32) {
702 /*
703 * reserved_va must be aligned with the host page size
704 * as it is used with mmap()
705 */
706 reserved_va = max_reserved_va & qemu_host_page_mask;
707 }
708
a573e9ba
RH
709 {
710 Error *err = NULL;
711 if (seed_optarg != NULL) {
a573e9ba
RH
712 qemu_guest_random_seed_main(seed_optarg, &err);
713 } else {
714 qcrypto_init(&err);
715 }
716 if (err) {
717 error_reportf_err(err, "cannot initialize crypto: ");
718 exit(1);
5ebdd774 719 }
c5e4a5a9
MR
720 }
721
04a6dfeb
AJ
722 target_environ = envlist_to_environ(envlist, NULL);
723 envlist_free(envlist);
b12b6a18 724
379f6698 725 /*
2b5249b8 726 * Now that page sizes are configured in tcg_exec_init() we can do
379f6698
PB
727 * proper page alignment for guest_base.
728 */
729 guest_base = HOST_PAGE_ALIGN(guest_base);
68a1c816 730
806d1021
MI
731 if (reserved_va || have_guest_base) {
732 guest_base = init_guest_space(guest_base, reserved_va, 0,
733 have_guest_base);
734 if (guest_base == (unsigned long)-1) {
097b8cb8
PM
735 fprintf(stderr, "Unable to reserve 0x%lx bytes of virtual address "
736 "space for use as guest address space (check your virtual "
737 "memory ulimit setting or reserve less using -R option)\n",
738 reserved_va);
4d1275c2 739 exit(EXIT_FAILURE);
68a1c816 740 }
97cc7560 741
806d1021
MI
742 if (reserved_va) {
743 mmap_next_start = reserved_va;
97cc7560
DDAG
744 }
745 }
379f6698
PB
746
747 /*
748 * Read in mmap_min_addr kernel parameter. This value is used
749 * When loading the ELF image to determine whether guest_base
14f24e14 750 * is needed. It is also used in mmap_find_vma.
379f6698 751 */
14f24e14 752 {
379f6698
PB
753 FILE *fp;
754
755 if ((fp = fopen("/proc/sys/vm/mmap_min_addr", "r")) != NULL) {
756 unsigned long tmp;
757 if (fscanf(fp, "%lu", &tmp) == 1) {
758 mmap_min_addr = tmp;
13829020 759 qemu_log_mask(CPU_LOG_PAGE, "host mmap_min_addr=0x%lx\n", mmap_min_addr);
379f6698
PB
760 }
761 fclose(fp);
762 }
763 }
379f6698 764
7d8cec95
AJ
765 /*
766 * Prepare copy of argv vector for target.
767 */
768 target_argc = argc - optind;
769 target_argv = calloc(target_argc + 1, sizeof (char *));
770 if (target_argv == NULL) {
7d37435b
PB
771 (void) fprintf(stderr, "Unable to allocate memory for target_argv\n");
772 exit(EXIT_FAILURE);
7d8cec95
AJ
773 }
774
775 /*
776 * If argv0 is specified (using '-0' switch) we replace
777 * argv[0] pointer with the given one.
778 */
779 i = 0;
780 if (argv0 != NULL) {
781 target_argv[i++] = strdup(argv0);
782 }
783 for (; i < target_argc; i++) {
784 target_argv[i] = strdup(argv[optind + i]);
785 }
786 target_argv[target_argc] = NULL;
787
c78d65e8 788 ts = g_new0(TaskState, 1);
edf8e2af
MW
789 init_task_state(ts);
790 /* build Task State */
791 ts->info = info;
792 ts->bprm = &bprm;
0429a971 793 cpu->opaque = ts;
edf8e2af
MW
794 task_settid(ts);
795
9d3019bc 796 ret = loader_exec(execfd, exec_path, target_argv, target_environ, regs,
fd4d81dd
AP
797 info, &bprm);
798 if (ret != 0) {
9d3019bc 799 printf("Error while loading %s: %s\n", exec_path, strerror(-ret));
4d1275c2 800 _exit(EXIT_FAILURE);
b12b6a18
TS
801 }
802
803 for (wrk = target_environ; *wrk; wrk++) {
ec45bbe5 804 g_free(*wrk);
31e31b8a 805 }
3b46e624 806
ec45bbe5 807 g_free(target_environ);
b12b6a18 808
13829020 809 if (qemu_loglevel_mask(CPU_LOG_PAGE)) {
379f6698 810 qemu_log("guest_base 0x%lx\n", guest_base);
2e77eac6
BS
811 log_page_dump();
812
813 qemu_log("start_brk 0x" TARGET_ABI_FMT_lx "\n", info->start_brk);
814 qemu_log("end_code 0x" TARGET_ABI_FMT_lx "\n", info->end_code);
7c4ee5bc
RH
815 qemu_log("start_code 0x" TARGET_ABI_FMT_lx "\n", info->start_code);
816 qemu_log("start_data 0x" TARGET_ABI_FMT_lx "\n", info->start_data);
2e77eac6 817 qemu_log("end_data 0x" TARGET_ABI_FMT_lx "\n", info->end_data);
7c4ee5bc 818 qemu_log("start_stack 0x" TARGET_ABI_FMT_lx "\n", info->start_stack);
2e77eac6
BS
819 qemu_log("brk 0x" TARGET_ABI_FMT_lx "\n", info->brk);
820 qemu_log("entry 0x" TARGET_ABI_FMT_lx "\n", info->entry);
7c4ee5bc
RH
821 qemu_log("argv_start 0x" TARGET_ABI_FMT_lx "\n", info->arg_start);
822 qemu_log("env_start 0x" TARGET_ABI_FMT_lx "\n",
823 info->arg_end + (abi_ulong)sizeof(abi_ulong));
824 qemu_log("auxv_start 0x" TARGET_ABI_FMT_lx "\n", info->saved_auxv);
2e77eac6 825 }
31e31b8a 826
53a5960a 827 target_set_brk(info->brk);
31e31b8a 828 syscall_init();
66fb9763 829 signal_init();
31e31b8a 830
9002ec79
RH
831 /* Now that we've loaded the binary, GUEST_BASE is fixed. Delay
832 generating the prologue until now so that the prologue can take
833 the real value of GUEST_BASE into account. */
b1311c4a 834 tcg_prologue_init(tcg_ctx);
e8feb96f 835 tcg_region_init();
9002ec79 836
cd71c089
LV
837 target_cpu_copy_regs(env, regs);
838
74c33bed 839 if (gdbstub_port) {
ff7a981a
PM
840 if (gdbserver_start(gdbstub_port) < 0) {
841 fprintf(stderr, "qemu: could not open gdbserver on port %d\n",
842 gdbstub_port);
4d1275c2 843 exit(EXIT_FAILURE);
ff7a981a 844 }
db6b81d4 845 gdb_handlesig(cpu, 0);
1fddef4b 846 }
1b6b029e
FB
847 cpu_loop(env);
848 /* never exits */
31e31b8a
FB
849 return 0;
850}