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