From: Johannes Schauer <j.scha...@email.de> A first try to introduce a generic setup for mapping environment variables to command line options.
I'm afraid to code something for platforms I can't do runtime tests on, so this is only for linux-user for now. Signed-off-by: Johannes Schauer <j.scha...@email.de> --- linux-user/main.c | 147 +++++++++++++++++++++++++++++++++++++++++++++++++++- 1 files changed, 144 insertions(+), 3 deletions(-) diff --git a/linux-user/main.c b/linux-user/main.c index dbba8be..fb986e3 100644 --- a/linux-user/main.c +++ b/linux-user/main.c @@ -2640,26 +2640,51 @@ static void usage(void) "-E var=value sets/modifies targets environment variable(s)\n" "-U var unsets targets environment variable(s)\n" "-0 argv0 forces target process argv[0] to be argv0\n" + "-r uname set qemu uname release string\n" #if defined(CONFIG_USE_GUEST_BASE) "-B address set guest_base address to address\n" "-R size reserve size bytes for guest virtual address space\n" #endif "\n" + "Standard environment variables:\n" + "QEMU_GDB see the -g option\n" + "QEMU_LD_PREFIX see the -L option\n" + "QEMU_STACK_SIZE see the -s option\n" + "QEMU_CPU see the -cpu option\n" + "QEMU_SET_ENV see the -E option, comma separated list of arguments\n" + "QEMU_UNSET_ENV see the -U option, comma separated list of arguments\n" + "QEMU_ARGV0 see the -0 option\n" + "QEMU_UNAME see the -r option\n" +#if defined(CONFIG_USE_GUEST_BASE) + "QEMU_GUEST_BASE see the -B option\n" + "QEMU_RESERVED_VA see the -R option\n" +#endif + "\n" "Debug options:\n" "-d options activate log (logfile=%s)\n" "-p pagesize set the host page size to 'pagesize'\n" "-singlestep always run in singlestep mode\n" "-strace log system calls\n" "\n" - "Environment variables:\n" - "QEMU_STRACE Print system calls and arguments similar to the\n" - " 'strace' program. Enable by setting to any value.\n" + "Debug environment variables:\n" + "QEMU_LOG see the -d option\n" + "QEMU_PAGESIZE see the -p option\n" + "QEMU_SINGLESTEP see the -singlestep option\n" + "QEMU_STRACE see the -strace option\n" + "\n" "You can use -E and -U options to set/unset environment variables\n" "for target process. It is possible to provide several variables\n" "by repeating the option. For example:\n" " -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n" "Note that if you provide several changes to single variable\n" "last change will stay in effect.\n" + "Using the environment variables QEMU_SET_ENV and QEMU_UNSET_ENV\n" + "to set/unset environment variables for target process is\n" + "possible by a comma separated list of values in getsubopt(3)\n" + "style. For example:\n" + " QEMU_SET_ENV=var1=val2,var2=val2 QEMU_UNSET_ENV=LD_PRELOAD,LD_DEBUG\n" + "Note that if you provide several changes to single variable\n" + "last change will stay in effect.\n" , TARGET_ARCH, interp_prefix, @@ -2758,6 +2783,122 @@ int main(int argc, char **argv, char **envp) cpudef_setup(); /* parse cpu definitions in target config file (TBD) */ #endif + if ((r = getenv("QEMU_LOG")) != NULL) { + int mask; + const CPULogItem *item; + mask = cpu_str_to_log_mask(r); + if (!mask) { + printf("Log items (comma separated):\n"); + for(item = cpu_log_items; item->mask != 0; item++) { + printf("%-10s %s\n", item->name, item->help); + } + exit(1); + } + cpu_set_log(mask); + } + if ((r = getenv("QEMU_SET_ENV")) != NULL) { + char *p, *token; + p = strdup(r); + while ((token = strsep(&p, ",")) != NULL) { + if (envlist_setenv(envlist, token) != 0) + usage(); + } + free(p); + } + if ((r = getenv("QEMU_UNSET_ENV")) != NULL) { + char *p, *token; + p = strdup(r); + while ((token = strsep(&p, ",")) != NULL) { + if (envlist_unsetenv(envlist, token) != 0) + usage(); + } + free(p); + } + if ((r = getenv("QEMU_ARGV0")) != NULL) { + argv0 = strdup(r); + } + if ((r = getenv("QEMU_STACK_SIZE")) != NULL) { + guest_stack_size = strtoul(r, (char **)&r, 0); + if (guest_stack_size == 0) + usage(); + if (*r == 'M') + guest_stack_size *= 1024 * 1024; + else if (*r == 'k' || *r == 'K') + guest_stack_size *= 1024; + } + if ((r = getenv("QEMU_LD_PREFIX")) != NULL) { + interp_prefix = strdup(r); + } + if ((r = getenv("QEMU_PAGESIZE")) != NULL) { + qemu_host_page_size = atoi(r); + if (qemu_host_page_size == 0 || + (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) { + fprintf(stderr, "page size must be a power of two\n"); + exit(1); + } + } + if ((r = getenv("QEMU_GDB")) != NULL) { + gdbstub_port = atoi(r); + } + if ((r = getenv("QEMU_UNAME")) != NULL) { + qemu_uname_release = strdup(r); + } + if ((r = getenv("QEMU_CPU")) != NULL) { + cpu_model = strdup(r); + if (cpu_model == NULL || strcmp(cpu_model, "?") == 0) { +/* XXX: implement xxx_cpu_list for targets that still miss it */ +#if defined(cpu_list_id) + cpu_list_id(stdout, &fprintf, ""); +#elif defined(cpu_list) + cpu_list(stdout, &fprintf); /* deprecated */ +#endif + exit(1); + } + } +#if defined(CONFIG_USE_GUEST_BASE) + if ((r = getenv("QEMU_GUEST_BASE")) != NULL) { + guest_base = strtol(r, NULL, 0); + have_guest_base = 1; + } + if ((r = getenv("QEMU_QEMU_RESERVED_VA")) != NULL) { + char *p; + int shift = 0; + reserved_va = strtoul(r, &p, 0); + switch (*p) { + case 'k': + case 'K': + shift = 10; + break; + case 'M': + shift = 20; + break; + case 'G': + shift = 30; + break; + } + if (shift) { + unsigned long unshifted = reserved_va; + p++; + reserved_va <<= shift; + if (((reserved_va >> shift) != unshifted) +#if HOST_LONG_BITS > TARGET_VIRT_ADDR_SPACE_BITS + || (reserved_va > (1ul << TARGET_VIRT_ADDR_SPACE_BITS)) +#endif + ) { + fprintf(stderr, "Reserved virtual address too big\n"); + exit(1); + } + } + if (*p) { + fprintf(stderr, "Unrecognised -R size suffix '%s'\n", p); + exit(1); + } + } +#endif + if ((r = getenv("QEMU_SINGLESTEP")) != NULL) { + singlestep = 1; + } + optind = 1; for(;;) { if (optind >= argc) -- 1.7.5.4 -- To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org