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