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