vl.c

   1 /*
   2  * QEMU System Emulator
   3  *
   4  * Copyright (c) 2003-2008 Fabrice Bellard
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a copy
   7  * of this software and associated documentation files (the "Software"), to deal
   8  * in the Software without restriction, including without limitation the rights
   9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  10  * copies of the Software, and to permit persons to whom the Software is
  11  * furnished to do so, subject to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be included in
  14  * all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  22  * THE SOFTWARE.
  23  */
  24 #include <unistd.h>
  25 #include <fcntl.h>
  26 #include <signal.h>
  27 #include <time.h>
  28 #include <errno.h>
  29 #include <sys/time.h>
  30 #include <zlib.h>
  31
  32 /* Needed early for CONFIG_BSD etc. */
  33 #include "config-host.h"
  34
  35 #ifndef _WIN32
  36 #include <libgen.h>
  37 #include <pwd.h>
  38 #include <sys/times.h>
  39 #include <sys/wait.h>
  40 #include <termios.h>
  41 #include <sys/mman.h>
  42 #include <sys/ioctl.h>
  43 #include <sys/resource.h>
  44 #include <sys/socket.h>
  45 #include <netinet/in.h>
  46 #include <net/if.h>
  47 #include <arpa/inet.h>
  48 #include <dirent.h>
  49 #include <netdb.h>
  50 #include <sys/select.h>
  51 #ifdef CONFIG_BSD
  52 #include <sys/stat.h>
  53 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
  54 #include <libutil.h>
  55 #include <sys/sysctl.h>
  56 #else
  57 #include <util.h>
  58 #endif
  59 #else
  60 #ifdef __linux__
  61 #include <pty.h>
  62 #include <malloc.h>
  63 #include <sys/prctl.h>
  64
  65 #include <linux/ppdev.h>
  66 #include <linux/parport.h>
  67 #endif
  68 #ifdef __sun__
  69 #include <sys/stat.h>
  70 #include <sys/ethernet.h>
  71 #include <sys/sockio.h>
  72 #include <netinet/arp.h>
  73 #include <netinet/in.h>
  74 #include <netinet/in_systm.h>
  75 #include <netinet/ip.h>
  76 #include <netinet/ip_icmp.h> // must come after ip.h
  77 #include <netinet/udp.h>
  78 #include <netinet/tcp.h>
  79 #include <net/if.h>
  80 #include <syslog.h>
  81 #include <stropts.h>
  82 /* See MySQL bug #7156 (http://bugs.mysql.com/bug.php?id=7156) for
  83    discussion about Solaris header problems */
  84 extern int madvise(caddr_t, size_t, int);
  85 #endif
  86 #endif
  87 #endif
  88
  89 #if defined(__OpenBSD__)
  90 #include <util.h>
  91 #endif
  92
  93 #if defined(CONFIG_VDE)
  94 #include <libvdeplug.h>
  95 #endif
  96
  97 #ifdef _WIN32
  98 #include <windows.h>
  99 #endif
 100
 101 #ifdef CONFIG_SDL
 102 #if defined(__APPLE__) || defined(main)
 103 #include <SDL.h>
 104 int qemu_main(int argc, char **argv, char **envp);
 105 int main(int argc, char **argv)
 106 {
 107     return qemu_main(argc, argv, NULL);
 108 }
 109 #undef main
 110 #define main qemu_main
 111 #endif
 112 #endif /* CONFIG_SDL */
 113
 114 #ifdef CONFIG_COCOA
 115 #undef main
 116 #define main qemu_main
 117 #endif /* CONFIG_COCOA */
 118
 119 #include "hw/hw.h"
 120 #include "hw/boards.h"
 121 #include "hw/usb.h"
 122 #include "hw/pcmcia.h"
 123 #include "hw/pc.h"
 124 #include "hw/isa.h"
 125 #include "hw/baum.h"
 126 #include "hw/bt.h"
 127 #include "hw/watchdog.h"
 128 #include "hw/smbios.h"
 129 #include "hw/xen.h"
 130 #include "hw/qdev.h"
 131 #include "hw/loader.h"
 132 #include "bt-host.h"
 133 #include "net.h"
 134 #include "net/slirp.h"
 135 #include "monitor.h"
 136 #include "console.h"
 137 #include "sysemu.h"
 138 #include "gdbstub.h"
 139 #include "qemu-timer.h"
 140 #include "qemu-char.h"
 141 #include "cache-utils.h"
 142 #include "block.h"
 143 #include "block_int.h"
 144 #include "block-migration.h"
 145 #include "dma.h"
 146 #include "audio/audio.h"
 147 #include "migration.h"
 148 #include "kvm.h"
 149 #include "qemu-option.h"
 150 #include "qemu-config.h"
 151 #include "qemu-objects.h"
 152 #ifdef CONFIG_LINUX
 153 #include "fsdev/qemu-fsdev.h"
 154 #endif
 155
 156 #include "disas.h"
 157
 158 #include "qemu_socket.h"
 159
 160 #include "slirp/libslirp.h"
 161
 162 #include "qemu-queue.h"
 163 #include "cpus.h"
 164 #include "arch_init.h"
 165
 166 //#define DEBUG_NET
 167 //#define DEBUG_SLIRP
 168
 169 #define DEFAULT_RAM_SIZE 128
 170
 171 #define MAX_VIRTIO_CONSOLES 1
 172
 173 static const char *data_dir;
 174 const char *bios_name = NULL;
 175 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
 176    to store the VM snapshots */
 177 struct drivelist drives = QTAILQ_HEAD_INITIALIZER(drives);
 178 struct driveoptlist driveopts = QTAILQ_HEAD_INITIALIZER(driveopts);
 179 enum vga_retrace_method vga_retrace_method = VGA_RETRACE_DUMB;
 180 DisplayType display_type = DT_DEFAULT;
 181 const char* keyboard_layout = NULL;
 182 ram_addr_t ram_size;
 183 const char *mem_path = NULL;
 184 #ifdef MAP_POPULATE
 185 int mem_prealloc = 0; /* force preallocation of physical target memory */
 186 #endif
 187 int nb_nics;
 188 NICInfo nd_table[MAX_NICS];
 189 int vm_running;
 190 int autostart;
 191 static int rtc_utc = 1;
 192 static int rtc_date_offset = -1; /* -1 means no change */
 193 QEMUClock *rtc_clock;
 194 int vga_interface_type = VGA_NONE;
 195 static int full_screen = 0;
 196 #ifdef CONFIG_SDL
 197 static int no_frame = 0;
 198 #endif
 199 int no_quit = 0;
 200 CharDriverState *serial_hds[MAX_SERIAL_PORTS];
 201 CharDriverState *parallel_hds[MAX_PARALLEL_PORTS];
 202 CharDriverState *virtcon_hds[MAX_VIRTIO_CONSOLES];
 203 int win2k_install_hack = 0;
 204 int rtc_td_hack = 0;
 205 int usb_enabled = 0;
 206 int singlestep = 0;
 207 int smp_cpus = 1;
 208 int max_cpus = 0;
 209 int smp_cores = 1;
 210 int smp_threads = 1;
 211 const char *vnc_display;
 212 int acpi_enabled = 1;
 213 int no_hpet = 0;
 214 int fd_bootchk = 1;
 215 int no_reboot = 0;
 216 int no_shutdown = 0;
 217 int cursor_hide = 1;
 218 int graphic_rotate = 0;
 219 uint8_t irq0override = 1;
 220 #ifndef _WIN32
 221 int daemonize = 0;
 222 #endif
 223 const char *watchdog;
 224 const char *option_rom[MAX_OPTION_ROMS];
 225 int nb_option_roms;
 226 int semihosting_enabled = 0;
 227 int old_param = 0;
 228 const char *qemu_name;
 229 int alt_grab = 0;
 230 int ctrl_grab = 0;
 231 unsigned int nb_prom_envs = 0;
 232 const char *prom_envs[MAX_PROM_ENVS];
 233 int boot_menu;
 234
 235 int nb_numa_nodes;
 236 uint64_t node_mem[MAX_NODES];
 237 uint64_t node_cpumask[MAX_NODES];
 238
 239 static QEMUTimer *nographic_timer;
 240
 241 uint8_t qemu_uuid[16];
 242
 243 static QEMUBootSetHandler *boot_set_handler;
 244 static void *boot_set_opaque;
 245
 246 int kvm_allowed = 0;
 247 uint32_t xen_domid;
 248 enum xen_mode xen_mode = XEN_EMULATE;
 249
 250 static int default_serial = 1;
 251 static int default_parallel = 1;
 252 static int default_virtcon = 1;
 253 static int default_monitor = 1;
 254 static int default_vga = 1;
 255 static int default_floppy = 1;
 256 static int default_cdrom = 1;
 257 static int default_sdcard = 1;
 258
 259 static struct {
 260     const char *driver;
 261     int *flag;
 262 } default_list[] = {
 263     { .driver = "isa-serial",           .flag = &default_serial    },
 264     { .driver = "isa-parallel",         .flag = &default_parallel  },
 265     { .driver = "isa-fdc",              .flag = &default_floppy    },
 266     { .driver = "ide-drive",            .flag = &default_cdrom     },
 267     { .driver = "virtio-serial-pci",    .flag = &default_virtcon   },
 268     { .driver = "virtio-serial-s390",   .flag = &default_virtcon   },
 269     { .driver = "virtio-serial",        .flag = &default_virtcon   },
 270     { .driver = "VGA",                  .flag = &default_vga       },
 271     { .driver = "cirrus-vga",           .flag = &default_vga       },
 272     { .driver = "vmware-svga",          .flag = &default_vga       },
 273 };
 274
 275 static int default_driver_check(QemuOpts *opts, void *opaque)
 276 {
 277     const char *driver = qemu_opt_get(opts, "driver");
 278     int i;
 279
 280     if (!driver)
 281         return 0;
 282     for (i = 0; i < ARRAY_SIZE(default_list); i++) {
 283         if (strcmp(default_list[i].driver, driver) != 0)
 284             continue;
 285         *(default_list[i].flag) = 0;
 286     }
 287     return 0;
 288 }
 289
 290 /***********************************************************/
 291
 292 static void set_proc_name(const char *s)
 293 {
 294 #if defined(__linux__) && defined(PR_SET_NAME)
 295     char name[16];
 296     if (!s)
 297         return;
 298     name[sizeof(name) - 1] = 0;
 299     strncpy(name, s, sizeof(name));
 300     /* Could rewrite argv[0] too, but that's a bit more complicated.
 301        This simple way is enough for `top'. */
 302     prctl(PR_SET_NAME, name);
 303 #endif
 304 }
 305
 306 /***********************************************************/
 307 /* real time host monotonic timer */
 308
 309 /* compute with 96 bit intermediate result: (a*b)/c */
 310 uint64_t muldiv64(uint64_t a, uint32_t b, uint32_t c)
 311 {
 312     union {
 313         uint64_t ll;
 314         struct {
 315 #ifdef HOST_WORDS_BIGENDIAN
 316             uint32_t high, low;
 317 #else
 318             uint32_t low, high;
 319 #endif
 320         } l;
 321     } u, res;
 322     uint64_t rl, rh;
 323
 324     u.ll = a;
 325     rl = (uint64_t)u.l.low * (uint64_t)b;
 326     rh = (uint64_t)u.l.high * (uint64_t)b;
 327     rh += (rl >> 32);
 328     res.l.high = rh / c;
 329     res.l.low = (((rh % c) << 32) + (rl & 0xffffffff)) / c;
 330     return res.ll;
 331 }
 332
 333 /***********************************************************/
 334 /* host time/date access */
 335 void qemu_get_timedate(struct tm *tm, int offset)
 336 {
 337     time_t ti;
 338     struct tm *ret;
 339
 340     time(&ti);
 341     ti += offset;
 342     if (rtc_date_offset == -1) {
 343         if (rtc_utc)
 344             ret = gmtime(&ti);
 345         else
 346             ret = localtime(&ti);
 347     } else {
 348         ti -= rtc_date_offset;
 349         ret = gmtime(&ti);
 350     }
 351
 352     memcpy(tm, ret, sizeof(struct tm));
 353 }
 354
 355 int qemu_timedate_diff(struct tm *tm)
 356 {
 357     time_t seconds;
 358
 359     if (rtc_date_offset == -1)
 360         if (rtc_utc)
 361             seconds = mktimegm(tm);
 362         else
 363             seconds = mktime(tm);
 364     else
 365         seconds = mktimegm(tm) + rtc_date_offset;
 366
 367     return seconds - time(NULL);
 368 }
 369
 370 void rtc_change_mon_event(struct tm *tm)
 371 {
 372     QObject *data;
 373
 374     data = qobject_from_jsonf("{ 'offset': %d }", qemu_timedate_diff(tm));
 375     monitor_protocol_event(QEVENT_RTC_CHANGE, data);
 376     qobject_decref(data);
 377 }
 378
 379 static void configure_rtc_date_offset(const char *startdate, int legacy)
 380 {
 381     time_t rtc_start_date;
 382     struct tm tm;
 383
 384     if (!strcmp(startdate, "now") && legacy) {
 385         rtc_date_offset = -1;
 386     } else {
 387         if (sscanf(startdate, "%d-%d-%dT%d:%d:%d",
 388                    &tm.tm_year,
 389                    &tm.tm_mon,
 390                    &tm.tm_mday,
 391                    &tm.tm_hour,
 392                    &tm.tm_min,
 393                    &tm.tm_sec) == 6) {
 394             /* OK */
 395         } else if (sscanf(startdate, "%d-%d-%d",
 396                           &tm.tm_year,
 397                           &tm.tm_mon,
 398                           &tm.tm_mday) == 3) {
 399             tm.tm_hour = 0;
 400             tm.tm_min = 0;
 401             tm.tm_sec = 0;
 402         } else {
 403             goto date_fail;
 404         }
 405         tm.tm_year -= 1900;
 406         tm.tm_mon--;
 407         rtc_start_date = mktimegm(&tm);
 408         if (rtc_start_date == -1) {
 409         date_fail:
 410             fprintf(stderr, "Invalid date format. Valid formats are:\n"
 411                             "'2006-06-17T16:01:21' or '2006-06-17'\n");
 412             exit(1);
 413         }
 414         rtc_date_offset = time(NULL) - rtc_start_date;
 415     }
 416 }
 417
 418 static void configure_rtc(QemuOpts *opts)
 419 {
 420     const char *value;
 421
 422     value = qemu_opt_get(opts, "base");
 423     if (value) {
 424         if (!strcmp(value, "utc")) {
 425             rtc_utc = 1;
 426         } else if (!strcmp(value, "localtime")) {
 427             rtc_utc = 0;
 428         } else {
 429             configure_rtc_date_offset(value, 0);
 430         }
 431     }
 432     value = qemu_opt_get(opts, "clock");
 433     if (value) {
 434         if (!strcmp(value, "host")) {
 435             rtc_clock = host_clock;
 436         } else if (!strcmp(value, "vm")) {
 437             rtc_clock = vm_clock;
 438         } else {
 439             fprintf(stderr, "qemu: invalid option value '%s'\n", value);
 440             exit(1);
 441         }
 442     }
 443     value = qemu_opt_get(opts, "driftfix");
 444     if (value) {
 445         if (!strcmp(value, "slew")) {
 446             rtc_td_hack = 1;
 447         } else if (!strcmp(value, "none")) {
 448             rtc_td_hack = 0;
 449         } else {
 450             fprintf(stderr, "qemu: invalid option value '%s'\n", value);
 451             exit(1);
 452         }
 453     }
 454 }
 455
 456 /***********************************************************/
 457 /* Bluetooth support */
 458 static int nb_hcis;
 459 static int cur_hci;
 460 static struct HCIInfo *hci_table[MAX_NICS];
 461
 462 static struct bt_vlan_s {
 463     struct bt_scatternet_s net;
 464     int id;
 465     struct bt_vlan_s *next;
 466 } *first_bt_vlan;
 467
 468 /* find or alloc a new bluetooth "VLAN" */
 469 static struct bt_scatternet_s *qemu_find_bt_vlan(int id)
 470 {
 471     struct bt_vlan_s **pvlan, *vlan;
 472     for (vlan = first_bt_vlan; vlan != NULL; vlan = vlan->next) {
 473         if (vlan->id == id)
 474             return &vlan->net;
 475     }
 476     vlan = qemu_mallocz(sizeof(struct bt_vlan_s));
 477     vlan->id = id;
 478     pvlan = &first_bt_vlan;
 479     while (*pvlan != NULL)
 480         pvlan = &(*pvlan)->next;
 481     *pvlan = vlan;
 482     return &vlan->net;
 483 }
 484
 485 static void null_hci_send(struct HCIInfo *hci, const uint8_t *data, int len)
 486 {
 487 }
 488
 489 static int null_hci_addr_set(struct HCIInfo *hci, const uint8_t *bd_addr)
 490 {
 491     return -ENOTSUP;
 492 }
 493
 494 static struct HCIInfo null_hci = {
 495     .cmd_send = null_hci_send,
 496     .sco_send = null_hci_send,
 497     .acl_send = null_hci_send,
 498     .bdaddr_set = null_hci_addr_set,
 499 };
 500
 501 struct HCIInfo *qemu_next_hci(void)
 502 {
 503     if (cur_hci == nb_hcis)
 504         return &null_hci;
 505
 506     return hci_table[cur_hci++];
 507 }
 508
 509 static struct HCIInfo *hci_init(const char *str)
 510 {
 511     char *endp;
 512     struct bt_scatternet_s *vlan = 0;
 513
 514     if (!strcmp(str, "null"))
 515         /* null */
 516         return &null_hci;
 517     else if (!strncmp(str, "host", 4) && (str[4] == '\0' || str[4] == ':'))
 518         /* host[:hciN] */
 519         return bt_host_hci(str[4] ? str + 5 : "hci0");
 520     else if (!strncmp(str, "hci", 3)) {
 521         /* hci[,vlan=n] */
 522         if (str[3]) {
 523             if (!strncmp(str + 3, ",vlan=", 6)) {
 524                 vlan = qemu_find_bt_vlan(strtol(str + 9, &endp, 0));
 525                 if (*endp)
 526                     vlan = 0;
 527             }
 528         } else
 529             vlan = qemu_find_bt_vlan(0);
 530         if (vlan)
 531            return bt_new_hci(vlan);
 532     }
 533
 534     fprintf(stderr, "qemu: Unknown bluetooth HCI `%s'.\n", str);
 535
 536     return 0;
 537 }
 538
 539 static int bt_hci_parse(const char *str)
 540 {
 541     struct HCIInfo *hci;
 542     bdaddr_t bdaddr;
 543
 544     if (nb_hcis >= MAX_NICS) {
 545         fprintf(stderr, "qemu: Too many bluetooth HCIs (max %i).\n", MAX_NICS);
 546         return -1;
 547     }
 548
 549     hci = hci_init(str);
 550     if (!hci)
 551         return -1;
 552
 553     bdaddr.b[0] = 0x52;
 554     bdaddr.b[1] = 0x54;
 555     bdaddr.b[2] = 0x00;
 556     bdaddr.b[3] = 0x12;
 557     bdaddr.b[4] = 0x34;
 558     bdaddr.b[5] = 0x56 + nb_hcis;
 559     hci->bdaddr_set(hci, bdaddr.b);
 560
 561     hci_table[nb_hcis++] = hci;
 562
 563     return 0;
 564 }
 565
 566 static void bt_vhci_add(int vlan_id)
 567 {
 568     struct bt_scatternet_s *vlan = qemu_find_bt_vlan(vlan_id);
 569
 570     if (!vlan->slave)
 571         fprintf(stderr, "qemu: warning: adding a VHCI to "
 572                         "an empty scatternet %i\n", vlan_id);
 573
 574     bt_vhci_init(bt_new_hci(vlan));
 575 }
 576
 577 static struct bt_device_s *bt_device_add(const char *opt)
 578 {
 579     struct bt_scatternet_s *vlan;
 580     int vlan_id = 0;
 581     char *endp = strstr(opt, ",vlan=");
 582     int len = (endp ? endp - opt : strlen(opt)) + 1;
 583     char devname[10];
 584
 585     pstrcpy(devname, MIN(sizeof(devname), len), opt);
 586
 587     if (endp) {
 588         vlan_id = strtol(endp + 6, &endp, 0);
 589         if (*endp) {
 590             fprintf(stderr, "qemu: unrecognised bluetooth vlan Id\n");
 591             return 0;
 592         }
 593     }
 594
 595     vlan = qemu_find_bt_vlan(vlan_id);
 596
 597     if (!vlan->slave)
 598         fprintf(stderr, "qemu: warning: adding a slave device to "
 599                         "an empty scatternet %i\n", vlan_id);
 600
 601     if (!strcmp(devname, "keyboard"))
 602         return bt_keyboard_init(vlan);
 603
 604     fprintf(stderr, "qemu: unsupported bluetooth device `%s'\n", devname);
 605     return 0;
 606 }
 607
 608 static int bt_parse(const char *opt)
 609 {
 610     const char *endp, *p;
 611     int vlan;
 612
 613     if (strstart(opt, "hci", &endp)) {
 614         if (!*endp || *endp == ',') {
 615             if (*endp)
 616                 if (!strstart(endp, ",vlan=", 0))
 617                     opt = endp + 1;
 618
 619             return bt_hci_parse(opt);
 620        }
 621     } else if (strstart(opt, "vhci", &endp)) {
 622         if (!*endp || *endp == ',') {
 623             if (*endp) {
 624                 if (strstart(endp, ",vlan=", &p)) {
 625                     vlan = strtol(p, (char **) &endp, 0);
 626                     if (*endp) {
 627                         fprintf(stderr, "qemu: bad scatternet '%s'\n", p);
 628                         return 1;
 629                     }
 630                 } else {
 631                     fprintf(stderr, "qemu: bad parameter '%s'\n", endp + 1);
 632                     return 1;
 633                 }
 634             } else
 635                 vlan = 0;
 636
 637             bt_vhci_add(vlan);
 638             return 0;
 639         }
 640     } else if (strstart(opt, "device:", &endp))
 641         return !bt_device_add(endp);
 642
 643     fprintf(stderr, "qemu: bad bluetooth parameter '%s'\n", opt);
 644     return 1;
 645 }
 646
 647 /***********************************************************/
 648 /* QEMU Block devices */
 649
 650 #define HD_ALIAS "index=%d,media=disk"
 651 #define CDROM_ALIAS "index=2,media=cdrom"
 652 #define FD_ALIAS "index=%d,if=floppy"
 653 #define PFLASH_ALIAS "if=pflash"
 654 #define MTD_ALIAS "if=mtd"
 655 #define SD_ALIAS "index=0,if=sd"
 656
 657 QemuOpts *drive_add(const char *file, const char *fmt, ...)
 658 {
 659     va_list ap;
 660     char optstr[1024];
 661     QemuOpts *opts;
 662
 663     va_start(ap, fmt);
 664     vsnprintf(optstr, sizeof(optstr), fmt, ap);
 665     va_end(ap);
 666
 667     opts = qemu_opts_parse(&qemu_drive_opts, optstr, 0);
 668     if (!opts) {
 669         return NULL;
 670     }
 671     if (file)
 672         qemu_opt_set(opts, "file", file);
 673     return opts;
 674 }
 675
 676 DriveInfo *drive_get(BlockInterfaceType type, int bus, int unit)
 677 {
 678     DriveInfo *dinfo;
 679
 680     /* seek interface, bus and unit */
 681
 682     QTAILQ_FOREACH(dinfo, &drives, next) {
 683         if (dinfo->type == type &&
 684             dinfo->bus == bus &&
 685             dinfo->unit == unit)
 686             return dinfo;
 687     }
 688
 689     return NULL;
 690 }
 691
 692 DriveInfo *drive_get_by_id(const char *id)
 693 {
 694     DriveInfo *dinfo;
 695
 696     QTAILQ_FOREACH(dinfo, &drives, next) {
 697         if (strcmp(id, dinfo->id))
 698             continue;
 699         return dinfo;
 700     }
 701     return NULL;
 702 }
 703
 704 int drive_get_max_bus(BlockInterfaceType type)
 705 {
 706     int max_bus;
 707     DriveInfo *dinfo;
 708
 709     max_bus = -1;
 710     QTAILQ_FOREACH(dinfo, &drives, next) {
 711         if(dinfo->type == type &&
 712            dinfo->bus > max_bus)
 713             max_bus = dinfo->bus;
 714     }
 715     return max_bus;
 716 }
 717
 718 const char *drive_get_serial(BlockDriverState *bdrv)
 719 {
 720     DriveInfo *dinfo;
 721
 722     QTAILQ_FOREACH(dinfo, &drives, next) {
 723         if (dinfo->bdrv == bdrv)
 724             return dinfo->serial;
 725     }
 726
 727     return "\0";
 728 }
 729
 730 BlockInterfaceErrorAction drive_get_on_error(
 731     BlockDriverState *bdrv, int is_read)
 732 {
 733     DriveInfo *dinfo;
 734
 735     QTAILQ_FOREACH(dinfo, &drives, next) {
 736         if (dinfo->bdrv == bdrv)
 737             return is_read ? dinfo->on_read_error : dinfo->on_write_error;
 738     }
 739
 740     return is_read ? BLOCK_ERR_REPORT : BLOCK_ERR_STOP_ENOSPC;
 741 }
 742
 743 static void bdrv_format_print(void *opaque, const char *name)
 744 {
 745     fprintf(stderr, " %s", name);
 746 }
 747
 748 void drive_uninit(DriveInfo *dinfo)
 749 {
 750     qemu_opts_del(dinfo->opts);
 751     bdrv_delete(dinfo->bdrv);
 752     QTAILQ_REMOVE(&drives, dinfo, next);
 753     qemu_free(dinfo);
 754 }
 755
 756 static int parse_block_error_action(const char *buf, int is_read)
 757 {
 758     if (!strcmp(buf, "ignore")) {
 759         return BLOCK_ERR_IGNORE;
 760     } else if (!is_read && !strcmp(buf, "enospc")) {
 761         return BLOCK_ERR_STOP_ENOSPC;
 762     } else if (!strcmp(buf, "stop")) {
 763         return BLOCK_ERR_STOP_ANY;
 764     } else if (!strcmp(buf, "report")) {
 765         return BLOCK_ERR_REPORT;
 766     } else {
 767         fprintf(stderr, "qemu: '%s' invalid %s error action\n",
 768             buf, is_read ? "read" : "write");
 769         return -1;
 770     }
 771 }
 772
 773 DriveInfo *drive_init(QemuOpts *opts, void *opaque,
 774                       int *fatal_error)
 775 {
 776     const char *buf;
 777     const char *file = NULL;
 778     char devname[128];
 779     const char *serial;
 780     const char *mediastr = "";
 781     BlockInterfaceType type;
 782     enum { MEDIA_DISK, MEDIA_CDROM } media;
 783     int bus_id, unit_id;
 784     int cyls, heads, secs, translation;
 785     BlockDriver *drv = NULL;
 786     QEMUMachine *machine = opaque;
 787     int max_devs;
 788     int index;
 789     int ro = 0;
 790     int bdrv_flags = 0;
 791     int on_read_error, on_write_error;
 792     const char *devaddr;
 793     DriveInfo *dinfo;
 794     int snapshot = 0;
 795
 796     *fatal_error = 1;
 797
 798     translation = BIOS_ATA_TRANSLATION_AUTO;
 799
 800     if (machine && machine->use_scsi) {
 801         type = IF_SCSI;
 802         max_devs = MAX_SCSI_DEVS;
 803         pstrcpy(devname, sizeof(devname), "scsi");
 804     } else {
 805         type = IF_IDE;
 806         max_devs = MAX_IDE_DEVS;
 807         pstrcpy(devname, sizeof(devname), "ide");
 808     }
 809     media = MEDIA_DISK;
 810
 811     /* extract parameters */
 812     bus_id  = qemu_opt_get_number(opts, "bus", 0);
 813     unit_id = qemu_opt_get_number(opts, "unit", -1);
 814     index   = qemu_opt_get_number(opts, "index", -1);
 815
 816     cyls  = qemu_opt_get_number(opts, "cyls", 0);
 817     heads = qemu_opt_get_number(opts, "heads", 0);
 818     secs  = qemu_opt_get_number(opts, "secs", 0);
 819
 820     snapshot = qemu_opt_get_bool(opts, "snapshot", 0);
 821     ro = qemu_opt_get_bool(opts, "readonly", 0);
 822
 823     file = qemu_opt_get(opts, "file");
 824     serial = qemu_opt_get(opts, "serial");
 825
 826     if ((buf = qemu_opt_get(opts, "if")) != NULL) {
 827         pstrcpy(devname, sizeof(devname), buf);
 828         if (!strcmp(buf, "ide")) {
 829             type = IF_IDE;
 830             max_devs = MAX_IDE_DEVS;
 831         } else if (!strcmp(buf, "scsi")) {
 832             type = IF_SCSI;
 833             max_devs = MAX_SCSI_DEVS;
 834         } else if (!strcmp(buf, "floppy")) {
 835             type = IF_FLOPPY;
 836             max_devs = 0;
 837         } else if (!strcmp(buf, "pflash")) {
 838             type = IF_PFLASH;
 839             max_devs = 0;
 840         } else if (!strcmp(buf, "mtd")) {
 841             type = IF_MTD;
 842             max_devs = 0;
 843         } else if (!strcmp(buf, "sd")) {
 844             type = IF_SD;
 845             max_devs = 0;
 846         } else if (!strcmp(buf, "virtio")) {
 847             type = IF_VIRTIO;
 848             max_devs = 0;
 849         } else if (!strcmp(buf, "xen")) {
 850             type = IF_XEN;
 851             max_devs = 0;
 852         } else if (!strcmp(buf, "none")) {
 853             type = IF_NONE;
 854             max_devs = 0;
 855         } else {
 856             fprintf(stderr, "qemu: unsupported bus type '%s'\n", buf);
 857             return NULL;
 858         }
 859     }
 860
 861     if (cyls || heads || secs) {
 862         if (cyls < 1 || (type == IF_IDE && cyls > 16383)) {
 863             fprintf(stderr, "qemu: '%s' invalid physical cyls number\n", buf);
 864             return NULL;
 865         }
 866         if (heads < 1 || (type == IF_IDE && heads > 16)) {
 867             fprintf(stderr, "qemu: '%s' invalid physical heads number\n", buf);
 868             return NULL;
 869         }
 870         if (secs < 1 || (type == IF_IDE && secs > 63)) {
 871             fprintf(stderr, "qemu: '%s' invalid physical secs number\n", buf);
 872             return NULL;
 873         }
 874     }
 875
 876     if ((buf = qemu_opt_get(opts, "trans")) != NULL) {
 877         if (!cyls) {
 878             fprintf(stderr,
 879                     "qemu: '%s' trans must be used with cyls,heads and secs\n",
 880                     buf);
 881             return NULL;
 882         }
 883         if (!strcmp(buf, "none"))
 884             translation = BIOS_ATA_TRANSLATION_NONE;
 885         else if (!strcmp(buf, "lba"))
 886             translation = BIOS_ATA_TRANSLATION_LBA;
 887         else if (!strcmp(buf, "auto"))
 888             translation = BIOS_ATA_TRANSLATION_AUTO;
 889         else {
 890             fprintf(stderr, "qemu: '%s' invalid translation type\n", buf);
 891             return NULL;
 892         }
 893     }
 894
 895     if ((buf = qemu_opt_get(opts, "media")) != NULL) {
 896         if (!strcmp(buf, "disk")) {
 897             media = MEDIA_DISK;
 898         } else if (!strcmp(buf, "cdrom")) {
 899             if (cyls || secs || heads) {
 900                 fprintf(stderr,
 901                         "qemu: '%s' invalid physical CHS format\n", buf);
 902                 return NULL;
 903             }
 904             media = MEDIA_CDROM;
 905         } else {
 906             fprintf(stderr, "qemu: '%s' invalid media\n", buf);
 907             return NULL;
 908         }
 909     }
 910
 911     if ((buf = qemu_opt_get(opts, "cache")) != NULL) {
 912         if (!strcmp(buf, "off") || !strcmp(buf, "none")) {
 913             bdrv_flags |= BDRV_O_NOCACHE;
 914         } else if (!strcmp(buf, "writeback")) {
 915             bdrv_flags |= BDRV_O_CACHE_WB;
 916         } else if (!strcmp(buf, "unsafe")) {
 917             bdrv_flags |= BDRV_O_CACHE_WB;
 918             bdrv_flags |= BDRV_O_NO_FLUSH;
 919         } else if (!strcmp(buf, "writethrough")) {
 920             /* this is the default */
 921         } else {
 922            fprintf(stderr, "qemu: invalid cache option\n");
 923            return NULL;
 924         }
 925     }
 926
 927 #ifdef CONFIG_LINUX_AIO
 928     if ((buf = qemu_opt_get(opts, "aio")) != NULL) {
 929         if (!strcmp(buf, "native")) {
 930             bdrv_flags |= BDRV_O_NATIVE_AIO;
 931         } else if (!strcmp(buf, "threads")) {
 932             /* this is the default */
 933         } else {
 934            fprintf(stderr, "qemu: invalid aio option\n");
 935            return NULL;
 936         }
 937     }
 938 #endif
 939
 940     if ((buf = qemu_opt_get(opts, "format")) != NULL) {
 941        if (strcmp(buf, "?") == 0) {
 942             fprintf(stderr, "qemu: Supported formats:");
 943             bdrv_iterate_format(bdrv_format_print, NULL);
 944             fprintf(stderr, "\n");
 945             return NULL;
 946         }
 947         drv = bdrv_find_whitelisted_format(buf);
 948         if (!drv) {
 949             fprintf(stderr, "qemu: '%s' invalid format\n", buf);
 950             return NULL;
 951         }
 952     }
 953
 954     on_write_error = BLOCK_ERR_STOP_ENOSPC;
 955     if ((buf = qemu_opt_get(opts, "werror")) != NULL) {
 956         if (type != IF_IDE && type != IF_SCSI && type != IF_VIRTIO && type != IF_NONE) {
 957             fprintf(stderr, "werror is no supported by this format\n");
 958             return NULL;
 959         }
 960
 961         on_write_error = parse_block_error_action(buf, 0);
 962         if (on_write_error < 0) {
 963             return NULL;
 964         }
 965     }
 966
 967     on_read_error = BLOCK_ERR_REPORT;
 968     if ((buf = qemu_opt_get(opts, "rerror")) != NULL) {
 969         if (type != IF_IDE && type != IF_VIRTIO && type != IF_NONE) {
 970             fprintf(stderr, "rerror is no supported by this format\n");
 971             return NULL;
 972         }
 973
 974         on_read_error = parse_block_error_action(buf, 1);
 975         if (on_read_error < 0) {
 976             return NULL;
 977         }
 978     }
 979
 980     if ((devaddr = qemu_opt_get(opts, "addr")) != NULL) {
 981         if (type != IF_VIRTIO) {
 982             fprintf(stderr, "addr is not supported\n");
 983             return NULL;
 984         }
 985     }
 986
 987     /* compute bus and unit according index */
 988
 989     if (index != -1) {
 990         if (bus_id != 0 || unit_id != -1) {
 991             fprintf(stderr,
 992                     "qemu: index cannot be used with bus and unit\n");
 993             return NULL;
 994         }
 995         if (max_devs == 0)
 996         {
 997             unit_id = index;
 998             bus_id = 0;
 999         } else {
1000             unit_id = index % max_devs;
1001             bus_id = index / max_devs;
1002         }
1003     }
1004
1005     /* if user doesn't specify a unit_id,
1006      * try to find the first free
1007      */
1008
1009     if (unit_id == -1) {
1010        unit_id = 0;
1011        while (drive_get(type, bus_id, unit_id) != NULL) {
1012            unit_id++;
1013            if (max_devs && unit_id >= max_devs) {
1014                unit_id -= max_devs;
1015                bus_id++;
1016            }
1017        }
1018     }
1019
1020     /* check unit id */
1021
1022     if (max_devs && unit_id >= max_devs) {
1023         fprintf(stderr, "qemu: unit %d too big (max is %d)\n",
1024                 unit_id, max_devs - 1);
1025         return NULL;
1026     }
1027
1028     /*
1029      * ignore multiple definitions
1030      */
1031
1032     if (drive_get(type, bus_id, unit_id) != NULL) {
1033         *fatal_error = 0;
1034         return NULL;
1035     }
1036
1037     /* init */
1038
1039     dinfo = qemu_mallocz(sizeof(*dinfo));
1040     if ((buf = qemu_opts_id(opts)) != NULL) {
1041         dinfo->id = qemu_strdup(buf);
1042     } else {
1043         /* no id supplied -> create one */
1044         dinfo->id = qemu_mallocz(32);
1045         if (type == IF_IDE || type == IF_SCSI)
1046             mediastr = (media == MEDIA_CDROM) ? "-cd" : "-hd";
1047         if (max_devs)
1048             snprintf(dinfo->id, 32, "%s%i%s%i",
1049                      devname, bus_id, mediastr, unit_id);
1050         else
1051             snprintf(dinfo->id, 32, "%s%s%i",
1052                      devname, mediastr, unit_id);
1053     }
1054     dinfo->bdrv = bdrv_new(dinfo->id);
1055     dinfo->devaddr = devaddr;
1056     dinfo->type = type;
1057     dinfo->bus = bus_id;
1058     dinfo->unit = unit_id;
1059     dinfo->on_read_error = on_read_error;
1060     dinfo->on_write_error = on_write_error;
1061     dinfo->opts = opts;
1062     if (serial)
1063         strncpy(dinfo->serial, serial, sizeof(serial));
1064     QTAILQ_INSERT_TAIL(&drives, dinfo, next);
1065
1066     switch(type) {
1067     case IF_IDE:
1068     case IF_SCSI:
1069     case IF_XEN:
1070     case IF_NONE:
1071         switch(media) {
1072         case MEDIA_DISK:
1073             if (cyls != 0) {
1074                 bdrv_set_geometry_hint(dinfo->bdrv, cyls, heads, secs);
1075                 bdrv_set_translation_hint(dinfo->bdrv, translation);
1076             }
1077             break;
1078         case MEDIA_CDROM:
1079             bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_CDROM);
1080             break;
1081         }
1082         break;
1083     case IF_SD:
1084         /* FIXME: This isn't really a floppy, but it's a reasonable
1085            approximation.  */
1086     case IF_FLOPPY:
1087         bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_FLOPPY);
1088         break;
1089     case IF_PFLASH:
1090     case IF_MTD:
1091         break;
1092     case IF_VIRTIO:
1093         /* add virtio block device */
1094         opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
1095         qemu_opt_set(opts, "driver", "virtio-blk-pci");
1096         qemu_opt_set(opts, "drive", dinfo->id);
1097         if (devaddr)
1098             qemu_opt_set(opts, "addr", devaddr);
1099         break;
1100     case IF_COUNT:
1101         abort();
1102     }
1103     if (!file) {
1104         *fatal_error = 0;
1105         return NULL;
1106     }
1107     if (snapshot) {
1108         /* always use cache=unsafe with snapshot */
1109         bdrv_flags &= ~BDRV_O_CACHE_MASK;
1110         bdrv_flags |= (BDRV_O_SNAPSHOT|BDRV_O_CACHE_WB|BDRV_O_NO_FLUSH);
1111     }
1112
1113     if (media == MEDIA_CDROM) {
1114         /* CDROM is fine for any interface, don't check.  */
1115         ro = 1;
1116     } else if (ro == 1) {
1117         if (type != IF_SCSI && type != IF_VIRTIO && type != IF_FLOPPY && type != IF_NONE) {
1118             fprintf(stderr, "qemu: readonly flag not supported for drive with this interface\n");
1119             return NULL;
1120         }
1121     }
1122
1123     bdrv_flags |= ro ? 0 : BDRV_O_RDWR;
1124
1125     if (bdrv_open(dinfo->bdrv, file, bdrv_flags, drv) < 0) {
1126         fprintf(stderr, "qemu: could not open disk image %s: %s\n",
1127                         file, strerror(errno));
1128         return NULL;
1129     }
1130
1131     if (bdrv_key_required(dinfo->bdrv))
1132         autostart = 0;
1133     *fatal_error = 0;
1134     return dinfo;
1135 }
1136
1137 static int drive_init_func(QemuOpts *opts, void *opaque)
1138 {
1139     QEMUMachine *machine = opaque;
1140     int fatal_error = 0;
1141
1142     if (drive_init(opts, machine, &fatal_error) == NULL) {
1143         if (fatal_error)
1144             return 1;
1145     }
1146     return 0;
1147 }
1148
1149 static int drive_enable_snapshot(QemuOpts *opts, void *opaque)
1150 {
1151     if (NULL == qemu_opt_get(opts, "snapshot")) {
1152         qemu_opt_set(opts, "snapshot", "on");
1153     }
1154     return 0;
1155 }
1156
1157 void qemu_register_boot_set(QEMUBootSetHandler *func, void *opaque)
1158 {
1159     boot_set_handler = func;
1160     boot_set_opaque = opaque;
1161 }
1162
1163 int qemu_boot_set(const char *boot_devices)
1164 {
1165     if (!boot_set_handler) {
1166         return -EINVAL;
1167     }
1168     return boot_set_handler(boot_set_opaque, boot_devices);
1169 }
1170
1171 static void validate_bootdevices(char *devices)
1172 {
1173     /* We just do some generic consistency checks */
1174     const char *p;
1175     int bitmap = 0;
1176
1177     for (p = devices; *p != '\0'; p++) {
1178         /* Allowed boot devices are:
1179          * a-b: floppy disk drives
1180          * c-f: IDE disk drives
1181          * g-m: machine implementation dependant drives
1182          * n-p: network devices
1183          * It's up to each machine implementation to check if the given boot
1184          * devices match the actual hardware implementation and firmware
1185          * features.
1186          */
1187         if (*p < 'a' || *p > 'p') {
1188             fprintf(stderr, "Invalid boot device '%c'\n", *p);
1189             exit(1);
1190         }
1191         if (bitmap & (1 << (*p - 'a'))) {
1192             fprintf(stderr, "Boot device '%c' was given twice\n", *p);
1193             exit(1);
1194         }
1195         bitmap |= 1 << (*p - 'a');
1196     }
1197 }
1198
1199 static void restore_boot_devices(void *opaque)
1200 {
1201     char *standard_boot_devices = opaque;
1202     static int first = 1;
1203
1204     /* Restore boot order and remove ourselves after the first boot */
1205     if (first) {
1206         first = 0;
1207         return;
1208     }
1209
1210     qemu_boot_set(standard_boot_devices);
1211
1212     qemu_unregister_reset(restore_boot_devices, standard_boot_devices);
1213     qemu_free(standard_boot_devices);
1214 }
1215
1216 static void numa_add(const char *optarg)
1217 {
1218     char option[128];
1219     char *endptr;
1220     unsigned long long value, endvalue;
1221     int nodenr;
1222
1223     optarg = get_opt_name(option, 128, optarg, ',') + 1;
1224     if (!strcmp(option, "node")) {
1225         if (get_param_value(option, 128, "nodeid", optarg) == 0) {
1226             nodenr = nb_numa_nodes;
1227         } else {
1228             nodenr = strtoull(option, NULL, 10);
1229         }
1230
1231         if (get_param_value(option, 128, "mem", optarg) == 0) {
1232             node_mem[nodenr] = 0;
1233         } else {
1234             value = strtoull(option, &endptr, 0);
1235             switch (*endptr) {
1236             case 0: case 'M': case 'm':
1237                 value <<= 20;
1238                 break;
1239             case 'G': case 'g':
1240                 value <<= 30;
1241                 break;
1242             }
1243             node_mem[nodenr] = value;
1244         }
1245         if (get_param_value(option, 128, "cpus", optarg) == 0) {
1246             node_cpumask[nodenr] = 0;
1247         } else {
1248             value = strtoull(option, &endptr, 10);
1249             if (value >= 64) {
1250                 value = 63;
1251                 fprintf(stderr, "only 64 CPUs in NUMA mode supported.\n");
1252             } else {
1253                 if (*endptr == '-') {
1254                     endvalue = strtoull(endptr+1, &endptr, 10);
1255                     if (endvalue >= 63) {
1256                         endvalue = 62;
1257                         fprintf(stderr,
1258                             "only 63 CPUs in NUMA mode supported.\n");
1259                     }
1260                     value = (2ULL << endvalue) - (1ULL << value);
1261                 } else {
1262                     value = 1ULL << value;
1263                 }
1264             }
1265             node_cpumask[nodenr] = value;
1266         }
1267         nb_numa_nodes++;
1268     }
1269     return;
1270 }
1271
1272 static void smp_parse(const char *optarg)
1273 {
1274     int smp, sockets = 0, threads = 0, cores = 0;
1275     char *endptr;
1276     char option[128];
1277
1278     smp = strtoul(optarg, &endptr, 10);
1279     if (endptr != optarg) {
1280         if (*endptr == ',') {
1281             endptr++;
1282         }
1283     }
1284     if (get_param_value(option, 128, "sockets", endptr) != 0)
1285         sockets = strtoull(option, NULL, 10);
1286     if (get_param_value(option, 128, "cores", endptr) != 0)
1287         cores = strtoull(option, NULL, 10);
1288     if (get_param_value(option, 128, "threads", endptr) != 0)
1289         threads = strtoull(option, NULL, 10);
1290     if (get_param_value(option, 128, "maxcpus", endptr) != 0)
1291         max_cpus = strtoull(option, NULL, 10);
1292
1293     /* compute missing values, prefer sockets over cores over threads */
1294     if (smp == 0 || sockets == 0) {
1295         sockets = sockets > 0 ? sockets : 1;
1296         cores = cores > 0 ? cores : 1;
1297         threads = threads > 0 ? threads : 1;
1298         if (smp == 0) {
1299             smp = cores * threads * sockets;
1300         }
1301     } else {
1302         if (cores == 0) {
1303             threads = threads > 0 ? threads : 1;
1304             cores = smp / (sockets * threads);
1305         } else {
1306             if (sockets) {
1307                 threads = smp / (cores * sockets);
1308             }
1309         }
1310     }
1311     smp_cpus = smp;
1312     smp_cores = cores > 0 ? cores : 1;
1313     smp_threads = threads > 0 ? threads : 1;
1314     if (max_cpus == 0)
1315         max_cpus = smp_cpus;
1316 }
1317
1318 /***********************************************************/
1319 /* USB devices */
1320
1321 static int usb_device_add(const char *devname, int is_hotplug)
1322 {
1323     const char *p;
1324     USBDevice *dev = NULL;
1325
1326     if (!usb_enabled)
1327         return -1;
1328
1329     /* drivers with .usbdevice_name entry in USBDeviceInfo */
1330     dev = usbdevice_create(devname);
1331     if (dev)
1332         goto done;
1333
1334     /* the other ones */
1335     if (strstart(devname, "host:", &p)) {
1336         dev = usb_host_device_open(p);
1337     } else if (!strcmp(devname, "bt") || strstart(devname, "bt:", &p)) {
1338         dev = usb_bt_init(devname[2] ? hci_init(p) :
1339                         bt_new_hci(qemu_find_bt_vlan(0)));
1340     } else {
1341         return -1;
1342     }
1343     if (!dev)
1344         return -1;
1345
1346 done:
1347     return 0;
1348 }
1349
1350 static int usb_device_del(const char *devname)
1351 {
1352     int bus_num, addr;
1353     const char *p;
1354
1355     if (strstart(devname, "host:", &p))
1356         return usb_host_device_close(p);
1357
1358     if (!usb_enabled)
1359         return -1;
1360
1361     p = strchr(devname, '.');
1362     if (!p)
1363         return -1;
1364     bus_num = strtoul(devname, NULL, 0);
1365     addr = strtoul(p + 1, NULL, 0);
1366
1367     return usb_device_delete_addr(bus_num, addr);
1368 }
1369
1370 static int usb_parse(const char *cmdline)
1371 {
1372     int r;
1373     r = usb_device_add(cmdline, 0);
1374     if (r < 0) {
1375         fprintf(stderr, "qemu: could not add USB device '%s'\n", cmdline);
1376     }
1377     return r;
1378 }
1379
1380 void do_usb_add(Monitor *mon, const QDict *qdict)
1381 {
1382     const char *devname = qdict_get_str(qdict, "devname");
1383     if (usb_device_add(devname, 1) < 0) {
1384         error_report("could not add USB device '%s'", devname);
1385     }
1386 }
1387
1388 void do_usb_del(Monitor *mon, const QDict *qdict)
1389 {
1390     const char *devname = qdict_get_str(qdict, "devname");
1391     if (usb_device_del(devname) < 0) {
1392         error_report("could not delete USB device '%s'", devname);
1393     }
1394 }
1395
1396 /***********************************************************/
1397 /* PCMCIA/Cardbus */
1398
1399 static struct pcmcia_socket_entry_s {
1400     PCMCIASocket *socket;
1401     struct pcmcia_socket_entry_s *next;
1402 } *pcmcia_sockets = 0;
1403
1404 void pcmcia_socket_register(PCMCIASocket *socket)
1405 {
1406     struct pcmcia_socket_entry_s *entry;
1407
1408     entry = qemu_malloc(sizeof(struct pcmcia_socket_entry_s));
1409     entry->socket = socket;
1410     entry->next = pcmcia_sockets;
1411     pcmcia_sockets = entry;
1412 }
1413
1414 void pcmcia_socket_unregister(PCMCIASocket *socket)
1415 {
1416     struct pcmcia_socket_entry_s *entry, **ptr;
1417
1418     ptr = &pcmcia_sockets;
1419     for (entry = *ptr; entry; ptr = &entry->next, entry = *ptr)
1420         if (entry->socket == socket) {
1421             *ptr = entry->next;
1422             qemu_free(entry);
1423         }
1424 }
1425
1426 void pcmcia_info(Monitor *mon)
1427 {
1428     struct pcmcia_socket_entry_s *iter;
1429
1430     if (!pcmcia_sockets)
1431         monitor_printf(mon, "No PCMCIA sockets\n");
1432
1433     for (iter = pcmcia_sockets; iter; iter = iter->next)
1434         monitor_printf(mon, "%s: %s\n", iter->socket->slot_string,
1435                        iter->socket->attached ? iter->socket->card_string :
1436                        "Empty");
1437 }
1438
1439 /***********************************************************/
1440 /* I/O handling */
1441
1442 typedef struct IOHandlerRecord {
1443     int fd;
1444     IOCanReadHandler *fd_read_poll;
1445     IOHandler *fd_read;
1446     IOHandler *fd_write;
1447     int deleted;
1448     void *opaque;
1449     /* temporary data */
1450     struct pollfd *ufd;
1451     QLIST_ENTRY(IOHandlerRecord) next;
1452 } IOHandlerRecord;
1453
1454 static QLIST_HEAD(, IOHandlerRecord) io_handlers =
1455     QLIST_HEAD_INITIALIZER(io_handlers);
1456
1457
1458 /* XXX: fd_read_poll should be suppressed, but an API change is
1459    necessary in the character devices to suppress fd_can_read(). */
1460 int qemu_set_fd_handler2(int fd,
1461                          IOCanReadHandler *fd_read_poll,
1462                          IOHandler *fd_read,
1463                          IOHandler *fd_write,
1464                          void *opaque)
1465 {
1466     IOHandlerRecord *ioh;
1467
1468     if (!fd_read && !fd_write) {
1469         QLIST_FOREACH(ioh, &io_handlers, next) {
1470             if (ioh->fd == fd) {
1471                 ioh->deleted = 1;
1472                 break;
1473             }
1474         }
1475     } else {
1476         QLIST_FOREACH(ioh, &io_handlers, next) {
1477             if (ioh->fd == fd)
1478                 goto found;
1479         }
1480         ioh = qemu_mallocz(sizeof(IOHandlerRecord));
1481         QLIST_INSERT_HEAD(&io_handlers, ioh, next);
1482     found:
1483         ioh->fd = fd;
1484         ioh->fd_read_poll = fd_read_poll;
1485         ioh->fd_read = fd_read;
1486         ioh->fd_write = fd_write;
1487         ioh->opaque = opaque;
1488         ioh->deleted = 0;
1489     }
1490     return 0;
1491 }
1492
1493 int qemu_set_fd_handler(int fd,
1494                         IOHandler *fd_read,
1495                         IOHandler *fd_write,
1496                         void *opaque)
1497 {
1498     return qemu_set_fd_handler2(fd, NULL, fd_read, fd_write, opaque);
1499 }
1500
1501 #ifdef _WIN32
1502 /***********************************************************/
1503 /* Polling handling */
1504
1505 typedef struct PollingEntry {
1506     PollingFunc *func;
1507     void *opaque;
1508     struct PollingEntry *next;
1509 } PollingEntry;
1510
1511 static PollingEntry *first_polling_entry;
1512
1513 int qemu_add_polling_cb(PollingFunc *func, void *opaque)
1514 {
1515     PollingEntry **ppe, *pe;
1516     pe = qemu_mallocz(sizeof(PollingEntry));
1517     pe->func = func;
1518     pe->opaque = opaque;
1519     for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next);
1520     *ppe = pe;
1521     return 0;
1522 }
1523
1524 void qemu_del_polling_cb(PollingFunc *func, void *opaque)
1525 {
1526     PollingEntry **ppe, *pe;
1527     for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next) {
1528         pe = *ppe;
1529         if (pe->func == func && pe->opaque == opaque) {
1530             *ppe = pe->next;
1531             qemu_free(pe);
1532             break;
1533         }
1534     }
1535 }
1536
1537 /***********************************************************/
1538 /* Wait objects support */
1539 typedef struct WaitObjects {
1540     int num;
1541     HANDLE events[MAXIMUM_WAIT_OBJECTS + 1];
1542     WaitObjectFunc *func[MAXIMUM_WAIT_OBJECTS + 1];
1543     void *opaque[MAXIMUM_WAIT_OBJECTS + 1];
1544 } WaitObjects;
1545
1546 static WaitObjects wait_objects = {0};
1547
1548 int qemu_add_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1549 {
1550     WaitObjects *w = &wait_objects;
1551
1552     if (w->num >= MAXIMUM_WAIT_OBJECTS)
1553         return -1;
1554     w->events[w->num] = handle;
1555     w->func[w->num] = func;
1556     w->opaque[w->num] = opaque;
1557     w->num++;
1558     return 0;
1559 }
1560
1561 void qemu_del_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1562 {
1563     int i, found;
1564     WaitObjects *w = &wait_objects;
1565
1566     found = 0;
1567     for (i = 0; i < w->num; i++) {
1568         if (w->events[i] == handle)
1569             found = 1;
1570         if (found) {
1571             w->events[i] = w->events[i + 1];
1572             w->func[i] = w->func[i + 1];
1573             w->opaque[i] = w->opaque[i + 1];
1574         }
1575     }
1576     if (found)
1577         w->num--;
1578 }
1579 #endif
1580
1581 /***********************************************************/
1582 /* machine registration */
1583
1584 static QEMUMachine *first_machine = NULL;
1585 QEMUMachine *current_machine = NULL;
1586
1587 int qemu_register_machine(QEMUMachine *m)
1588 {
1589     QEMUMachine **pm;
1590     pm = &first_machine;
1591     while (*pm != NULL)
1592         pm = &(*pm)->next;
1593     m->next = NULL;
1594     *pm = m;
1595     return 0;
1596 }
1597
1598 static QEMUMachine *find_machine(const char *name)
1599 {
1600     QEMUMachine *m;
1601
1602     for(m = first_machine; m != NULL; m = m->next) {
1603         if (!strcmp(m->name, name))
1604             return m;
1605         if (m->alias && !strcmp(m->alias, name))
1606             return m;
1607     }
1608     return NULL;
1609 }
1610
1611 static QEMUMachine *find_default_machine(void)
1612 {
1613     QEMUMachine *m;
1614
1615     for(m = first_machine; m != NULL; m = m->next) {
1616         if (m->is_default) {
1617             return m;
1618         }
1619     }
1620     return NULL;
1621 }
1622
1623 /***********************************************************/
1624 /* main execution loop */
1625
1626 static void gui_update(void *opaque)
1627 {
1628     uint64_t interval = GUI_REFRESH_INTERVAL;
1629     DisplayState *ds = opaque;
1630     DisplayChangeListener *dcl = ds->listeners;
1631
1632     qemu_flush_coalesced_mmio_buffer();
1633     dpy_refresh(ds);
1634
1635     while (dcl != NULL) {
1636         if (dcl->gui_timer_interval &&
1637             dcl->gui_timer_interval < interval)
1638             interval = dcl->gui_timer_interval;
1639         dcl = dcl->next;
1640     }
1641     qemu_mod_timer(ds->gui_timer, interval + qemu_get_clock(rt_clock));
1642 }
1643
1644 static void nographic_update(void *opaque)
1645 {
1646     uint64_t interval = GUI_REFRESH_INTERVAL;
1647
1648     qemu_flush_coalesced_mmio_buffer();
1649     qemu_mod_timer(nographic_timer, interval + qemu_get_clock(rt_clock));
1650 }
1651
1652 struct vm_change_state_entry {
1653     VMChangeStateHandler *cb;
1654     void *opaque;
1655     QLIST_ENTRY (vm_change_state_entry) entries;
1656 };
1657
1658 static QLIST_HEAD(vm_change_state_head, vm_change_state_entry) vm_change_state_head;
1659
1660 VMChangeStateEntry *qemu_add_vm_change_state_handler(VMChangeStateHandler *cb,
1661                                                      void *opaque)
1662 {
1663     VMChangeStateEntry *e;
1664
1665     e = qemu_mallocz(sizeof (*e));
1666
1667     e->cb = cb;
1668     e->opaque = opaque;
1669     QLIST_INSERT_HEAD(&vm_change_state_head, e, entries);
1670     return e;
1671 }
1672
1673 void qemu_del_vm_change_state_handler(VMChangeStateEntry *e)
1674 {
1675     QLIST_REMOVE (e, entries);
1676     qemu_free (e);
1677 }
1678
1679 void vm_state_notify(int running, int reason)
1680 {
1681     VMChangeStateEntry *e;
1682
1683     for (e = vm_change_state_head.lh_first; e; e = e->entries.le_next) {
1684         e->cb(e->opaque, running, reason);
1685     }
1686 }
1687
1688 void vm_start(void)
1689 {
1690     if (!vm_running) {
1691         cpu_enable_ticks();
1692         vm_running = 1;
1693         vm_state_notify(1, 0);
1694         resume_all_vcpus();
1695         monitor_protocol_event(QEVENT_RESUME, NULL);
1696     }
1697 }
1698
1699 /* reset/shutdown handler */
1700
1701 typedef struct QEMUResetEntry {
1702     QTAILQ_ENTRY(QEMUResetEntry) entry;
1703     QEMUResetHandler *func;
1704     void *opaque;
1705 } QEMUResetEntry;
1706
1707 static QTAILQ_HEAD(reset_handlers, QEMUResetEntry) reset_handlers =
1708     QTAILQ_HEAD_INITIALIZER(reset_handlers);
1709 static int reset_requested;
1710 static int shutdown_requested;
1711 static int powerdown_requested;
1712 int debug_requested;
1713 int vmstop_requested;
1714
1715 int qemu_shutdown_requested(void)
1716 {
1717     int r = shutdown_requested;
1718     shutdown_requested = 0;
1719     return r;
1720 }
1721
1722 int qemu_reset_requested(void)
1723 {
1724     int r = reset_requested;
1725     reset_requested = 0;
1726     return r;
1727 }
1728
1729 int qemu_powerdown_requested(void)
1730 {
1731     int r = powerdown_requested;
1732     powerdown_requested = 0;
1733     return r;
1734 }
1735
1736 static int qemu_debug_requested(void)
1737 {
1738     int r = debug_requested;
1739     debug_requested = 0;
1740     return r;
1741 }
1742
1743 static int qemu_vmstop_requested(void)
1744 {
1745     int r = vmstop_requested;
1746     vmstop_requested = 0;
1747     return r;
1748 }
1749
1750 void qemu_register_reset(QEMUResetHandler *func, void *opaque)
1751 {
1752     QEMUResetEntry *re = qemu_mallocz(sizeof(QEMUResetEntry));
1753
1754     re->func = func;
1755     re->opaque = opaque;
1756     QTAILQ_INSERT_TAIL(&reset_handlers, re, entry);
1757 }
1758
1759 void qemu_unregister_reset(QEMUResetHandler *func, void *opaque)
1760 {
1761     QEMUResetEntry *re;
1762
1763     QTAILQ_FOREACH(re, &reset_handlers, entry) {
1764         if (re->func == func && re->opaque == opaque) {
1765             QTAILQ_REMOVE(&reset_handlers, re, entry);
1766             qemu_free(re);
1767             return;
1768         }
1769     }
1770 }
1771
1772 void qemu_system_reset(void)
1773 {
1774     QEMUResetEntry *re, *nre;
1775
1776     /* reset all devices */
1777     QTAILQ_FOREACH_SAFE(re, &reset_handlers, entry, nre) {
1778         re->func(re->opaque);
1779     }
1780     monitor_protocol_event(QEVENT_RESET, NULL);
1781     cpu_synchronize_all_post_reset();
1782 }
1783
1784 void qemu_system_reset_request(void)
1785 {
1786     if (no_reboot) {
1787         shutdown_requested = 1;
1788     } else {
1789         reset_requested = 1;
1790     }
1791     qemu_notify_event();
1792 }
1793
1794 void qemu_system_shutdown_request(void)
1795 {
1796     shutdown_requested = 1;
1797     qemu_notify_event();
1798 }
1799
1800 void qemu_system_powerdown_request(void)
1801 {
1802     powerdown_requested = 1;
1803     qemu_notify_event();
1804 }
1805
1806 #ifdef _WIN32
1807 static void host_main_loop_wait(int *timeout)
1808 {
1809     int ret, ret2, i;
1810     PollingEntry *pe;
1811
1812
1813     /* XXX: need to suppress polling by better using win32 events */
1814     ret = 0;
1815     for(pe = first_polling_entry; pe != NULL; pe = pe->next) {
1816         ret |= pe->func(pe->opaque);
1817     }
1818     if (ret == 0) {
1819         int err;
1820         WaitObjects *w = &wait_objects;
1821
1822         ret = WaitForMultipleObjects(w->num, w->events, FALSE, *timeout);
1823         if (WAIT_OBJECT_0 + 0 <= ret && ret <= WAIT_OBJECT_0 + w->num - 1) {
1824             if (w->func[ret - WAIT_OBJECT_0])
1825                 w->func[ret - WAIT_OBJECT_0](w->opaque[ret - WAIT_OBJECT_0]);
1826
1827             /* Check for additional signaled events */
1828             for(i = (ret - WAIT_OBJECT_0 + 1); i < w->num; i++) {
1829
1830                 /* Check if event is signaled */
1831                 ret2 = WaitForSingleObject(w->events[i], 0);
1832                 if(ret2 == WAIT_OBJECT_0) {
1833                     if (w->func[i])
1834                         w->func[i](w->opaque[i]);
1835                 } else if (ret2 == WAIT_TIMEOUT) {
1836                 } else {
1837                     err = GetLastError();
1838                     fprintf(stderr, "WaitForSingleObject error %d %d\n", i, err);
1839                 }
1840             }
1841         } else if (ret == WAIT_TIMEOUT) {
1842         } else {
1843             err = GetLastError();
1844             fprintf(stderr, "WaitForMultipleObjects error %d %d\n", ret, err);
1845         }
1846     }
1847
1848     *timeout = 0;
1849 }
1850 #else
1851 static void host_main_loop_wait(int *timeout)
1852 {
1853 }
1854 #endif
1855
1856 void main_loop_wait(int nonblocking)
1857 {
1858     IOHandlerRecord *ioh;
1859     fd_set rfds, wfds, xfds;
1860     int ret, nfds;
1861     struct timeval tv;
1862     int timeout;
1863
1864     if (nonblocking)
1865         timeout = 0;
1866     else {
1867         timeout = qemu_calculate_timeout();
1868         qemu_bh_update_timeout(&timeout);
1869     }
1870
1871     host_main_loop_wait(&timeout);
1872
1873     /* poll any events */
1874     /* XXX: separate device handlers from system ones */
1875     nfds = -1;
1876     FD_ZERO(&rfds);
1877     FD_ZERO(&wfds);
1878     FD_ZERO(&xfds);
1879     QLIST_FOREACH(ioh, &io_handlers, next) {
1880         if (ioh->deleted)
1881             continue;
1882         if (ioh->fd_read &&
1883             (!ioh->fd_read_poll ||
1884              ioh->fd_read_poll(ioh->opaque) != 0)) {
1885             FD_SET(ioh->fd, &rfds);
1886             if (ioh->fd > nfds)
1887                 nfds = ioh->fd;
1888         }
1889         if (ioh->fd_write) {
1890             FD_SET(ioh->fd, &wfds);
1891             if (ioh->fd > nfds)
1892                 nfds = ioh->fd;
1893         }
1894     }
1895
1896     tv.tv_sec = timeout / 1000;
1897     tv.tv_usec = (timeout % 1000) * 1000;
1898
1899     slirp_select_fill(&nfds, &rfds, &wfds, &xfds);
1900
1901     qemu_mutex_unlock_iothread();
1902     ret = select(nfds + 1, &rfds, &wfds, &xfds, &tv);
1903     qemu_mutex_lock_iothread();
1904     if (ret > 0) {
1905         IOHandlerRecord *pioh;
1906
1907         QLIST_FOREACH_SAFE(ioh, &io_handlers, next, pioh) {
1908             if (ioh->deleted) {
1909                 QLIST_REMOVE(ioh, next);
1910                 qemu_free(ioh);
1911                 continue;
1912             }
1913             if (ioh->fd_read && FD_ISSET(ioh->fd, &rfds)) {
1914                 ioh->fd_read(ioh->opaque);
1915             }
1916             if (ioh->fd_write && FD_ISSET(ioh->fd, &wfds)) {
1917                 ioh->fd_write(ioh->opaque);
1918             }
1919         }
1920     }
1921
1922     slirp_select_poll(&rfds, &wfds, &xfds, (ret < 0));
1923
1924     qemu_run_all_timers();
1925
1926     /* Check bottom-halves last in case any of the earlier events triggered
1927        them.  */
1928     qemu_bh_poll();
1929
1930 }
1931
1932 static int vm_can_run(void)
1933 {
1934     if (powerdown_requested)
1935         return 0;
1936     if (reset_requested)
1937         return 0;
1938     if (shutdown_requested)
1939         return 0;
1940     if (debug_requested)
1941         return 0;
1942     return 1;
1943 }
1944
1945 qemu_irq qemu_system_powerdown;
1946
1947 static void main_loop(void)
1948 {
1949     int r;
1950
1951     qemu_main_loop_start();
1952
1953     for (;;) {
1954         do {
1955             bool nonblocking = false;
1956 #ifdef CONFIG_PROFILER
1957             int64_t ti;
1958 #endif
1959 #ifndef CONFIG_IOTHREAD
1960             nonblocking = tcg_cpu_exec();
1961 #endif
1962 #ifdef CONFIG_PROFILER
1963             ti = profile_getclock();
1964 #endif
1965             main_loop_wait(nonblocking);
1966 #ifdef CONFIG_PROFILER
1967             dev_time += profile_getclock() - ti;
1968 #endif
1969         } while (vm_can_run());
1970
1971         if ((r = qemu_debug_requested())) {
1972             vm_stop(r);
1973         }
1974         if (qemu_shutdown_requested()) {
1975             monitor_protocol_event(QEVENT_SHUTDOWN, NULL);
1976             if (no_shutdown) {
1977                 vm_stop(0);
1978                 no_shutdown = 0;
1979             } else
1980                 break;
1981         }
1982         if (qemu_reset_requested()) {
1983             pause_all_vcpus();
1984             qemu_system_reset();
1985             resume_all_vcpus();
1986         }
1987         if (qemu_powerdown_requested()) {
1988             monitor_protocol_event(QEVENT_POWERDOWN, NULL);
1989             qemu_irq_raise(qemu_system_powerdown);
1990         }
1991         if ((r = qemu_vmstop_requested())) {
1992             vm_stop(r);
1993         }
1994     }
1995     pause_all_vcpus();
1996 }
1997
1998 static void version(void)
1999 {
2000     printf("QEMU emulator version " QEMU_VERSION QEMU_PKGVERSION ", Copyright (c) 2003-2008 Fabrice Bellard\n");
2001 }
2002
2003 static void help(int exitcode)
2004 {
2005     const char *options_help =
2006 #define DEF(option, opt_arg, opt_enum, opt_help, arch_mask)     \
2007         opt_help
2008 #define DEFHEADING(text) stringify(text) "\n"
2009 #include "qemu-options.h"
2010 #undef DEF
2011 #undef DEFHEADING
2012 #undef GEN_DOCS
2013         ;
2014     version();
2015     printf("usage: %s [options] [disk_image]\n"
2016            "\n"
2017            "'disk_image' is a raw hard disk image for IDE hard disk 0\n"
2018            "\n"
2019            "%s\n"
2020            "During emulation, the following keys are useful:\n"
2021            "ctrl-alt-f      toggle full screen\n"
2022            "ctrl-alt-n      switch to virtual console 'n'\n"
2023            "ctrl-alt        toggle mouse and keyboard grab\n"
2024            "\n"
2025            "When using -nographic, press 'ctrl-a h' to get some help.\n",
2026            "qemu",
2027            options_help);
2028     exit(exitcode);
2029 }
2030
2031 #define HAS_ARG 0x0001
2032
2033 enum {
2034 #define DEF(option, opt_arg, opt_enum, opt_help, arch_mask)     \
2035     opt_enum,
2036 #define DEFHEADING(text)
2037 #include "qemu-options.h"
2038 #undef DEF
2039 #undef DEFHEADING
2040 #undef GEN_DOCS
2041 };
2042
2043 typedef struct QEMUOption {
2044     const char *name;
2045     int flags;
2046     int index;
2047     uint32_t arch_mask;
2048 } QEMUOption;
2049
2050 static const QEMUOption qemu_options[] = {
2051     { "h", 0, QEMU_OPTION_h, QEMU_ARCH_ALL },
2052 #define DEF(option, opt_arg, opt_enum, opt_help, arch_mask)     \
2053     { option, opt_arg, opt_enum, arch_mask },
2054 #define DEFHEADING(text)
2055 #include "qemu-options.h"
2056 #undef DEF
2057 #undef DEFHEADING
2058 #undef GEN_DOCS
2059     { NULL },
2060 };
2061 static void select_vgahw (const char *p)
2062 {
2063     const char *opts;
2064
2065     default_vga = 0;
2066     vga_interface_type = VGA_NONE;
2067     if (strstart(p, "std", &opts)) {
2068         vga_interface_type = VGA_STD;
2069     } else if (strstart(p, "cirrus", &opts)) {
2070         vga_interface_type = VGA_CIRRUS;
2071     } else if (strstart(p, "vmware", &opts)) {
2072         vga_interface_type = VGA_VMWARE;
2073     } else if (strstart(p, "xenfb", &opts)) {
2074         vga_interface_type = VGA_XENFB;
2075     } else if (!strstart(p, "none", &opts)) {
2076     invalid_vga:
2077         fprintf(stderr, "Unknown vga type: %s\n", p);
2078         exit(1);
2079     }
2080     while (*opts) {
2081         const char *nextopt;
2082
2083         if (strstart(opts, ",retrace=", &nextopt)) {
2084             opts = nextopt;
2085             if (strstart(opts, "dumb", &nextopt))
2086                 vga_retrace_method = VGA_RETRACE_DUMB;
2087             else if (strstart(opts, "precise", &nextopt))
2088                 vga_retrace_method = VGA_RETRACE_PRECISE;
2089             else goto invalid_vga;
2090         } else goto invalid_vga;
2091         opts = nextopt;
2092     }
2093 }
2094
2095 static int balloon_parse(const char *arg)
2096 {
2097     QemuOpts *opts;
2098
2099     if (strcmp(arg, "none") == 0) {
2100         return 0;
2101     }
2102
2103     if (!strncmp(arg, "virtio", 6)) {
2104         if (arg[6] == ',') {
2105             /* have params -> parse them */
2106             opts = qemu_opts_parse(&qemu_device_opts, arg+7, 0);
2107             if (!opts)
2108                 return  -1;
2109         } else {
2110             /* create empty opts */
2111             opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
2112         }
2113         qemu_opt_set(opts, "driver", "virtio-balloon-pci");
2114         return 0;
2115     }
2116
2117     return -1;
2118 }
2119
2120 #ifdef _WIN32
2121 static BOOL WINAPI qemu_ctrl_handler(DWORD type)
2122 {
2123     exit(STATUS_CONTROL_C_EXIT);
2124     return TRUE;
2125 }
2126 #endif
2127
2128 #ifndef _WIN32
2129
2130 static void termsig_handler(int signal)
2131 {
2132     qemu_system_shutdown_request();
2133 }
2134
2135 static void sigchld_handler(int signal)
2136 {
2137     waitpid(-1, NULL, WNOHANG);
2138 }
2139
2140 static void sighandler_setup(void)
2141 {
2142     struct sigaction act;
2143
2144     memset(&act, 0, sizeof(act));
2145     act.sa_handler = termsig_handler;
2146     sigaction(SIGINT,  &act, NULL);
2147     sigaction(SIGHUP,  &act, NULL);
2148     sigaction(SIGTERM, &act, NULL);
2149
2150     act.sa_handler = sigchld_handler;
2151     act.sa_flags = SA_NOCLDSTOP;
2152     sigaction(SIGCHLD, &act, NULL);
2153 }
2154
2155 #endif
2156
2157 #ifdef _WIN32
2158 /* Look for support files in the same directory as the executable.  */
2159 static char *find_datadir(const char *argv0)
2160 {
2161     char *p;
2162     char buf[MAX_PATH];
2163     DWORD len;
2164
2165     len = GetModuleFileName(NULL, buf, sizeof(buf) - 1);
2166     if (len == 0) {
2167         return NULL;
2168     }
2169
2170     buf[len] = 0;
2171     p = buf + len - 1;
2172     while (p != buf && *p != '\\')
2173         p--;
2174     *p = 0;
2175     if (access(buf, R_OK) == 0) {
2176         return qemu_strdup(buf);
2177     }
2178     return NULL;
2179 }
2180 #else /* !_WIN32 */
2181
2182 /* Find a likely location for support files using the location of the binary.
2183    For installed binaries this will be "$bindir/../share/qemu".  When
2184    running from the build tree this will be "$bindir/../pc-bios".  */
2185 #define SHARE_SUFFIX "/share/qemu"
2186 #define BUILD_SUFFIX "/pc-bios"
2187 static char *find_datadir(const char *argv0)
2188 {
2189     char *dir;
2190     char *p = NULL;
2191     char *res;
2192     char buf[PATH_MAX];
2193     size_t max_len;
2194
2195 #if defined(__linux__)
2196     {
2197         int len;
2198         len = readlink("/proc/self/exe", buf, sizeof(buf) - 1);
2199         if (len > 0) {
2200             buf[len] = 0;
2201             p = buf;
2202         }
2203     }
2204 #elif defined(__FreeBSD__)
2205     {
2206         static int mib[4] = {CTL_KERN, KERN_PROC, KERN_PROC_PATHNAME, -1};
2207         size_t len = sizeof(buf) - 1;
2208
2209         *buf = '\0';
2210         if (!sysctl(mib, sizeof(mib)/sizeof(*mib), buf, &len, NULL, 0) &&
2211             *buf) {
2212             buf[sizeof(buf) - 1] = '\0';
2213             p = buf;
2214         }
2215     }
2216 #endif
2217     /* If we don't have any way of figuring out the actual executable
2218        location then try argv[0].  */
2219     if (!p) {
2220         p = realpath(argv0, buf);
2221         if (!p) {
2222             return NULL;
2223         }
2224     }
2225     dir = dirname(p);
2226     dir = dirname(dir);
2227
2228     max_len = strlen(dir) +
2229         MAX(strlen(SHARE_SUFFIX), strlen(BUILD_SUFFIX)) + 1;
2230     res = qemu_mallocz(max_len);
2231     snprintf(res, max_len, "%s%s", dir, SHARE_SUFFIX);
2232     if (access(res, R_OK)) {
2233         snprintf(res, max_len, "%s%s", dir, BUILD_SUFFIX);
2234         if (access(res, R_OK)) {
2235             qemu_free(res);
2236             res = NULL;
2237         }
2238     }
2239
2240     return res;
2241 }
2242 #undef SHARE_SUFFIX
2243 #undef BUILD_SUFFIX
2244 #endif
2245
2246 char *qemu_find_file(int type, const char *name)
2247 {
2248     int len;
2249     const char *subdir;
2250     char *buf;
2251
2252     /* If name contains path separators then try it as a straight path.  */
2253     if ((strchr(name, '/') || strchr(name, '\\'))
2254         && access(name, R_OK) == 0) {
2255         return qemu_strdup(name);
2256     }
2257     switch (type) {
2258     case QEMU_FILE_TYPE_BIOS:
2259         subdir = "";
2260         break;
2261     case QEMU_FILE_TYPE_KEYMAP:
2262         subdir = "keymaps/";
2263         break;
2264     default:
2265         abort();
2266     }
2267     len = strlen(data_dir) + strlen(name) + strlen(subdir) + 2;
2268     buf = qemu_mallocz(len);
2269     snprintf(buf, len, "%s/%s%s", data_dir, subdir, name);
2270     if (access(buf, R_OK)) {
2271         qemu_free(buf);
2272         return NULL;
2273     }
2274     return buf;
2275 }
2276
2277 static int device_help_func(QemuOpts *opts, void *opaque)
2278 {
2279     return qdev_device_help(opts);
2280 }
2281
2282 static int device_init_func(QemuOpts *opts, void *opaque)
2283 {
2284     DeviceState *dev;
2285
2286     dev = qdev_device_add(opts);
2287     if (!dev)
2288         return -1;
2289     return 0;
2290 }
2291
2292 static int chardev_init_func(QemuOpts *opts, void *opaque)
2293 {
2294     CharDriverState *chr;
2295
2296     chr = qemu_chr_open_opts(opts, NULL);
2297     if (!chr)
2298         return -1;
2299     return 0;
2300 }
2301
2302 #ifdef CONFIG_LINUX
2303 static int fsdev_init_func(QemuOpts *opts, void *opaque)
2304 {
2305     int ret;
2306     ret = qemu_fsdev_add(opts);
2307
2308     return ret;
2309 }
2310 #endif
2311
2312 static int mon_init_func(QemuOpts *opts, void *opaque)
2313 {
2314     CharDriverState *chr;
2315     const char *chardev;
2316     const char *mode;
2317     int flags;
2318
2319     mode = qemu_opt_get(opts, "mode");
2320     if (mode == NULL) {
2321         mode = "readline";
2322     }
2323     if (strcmp(mode, "readline") == 0) {
2324         flags = MONITOR_USE_READLINE;
2325     } else if (strcmp(mode, "control") == 0) {
2326         flags = MONITOR_USE_CONTROL;
2327     } else {
2328         fprintf(stderr, "unknown monitor mode \"%s\"\n", mode);
2329         exit(1);
2330     }
2331
2332     if (qemu_opt_get_bool(opts, "default", 0))
2333         flags |= MONITOR_IS_DEFAULT;
2334
2335     chardev = qemu_opt_get(opts, "chardev");
2336     chr = qemu_chr_find(chardev);
2337     if (chr == NULL) {
2338         fprintf(stderr, "chardev \"%s\" not found\n", chardev);
2339         exit(1);
2340     }
2341
2342     monitor_init(chr, flags);
2343     return 0;
2344 }
2345
2346 static void monitor_parse(const char *optarg, const char *mode)
2347 {
2348     static int monitor_device_index = 0;
2349     QemuOpts *opts;
2350     const char *p;
2351     char label[32];
2352     int def = 0;
2353
2354     if (strstart(optarg, "chardev:", &p)) {
2355         snprintf(label, sizeof(label), "%s", p);
2356     } else {
2357         snprintf(label, sizeof(label), "compat_monitor%d",
2358                  monitor_device_index);
2359         if (monitor_device_index == 0) {
2360             def = 1;
2361         }
2362         opts = qemu_chr_parse_compat(label, optarg);
2363         if (!opts) {
2364             fprintf(stderr, "parse error: %s\n", optarg);
2365             exit(1);
2366         }
2367     }
2368
2369     opts = qemu_opts_create(&qemu_mon_opts, label, 1);
2370     if (!opts) {
2371         fprintf(stderr, "duplicate chardev: %s\n", label);
2372         exit(1);
2373     }
2374     qemu_opt_set(opts, "mode", mode);
2375     qemu_opt_set(opts, "chardev", label);
2376     if (def)
2377         qemu_opt_set(opts, "default", "on");
2378     monitor_device_index++;
2379 }
2380
2381 struct device_config {
2382     enum {
2383         DEV_USB,       /* -usbdevice     */
2384         DEV_BT,        /* -bt            */
2385         DEV_SERIAL,    /* -serial        */
2386         DEV_PARALLEL,  /* -parallel      */
2387         DEV_VIRTCON,   /* -virtioconsole */
2388         DEV_DEBUGCON,  /* -debugcon */
2389     } type;
2390     const char *cmdline;
2391     QTAILQ_ENTRY(device_config) next;
2392 };
2393 QTAILQ_HEAD(, device_config) device_configs = QTAILQ_HEAD_INITIALIZER(device_configs);
2394
2395 static void add_device_config(int type, const char *cmdline)
2396 {
2397     struct device_config *conf;
2398
2399     conf = qemu_mallocz(sizeof(*conf));
2400     conf->type = type;
2401     conf->cmdline = cmdline;
2402     QTAILQ_INSERT_TAIL(&device_configs, conf, next);
2403 }
2404
2405 static int foreach_device_config(int type, int (*func)(const char *cmdline))
2406 {
2407     struct device_config *conf;
2408     int rc;
2409
2410     QTAILQ_FOREACH(conf, &device_configs, next) {
2411         if (conf->type != type)
2412             continue;
2413         rc = func(conf->cmdline);
2414         if (0 != rc)
2415             return rc;
2416     }
2417     return 0;
2418 }
2419
2420 static int serial_parse(const char *devname)
2421 {
2422     static int index = 0;
2423     char label[32];
2424
2425     if (strcmp(devname, "none") == 0)
2426         return 0;
2427     if (index == MAX_SERIAL_PORTS) {
2428         fprintf(stderr, "qemu: too many serial ports\n");
2429         exit(1);
2430     }
2431     snprintf(label, sizeof(label), "serial%d", index);
2432     serial_hds[index] = qemu_chr_open(label, devname, NULL);
2433     if (!serial_hds[index]) {
2434         fprintf(stderr, "qemu: could not open serial device '%s': %s\n",
2435                 devname, strerror(errno));
2436         return -1;
2437     }
2438     index++;
2439     return 0;
2440 }
2441
2442 static int parallel_parse(const char *devname)
2443 {
2444     static int index = 0;
2445     char label[32];
2446
2447     if (strcmp(devname, "none") == 0)
2448         return 0;
2449     if (index == MAX_PARALLEL_PORTS) {
2450         fprintf(stderr, "qemu: too many parallel ports\n");
2451         exit(1);
2452     }
2453     snprintf(label, sizeof(label), "parallel%d", index);
2454     parallel_hds[index] = qemu_chr_open(label, devname, NULL);
2455     if (!parallel_hds[index]) {
2456         fprintf(stderr, "qemu: could not open parallel device '%s': %s\n",
2457                 devname, strerror(errno));
2458         return -1;
2459     }
2460     index++;
2461     return 0;
2462 }
2463
2464 static int virtcon_parse(const char *devname)
2465 {
2466     static int index = 0;
2467     char label[32];
2468     QemuOpts *bus_opts, *dev_opts;
2469
2470     if (strcmp(devname, "none") == 0)
2471         return 0;
2472     if (index == MAX_VIRTIO_CONSOLES) {
2473         fprintf(stderr, "qemu: too many virtio consoles\n");
2474         exit(1);
2475     }
2476
2477     bus_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
2478     qemu_opt_set(bus_opts, "driver", "virtio-serial");
2479
2480     dev_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
2481     qemu_opt_set(dev_opts, "driver", "virtconsole");
2482
2483     snprintf(label, sizeof(label), "virtcon%d", index);
2484     virtcon_hds[index] = qemu_chr_open(label, devname, NULL);
2485     if (!virtcon_hds[index]) {
2486         fprintf(stderr, "qemu: could not open virtio console '%s': %s\n",
2487                 devname, strerror(errno));
2488         return -1;
2489     }
2490     qemu_opt_set(dev_opts, "chardev", label);
2491
2492     index++;
2493     return 0;
2494 }
2495
2496 static int debugcon_parse(const char *devname)
2497 {
2498     QemuOpts *opts;
2499
2500     if (!qemu_chr_open("debugcon", devname, NULL)) {
2501         exit(1);
2502     }
2503     opts = qemu_opts_create(&qemu_device_opts, "debugcon", 1);
2504     if (!opts) {
2505         fprintf(stderr, "qemu: already have a debugcon device\n");
2506         exit(1);
2507     }
2508     qemu_opt_set(opts, "driver", "isa-debugcon");
2509     qemu_opt_set(opts, "chardev", "debugcon");
2510     return 0;
2511 }
2512
2513 static const QEMUOption *lookup_opt(int argc, char **argv,
2514                                     const char **poptarg, int *poptind)
2515 {
2516     const QEMUOption *popt;
2517     int optind = *poptind;
2518     char *r = argv[optind];
2519     const char *optarg;
2520
2521     loc_set_cmdline(argv, optind, 1);
2522     optind++;
2523     /* Treat --foo the same as -foo.  */
2524     if (r[1] == '-')
2525         r++;
2526     popt = qemu_options;
2527     for(;;) {
2528         if (!popt->name) {
2529             error_report("invalid option");
2530             exit(1);
2531         }
2532         if (!strcmp(popt->name, r + 1))
2533             break;
2534         popt++;
2535     }
2536     if (popt->flags & HAS_ARG) {
2537         if (optind >= argc) {
2538             error_report("requires an argument");
2539             exit(1);
2540         }
2541         optarg = argv[optind++];
2542         loc_set_cmdline(argv, optind - 2, 2);
2543     } else {
2544         optarg = NULL;
2545     }
2546
2547     *poptarg = optarg;
2548     *poptind = optind;
2549
2550     return popt;
2551 }
2552
2553 int main(int argc, char **argv, char **envp)
2554 {
2555     const char *gdbstub_dev = NULL;
2556     int i;
2557     int snapshot, linux_boot;
2558     const char *icount_option = NULL;
2559     const char *initrd_filename;
2560     const char *kernel_filename, *kernel_cmdline;
2561     char boot_devices[33] = "cad"; /* default to HD->floppy->CD-ROM */
2562     DisplayState *ds;
2563     DisplayChangeListener *dcl;
2564     int cyls, heads, secs, translation;
2565     QemuOpts *hda_opts = NULL, *opts;
2566     int optind;
2567     const char *optarg;
2568     const char *loadvm = NULL;
2569     QEMUMachine *machine;
2570     const char *cpu_model;
2571 #ifndef _WIN32
2572     int fds[2];
2573 #endif
2574     int tb_size;
2575     const char *pid_file = NULL;
2576     const char *incoming = NULL;
2577 #ifndef _WIN32
2578     int fd = 0;
2579     struct passwd *pwd = NULL;
2580     const char *chroot_dir = NULL;
2581     const char *run_as = NULL;
2582 #endif
2583     int show_vnc_port = 0;
2584     int defconfig = 1;
2585
2586     error_set_progname(argv[0]);
2587
2588     init_clocks();
2589
2590     qemu_cache_utils_init(envp);
2591
2592     QLIST_INIT (&vm_change_state_head);
2593 #ifndef _WIN32
2594     {
2595         struct sigaction act;
2596         sigfillset(&act.sa_mask);
2597         act.sa_flags = 0;
2598         act.sa_handler = SIG_IGN;
2599         sigaction(SIGPIPE, &act, NULL);
2600     }
2601 #else
2602     SetConsoleCtrlHandler(qemu_ctrl_handler, TRUE);
2603     /* Note: cpu_interrupt() is currently not SMP safe, so we force
2604        QEMU to run on a single CPU */
2605     {
2606         HANDLE h;
2607         DWORD mask, smask;
2608         int i;
2609         h = GetCurrentProcess();
2610         if (GetProcessAffinityMask(h, &mask, &smask)) {
2611             for(i = 0; i < 32; i++) {
2612                 if (mask & (1 << i))
2613                     break;
2614             }
2615             if (i != 32) {
2616                 mask = 1 << i;
2617                 SetProcessAffinityMask(h, mask);
2618             }
2619         }
2620     }
2621 #endif
2622
2623     module_call_init(MODULE_INIT_MACHINE);
2624     machine = find_default_machine();
2625     cpu_model = NULL;
2626     initrd_filename = NULL;
2627     ram_size = 0;
2628     snapshot = 0;
2629     kernel_filename = NULL;
2630     kernel_cmdline = "";
2631     cyls = heads = secs = 0;
2632     translation = BIOS_ATA_TRANSLATION_AUTO;
2633
2634     for (i = 0; i < MAX_NODES; i++) {
2635         node_mem[i] = 0;
2636         node_cpumask[i] = 0;
2637     }
2638
2639     nb_numa_nodes = 0;
2640     nb_nics = 0;
2641
2642     tb_size = 0;
2643     autostart= 1;
2644
2645     /* first pass of option parsing */
2646     optind = 1;
2647     while (optind < argc) {
2648         if (argv[optind][0] != '-') {
2649             /* disk image */
2650             optind++;
2651             continue;
2652         } else {
2653             const QEMUOption *popt;
2654
2655             popt = lookup_opt(argc, argv, &optarg, &optind);
2656             switch (popt->index) {
2657             case QEMU_OPTION_nodefconfig:
2658                 defconfig=0;
2659                 break;
2660             }
2661         }
2662     }
2663
2664     if (defconfig) {
2665         int ret;
2666
2667         ret = qemu_read_config_file(CONFIG_QEMU_CONFDIR "/qemu.conf");
2668         if (ret < 0 && ret != -ENOENT) {
2669             exit(1);
2670         }
2671
2672         ret = qemu_read_config_file(arch_config_name);
2673         if (ret < 0 && ret != -ENOENT) {
2674             exit(1);
2675         }
2676     }
2677     cpudef_init();
2678
2679     /* second pass of option parsing */
2680     optind = 1;
2681     for(;;) {
2682         if (optind >= argc)
2683             break;
2684         if (argv[optind][0] != '-') {
2685             hda_opts = drive_add(argv[optind++], HD_ALIAS, 0);
2686         } else {
2687             const QEMUOption *popt;
2688
2689             popt = lookup_opt(argc, argv, &optarg, &optind);
2690             if (!(popt->arch_mask & arch_type)) {
2691                 printf("Option %s not supported for this target\n", popt->name);
2692                 exit(1);
2693             }
2694             switch(popt->index) {
2695             case QEMU_OPTION_M:
2696                 machine = find_machine(optarg);
2697                 if (!machine) {
2698                     QEMUMachine *m;
2699                     printf("Supported machines are:\n");
2700                     for(m = first_machine; m != NULL; m = m->next) {
2701                         if (m->alias)
2702                             printf("%-10s %s (alias of %s)\n",
2703                                    m->alias, m->desc, m->name);
2704                         printf("%-10s %s%s\n",
2705                                m->name, m->desc,
2706                                m->is_default ? " (default)" : "");
2707                     }
2708                     exit(*optarg != '?');
2709                 }
2710                 break;
2711             case QEMU_OPTION_cpu:
2712                 /* hw initialization will check this */
2713                 if (*optarg == '?') {
2714                     list_cpus(stdout, &fprintf, optarg);
2715                     exit(0);
2716                 } else {
2717                     cpu_model = optarg;
2718                 }
2719                 break;
2720             case QEMU_OPTION_initrd:
2721                 initrd_filename = optarg;
2722                 break;
2723             case QEMU_OPTION_hda:
2724                 if (cyls == 0)
2725                     hda_opts = drive_add(optarg, HD_ALIAS, 0);
2726                 else
2727                     hda_opts = drive_add(optarg, HD_ALIAS
2728                              ",cyls=%d,heads=%d,secs=%d%s",
2729                              0, cyls, heads, secs,
2730                              translation == BIOS_ATA_TRANSLATION_LBA ?
2731                                  ",trans=lba" :
2732                              translation == BIOS_ATA_TRANSLATION_NONE ?
2733                                  ",trans=none" : "");
2734                  break;
2735             case QEMU_OPTION_hdb:
2736             case QEMU_OPTION_hdc:
2737             case QEMU_OPTION_hdd:
2738                 drive_add(optarg, HD_ALIAS, popt->index - QEMU_OPTION_hda);
2739                 break;
2740             case QEMU_OPTION_drive:
2741                 drive_add(NULL, "%s", optarg);
2742                 break;
2743             case QEMU_OPTION_set:
2744                 if (qemu_set_option(optarg) != 0)
2745                     exit(1);
2746                 break;
2747             case QEMU_OPTION_global:
2748                 if (qemu_global_option(optarg) != 0)
2749                     exit(1);
2750                 break;
2751             case QEMU_OPTION_mtdblock:
2752                 drive_add(optarg, MTD_ALIAS);
2753                 break;
2754             case QEMU_OPTION_sd:
2755                 drive_add(optarg, SD_ALIAS);
2756                 break;
2757             case QEMU_OPTION_pflash:
2758                 drive_add(optarg, PFLASH_ALIAS);
2759                 break;
2760             case QEMU_OPTION_snapshot:
2761                 snapshot = 1;
2762                 break;
2763             case QEMU_OPTION_hdachs:
2764                 {
2765                     const char *p;
2766                     p = optarg;
2767                     cyls = strtol(p, (char **)&p, 0);
2768                     if (cyls < 1 || cyls > 16383)
2769                         goto chs_fail;
2770                     if (*p != ',')
2771                         goto chs_fail;
2772                     p++;
2773                     heads = strtol(p, (char **)&p, 0);
2774                     if (heads < 1 || heads > 16)
2775                         goto chs_fail;
2776                     if (*p != ',')
2777                         goto chs_fail;
2778                     p++;
2779                     secs = strtol(p, (char **)&p, 0);
2780                     if (secs < 1 || secs > 63)
2781                         goto chs_fail;
2782                     if (*p == ',') {
2783                         p++;
2784                         if (!strcmp(p, "none"))
2785                             translation = BIOS_ATA_TRANSLATION_NONE;
2786                         else if (!strcmp(p, "lba"))
2787                             translation = BIOS_ATA_TRANSLATION_LBA;
2788                         else if (!strcmp(p, "auto"))
2789                             translation = BIOS_ATA_TRANSLATION_AUTO;
2790                         else
2791                             goto chs_fail;
2792                     } else if (*p != '\0') {
2793                     chs_fail:
2794                         fprintf(stderr, "qemu: invalid physical CHS format\n");
2795                         exit(1);
2796                     }
2797                     if (hda_opts != NULL) {
2798                         char num[16];
2799                         snprintf(num, sizeof(num), "%d", cyls);
2800                         qemu_opt_set(hda_opts, "cyls", num);
2801                         snprintf(num, sizeof(num), "%d", heads);
2802                         qemu_opt_set(hda_opts, "heads", num);
2803                         snprintf(num, sizeof(num), "%d", secs);
2804                         qemu_opt_set(hda_opts, "secs", num);
2805                         if (translation == BIOS_ATA_TRANSLATION_LBA)
2806                             qemu_opt_set(hda_opts, "trans", "lba");
2807                         if (translation == BIOS_ATA_TRANSLATION_NONE)
2808                             qemu_opt_set(hda_opts, "trans", "none");
2809                     }
2810                 }
2811                 break;
2812             case QEMU_OPTION_numa:
2813                 if (nb_numa_nodes >= MAX_NODES) {
2814                     fprintf(stderr, "qemu: too many NUMA nodes\n");
2815                     exit(1);
2816                 }
2817                 numa_add(optarg);
2818                 break;
2819             case QEMU_OPTION_nographic:
2820                 display_type = DT_NOGRAPHIC;
2821                 break;
2822 #ifdef CONFIG_CURSES
2823             case QEMU_OPTION_curses:
2824                 display_type = DT_CURSES;
2825                 break;
2826 #endif
2827             case QEMU_OPTION_portrait:
2828                 graphic_rotate = 1;
2829                 break;
2830             case QEMU_OPTION_kernel:
2831                 kernel_filename = optarg;
2832                 break;
2833             case QEMU_OPTION_append:
2834                 kernel_cmdline = optarg;
2835                 break;
2836             case QEMU_OPTION_cdrom:
2837                 drive_add(optarg, CDROM_ALIAS);
2838                 break;
2839             case QEMU_OPTION_boot:
2840                 {
2841                     static const char * const params[] = {
2842                         "order", "once", "menu", NULL
2843                     };
2844                     char buf[sizeof(boot_devices)];
2845                     char *standard_boot_devices;
2846                     int legacy = 0;
2847
2848                     if (!strchr(optarg, '=')) {
2849                         legacy = 1;
2850                         pstrcpy(buf, sizeof(buf), optarg);
2851                     } else if (check_params(buf, sizeof(buf), params, optarg) < 0) {
2852                         fprintf(stderr,
2853                                 "qemu: unknown boot parameter '%s' in '%s'\n",
2854                                 buf, optarg);
2855                         exit(1);
2856                     }
2857
2858                     if (legacy ||
2859                         get_param_value(buf, sizeof(buf), "order", optarg)) {
2860                         validate_bootdevices(buf);
2861                         pstrcpy(boot_devices, sizeof(boot_devices), buf);
2862                     }
2863                     if (!legacy) {
2864                         if (get_param_value(buf, sizeof(buf),
2865                                             "once", optarg)) {
2866                             validate_bootdevices(buf);
2867                             standard_boot_devices = qemu_strdup(boot_devices);
2868                             pstrcpy(boot_devices, sizeof(boot_devices), buf);
2869                             qemu_register_reset(restore_boot_devices,
2870                                                 standard_boot_devices);
2871                         }
2872                         if (get_param_value(buf, sizeof(buf),
2873                                             "menu", optarg)) {
2874                             if (!strcmp(buf, "on")) {
2875                                 boot_menu = 1;
2876                             } else if (!strcmp(buf, "off")) {
2877                                 boot_menu = 0;
2878                             } else {
2879                                 fprintf(stderr,
2880                                         "qemu: invalid option value '%s'\n",
2881                                         buf);
2882                                 exit(1);
2883                             }
2884                         }
2885                     }
2886                 }
2887                 break;
2888             case QEMU_OPTION_fda:
2889             case QEMU_OPTION_fdb:
2890                 drive_add(optarg, FD_ALIAS, popt->index - QEMU_OPTION_fda);
2891                 break;
2892             case QEMU_OPTION_no_fd_bootchk:
2893                 fd_bootchk = 0;
2894                 break;
2895             case QEMU_OPTION_netdev:
2896                 if (net_client_parse(&qemu_netdev_opts, optarg) == -1) {
2897                     exit(1);
2898                 }
2899                 break;
2900             case QEMU_OPTION_net:
2901                 if (net_client_parse(&qemu_net_opts, optarg) == -1) {
2902                     exit(1);
2903                 }
2904                 break;
2905 #ifdef CONFIG_SLIRP
2906             case QEMU_OPTION_tftp:
2907                 legacy_tftp_prefix = optarg;
2908                 break;
2909             case QEMU_OPTION_bootp:
2910                 legacy_bootp_filename = optarg;
2911                 break;
2912 #ifndef _WIN32
2913             case QEMU_OPTION_smb:
2914                 if (net_slirp_smb(optarg) < 0)
2915                     exit(1);
2916                 break;
2917 #endif
2918             case QEMU_OPTION_redir:
2919                 if (net_slirp_redir(optarg) < 0)
2920                     exit(1);
2921                 break;
2922 #endif
2923             case QEMU_OPTION_bt:
2924                 add_device_config(DEV_BT, optarg);
2925                 break;
2926             case QEMU_OPTION_audio_help:
2927                 if (!(audio_available())) {
2928                     printf("Option %s not supported for this target\n", popt->name);
2929                     exit(1);
2930                 }
2931                 AUD_help ();
2932                 exit (0);
2933                 break;
2934             case QEMU_OPTION_soundhw:
2935                 if (!(audio_available())) {
2936                     printf("Option %s not supported for this target\n", popt->name);
2937                     exit(1);
2938                 }
2939                 select_soundhw (optarg);
2940                 break;
2941             case QEMU_OPTION_h:
2942                 help(0);
2943                 break;
2944             case QEMU_OPTION_version:
2945                 version();
2946                 exit(0);
2947                 break;
2948             case QEMU_OPTION_m: {
2949                 uint64_t value;
2950                 char *ptr;
2951
2952                 value = strtoul(optarg, &ptr, 10);
2953                 switch (*ptr) {
2954                 case 0: case 'M': case 'm':
2955                     value <<= 20;
2956                     break;
2957                 case 'G': case 'g':
2958                     value <<= 30;
2959                     break;
2960                 default:
2961                     fprintf(stderr, "qemu: invalid ram size: %s\n", optarg);
2962                     exit(1);
2963                 }
2964
2965                 /* On 32-bit hosts, QEMU is limited by virtual address space */
2966                 if (value > (2047 << 20) && HOST_LONG_BITS == 32) {
2967                     fprintf(stderr, "qemu: at most 2047 MB RAM can be simulated\n");
2968                     exit(1);
2969                 }
2970                 if (value != (uint64_t)(ram_addr_t)value) {
2971                     fprintf(stderr, "qemu: ram size too large\n");
2972                     exit(1);
2973                 }
2974                 ram_size = value;
2975                 break;
2976             }
2977             case QEMU_OPTION_mempath:
2978                 mem_path = optarg;
2979                 break;
2980 #ifdef MAP_POPULATE
2981             case QEMU_OPTION_mem_prealloc:
2982                 mem_prealloc = 1;
2983                 break;
2984 #endif
2985             case QEMU_OPTION_d:
2986                 set_cpu_log(optarg);
2987                 break;
2988             case QEMU_OPTION_s:
2989                 gdbstub_dev = "tcp::" DEFAULT_GDBSTUB_PORT;
2990                 break;
2991             case QEMU_OPTION_gdb:
2992                 gdbstub_dev = optarg;
2993                 break;
2994             case QEMU_OPTION_L:
2995                 data_dir = optarg;
2996                 break;
2997             case QEMU_OPTION_bios:
2998                 bios_name = optarg;
2999                 break;
3000             case QEMU_OPTION_singlestep:
3001                 singlestep = 1;
3002                 break;
3003             case QEMU_OPTION_S:
3004                 autostart = 0;
3005                 break;
3006             case QEMU_OPTION_k:
3007                 keyboard_layout = optarg;
3008                 break;
3009             case QEMU_OPTION_localtime:
3010                 rtc_utc = 0;
3011                 break;
3012             case QEMU_OPTION_vga:
3013                 select_vgahw (optarg);
3014                 break;
3015             case QEMU_OPTION_g:
3016                 {
3017                     const char *p;
3018                     int w, h, depth;
3019                     p = optarg;
3020                     w = strtol(p, (char **)&p, 10);
3021                     if (w <= 0) {
3022                     graphic_error:
3023                         fprintf(stderr, "qemu: invalid resolution or depth\n");
3024                         exit(1);
3025                     }
3026                     if (*p != 'x')
3027                         goto graphic_error;
3028                     p++;
3029                     h = strtol(p, (char **)&p, 10);
3030                     if (h <= 0)
3031                         goto graphic_error;
3032                     if (*p == 'x') {
3033                         p++;
3034                         depth = strtol(p, (char **)&p, 10);
3035                         if (depth != 8 && depth != 15 && depth != 16 &&
3036                             depth != 24 && depth != 32)
3037                             goto graphic_error;
3038                     } else if (*p == '\0') {
3039                         depth = graphic_depth;
3040                     } else {
3041                         goto graphic_error;
3042                     }
3043
3044                     graphic_width = w;
3045                     graphic_height = h;
3046                     graphic_depth = depth;
3047                 }
3048                 break;
3049             case QEMU_OPTION_echr:
3050                 {
3051                     char *r;
3052                     term_escape_char = strtol(optarg, &r, 0);
3053                     if (r == optarg)
3054                         printf("Bad argument to echr\n");
3055                     break;
3056                 }
3057             case QEMU_OPTION_monitor:
3058                 monitor_parse(optarg, "readline");
3059                 default_monitor = 0;
3060                 break;
3061             case QEMU_OPTION_qmp:
3062                 monitor_parse(optarg, "control");
3063                 default_monitor = 0;
3064                 break;
3065             case QEMU_OPTION_mon:
3066                 opts = qemu_opts_parse(&qemu_mon_opts, optarg, 1);
3067                 if (!opts) {
3068                     exit(1);
3069                 }
3070                 default_monitor = 0;
3071                 break;
3072             case QEMU_OPTION_chardev:
3073                 opts = qemu_opts_parse(&qemu_chardev_opts, optarg, 1);
3074                 if (!opts) {
3075                     exit(1);
3076                 }
3077                 break;
3078 #ifdef CONFIG_LINUX
3079             case QEMU_OPTION_fsdev:
3080                 opts = qemu_opts_parse(&qemu_fsdev_opts, optarg, 1);
3081                 if (!opts) {
3082                     fprintf(stderr, "parse error: %s\n", optarg);
3083                     exit(1);
3084                 }
3085                 break;
3086             case QEMU_OPTION_virtfs: {
3087                 char *arg_fsdev = NULL;
3088                 char *arg_9p = NULL;
3089                 int len = 0;
3090
3091                 opts = qemu_opts_parse(&qemu_virtfs_opts, optarg, 1);
3092                 if (!opts) {
3093                     fprintf(stderr, "parse error: %s\n", optarg);
3094                     exit(1);
3095                 }
3096
3097                 len = strlen(",id=,path=");
3098                 len += strlen(qemu_opt_get(opts, "fstype"));
3099                 len += strlen(qemu_opt_get(opts, "mount_tag"));
3100                 len += strlen(qemu_opt_get(opts, "path"));
3101                 arg_fsdev = qemu_malloc((len + 1) * sizeof(*arg_fsdev));
3102
3103                 if (!arg_fsdev) {
3104                     fprintf(stderr, "No memory to parse -fsdev for %s\n",
3105                             optarg);
3106                     exit(1);
3107                 }
3108
3109                 sprintf(arg_fsdev, "%s,id=%s,path=%s",
3110                                 qemu_opt_get(opts, "fstype"),
3111                                 qemu_opt_get(opts, "mount_tag"),
3112                                 qemu_opt_get(opts, "path"));
3113
3114                 len = strlen("virtio-9p-pci,fsdev=,mount_tag=");
3115                 len += 2*strlen(qemu_opt_get(opts, "mount_tag"));
3116                 arg_9p = qemu_malloc((len + 1) * sizeof(*arg_9p));
3117
3118                 if (!arg_9p) {
3119                     fprintf(stderr, "No memory to parse -device for %s\n",
3120                             optarg);
3121                     exit(1);
3122                 }
3123
3124                 sprintf(arg_9p, "virtio-9p-pci,fsdev=%s,mount_tag=%s",
3125                                 qemu_opt_get(opts, "mount_tag"),
3126                                 qemu_opt_get(opts, "mount_tag"));
3127
3128                 if (!qemu_opts_parse(&qemu_fsdev_opts, arg_fsdev, 1)) {
3129                     fprintf(stderr, "parse error [fsdev]: %s\n", optarg);
3130                     exit(1);
3131                 }
3132
3133                 if (!qemu_opts_parse(&qemu_device_opts, arg_9p, 1)) {
3134                     fprintf(stderr, "parse error [device]: %s\n", optarg);
3135                     exit(1);
3136                 }
3137
3138                 qemu_free(arg_fsdev);
3139                 qemu_free(arg_9p);
3140                 break;
3141             }
3142 #endif
3143             case QEMU_OPTION_serial:
3144                 add_device_config(DEV_SERIAL, optarg);
3145                 default_serial = 0;
3146                 if (strncmp(optarg, "mon:", 4) == 0) {
3147                     default_monitor = 0;
3148                 }
3149                 break;
3150             case QEMU_OPTION_watchdog:
3151                 if (watchdog) {
3152                     fprintf(stderr,
3153                             "qemu: only one watchdog option may be given\n");
3154                     return 1;
3155                 }
3156                 watchdog = optarg;
3157                 break;
3158             case QEMU_OPTION_watchdog_action:
3159                 if (select_watchdog_action(optarg) == -1) {
3160                     fprintf(stderr, "Unknown -watchdog-action parameter\n");
3161                     exit(1);
3162                 }
3163                 break;
3164             case QEMU_OPTION_virtiocon:
3165                 add_device_config(DEV_VIRTCON, optarg);
3166                 default_virtcon = 0;
3167                 if (strncmp(optarg, "mon:", 4) == 0) {
3168                     default_monitor = 0;
3169                 }
3170                 break;
3171             case QEMU_OPTION_parallel:
3172                 add_device_config(DEV_PARALLEL, optarg);
3173                 default_parallel = 0;
3174                 if (strncmp(optarg, "mon:", 4) == 0) {
3175                     default_monitor = 0;
3176                 }
3177                 break;
3178             case QEMU_OPTION_debugcon:
3179                 add_device_config(DEV_DEBUGCON, optarg);
3180                 break;
3181             case QEMU_OPTION_loadvm:
3182                 loadvm = optarg;
3183                 break;
3184             case QEMU_OPTION_full_screen:
3185                 full_screen = 1;
3186                 break;
3187 #ifdef CONFIG_SDL
3188             case QEMU_OPTION_no_frame:
3189                 no_frame = 1;
3190                 break;
3191             case QEMU_OPTION_alt_grab:
3192                 alt_grab = 1;
3193                 break;
3194             case QEMU_OPTION_ctrl_grab:
3195                 ctrl_grab = 1;
3196                 break;
3197             case QEMU_OPTION_no_quit:
3198                 no_quit = 1;
3199                 break;
3200             case QEMU_OPTION_sdl:
3201                 display_type = DT_SDL;
3202                 break;
3203 #endif
3204             case QEMU_OPTION_pidfile:
3205                 pid_file = optarg;
3206                 break;
3207             case QEMU_OPTION_win2k_hack:
3208                 win2k_install_hack = 1;
3209                 break;
3210             case QEMU_OPTION_rtc_td_hack:
3211                 rtc_td_hack = 1;
3212                 break;
3213             case QEMU_OPTION_acpitable:
3214                 do_acpitable_option(optarg);
3215                 break;
3216             case QEMU_OPTION_smbios:
3217                 do_smbios_option(optarg);
3218                 break;
3219             case QEMU_OPTION_enable_kvm:
3220                 kvm_allowed = 1;
3221                 break;
3222             case QEMU_OPTION_usb:
3223                 usb_enabled = 1;
3224                 break;
3225             case QEMU_OPTION_usbdevice:
3226                 usb_enabled = 1;
3227                 add_device_config(DEV_USB, optarg);
3228                 break;
3229             case QEMU_OPTION_device:
3230                 if (!qemu_opts_parse(&qemu_device_opts, optarg, 1)) {
3231                     exit(1);
3232                 }
3233                 break;
3234             case QEMU_OPTION_smp:
3235                 smp_parse(optarg);
3236                 if (smp_cpus < 1) {
3237                     fprintf(stderr, "Invalid number of CPUs\n");
3238                     exit(1);
3239                 }
3240                 if (max_cpus < smp_cpus) {
3241                     fprintf(stderr, "maxcpus must be equal to or greater than "
3242                             "smp\n");
3243                     exit(1);
3244                 }
3245                 if (max_cpus > 255) {
3246                     fprintf(stderr, "Unsupported number of maxcpus\n");
3247                     exit(1);
3248                 }
3249                 break;
3250             case QEMU_OPTION_vnc:
3251                 display_type = DT_VNC;
3252                 vnc_display = optarg;
3253                 break;
3254             case QEMU_OPTION_no_acpi:
3255                 acpi_enabled = 0;
3256                 break;
3257             case QEMU_OPTION_no_hpet:
3258                 no_hpet = 1;
3259                 break;
3260             case QEMU_OPTION_balloon:
3261                 if (balloon_parse(optarg) < 0) {
3262                     fprintf(stderr, "Unknown -balloon argument %s\n", optarg);
3263                     exit(1);
3264                 }
3265                 break;
3266             case QEMU_OPTION_no_reboot:
3267                 no_reboot = 1;
3268                 break;
3269             case QEMU_OPTION_no_shutdown:
3270                 no_shutdown = 1;
3271                 break;
3272             case QEMU_OPTION_show_cursor:
3273                 cursor_hide = 0;
3274                 break;
3275             case QEMU_OPTION_uuid:
3276                 if(qemu_uuid_parse(optarg, qemu_uuid) < 0) {
3277                     fprintf(stderr, "Fail to parse UUID string."
3278                             " Wrong format.\n");
3279                     exit(1);
3280                 }
3281                 break;
3282 #ifndef _WIN32
3283             case QEMU_OPTION_daemonize:
3284                 daemonize = 1;
3285                 break;
3286 #endif
3287             case QEMU_OPTION_option_rom:
3288                 if (nb_option_roms >= MAX_OPTION_ROMS) {
3289                     fprintf(stderr, "Too many option ROMs\n");
3290                     exit(1);
3291                 }
3292                 option_rom[nb_option_roms] = optarg;
3293                 nb_option_roms++;
3294                 break;
3295             case QEMU_OPTION_semihosting:
3296                 semihosting_enabled = 1;
3297                 break;
3298             case QEMU_OPTION_name:
3299                 qemu_name = qemu_strdup(optarg);
3300                  {
3301                      char *p = strchr(qemu_name, ',');
3302                      if (p != NULL) {
3303                         *p++ = 0;
3304                         if (strncmp(p, "process=", 8)) {
3305                             fprintf(stderr, "Unknown subargument %s to -name", p);
3306                             exit(1);
3307                         }
3308                         p += 8;
3309                         set_proc_name(p);
3310                      }
3311                  }
3312                 break;
3313             case QEMU_OPTION_prom_env:
3314                 if (nb_prom_envs >= MAX_PROM_ENVS) {
3315                     fprintf(stderr, "Too many prom variables\n");
3316                     exit(1);
3317                 }
3318                 prom_envs[nb_prom_envs] = optarg;
3319                 nb_prom_envs++;
3320                 break;
3321             case QEMU_OPTION_old_param:
3322                 old_param = 1;
3323                 break;
3324             case QEMU_OPTION_clock:
3325                 configure_alarms(optarg);
3326                 break;
3327             case QEMU_OPTION_startdate:
3328                 configure_rtc_date_offset(optarg, 1);
3329                 break;
3330             case QEMU_OPTION_rtc:
3331                 opts = qemu_opts_parse(&qemu_rtc_opts, optarg, 0);
3332                 if (!opts) {
3333                     exit(1);
3334                 }
3335                 configure_rtc(opts);
3336                 break;
3337             case QEMU_OPTION_tb_size:
3338                 tb_size = strtol(optarg, NULL, 0);
3339                 if (tb_size < 0)
3340                     tb_size = 0;
3341                 break;
3342             case QEMU_OPTION_icount:
3343                 icount_option = optarg;
3344                 break;
3345             case QEMU_OPTION_incoming:
3346                 incoming = optarg;
3347                 break;
3348             case QEMU_OPTION_nodefaults:
3349                 default_serial = 0;
3350                 default_parallel = 0;
3351                 default_virtcon = 0;
3352                 default_monitor = 0;
3353                 default_vga = 0;
3354                 default_net = 0;
3355                 default_floppy = 0;
3356                 default_cdrom = 0;
3357                 default_sdcard = 0;
3358                 break;
3359 #ifndef _WIN32
3360             case QEMU_OPTION_chroot:
3361                 chroot_dir = optarg;
3362                 break;
3363             case QEMU_OPTION_runas:
3364                 run_as = optarg;
3365                 break;
3366 #endif
3367             case QEMU_OPTION_xen_domid:
3368                 if (!(xen_available())) {
3369                     printf("Option %s not supported for this target\n", popt->name);
3370                     exit(1);
3371                 }
3372                 xen_domid = atoi(optarg);
3373                 break;
3374             case QEMU_OPTION_xen_create:
3375                 if (!(xen_available())) {
3376                     printf("Option %s not supported for this target\n", popt->name);
3377                     exit(1);
3378                 }
3379                 xen_mode = XEN_CREATE;
3380                 break;
3381             case QEMU_OPTION_xen_attach:
3382                 if (!(xen_available())) {
3383                     printf("Option %s not supported for this target\n", popt->name);
3384                     exit(1);
3385                 }
3386                 xen_mode = XEN_ATTACH;
3387                 break;
3388             case QEMU_OPTION_readconfig:
3389                 {
3390                     int ret = qemu_read_config_file(optarg);
3391                     if (ret < 0) {
3392                         fprintf(stderr, "read config %s: %s\n", optarg,
3393                             strerror(-ret));
3394                         exit(1);
3395                     }
3396                     break;
3397                 }
3398             case QEMU_OPTION_writeconfig:
3399                 {
3400                     FILE *fp;
3401                     if (strcmp(optarg, "-") == 0) {
3402                         fp = stdout;
3403                     } else {
3404                         fp = fopen(optarg, "w");
3405                         if (fp == NULL) {
3406                             fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
3407                             exit(1);
3408                         }
3409                     }
3410                     qemu_config_write(fp);
3411                     fclose(fp);
3412                     break;
3413                 }
3414             }
3415         }
3416     }
3417     loc_set_none();
3418
3419     /* If no data_dir is specified then try to find it relative to the
3420        executable path.  */
3421     if (!data_dir) {
3422         data_dir = find_datadir(argv[0]);
3423     }
3424     /* If all else fails use the install patch specified when building.  */
3425     if (!data_dir) {
3426         data_dir = CONFIG_QEMU_DATADIR;
3427     }
3428
3429     /*
3430      * Default to max_cpus = smp_cpus, in case the user doesn't
3431      * specify a max_cpus value.
3432      */
3433     if (!max_cpus)
3434         max_cpus = smp_cpus;
3435
3436     machine->max_cpus = machine->max_cpus ?: 1; /* Default to UP */
3437     if (smp_cpus > machine->max_cpus) {
3438         fprintf(stderr, "Number of SMP cpus requested (%d), exceeds max cpus "
3439                 "supported by machine `%s' (%d)\n", smp_cpus,  machine->name,
3440                 machine->max_cpus);
3441         exit(1);
3442     }
3443
3444     qemu_opts_foreach(&qemu_device_opts, default_driver_check, NULL, 0);
3445     qemu_opts_foreach(&qemu_global_opts, default_driver_check, NULL, 0);
3446
3447     if (machine->no_serial) {
3448         default_serial = 0;
3449     }
3450     if (machine->no_parallel) {
3451         default_parallel = 0;
3452     }
3453     if (!machine->use_virtcon) {
3454         default_virtcon = 0;
3455     }
3456     if (machine->no_vga) {
3457         default_vga = 0;
3458     }
3459     if (machine->no_floppy) {
3460         default_floppy = 0;
3461     }
3462     if (machine->no_cdrom) {
3463         default_cdrom = 0;
3464     }
3465     if (machine->no_sdcard) {
3466         default_sdcard = 0;
3467     }
3468
3469     if (display_type == DT_NOGRAPHIC) {
3470         if (default_parallel)
3471             add_device_config(DEV_PARALLEL, "null");
3472         if (default_serial && default_monitor) {
3473             add_device_config(DEV_SERIAL, "mon:stdio");
3474         } else if (default_virtcon && default_monitor) {
3475             add_device_config(DEV_VIRTCON, "mon:stdio");
3476         } else {
3477             if (default_serial)
3478                 add_device_config(DEV_SERIAL, "stdio");
3479             if (default_virtcon)
3480                 add_device_config(DEV_VIRTCON, "stdio");
3481             if (default_monitor)
3482                 monitor_parse("stdio", "readline");
3483         }
3484     } else {
3485         if (default_serial)
3486             add_device_config(DEV_SERIAL, "vc:80Cx24C");
3487         if (default_parallel)
3488             add_device_config(DEV_PARALLEL, "vc:80Cx24C");
3489         if (default_monitor)
3490             monitor_parse("vc:80Cx24C", "readline");
3491         if (default_virtcon)
3492             add_device_config(DEV_VIRTCON, "vc:80Cx24C");
3493     }
3494     if (default_vga)
3495         vga_interface_type = VGA_CIRRUS;
3496
3497     socket_init();
3498
3499     if (qemu_opts_foreach(&qemu_chardev_opts, chardev_init_func, NULL, 1) != 0)
3500         exit(1);
3501 #ifdef CONFIG_LINUX
3502     if (qemu_opts_foreach(&qemu_fsdev_opts, fsdev_init_func, NULL, 1) != 0) {
3503         exit(1);
3504     }
3505 #endif
3506
3507 #ifndef _WIN32
3508     if (daemonize) {
3509         pid_t pid;
3510
3511         if (pipe(fds) == -1)
3512             exit(1);
3513
3514         pid = fork();
3515         if (pid > 0) {
3516             uint8_t status;
3517             ssize_t len;
3518
3519             close(fds[1]);
3520
3521         again:
3522             len = read(fds[0], &status, 1);
3523             if (len == -1 && (errno == EINTR))
3524                 goto again;
3525
3526             if (len != 1)
3527                 exit(1);
3528             else if (status == 1) {
3529                 fprintf(stderr, "Could not acquire pidfile: %s\n", strerror(errno));
3530                 exit(1);
3531             } else
3532                 exit(0);
3533         } else if (pid < 0)
3534             exit(1);
3535
3536         close(fds[0]);
3537         qemu_set_cloexec(fds[1]);
3538
3539         setsid();
3540
3541         pid = fork();
3542         if (pid > 0)
3543             exit(0);
3544         else if (pid < 0)
3545             exit(1);
3546
3547         umask(027);
3548
3549         signal(SIGTSTP, SIG_IGN);
3550         signal(SIGTTOU, SIG_IGN);
3551         signal(SIGTTIN, SIG_IGN);
3552     }
3553 #endif
3554
3555     if (pid_file && qemu_create_pidfile(pid_file) != 0) {
3556 #ifndef _WIN32
3557         if (daemonize) {
3558             uint8_t status = 1;
3559             if (write(fds[1], &status, 1) != 1) {
3560                 perror("daemonize. Writing to pipe\n");
3561             }
3562         } else
3563 #endif
3564             fprintf(stderr, "Could not acquire pid file: %s\n", strerror(errno));
3565         exit(1);
3566     }
3567
3568     if (kvm_allowed) {
3569         int ret = kvm_init(smp_cpus);
3570         if (ret < 0) {
3571             if (!kvm_available()) {
3572                 printf("KVM not supported for this target\n");
3573             } else {
3574                 fprintf(stderr, "failed to initialize KVM: %s\n", strerror(-ret));
3575             }
3576             exit(1);
3577         }
3578     }
3579
3580     if (qemu_init_main_loop()) {
3581         fprintf(stderr, "qemu_init_main_loop failed\n");
3582         exit(1);
3583     }
3584     linux_boot = (kernel_filename != NULL);
3585
3586     if (!linux_boot && *kernel_cmdline != '\0') {
3587         fprintf(stderr, "-append only allowed with -kernel option\n");
3588         exit(1);
3589     }
3590
3591     if (!linux_boot && initrd_filename != NULL) {
3592         fprintf(stderr, "-initrd only allowed with -kernel option\n");
3593         exit(1);
3594     }
3595
3596 #ifndef _WIN32
3597     /* Win32 doesn't support line-buffering and requires size >= 2 */
3598     setvbuf(stdout, NULL, _IOLBF, 0);
3599 #endif
3600
3601     if (init_timer_alarm() < 0) {
3602         fprintf(stderr, "could not initialize alarm timer\n");
3603         exit(1);
3604     }
3605     configure_icount(icount_option);
3606
3607     if (net_init_clients() < 0) {
3608         exit(1);
3609     }
3610
3611     /* init the bluetooth world */
3612     if (foreach_device_config(DEV_BT, bt_parse))
3613         exit(1);
3614
3615     /* init the memory */
3616     if (ram_size == 0)
3617         ram_size = DEFAULT_RAM_SIZE * 1024 * 1024;
3618
3619     /* init the dynamic translator */
3620     cpu_exec_init_all(tb_size * 1024 * 1024);
3621
3622     bdrv_init_with_whitelist();
3623
3624     blk_mig_init();
3625
3626     if (default_cdrom) {
3627         /* we always create the cdrom drive, even if no disk is there */
3628         drive_add(NULL, CDROM_ALIAS);
3629     }
3630
3631     if (default_floppy) {
3632         /* we always create at least one floppy */
3633         drive_add(NULL, FD_ALIAS, 0);
3634     }
3635
3636     if (default_sdcard) {
3637         /* we always create one sd slot, even if no card is in it */
3638         drive_add(NULL, SD_ALIAS);
3639     }
3640
3641     /* open the virtual block devices */
3642     if (snapshot)
3643         qemu_opts_foreach(&qemu_drive_opts, drive_enable_snapshot, NULL, 0);
3644     if (qemu_opts_foreach(&qemu_drive_opts, drive_init_func, machine, 1) != 0)
3645         exit(1);
3646
3647     register_savevm_live("ram", 0, 3, NULL, ram_save_live, NULL,
3648                          ram_load, NULL);
3649
3650     if (nb_numa_nodes > 0) {
3651         int i;
3652
3653         if (nb_numa_nodes > smp_cpus) {
3654             nb_numa_nodes = smp_cpus;
3655         }
3656
3657         /* If no memory size if given for any node, assume the default case
3658          * and distribute the available memory equally across all nodes
3659          */
3660         for (i = 0; i < nb_numa_nodes; i++) {
3661             if (node_mem[i] != 0)
3662                 break;
3663         }
3664         if (i == nb_numa_nodes) {
3665             uint64_t usedmem = 0;
3666
3667             /* On Linux, the each node's border has to be 8MB aligned,
3668              * the final node gets the rest.
3669              */
3670             for (i = 0; i < nb_numa_nodes - 1; i++) {
3671                 node_mem[i] = (ram_size / nb_numa_nodes) & ~((1 << 23UL) - 1);
3672                 usedmem += node_mem[i];
3673             }
3674             node_mem[i] = ram_size - usedmem;
3675         }
3676
3677         for (i = 0; i < nb_numa_nodes; i++) {
3678             if (node_cpumask[i] != 0)
3679                 break;
3680         }
3681         /* assigning the VCPUs round-robin is easier to implement, guest OSes
3682          * must cope with this anyway, because there are BIOSes out there in
3683          * real machines which also use this scheme.
3684          */
3685         if (i == nb_numa_nodes) {
3686             for (i = 0; i < smp_cpus; i++) {
3687                 node_cpumask[i % nb_numa_nodes] |= 1 << i;
3688             }
3689         }
3690     }
3691
3692     if (qemu_opts_foreach(&qemu_mon_opts, mon_init_func, NULL, 1) != 0) {
3693         exit(1);
3694     }
3695
3696     if (foreach_device_config(DEV_SERIAL, serial_parse) < 0)
3697         exit(1);
3698     if (foreach_device_config(DEV_PARALLEL, parallel_parse) < 0)
3699         exit(1);
3700     if (foreach_device_config(DEV_VIRTCON, virtcon_parse) < 0)
3701         exit(1);
3702     if (foreach_device_config(DEV_DEBUGCON, debugcon_parse) < 0)
3703         exit(1);
3704
3705     module_call_init(MODULE_INIT_DEVICE);
3706
3707     if (qemu_opts_foreach(&qemu_device_opts, device_help_func, NULL, 0) != 0)
3708         exit(0);
3709
3710     if (watchdog) {
3711         i = select_watchdog(watchdog);
3712         if (i > 0)
3713             exit (i == 1 ? 1 : 0);
3714     }
3715
3716     if (machine->compat_props) {
3717         qdev_prop_register_global_list(machine->compat_props);
3718     }
3719     qemu_add_globals();
3720
3721     machine->init(ram_size, boot_devices,
3722                   kernel_filename, kernel_cmdline, initrd_filename, cpu_model);
3723
3724     cpu_synchronize_all_post_init();
3725
3726 #ifndef _WIN32
3727     /* must be after terminal init, SDL library changes signal handlers */
3728     sighandler_setup();
3729 #endif
3730
3731     set_numa_modes();
3732
3733     current_machine = machine;
3734
3735     /* init USB devices */
3736     if (usb_enabled) {
3737         if (foreach_device_config(DEV_USB, usb_parse) < 0)
3738             exit(1);
3739     }
3740
3741     /* init generic devices */
3742     if (qemu_opts_foreach(&qemu_device_opts, device_init_func, NULL, 1) != 0)
3743         exit(1);
3744
3745     net_check_clients();
3746
3747     /* just use the first displaystate for the moment */
3748     ds = get_displaystate();
3749
3750     if (display_type == DT_DEFAULT) {
3751 #if defined(CONFIG_SDL) || defined(CONFIG_COCOA)
3752         display_type = DT_SDL;
3753 #else
3754         display_type = DT_VNC;
3755         vnc_display = "localhost:0,to=99";
3756         show_vnc_port = 1;
3757 #endif
3758     }
3759
3760
3761     switch (display_type) {
3762     case DT_NOGRAPHIC:
3763         break;
3764 #if defined(CONFIG_CURSES)
3765     case DT_CURSES:
3766         curses_display_init(ds, full_screen);
3767         break;
3768 #endif
3769 #if defined(CONFIG_SDL)
3770     case DT_SDL:
3771         sdl_display_init(ds, full_screen, no_frame);
3772         break;
3773 #elif defined(CONFIG_COCOA)
3774     case DT_SDL:
3775         cocoa_display_init(ds, full_screen);
3776         break;
3777 #endif
3778     case DT_VNC:
3779         vnc_display_init(ds);
3780         if (vnc_display_open(ds, vnc_display) < 0)
3781             exit(1);
3782
3783         if (show_vnc_port) {
3784             printf("VNC server running on `%s'\n", vnc_display_local_addr(ds));
3785         }
3786         break;
3787     default:
3788         break;
3789     }
3790     dpy_resize(ds);
3791
3792     dcl = ds->listeners;
3793     while (dcl != NULL) {
3794         if (dcl->dpy_refresh != NULL) {
3795             ds->gui_timer = qemu_new_timer(rt_clock, gui_update, ds);
3796             qemu_mod_timer(ds->gui_timer, qemu_get_clock(rt_clock));
3797             break;
3798         }
3799         dcl = dcl->next;
3800     }
3801
3802     if (display_type == DT_NOGRAPHIC || display_type == DT_VNC) {
3803         nographic_timer = qemu_new_timer(rt_clock, nographic_update, NULL);
3804         qemu_mod_timer(nographic_timer, qemu_get_clock(rt_clock));
3805     }
3806
3807     text_consoles_set_display(ds);
3808
3809     if (gdbstub_dev && gdbserver_start(gdbstub_dev) < 0) {
3810         fprintf(stderr, "qemu: could not open gdbserver on device '%s'\n",
3811                 gdbstub_dev);
3812         exit(1);
3813     }
3814
3815     qdev_machine_creation_done();
3816
3817     if (rom_load_all() != 0) {
3818         fprintf(stderr, "rom loading failed\n");
3819         exit(1);
3820     }
3821
3822     qemu_system_reset();
3823     if (loadvm) {
3824         if (load_vmstate(loadvm) < 0) {
3825             autostart = 0;
3826         }
3827     }
3828
3829     if (incoming) {
3830         qemu_start_incoming_migration(incoming);
3831     } else if (autostart) {
3832         vm_start();
3833     }
3834
3835 #ifndef _WIN32
3836     if (daemonize) {
3837         uint8_t status = 0;
3838         ssize_t len;
3839
3840     again1:
3841         len = write(fds[1], &status, 1);
3842         if (len == -1 && (errno == EINTR))
3843             goto again1;
3844
3845         if (len != 1)
3846             exit(1);
3847
3848         if (chdir("/")) {
3849             perror("not able to chdir to /");
3850             exit(1);
3851         }
3852         TFR(fd = qemu_open("/dev/null", O_RDWR));
3853         if (fd == -1)
3854             exit(1);
3855     }
3856
3857     if (run_as) {
3858         pwd = getpwnam(run_as);
3859         if (!pwd) {
3860             fprintf(stderr, "User \"%s\" doesn't exist\n", run_as);
3861             exit(1);
3862         }
3863     }
3864
3865     if (chroot_dir) {
3866         if (chroot(chroot_dir) < 0) {
3867             fprintf(stderr, "chroot failed\n");
3868             exit(1);
3869         }
3870         if (chdir("/")) {
3871             perror("not able to chdir to /");
3872             exit(1);
3873         }
3874     }
3875
3876     if (run_as) {
3877         if (setgid(pwd->pw_gid) < 0) {
3878             fprintf(stderr, "Failed to setgid(%d)\n", pwd->pw_gid);
3879             exit(1);
3880         }
3881         if (setuid(pwd->pw_uid) < 0) {
3882             fprintf(stderr, "Failed to setuid(%d)\n", pwd->pw_uid);
3883             exit(1);
3884         }
3885         if (setuid(0) != -1) {
3886             fprintf(stderr, "Dropping privileges failed\n");
3887             exit(1);
3888         }
3889     }
3890
3891     if (daemonize) {
3892         dup2(fd, 0);
3893         dup2(fd, 1);
3894         dup2(fd, 2);
3895
3896         close(fd);
3897     }
3898 #endif
3899
3900     main_loop();
3901     quit_timers();
3902     net_cleanup();
3903
3904     return 0;
3905 }