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