]> git.proxmox.com Git - qemu.git/blob - vl.c
Fix driftfix option
[qemu.git] / 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 #else
56 #include <util.h>
57 #endif
58 #else
59 #ifdef __linux__
60 #include <pty.h>
61 #include <malloc.h>
62 #include <sys/prctl.h>
63
64 #include <linux/ppdev.h>
65 #include <linux/parport.h>
66 #endif
67 #ifdef __sun__
68 #include <sys/stat.h>
69 #include <sys/ethernet.h>
70 #include <sys/sockio.h>
71 #include <netinet/arp.h>
72 #include <netinet/in.h>
73 #include <netinet/in_systm.h>
74 #include <netinet/ip.h>
75 #include <netinet/ip_icmp.h> // must come after ip.h
76 #include <netinet/udp.h>
77 #include <netinet/tcp.h>
78 #include <net/if.h>
79 #include <syslog.h>
80 #include <stropts.h>
81 /* See MySQL bug #7156 (http://bugs.mysql.com/bug.php?id=7156) for
82 discussion about Solaris header problems */
83 extern int madvise(caddr_t, size_t, int);
84 #endif
85 #endif
86 #endif
87
88 #if defined(__OpenBSD__)
89 #include <util.h>
90 #endif
91
92 #if defined(CONFIG_VDE)
93 #include <libvdeplug.h>
94 #endif
95
96 #ifdef _WIN32
97 #include <windows.h>
98 #endif
99
100 #ifdef CONFIG_SDL
101 #if defined(__APPLE__) || defined(main)
102 #include <SDL.h>
103 int qemu_main(int argc, char **argv, char **envp);
104 int main(int argc, char **argv)
105 {
106 return qemu_main(argc, argv, NULL);
107 }
108 #undef main
109 #define main qemu_main
110 #endif
111 #endif /* CONFIG_SDL */
112
113 #ifdef CONFIG_COCOA
114 #undef main
115 #define main qemu_main
116 #endif /* CONFIG_COCOA */
117
118 #include "hw/hw.h"
119 #include "hw/boards.h"
120 #include "hw/usb.h"
121 #include "hw/pcmcia.h"
122 #include "hw/pc.h"
123 #include "hw/audiodev.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 "balloon.h"
150 #include "qemu-option.h"
151 #include "qemu-config.h"
152 #include "qemu-objects.h"
153
154 #include "disas.h"
155
156 #include "exec-all.h"
157
158 #include "qemu_socket.h"
159
160 #include "slirp/libslirp.h"
161
162 #include "qemu-queue.h"
163
164 //#define DEBUG_NET
165 //#define DEBUG_SLIRP
166
167 #define DEFAULT_RAM_SIZE 128
168
169 #define MAX_VIRTIO_CONSOLES 1
170
171 static const char *data_dir;
172 const char *bios_name = NULL;
173 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
174 to store the VM snapshots */
175 struct drivelist drives = QTAILQ_HEAD_INITIALIZER(drives);
176 struct driveoptlist driveopts = QTAILQ_HEAD_INITIALIZER(driveopts);
177 enum vga_retrace_method vga_retrace_method = VGA_RETRACE_DUMB;
178 DisplayType display_type = DT_DEFAULT;
179 const char* keyboard_layout = NULL;
180 ram_addr_t ram_size;
181 const char *mem_path = NULL;
182 #ifdef MAP_POPULATE
183 int mem_prealloc = 0; /* force preallocation of physical target memory */
184 #endif
185 int nb_nics;
186 NICInfo nd_table[MAX_NICS];
187 int vm_running;
188 int autostart;
189 static int rtc_utc = 1;
190 static int rtc_date_offset = -1; /* -1 means no change */
191 QEMUClock *rtc_clock;
192 int vga_interface_type = VGA_NONE;
193 #ifdef TARGET_SPARC
194 int graphic_width = 1024;
195 int graphic_height = 768;
196 int graphic_depth = 8;
197 #else
198 int graphic_width = 800;
199 int graphic_height = 600;
200 int graphic_depth = 15;
201 #endif
202 static int full_screen = 0;
203 #ifdef CONFIG_SDL
204 static int no_frame = 0;
205 #endif
206 int no_quit = 0;
207 CharDriverState *serial_hds[MAX_SERIAL_PORTS];
208 CharDriverState *parallel_hds[MAX_PARALLEL_PORTS];
209 CharDriverState *virtcon_hds[MAX_VIRTIO_CONSOLES];
210 int win2k_install_hack = 0;
211 #ifdef TARGET_I386
212 int rtc_td_hack = 0;
213 #endif
214 int usb_enabled = 0;
215 int singlestep = 0;
216 int smp_cpus = 1;
217 int max_cpus = 0;
218 int smp_cores = 1;
219 int smp_threads = 1;
220 const char *vnc_display;
221 int acpi_enabled = 1;
222 int no_hpet = 0;
223 int fd_bootchk = 1;
224 int no_reboot = 0;
225 int no_shutdown = 0;
226 int cursor_hide = 1;
227 int graphic_rotate = 0;
228 uint8_t irq0override = 1;
229 #ifndef _WIN32
230 int daemonize = 0;
231 #endif
232 const char *watchdog;
233 const char *option_rom[MAX_OPTION_ROMS];
234 int nb_option_roms;
235 int semihosting_enabled = 0;
236 #ifdef TARGET_ARM
237 int old_param = 0;
238 #endif
239 const char *qemu_name;
240 int alt_grab = 0;
241 int ctrl_grab = 0;
242 #if defined(TARGET_SPARC) || defined(TARGET_PPC)
243 unsigned int nb_prom_envs = 0;
244 const char *prom_envs[MAX_PROM_ENVS];
245 #endif
246 int boot_menu;
247
248 int nb_numa_nodes;
249 uint64_t node_mem[MAX_NODES];
250 uint64_t node_cpumask[MAX_NODES];
251
252 static CPUState *cur_cpu;
253 static CPUState *next_cpu;
254 static QEMUTimer *nographic_timer;
255
256 uint8_t qemu_uuid[16];
257
258 static QEMUBootSetHandler *boot_set_handler;
259 static void *boot_set_opaque;
260
261 #ifdef SIGRTMIN
262 #define SIG_IPI (SIGRTMIN+4)
263 #else
264 #define SIG_IPI SIGUSR1
265 #endif
266
267 static int default_serial = 1;
268 static int default_parallel = 1;
269 static int default_virtcon = 1;
270 static int default_monitor = 1;
271 static int default_vga = 1;
272 static int default_floppy = 1;
273 static int default_cdrom = 1;
274 static int default_sdcard = 1;
275
276 static struct {
277 const char *driver;
278 int *flag;
279 } default_list[] = {
280 { .driver = "isa-serial", .flag = &default_serial },
281 { .driver = "isa-parallel", .flag = &default_parallel },
282 { .driver = "isa-fdc", .flag = &default_floppy },
283 { .driver = "ide-drive", .flag = &default_cdrom },
284 { .driver = "virtio-serial-pci", .flag = &default_virtcon },
285 { .driver = "virtio-serial-s390", .flag = &default_virtcon },
286 { .driver = "virtio-serial", .flag = &default_virtcon },
287 { .driver = "VGA", .flag = &default_vga },
288 { .driver = "cirrus-vga", .flag = &default_vga },
289 { .driver = "vmware-svga", .flag = &default_vga },
290 };
291
292 static int default_driver_check(QemuOpts *opts, void *opaque)
293 {
294 const char *driver = qemu_opt_get(opts, "driver");
295 int i;
296
297 if (!driver)
298 return 0;
299 for (i = 0; i < ARRAY_SIZE(default_list); i++) {
300 if (strcmp(default_list[i].driver, driver) != 0)
301 continue;
302 *(default_list[i].flag) = 0;
303 }
304 return 0;
305 }
306
307 /***********************************************************/
308 /* x86 ISA bus support */
309
310 target_phys_addr_t isa_mem_base = 0;
311 PicState2 *isa_pic;
312
313 /***********************************************************/
314 void hw_error(const char *fmt, ...)
315 {
316 va_list ap;
317 CPUState *env;
318
319 va_start(ap, fmt);
320 fprintf(stderr, "qemu: hardware error: ");
321 vfprintf(stderr, fmt, ap);
322 fprintf(stderr, "\n");
323 for(env = first_cpu; env != NULL; env = env->next_cpu) {
324 fprintf(stderr, "CPU #%d:\n", env->cpu_index);
325 #ifdef TARGET_I386
326 cpu_dump_state(env, stderr, fprintf, X86_DUMP_FPU);
327 #else
328 cpu_dump_state(env, stderr, fprintf, 0);
329 #endif
330 }
331 va_end(ap);
332 abort();
333 }
334
335 static void set_proc_name(const char *s)
336 {
337 #if defined(__linux__) && defined(PR_SET_NAME)
338 char name[16];
339 if (!s)
340 return;
341 name[sizeof(name) - 1] = 0;
342 strncpy(name, s, sizeof(name));
343 /* Could rewrite argv[0] too, but that's a bit more complicated.
344 This simple way is enough for `top'. */
345 prctl(PR_SET_NAME, name);
346 #endif
347 }
348
349 /***************/
350 /* ballooning */
351
352 static QEMUBalloonEvent *qemu_balloon_event;
353 void *qemu_balloon_event_opaque;
354
355 void qemu_add_balloon_handler(QEMUBalloonEvent *func, void *opaque)
356 {
357 qemu_balloon_event = func;
358 qemu_balloon_event_opaque = opaque;
359 }
360
361 int qemu_balloon(ram_addr_t target, MonitorCompletion cb, void *opaque)
362 {
363 if (qemu_balloon_event) {
364 qemu_balloon_event(qemu_balloon_event_opaque, target, cb, opaque);
365 return 1;
366 } else {
367 return 0;
368 }
369 }
370
371 int qemu_balloon_status(MonitorCompletion cb, void *opaque)
372 {
373 if (qemu_balloon_event) {
374 qemu_balloon_event(qemu_balloon_event_opaque, 0, cb, opaque);
375 return 1;
376 } else {
377 return 0;
378 }
379 }
380
381
382 /***********************************************************/
383 /* real time host monotonic timer */
384
385 /* compute with 96 bit intermediate result: (a*b)/c */
386 uint64_t muldiv64(uint64_t a, uint32_t b, uint32_t c)
387 {
388 union {
389 uint64_t ll;
390 struct {
391 #ifdef HOST_WORDS_BIGENDIAN
392 uint32_t high, low;
393 #else
394 uint32_t low, high;
395 #endif
396 } l;
397 } u, res;
398 uint64_t rl, rh;
399
400 u.ll = a;
401 rl = (uint64_t)u.l.low * (uint64_t)b;
402 rh = (uint64_t)u.l.high * (uint64_t)b;
403 rh += (rl >> 32);
404 res.l.high = rh / c;
405 res.l.low = (((rh % c) << 32) + (rl & 0xffffffff)) / c;
406 return res.ll;
407 }
408
409 /***********************************************************/
410 /* host time/date access */
411 void qemu_get_timedate(struct tm *tm, int offset)
412 {
413 time_t ti;
414 struct tm *ret;
415
416 time(&ti);
417 ti += offset;
418 if (rtc_date_offset == -1) {
419 if (rtc_utc)
420 ret = gmtime(&ti);
421 else
422 ret = localtime(&ti);
423 } else {
424 ti -= rtc_date_offset;
425 ret = gmtime(&ti);
426 }
427
428 memcpy(tm, ret, sizeof(struct tm));
429 }
430
431 int qemu_timedate_diff(struct tm *tm)
432 {
433 time_t seconds;
434
435 if (rtc_date_offset == -1)
436 if (rtc_utc)
437 seconds = mktimegm(tm);
438 else
439 seconds = mktime(tm);
440 else
441 seconds = mktimegm(tm) + rtc_date_offset;
442
443 return seconds - time(NULL);
444 }
445
446 void rtc_change_mon_event(struct tm *tm)
447 {
448 QObject *data;
449
450 data = qobject_from_jsonf("{ 'offset': %d }", qemu_timedate_diff(tm));
451 monitor_protocol_event(QEVENT_RTC_CHANGE, data);
452 qobject_decref(data);
453 }
454
455 static void configure_rtc_date_offset(const char *startdate, int legacy)
456 {
457 time_t rtc_start_date;
458 struct tm tm;
459
460 if (!strcmp(startdate, "now") && legacy) {
461 rtc_date_offset = -1;
462 } else {
463 if (sscanf(startdate, "%d-%d-%dT%d:%d:%d",
464 &tm.tm_year,
465 &tm.tm_mon,
466 &tm.tm_mday,
467 &tm.tm_hour,
468 &tm.tm_min,
469 &tm.tm_sec) == 6) {
470 /* OK */
471 } else if (sscanf(startdate, "%d-%d-%d",
472 &tm.tm_year,
473 &tm.tm_mon,
474 &tm.tm_mday) == 3) {
475 tm.tm_hour = 0;
476 tm.tm_min = 0;
477 tm.tm_sec = 0;
478 } else {
479 goto date_fail;
480 }
481 tm.tm_year -= 1900;
482 tm.tm_mon--;
483 rtc_start_date = mktimegm(&tm);
484 if (rtc_start_date == -1) {
485 date_fail:
486 fprintf(stderr, "Invalid date format. Valid formats are:\n"
487 "'2006-06-17T16:01:21' or '2006-06-17'\n");
488 exit(1);
489 }
490 rtc_date_offset = time(NULL) - rtc_start_date;
491 }
492 }
493
494 static void configure_rtc(QemuOpts *opts)
495 {
496 const char *value;
497
498 value = qemu_opt_get(opts, "base");
499 if (value) {
500 if (!strcmp(value, "utc")) {
501 rtc_utc = 1;
502 } else if (!strcmp(value, "localtime")) {
503 rtc_utc = 0;
504 } else {
505 configure_rtc_date_offset(value, 0);
506 }
507 }
508 value = qemu_opt_get(opts, "clock");
509 if (value) {
510 if (!strcmp(value, "host")) {
511 rtc_clock = host_clock;
512 } else if (!strcmp(value, "vm")) {
513 rtc_clock = vm_clock;
514 } else {
515 fprintf(stderr, "qemu: invalid option value '%s'\n", value);
516 exit(1);
517 }
518 }
519 #ifdef TARGET_I386
520 value = qemu_opt_get(opts, "driftfix");
521 if (value) {
522 if (!strcmp(value, "slew")) {
523 rtc_td_hack = 1;
524 } else if (!strcmp(value, "none")) {
525 rtc_td_hack = 0;
526 } else {
527 fprintf(stderr, "qemu: invalid option value '%s'\n", value);
528 exit(1);
529 }
530 }
531 #endif
532 }
533
534 #ifdef _WIN32
535 static void socket_cleanup(void)
536 {
537 WSACleanup();
538 }
539
540 static int socket_init(void)
541 {
542 WSADATA Data;
543 int ret, err;
544
545 ret = WSAStartup(MAKEWORD(2,2), &Data);
546 if (ret != 0) {
547 err = WSAGetLastError();
548 fprintf(stderr, "WSAStartup: %d\n", err);
549 return -1;
550 }
551 atexit(socket_cleanup);
552 return 0;
553 }
554 #endif
555
556 /***********************************************************/
557 /* Bluetooth support */
558 static int nb_hcis;
559 static int cur_hci;
560 static struct HCIInfo *hci_table[MAX_NICS];
561
562 static struct bt_vlan_s {
563 struct bt_scatternet_s net;
564 int id;
565 struct bt_vlan_s *next;
566 } *first_bt_vlan;
567
568 /* find or alloc a new bluetooth "VLAN" */
569 static struct bt_scatternet_s *qemu_find_bt_vlan(int id)
570 {
571 struct bt_vlan_s **pvlan, *vlan;
572 for (vlan = first_bt_vlan; vlan != NULL; vlan = vlan->next) {
573 if (vlan->id == id)
574 return &vlan->net;
575 }
576 vlan = qemu_mallocz(sizeof(struct bt_vlan_s));
577 vlan->id = id;
578 pvlan = &first_bt_vlan;
579 while (*pvlan != NULL)
580 pvlan = &(*pvlan)->next;
581 *pvlan = vlan;
582 return &vlan->net;
583 }
584
585 static void null_hci_send(struct HCIInfo *hci, const uint8_t *data, int len)
586 {
587 }
588
589 static int null_hci_addr_set(struct HCIInfo *hci, const uint8_t *bd_addr)
590 {
591 return -ENOTSUP;
592 }
593
594 static struct HCIInfo null_hci = {
595 .cmd_send = null_hci_send,
596 .sco_send = null_hci_send,
597 .acl_send = null_hci_send,
598 .bdaddr_set = null_hci_addr_set,
599 };
600
601 struct HCIInfo *qemu_next_hci(void)
602 {
603 if (cur_hci == nb_hcis)
604 return &null_hci;
605
606 return hci_table[cur_hci++];
607 }
608
609 static struct HCIInfo *hci_init(const char *str)
610 {
611 char *endp;
612 struct bt_scatternet_s *vlan = 0;
613
614 if (!strcmp(str, "null"))
615 /* null */
616 return &null_hci;
617 else if (!strncmp(str, "host", 4) && (str[4] == '\0' || str[4] == ':'))
618 /* host[:hciN] */
619 return bt_host_hci(str[4] ? str + 5 : "hci0");
620 else if (!strncmp(str, "hci", 3)) {
621 /* hci[,vlan=n] */
622 if (str[3]) {
623 if (!strncmp(str + 3, ",vlan=", 6)) {
624 vlan = qemu_find_bt_vlan(strtol(str + 9, &endp, 0));
625 if (*endp)
626 vlan = 0;
627 }
628 } else
629 vlan = qemu_find_bt_vlan(0);
630 if (vlan)
631 return bt_new_hci(vlan);
632 }
633
634 fprintf(stderr, "qemu: Unknown bluetooth HCI `%s'.\n", str);
635
636 return 0;
637 }
638
639 static int bt_hci_parse(const char *str)
640 {
641 struct HCIInfo *hci;
642 bdaddr_t bdaddr;
643
644 if (nb_hcis >= MAX_NICS) {
645 fprintf(stderr, "qemu: Too many bluetooth HCIs (max %i).\n", MAX_NICS);
646 return -1;
647 }
648
649 hci = hci_init(str);
650 if (!hci)
651 return -1;
652
653 bdaddr.b[0] = 0x52;
654 bdaddr.b[1] = 0x54;
655 bdaddr.b[2] = 0x00;
656 bdaddr.b[3] = 0x12;
657 bdaddr.b[4] = 0x34;
658 bdaddr.b[5] = 0x56 + nb_hcis;
659 hci->bdaddr_set(hci, bdaddr.b);
660
661 hci_table[nb_hcis++] = hci;
662
663 return 0;
664 }
665
666 static void bt_vhci_add(int vlan_id)
667 {
668 struct bt_scatternet_s *vlan = qemu_find_bt_vlan(vlan_id);
669
670 if (!vlan->slave)
671 fprintf(stderr, "qemu: warning: adding a VHCI to "
672 "an empty scatternet %i\n", vlan_id);
673
674 bt_vhci_init(bt_new_hci(vlan));
675 }
676
677 static struct bt_device_s *bt_device_add(const char *opt)
678 {
679 struct bt_scatternet_s *vlan;
680 int vlan_id = 0;
681 char *endp = strstr(opt, ",vlan=");
682 int len = (endp ? endp - opt : strlen(opt)) + 1;
683 char devname[10];
684
685 pstrcpy(devname, MIN(sizeof(devname), len), opt);
686
687 if (endp) {
688 vlan_id = strtol(endp + 6, &endp, 0);
689 if (*endp) {
690 fprintf(stderr, "qemu: unrecognised bluetooth vlan Id\n");
691 return 0;
692 }
693 }
694
695 vlan = qemu_find_bt_vlan(vlan_id);
696
697 if (!vlan->slave)
698 fprintf(stderr, "qemu: warning: adding a slave device to "
699 "an empty scatternet %i\n", vlan_id);
700
701 if (!strcmp(devname, "keyboard"))
702 return bt_keyboard_init(vlan);
703
704 fprintf(stderr, "qemu: unsupported bluetooth device `%s'\n", devname);
705 return 0;
706 }
707
708 static int bt_parse(const char *opt)
709 {
710 const char *endp, *p;
711 int vlan;
712
713 if (strstart(opt, "hci", &endp)) {
714 if (!*endp || *endp == ',') {
715 if (*endp)
716 if (!strstart(endp, ",vlan=", 0))
717 opt = endp + 1;
718
719 return bt_hci_parse(opt);
720 }
721 } else if (strstart(opt, "vhci", &endp)) {
722 if (!*endp || *endp == ',') {
723 if (*endp) {
724 if (strstart(endp, ",vlan=", &p)) {
725 vlan = strtol(p, (char **) &endp, 0);
726 if (*endp) {
727 fprintf(stderr, "qemu: bad scatternet '%s'\n", p);
728 return 1;
729 }
730 } else {
731 fprintf(stderr, "qemu: bad parameter '%s'\n", endp + 1);
732 return 1;
733 }
734 } else
735 vlan = 0;
736
737 bt_vhci_add(vlan);
738 return 0;
739 }
740 } else if (strstart(opt, "device:", &endp))
741 return !bt_device_add(endp);
742
743 fprintf(stderr, "qemu: bad bluetooth parameter '%s'\n", opt);
744 return 1;
745 }
746
747 /***********************************************************/
748 /* QEMU Block devices */
749
750 #define HD_ALIAS "index=%d,media=disk"
751 #define CDROM_ALIAS "index=2,media=cdrom"
752 #define FD_ALIAS "index=%d,if=floppy"
753 #define PFLASH_ALIAS "if=pflash"
754 #define MTD_ALIAS "if=mtd"
755 #define SD_ALIAS "index=0,if=sd"
756
757 QemuOpts *drive_add(const char *file, const char *fmt, ...)
758 {
759 va_list ap;
760 char optstr[1024];
761 QemuOpts *opts;
762
763 va_start(ap, fmt);
764 vsnprintf(optstr, sizeof(optstr), fmt, ap);
765 va_end(ap);
766
767 opts = qemu_opts_parse(&qemu_drive_opts, optstr, 0);
768 if (!opts) {
769 fprintf(stderr, "%s: huh? duplicate? (%s)\n",
770 __FUNCTION__, optstr);
771 return NULL;
772 }
773 if (file)
774 qemu_opt_set(opts, "file", file);
775 return opts;
776 }
777
778 DriveInfo *drive_get(BlockInterfaceType type, int bus, int unit)
779 {
780 DriveInfo *dinfo;
781
782 /* seek interface, bus and unit */
783
784 QTAILQ_FOREACH(dinfo, &drives, next) {
785 if (dinfo->type == type &&
786 dinfo->bus == bus &&
787 dinfo->unit == unit)
788 return dinfo;
789 }
790
791 return NULL;
792 }
793
794 DriveInfo *drive_get_by_id(const char *id)
795 {
796 DriveInfo *dinfo;
797
798 QTAILQ_FOREACH(dinfo, &drives, next) {
799 if (strcmp(id, dinfo->id))
800 continue;
801 return dinfo;
802 }
803 return NULL;
804 }
805
806 int drive_get_max_bus(BlockInterfaceType type)
807 {
808 int max_bus;
809 DriveInfo *dinfo;
810
811 max_bus = -1;
812 QTAILQ_FOREACH(dinfo, &drives, next) {
813 if(dinfo->type == type &&
814 dinfo->bus > max_bus)
815 max_bus = dinfo->bus;
816 }
817 return max_bus;
818 }
819
820 const char *drive_get_serial(BlockDriverState *bdrv)
821 {
822 DriveInfo *dinfo;
823
824 QTAILQ_FOREACH(dinfo, &drives, next) {
825 if (dinfo->bdrv == bdrv)
826 return dinfo->serial;
827 }
828
829 return "\0";
830 }
831
832 BlockInterfaceErrorAction drive_get_on_error(
833 BlockDriverState *bdrv, int is_read)
834 {
835 DriveInfo *dinfo;
836
837 QTAILQ_FOREACH(dinfo, &drives, next) {
838 if (dinfo->bdrv == bdrv)
839 return is_read ? dinfo->on_read_error : dinfo->on_write_error;
840 }
841
842 return is_read ? BLOCK_ERR_REPORT : BLOCK_ERR_STOP_ENOSPC;
843 }
844
845 static void bdrv_format_print(void *opaque, const char *name)
846 {
847 fprintf(stderr, " %s", name);
848 }
849
850 void drive_uninit(DriveInfo *dinfo)
851 {
852 qemu_opts_del(dinfo->opts);
853 bdrv_delete(dinfo->bdrv);
854 QTAILQ_REMOVE(&drives, dinfo, next);
855 qemu_free(dinfo);
856 }
857
858 static int parse_block_error_action(const char *buf, int is_read)
859 {
860 if (!strcmp(buf, "ignore")) {
861 return BLOCK_ERR_IGNORE;
862 } else if (!is_read && !strcmp(buf, "enospc")) {
863 return BLOCK_ERR_STOP_ENOSPC;
864 } else if (!strcmp(buf, "stop")) {
865 return BLOCK_ERR_STOP_ANY;
866 } else if (!strcmp(buf, "report")) {
867 return BLOCK_ERR_REPORT;
868 } else {
869 fprintf(stderr, "qemu: '%s' invalid %s error action\n",
870 buf, is_read ? "read" : "write");
871 return -1;
872 }
873 }
874
875 DriveInfo *drive_init(QemuOpts *opts, void *opaque,
876 int *fatal_error)
877 {
878 const char *buf;
879 const char *file = NULL;
880 char devname[128];
881 const char *serial;
882 const char *mediastr = "";
883 BlockInterfaceType type;
884 enum { MEDIA_DISK, MEDIA_CDROM } media;
885 int bus_id, unit_id;
886 int cyls, heads, secs, translation;
887 BlockDriver *drv = NULL;
888 QEMUMachine *machine = opaque;
889 int max_devs;
890 int index;
891 int cache;
892 int aio = 0;
893 int ro = 0;
894 int bdrv_flags;
895 int on_read_error, on_write_error;
896 const char *devaddr;
897 DriveInfo *dinfo;
898 int snapshot = 0;
899
900 *fatal_error = 1;
901
902 translation = BIOS_ATA_TRANSLATION_AUTO;
903 cache = 1;
904
905 if (machine && machine->use_scsi) {
906 type = IF_SCSI;
907 max_devs = MAX_SCSI_DEVS;
908 pstrcpy(devname, sizeof(devname), "scsi");
909 } else {
910 type = IF_IDE;
911 max_devs = MAX_IDE_DEVS;
912 pstrcpy(devname, sizeof(devname), "ide");
913 }
914 media = MEDIA_DISK;
915
916 /* extract parameters */
917 bus_id = qemu_opt_get_number(opts, "bus", 0);
918 unit_id = qemu_opt_get_number(opts, "unit", -1);
919 index = qemu_opt_get_number(opts, "index", -1);
920
921 cyls = qemu_opt_get_number(opts, "cyls", 0);
922 heads = qemu_opt_get_number(opts, "heads", 0);
923 secs = qemu_opt_get_number(opts, "secs", 0);
924
925 snapshot = qemu_opt_get_bool(opts, "snapshot", 0);
926 ro = qemu_opt_get_bool(opts, "readonly", 0);
927
928 file = qemu_opt_get(opts, "file");
929 serial = qemu_opt_get(opts, "serial");
930
931 if ((buf = qemu_opt_get(opts, "if")) != NULL) {
932 pstrcpy(devname, sizeof(devname), buf);
933 if (!strcmp(buf, "ide")) {
934 type = IF_IDE;
935 max_devs = MAX_IDE_DEVS;
936 } else if (!strcmp(buf, "scsi")) {
937 type = IF_SCSI;
938 max_devs = MAX_SCSI_DEVS;
939 } else if (!strcmp(buf, "floppy")) {
940 type = IF_FLOPPY;
941 max_devs = 0;
942 } else if (!strcmp(buf, "pflash")) {
943 type = IF_PFLASH;
944 max_devs = 0;
945 } else if (!strcmp(buf, "mtd")) {
946 type = IF_MTD;
947 max_devs = 0;
948 } else if (!strcmp(buf, "sd")) {
949 type = IF_SD;
950 max_devs = 0;
951 } else if (!strcmp(buf, "virtio")) {
952 type = IF_VIRTIO;
953 max_devs = 0;
954 } else if (!strcmp(buf, "xen")) {
955 type = IF_XEN;
956 max_devs = 0;
957 } else if (!strcmp(buf, "none")) {
958 type = IF_NONE;
959 max_devs = 0;
960 } else {
961 fprintf(stderr, "qemu: unsupported bus type '%s'\n", buf);
962 return NULL;
963 }
964 }
965
966 if (cyls || heads || secs) {
967 if (cyls < 1 || (type == IF_IDE && cyls > 16383)) {
968 fprintf(stderr, "qemu: '%s' invalid physical cyls number\n", buf);
969 return NULL;
970 }
971 if (heads < 1 || (type == IF_IDE && heads > 16)) {
972 fprintf(stderr, "qemu: '%s' invalid physical heads number\n", buf);
973 return NULL;
974 }
975 if (secs < 1 || (type == IF_IDE && secs > 63)) {
976 fprintf(stderr, "qemu: '%s' invalid physical secs number\n", buf);
977 return NULL;
978 }
979 }
980
981 if ((buf = qemu_opt_get(opts, "trans")) != NULL) {
982 if (!cyls) {
983 fprintf(stderr,
984 "qemu: '%s' trans must be used with cyls,heads and secs\n",
985 buf);
986 return NULL;
987 }
988 if (!strcmp(buf, "none"))
989 translation = BIOS_ATA_TRANSLATION_NONE;
990 else if (!strcmp(buf, "lba"))
991 translation = BIOS_ATA_TRANSLATION_LBA;
992 else if (!strcmp(buf, "auto"))
993 translation = BIOS_ATA_TRANSLATION_AUTO;
994 else {
995 fprintf(stderr, "qemu: '%s' invalid translation type\n", buf);
996 return NULL;
997 }
998 }
999
1000 if ((buf = qemu_opt_get(opts, "media")) != NULL) {
1001 if (!strcmp(buf, "disk")) {
1002 media = MEDIA_DISK;
1003 } else if (!strcmp(buf, "cdrom")) {
1004 if (cyls || secs || heads) {
1005 fprintf(stderr,
1006 "qemu: '%s' invalid physical CHS format\n", buf);
1007 return NULL;
1008 }
1009 media = MEDIA_CDROM;
1010 } else {
1011 fprintf(stderr, "qemu: '%s' invalid media\n", buf);
1012 return NULL;
1013 }
1014 }
1015
1016 if ((buf = qemu_opt_get(opts, "cache")) != NULL) {
1017 if (!strcmp(buf, "off") || !strcmp(buf, "none"))
1018 cache = 0;
1019 else if (!strcmp(buf, "writethrough"))
1020 cache = 1;
1021 else if (!strcmp(buf, "writeback"))
1022 cache = 2;
1023 else {
1024 fprintf(stderr, "qemu: invalid cache option\n");
1025 return NULL;
1026 }
1027 }
1028
1029 #ifdef CONFIG_LINUX_AIO
1030 if ((buf = qemu_opt_get(opts, "aio")) != NULL) {
1031 if (!strcmp(buf, "threads"))
1032 aio = 0;
1033 else if (!strcmp(buf, "native"))
1034 aio = 1;
1035 else {
1036 fprintf(stderr, "qemu: invalid aio option\n");
1037 return NULL;
1038 }
1039 }
1040 #endif
1041
1042 if ((buf = qemu_opt_get(opts, "format")) != NULL) {
1043 if (strcmp(buf, "?") == 0) {
1044 fprintf(stderr, "qemu: Supported formats:");
1045 bdrv_iterate_format(bdrv_format_print, NULL);
1046 fprintf(stderr, "\n");
1047 return NULL;
1048 }
1049 drv = bdrv_find_whitelisted_format(buf);
1050 if (!drv) {
1051 fprintf(stderr, "qemu: '%s' invalid format\n", buf);
1052 return NULL;
1053 }
1054 }
1055
1056 on_write_error = BLOCK_ERR_STOP_ENOSPC;
1057 if ((buf = qemu_opt_get(opts, "werror")) != NULL) {
1058 if (type != IF_IDE && type != IF_SCSI && type != IF_VIRTIO) {
1059 fprintf(stderr, "werror is no supported by this format\n");
1060 return NULL;
1061 }
1062
1063 on_write_error = parse_block_error_action(buf, 0);
1064 if (on_write_error < 0) {
1065 return NULL;
1066 }
1067 }
1068
1069 on_read_error = BLOCK_ERR_REPORT;
1070 if ((buf = qemu_opt_get(opts, "rerror")) != NULL) {
1071 if (type != IF_IDE && type != IF_VIRTIO) {
1072 fprintf(stderr, "rerror is no supported by this format\n");
1073 return NULL;
1074 }
1075
1076 on_read_error = parse_block_error_action(buf, 1);
1077 if (on_read_error < 0) {
1078 return NULL;
1079 }
1080 }
1081
1082 if ((devaddr = qemu_opt_get(opts, "addr")) != NULL) {
1083 if (type != IF_VIRTIO) {
1084 fprintf(stderr, "addr is not supported\n");
1085 return NULL;
1086 }
1087 }
1088
1089 /* compute bus and unit according index */
1090
1091 if (index != -1) {
1092 if (bus_id != 0 || unit_id != -1) {
1093 fprintf(stderr,
1094 "qemu: index cannot be used with bus and unit\n");
1095 return NULL;
1096 }
1097 if (max_devs == 0)
1098 {
1099 unit_id = index;
1100 bus_id = 0;
1101 } else {
1102 unit_id = index % max_devs;
1103 bus_id = index / max_devs;
1104 }
1105 }
1106
1107 /* if user doesn't specify a unit_id,
1108 * try to find the first free
1109 */
1110
1111 if (unit_id == -1) {
1112 unit_id = 0;
1113 while (drive_get(type, bus_id, unit_id) != NULL) {
1114 unit_id++;
1115 if (max_devs && unit_id >= max_devs) {
1116 unit_id -= max_devs;
1117 bus_id++;
1118 }
1119 }
1120 }
1121
1122 /* check unit id */
1123
1124 if (max_devs && unit_id >= max_devs) {
1125 fprintf(stderr, "qemu: unit %d too big (max is %d)\n",
1126 unit_id, max_devs - 1);
1127 return NULL;
1128 }
1129
1130 /*
1131 * ignore multiple definitions
1132 */
1133
1134 if (drive_get(type, bus_id, unit_id) != NULL) {
1135 *fatal_error = 0;
1136 return NULL;
1137 }
1138
1139 /* init */
1140
1141 dinfo = qemu_mallocz(sizeof(*dinfo));
1142 if ((buf = qemu_opts_id(opts)) != NULL) {
1143 dinfo->id = qemu_strdup(buf);
1144 } else {
1145 /* no id supplied -> create one */
1146 dinfo->id = qemu_mallocz(32);
1147 if (type == IF_IDE || type == IF_SCSI)
1148 mediastr = (media == MEDIA_CDROM) ? "-cd" : "-hd";
1149 if (max_devs)
1150 snprintf(dinfo->id, 32, "%s%i%s%i",
1151 devname, bus_id, mediastr, unit_id);
1152 else
1153 snprintf(dinfo->id, 32, "%s%s%i",
1154 devname, mediastr, unit_id);
1155 }
1156 dinfo->bdrv = bdrv_new(dinfo->id);
1157 dinfo->devaddr = devaddr;
1158 dinfo->type = type;
1159 dinfo->bus = bus_id;
1160 dinfo->unit = unit_id;
1161 dinfo->on_read_error = on_read_error;
1162 dinfo->on_write_error = on_write_error;
1163 dinfo->opts = opts;
1164 if (serial)
1165 strncpy(dinfo->serial, serial, sizeof(serial));
1166 QTAILQ_INSERT_TAIL(&drives, dinfo, next);
1167
1168 switch(type) {
1169 case IF_IDE:
1170 case IF_SCSI:
1171 case IF_XEN:
1172 case IF_NONE:
1173 switch(media) {
1174 case MEDIA_DISK:
1175 if (cyls != 0) {
1176 bdrv_set_geometry_hint(dinfo->bdrv, cyls, heads, secs);
1177 bdrv_set_translation_hint(dinfo->bdrv, translation);
1178 }
1179 break;
1180 case MEDIA_CDROM:
1181 bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_CDROM);
1182 break;
1183 }
1184 break;
1185 case IF_SD:
1186 /* FIXME: This isn't really a floppy, but it's a reasonable
1187 approximation. */
1188 case IF_FLOPPY:
1189 bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_FLOPPY);
1190 break;
1191 case IF_PFLASH:
1192 case IF_MTD:
1193 break;
1194 case IF_VIRTIO:
1195 /* add virtio block device */
1196 opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
1197 qemu_opt_set(opts, "driver", "virtio-blk-pci");
1198 qemu_opt_set(opts, "drive", dinfo->id);
1199 if (devaddr)
1200 qemu_opt_set(opts, "addr", devaddr);
1201 break;
1202 case IF_COUNT:
1203 abort();
1204 }
1205 if (!file) {
1206 *fatal_error = 0;
1207 return NULL;
1208 }
1209 bdrv_flags = 0;
1210 if (snapshot) {
1211 bdrv_flags |= BDRV_O_SNAPSHOT;
1212 cache = 2; /* always use write-back with snapshot */
1213 }
1214 if (cache == 0) /* no caching */
1215 bdrv_flags |= BDRV_O_NOCACHE;
1216 else if (cache == 2) /* write-back */
1217 bdrv_flags |= BDRV_O_CACHE_WB;
1218
1219 if (aio == 1) {
1220 bdrv_flags |= BDRV_O_NATIVE_AIO;
1221 } else {
1222 bdrv_flags &= ~BDRV_O_NATIVE_AIO;
1223 }
1224
1225 if (ro == 1) {
1226 if (type != IF_SCSI && type != IF_VIRTIO && type != IF_FLOPPY) {
1227 fprintf(stderr, "qemu: readonly flag not supported for drive with this interface\n");
1228 return NULL;
1229 }
1230 }
1231 /*
1232 * cdrom is read-only. Set it now, after above interface checking
1233 * since readonly attribute not explicitly required, so no error.
1234 */
1235 if (media == MEDIA_CDROM) {
1236 ro = 1;
1237 }
1238 bdrv_flags |= ro ? 0 : BDRV_O_RDWR;
1239
1240 if (bdrv_open2(dinfo->bdrv, file, bdrv_flags, drv) < 0) {
1241 fprintf(stderr, "qemu: could not open disk image %s: %s\n",
1242 file, strerror(errno));
1243 return NULL;
1244 }
1245
1246 if (bdrv_key_required(dinfo->bdrv))
1247 autostart = 0;
1248 *fatal_error = 0;
1249 return dinfo;
1250 }
1251
1252 static int drive_init_func(QemuOpts *opts, void *opaque)
1253 {
1254 QEMUMachine *machine = opaque;
1255 int fatal_error = 0;
1256
1257 if (drive_init(opts, machine, &fatal_error) == NULL) {
1258 if (fatal_error)
1259 return 1;
1260 }
1261 return 0;
1262 }
1263
1264 static int drive_enable_snapshot(QemuOpts *opts, void *opaque)
1265 {
1266 if (NULL == qemu_opt_get(opts, "snapshot")) {
1267 qemu_opt_set(opts, "snapshot", "on");
1268 }
1269 return 0;
1270 }
1271
1272 void qemu_register_boot_set(QEMUBootSetHandler *func, void *opaque)
1273 {
1274 boot_set_handler = func;
1275 boot_set_opaque = opaque;
1276 }
1277
1278 int qemu_boot_set(const char *boot_devices)
1279 {
1280 if (!boot_set_handler) {
1281 return -EINVAL;
1282 }
1283 return boot_set_handler(boot_set_opaque, boot_devices);
1284 }
1285
1286 static int parse_bootdevices(char *devices)
1287 {
1288 /* We just do some generic consistency checks */
1289 const char *p;
1290 int bitmap = 0;
1291
1292 for (p = devices; *p != '\0'; p++) {
1293 /* Allowed boot devices are:
1294 * a-b: floppy disk drives
1295 * c-f: IDE disk drives
1296 * g-m: machine implementation dependant drives
1297 * n-p: network devices
1298 * It's up to each machine implementation to check if the given boot
1299 * devices match the actual hardware implementation and firmware
1300 * features.
1301 */
1302 if (*p < 'a' || *p > 'p') {
1303 fprintf(stderr, "Invalid boot device '%c'\n", *p);
1304 exit(1);
1305 }
1306 if (bitmap & (1 << (*p - 'a'))) {
1307 fprintf(stderr, "Boot device '%c' was given twice\n", *p);
1308 exit(1);
1309 }
1310 bitmap |= 1 << (*p - 'a');
1311 }
1312 return bitmap;
1313 }
1314
1315 static void restore_boot_devices(void *opaque)
1316 {
1317 char *standard_boot_devices = opaque;
1318
1319 qemu_boot_set(standard_boot_devices);
1320
1321 qemu_unregister_reset(restore_boot_devices, standard_boot_devices);
1322 qemu_free(standard_boot_devices);
1323 }
1324
1325 static void numa_add(const char *optarg)
1326 {
1327 char option[128];
1328 char *endptr;
1329 unsigned long long value, endvalue;
1330 int nodenr;
1331
1332 optarg = get_opt_name(option, 128, optarg, ',') + 1;
1333 if (!strcmp(option, "node")) {
1334 if (get_param_value(option, 128, "nodeid", optarg) == 0) {
1335 nodenr = nb_numa_nodes;
1336 } else {
1337 nodenr = strtoull(option, NULL, 10);
1338 }
1339
1340 if (get_param_value(option, 128, "mem", optarg) == 0) {
1341 node_mem[nodenr] = 0;
1342 } else {
1343 value = strtoull(option, &endptr, 0);
1344 switch (*endptr) {
1345 case 0: case 'M': case 'm':
1346 value <<= 20;
1347 break;
1348 case 'G': case 'g':
1349 value <<= 30;
1350 break;
1351 }
1352 node_mem[nodenr] = value;
1353 }
1354 if (get_param_value(option, 128, "cpus", optarg) == 0) {
1355 node_cpumask[nodenr] = 0;
1356 } else {
1357 value = strtoull(option, &endptr, 10);
1358 if (value >= 64) {
1359 value = 63;
1360 fprintf(stderr, "only 64 CPUs in NUMA mode supported.\n");
1361 } else {
1362 if (*endptr == '-') {
1363 endvalue = strtoull(endptr+1, &endptr, 10);
1364 if (endvalue >= 63) {
1365 endvalue = 62;
1366 fprintf(stderr,
1367 "only 63 CPUs in NUMA mode supported.\n");
1368 }
1369 value = (2ULL << endvalue) - (1ULL << value);
1370 } else {
1371 value = 1ULL << value;
1372 }
1373 }
1374 node_cpumask[nodenr] = value;
1375 }
1376 nb_numa_nodes++;
1377 }
1378 return;
1379 }
1380
1381 static void smp_parse(const char *optarg)
1382 {
1383 int smp, sockets = 0, threads = 0, cores = 0;
1384 char *endptr;
1385 char option[128];
1386
1387 smp = strtoul(optarg, &endptr, 10);
1388 if (endptr != optarg) {
1389 if (*endptr == ',') {
1390 endptr++;
1391 }
1392 }
1393 if (get_param_value(option, 128, "sockets", endptr) != 0)
1394 sockets = strtoull(option, NULL, 10);
1395 if (get_param_value(option, 128, "cores", endptr) != 0)
1396 cores = strtoull(option, NULL, 10);
1397 if (get_param_value(option, 128, "threads", endptr) != 0)
1398 threads = strtoull(option, NULL, 10);
1399 if (get_param_value(option, 128, "maxcpus", endptr) != 0)
1400 max_cpus = strtoull(option, NULL, 10);
1401
1402 /* compute missing values, prefer sockets over cores over threads */
1403 if (smp == 0 || sockets == 0) {
1404 sockets = sockets > 0 ? sockets : 1;
1405 cores = cores > 0 ? cores : 1;
1406 threads = threads > 0 ? threads : 1;
1407 if (smp == 0) {
1408 smp = cores * threads * sockets;
1409 }
1410 } else {
1411 if (cores == 0) {
1412 threads = threads > 0 ? threads : 1;
1413 cores = smp / (sockets * threads);
1414 } else {
1415 if (sockets) {
1416 threads = smp / (cores * sockets);
1417 }
1418 }
1419 }
1420 smp_cpus = smp;
1421 smp_cores = cores > 0 ? cores : 1;
1422 smp_threads = threads > 0 ? threads : 1;
1423 if (max_cpus == 0)
1424 max_cpus = smp_cpus;
1425 }
1426
1427 /***********************************************************/
1428 /* USB devices */
1429
1430 static int usb_device_add(const char *devname, int is_hotplug)
1431 {
1432 const char *p;
1433 USBDevice *dev = NULL;
1434
1435 if (!usb_enabled)
1436 return -1;
1437
1438 /* drivers with .usbdevice_name entry in USBDeviceInfo */
1439 dev = usbdevice_create(devname);
1440 if (dev)
1441 goto done;
1442
1443 /* the other ones */
1444 if (strstart(devname, "host:", &p)) {
1445 dev = usb_host_device_open(p);
1446 } else if (!strcmp(devname, "bt") || strstart(devname, "bt:", &p)) {
1447 dev = usb_bt_init(devname[2] ? hci_init(p) :
1448 bt_new_hci(qemu_find_bt_vlan(0)));
1449 } else {
1450 return -1;
1451 }
1452 if (!dev)
1453 return -1;
1454
1455 done:
1456 return 0;
1457 }
1458
1459 static int usb_device_del(const char *devname)
1460 {
1461 int bus_num, addr;
1462 const char *p;
1463
1464 if (strstart(devname, "host:", &p))
1465 return usb_host_device_close(p);
1466
1467 if (!usb_enabled)
1468 return -1;
1469
1470 p = strchr(devname, '.');
1471 if (!p)
1472 return -1;
1473 bus_num = strtoul(devname, NULL, 0);
1474 addr = strtoul(p + 1, NULL, 0);
1475
1476 return usb_device_delete_addr(bus_num, addr);
1477 }
1478
1479 static int usb_parse(const char *cmdline)
1480 {
1481 int r;
1482 r = usb_device_add(cmdline, 0);
1483 if (r < 0) {
1484 fprintf(stderr, "qemu: could not add USB device '%s'\n", cmdline);
1485 }
1486 return r;
1487 }
1488
1489 void do_usb_add(Monitor *mon, const QDict *qdict)
1490 {
1491 const char *devname = qdict_get_str(qdict, "devname");
1492 if (usb_device_add(devname, 1) < 0) {
1493 error_report("could not add USB device '%s'", devname);
1494 }
1495 }
1496
1497 void do_usb_del(Monitor *mon, const QDict *qdict)
1498 {
1499 const char *devname = qdict_get_str(qdict, "devname");
1500 if (usb_device_del(devname) < 0) {
1501 error_report("could not delete USB device '%s'", devname);
1502 }
1503 }
1504
1505 /***********************************************************/
1506 /* PCMCIA/Cardbus */
1507
1508 static struct pcmcia_socket_entry_s {
1509 PCMCIASocket *socket;
1510 struct pcmcia_socket_entry_s *next;
1511 } *pcmcia_sockets = 0;
1512
1513 void pcmcia_socket_register(PCMCIASocket *socket)
1514 {
1515 struct pcmcia_socket_entry_s *entry;
1516
1517 entry = qemu_malloc(sizeof(struct pcmcia_socket_entry_s));
1518 entry->socket = socket;
1519 entry->next = pcmcia_sockets;
1520 pcmcia_sockets = entry;
1521 }
1522
1523 void pcmcia_socket_unregister(PCMCIASocket *socket)
1524 {
1525 struct pcmcia_socket_entry_s *entry, **ptr;
1526
1527 ptr = &pcmcia_sockets;
1528 for (entry = *ptr; entry; ptr = &entry->next, entry = *ptr)
1529 if (entry->socket == socket) {
1530 *ptr = entry->next;
1531 qemu_free(entry);
1532 }
1533 }
1534
1535 void pcmcia_info(Monitor *mon)
1536 {
1537 struct pcmcia_socket_entry_s *iter;
1538
1539 if (!pcmcia_sockets)
1540 monitor_printf(mon, "No PCMCIA sockets\n");
1541
1542 for (iter = pcmcia_sockets; iter; iter = iter->next)
1543 monitor_printf(mon, "%s: %s\n", iter->socket->slot_string,
1544 iter->socket->attached ? iter->socket->card_string :
1545 "Empty");
1546 }
1547
1548 /***********************************************************/
1549 /* I/O handling */
1550
1551 typedef struct IOHandlerRecord {
1552 int fd;
1553 IOCanReadHandler *fd_read_poll;
1554 IOHandler *fd_read;
1555 IOHandler *fd_write;
1556 int deleted;
1557 void *opaque;
1558 /* temporary data */
1559 struct pollfd *ufd;
1560 QLIST_ENTRY(IOHandlerRecord) next;
1561 } IOHandlerRecord;
1562
1563 static QLIST_HEAD(, IOHandlerRecord) io_handlers =
1564 QLIST_HEAD_INITIALIZER(io_handlers);
1565
1566
1567 /* XXX: fd_read_poll should be suppressed, but an API change is
1568 necessary in the character devices to suppress fd_can_read(). */
1569 int qemu_set_fd_handler2(int fd,
1570 IOCanReadHandler *fd_read_poll,
1571 IOHandler *fd_read,
1572 IOHandler *fd_write,
1573 void *opaque)
1574 {
1575 IOHandlerRecord *ioh;
1576
1577 if (!fd_read && !fd_write) {
1578 QLIST_FOREACH(ioh, &io_handlers, next) {
1579 if (ioh->fd == fd) {
1580 ioh->deleted = 1;
1581 break;
1582 }
1583 }
1584 } else {
1585 QLIST_FOREACH(ioh, &io_handlers, next) {
1586 if (ioh->fd == fd)
1587 goto found;
1588 }
1589 ioh = qemu_mallocz(sizeof(IOHandlerRecord));
1590 QLIST_INSERT_HEAD(&io_handlers, ioh, next);
1591 found:
1592 ioh->fd = fd;
1593 ioh->fd_read_poll = fd_read_poll;
1594 ioh->fd_read = fd_read;
1595 ioh->fd_write = fd_write;
1596 ioh->opaque = opaque;
1597 ioh->deleted = 0;
1598 }
1599 return 0;
1600 }
1601
1602 int qemu_set_fd_handler(int fd,
1603 IOHandler *fd_read,
1604 IOHandler *fd_write,
1605 void *opaque)
1606 {
1607 return qemu_set_fd_handler2(fd, NULL, fd_read, fd_write, opaque);
1608 }
1609
1610 #ifdef _WIN32
1611 /***********************************************************/
1612 /* Polling handling */
1613
1614 typedef struct PollingEntry {
1615 PollingFunc *func;
1616 void *opaque;
1617 struct PollingEntry *next;
1618 } PollingEntry;
1619
1620 static PollingEntry *first_polling_entry;
1621
1622 int qemu_add_polling_cb(PollingFunc *func, void *opaque)
1623 {
1624 PollingEntry **ppe, *pe;
1625 pe = qemu_mallocz(sizeof(PollingEntry));
1626 pe->func = func;
1627 pe->opaque = opaque;
1628 for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next);
1629 *ppe = pe;
1630 return 0;
1631 }
1632
1633 void qemu_del_polling_cb(PollingFunc *func, void *opaque)
1634 {
1635 PollingEntry **ppe, *pe;
1636 for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next) {
1637 pe = *ppe;
1638 if (pe->func == func && pe->opaque == opaque) {
1639 *ppe = pe->next;
1640 qemu_free(pe);
1641 break;
1642 }
1643 }
1644 }
1645
1646 /***********************************************************/
1647 /* Wait objects support */
1648 typedef struct WaitObjects {
1649 int num;
1650 HANDLE events[MAXIMUM_WAIT_OBJECTS + 1];
1651 WaitObjectFunc *func[MAXIMUM_WAIT_OBJECTS + 1];
1652 void *opaque[MAXIMUM_WAIT_OBJECTS + 1];
1653 } WaitObjects;
1654
1655 static WaitObjects wait_objects = {0};
1656
1657 int qemu_add_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1658 {
1659 WaitObjects *w = &wait_objects;
1660
1661 if (w->num >= MAXIMUM_WAIT_OBJECTS)
1662 return -1;
1663 w->events[w->num] = handle;
1664 w->func[w->num] = func;
1665 w->opaque[w->num] = opaque;
1666 w->num++;
1667 return 0;
1668 }
1669
1670 void qemu_del_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1671 {
1672 int i, found;
1673 WaitObjects *w = &wait_objects;
1674
1675 found = 0;
1676 for (i = 0; i < w->num; i++) {
1677 if (w->events[i] == handle)
1678 found = 1;
1679 if (found) {
1680 w->events[i] = w->events[i + 1];
1681 w->func[i] = w->func[i + 1];
1682 w->opaque[i] = w->opaque[i + 1];
1683 }
1684 }
1685 if (found)
1686 w->num--;
1687 }
1688 #endif
1689
1690 /***********************************************************/
1691 /* ram save/restore */
1692
1693 #define RAM_SAVE_FLAG_FULL 0x01 /* Obsolete, not used anymore */
1694 #define RAM_SAVE_FLAG_COMPRESS 0x02
1695 #define RAM_SAVE_FLAG_MEM_SIZE 0x04
1696 #define RAM_SAVE_FLAG_PAGE 0x08
1697 #define RAM_SAVE_FLAG_EOS 0x10
1698
1699 static int is_dup_page(uint8_t *page, uint8_t ch)
1700 {
1701 uint32_t val = ch << 24 | ch << 16 | ch << 8 | ch;
1702 uint32_t *array = (uint32_t *)page;
1703 int i;
1704
1705 for (i = 0; i < (TARGET_PAGE_SIZE / 4); i++) {
1706 if (array[i] != val)
1707 return 0;
1708 }
1709
1710 return 1;
1711 }
1712
1713 static int ram_save_block(QEMUFile *f)
1714 {
1715 static ram_addr_t current_addr = 0;
1716 ram_addr_t saved_addr = current_addr;
1717 ram_addr_t addr = 0;
1718 int found = 0;
1719
1720 while (addr < last_ram_offset) {
1721 if (cpu_physical_memory_get_dirty(current_addr, MIGRATION_DIRTY_FLAG)) {
1722 uint8_t *p;
1723
1724 cpu_physical_memory_reset_dirty(current_addr,
1725 current_addr + TARGET_PAGE_SIZE,
1726 MIGRATION_DIRTY_FLAG);
1727
1728 p = qemu_get_ram_ptr(current_addr);
1729
1730 if (is_dup_page(p, *p)) {
1731 qemu_put_be64(f, current_addr | RAM_SAVE_FLAG_COMPRESS);
1732 qemu_put_byte(f, *p);
1733 } else {
1734 qemu_put_be64(f, current_addr | RAM_SAVE_FLAG_PAGE);
1735 qemu_put_buffer(f, p, TARGET_PAGE_SIZE);
1736 }
1737
1738 found = 1;
1739 break;
1740 }
1741 addr += TARGET_PAGE_SIZE;
1742 current_addr = (saved_addr + addr) % last_ram_offset;
1743 }
1744
1745 return found;
1746 }
1747
1748 static uint64_t bytes_transferred;
1749
1750 static ram_addr_t ram_save_remaining(void)
1751 {
1752 ram_addr_t addr;
1753 ram_addr_t count = 0;
1754
1755 for (addr = 0; addr < last_ram_offset; addr += TARGET_PAGE_SIZE) {
1756 if (cpu_physical_memory_get_dirty(addr, MIGRATION_DIRTY_FLAG))
1757 count++;
1758 }
1759
1760 return count;
1761 }
1762
1763 uint64_t ram_bytes_remaining(void)
1764 {
1765 return ram_save_remaining() * TARGET_PAGE_SIZE;
1766 }
1767
1768 uint64_t ram_bytes_transferred(void)
1769 {
1770 return bytes_transferred;
1771 }
1772
1773 uint64_t ram_bytes_total(void)
1774 {
1775 return last_ram_offset;
1776 }
1777
1778 static int ram_save_live(Monitor *mon, QEMUFile *f, int stage, void *opaque)
1779 {
1780 ram_addr_t addr;
1781 uint64_t bytes_transferred_last;
1782 double bwidth = 0;
1783 uint64_t expected_time = 0;
1784
1785 if (stage < 0) {
1786 cpu_physical_memory_set_dirty_tracking(0);
1787 return 0;
1788 }
1789
1790 if (cpu_physical_sync_dirty_bitmap(0, TARGET_PHYS_ADDR_MAX) != 0) {
1791 qemu_file_set_error(f);
1792 return 0;
1793 }
1794
1795 if (stage == 1) {
1796 bytes_transferred = 0;
1797
1798 /* Make sure all dirty bits are set */
1799 for (addr = 0; addr < last_ram_offset; addr += TARGET_PAGE_SIZE) {
1800 if (!cpu_physical_memory_get_dirty(addr, MIGRATION_DIRTY_FLAG))
1801 cpu_physical_memory_set_dirty(addr);
1802 }
1803
1804 /* Enable dirty memory tracking */
1805 cpu_physical_memory_set_dirty_tracking(1);
1806
1807 qemu_put_be64(f, last_ram_offset | RAM_SAVE_FLAG_MEM_SIZE);
1808 }
1809
1810 bytes_transferred_last = bytes_transferred;
1811 bwidth = qemu_get_clock_ns(rt_clock);
1812
1813 while (!qemu_file_rate_limit(f)) {
1814 int ret;
1815
1816 ret = ram_save_block(f);
1817 bytes_transferred += ret * TARGET_PAGE_SIZE;
1818 if (ret == 0) /* no more blocks */
1819 break;
1820 }
1821
1822 bwidth = qemu_get_clock_ns(rt_clock) - bwidth;
1823 bwidth = (bytes_transferred - bytes_transferred_last) / bwidth;
1824
1825 /* if we haven't transferred anything this round, force expected_time to a
1826 * a very high value, but without crashing */
1827 if (bwidth == 0)
1828 bwidth = 0.000001;
1829
1830 /* try transferring iterative blocks of memory */
1831 if (stage == 3) {
1832 /* flush all remaining blocks regardless of rate limiting */
1833 while (ram_save_block(f) != 0) {
1834 bytes_transferred += TARGET_PAGE_SIZE;
1835 }
1836 cpu_physical_memory_set_dirty_tracking(0);
1837 }
1838
1839 qemu_put_be64(f, RAM_SAVE_FLAG_EOS);
1840
1841 expected_time = ram_save_remaining() * TARGET_PAGE_SIZE / bwidth;
1842
1843 return (stage == 2) && (expected_time <= migrate_max_downtime());
1844 }
1845
1846 static int ram_load(QEMUFile *f, void *opaque, int version_id)
1847 {
1848 ram_addr_t addr;
1849 int flags;
1850
1851 if (version_id != 3)
1852 return -EINVAL;
1853
1854 do {
1855 addr = qemu_get_be64(f);
1856
1857 flags = addr & ~TARGET_PAGE_MASK;
1858 addr &= TARGET_PAGE_MASK;
1859
1860 if (flags & RAM_SAVE_FLAG_MEM_SIZE) {
1861 if (addr != last_ram_offset)
1862 return -EINVAL;
1863 }
1864
1865 if (flags & RAM_SAVE_FLAG_COMPRESS) {
1866 uint8_t ch = qemu_get_byte(f);
1867 memset(qemu_get_ram_ptr(addr), ch, TARGET_PAGE_SIZE);
1868 #ifndef _WIN32
1869 if (ch == 0 &&
1870 (!kvm_enabled() || kvm_has_sync_mmu())) {
1871 madvise(qemu_get_ram_ptr(addr), TARGET_PAGE_SIZE, MADV_DONTNEED);
1872 }
1873 #endif
1874 } else if (flags & RAM_SAVE_FLAG_PAGE) {
1875 qemu_get_buffer(f, qemu_get_ram_ptr(addr), TARGET_PAGE_SIZE);
1876 }
1877 if (qemu_file_has_error(f)) {
1878 return -EIO;
1879 }
1880 } while (!(flags & RAM_SAVE_FLAG_EOS));
1881
1882 return 0;
1883 }
1884
1885 void qemu_service_io(void)
1886 {
1887 qemu_notify_event();
1888 }
1889
1890 /***********************************************************/
1891 /* machine registration */
1892
1893 static QEMUMachine *first_machine = NULL;
1894 QEMUMachine *current_machine = NULL;
1895
1896 int qemu_register_machine(QEMUMachine *m)
1897 {
1898 QEMUMachine **pm;
1899 pm = &first_machine;
1900 while (*pm != NULL)
1901 pm = &(*pm)->next;
1902 m->next = NULL;
1903 *pm = m;
1904 return 0;
1905 }
1906
1907 static QEMUMachine *find_machine(const char *name)
1908 {
1909 QEMUMachine *m;
1910
1911 for(m = first_machine; m != NULL; m = m->next) {
1912 if (!strcmp(m->name, name))
1913 return m;
1914 if (m->alias && !strcmp(m->alias, name))
1915 return m;
1916 }
1917 return NULL;
1918 }
1919
1920 static QEMUMachine *find_default_machine(void)
1921 {
1922 QEMUMachine *m;
1923
1924 for(m = first_machine; m != NULL; m = m->next) {
1925 if (m->is_default) {
1926 return m;
1927 }
1928 }
1929 return NULL;
1930 }
1931
1932 /***********************************************************/
1933 /* main execution loop */
1934
1935 static void gui_update(void *opaque)
1936 {
1937 uint64_t interval = GUI_REFRESH_INTERVAL;
1938 DisplayState *ds = opaque;
1939 DisplayChangeListener *dcl = ds->listeners;
1940
1941 qemu_flush_coalesced_mmio_buffer();
1942 dpy_refresh(ds);
1943
1944 while (dcl != NULL) {
1945 if (dcl->gui_timer_interval &&
1946 dcl->gui_timer_interval < interval)
1947 interval = dcl->gui_timer_interval;
1948 dcl = dcl->next;
1949 }
1950 qemu_mod_timer(ds->gui_timer, interval + qemu_get_clock(rt_clock));
1951 }
1952
1953 static void nographic_update(void *opaque)
1954 {
1955 uint64_t interval = GUI_REFRESH_INTERVAL;
1956
1957 qemu_flush_coalesced_mmio_buffer();
1958 qemu_mod_timer(nographic_timer, interval + qemu_get_clock(rt_clock));
1959 }
1960
1961 void cpu_synchronize_all_states(void)
1962 {
1963 CPUState *cpu;
1964
1965 for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1966 cpu_synchronize_state(cpu);
1967 }
1968 }
1969
1970 void cpu_synchronize_all_post_reset(void)
1971 {
1972 CPUState *cpu;
1973
1974 for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1975 cpu_synchronize_post_reset(cpu);
1976 }
1977 }
1978
1979 void cpu_synchronize_all_post_init(void)
1980 {
1981 CPUState *cpu;
1982
1983 for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1984 cpu_synchronize_post_init(cpu);
1985 }
1986 }
1987
1988 struct vm_change_state_entry {
1989 VMChangeStateHandler *cb;
1990 void *opaque;
1991 QLIST_ENTRY (vm_change_state_entry) entries;
1992 };
1993
1994 static QLIST_HEAD(vm_change_state_head, vm_change_state_entry) vm_change_state_head;
1995
1996 VMChangeStateEntry *qemu_add_vm_change_state_handler(VMChangeStateHandler *cb,
1997 void *opaque)
1998 {
1999 VMChangeStateEntry *e;
2000
2001 e = qemu_mallocz(sizeof (*e));
2002
2003 e->cb = cb;
2004 e->opaque = opaque;
2005 QLIST_INSERT_HEAD(&vm_change_state_head, e, entries);
2006 return e;
2007 }
2008
2009 void qemu_del_vm_change_state_handler(VMChangeStateEntry *e)
2010 {
2011 QLIST_REMOVE (e, entries);
2012 qemu_free (e);
2013 }
2014
2015 static void vm_state_notify(int running, int reason)
2016 {
2017 VMChangeStateEntry *e;
2018
2019 for (e = vm_change_state_head.lh_first; e; e = e->entries.le_next) {
2020 e->cb(e->opaque, running, reason);
2021 }
2022 }
2023
2024 static void resume_all_vcpus(void);
2025 static void pause_all_vcpus(void);
2026
2027 void vm_start(void)
2028 {
2029 if (!vm_running) {
2030 cpu_enable_ticks();
2031 vm_running = 1;
2032 vm_state_notify(1, 0);
2033 resume_all_vcpus();
2034 }
2035 }
2036
2037 /* reset/shutdown handler */
2038
2039 typedef struct QEMUResetEntry {
2040 QTAILQ_ENTRY(QEMUResetEntry) entry;
2041 QEMUResetHandler *func;
2042 void *opaque;
2043 } QEMUResetEntry;
2044
2045 static QTAILQ_HEAD(reset_handlers, QEMUResetEntry) reset_handlers =
2046 QTAILQ_HEAD_INITIALIZER(reset_handlers);
2047 static int reset_requested;
2048 static int shutdown_requested;
2049 static int powerdown_requested;
2050 static int debug_requested;
2051 static int vmstop_requested;
2052
2053 int qemu_shutdown_requested(void)
2054 {
2055 int r = shutdown_requested;
2056 shutdown_requested = 0;
2057 return r;
2058 }
2059
2060 int qemu_reset_requested(void)
2061 {
2062 int r = reset_requested;
2063 reset_requested = 0;
2064 return r;
2065 }
2066
2067 int qemu_powerdown_requested(void)
2068 {
2069 int r = powerdown_requested;
2070 powerdown_requested = 0;
2071 return r;
2072 }
2073
2074 static int qemu_debug_requested(void)
2075 {
2076 int r = debug_requested;
2077 debug_requested = 0;
2078 return r;
2079 }
2080
2081 static int qemu_vmstop_requested(void)
2082 {
2083 int r = vmstop_requested;
2084 vmstop_requested = 0;
2085 return r;
2086 }
2087
2088 static void do_vm_stop(int reason)
2089 {
2090 if (vm_running) {
2091 cpu_disable_ticks();
2092 vm_running = 0;
2093 pause_all_vcpus();
2094 vm_state_notify(0, reason);
2095 monitor_protocol_event(QEVENT_STOP, NULL);
2096 }
2097 }
2098
2099 void qemu_register_reset(QEMUResetHandler *func, void *opaque)
2100 {
2101 QEMUResetEntry *re = qemu_mallocz(sizeof(QEMUResetEntry));
2102
2103 re->func = func;
2104 re->opaque = opaque;
2105 QTAILQ_INSERT_TAIL(&reset_handlers, re, entry);
2106 }
2107
2108 void qemu_unregister_reset(QEMUResetHandler *func, void *opaque)
2109 {
2110 QEMUResetEntry *re;
2111
2112 QTAILQ_FOREACH(re, &reset_handlers, entry) {
2113 if (re->func == func && re->opaque == opaque) {
2114 QTAILQ_REMOVE(&reset_handlers, re, entry);
2115 qemu_free(re);
2116 return;
2117 }
2118 }
2119 }
2120
2121 void qemu_system_reset(void)
2122 {
2123 QEMUResetEntry *re, *nre;
2124
2125 /* reset all devices */
2126 QTAILQ_FOREACH_SAFE(re, &reset_handlers, entry, nre) {
2127 re->func(re->opaque);
2128 }
2129 monitor_protocol_event(QEVENT_RESET, NULL);
2130 cpu_synchronize_all_post_reset();
2131 }
2132
2133 void qemu_system_reset_request(void)
2134 {
2135 if (no_reboot) {
2136 shutdown_requested = 1;
2137 } else {
2138 reset_requested = 1;
2139 }
2140 qemu_notify_event();
2141 }
2142
2143 void qemu_system_shutdown_request(void)
2144 {
2145 shutdown_requested = 1;
2146 qemu_notify_event();
2147 }
2148
2149 void qemu_system_powerdown_request(void)
2150 {
2151 powerdown_requested = 1;
2152 qemu_notify_event();
2153 }
2154
2155 static int cpu_can_run(CPUState *env)
2156 {
2157 if (env->stop)
2158 return 0;
2159 if (env->stopped)
2160 return 0;
2161 if (!vm_running)
2162 return 0;
2163 return 1;
2164 }
2165
2166 static int cpu_has_work(CPUState *env)
2167 {
2168 if (env->stop)
2169 return 1;
2170 if (env->stopped)
2171 return 0;
2172 if (!env->halted)
2173 return 1;
2174 if (qemu_cpu_has_work(env))
2175 return 1;
2176 return 0;
2177 }
2178
2179 static int tcg_has_work(void)
2180 {
2181 CPUState *env;
2182
2183 for (env = first_cpu; env != NULL; env = env->next_cpu)
2184 if (cpu_has_work(env))
2185 return 1;
2186 return 0;
2187 }
2188
2189 #ifndef _WIN32
2190 static int io_thread_fd = -1;
2191
2192 static void qemu_event_increment(void)
2193 {
2194 /* Write 8 bytes to be compatible with eventfd. */
2195 static uint64_t val = 1;
2196 ssize_t ret;
2197
2198 if (io_thread_fd == -1)
2199 return;
2200
2201 do {
2202 ret = write(io_thread_fd, &val, sizeof(val));
2203 } while (ret < 0 && errno == EINTR);
2204
2205 /* EAGAIN is fine, a read must be pending. */
2206 if (ret < 0 && errno != EAGAIN) {
2207 fprintf(stderr, "qemu_event_increment: write() filed: %s\n",
2208 strerror(errno));
2209 exit (1);
2210 }
2211 }
2212
2213 static void qemu_event_read(void *opaque)
2214 {
2215 int fd = (unsigned long)opaque;
2216 ssize_t len;
2217 char buffer[512];
2218
2219 /* Drain the notify pipe. For eventfd, only 8 bytes will be read. */
2220 do {
2221 len = read(fd, buffer, sizeof(buffer));
2222 } while ((len == -1 && errno == EINTR) || len == sizeof(buffer));
2223 }
2224
2225 static int qemu_event_init(void)
2226 {
2227 int err;
2228 int fds[2];
2229
2230 err = qemu_eventfd(fds);
2231 if (err == -1)
2232 return -errno;
2233
2234 err = fcntl_setfl(fds[0], O_NONBLOCK);
2235 if (err < 0)
2236 goto fail;
2237
2238 err = fcntl_setfl(fds[1], O_NONBLOCK);
2239 if (err < 0)
2240 goto fail;
2241
2242 qemu_set_fd_handler2(fds[0], NULL, qemu_event_read, NULL,
2243 (void *)(unsigned long)fds[0]);
2244
2245 io_thread_fd = fds[1];
2246 return 0;
2247
2248 fail:
2249 close(fds[0]);
2250 close(fds[1]);
2251 return err;
2252 }
2253 #else
2254 HANDLE qemu_event_handle;
2255
2256 static void dummy_event_handler(void *opaque)
2257 {
2258 }
2259
2260 static int qemu_event_init(void)
2261 {
2262 qemu_event_handle = CreateEvent(NULL, FALSE, FALSE, NULL);
2263 if (!qemu_event_handle) {
2264 fprintf(stderr, "Failed CreateEvent: %ld\n", GetLastError());
2265 return -1;
2266 }
2267 qemu_add_wait_object(qemu_event_handle, dummy_event_handler, NULL);
2268 return 0;
2269 }
2270
2271 static void qemu_event_increment(void)
2272 {
2273 if (!SetEvent(qemu_event_handle)) {
2274 fprintf(stderr, "qemu_event_increment: SetEvent failed: %ld\n",
2275 GetLastError());
2276 exit (1);
2277 }
2278 }
2279 #endif
2280
2281 #ifndef CONFIG_IOTHREAD
2282 static int qemu_init_main_loop(void)
2283 {
2284 return qemu_event_init();
2285 }
2286
2287 void qemu_init_vcpu(void *_env)
2288 {
2289 CPUState *env = _env;
2290
2291 env->nr_cores = smp_cores;
2292 env->nr_threads = smp_threads;
2293 if (kvm_enabled())
2294 kvm_init_vcpu(env);
2295 return;
2296 }
2297
2298 int qemu_cpu_self(void *env)
2299 {
2300 return 1;
2301 }
2302
2303 static void resume_all_vcpus(void)
2304 {
2305 }
2306
2307 static void pause_all_vcpus(void)
2308 {
2309 }
2310
2311 void qemu_cpu_kick(void *env)
2312 {
2313 return;
2314 }
2315
2316 void qemu_notify_event(void)
2317 {
2318 CPUState *env = cpu_single_env;
2319
2320 qemu_event_increment ();
2321 if (env) {
2322 cpu_exit(env);
2323 }
2324 if (next_cpu && env != next_cpu) {
2325 cpu_exit(next_cpu);
2326 }
2327 }
2328
2329 void qemu_mutex_lock_iothread(void) {}
2330 void qemu_mutex_unlock_iothread(void) {}
2331
2332 void vm_stop(int reason)
2333 {
2334 do_vm_stop(reason);
2335 }
2336
2337 #else /* CONFIG_IOTHREAD */
2338
2339 #include "qemu-thread.h"
2340
2341 QemuMutex qemu_global_mutex;
2342 static QemuMutex qemu_fair_mutex;
2343
2344 static QemuThread io_thread;
2345
2346 static QemuThread *tcg_cpu_thread;
2347 static QemuCond *tcg_halt_cond;
2348
2349 static int qemu_system_ready;
2350 /* cpu creation */
2351 static QemuCond qemu_cpu_cond;
2352 /* system init */
2353 static QemuCond qemu_system_cond;
2354 static QemuCond qemu_pause_cond;
2355
2356 static void tcg_block_io_signals(void);
2357 static void kvm_block_io_signals(CPUState *env);
2358 static void unblock_io_signals(void);
2359
2360 static int qemu_init_main_loop(void)
2361 {
2362 int ret;
2363
2364 ret = qemu_event_init();
2365 if (ret)
2366 return ret;
2367
2368 qemu_cond_init(&qemu_pause_cond);
2369 qemu_mutex_init(&qemu_fair_mutex);
2370 qemu_mutex_init(&qemu_global_mutex);
2371 qemu_mutex_lock(&qemu_global_mutex);
2372
2373 unblock_io_signals();
2374 qemu_thread_self(&io_thread);
2375
2376 return 0;
2377 }
2378
2379 static void qemu_wait_io_event_common(CPUState *env)
2380 {
2381 if (env->stop) {
2382 env->stop = 0;
2383 env->stopped = 1;
2384 qemu_cond_signal(&qemu_pause_cond);
2385 }
2386 }
2387
2388 static void qemu_wait_io_event(CPUState *env)
2389 {
2390 while (!tcg_has_work())
2391 qemu_cond_timedwait(env->halt_cond, &qemu_global_mutex, 1000);
2392
2393 qemu_mutex_unlock(&qemu_global_mutex);
2394
2395 /*
2396 * Users of qemu_global_mutex can be starved, having no chance
2397 * to acquire it since this path will get to it first.
2398 * So use another lock to provide fairness.
2399 */
2400 qemu_mutex_lock(&qemu_fair_mutex);
2401 qemu_mutex_unlock(&qemu_fair_mutex);
2402
2403 qemu_mutex_lock(&qemu_global_mutex);
2404 qemu_wait_io_event_common(env);
2405 }
2406
2407 static void qemu_kvm_eat_signal(CPUState *env, int timeout)
2408 {
2409 struct timespec ts;
2410 int r, e;
2411 siginfo_t siginfo;
2412 sigset_t waitset;
2413
2414 ts.tv_sec = timeout / 1000;
2415 ts.tv_nsec = (timeout % 1000) * 1000000;
2416
2417 sigemptyset(&waitset);
2418 sigaddset(&waitset, SIG_IPI);
2419
2420 qemu_mutex_unlock(&qemu_global_mutex);
2421 r = sigtimedwait(&waitset, &siginfo, &ts);
2422 e = errno;
2423 qemu_mutex_lock(&qemu_global_mutex);
2424
2425 if (r == -1 && !(e == EAGAIN || e == EINTR)) {
2426 fprintf(stderr, "sigtimedwait: %s\n", strerror(e));
2427 exit(1);
2428 }
2429 }
2430
2431 static void qemu_kvm_wait_io_event(CPUState *env)
2432 {
2433 while (!cpu_has_work(env))
2434 qemu_cond_timedwait(env->halt_cond, &qemu_global_mutex, 1000);
2435
2436 qemu_kvm_eat_signal(env, 0);
2437 qemu_wait_io_event_common(env);
2438 }
2439
2440 static int qemu_cpu_exec(CPUState *env);
2441
2442 static void *kvm_cpu_thread_fn(void *arg)
2443 {
2444 CPUState *env = arg;
2445
2446 qemu_thread_self(env->thread);
2447 if (kvm_enabled())
2448 kvm_init_vcpu(env);
2449
2450 kvm_block_io_signals(env);
2451
2452 /* signal CPU creation */
2453 qemu_mutex_lock(&qemu_global_mutex);
2454 env->created = 1;
2455 qemu_cond_signal(&qemu_cpu_cond);
2456
2457 /* and wait for machine initialization */
2458 while (!qemu_system_ready)
2459 qemu_cond_timedwait(&qemu_system_cond, &qemu_global_mutex, 100);
2460
2461 while (1) {
2462 if (cpu_can_run(env))
2463 qemu_cpu_exec(env);
2464 qemu_kvm_wait_io_event(env);
2465 }
2466
2467 return NULL;
2468 }
2469
2470 static bool tcg_cpu_exec(void);
2471
2472 static void *tcg_cpu_thread_fn(void *arg)
2473 {
2474 CPUState *env = arg;
2475
2476 tcg_block_io_signals();
2477 qemu_thread_self(env->thread);
2478
2479 /* signal CPU creation */
2480 qemu_mutex_lock(&qemu_global_mutex);
2481 for (env = first_cpu; env != NULL; env = env->next_cpu)
2482 env->created = 1;
2483 qemu_cond_signal(&qemu_cpu_cond);
2484
2485 /* and wait for machine initialization */
2486 while (!qemu_system_ready)
2487 qemu_cond_timedwait(&qemu_system_cond, &qemu_global_mutex, 100);
2488
2489 while (1) {
2490 tcg_cpu_exec();
2491 qemu_wait_io_event(cur_cpu);
2492 }
2493
2494 return NULL;
2495 }
2496
2497 void qemu_cpu_kick(void *_env)
2498 {
2499 CPUState *env = _env;
2500 qemu_cond_broadcast(env->halt_cond);
2501 if (kvm_enabled())
2502 qemu_thread_signal(env->thread, SIG_IPI);
2503 }
2504
2505 int qemu_cpu_self(void *_env)
2506 {
2507 CPUState *env = _env;
2508 QemuThread this;
2509
2510 qemu_thread_self(&this);
2511
2512 return qemu_thread_equal(&this, env->thread);
2513 }
2514
2515 static void cpu_signal(int sig)
2516 {
2517 if (cpu_single_env)
2518 cpu_exit(cpu_single_env);
2519 }
2520
2521 static void tcg_block_io_signals(void)
2522 {
2523 sigset_t set;
2524 struct sigaction sigact;
2525
2526 sigemptyset(&set);
2527 sigaddset(&set, SIGUSR2);
2528 sigaddset(&set, SIGIO);
2529 sigaddset(&set, SIGALRM);
2530 sigaddset(&set, SIGCHLD);
2531 pthread_sigmask(SIG_BLOCK, &set, NULL);
2532
2533 sigemptyset(&set);
2534 sigaddset(&set, SIG_IPI);
2535 pthread_sigmask(SIG_UNBLOCK, &set, NULL);
2536
2537 memset(&sigact, 0, sizeof(sigact));
2538 sigact.sa_handler = cpu_signal;
2539 sigaction(SIG_IPI, &sigact, NULL);
2540 }
2541
2542 static void dummy_signal(int sig)
2543 {
2544 }
2545
2546 static void kvm_block_io_signals(CPUState *env)
2547 {
2548 int r;
2549 sigset_t set;
2550 struct sigaction sigact;
2551
2552 sigemptyset(&set);
2553 sigaddset(&set, SIGUSR2);
2554 sigaddset(&set, SIGIO);
2555 sigaddset(&set, SIGALRM);
2556 sigaddset(&set, SIGCHLD);
2557 sigaddset(&set, SIG_IPI);
2558 pthread_sigmask(SIG_BLOCK, &set, NULL);
2559
2560 pthread_sigmask(SIG_BLOCK, NULL, &set);
2561 sigdelset(&set, SIG_IPI);
2562
2563 memset(&sigact, 0, sizeof(sigact));
2564 sigact.sa_handler = dummy_signal;
2565 sigaction(SIG_IPI, &sigact, NULL);
2566
2567 r = kvm_set_signal_mask(env, &set);
2568 if (r) {
2569 fprintf(stderr, "kvm_set_signal_mask: %s\n", strerror(r));
2570 exit(1);
2571 }
2572 }
2573
2574 static void unblock_io_signals(void)
2575 {
2576 sigset_t set;
2577
2578 sigemptyset(&set);
2579 sigaddset(&set, SIGUSR2);
2580 sigaddset(&set, SIGIO);
2581 sigaddset(&set, SIGALRM);
2582 pthread_sigmask(SIG_UNBLOCK, &set, NULL);
2583
2584 sigemptyset(&set);
2585 sigaddset(&set, SIG_IPI);
2586 pthread_sigmask(SIG_BLOCK, &set, NULL);
2587 }
2588
2589 static void qemu_signal_lock(unsigned int msecs)
2590 {
2591 qemu_mutex_lock(&qemu_fair_mutex);
2592
2593 while (qemu_mutex_trylock(&qemu_global_mutex)) {
2594 qemu_thread_signal(tcg_cpu_thread, SIG_IPI);
2595 if (!qemu_mutex_timedlock(&qemu_global_mutex, msecs))
2596 break;
2597 }
2598 qemu_mutex_unlock(&qemu_fair_mutex);
2599 }
2600
2601 void qemu_mutex_lock_iothread(void)
2602 {
2603 if (kvm_enabled()) {
2604 qemu_mutex_lock(&qemu_fair_mutex);
2605 qemu_mutex_lock(&qemu_global_mutex);
2606 qemu_mutex_unlock(&qemu_fair_mutex);
2607 } else
2608 qemu_signal_lock(100);
2609 }
2610
2611 void qemu_mutex_unlock_iothread(void)
2612 {
2613 qemu_mutex_unlock(&qemu_global_mutex);
2614 }
2615
2616 static int all_vcpus_paused(void)
2617 {
2618 CPUState *penv = first_cpu;
2619
2620 while (penv) {
2621 if (!penv->stopped)
2622 return 0;
2623 penv = (CPUState *)penv->next_cpu;
2624 }
2625
2626 return 1;
2627 }
2628
2629 static void pause_all_vcpus(void)
2630 {
2631 CPUState *penv = first_cpu;
2632
2633 while (penv) {
2634 penv->stop = 1;
2635 qemu_thread_signal(penv->thread, SIG_IPI);
2636 qemu_cpu_kick(penv);
2637 penv = (CPUState *)penv->next_cpu;
2638 }
2639
2640 while (!all_vcpus_paused()) {
2641 qemu_cond_timedwait(&qemu_pause_cond, &qemu_global_mutex, 100);
2642 penv = first_cpu;
2643 while (penv) {
2644 qemu_thread_signal(penv->thread, SIG_IPI);
2645 penv = (CPUState *)penv->next_cpu;
2646 }
2647 }
2648 }
2649
2650 static void resume_all_vcpus(void)
2651 {
2652 CPUState *penv = first_cpu;
2653
2654 while (penv) {
2655 penv->stop = 0;
2656 penv->stopped = 0;
2657 qemu_thread_signal(penv->thread, SIG_IPI);
2658 qemu_cpu_kick(penv);
2659 penv = (CPUState *)penv->next_cpu;
2660 }
2661 }
2662
2663 static void tcg_init_vcpu(void *_env)
2664 {
2665 CPUState *env = _env;
2666 /* share a single thread for all cpus with TCG */
2667 if (!tcg_cpu_thread) {
2668 env->thread = qemu_mallocz(sizeof(QemuThread));
2669 env->halt_cond = qemu_mallocz(sizeof(QemuCond));
2670 qemu_cond_init(env->halt_cond);
2671 qemu_thread_create(env->thread, tcg_cpu_thread_fn, env);
2672 while (env->created == 0)
2673 qemu_cond_timedwait(&qemu_cpu_cond, &qemu_global_mutex, 100);
2674 tcg_cpu_thread = env->thread;
2675 tcg_halt_cond = env->halt_cond;
2676 } else {
2677 env->thread = tcg_cpu_thread;
2678 env->halt_cond = tcg_halt_cond;
2679 }
2680 }
2681
2682 static void kvm_start_vcpu(CPUState *env)
2683 {
2684 env->thread = qemu_mallocz(sizeof(QemuThread));
2685 env->halt_cond = qemu_mallocz(sizeof(QemuCond));
2686 qemu_cond_init(env->halt_cond);
2687 qemu_thread_create(env->thread, kvm_cpu_thread_fn, env);
2688 while (env->created == 0)
2689 qemu_cond_timedwait(&qemu_cpu_cond, &qemu_global_mutex, 100);
2690 }
2691
2692 void qemu_init_vcpu(void *_env)
2693 {
2694 CPUState *env = _env;
2695
2696 env->nr_cores = smp_cores;
2697 env->nr_threads = smp_threads;
2698 if (kvm_enabled())
2699 kvm_start_vcpu(env);
2700 else
2701 tcg_init_vcpu(env);
2702 }
2703
2704 void qemu_notify_event(void)
2705 {
2706 qemu_event_increment();
2707 }
2708
2709 static void qemu_system_vmstop_request(int reason)
2710 {
2711 vmstop_requested = reason;
2712 qemu_notify_event();
2713 }
2714
2715 void vm_stop(int reason)
2716 {
2717 QemuThread me;
2718 qemu_thread_self(&me);
2719
2720 if (!qemu_thread_equal(&me, &io_thread)) {
2721 qemu_system_vmstop_request(reason);
2722 /*
2723 * FIXME: should not return to device code in case
2724 * vm_stop() has been requested.
2725 */
2726 if (cpu_single_env) {
2727 cpu_exit(cpu_single_env);
2728 cpu_single_env->stop = 1;
2729 }
2730 return;
2731 }
2732 do_vm_stop(reason);
2733 }
2734
2735 #endif
2736
2737
2738 #ifdef _WIN32
2739 static void host_main_loop_wait(int *timeout)
2740 {
2741 int ret, ret2, i;
2742 PollingEntry *pe;
2743
2744
2745 /* XXX: need to suppress polling by better using win32 events */
2746 ret = 0;
2747 for(pe = first_polling_entry; pe != NULL; pe = pe->next) {
2748 ret |= pe->func(pe->opaque);
2749 }
2750 if (ret == 0) {
2751 int err;
2752 WaitObjects *w = &wait_objects;
2753
2754 ret = WaitForMultipleObjects(w->num, w->events, FALSE, *timeout);
2755 if (WAIT_OBJECT_0 + 0 <= ret && ret <= WAIT_OBJECT_0 + w->num - 1) {
2756 if (w->func[ret - WAIT_OBJECT_0])
2757 w->func[ret - WAIT_OBJECT_0](w->opaque[ret - WAIT_OBJECT_0]);
2758
2759 /* Check for additional signaled events */
2760 for(i = (ret - WAIT_OBJECT_0 + 1); i < w->num; i++) {
2761
2762 /* Check if event is signaled */
2763 ret2 = WaitForSingleObject(w->events[i], 0);
2764 if(ret2 == WAIT_OBJECT_0) {
2765 if (w->func[i])
2766 w->func[i](w->opaque[i]);
2767 } else if (ret2 == WAIT_TIMEOUT) {
2768 } else {
2769 err = GetLastError();
2770 fprintf(stderr, "WaitForSingleObject error %d %d\n", i, err);
2771 }
2772 }
2773 } else if (ret == WAIT_TIMEOUT) {
2774 } else {
2775 err = GetLastError();
2776 fprintf(stderr, "WaitForMultipleObjects error %d %d\n", ret, err);
2777 }
2778 }
2779
2780 *timeout = 0;
2781 }
2782 #else
2783 static void host_main_loop_wait(int *timeout)
2784 {
2785 }
2786 #endif
2787
2788 void main_loop_wait(int nonblocking)
2789 {
2790 IOHandlerRecord *ioh;
2791 fd_set rfds, wfds, xfds;
2792 int ret, nfds;
2793 struct timeval tv;
2794 int timeout;
2795
2796 if (nonblocking)
2797 timeout = 0;
2798 else {
2799 timeout = qemu_calculate_timeout();
2800 qemu_bh_update_timeout(&timeout);
2801 }
2802
2803 host_main_loop_wait(&timeout);
2804
2805 /* poll any events */
2806 /* XXX: separate device handlers from system ones */
2807 nfds = -1;
2808 FD_ZERO(&rfds);
2809 FD_ZERO(&wfds);
2810 FD_ZERO(&xfds);
2811 QLIST_FOREACH(ioh, &io_handlers, next) {
2812 if (ioh->deleted)
2813 continue;
2814 if (ioh->fd_read &&
2815 (!ioh->fd_read_poll ||
2816 ioh->fd_read_poll(ioh->opaque) != 0)) {
2817 FD_SET(ioh->fd, &rfds);
2818 if (ioh->fd > nfds)
2819 nfds = ioh->fd;
2820 }
2821 if (ioh->fd_write) {
2822 FD_SET(ioh->fd, &wfds);
2823 if (ioh->fd > nfds)
2824 nfds = ioh->fd;
2825 }
2826 }
2827
2828 tv.tv_sec = timeout / 1000;
2829 tv.tv_usec = (timeout % 1000) * 1000;
2830
2831 slirp_select_fill(&nfds, &rfds, &wfds, &xfds);
2832
2833 qemu_mutex_unlock_iothread();
2834 ret = select(nfds + 1, &rfds, &wfds, &xfds, &tv);
2835 qemu_mutex_lock_iothread();
2836 if (ret > 0) {
2837 IOHandlerRecord *pioh;
2838
2839 QLIST_FOREACH_SAFE(ioh, &io_handlers, next, pioh) {
2840 if (ioh->deleted) {
2841 QLIST_REMOVE(ioh, next);
2842 qemu_free(ioh);
2843 continue;
2844 }
2845 if (ioh->fd_read && FD_ISSET(ioh->fd, &rfds)) {
2846 ioh->fd_read(ioh->opaque);
2847 }
2848 if (ioh->fd_write && FD_ISSET(ioh->fd, &wfds)) {
2849 ioh->fd_write(ioh->opaque);
2850 }
2851 }
2852 }
2853
2854 slirp_select_poll(&rfds, &wfds, &xfds, (ret < 0));
2855
2856 qemu_run_all_timers();
2857
2858 /* Check bottom-halves last in case any of the earlier events triggered
2859 them. */
2860 qemu_bh_poll();
2861
2862 }
2863
2864 static int qemu_cpu_exec(CPUState *env)
2865 {
2866 int ret;
2867 #ifdef CONFIG_PROFILER
2868 int64_t ti;
2869 #endif
2870
2871 #ifdef CONFIG_PROFILER
2872 ti = profile_getclock();
2873 #endif
2874 if (use_icount) {
2875 int64_t count;
2876 int decr;
2877 qemu_icount -= (env->icount_decr.u16.low + env->icount_extra);
2878 env->icount_decr.u16.low = 0;
2879 env->icount_extra = 0;
2880 count = qemu_icount_round (qemu_next_deadline());
2881 qemu_icount += count;
2882 decr = (count > 0xffff) ? 0xffff : count;
2883 count -= decr;
2884 env->icount_decr.u16.low = decr;
2885 env->icount_extra = count;
2886 }
2887 ret = cpu_exec(env);
2888 #ifdef CONFIG_PROFILER
2889 qemu_time += profile_getclock() - ti;
2890 #endif
2891 if (use_icount) {
2892 /* Fold pending instructions back into the
2893 instruction counter, and clear the interrupt flag. */
2894 qemu_icount -= (env->icount_decr.u16.low
2895 + env->icount_extra);
2896 env->icount_decr.u32 = 0;
2897 env->icount_extra = 0;
2898 }
2899 return ret;
2900 }
2901
2902 static bool tcg_cpu_exec(void)
2903 {
2904 int ret = 0;
2905
2906 if (next_cpu == NULL)
2907 next_cpu = first_cpu;
2908 for (; next_cpu != NULL; next_cpu = next_cpu->next_cpu) {
2909 CPUState *env = cur_cpu = next_cpu;
2910
2911 qemu_clock_enable(vm_clock,
2912 (cur_cpu->singlestep_enabled & SSTEP_NOTIMER) == 0);
2913
2914 if (qemu_alarm_pending())
2915 break;
2916 if (cpu_can_run(env))
2917 ret = qemu_cpu_exec(env);
2918 else if (env->stop)
2919 break;
2920
2921 if (ret == EXCP_DEBUG) {
2922 gdb_set_stop_cpu(env);
2923 debug_requested = 1;
2924 break;
2925 }
2926 }
2927 return tcg_has_work();
2928 }
2929
2930 static void set_numa_modes(void)
2931 {
2932 CPUState *env;
2933 int i;
2934
2935 for (env = first_cpu; env != NULL; env = env->next_cpu) {
2936 for (i = 0; i < nb_numa_nodes; i++) {
2937 if (node_cpumask[i] & (1 << env->cpu_index)) {
2938 env->numa_node = i;
2939 }
2940 }
2941 }
2942 }
2943
2944 static int vm_can_run(void)
2945 {
2946 if (powerdown_requested)
2947 return 0;
2948 if (reset_requested)
2949 return 0;
2950 if (shutdown_requested)
2951 return 0;
2952 if (debug_requested)
2953 return 0;
2954 return 1;
2955 }
2956
2957 qemu_irq qemu_system_powerdown;
2958
2959 static void main_loop(void)
2960 {
2961 int r;
2962
2963 #ifdef CONFIG_IOTHREAD
2964 qemu_system_ready = 1;
2965 qemu_cond_broadcast(&qemu_system_cond);
2966 #endif
2967
2968 for (;;) {
2969 do {
2970 bool nonblocking = false;
2971 #ifdef CONFIG_PROFILER
2972 int64_t ti;
2973 #endif
2974 #ifndef CONFIG_IOTHREAD
2975 nonblocking = tcg_cpu_exec();
2976 #endif
2977 #ifdef CONFIG_PROFILER
2978 ti = profile_getclock();
2979 #endif
2980 main_loop_wait(nonblocking);
2981 #ifdef CONFIG_PROFILER
2982 dev_time += profile_getclock() - ti;
2983 #endif
2984 } while (vm_can_run());
2985
2986 if (qemu_debug_requested()) {
2987 vm_stop(EXCP_DEBUG);
2988 }
2989 if (qemu_shutdown_requested()) {
2990 monitor_protocol_event(QEVENT_SHUTDOWN, NULL);
2991 if (no_shutdown) {
2992 vm_stop(0);
2993 no_shutdown = 0;
2994 } else
2995 break;
2996 }
2997 if (qemu_reset_requested()) {
2998 pause_all_vcpus();
2999 qemu_system_reset();
3000 resume_all_vcpus();
3001 }
3002 if (qemu_powerdown_requested()) {
3003 monitor_protocol_event(QEVENT_POWERDOWN, NULL);
3004 qemu_irq_raise(qemu_system_powerdown);
3005 }
3006 if ((r = qemu_vmstop_requested())) {
3007 vm_stop(r);
3008 }
3009 }
3010 pause_all_vcpus();
3011 }
3012
3013 static void version(void)
3014 {
3015 printf("QEMU PC emulator version " QEMU_VERSION QEMU_PKGVERSION ", Copyright (c) 2003-2008 Fabrice Bellard\n");
3016 }
3017
3018 static void help(int exitcode)
3019 {
3020 const char *options_help =
3021 #define DEF(option, opt_arg, opt_enum, opt_help) \
3022 opt_help
3023 #define DEFHEADING(text) stringify(text) "\n"
3024 #include "qemu-options.h"
3025 #undef DEF
3026 #undef DEFHEADING
3027 #undef GEN_DOCS
3028 ;
3029 version();
3030 printf("usage: %s [options] [disk_image]\n"
3031 "\n"
3032 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
3033 "\n"
3034 "%s\n"
3035 "During emulation, the following keys are useful:\n"
3036 "ctrl-alt-f toggle full screen\n"
3037 "ctrl-alt-n switch to virtual console 'n'\n"
3038 "ctrl-alt toggle mouse and keyboard grab\n"
3039 "\n"
3040 "When using -nographic, press 'ctrl-a h' to get some help.\n",
3041 "qemu",
3042 options_help);
3043 exit(exitcode);
3044 }
3045
3046 #define HAS_ARG 0x0001
3047
3048 enum {
3049 #define DEF(option, opt_arg, opt_enum, opt_help) \
3050 opt_enum,
3051 #define DEFHEADING(text)
3052 #include "qemu-options.h"
3053 #undef DEF
3054 #undef DEFHEADING
3055 #undef GEN_DOCS
3056 };
3057
3058 typedef struct QEMUOption {
3059 const char *name;
3060 int flags;
3061 int index;
3062 } QEMUOption;
3063
3064 static const QEMUOption qemu_options[] = {
3065 { "h", 0, QEMU_OPTION_h },
3066 #define DEF(option, opt_arg, opt_enum, opt_help) \
3067 { option, opt_arg, opt_enum },
3068 #define DEFHEADING(text)
3069 #include "qemu-options.h"
3070 #undef DEF
3071 #undef DEFHEADING
3072 #undef GEN_DOCS
3073 { NULL },
3074 };
3075
3076 #ifdef HAS_AUDIO
3077 struct soundhw soundhw[] = {
3078 #ifdef HAS_AUDIO_CHOICE
3079 #if defined(TARGET_I386) || defined(TARGET_MIPS)
3080 {
3081 "pcspk",
3082 "PC speaker",
3083 0,
3084 1,
3085 { .init_isa = pcspk_audio_init }
3086 },
3087 #endif
3088
3089 #ifdef CONFIG_SB16
3090 {
3091 "sb16",
3092 "Creative Sound Blaster 16",
3093 0,
3094 1,
3095 { .init_isa = SB16_init }
3096 },
3097 #endif
3098
3099 #ifdef CONFIG_CS4231A
3100 {
3101 "cs4231a",
3102 "CS4231A",
3103 0,
3104 1,
3105 { .init_isa = cs4231a_init }
3106 },
3107 #endif
3108
3109 #ifdef CONFIG_ADLIB
3110 {
3111 "adlib",
3112 #ifdef HAS_YMF262
3113 "Yamaha YMF262 (OPL3)",
3114 #else
3115 "Yamaha YM3812 (OPL2)",
3116 #endif
3117 0,
3118 1,
3119 { .init_isa = Adlib_init }
3120 },
3121 #endif
3122
3123 #ifdef CONFIG_GUS
3124 {
3125 "gus",
3126 "Gravis Ultrasound GF1",
3127 0,
3128 1,
3129 { .init_isa = GUS_init }
3130 },
3131 #endif
3132
3133 #ifdef CONFIG_AC97
3134 {
3135 "ac97",
3136 "Intel 82801AA AC97 Audio",
3137 0,
3138 0,
3139 { .init_pci = ac97_init }
3140 },
3141 #endif
3142
3143 #ifdef CONFIG_ES1370
3144 {
3145 "es1370",
3146 "ENSONIQ AudioPCI ES1370",
3147 0,
3148 0,
3149 { .init_pci = es1370_init }
3150 },
3151 #endif
3152
3153 #endif /* HAS_AUDIO_CHOICE */
3154
3155 { NULL, NULL, 0, 0, { NULL } }
3156 };
3157
3158 static void select_soundhw (const char *optarg)
3159 {
3160 struct soundhw *c;
3161
3162 if (*optarg == '?') {
3163 show_valid_cards:
3164
3165 printf ("Valid sound card names (comma separated):\n");
3166 for (c = soundhw; c->name; ++c) {
3167 printf ("%-11s %s\n", c->name, c->descr);
3168 }
3169 printf ("\n-soundhw all will enable all of the above\n");
3170 exit (*optarg != '?');
3171 }
3172 else {
3173 size_t l;
3174 const char *p;
3175 char *e;
3176 int bad_card = 0;
3177
3178 if (!strcmp (optarg, "all")) {
3179 for (c = soundhw; c->name; ++c) {
3180 c->enabled = 1;
3181 }
3182 return;
3183 }
3184
3185 p = optarg;
3186 while (*p) {
3187 e = strchr (p, ',');
3188 l = !e ? strlen (p) : (size_t) (e - p);
3189
3190 for (c = soundhw; c->name; ++c) {
3191 if (!strncmp (c->name, p, l) && !c->name[l]) {
3192 c->enabled = 1;
3193 break;
3194 }
3195 }
3196
3197 if (!c->name) {
3198 if (l > 80) {
3199 fprintf (stderr,
3200 "Unknown sound card name (too big to show)\n");
3201 }
3202 else {
3203 fprintf (stderr, "Unknown sound card name `%.*s'\n",
3204 (int) l, p);
3205 }
3206 bad_card = 1;
3207 }
3208 p += l + (e != NULL);
3209 }
3210
3211 if (bad_card)
3212 goto show_valid_cards;
3213 }
3214 }
3215 #endif
3216
3217 static void select_vgahw (const char *p)
3218 {
3219 const char *opts;
3220
3221 default_vga = 0;
3222 vga_interface_type = VGA_NONE;
3223 if (strstart(p, "std", &opts)) {
3224 vga_interface_type = VGA_STD;
3225 } else if (strstart(p, "cirrus", &opts)) {
3226 vga_interface_type = VGA_CIRRUS;
3227 } else if (strstart(p, "vmware", &opts)) {
3228 vga_interface_type = VGA_VMWARE;
3229 } else if (strstart(p, "xenfb", &opts)) {
3230 vga_interface_type = VGA_XENFB;
3231 } else if (!strstart(p, "none", &opts)) {
3232 invalid_vga:
3233 fprintf(stderr, "Unknown vga type: %s\n", p);
3234 exit(1);
3235 }
3236 while (*opts) {
3237 const char *nextopt;
3238
3239 if (strstart(opts, ",retrace=", &nextopt)) {
3240 opts = nextopt;
3241 if (strstart(opts, "dumb", &nextopt))
3242 vga_retrace_method = VGA_RETRACE_DUMB;
3243 else if (strstart(opts, "precise", &nextopt))
3244 vga_retrace_method = VGA_RETRACE_PRECISE;
3245 else goto invalid_vga;
3246 } else goto invalid_vga;
3247 opts = nextopt;
3248 }
3249 }
3250
3251 #ifdef TARGET_I386
3252 static int balloon_parse(const char *arg)
3253 {
3254 QemuOpts *opts;
3255
3256 if (strcmp(arg, "none") == 0) {
3257 return 0;
3258 }
3259
3260 if (!strncmp(arg, "virtio", 6)) {
3261 if (arg[6] == ',') {
3262 /* have params -> parse them */
3263 opts = qemu_opts_parse(&qemu_device_opts, arg+7, 0);
3264 if (!opts)
3265 return -1;
3266 } else {
3267 /* create empty opts */
3268 opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3269 }
3270 qemu_opt_set(opts, "driver", "virtio-balloon-pci");
3271 return 0;
3272 }
3273
3274 return -1;
3275 }
3276 #endif
3277
3278 #ifdef _WIN32
3279 static BOOL WINAPI qemu_ctrl_handler(DWORD type)
3280 {
3281 exit(STATUS_CONTROL_C_EXIT);
3282 return TRUE;
3283 }
3284 #endif
3285
3286 int qemu_uuid_parse(const char *str, uint8_t *uuid)
3287 {
3288 int ret;
3289
3290 if(strlen(str) != 36)
3291 return -1;
3292
3293 ret = sscanf(str, UUID_FMT, &uuid[0], &uuid[1], &uuid[2], &uuid[3],
3294 &uuid[4], &uuid[5], &uuid[6], &uuid[7], &uuid[8], &uuid[9],
3295 &uuid[10], &uuid[11], &uuid[12], &uuid[13], &uuid[14], &uuid[15]);
3296
3297 if(ret != 16)
3298 return -1;
3299
3300 #ifdef TARGET_I386
3301 smbios_add_field(1, offsetof(struct smbios_type_1, uuid), 16, uuid);
3302 #endif
3303
3304 return 0;
3305 }
3306
3307 #ifndef _WIN32
3308
3309 static void termsig_handler(int signal)
3310 {
3311 qemu_system_shutdown_request();
3312 }
3313
3314 static void sigchld_handler(int signal)
3315 {
3316 waitpid(-1, NULL, WNOHANG);
3317 }
3318
3319 static void sighandler_setup(void)
3320 {
3321 struct sigaction act;
3322
3323 memset(&act, 0, sizeof(act));
3324 act.sa_handler = termsig_handler;
3325 sigaction(SIGINT, &act, NULL);
3326 sigaction(SIGHUP, &act, NULL);
3327 sigaction(SIGTERM, &act, NULL);
3328
3329 act.sa_handler = sigchld_handler;
3330 act.sa_flags = SA_NOCLDSTOP;
3331 sigaction(SIGCHLD, &act, NULL);
3332 }
3333
3334 #endif
3335
3336 #ifdef _WIN32
3337 /* Look for support files in the same directory as the executable. */
3338 static char *find_datadir(const char *argv0)
3339 {
3340 char *p;
3341 char buf[MAX_PATH];
3342 DWORD len;
3343
3344 len = GetModuleFileName(NULL, buf, sizeof(buf) - 1);
3345 if (len == 0) {
3346 return NULL;
3347 }
3348
3349 buf[len] = 0;
3350 p = buf + len - 1;
3351 while (p != buf && *p != '\\')
3352 p--;
3353 *p = 0;
3354 if (access(buf, R_OK) == 0) {
3355 return qemu_strdup(buf);
3356 }
3357 return NULL;
3358 }
3359 #else /* !_WIN32 */
3360
3361 /* Find a likely location for support files using the location of the binary.
3362 For installed binaries this will be "$bindir/../share/qemu". When
3363 running from the build tree this will be "$bindir/../pc-bios". */
3364 #define SHARE_SUFFIX "/share/qemu"
3365 #define BUILD_SUFFIX "/pc-bios"
3366 static char *find_datadir(const char *argv0)
3367 {
3368 char *dir;
3369 char *p = NULL;
3370 char *res;
3371 char buf[PATH_MAX];
3372 size_t max_len;
3373
3374 #if defined(__linux__)
3375 {
3376 int len;
3377 len = readlink("/proc/self/exe", buf, sizeof(buf) - 1);
3378 if (len > 0) {
3379 buf[len] = 0;
3380 p = buf;
3381 }
3382 }
3383 #elif defined(__FreeBSD__)
3384 {
3385 int len;
3386 len = readlink("/proc/curproc/file", buf, sizeof(buf) - 1);
3387 if (len > 0) {
3388 buf[len] = 0;
3389 p = buf;
3390 }
3391 }
3392 #endif
3393 /* If we don't have any way of figuring out the actual executable
3394 location then try argv[0]. */
3395 if (!p) {
3396 p = realpath(argv0, buf);
3397 if (!p) {
3398 return NULL;
3399 }
3400 }
3401 dir = dirname(p);
3402 dir = dirname(dir);
3403
3404 max_len = strlen(dir) +
3405 MAX(strlen(SHARE_SUFFIX), strlen(BUILD_SUFFIX)) + 1;
3406 res = qemu_mallocz(max_len);
3407 snprintf(res, max_len, "%s%s", dir, SHARE_SUFFIX);
3408 if (access(res, R_OK)) {
3409 snprintf(res, max_len, "%s%s", dir, BUILD_SUFFIX);
3410 if (access(res, R_OK)) {
3411 qemu_free(res);
3412 res = NULL;
3413 }
3414 }
3415
3416 return res;
3417 }
3418 #undef SHARE_SUFFIX
3419 #undef BUILD_SUFFIX
3420 #endif
3421
3422 char *qemu_find_file(int type, const char *name)
3423 {
3424 int len;
3425 const char *subdir;
3426 char *buf;
3427
3428 /* If name contains path separators then try it as a straight path. */
3429 if ((strchr(name, '/') || strchr(name, '\\'))
3430 && access(name, R_OK) == 0) {
3431 return qemu_strdup(name);
3432 }
3433 switch (type) {
3434 case QEMU_FILE_TYPE_BIOS:
3435 subdir = "";
3436 break;
3437 case QEMU_FILE_TYPE_KEYMAP:
3438 subdir = "keymaps/";
3439 break;
3440 default:
3441 abort();
3442 }
3443 len = strlen(data_dir) + strlen(name) + strlen(subdir) + 2;
3444 buf = qemu_mallocz(len);
3445 snprintf(buf, len, "%s/%s%s", data_dir, subdir, name);
3446 if (access(buf, R_OK)) {
3447 qemu_free(buf);
3448 return NULL;
3449 }
3450 return buf;
3451 }
3452
3453 static int device_help_func(QemuOpts *opts, void *opaque)
3454 {
3455 return qdev_device_help(opts);
3456 }
3457
3458 static int device_init_func(QemuOpts *opts, void *opaque)
3459 {
3460 DeviceState *dev;
3461
3462 dev = qdev_device_add(opts);
3463 if (!dev)
3464 return -1;
3465 return 0;
3466 }
3467
3468 static int chardev_init_func(QemuOpts *opts, void *opaque)
3469 {
3470 CharDriverState *chr;
3471
3472 chr = qemu_chr_open_opts(opts, NULL);
3473 if (!chr)
3474 return -1;
3475 return 0;
3476 }
3477
3478 static int mon_init_func(QemuOpts *opts, void *opaque)
3479 {
3480 CharDriverState *chr;
3481 const char *chardev;
3482 const char *mode;
3483 int flags;
3484
3485 mode = qemu_opt_get(opts, "mode");
3486 if (mode == NULL) {
3487 mode = "readline";
3488 }
3489 if (strcmp(mode, "readline") == 0) {
3490 flags = MONITOR_USE_READLINE;
3491 } else if (strcmp(mode, "control") == 0) {
3492 flags = MONITOR_USE_CONTROL;
3493 } else {
3494 fprintf(stderr, "unknown monitor mode \"%s\"\n", mode);
3495 exit(1);
3496 }
3497
3498 if (qemu_opt_get_bool(opts, "default", 0))
3499 flags |= MONITOR_IS_DEFAULT;
3500
3501 chardev = qemu_opt_get(opts, "chardev");
3502 chr = qemu_chr_find(chardev);
3503 if (chr == NULL) {
3504 fprintf(stderr, "chardev \"%s\" not found\n", chardev);
3505 exit(1);
3506 }
3507
3508 monitor_init(chr, flags);
3509 return 0;
3510 }
3511
3512 static void monitor_parse(const char *optarg, const char *mode)
3513 {
3514 static int monitor_device_index = 0;
3515 QemuOpts *opts;
3516 const char *p;
3517 char label[32];
3518 int def = 0;
3519
3520 if (strstart(optarg, "chardev:", &p)) {
3521 snprintf(label, sizeof(label), "%s", p);
3522 } else {
3523 if (monitor_device_index) {
3524 snprintf(label, sizeof(label), "monitor%d",
3525 monitor_device_index);
3526 } else {
3527 snprintf(label, sizeof(label), "monitor");
3528 def = 1;
3529 }
3530 opts = qemu_chr_parse_compat(label, optarg);
3531 if (!opts) {
3532 fprintf(stderr, "parse error: %s\n", optarg);
3533 exit(1);
3534 }
3535 }
3536
3537 opts = qemu_opts_create(&qemu_mon_opts, label, 1);
3538 if (!opts) {
3539 fprintf(stderr, "duplicate chardev: %s\n", label);
3540 exit(1);
3541 }
3542 qemu_opt_set(opts, "mode", mode);
3543 qemu_opt_set(opts, "chardev", label);
3544 if (def)
3545 qemu_opt_set(opts, "default", "on");
3546 monitor_device_index++;
3547 }
3548
3549 struct device_config {
3550 enum {
3551 DEV_USB, /* -usbdevice */
3552 DEV_BT, /* -bt */
3553 DEV_SERIAL, /* -serial */
3554 DEV_PARALLEL, /* -parallel */
3555 DEV_VIRTCON, /* -virtioconsole */
3556 DEV_DEBUGCON, /* -debugcon */
3557 } type;
3558 const char *cmdline;
3559 QTAILQ_ENTRY(device_config) next;
3560 };
3561 QTAILQ_HEAD(, device_config) device_configs = QTAILQ_HEAD_INITIALIZER(device_configs);
3562
3563 static void add_device_config(int type, const char *cmdline)
3564 {
3565 struct device_config *conf;
3566
3567 conf = qemu_mallocz(sizeof(*conf));
3568 conf->type = type;
3569 conf->cmdline = cmdline;
3570 QTAILQ_INSERT_TAIL(&device_configs, conf, next);
3571 }
3572
3573 static int foreach_device_config(int type, int (*func)(const char *cmdline))
3574 {
3575 struct device_config *conf;
3576 int rc;
3577
3578 QTAILQ_FOREACH(conf, &device_configs, next) {
3579 if (conf->type != type)
3580 continue;
3581 rc = func(conf->cmdline);
3582 if (0 != rc)
3583 return rc;
3584 }
3585 return 0;
3586 }
3587
3588 static int serial_parse(const char *devname)
3589 {
3590 static int index = 0;
3591 char label[32];
3592
3593 if (strcmp(devname, "none") == 0)
3594 return 0;
3595 if (index == MAX_SERIAL_PORTS) {
3596 fprintf(stderr, "qemu: too many serial ports\n");
3597 exit(1);
3598 }
3599 snprintf(label, sizeof(label), "serial%d", index);
3600 serial_hds[index] = qemu_chr_open(label, devname, NULL);
3601 if (!serial_hds[index]) {
3602 fprintf(stderr, "qemu: could not open serial device '%s': %s\n",
3603 devname, strerror(errno));
3604 return -1;
3605 }
3606 index++;
3607 return 0;
3608 }
3609
3610 static int parallel_parse(const char *devname)
3611 {
3612 static int index = 0;
3613 char label[32];
3614
3615 if (strcmp(devname, "none") == 0)
3616 return 0;
3617 if (index == MAX_PARALLEL_PORTS) {
3618 fprintf(stderr, "qemu: too many parallel ports\n");
3619 exit(1);
3620 }
3621 snprintf(label, sizeof(label), "parallel%d", index);
3622 parallel_hds[index] = qemu_chr_open(label, devname, NULL);
3623 if (!parallel_hds[index]) {
3624 fprintf(stderr, "qemu: could not open parallel device '%s': %s\n",
3625 devname, strerror(errno));
3626 return -1;
3627 }
3628 index++;
3629 return 0;
3630 }
3631
3632 static int virtcon_parse(const char *devname)
3633 {
3634 static int index = 0;
3635 char label[32];
3636 QemuOpts *bus_opts, *dev_opts;
3637
3638 if (strcmp(devname, "none") == 0)
3639 return 0;
3640 if (index == MAX_VIRTIO_CONSOLES) {
3641 fprintf(stderr, "qemu: too many virtio consoles\n");
3642 exit(1);
3643 }
3644
3645 bus_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3646 qemu_opt_set(bus_opts, "driver", "virtio-serial");
3647
3648 dev_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3649 qemu_opt_set(dev_opts, "driver", "virtconsole");
3650
3651 snprintf(label, sizeof(label), "virtcon%d", index);
3652 virtcon_hds[index] = qemu_chr_open(label, devname, NULL);
3653 if (!virtcon_hds[index]) {
3654 fprintf(stderr, "qemu: could not open virtio console '%s': %s\n",
3655 devname, strerror(errno));
3656 return -1;
3657 }
3658 qemu_opt_set(dev_opts, "chardev", label);
3659
3660 index++;
3661 return 0;
3662 }
3663
3664 static int debugcon_parse(const char *devname)
3665 {
3666 QemuOpts *opts;
3667
3668 if (!qemu_chr_open("debugcon", devname, NULL)) {
3669 exit(1);
3670 }
3671 opts = qemu_opts_create(&qemu_device_opts, "debugcon", 1);
3672 if (!opts) {
3673 fprintf(stderr, "qemu: already have a debugcon device\n");
3674 exit(1);
3675 }
3676 qemu_opt_set(opts, "driver", "isa-debugcon");
3677 qemu_opt_set(opts, "chardev", "debugcon");
3678 return 0;
3679 }
3680
3681 static const QEMUOption *lookup_opt(int argc, char **argv,
3682 const char **poptarg, int *poptind)
3683 {
3684 const QEMUOption *popt;
3685 int optind = *poptind;
3686 char *r = argv[optind];
3687 const char *optarg;
3688
3689 loc_set_cmdline(argv, optind, 1);
3690 optind++;
3691 /* Treat --foo the same as -foo. */
3692 if (r[1] == '-')
3693 r++;
3694 popt = qemu_options;
3695 for(;;) {
3696 if (!popt->name) {
3697 error_report("invalid option");
3698 exit(1);
3699 }
3700 if (!strcmp(popt->name, r + 1))
3701 break;
3702 popt++;
3703 }
3704 if (popt->flags & HAS_ARG) {
3705 if (optind >= argc) {
3706 error_report("requires an argument");
3707 exit(1);
3708 }
3709 optarg = argv[optind++];
3710 loc_set_cmdline(argv, optind - 2, 2);
3711 } else {
3712 optarg = NULL;
3713 }
3714
3715 *poptarg = optarg;
3716 *poptind = optind;
3717
3718 return popt;
3719 }
3720
3721 int main(int argc, char **argv, char **envp)
3722 {
3723 const char *gdbstub_dev = NULL;
3724 uint32_t boot_devices_bitmap = 0;
3725 int i;
3726 int snapshot, linux_boot, net_boot;
3727 const char *icount_option = NULL;
3728 const char *initrd_filename;
3729 const char *kernel_filename, *kernel_cmdline;
3730 char boot_devices[33] = "cad"; /* default to HD->floppy->CD-ROM */
3731 DisplayState *ds;
3732 DisplayChangeListener *dcl;
3733 int cyls, heads, secs, translation;
3734 QemuOpts *hda_opts = NULL, *opts;
3735 int optind;
3736 const char *optarg;
3737 const char *loadvm = NULL;
3738 QEMUMachine *machine;
3739 const char *cpu_model;
3740 #ifndef _WIN32
3741 int fds[2];
3742 #endif
3743 int tb_size;
3744 const char *pid_file = NULL;
3745 const char *incoming = NULL;
3746 #ifndef _WIN32
3747 int fd = 0;
3748 struct passwd *pwd = NULL;
3749 const char *chroot_dir = NULL;
3750 const char *run_as = NULL;
3751 #endif
3752 int show_vnc_port = 0;
3753 int defconfig = 1;
3754
3755 error_set_progname(argv[0]);
3756
3757 init_clocks();
3758
3759 qemu_cache_utils_init(envp);
3760
3761 QLIST_INIT (&vm_change_state_head);
3762 #ifndef _WIN32
3763 {
3764 struct sigaction act;
3765 sigfillset(&act.sa_mask);
3766 act.sa_flags = 0;
3767 act.sa_handler = SIG_IGN;
3768 sigaction(SIGPIPE, &act, NULL);
3769 }
3770 #else
3771 SetConsoleCtrlHandler(qemu_ctrl_handler, TRUE);
3772 /* Note: cpu_interrupt() is currently not SMP safe, so we force
3773 QEMU to run on a single CPU */
3774 {
3775 HANDLE h;
3776 DWORD mask, smask;
3777 int i;
3778 h = GetCurrentProcess();
3779 if (GetProcessAffinityMask(h, &mask, &smask)) {
3780 for(i = 0; i < 32; i++) {
3781 if (mask & (1 << i))
3782 break;
3783 }
3784 if (i != 32) {
3785 mask = 1 << i;
3786 SetProcessAffinityMask(h, mask);
3787 }
3788 }
3789 }
3790 #endif
3791
3792 module_call_init(MODULE_INIT_MACHINE);
3793 machine = find_default_machine();
3794 cpu_model = NULL;
3795 initrd_filename = NULL;
3796 ram_size = 0;
3797 snapshot = 0;
3798 kernel_filename = NULL;
3799 kernel_cmdline = "";
3800 cyls = heads = secs = 0;
3801 translation = BIOS_ATA_TRANSLATION_AUTO;
3802
3803 for (i = 0; i < MAX_NODES; i++) {
3804 node_mem[i] = 0;
3805 node_cpumask[i] = 0;
3806 }
3807
3808 nb_numa_nodes = 0;
3809 nb_nics = 0;
3810
3811 tb_size = 0;
3812 autostart= 1;
3813
3814 /* first pass of option parsing */
3815 optind = 1;
3816 while (optind < argc) {
3817 if (argv[optind][0] != '-') {
3818 /* disk image */
3819 optind++;
3820 continue;
3821 } else {
3822 const QEMUOption *popt;
3823
3824 popt = lookup_opt(argc, argv, &optarg, &optind);
3825 switch (popt->index) {
3826 case QEMU_OPTION_nodefconfig:
3827 defconfig=0;
3828 break;
3829 }
3830 }
3831 }
3832
3833 if (defconfig) {
3834 const char *fname;
3835 FILE *fp;
3836
3837 fname = CONFIG_QEMU_CONFDIR "/qemu.conf";
3838 fp = fopen(fname, "r");
3839 if (fp) {
3840 if (qemu_config_parse(fp, fname) != 0) {
3841 exit(1);
3842 }
3843 fclose(fp);
3844 }
3845
3846 fname = CONFIG_QEMU_CONFDIR "/target-" TARGET_ARCH ".conf";
3847 fp = fopen(fname, "r");
3848 if (fp) {
3849 if (qemu_config_parse(fp, fname) != 0) {
3850 exit(1);
3851 }
3852 fclose(fp);
3853 }
3854 }
3855 #if defined(cpudef_setup)
3856 cpudef_setup(); /* parse cpu definitions in target config file */
3857 #endif
3858
3859 /* second pass of option parsing */
3860 optind = 1;
3861 for(;;) {
3862 if (optind >= argc)
3863 break;
3864 if (argv[optind][0] != '-') {
3865 hda_opts = drive_add(argv[optind++], HD_ALIAS, 0);
3866 } else {
3867 const QEMUOption *popt;
3868
3869 popt = lookup_opt(argc, argv, &optarg, &optind);
3870 switch(popt->index) {
3871 case QEMU_OPTION_M:
3872 machine = find_machine(optarg);
3873 if (!machine) {
3874 QEMUMachine *m;
3875 printf("Supported machines are:\n");
3876 for(m = first_machine; m != NULL; m = m->next) {
3877 if (m->alias)
3878 printf("%-10s %s (alias of %s)\n",
3879 m->alias, m->desc, m->name);
3880 printf("%-10s %s%s\n",
3881 m->name, m->desc,
3882 m->is_default ? " (default)" : "");
3883 }
3884 exit(*optarg != '?');
3885 }
3886 break;
3887 case QEMU_OPTION_cpu:
3888 /* hw initialization will check this */
3889 if (*optarg == '?') {
3890 /* XXX: implement xxx_cpu_list for targets that still miss it */
3891 #if defined(cpu_list_id)
3892 cpu_list_id(stdout, &fprintf, optarg);
3893 #elif defined(cpu_list)
3894 cpu_list(stdout, &fprintf); /* deprecated */
3895 #endif
3896 exit(0);
3897 } else {
3898 cpu_model = optarg;
3899 }
3900 break;
3901 case QEMU_OPTION_initrd:
3902 initrd_filename = optarg;
3903 break;
3904 case QEMU_OPTION_hda:
3905 if (cyls == 0)
3906 hda_opts = drive_add(optarg, HD_ALIAS, 0);
3907 else
3908 hda_opts = drive_add(optarg, HD_ALIAS
3909 ",cyls=%d,heads=%d,secs=%d%s",
3910 0, cyls, heads, secs,
3911 translation == BIOS_ATA_TRANSLATION_LBA ?
3912 ",trans=lba" :
3913 translation == BIOS_ATA_TRANSLATION_NONE ?
3914 ",trans=none" : "");
3915 break;
3916 case QEMU_OPTION_hdb:
3917 case QEMU_OPTION_hdc:
3918 case QEMU_OPTION_hdd:
3919 drive_add(optarg, HD_ALIAS, popt->index - QEMU_OPTION_hda);
3920 break;
3921 case QEMU_OPTION_drive:
3922 drive_add(NULL, "%s", optarg);
3923 break;
3924 case QEMU_OPTION_set:
3925 if (qemu_set_option(optarg) != 0)
3926 exit(1);
3927 break;
3928 case QEMU_OPTION_global:
3929 if (qemu_global_option(optarg) != 0)
3930 exit(1);
3931 break;
3932 case QEMU_OPTION_mtdblock:
3933 drive_add(optarg, MTD_ALIAS);
3934 break;
3935 case QEMU_OPTION_sd:
3936 drive_add(optarg, SD_ALIAS);
3937 break;
3938 case QEMU_OPTION_pflash:
3939 drive_add(optarg, PFLASH_ALIAS);
3940 break;
3941 case QEMU_OPTION_snapshot:
3942 snapshot = 1;
3943 break;
3944 case QEMU_OPTION_hdachs:
3945 {
3946 const char *p;
3947 p = optarg;
3948 cyls = strtol(p, (char **)&p, 0);
3949 if (cyls < 1 || cyls > 16383)
3950 goto chs_fail;
3951 if (*p != ',')
3952 goto chs_fail;
3953 p++;
3954 heads = strtol(p, (char **)&p, 0);
3955 if (heads < 1 || heads > 16)
3956 goto chs_fail;
3957 if (*p != ',')
3958 goto chs_fail;
3959 p++;
3960 secs = strtol(p, (char **)&p, 0);
3961 if (secs < 1 || secs > 63)
3962 goto chs_fail;
3963 if (*p == ',') {
3964 p++;
3965 if (!strcmp(p, "none"))
3966 translation = BIOS_ATA_TRANSLATION_NONE;
3967 else if (!strcmp(p, "lba"))
3968 translation = BIOS_ATA_TRANSLATION_LBA;
3969 else if (!strcmp(p, "auto"))
3970 translation = BIOS_ATA_TRANSLATION_AUTO;
3971 else
3972 goto chs_fail;
3973 } else if (*p != '\0') {
3974 chs_fail:
3975 fprintf(stderr, "qemu: invalid physical CHS format\n");
3976 exit(1);
3977 }
3978 if (hda_opts != NULL) {
3979 char num[16];
3980 snprintf(num, sizeof(num), "%d", cyls);
3981 qemu_opt_set(hda_opts, "cyls", num);
3982 snprintf(num, sizeof(num), "%d", heads);
3983 qemu_opt_set(hda_opts, "heads", num);
3984 snprintf(num, sizeof(num), "%d", secs);
3985 qemu_opt_set(hda_opts, "secs", num);
3986 if (translation == BIOS_ATA_TRANSLATION_LBA)
3987 qemu_opt_set(hda_opts, "trans", "lba");
3988 if (translation == BIOS_ATA_TRANSLATION_NONE)
3989 qemu_opt_set(hda_opts, "trans", "none");
3990 }
3991 }
3992 break;
3993 case QEMU_OPTION_numa:
3994 if (nb_numa_nodes >= MAX_NODES) {
3995 fprintf(stderr, "qemu: too many NUMA nodes\n");
3996 exit(1);
3997 }
3998 numa_add(optarg);
3999 break;
4000 case QEMU_OPTION_nographic:
4001 display_type = DT_NOGRAPHIC;
4002 break;
4003 #ifdef CONFIG_CURSES
4004 case QEMU_OPTION_curses:
4005 display_type = DT_CURSES;
4006 break;
4007 #endif
4008 case QEMU_OPTION_portrait:
4009 graphic_rotate = 1;
4010 break;
4011 case QEMU_OPTION_kernel:
4012 kernel_filename = optarg;
4013 break;
4014 case QEMU_OPTION_append:
4015 kernel_cmdline = optarg;
4016 break;
4017 case QEMU_OPTION_cdrom:
4018 drive_add(optarg, CDROM_ALIAS);
4019 break;
4020 case QEMU_OPTION_boot:
4021 {
4022 static const char * const params[] = {
4023 "order", "once", "menu", NULL
4024 };
4025 char buf[sizeof(boot_devices)];
4026 char *standard_boot_devices;
4027 int legacy = 0;
4028
4029 if (!strchr(optarg, '=')) {
4030 legacy = 1;
4031 pstrcpy(buf, sizeof(buf), optarg);
4032 } else if (check_params(buf, sizeof(buf), params, optarg) < 0) {
4033 fprintf(stderr,
4034 "qemu: unknown boot parameter '%s' in '%s'\n",
4035 buf, optarg);
4036 exit(1);
4037 }
4038
4039 if (legacy ||
4040 get_param_value(buf, sizeof(buf), "order", optarg)) {
4041 boot_devices_bitmap = parse_bootdevices(buf);
4042 pstrcpy(boot_devices, sizeof(boot_devices), buf);
4043 }
4044 if (!legacy) {
4045 if (get_param_value(buf, sizeof(buf),
4046 "once", optarg)) {
4047 boot_devices_bitmap |= parse_bootdevices(buf);
4048 standard_boot_devices = qemu_strdup(boot_devices);
4049 pstrcpy(boot_devices, sizeof(boot_devices), buf);
4050 qemu_register_reset(restore_boot_devices,
4051 standard_boot_devices);
4052 }
4053 if (get_param_value(buf, sizeof(buf),
4054 "menu", optarg)) {
4055 if (!strcmp(buf, "on")) {
4056 boot_menu = 1;
4057 } else if (!strcmp(buf, "off")) {
4058 boot_menu = 0;
4059 } else {
4060 fprintf(stderr,
4061 "qemu: invalid option value '%s'\n",
4062 buf);
4063 exit(1);
4064 }
4065 }
4066 }
4067 }
4068 break;
4069 case QEMU_OPTION_fda:
4070 case QEMU_OPTION_fdb:
4071 drive_add(optarg, FD_ALIAS, popt->index - QEMU_OPTION_fda);
4072 break;
4073 #ifdef TARGET_I386
4074 case QEMU_OPTION_no_fd_bootchk:
4075 fd_bootchk = 0;
4076 break;
4077 #endif
4078 case QEMU_OPTION_netdev:
4079 if (net_client_parse(&qemu_netdev_opts, optarg) == -1) {
4080 exit(1);
4081 }
4082 break;
4083 case QEMU_OPTION_net:
4084 if (net_client_parse(&qemu_net_opts, optarg) == -1) {
4085 exit(1);
4086 }
4087 break;
4088 #ifdef CONFIG_SLIRP
4089 case QEMU_OPTION_tftp:
4090 legacy_tftp_prefix = optarg;
4091 break;
4092 case QEMU_OPTION_bootp:
4093 legacy_bootp_filename = optarg;
4094 break;
4095 #ifndef _WIN32
4096 case QEMU_OPTION_smb:
4097 if (net_slirp_smb(optarg) < 0)
4098 exit(1);
4099 break;
4100 #endif
4101 case QEMU_OPTION_redir:
4102 if (net_slirp_redir(optarg) < 0)
4103 exit(1);
4104 break;
4105 #endif
4106 case QEMU_OPTION_bt:
4107 add_device_config(DEV_BT, optarg);
4108 break;
4109 #ifdef HAS_AUDIO
4110 case QEMU_OPTION_audio_help:
4111 AUD_help ();
4112 exit (0);
4113 break;
4114 case QEMU_OPTION_soundhw:
4115 select_soundhw (optarg);
4116 break;
4117 #endif
4118 case QEMU_OPTION_h:
4119 help(0);
4120 break;
4121 case QEMU_OPTION_version:
4122 version();
4123 exit(0);
4124 break;
4125 case QEMU_OPTION_m: {
4126 uint64_t value;
4127 char *ptr;
4128
4129 value = strtoul(optarg, &ptr, 10);
4130 switch (*ptr) {
4131 case 0: case 'M': case 'm':
4132 value <<= 20;
4133 break;
4134 case 'G': case 'g':
4135 value <<= 30;
4136 break;
4137 default:
4138 fprintf(stderr, "qemu: invalid ram size: %s\n", optarg);
4139 exit(1);
4140 }
4141
4142 /* On 32-bit hosts, QEMU is limited by virtual address space */
4143 if (value > (2047 << 20) && HOST_LONG_BITS == 32) {
4144 fprintf(stderr, "qemu: at most 2047 MB RAM can be simulated\n");
4145 exit(1);
4146 }
4147 if (value != (uint64_t)(ram_addr_t)value) {
4148 fprintf(stderr, "qemu: ram size too large\n");
4149 exit(1);
4150 }
4151 ram_size = value;
4152 break;
4153 }
4154 case QEMU_OPTION_mempath:
4155 mem_path = optarg;
4156 break;
4157 #ifdef MAP_POPULATE
4158 case QEMU_OPTION_mem_prealloc:
4159 mem_prealloc = 1;
4160 break;
4161 #endif
4162 case QEMU_OPTION_d:
4163 {
4164 int mask;
4165 const CPULogItem *item;
4166
4167 mask = cpu_str_to_log_mask(optarg);
4168 if (!mask) {
4169 printf("Log items (comma separated):\n");
4170 for(item = cpu_log_items; item->mask != 0; item++) {
4171 printf("%-10s %s\n", item->name, item->help);
4172 }
4173 exit(1);
4174 }
4175 cpu_set_log(mask);
4176 }
4177 break;
4178 case QEMU_OPTION_s:
4179 gdbstub_dev = "tcp::" DEFAULT_GDBSTUB_PORT;
4180 break;
4181 case QEMU_OPTION_gdb:
4182 gdbstub_dev = optarg;
4183 break;
4184 case QEMU_OPTION_L:
4185 data_dir = optarg;
4186 break;
4187 case QEMU_OPTION_bios:
4188 bios_name = optarg;
4189 break;
4190 case QEMU_OPTION_singlestep:
4191 singlestep = 1;
4192 break;
4193 case QEMU_OPTION_S:
4194 autostart = 0;
4195 break;
4196 case QEMU_OPTION_k:
4197 keyboard_layout = optarg;
4198 break;
4199 case QEMU_OPTION_localtime:
4200 rtc_utc = 0;
4201 break;
4202 case QEMU_OPTION_vga:
4203 select_vgahw (optarg);
4204 break;
4205 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
4206 case QEMU_OPTION_g:
4207 {
4208 const char *p;
4209 int w, h, depth;
4210 p = optarg;
4211 w = strtol(p, (char **)&p, 10);
4212 if (w <= 0) {
4213 graphic_error:
4214 fprintf(stderr, "qemu: invalid resolution or depth\n");
4215 exit(1);
4216 }
4217 if (*p != 'x')
4218 goto graphic_error;
4219 p++;
4220 h = strtol(p, (char **)&p, 10);
4221 if (h <= 0)
4222 goto graphic_error;
4223 if (*p == 'x') {
4224 p++;
4225 depth = strtol(p, (char **)&p, 10);
4226 if (depth != 8 && depth != 15 && depth != 16 &&
4227 depth != 24 && depth != 32)
4228 goto graphic_error;
4229 } else if (*p == '\0') {
4230 depth = graphic_depth;
4231 } else {
4232 goto graphic_error;
4233 }
4234
4235 graphic_width = w;
4236 graphic_height = h;
4237 graphic_depth = depth;
4238 }
4239 break;
4240 #endif
4241 case QEMU_OPTION_echr:
4242 {
4243 char *r;
4244 term_escape_char = strtol(optarg, &r, 0);
4245 if (r == optarg)
4246 printf("Bad argument to echr\n");
4247 break;
4248 }
4249 case QEMU_OPTION_monitor:
4250 monitor_parse(optarg, "readline");
4251 default_monitor = 0;
4252 break;
4253 case QEMU_OPTION_qmp:
4254 monitor_parse(optarg, "control");
4255 default_monitor = 0;
4256 break;
4257 case QEMU_OPTION_mon:
4258 opts = qemu_opts_parse(&qemu_mon_opts, optarg, 1);
4259 if (!opts) {
4260 fprintf(stderr, "parse error: %s\n", optarg);
4261 exit(1);
4262 }
4263 default_monitor = 0;
4264 break;
4265 case QEMU_OPTION_chardev:
4266 opts = qemu_opts_parse(&qemu_chardev_opts, optarg, 1);
4267 if (!opts) {
4268 fprintf(stderr, "parse error: %s\n", optarg);
4269 exit(1);
4270 }
4271 break;
4272 case QEMU_OPTION_serial:
4273 add_device_config(DEV_SERIAL, optarg);
4274 default_serial = 0;
4275 if (strncmp(optarg, "mon:", 4) == 0) {
4276 default_monitor = 0;
4277 }
4278 break;
4279 case QEMU_OPTION_watchdog:
4280 if (watchdog) {
4281 fprintf(stderr,
4282 "qemu: only one watchdog option may be given\n");
4283 return 1;
4284 }
4285 watchdog = optarg;
4286 break;
4287 case QEMU_OPTION_watchdog_action:
4288 if (select_watchdog_action(optarg) == -1) {
4289 fprintf(stderr, "Unknown -watchdog-action parameter\n");
4290 exit(1);
4291 }
4292 break;
4293 case QEMU_OPTION_virtiocon:
4294 add_device_config(DEV_VIRTCON, optarg);
4295 default_virtcon = 0;
4296 if (strncmp(optarg, "mon:", 4) == 0) {
4297 default_monitor = 0;
4298 }
4299 break;
4300 case QEMU_OPTION_parallel:
4301 add_device_config(DEV_PARALLEL, optarg);
4302 default_parallel = 0;
4303 if (strncmp(optarg, "mon:", 4) == 0) {
4304 default_monitor = 0;
4305 }
4306 break;
4307 case QEMU_OPTION_debugcon:
4308 add_device_config(DEV_DEBUGCON, optarg);
4309 break;
4310 case QEMU_OPTION_loadvm:
4311 loadvm = optarg;
4312 break;
4313 case QEMU_OPTION_full_screen:
4314 full_screen = 1;
4315 break;
4316 #ifdef CONFIG_SDL
4317 case QEMU_OPTION_no_frame:
4318 no_frame = 1;
4319 break;
4320 case QEMU_OPTION_alt_grab:
4321 alt_grab = 1;
4322 break;
4323 case QEMU_OPTION_ctrl_grab:
4324 ctrl_grab = 1;
4325 break;
4326 case QEMU_OPTION_no_quit:
4327 no_quit = 1;
4328 break;
4329 case QEMU_OPTION_sdl:
4330 display_type = DT_SDL;
4331 break;
4332 #endif
4333 case QEMU_OPTION_pidfile:
4334 pid_file = optarg;
4335 break;
4336 #ifdef TARGET_I386
4337 case QEMU_OPTION_win2k_hack:
4338 win2k_install_hack = 1;
4339 break;
4340 case QEMU_OPTION_rtc_td_hack:
4341 rtc_td_hack = 1;
4342 break;
4343 case QEMU_OPTION_acpitable:
4344 if(acpi_table_add(optarg) < 0) {
4345 fprintf(stderr, "Wrong acpi table provided\n");
4346 exit(1);
4347 }
4348 break;
4349 case QEMU_OPTION_smbios:
4350 if(smbios_entry_add(optarg) < 0) {
4351 fprintf(stderr, "Wrong smbios provided\n");
4352 exit(1);
4353 }
4354 break;
4355 #endif
4356 #ifdef CONFIG_KVM
4357 case QEMU_OPTION_enable_kvm:
4358 kvm_allowed = 1;
4359 break;
4360 #endif
4361 case QEMU_OPTION_usb:
4362 usb_enabled = 1;
4363 break;
4364 case QEMU_OPTION_usbdevice:
4365 usb_enabled = 1;
4366 add_device_config(DEV_USB, optarg);
4367 break;
4368 case QEMU_OPTION_device:
4369 if (!qemu_opts_parse(&qemu_device_opts, optarg, 1)) {
4370 exit(1);
4371 }
4372 break;
4373 case QEMU_OPTION_smp:
4374 smp_parse(optarg);
4375 if (smp_cpus < 1) {
4376 fprintf(stderr, "Invalid number of CPUs\n");
4377 exit(1);
4378 }
4379 if (max_cpus < smp_cpus) {
4380 fprintf(stderr, "maxcpus must be equal to or greater than "
4381 "smp\n");
4382 exit(1);
4383 }
4384 if (max_cpus > 255) {
4385 fprintf(stderr, "Unsupported number of maxcpus\n");
4386 exit(1);
4387 }
4388 break;
4389 case QEMU_OPTION_vnc:
4390 display_type = DT_VNC;
4391 vnc_display = optarg;
4392 break;
4393 #ifdef TARGET_I386
4394 case QEMU_OPTION_no_acpi:
4395 acpi_enabled = 0;
4396 break;
4397 case QEMU_OPTION_no_hpet:
4398 no_hpet = 1;
4399 break;
4400 case QEMU_OPTION_balloon:
4401 if (balloon_parse(optarg) < 0) {
4402 fprintf(stderr, "Unknown -balloon argument %s\n", optarg);
4403 exit(1);
4404 }
4405 break;
4406 #endif
4407 case QEMU_OPTION_no_reboot:
4408 no_reboot = 1;
4409 break;
4410 case QEMU_OPTION_no_shutdown:
4411 no_shutdown = 1;
4412 break;
4413 case QEMU_OPTION_show_cursor:
4414 cursor_hide = 0;
4415 break;
4416 case QEMU_OPTION_uuid:
4417 if(qemu_uuid_parse(optarg, qemu_uuid) < 0) {
4418 fprintf(stderr, "Fail to parse UUID string."
4419 " Wrong format.\n");
4420 exit(1);
4421 }
4422 break;
4423 #ifndef _WIN32
4424 case QEMU_OPTION_daemonize:
4425 daemonize = 1;
4426 break;
4427 #endif
4428 case QEMU_OPTION_option_rom:
4429 if (nb_option_roms >= MAX_OPTION_ROMS) {
4430 fprintf(stderr, "Too many option ROMs\n");
4431 exit(1);
4432 }
4433 option_rom[nb_option_roms] = optarg;
4434 nb_option_roms++;
4435 break;
4436 #if defined(TARGET_ARM) || defined(TARGET_M68K)
4437 case QEMU_OPTION_semihosting:
4438 semihosting_enabled = 1;
4439 break;
4440 #endif
4441 case QEMU_OPTION_name:
4442 qemu_name = qemu_strdup(optarg);
4443 {
4444 char *p = strchr(qemu_name, ',');
4445 if (p != NULL) {
4446 *p++ = 0;
4447 if (strncmp(p, "process=", 8)) {
4448 fprintf(stderr, "Unknown subargument %s to -name", p);
4449 exit(1);
4450 }
4451 p += 8;
4452 set_proc_name(p);
4453 }
4454 }
4455 break;
4456 #if defined(TARGET_SPARC) || defined(TARGET_PPC)
4457 case QEMU_OPTION_prom_env:
4458 if (nb_prom_envs >= MAX_PROM_ENVS) {
4459 fprintf(stderr, "Too many prom variables\n");
4460 exit(1);
4461 }
4462 prom_envs[nb_prom_envs] = optarg;
4463 nb_prom_envs++;
4464 break;
4465 #endif
4466 #ifdef TARGET_ARM
4467 case QEMU_OPTION_old_param:
4468 old_param = 1;
4469 break;
4470 #endif
4471 case QEMU_OPTION_clock:
4472 configure_alarms(optarg);
4473 break;
4474 case QEMU_OPTION_startdate:
4475 configure_rtc_date_offset(optarg, 1);
4476 break;
4477 case QEMU_OPTION_rtc:
4478 opts = qemu_opts_parse(&qemu_rtc_opts, optarg, 0);
4479 if (!opts) {
4480 fprintf(stderr, "parse error: %s\n", optarg);
4481 exit(1);
4482 }
4483 configure_rtc(opts);
4484 break;
4485 case QEMU_OPTION_tb_size:
4486 tb_size = strtol(optarg, NULL, 0);
4487 if (tb_size < 0)
4488 tb_size = 0;
4489 break;
4490 case QEMU_OPTION_icount:
4491 icount_option = optarg;
4492 break;
4493 case QEMU_OPTION_incoming:
4494 incoming = optarg;
4495 break;
4496 case QEMU_OPTION_nodefaults:
4497 default_serial = 0;
4498 default_parallel = 0;
4499 default_virtcon = 0;
4500 default_monitor = 0;
4501 default_vga = 0;
4502 default_net = 0;
4503 default_floppy = 0;
4504 default_cdrom = 0;
4505 default_sdcard = 0;
4506 break;
4507 #ifndef _WIN32
4508 case QEMU_OPTION_chroot:
4509 chroot_dir = optarg;
4510 break;
4511 case QEMU_OPTION_runas:
4512 run_as = optarg;
4513 break;
4514 #endif
4515 #ifdef CONFIG_XEN
4516 case QEMU_OPTION_xen_domid:
4517 xen_domid = atoi(optarg);
4518 break;
4519 case QEMU_OPTION_xen_create:
4520 xen_mode = XEN_CREATE;
4521 break;
4522 case QEMU_OPTION_xen_attach:
4523 xen_mode = XEN_ATTACH;
4524 break;
4525 #endif
4526 case QEMU_OPTION_readconfig:
4527 {
4528 FILE *fp;
4529 fp = fopen(optarg, "r");
4530 if (fp == NULL) {
4531 fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
4532 exit(1);
4533 }
4534 if (qemu_config_parse(fp, optarg) != 0) {
4535 exit(1);
4536 }
4537 fclose(fp);
4538 break;
4539 }
4540 case QEMU_OPTION_writeconfig:
4541 {
4542 FILE *fp;
4543 if (strcmp(optarg, "-") == 0) {
4544 fp = stdout;
4545 } else {
4546 fp = fopen(optarg, "w");
4547 if (fp == NULL) {
4548 fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
4549 exit(1);
4550 }
4551 }
4552 qemu_config_write(fp);
4553 fclose(fp);
4554 break;
4555 }
4556 }
4557 }
4558 }
4559 loc_set_none();
4560
4561 /* If no data_dir is specified then try to find it relative to the
4562 executable path. */
4563 if (!data_dir) {
4564 data_dir = find_datadir(argv[0]);
4565 }
4566 /* If all else fails use the install patch specified when building. */
4567 if (!data_dir) {
4568 data_dir = CONFIG_QEMU_SHAREDIR;
4569 }
4570
4571 /*
4572 * Default to max_cpus = smp_cpus, in case the user doesn't
4573 * specify a max_cpus value.
4574 */
4575 if (!max_cpus)
4576 max_cpus = smp_cpus;
4577
4578 machine->max_cpus = machine->max_cpus ?: 1; /* Default to UP */
4579 if (smp_cpus > machine->max_cpus) {
4580 fprintf(stderr, "Number of SMP cpus requested (%d), exceeds max cpus "
4581 "supported by machine `%s' (%d)\n", smp_cpus, machine->name,
4582 machine->max_cpus);
4583 exit(1);
4584 }
4585
4586 qemu_opts_foreach(&qemu_device_opts, default_driver_check, NULL, 0);
4587 qemu_opts_foreach(&qemu_global_opts, default_driver_check, NULL, 0);
4588
4589 if (machine->no_serial) {
4590 default_serial = 0;
4591 }
4592 if (machine->no_parallel) {
4593 default_parallel = 0;
4594 }
4595 if (!machine->use_virtcon) {
4596 default_virtcon = 0;
4597 }
4598 if (machine->no_vga) {
4599 default_vga = 0;
4600 }
4601 if (machine->no_floppy) {
4602 default_floppy = 0;
4603 }
4604 if (machine->no_cdrom) {
4605 default_cdrom = 0;
4606 }
4607 if (machine->no_sdcard) {
4608 default_sdcard = 0;
4609 }
4610
4611 if (display_type == DT_NOGRAPHIC) {
4612 if (default_parallel)
4613 add_device_config(DEV_PARALLEL, "null");
4614 if (default_serial && default_monitor) {
4615 add_device_config(DEV_SERIAL, "mon:stdio");
4616 } else if (default_virtcon && default_monitor) {
4617 add_device_config(DEV_VIRTCON, "mon:stdio");
4618 } else {
4619 if (default_serial)
4620 add_device_config(DEV_SERIAL, "stdio");
4621 if (default_virtcon)
4622 add_device_config(DEV_VIRTCON, "stdio");
4623 if (default_monitor)
4624 monitor_parse("stdio", "readline");
4625 }
4626 } else {
4627 if (default_serial)
4628 add_device_config(DEV_SERIAL, "vc:80Cx24C");
4629 if (default_parallel)
4630 add_device_config(DEV_PARALLEL, "vc:80Cx24C");
4631 if (default_monitor)
4632 monitor_parse("vc:80Cx24C", "readline");
4633 if (default_virtcon)
4634 add_device_config(DEV_VIRTCON, "vc:80Cx24C");
4635 }
4636 if (default_vga)
4637 vga_interface_type = VGA_CIRRUS;
4638
4639 if (qemu_opts_foreach(&qemu_chardev_opts, chardev_init_func, NULL, 1) != 0)
4640 exit(1);
4641
4642 #ifndef _WIN32
4643 if (daemonize) {
4644 pid_t pid;
4645
4646 if (pipe(fds) == -1)
4647 exit(1);
4648
4649 pid = fork();
4650 if (pid > 0) {
4651 uint8_t status;
4652 ssize_t len;
4653
4654 close(fds[1]);
4655
4656 again:
4657 len = read(fds[0], &status, 1);
4658 if (len == -1 && (errno == EINTR))
4659 goto again;
4660
4661 if (len != 1)
4662 exit(1);
4663 else if (status == 1) {
4664 fprintf(stderr, "Could not acquire pidfile: %s\n", strerror(errno));
4665 exit(1);
4666 } else
4667 exit(0);
4668 } else if (pid < 0)
4669 exit(1);
4670
4671 close(fds[0]);
4672 qemu_set_cloexec(fds[1]);
4673
4674 setsid();
4675
4676 pid = fork();
4677 if (pid > 0)
4678 exit(0);
4679 else if (pid < 0)
4680 exit(1);
4681
4682 umask(027);
4683
4684 signal(SIGTSTP, SIG_IGN);
4685 signal(SIGTTOU, SIG_IGN);
4686 signal(SIGTTIN, SIG_IGN);
4687 }
4688 #endif
4689
4690 if (pid_file && qemu_create_pidfile(pid_file) != 0) {
4691 #ifndef _WIN32
4692 if (daemonize) {
4693 uint8_t status = 1;
4694 if (write(fds[1], &status, 1) != 1) {
4695 perror("daemonize. Writing to pipe\n");
4696 }
4697 } else
4698 #endif
4699 fprintf(stderr, "Could not acquire pid file: %s\n", strerror(errno));
4700 exit(1);
4701 }
4702
4703 if (kvm_enabled()) {
4704 int ret;
4705
4706 ret = kvm_init(smp_cpus);
4707 if (ret < 0) {
4708 fprintf(stderr, "failed to initialize KVM\n");
4709 exit(1);
4710 }
4711 }
4712
4713 if (qemu_init_main_loop()) {
4714 fprintf(stderr, "qemu_init_main_loop failed\n");
4715 exit(1);
4716 }
4717 linux_boot = (kernel_filename != NULL);
4718
4719 if (!linux_boot && *kernel_cmdline != '\0') {
4720 fprintf(stderr, "-append only allowed with -kernel option\n");
4721 exit(1);
4722 }
4723
4724 if (!linux_boot && initrd_filename != NULL) {
4725 fprintf(stderr, "-initrd only allowed with -kernel option\n");
4726 exit(1);
4727 }
4728
4729 #ifndef _WIN32
4730 /* Win32 doesn't support line-buffering and requires size >= 2 */
4731 setvbuf(stdout, NULL, _IOLBF, 0);
4732 #endif
4733
4734 if (init_timer_alarm() < 0) {
4735 fprintf(stderr, "could not initialize alarm timer\n");
4736 exit(1);
4737 }
4738 configure_icount(icount_option);
4739
4740 #ifdef _WIN32
4741 socket_init();
4742 #endif
4743
4744 if (net_init_clients() < 0) {
4745 exit(1);
4746 }
4747
4748 net_boot = (boot_devices_bitmap >> ('n' - 'a')) & 0xF;
4749 net_set_boot_mask(net_boot);
4750
4751 /* init the bluetooth world */
4752 if (foreach_device_config(DEV_BT, bt_parse))
4753 exit(1);
4754
4755 /* init the memory */
4756 if (ram_size == 0)
4757 ram_size = DEFAULT_RAM_SIZE * 1024 * 1024;
4758
4759 /* init the dynamic translator */
4760 cpu_exec_init_all(tb_size * 1024 * 1024);
4761
4762 bdrv_init_with_whitelist();
4763
4764 blk_mig_init();
4765
4766 if (default_cdrom) {
4767 /* we always create the cdrom drive, even if no disk is there */
4768 drive_add(NULL, CDROM_ALIAS);
4769 }
4770
4771 if (default_floppy) {
4772 /* we always create at least one floppy */
4773 drive_add(NULL, FD_ALIAS, 0);
4774 }
4775
4776 if (default_sdcard) {
4777 /* we always create one sd slot, even if no card is in it */
4778 drive_add(NULL, SD_ALIAS);
4779 }
4780
4781 /* open the virtual block devices */
4782 if (snapshot)
4783 qemu_opts_foreach(&qemu_drive_opts, drive_enable_snapshot, NULL, 0);
4784 if (qemu_opts_foreach(&qemu_drive_opts, drive_init_func, machine, 1) != 0)
4785 exit(1);
4786
4787 register_savevm_live("ram", 0, 3, NULL, ram_save_live, NULL,
4788 ram_load, NULL);
4789
4790 if (nb_numa_nodes > 0) {
4791 int i;
4792
4793 if (nb_numa_nodes > smp_cpus) {
4794 nb_numa_nodes = smp_cpus;
4795 }
4796
4797 /* If no memory size if given for any node, assume the default case
4798 * and distribute the available memory equally across all nodes
4799 */
4800 for (i = 0; i < nb_numa_nodes; i++) {
4801 if (node_mem[i] != 0)
4802 break;
4803 }
4804 if (i == nb_numa_nodes) {
4805 uint64_t usedmem = 0;
4806
4807 /* On Linux, the each node's border has to be 8MB aligned,
4808 * the final node gets the rest.
4809 */
4810 for (i = 0; i < nb_numa_nodes - 1; i++) {
4811 node_mem[i] = (ram_size / nb_numa_nodes) & ~((1 << 23UL) - 1);
4812 usedmem += node_mem[i];
4813 }
4814 node_mem[i] = ram_size - usedmem;
4815 }
4816
4817 for (i = 0; i < nb_numa_nodes; i++) {
4818 if (node_cpumask[i] != 0)
4819 break;
4820 }
4821 /* assigning the VCPUs round-robin is easier to implement, guest OSes
4822 * must cope with this anyway, because there are BIOSes out there in
4823 * real machines which also use this scheme.
4824 */
4825 if (i == nb_numa_nodes) {
4826 for (i = 0; i < smp_cpus; i++) {
4827 node_cpumask[i % nb_numa_nodes] |= 1 << i;
4828 }
4829 }
4830 }
4831
4832 if (foreach_device_config(DEV_SERIAL, serial_parse) < 0)
4833 exit(1);
4834 if (foreach_device_config(DEV_PARALLEL, parallel_parse) < 0)
4835 exit(1);
4836 if (foreach_device_config(DEV_VIRTCON, virtcon_parse) < 0)
4837 exit(1);
4838 if (foreach_device_config(DEV_DEBUGCON, debugcon_parse) < 0)
4839 exit(1);
4840
4841 module_call_init(MODULE_INIT_DEVICE);
4842
4843 if (qemu_opts_foreach(&qemu_device_opts, device_help_func, NULL, 0) != 0)
4844 exit(0);
4845
4846 if (watchdog) {
4847 i = select_watchdog(watchdog);
4848 if (i > 0)
4849 exit (i == 1 ? 1 : 0);
4850 }
4851
4852 if (machine->compat_props) {
4853 qdev_prop_register_global_list(machine->compat_props);
4854 }
4855 qemu_add_globals();
4856
4857 machine->init(ram_size, boot_devices,
4858 kernel_filename, kernel_cmdline, initrd_filename, cpu_model);
4859
4860 cpu_synchronize_all_post_init();
4861
4862 #ifndef _WIN32
4863 /* must be after terminal init, SDL library changes signal handlers */
4864 sighandler_setup();
4865 #endif
4866
4867 set_numa_modes();
4868
4869 current_machine = machine;
4870
4871 /* init USB devices */
4872 if (usb_enabled) {
4873 if (foreach_device_config(DEV_USB, usb_parse) < 0)
4874 exit(1);
4875 }
4876
4877 /* init generic devices */
4878 if (qemu_opts_foreach(&qemu_device_opts, device_init_func, NULL, 1) != 0)
4879 exit(1);
4880
4881 net_check_clients();
4882
4883 /* just use the first displaystate for the moment */
4884 ds = get_displaystate();
4885
4886 if (display_type == DT_DEFAULT) {
4887 #if defined(CONFIG_SDL) || defined(CONFIG_COCOA)
4888 display_type = DT_SDL;
4889 #else
4890 display_type = DT_VNC;
4891 vnc_display = "localhost:0,to=99";
4892 show_vnc_port = 1;
4893 #endif
4894 }
4895
4896
4897 switch (display_type) {
4898 case DT_NOGRAPHIC:
4899 break;
4900 #if defined(CONFIG_CURSES)
4901 case DT_CURSES:
4902 curses_display_init(ds, full_screen);
4903 break;
4904 #endif
4905 #if defined(CONFIG_SDL)
4906 case DT_SDL:
4907 sdl_display_init(ds, full_screen, no_frame);
4908 break;
4909 #elif defined(CONFIG_COCOA)
4910 case DT_SDL:
4911 cocoa_display_init(ds, full_screen);
4912 break;
4913 #endif
4914 case DT_VNC:
4915 vnc_display_init(ds);
4916 if (vnc_display_open(ds, vnc_display) < 0)
4917 exit(1);
4918
4919 if (show_vnc_port) {
4920 printf("VNC server running on `%s'\n", vnc_display_local_addr(ds));
4921 }
4922 break;
4923 default:
4924 break;
4925 }
4926 dpy_resize(ds);
4927
4928 dcl = ds->listeners;
4929 while (dcl != NULL) {
4930 if (dcl->dpy_refresh != NULL) {
4931 ds->gui_timer = qemu_new_timer(rt_clock, gui_update, ds);
4932 qemu_mod_timer(ds->gui_timer, qemu_get_clock(rt_clock));
4933 }
4934 dcl = dcl->next;
4935 }
4936
4937 if (display_type == DT_NOGRAPHIC || display_type == DT_VNC) {
4938 nographic_timer = qemu_new_timer(rt_clock, nographic_update, NULL);
4939 qemu_mod_timer(nographic_timer, qemu_get_clock(rt_clock));
4940 }
4941
4942 text_consoles_set_display(ds);
4943
4944 if (qemu_opts_foreach(&qemu_mon_opts, mon_init_func, NULL, 1) != 0)
4945 exit(1);
4946
4947 if (gdbstub_dev && gdbserver_start(gdbstub_dev) < 0) {
4948 fprintf(stderr, "qemu: could not open gdbserver on device '%s'\n",
4949 gdbstub_dev);
4950 exit(1);
4951 }
4952
4953 qdev_machine_creation_done();
4954
4955 if (rom_load_all() != 0) {
4956 fprintf(stderr, "rom loading failed\n");
4957 exit(1);
4958 }
4959
4960 qemu_system_reset();
4961 if (loadvm) {
4962 if (load_vmstate(loadvm) < 0) {
4963 autostart = 0;
4964 }
4965 }
4966
4967 if (incoming) {
4968 qemu_start_incoming_migration(incoming);
4969 } else if (autostart) {
4970 vm_start();
4971 }
4972
4973 #ifndef _WIN32
4974 if (daemonize) {
4975 uint8_t status = 0;
4976 ssize_t len;
4977
4978 again1:
4979 len = write(fds[1], &status, 1);
4980 if (len == -1 && (errno == EINTR))
4981 goto again1;
4982
4983 if (len != 1)
4984 exit(1);
4985
4986 if (chdir("/")) {
4987 perror("not able to chdir to /");
4988 exit(1);
4989 }
4990 TFR(fd = qemu_open("/dev/null", O_RDWR));
4991 if (fd == -1)
4992 exit(1);
4993 }
4994
4995 if (run_as) {
4996 pwd = getpwnam(run_as);
4997 if (!pwd) {
4998 fprintf(stderr, "User \"%s\" doesn't exist\n", run_as);
4999 exit(1);
5000 }
5001 }
5002
5003 if (chroot_dir) {
5004 if (chroot(chroot_dir) < 0) {
5005 fprintf(stderr, "chroot failed\n");
5006 exit(1);
5007 }
5008 if (chdir("/")) {
5009 perror("not able to chdir to /");
5010 exit(1);
5011 }
5012 }
5013
5014 if (run_as) {
5015 if (setgid(pwd->pw_gid) < 0) {
5016 fprintf(stderr, "Failed to setgid(%d)\n", pwd->pw_gid);
5017 exit(1);
5018 }
5019 if (setuid(pwd->pw_uid) < 0) {
5020 fprintf(stderr, "Failed to setuid(%d)\n", pwd->pw_uid);
5021 exit(1);
5022 }
5023 if (setuid(0) != -1) {
5024 fprintf(stderr, "Dropping privileges failed\n");
5025 exit(1);
5026 }
5027 }
5028
5029 if (daemonize) {
5030 dup2(fd, 0);
5031 dup2(fd, 1);
5032 dup2(fd, 2);
5033
5034 close(fd);
5035 }
5036 #endif
5037
5038 main_loop();
5039 quit_timers();
5040 net_cleanup();
5041
5042 return 0;
5043 }