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