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