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