4 * Copyright (c) 2003-2008 Fabrice Bellard
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:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
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
25 #include "hw/boards.h"
27 #include "hw/pcmcia.h"
29 #include "hw/audiodev.h"
36 #include "qemu-timer.h"
37 #include "qemu-char.h"
39 #include "audio/audio.h"
50 #include <sys/times.h>
55 #include <sys/ioctl.h>
56 #include <sys/socket.h>
57 #include <netinet/in.h>
60 #include <sys/select.h>
61 #include <arpa/inet.h>
67 #elif defined (__GLIBC__) && defined (__FreeBSD_kernel__)
68 #include <freebsd/stdlib.h>
72 #include <linux/if_tun.h>
75 #include <linux/rtc.h>
77 /* For the benefit of older linux systems which don't supply it,
78 we use a local copy of hpet.h. */
79 /* #include <linux/hpet.h> */
82 #include <linux/ppdev.h>
83 #include <linux/parport.h>
86 #include <sys/ethernet.h>
87 #include <sys/sockio.h>
88 #include <netinet/arp.h>
89 #include <netinet/in.h>
90 #include <netinet/in_systm.h>
91 #include <netinet/ip.h>
92 #include <netinet/ip_icmp.h> // must come after ip.h
93 #include <netinet/udp.h>
94 #include <netinet/tcp.h>
101 #include <winsock2.h>
102 int inet_aton(const char *cp
, struct in_addr
*ia
);
105 #if defined(CONFIG_SLIRP)
106 #include "libslirp.h"
111 #include <sys/timeb.h>
112 #include <mmsystem.h>
113 #define getopt_long_only getopt_long
114 #define memalign(align, size) malloc(size)
117 #include "qemu_socket.h"
123 #endif /* CONFIG_SDL */
127 #define main qemu_main
128 #endif /* CONFIG_COCOA */
132 #include "exec-all.h"
134 #define DEFAULT_NETWORK_SCRIPT "/etc/qemu-ifup"
135 #define DEFAULT_NETWORK_DOWN_SCRIPT "/etc/qemu-ifdown"
137 #define SMBD_COMMAND "/usr/sfw/sbin/smbd"
139 #define SMBD_COMMAND "/usr/sbin/smbd"
142 //#define DEBUG_UNUSED_IOPORT
143 //#define DEBUG_IOPORT
146 #define DEFAULT_RAM_SIZE 144
148 #define DEFAULT_RAM_SIZE 128
151 #define GUI_REFRESH_INTERVAL 30
153 /* Max number of USB devices that can be specified on the commandline. */
154 #define MAX_USB_CMDLINE 8
156 /* XXX: use a two level table to limit memory usage */
157 #define MAX_IOPORTS 65536
159 const char *bios_dir
= CONFIG_QEMU_SHAREDIR
;
160 const char *bios_name
= NULL
;
161 void *ioport_opaque
[MAX_IOPORTS
];
162 IOPortReadFunc
*ioport_read_table
[3][MAX_IOPORTS
];
163 IOPortWriteFunc
*ioport_write_table
[3][MAX_IOPORTS
];
164 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
165 to store the VM snapshots */
166 DriveInfo drives_table
[MAX_DRIVES
+1];
168 /* point to the block driver where the snapshots are managed */
169 BlockDriverState
*bs_snapshots
;
171 static DisplayState display_state
;
174 const char* keyboard_layout
= NULL
;
175 int64_t ticks_per_sec
;
177 int pit_min_timer_count
= 0;
179 NICInfo nd_table
[MAX_NICS
];
181 static int rtc_utc
= 1;
182 static int rtc_date_offset
= -1; /* -1 means no change */
183 int cirrus_vga_enabled
= 1;
184 int vmsvga_enabled
= 0;
186 int graphic_width
= 1024;
187 int graphic_height
= 768;
188 int graphic_depth
= 8;
190 int graphic_width
= 800;
191 int graphic_height
= 600;
192 int graphic_depth
= 15;
197 CharDriverState
*serial_hds
[MAX_SERIAL_PORTS
];
198 CharDriverState
*parallel_hds
[MAX_PARALLEL_PORTS
];
200 int win2k_install_hack
= 0;
203 static VLANState
*first_vlan
;
205 const char *vnc_display
;
206 #if defined(TARGET_SPARC)
208 #elif defined(TARGET_I386)
213 int acpi_enabled
= 1;
218 int graphic_rotate
= 0;
220 const char *option_rom
[MAX_OPTION_ROMS
];
222 int semihosting_enabled
= 0;
227 const char *qemu_name
;
230 unsigned int nb_prom_envs
= 0;
231 const char *prom_envs
[MAX_PROM_ENVS
];
237 } drives_opt
[MAX_DRIVES
];
239 static CPUState
*cur_cpu
;
240 static CPUState
*next_cpu
;
241 static int event_pending
= 1;
242 /* Conversion factor from emulated instructions to virtual clock ticks. */
243 static int icount_time_shift
;
244 /* Arbitrarily pick 1MIPS as the minimum allowable speed. */
245 #define MAX_ICOUNT_SHIFT 10
246 /* Compensate for varying guest execution speed. */
247 static int64_t qemu_icount_bias
;
248 QEMUTimer
*icount_rt_timer
;
249 QEMUTimer
*icount_vm_timer
;
251 #define TFR(expr) do { if ((expr) != -1) break; } while (errno == EINTR)
253 /***********************************************************/
254 /* x86 ISA bus support */
256 target_phys_addr_t isa_mem_base
= 0;
259 static uint32_t default_ioport_readb(void *opaque
, uint32_t address
)
261 #ifdef DEBUG_UNUSED_IOPORT
262 fprintf(stderr
, "unused inb: port=0x%04x\n", address
);
267 static void default_ioport_writeb(void *opaque
, uint32_t address
, uint32_t data
)
269 #ifdef DEBUG_UNUSED_IOPORT
270 fprintf(stderr
, "unused outb: port=0x%04x data=0x%02x\n", address
, data
);
274 /* default is to make two byte accesses */
275 static uint32_t default_ioport_readw(void *opaque
, uint32_t address
)
278 data
= ioport_read_table
[0][address
](ioport_opaque
[address
], address
);
279 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
280 data
|= ioport_read_table
[0][address
](ioport_opaque
[address
], address
) << 8;
284 static void default_ioport_writew(void *opaque
, uint32_t address
, uint32_t data
)
286 ioport_write_table
[0][address
](ioport_opaque
[address
], address
, data
& 0xff);
287 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
288 ioport_write_table
[0][address
](ioport_opaque
[address
], address
, (data
>> 8) & 0xff);
291 static uint32_t default_ioport_readl(void *opaque
, uint32_t address
)
293 #ifdef DEBUG_UNUSED_IOPORT
294 fprintf(stderr
, "unused inl: port=0x%04x\n", address
);
299 static void default_ioport_writel(void *opaque
, uint32_t address
, uint32_t data
)
301 #ifdef DEBUG_UNUSED_IOPORT
302 fprintf(stderr
, "unused outl: port=0x%04x data=0x%02x\n", address
, data
);
306 static void init_ioports(void)
310 for(i
= 0; i
< MAX_IOPORTS
; i
++) {
311 ioport_read_table
[0][i
] = default_ioport_readb
;
312 ioport_write_table
[0][i
] = default_ioport_writeb
;
313 ioport_read_table
[1][i
] = default_ioport_readw
;
314 ioport_write_table
[1][i
] = default_ioport_writew
;
315 ioport_read_table
[2][i
] = default_ioport_readl
;
316 ioport_write_table
[2][i
] = default_ioport_writel
;
320 /* size is the word size in byte */
321 int register_ioport_read(int start
, int length
, int size
,
322 IOPortReadFunc
*func
, void *opaque
)
328 } else if (size
== 2) {
330 } else if (size
== 4) {
333 hw_error("register_ioport_read: invalid size");
336 for(i
= start
; i
< start
+ length
; i
+= size
) {
337 ioport_read_table
[bsize
][i
] = func
;
338 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
339 hw_error("register_ioport_read: invalid opaque");
340 ioport_opaque
[i
] = opaque
;
345 /* size is the word size in byte */
346 int register_ioport_write(int start
, int length
, int size
,
347 IOPortWriteFunc
*func
, void *opaque
)
353 } else if (size
== 2) {
355 } else if (size
== 4) {
358 hw_error("register_ioport_write: invalid size");
361 for(i
= start
; i
< start
+ length
; i
+= size
) {
362 ioport_write_table
[bsize
][i
] = func
;
363 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
364 hw_error("register_ioport_write: invalid opaque");
365 ioport_opaque
[i
] = opaque
;
370 void isa_unassign_ioport(int start
, int length
)
374 for(i
= start
; i
< start
+ length
; i
++) {
375 ioport_read_table
[0][i
] = default_ioport_readb
;
376 ioport_read_table
[1][i
] = default_ioport_readw
;
377 ioport_read_table
[2][i
] = default_ioport_readl
;
379 ioport_write_table
[0][i
] = default_ioport_writeb
;
380 ioport_write_table
[1][i
] = default_ioport_writew
;
381 ioport_write_table
[2][i
] = default_ioport_writel
;
385 /***********************************************************/
387 void cpu_outb(CPUState
*env
, int addr
, int val
)
390 if (loglevel
& CPU_LOG_IOPORT
)
391 fprintf(logfile
, "outb: %04x %02x\n", addr
, val
);
393 ioport_write_table
[0][addr
](ioport_opaque
[addr
], addr
, val
);
396 env
->last_io_time
= cpu_get_time_fast();
400 void cpu_outw(CPUState
*env
, int addr
, int val
)
403 if (loglevel
& CPU_LOG_IOPORT
)
404 fprintf(logfile
, "outw: %04x %04x\n", addr
, val
);
406 ioport_write_table
[1][addr
](ioport_opaque
[addr
], addr
, val
);
409 env
->last_io_time
= cpu_get_time_fast();
413 void cpu_outl(CPUState
*env
, int addr
, int val
)
416 if (loglevel
& CPU_LOG_IOPORT
)
417 fprintf(logfile
, "outl: %04x %08x\n", addr
, val
);
419 ioport_write_table
[2][addr
](ioport_opaque
[addr
], addr
, val
);
422 env
->last_io_time
= cpu_get_time_fast();
426 int cpu_inb(CPUState
*env
, int addr
)
429 val
= ioport_read_table
[0][addr
](ioport_opaque
[addr
], addr
);
431 if (loglevel
& CPU_LOG_IOPORT
)
432 fprintf(logfile
, "inb : %04x %02x\n", addr
, val
);
436 env
->last_io_time
= cpu_get_time_fast();
441 int cpu_inw(CPUState
*env
, int addr
)
444 val
= ioport_read_table
[1][addr
](ioport_opaque
[addr
], addr
);
446 if (loglevel
& CPU_LOG_IOPORT
)
447 fprintf(logfile
, "inw : %04x %04x\n", addr
, val
);
451 env
->last_io_time
= cpu_get_time_fast();
456 int cpu_inl(CPUState
*env
, int addr
)
459 val
= ioport_read_table
[2][addr
](ioport_opaque
[addr
], addr
);
461 if (loglevel
& CPU_LOG_IOPORT
)
462 fprintf(logfile
, "inl : %04x %08x\n", addr
, val
);
466 env
->last_io_time
= cpu_get_time_fast();
471 /***********************************************************/
472 void hw_error(const char *fmt
, ...)
478 fprintf(stderr
, "qemu: hardware error: ");
479 vfprintf(stderr
, fmt
, ap
);
480 fprintf(stderr
, "\n");
481 for(env
= first_cpu
; env
!= NULL
; env
= env
->next_cpu
) {
482 fprintf(stderr
, "CPU #%d:\n", env
->cpu_index
);
484 cpu_dump_state(env
, stderr
, fprintf
, X86_DUMP_FPU
);
486 cpu_dump_state(env
, stderr
, fprintf
, 0);
493 /***********************************************************/
496 static QEMUPutKBDEvent
*qemu_put_kbd_event
;
497 static void *qemu_put_kbd_event_opaque
;
498 static QEMUPutMouseEntry
*qemu_put_mouse_event_head
;
499 static QEMUPutMouseEntry
*qemu_put_mouse_event_current
;
501 void qemu_add_kbd_event_handler(QEMUPutKBDEvent
*func
, void *opaque
)
503 qemu_put_kbd_event_opaque
= opaque
;
504 qemu_put_kbd_event
= func
;
507 QEMUPutMouseEntry
*qemu_add_mouse_event_handler(QEMUPutMouseEvent
*func
,
508 void *opaque
, int absolute
,
511 QEMUPutMouseEntry
*s
, *cursor
;
513 s
= qemu_mallocz(sizeof(QEMUPutMouseEntry
));
517 s
->qemu_put_mouse_event
= func
;
518 s
->qemu_put_mouse_event_opaque
= opaque
;
519 s
->qemu_put_mouse_event_absolute
= absolute
;
520 s
->qemu_put_mouse_event_name
= qemu_strdup(name
);
523 if (!qemu_put_mouse_event_head
) {
524 qemu_put_mouse_event_head
= qemu_put_mouse_event_current
= s
;
528 cursor
= qemu_put_mouse_event_head
;
529 while (cursor
->next
!= NULL
)
530 cursor
= cursor
->next
;
533 qemu_put_mouse_event_current
= s
;
538 void qemu_remove_mouse_event_handler(QEMUPutMouseEntry
*entry
)
540 QEMUPutMouseEntry
*prev
= NULL
, *cursor
;
542 if (!qemu_put_mouse_event_head
|| entry
== NULL
)
545 cursor
= qemu_put_mouse_event_head
;
546 while (cursor
!= NULL
&& cursor
!= entry
) {
548 cursor
= cursor
->next
;
551 if (cursor
== NULL
) // does not exist or list empty
553 else if (prev
== NULL
) { // entry is head
554 qemu_put_mouse_event_head
= cursor
->next
;
555 if (qemu_put_mouse_event_current
== entry
)
556 qemu_put_mouse_event_current
= cursor
->next
;
557 qemu_free(entry
->qemu_put_mouse_event_name
);
562 prev
->next
= entry
->next
;
564 if (qemu_put_mouse_event_current
== entry
)
565 qemu_put_mouse_event_current
= prev
;
567 qemu_free(entry
->qemu_put_mouse_event_name
);
571 void kbd_put_keycode(int keycode
)
573 if (qemu_put_kbd_event
) {
574 qemu_put_kbd_event(qemu_put_kbd_event_opaque
, keycode
);
578 void kbd_mouse_event(int dx
, int dy
, int dz
, int buttons_state
)
580 QEMUPutMouseEvent
*mouse_event
;
581 void *mouse_event_opaque
;
584 if (!qemu_put_mouse_event_current
) {
589 qemu_put_mouse_event_current
->qemu_put_mouse_event
;
591 qemu_put_mouse_event_current
->qemu_put_mouse_event_opaque
;
594 if (graphic_rotate
) {
595 if (qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
)
598 width
= graphic_width
- 1;
599 mouse_event(mouse_event_opaque
,
600 width
- dy
, dx
, dz
, buttons_state
);
602 mouse_event(mouse_event_opaque
,
603 dx
, dy
, dz
, buttons_state
);
607 int kbd_mouse_is_absolute(void)
609 if (!qemu_put_mouse_event_current
)
612 return qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
;
615 void do_info_mice(void)
617 QEMUPutMouseEntry
*cursor
;
620 if (!qemu_put_mouse_event_head
) {
621 term_printf("No mouse devices connected\n");
625 term_printf("Mouse devices available:\n");
626 cursor
= qemu_put_mouse_event_head
;
627 while (cursor
!= NULL
) {
628 term_printf("%c Mouse #%d: %s\n",
629 (cursor
== qemu_put_mouse_event_current
? '*' : ' '),
630 index
, cursor
->qemu_put_mouse_event_name
);
632 cursor
= cursor
->next
;
636 void do_mouse_set(int index
)
638 QEMUPutMouseEntry
*cursor
;
641 if (!qemu_put_mouse_event_head
) {
642 term_printf("No mouse devices connected\n");
646 cursor
= qemu_put_mouse_event_head
;
647 while (cursor
!= NULL
&& index
!= i
) {
649 cursor
= cursor
->next
;
653 qemu_put_mouse_event_current
= cursor
;
655 term_printf("Mouse at given index not found\n");
658 /* compute with 96 bit intermediate result: (a*b)/c */
659 uint64_t muldiv64(uint64_t a
, uint32_t b
, uint32_t c
)
664 #ifdef WORDS_BIGENDIAN
674 rl
= (uint64_t)u
.l
.low
* (uint64_t)b
;
675 rh
= (uint64_t)u
.l
.high
* (uint64_t)b
;
678 res
.l
.low
= (((rh
% c
) << 32) + (rl
& 0xffffffff)) / c
;
682 /***********************************************************/
683 /* real time host monotonic timer */
685 #define QEMU_TIMER_BASE 1000000000LL
689 static int64_t clock_freq
;
691 static void init_get_clock(void)
695 ret
= QueryPerformanceFrequency(&freq
);
697 fprintf(stderr
, "Could not calibrate ticks\n");
700 clock_freq
= freq
.QuadPart
;
703 static int64_t get_clock(void)
706 QueryPerformanceCounter(&ti
);
707 return muldiv64(ti
.QuadPart
, QEMU_TIMER_BASE
, clock_freq
);
712 static int use_rt_clock
;
714 static void init_get_clock(void)
717 #if defined(__linux__)
720 if (clock_gettime(CLOCK_MONOTONIC
, &ts
) == 0) {
727 static int64_t get_clock(void)
729 #if defined(__linux__)
732 clock_gettime(CLOCK_MONOTONIC
, &ts
);
733 return ts
.tv_sec
* 1000000000LL + ts
.tv_nsec
;
737 /* XXX: using gettimeofday leads to problems if the date
738 changes, so it should be avoided. */
740 gettimeofday(&tv
, NULL
);
741 return tv
.tv_sec
* 1000000000LL + (tv
.tv_usec
* 1000);
746 /* Return the virtual CPU time, based on the instruction counter. */
747 static int64_t cpu_get_icount(void)
750 CPUState
*env
= cpu_single_env
;;
751 icount
= qemu_icount
;
754 fprintf(stderr
, "Bad clock read\n");
755 icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
757 return qemu_icount_bias
+ (icount
<< icount_time_shift
);
760 /***********************************************************/
761 /* guest cycle counter */
763 static int64_t cpu_ticks_prev
;
764 static int64_t cpu_ticks_offset
;
765 static int64_t cpu_clock_offset
;
766 static int cpu_ticks_enabled
;
768 /* return the host CPU cycle counter and handle stop/restart */
769 int64_t cpu_get_ticks(void)
772 return cpu_get_icount();
774 if (!cpu_ticks_enabled
) {
775 return cpu_ticks_offset
;
778 ticks
= cpu_get_real_ticks();
779 if (cpu_ticks_prev
> ticks
) {
780 /* Note: non increasing ticks may happen if the host uses
782 cpu_ticks_offset
+= cpu_ticks_prev
- ticks
;
784 cpu_ticks_prev
= ticks
;
785 return ticks
+ cpu_ticks_offset
;
789 /* return the host CPU monotonic timer and handle stop/restart */
790 static int64_t cpu_get_clock(void)
793 if (!cpu_ticks_enabled
) {
794 return cpu_clock_offset
;
797 return ti
+ cpu_clock_offset
;
801 /* enable cpu_get_ticks() */
802 void cpu_enable_ticks(void)
804 if (!cpu_ticks_enabled
) {
805 cpu_ticks_offset
-= cpu_get_real_ticks();
806 cpu_clock_offset
-= get_clock();
807 cpu_ticks_enabled
= 1;
811 /* disable cpu_get_ticks() : the clock is stopped. You must not call
812 cpu_get_ticks() after that. */
813 void cpu_disable_ticks(void)
815 if (cpu_ticks_enabled
) {
816 cpu_ticks_offset
= cpu_get_ticks();
817 cpu_clock_offset
= cpu_get_clock();
818 cpu_ticks_enabled
= 0;
822 /***********************************************************/
825 #define QEMU_TIMER_REALTIME 0
826 #define QEMU_TIMER_VIRTUAL 1
830 /* XXX: add frequency */
838 struct QEMUTimer
*next
;
841 struct qemu_alarm_timer
{
845 int (*start
)(struct qemu_alarm_timer
*t
);
846 void (*stop
)(struct qemu_alarm_timer
*t
);
847 void (*rearm
)(struct qemu_alarm_timer
*t
);
851 #define ALARM_FLAG_DYNTICKS 0x1
852 #define ALARM_FLAG_EXPIRED 0x2
854 static inline int alarm_has_dynticks(struct qemu_alarm_timer
*t
)
856 return t
->flags
& ALARM_FLAG_DYNTICKS
;
859 static void qemu_rearm_alarm_timer(struct qemu_alarm_timer
*t
)
861 if (!alarm_has_dynticks(t
))
867 /* TODO: MIN_TIMER_REARM_US should be optimized */
868 #define MIN_TIMER_REARM_US 250
870 static struct qemu_alarm_timer
*alarm_timer
;
874 struct qemu_alarm_win32
{
878 } alarm_win32_data
= {0, NULL
, -1};
880 static int win32_start_timer(struct qemu_alarm_timer
*t
);
881 static void win32_stop_timer(struct qemu_alarm_timer
*t
);
882 static void win32_rearm_timer(struct qemu_alarm_timer
*t
);
886 static int unix_start_timer(struct qemu_alarm_timer
*t
);
887 static void unix_stop_timer(struct qemu_alarm_timer
*t
);
891 static int dynticks_start_timer(struct qemu_alarm_timer
*t
);
892 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
);
893 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
);
895 static int hpet_start_timer(struct qemu_alarm_timer
*t
);
896 static void hpet_stop_timer(struct qemu_alarm_timer
*t
);
898 static int rtc_start_timer(struct qemu_alarm_timer
*t
);
899 static void rtc_stop_timer(struct qemu_alarm_timer
*t
);
901 #endif /* __linux__ */
905 /* Correlation between real and virtual time is always going to be
906 fairly approximate, so ignore small variation.
907 When the guest is idle real and virtual time will be aligned in
909 #define ICOUNT_WOBBLE (QEMU_TIMER_BASE / 10)
911 static void icount_adjust(void)
916 static int64_t last_delta
;
917 /* If the VM is not running, then do nothing. */
921 cur_time
= cpu_get_clock();
922 cur_icount
= qemu_get_clock(vm_clock
);
923 delta
= cur_icount
- cur_time
;
924 /* FIXME: This is a very crude algorithm, somewhat prone to oscillation. */
926 && last_delta
+ ICOUNT_WOBBLE
< delta
* 2
927 && icount_time_shift
> 0) {
928 /* The guest is getting too far ahead. Slow time down. */
932 && last_delta
- ICOUNT_WOBBLE
> delta
* 2
933 && icount_time_shift
< MAX_ICOUNT_SHIFT
) {
934 /* The guest is getting too far behind. Speed time up. */
938 qemu_icount_bias
= cur_icount
- (qemu_icount
<< icount_time_shift
);
941 static void icount_adjust_rt(void * opaque
)
943 qemu_mod_timer(icount_rt_timer
,
944 qemu_get_clock(rt_clock
) + 1000);
948 static void icount_adjust_vm(void * opaque
)
950 qemu_mod_timer(icount_vm_timer
,
951 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
955 static void init_icount_adjust(void)
957 /* Have both realtime and virtual time triggers for speed adjustment.
958 The realtime trigger catches emulated time passing too slowly,
959 the virtual time trigger catches emulated time passing too fast.
960 Realtime triggers occur even when idle, so use them less frequently
962 icount_rt_timer
= qemu_new_timer(rt_clock
, icount_adjust_rt
, NULL
);
963 qemu_mod_timer(icount_rt_timer
,
964 qemu_get_clock(rt_clock
) + 1000);
965 icount_vm_timer
= qemu_new_timer(vm_clock
, icount_adjust_vm
, NULL
);
966 qemu_mod_timer(icount_vm_timer
,
967 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
970 static struct qemu_alarm_timer alarm_timers
[] = {
973 {"dynticks", ALARM_FLAG_DYNTICKS
, dynticks_start_timer
,
974 dynticks_stop_timer
, dynticks_rearm_timer
, NULL
},
975 /* HPET - if available - is preferred */
976 {"hpet", 0, hpet_start_timer
, hpet_stop_timer
, NULL
, NULL
},
977 /* ...otherwise try RTC */
978 {"rtc", 0, rtc_start_timer
, rtc_stop_timer
, NULL
, NULL
},
980 {"unix", 0, unix_start_timer
, unix_stop_timer
, NULL
, NULL
},
982 {"dynticks", ALARM_FLAG_DYNTICKS
, win32_start_timer
,
983 win32_stop_timer
, win32_rearm_timer
, &alarm_win32_data
},
984 {"win32", 0, win32_start_timer
,
985 win32_stop_timer
, NULL
, &alarm_win32_data
},
990 static void show_available_alarms(void)
994 printf("Available alarm timers, in order of precedence:\n");
995 for (i
= 0; alarm_timers
[i
].name
; i
++)
996 printf("%s\n", alarm_timers
[i
].name
);
999 static void configure_alarms(char const *opt
)
1003 int count
= (sizeof(alarm_timers
) / sizeof(*alarm_timers
)) - 1;
1006 struct qemu_alarm_timer tmp
;
1008 if (!strcmp(opt
, "?")) {
1009 show_available_alarms();
1015 /* Reorder the array */
1016 name
= strtok(arg
, ",");
1018 for (i
= 0; i
< count
&& alarm_timers
[i
].name
; i
++) {
1019 if (!strcmp(alarm_timers
[i
].name
, name
))
1024 fprintf(stderr
, "Unknown clock %s\n", name
);
1033 tmp
= alarm_timers
[i
];
1034 alarm_timers
[i
] = alarm_timers
[cur
];
1035 alarm_timers
[cur
] = tmp
;
1039 name
= strtok(NULL
, ",");
1045 /* Disable remaining timers */
1046 for (i
= cur
; i
< count
; i
++)
1047 alarm_timers
[i
].name
= NULL
;
1049 show_available_alarms();
1054 QEMUClock
*rt_clock
;
1055 QEMUClock
*vm_clock
;
1057 static QEMUTimer
*active_timers
[2];
1059 static QEMUClock
*qemu_new_clock(int type
)
1062 clock
= qemu_mallocz(sizeof(QEMUClock
));
1069 QEMUTimer
*qemu_new_timer(QEMUClock
*clock
, QEMUTimerCB
*cb
, void *opaque
)
1073 ts
= qemu_mallocz(sizeof(QEMUTimer
));
1076 ts
->opaque
= opaque
;
1080 void qemu_free_timer(QEMUTimer
*ts
)
1085 /* stop a timer, but do not dealloc it */
1086 void qemu_del_timer(QEMUTimer
*ts
)
1090 /* NOTE: this code must be signal safe because
1091 qemu_timer_expired() can be called from a signal. */
1092 pt
= &active_timers
[ts
->clock
->type
];
1105 /* modify the current timer so that it will be fired when current_time
1106 >= expire_time. The corresponding callback will be called. */
1107 void qemu_mod_timer(QEMUTimer
*ts
, int64_t expire_time
)
1113 /* add the timer in the sorted list */
1114 /* NOTE: this code must be signal safe because
1115 qemu_timer_expired() can be called from a signal. */
1116 pt
= &active_timers
[ts
->clock
->type
];
1121 if (t
->expire_time
> expire_time
)
1125 ts
->expire_time
= expire_time
;
1129 /* Rearm if necessary */
1130 if (pt
== &active_timers
[ts
->clock
->type
]) {
1131 if ((alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) == 0) {
1132 qemu_rearm_alarm_timer(alarm_timer
);
1134 /* Interrupt execution to force deadline recalculation. */
1135 if (use_icount
&& cpu_single_env
) {
1136 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
1141 int qemu_timer_pending(QEMUTimer
*ts
)
1144 for(t
= active_timers
[ts
->clock
->type
]; t
!= NULL
; t
= t
->next
) {
1151 static inline int qemu_timer_expired(QEMUTimer
*timer_head
, int64_t current_time
)
1155 return (timer_head
->expire_time
<= current_time
);
1158 static void qemu_run_timers(QEMUTimer
**ptimer_head
, int64_t current_time
)
1164 if (!ts
|| ts
->expire_time
> current_time
)
1166 /* remove timer from the list before calling the callback */
1167 *ptimer_head
= ts
->next
;
1170 /* run the callback (the timer list can be modified) */
1175 int64_t qemu_get_clock(QEMUClock
*clock
)
1177 switch(clock
->type
) {
1178 case QEMU_TIMER_REALTIME
:
1179 return get_clock() / 1000000;
1181 case QEMU_TIMER_VIRTUAL
:
1183 return cpu_get_icount();
1185 return cpu_get_clock();
1190 static void init_timers(void)
1193 ticks_per_sec
= QEMU_TIMER_BASE
;
1194 rt_clock
= qemu_new_clock(QEMU_TIMER_REALTIME
);
1195 vm_clock
= qemu_new_clock(QEMU_TIMER_VIRTUAL
);
1199 void qemu_put_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1201 uint64_t expire_time
;
1203 if (qemu_timer_pending(ts
)) {
1204 expire_time
= ts
->expire_time
;
1208 qemu_put_be64(f
, expire_time
);
1211 void qemu_get_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1213 uint64_t expire_time
;
1215 expire_time
= qemu_get_be64(f
);
1216 if (expire_time
!= -1) {
1217 qemu_mod_timer(ts
, expire_time
);
1223 static void timer_save(QEMUFile
*f
, void *opaque
)
1225 if (cpu_ticks_enabled
) {
1226 hw_error("cannot save state if virtual timers are running");
1228 qemu_put_be64(f
, cpu_ticks_offset
);
1229 qemu_put_be64(f
, ticks_per_sec
);
1230 qemu_put_be64(f
, cpu_clock_offset
);
1233 static int timer_load(QEMUFile
*f
, void *opaque
, int version_id
)
1235 if (version_id
!= 1 && version_id
!= 2)
1237 if (cpu_ticks_enabled
) {
1240 cpu_ticks_offset
=qemu_get_be64(f
);
1241 ticks_per_sec
=qemu_get_be64(f
);
1242 if (version_id
== 2) {
1243 cpu_clock_offset
=qemu_get_be64(f
);
1249 void CALLBACK
host_alarm_handler(UINT uTimerID
, UINT uMsg
,
1250 DWORD_PTR dwUser
, DWORD_PTR dw1
, DWORD_PTR dw2
)
1252 static void host_alarm_handler(int host_signum
)
1256 #define DISP_FREQ 1000
1258 static int64_t delta_min
= INT64_MAX
;
1259 static int64_t delta_max
, delta_cum
, last_clock
, delta
, ti
;
1261 ti
= qemu_get_clock(vm_clock
);
1262 if (last_clock
!= 0) {
1263 delta
= ti
- last_clock
;
1264 if (delta
< delta_min
)
1266 if (delta
> delta_max
)
1269 if (++count
== DISP_FREQ
) {
1270 printf("timer: min=%" PRId64
" us max=%" PRId64
" us avg=%" PRId64
" us avg_freq=%0.3f Hz\n",
1271 muldiv64(delta_min
, 1000000, ticks_per_sec
),
1272 muldiv64(delta_max
, 1000000, ticks_per_sec
),
1273 muldiv64(delta_cum
, 1000000 / DISP_FREQ
, ticks_per_sec
),
1274 (double)ticks_per_sec
/ ((double)delta_cum
/ DISP_FREQ
));
1276 delta_min
= INT64_MAX
;
1284 if (alarm_has_dynticks(alarm_timer
) ||
1286 qemu_timer_expired(active_timers
[QEMU_TIMER_VIRTUAL
],
1287 qemu_get_clock(vm_clock
))) ||
1288 qemu_timer_expired(active_timers
[QEMU_TIMER_REALTIME
],
1289 qemu_get_clock(rt_clock
))) {
1291 struct qemu_alarm_win32
*data
= ((struct qemu_alarm_timer
*)dwUser
)->priv
;
1292 SetEvent(data
->host_alarm
);
1294 CPUState
*env
= next_cpu
;
1296 alarm_timer
->flags
|= ALARM_FLAG_EXPIRED
;
1299 /* stop the currently executing cpu because a timer occured */
1300 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
1302 if (env
->kqemu_enabled
) {
1303 kqemu_cpu_interrupt(env
);
1311 static int64_t qemu_next_deadline(void)
1315 if (active_timers
[QEMU_TIMER_VIRTUAL
]) {
1316 delta
= active_timers
[QEMU_TIMER_VIRTUAL
]->expire_time
-
1317 qemu_get_clock(vm_clock
);
1319 /* To avoid problems with overflow limit this to 2^32. */
1329 static uint64_t qemu_next_deadline_dyntick(void)
1337 delta
= (qemu_next_deadline() + 999) / 1000;
1339 if (active_timers
[QEMU_TIMER_REALTIME
]) {
1340 rtdelta
= (active_timers
[QEMU_TIMER_REALTIME
]->expire_time
-
1341 qemu_get_clock(rt_clock
))*1000;
1342 if (rtdelta
< delta
)
1346 if (delta
< MIN_TIMER_REARM_US
)
1347 delta
= MIN_TIMER_REARM_US
;
1354 #if defined(__linux__)
1356 #define RTC_FREQ 1024
1358 static void enable_sigio_timer(int fd
)
1360 struct sigaction act
;
1363 sigfillset(&act
.sa_mask
);
1365 act
.sa_handler
= host_alarm_handler
;
1367 sigaction(SIGIO
, &act
, NULL
);
1368 fcntl(fd
, F_SETFL
, O_ASYNC
);
1369 fcntl(fd
, F_SETOWN
, getpid());
1372 static int hpet_start_timer(struct qemu_alarm_timer
*t
)
1374 struct hpet_info info
;
1377 fd
= open("/dev/hpet", O_RDONLY
);
1382 r
= ioctl(fd
, HPET_IRQFREQ
, RTC_FREQ
);
1384 fprintf(stderr
, "Could not configure '/dev/hpet' to have a 1024Hz timer. This is not a fatal\n"
1385 "error, but for better emulation accuracy type:\n"
1386 "'echo 1024 > /proc/sys/dev/hpet/max-user-freq' as root.\n");
1390 /* Check capabilities */
1391 r
= ioctl(fd
, HPET_INFO
, &info
);
1395 /* Enable periodic mode */
1396 r
= ioctl(fd
, HPET_EPI
, 0);
1397 if (info
.hi_flags
&& (r
< 0))
1400 /* Enable interrupt */
1401 r
= ioctl(fd
, HPET_IE_ON
, 0);
1405 enable_sigio_timer(fd
);
1406 t
->priv
= (void *)(long)fd
;
1414 static void hpet_stop_timer(struct qemu_alarm_timer
*t
)
1416 int fd
= (long)t
->priv
;
1421 static int rtc_start_timer(struct qemu_alarm_timer
*t
)
1424 unsigned long current_rtc_freq
= 0;
1426 TFR(rtc_fd
= open("/dev/rtc", O_RDONLY
));
1429 ioctl(rtc_fd
, RTC_IRQP_READ
, ¤t_rtc_freq
);
1430 if (current_rtc_freq
!= RTC_FREQ
&&
1431 ioctl(rtc_fd
, RTC_IRQP_SET
, RTC_FREQ
) < 0) {
1432 fprintf(stderr
, "Could not configure '/dev/rtc' to have a 1024 Hz timer. This is not a fatal\n"
1433 "error, but for better emulation accuracy either use a 2.6 host Linux kernel or\n"
1434 "type 'echo 1024 > /proc/sys/dev/rtc/max-user-freq' as root.\n");
1437 if (ioctl(rtc_fd
, RTC_PIE_ON
, 0) < 0) {
1443 enable_sigio_timer(rtc_fd
);
1445 t
->priv
= (void *)(long)rtc_fd
;
1450 static void rtc_stop_timer(struct qemu_alarm_timer
*t
)
1452 int rtc_fd
= (long)t
->priv
;
1457 static int dynticks_start_timer(struct qemu_alarm_timer
*t
)
1461 struct sigaction act
;
1463 sigfillset(&act
.sa_mask
);
1465 act
.sa_handler
= host_alarm_handler
;
1467 sigaction(SIGALRM
, &act
, NULL
);
1469 ev
.sigev_value
.sival_int
= 0;
1470 ev
.sigev_notify
= SIGEV_SIGNAL
;
1471 ev
.sigev_signo
= SIGALRM
;
1473 if (timer_create(CLOCK_REALTIME
, &ev
, &host_timer
)) {
1474 perror("timer_create");
1476 /* disable dynticks */
1477 fprintf(stderr
, "Dynamic Ticks disabled\n");
1482 t
->priv
= (void *)host_timer
;
1487 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
)
1489 timer_t host_timer
= (timer_t
)t
->priv
;
1491 timer_delete(host_timer
);
1494 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
)
1496 timer_t host_timer
= (timer_t
)t
->priv
;
1497 struct itimerspec timeout
;
1498 int64_t nearest_delta_us
= INT64_MAX
;
1501 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1502 !active_timers
[QEMU_TIMER_VIRTUAL
])
1505 nearest_delta_us
= qemu_next_deadline_dyntick();
1507 /* check whether a timer is already running */
1508 if (timer_gettime(host_timer
, &timeout
)) {
1510 fprintf(stderr
, "Internal timer error: aborting\n");
1513 current_us
= timeout
.it_value
.tv_sec
* 1000000 + timeout
.it_value
.tv_nsec
/1000;
1514 if (current_us
&& current_us
<= nearest_delta_us
)
1517 timeout
.it_interval
.tv_sec
= 0;
1518 timeout
.it_interval
.tv_nsec
= 0; /* 0 for one-shot timer */
1519 timeout
.it_value
.tv_sec
= nearest_delta_us
/ 1000000;
1520 timeout
.it_value
.tv_nsec
= (nearest_delta_us
% 1000000) * 1000;
1521 if (timer_settime(host_timer
, 0 /* RELATIVE */, &timeout
, NULL
)) {
1523 fprintf(stderr
, "Internal timer error: aborting\n");
1528 #endif /* defined(__linux__) */
1530 static int unix_start_timer(struct qemu_alarm_timer
*t
)
1532 struct sigaction act
;
1533 struct itimerval itv
;
1537 sigfillset(&act
.sa_mask
);
1539 act
.sa_handler
= host_alarm_handler
;
1541 sigaction(SIGALRM
, &act
, NULL
);
1543 itv
.it_interval
.tv_sec
= 0;
1544 /* for i386 kernel 2.6 to get 1 ms */
1545 itv
.it_interval
.tv_usec
= 999;
1546 itv
.it_value
.tv_sec
= 0;
1547 itv
.it_value
.tv_usec
= 10 * 1000;
1549 err
= setitimer(ITIMER_REAL
, &itv
, NULL
);
1556 static void unix_stop_timer(struct qemu_alarm_timer
*t
)
1558 struct itimerval itv
;
1560 memset(&itv
, 0, sizeof(itv
));
1561 setitimer(ITIMER_REAL
, &itv
, NULL
);
1564 #endif /* !defined(_WIN32) */
1568 static int win32_start_timer(struct qemu_alarm_timer
*t
)
1571 struct qemu_alarm_win32
*data
= t
->priv
;
1574 data
->host_alarm
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1575 if (!data
->host_alarm
) {
1576 perror("Failed CreateEvent");
1580 memset(&tc
, 0, sizeof(tc
));
1581 timeGetDevCaps(&tc
, sizeof(tc
));
1583 if (data
->period
< tc
.wPeriodMin
)
1584 data
->period
= tc
.wPeriodMin
;
1586 timeBeginPeriod(data
->period
);
1588 flags
= TIME_CALLBACK_FUNCTION
;
1589 if (alarm_has_dynticks(t
))
1590 flags
|= TIME_ONESHOT
;
1592 flags
|= TIME_PERIODIC
;
1594 data
->timerId
= timeSetEvent(1, // interval (ms)
1595 data
->period
, // resolution
1596 host_alarm_handler
, // function
1597 (DWORD
)t
, // parameter
1600 if (!data
->timerId
) {
1601 perror("Failed to initialize win32 alarm timer");
1603 timeEndPeriod(data
->period
);
1604 CloseHandle(data
->host_alarm
);
1608 qemu_add_wait_object(data
->host_alarm
, NULL
, NULL
);
1613 static void win32_stop_timer(struct qemu_alarm_timer
*t
)
1615 struct qemu_alarm_win32
*data
= t
->priv
;
1617 timeKillEvent(data
->timerId
);
1618 timeEndPeriod(data
->period
);
1620 CloseHandle(data
->host_alarm
);
1623 static void win32_rearm_timer(struct qemu_alarm_timer
*t
)
1625 struct qemu_alarm_win32
*data
= t
->priv
;
1626 uint64_t nearest_delta_us
;
1628 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1629 !active_timers
[QEMU_TIMER_VIRTUAL
])
1632 nearest_delta_us
= qemu_next_deadline_dyntick();
1633 nearest_delta_us
/= 1000;
1635 timeKillEvent(data
->timerId
);
1637 data
->timerId
= timeSetEvent(1,
1641 TIME_ONESHOT
| TIME_PERIODIC
);
1643 if (!data
->timerId
) {
1644 perror("Failed to re-arm win32 alarm timer");
1646 timeEndPeriod(data
->period
);
1647 CloseHandle(data
->host_alarm
);
1654 static void init_timer_alarm(void)
1656 struct qemu_alarm_timer
*t
;
1659 for (i
= 0; alarm_timers
[i
].name
; i
++) {
1660 t
= &alarm_timers
[i
];
1668 fprintf(stderr
, "Unable to find any suitable alarm timer.\n");
1669 fprintf(stderr
, "Terminating\n");
1676 static void quit_timers(void)
1678 alarm_timer
->stop(alarm_timer
);
1682 /***********************************************************/
1683 /* host time/date access */
1684 void qemu_get_timedate(struct tm
*tm
, int offset
)
1691 if (rtc_date_offset
== -1) {
1695 ret
= localtime(&ti
);
1697 ti
-= rtc_date_offset
;
1701 memcpy(tm
, ret
, sizeof(struct tm
));
1704 int qemu_timedate_diff(struct tm
*tm
)
1708 if (rtc_date_offset
== -1)
1710 seconds
= mktimegm(tm
);
1712 seconds
= mktime(tm
);
1714 seconds
= mktimegm(tm
) + rtc_date_offset
;
1716 return seconds
- time(NULL
);
1719 /***********************************************************/
1720 /* character device */
1722 static void qemu_chr_event(CharDriverState
*s
, int event
)
1726 s
->chr_event(s
->handler_opaque
, event
);
1729 static void qemu_chr_reset_bh(void *opaque
)
1731 CharDriverState
*s
= opaque
;
1732 qemu_chr_event(s
, CHR_EVENT_RESET
);
1733 qemu_bh_delete(s
->bh
);
1737 void qemu_chr_reset(CharDriverState
*s
)
1739 if (s
->bh
== NULL
) {
1740 s
->bh
= qemu_bh_new(qemu_chr_reset_bh
, s
);
1741 qemu_bh_schedule(s
->bh
);
1745 int qemu_chr_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
1747 return s
->chr_write(s
, buf
, len
);
1750 int qemu_chr_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
1754 return s
->chr_ioctl(s
, cmd
, arg
);
1757 int qemu_chr_can_read(CharDriverState
*s
)
1759 if (!s
->chr_can_read
)
1761 return s
->chr_can_read(s
->handler_opaque
);
1764 void qemu_chr_read(CharDriverState
*s
, uint8_t *buf
, int len
)
1766 s
->chr_read(s
->handler_opaque
, buf
, len
);
1769 void qemu_chr_accept_input(CharDriverState
*s
)
1771 if (s
->chr_accept_input
)
1772 s
->chr_accept_input(s
);
1775 void qemu_chr_printf(CharDriverState
*s
, const char *fmt
, ...)
1780 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
1781 qemu_chr_write(s
, (uint8_t *)buf
, strlen(buf
));
1785 void qemu_chr_send_event(CharDriverState
*s
, int event
)
1787 if (s
->chr_send_event
)
1788 s
->chr_send_event(s
, event
);
1791 void qemu_chr_add_handlers(CharDriverState
*s
,
1792 IOCanRWHandler
*fd_can_read
,
1793 IOReadHandler
*fd_read
,
1794 IOEventHandler
*fd_event
,
1797 s
->chr_can_read
= fd_can_read
;
1798 s
->chr_read
= fd_read
;
1799 s
->chr_event
= fd_event
;
1800 s
->handler_opaque
= opaque
;
1801 if (s
->chr_update_read_handler
)
1802 s
->chr_update_read_handler(s
);
1805 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1810 static CharDriverState
*qemu_chr_open_null(void)
1812 CharDriverState
*chr
;
1814 chr
= qemu_mallocz(sizeof(CharDriverState
));
1817 chr
->chr_write
= null_chr_write
;
1821 /* MUX driver for serial I/O splitting */
1822 static int term_timestamps
;
1823 static int64_t term_timestamps_start
;
1825 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
1826 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
1828 IOCanRWHandler
*chr_can_read
[MAX_MUX
];
1829 IOReadHandler
*chr_read
[MAX_MUX
];
1830 IOEventHandler
*chr_event
[MAX_MUX
];
1831 void *ext_opaque
[MAX_MUX
];
1832 CharDriverState
*drv
;
1833 unsigned char buffer
[MUX_BUFFER_SIZE
];
1837 int term_got_escape
;
1842 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1844 MuxDriver
*d
= chr
->opaque
;
1846 if (!term_timestamps
) {
1847 ret
= d
->drv
->chr_write(d
->drv
, buf
, len
);
1852 for(i
= 0; i
< len
; i
++) {
1853 ret
+= d
->drv
->chr_write(d
->drv
, buf
+i
, 1);
1854 if (buf
[i
] == '\n') {
1860 if (term_timestamps_start
== -1)
1861 term_timestamps_start
= ti
;
1862 ti
-= term_timestamps_start
;
1863 secs
= ti
/ 1000000000;
1864 snprintf(buf1
, sizeof(buf1
),
1865 "[%02d:%02d:%02d.%03d] ",
1869 (int)((ti
/ 1000000) % 1000));
1870 d
->drv
->chr_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
1877 static char *mux_help
[] = {
1878 "% h print this help\n\r",
1879 "% x exit emulator\n\r",
1880 "% s save disk data back to file (if -snapshot)\n\r",
1881 "% t toggle console timestamps\n\r"
1882 "% b send break (magic sysrq)\n\r",
1883 "% c switch between console and monitor\n\r",
1888 static int term_escape_char
= 0x01; /* ctrl-a is used for escape */
1889 static void mux_print_help(CharDriverState
*chr
)
1892 char ebuf
[15] = "Escape-Char";
1893 char cbuf
[50] = "\n\r";
1895 if (term_escape_char
> 0 && term_escape_char
< 26) {
1896 sprintf(cbuf
,"\n\r");
1897 sprintf(ebuf
,"C-%c", term_escape_char
- 1 + 'a');
1899 sprintf(cbuf
,"\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
1902 chr
->chr_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
1903 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
1904 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
1905 if (mux_help
[i
][j
] == '%')
1906 chr
->chr_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
1908 chr
->chr_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
1913 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
1915 if (d
->term_got_escape
) {
1916 d
->term_got_escape
= 0;
1917 if (ch
== term_escape_char
)
1922 mux_print_help(chr
);
1926 char *term
= "QEMU: Terminated\n\r";
1927 chr
->chr_write(chr
,(uint8_t *)term
,strlen(term
));
1934 for (i
= 0; i
< nb_drives
; i
++) {
1935 bdrv_commit(drives_table
[i
].bdrv
);
1940 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
1943 /* Switch to the next registered device */
1945 if (chr
->focus
>= d
->mux_cnt
)
1949 term_timestamps
= !term_timestamps
;
1950 term_timestamps_start
= -1;
1953 } else if (ch
== term_escape_char
) {
1954 d
->term_got_escape
= 1;
1962 static void mux_chr_accept_input(CharDriverState
*chr
)
1965 MuxDriver
*d
= chr
->opaque
;
1967 while (d
->prod
!= d
->cons
&&
1968 d
->chr_can_read
[m
] &&
1969 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
1970 d
->chr_read
[m
](d
->ext_opaque
[m
],
1971 &d
->buffer
[d
->cons
++ & MUX_BUFFER_MASK
], 1);
1975 static int mux_chr_can_read(void *opaque
)
1977 CharDriverState
*chr
= opaque
;
1978 MuxDriver
*d
= chr
->opaque
;
1980 if ((d
->prod
- d
->cons
) < MUX_BUFFER_SIZE
)
1982 if (d
->chr_can_read
[chr
->focus
])
1983 return d
->chr_can_read
[chr
->focus
](d
->ext_opaque
[chr
->focus
]);
1987 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
1989 CharDriverState
*chr
= opaque
;
1990 MuxDriver
*d
= chr
->opaque
;
1994 mux_chr_accept_input (opaque
);
1996 for(i
= 0; i
< size
; i
++)
1997 if (mux_proc_byte(chr
, d
, buf
[i
])) {
1998 if (d
->prod
== d
->cons
&&
1999 d
->chr_can_read
[m
] &&
2000 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
2001 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
2003 d
->buffer
[d
->prod
++ & MUX_BUFFER_MASK
] = buf
[i
];
2007 static void mux_chr_event(void *opaque
, int event
)
2009 CharDriverState
*chr
= opaque
;
2010 MuxDriver
*d
= chr
->opaque
;
2013 /* Send the event to all registered listeners */
2014 for (i
= 0; i
< d
->mux_cnt
; i
++)
2015 if (d
->chr_event
[i
])
2016 d
->chr_event
[i
](d
->ext_opaque
[i
], event
);
2019 static void mux_chr_update_read_handler(CharDriverState
*chr
)
2021 MuxDriver
*d
= chr
->opaque
;
2023 if (d
->mux_cnt
>= MAX_MUX
) {
2024 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
2027 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
2028 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
2029 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
2030 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
2031 /* Fix up the real driver with mux routines */
2032 if (d
->mux_cnt
== 0) {
2033 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
2034 mux_chr_event
, chr
);
2036 chr
->focus
= d
->mux_cnt
;
2040 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
2042 CharDriverState
*chr
;
2045 chr
= qemu_mallocz(sizeof(CharDriverState
));
2048 d
= qemu_mallocz(sizeof(MuxDriver
));
2057 chr
->chr_write
= mux_chr_write
;
2058 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
2059 chr
->chr_accept_input
= mux_chr_accept_input
;
2066 static void socket_cleanup(void)
2071 static int socket_init(void)
2076 ret
= WSAStartup(MAKEWORD(2,2), &Data
);
2078 err
= WSAGetLastError();
2079 fprintf(stderr
, "WSAStartup: %d\n", err
);
2082 atexit(socket_cleanup
);
2086 static int send_all(int fd
, const uint8_t *buf
, int len1
)
2092 ret
= send(fd
, buf
, len
, 0);
2095 errno
= WSAGetLastError();
2096 if (errno
!= WSAEWOULDBLOCK
) {
2099 } else if (ret
== 0) {
2109 void socket_set_nonblock(int fd
)
2111 unsigned long opt
= 1;
2112 ioctlsocket(fd
, FIONBIO
, &opt
);
2117 static int unix_write(int fd
, const uint8_t *buf
, int len1
)
2123 ret
= write(fd
, buf
, len
);
2125 if (errno
!= EINTR
&& errno
!= EAGAIN
)
2127 } else if (ret
== 0) {
2137 static inline int send_all(int fd
, const uint8_t *buf
, int len1
)
2139 return unix_write(fd
, buf
, len1
);
2142 void socket_set_nonblock(int fd
)
2145 f
= fcntl(fd
, F_GETFL
);
2146 fcntl(fd
, F_SETFL
, f
| O_NONBLOCK
);
2148 #endif /* !_WIN32 */
2157 #define STDIO_MAX_CLIENTS 1
2158 static int stdio_nb_clients
= 0;
2160 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2162 FDCharDriver
*s
= chr
->opaque
;
2163 return unix_write(s
->fd_out
, buf
, len
);
2166 static int fd_chr_read_poll(void *opaque
)
2168 CharDriverState
*chr
= opaque
;
2169 FDCharDriver
*s
= chr
->opaque
;
2171 s
->max_size
= qemu_chr_can_read(chr
);
2175 static void fd_chr_read(void *opaque
)
2177 CharDriverState
*chr
= opaque
;
2178 FDCharDriver
*s
= chr
->opaque
;
2183 if (len
> s
->max_size
)
2187 size
= read(s
->fd_in
, buf
, len
);
2189 /* FD has been closed. Remove it from the active list. */
2190 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2194 qemu_chr_read(chr
, buf
, size
);
2198 static void fd_chr_update_read_handler(CharDriverState
*chr
)
2200 FDCharDriver
*s
= chr
->opaque
;
2202 if (s
->fd_in
>= 0) {
2203 if (nographic
&& s
->fd_in
== 0) {
2205 qemu_set_fd_handler2(s
->fd_in
, fd_chr_read_poll
,
2206 fd_chr_read
, NULL
, chr
);
2211 static void fd_chr_close(struct CharDriverState
*chr
)
2213 FDCharDriver
*s
= chr
->opaque
;
2215 if (s
->fd_in
>= 0) {
2216 if (nographic
&& s
->fd_in
== 0) {
2218 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2225 /* open a character device to a unix fd */
2226 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
2228 CharDriverState
*chr
;
2231 chr
= qemu_mallocz(sizeof(CharDriverState
));
2234 s
= qemu_mallocz(sizeof(FDCharDriver
));
2242 chr
->chr_write
= fd_chr_write
;
2243 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
2244 chr
->chr_close
= fd_chr_close
;
2246 qemu_chr_reset(chr
);
2251 static CharDriverState
*qemu_chr_open_file_out(const char *file_out
)
2255 TFR(fd_out
= open(file_out
, O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
, 0666));
2258 return qemu_chr_open_fd(-1, fd_out
);
2261 static CharDriverState
*qemu_chr_open_pipe(const char *filename
)
2264 char filename_in
[256], filename_out
[256];
2266 snprintf(filename_in
, 256, "%s.in", filename
);
2267 snprintf(filename_out
, 256, "%s.out", filename
);
2268 TFR(fd_in
= open(filename_in
, O_RDWR
| O_BINARY
));
2269 TFR(fd_out
= open(filename_out
, O_RDWR
| O_BINARY
));
2270 if (fd_in
< 0 || fd_out
< 0) {
2275 TFR(fd_in
= fd_out
= open(filename
, O_RDWR
| O_BINARY
));
2279 return qemu_chr_open_fd(fd_in
, fd_out
);
2283 /* for STDIO, we handle the case where several clients use it
2286 #define TERM_FIFO_MAX_SIZE 1
2288 static uint8_t term_fifo
[TERM_FIFO_MAX_SIZE
];
2289 static int term_fifo_size
;
2291 static int stdio_read_poll(void *opaque
)
2293 CharDriverState
*chr
= opaque
;
2295 /* try to flush the queue if needed */
2296 if (term_fifo_size
!= 0 && qemu_chr_can_read(chr
) > 0) {
2297 qemu_chr_read(chr
, term_fifo
, 1);
2300 /* see if we can absorb more chars */
2301 if (term_fifo_size
== 0)
2307 static void stdio_read(void *opaque
)
2311 CharDriverState
*chr
= opaque
;
2313 size
= read(0, buf
, 1);
2315 /* stdin has been closed. Remove it from the active list. */
2316 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2320 if (qemu_chr_can_read(chr
) > 0) {
2321 qemu_chr_read(chr
, buf
, 1);
2322 } else if (term_fifo_size
== 0) {
2323 term_fifo
[term_fifo_size
++] = buf
[0];
2328 /* init terminal so that we can grab keys */
2329 static struct termios oldtty
;
2330 static int old_fd0_flags
;
2331 static int term_atexit_done
;
2333 static void term_exit(void)
2335 tcsetattr (0, TCSANOW
, &oldtty
);
2336 fcntl(0, F_SETFL
, old_fd0_flags
);
2339 static void term_init(void)
2343 tcgetattr (0, &tty
);
2345 old_fd0_flags
= fcntl(0, F_GETFL
);
2347 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2348 |INLCR
|IGNCR
|ICRNL
|IXON
);
2349 tty
.c_oflag
|= OPOST
;
2350 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
2351 /* if graphical mode, we allow Ctrl-C handling */
2353 tty
.c_lflag
&= ~ISIG
;
2354 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
2357 tty
.c_cc
[VTIME
] = 0;
2359 tcsetattr (0, TCSANOW
, &tty
);
2361 if (!term_atexit_done
++)
2364 fcntl(0, F_SETFL
, O_NONBLOCK
);
2367 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
2371 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2375 static CharDriverState
*qemu_chr_open_stdio(void)
2377 CharDriverState
*chr
;
2379 if (stdio_nb_clients
>= STDIO_MAX_CLIENTS
)
2381 chr
= qemu_chr_open_fd(0, 1);
2382 chr
->chr_close
= qemu_chr_close_stdio
;
2383 qemu_set_fd_handler2(0, stdio_read_poll
, stdio_read
, NULL
, chr
);
2391 /* Once Solaris has openpty(), this is going to be removed. */
2392 int openpty(int *amaster
, int *aslave
, char *name
,
2393 struct termios
*termp
, struct winsize
*winp
)
2396 int mfd
= -1, sfd
= -1;
2398 *amaster
= *aslave
= -1;
2400 mfd
= open("/dev/ptmx", O_RDWR
| O_NOCTTY
);
2404 if (grantpt(mfd
) == -1 || unlockpt(mfd
) == -1)
2407 if ((slave
= ptsname(mfd
)) == NULL
)
2410 if ((sfd
= open(slave
, O_RDONLY
| O_NOCTTY
)) == -1)
2413 if (ioctl(sfd
, I_PUSH
, "ptem") == -1 ||
2414 (termp
!= NULL
&& tcgetattr(sfd
, termp
) < 0))
2422 ioctl(sfd
, TIOCSWINSZ
, winp
);
2433 void cfmakeraw (struct termios
*termios_p
)
2435 termios_p
->c_iflag
&=
2436 ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
|INLCR
|IGNCR
|ICRNL
|IXON
);
2437 termios_p
->c_oflag
&= ~OPOST
;
2438 termios_p
->c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|ISIG
|IEXTEN
);
2439 termios_p
->c_cflag
&= ~(CSIZE
|PARENB
);
2440 termios_p
->c_cflag
|= CS8
;
2442 termios_p
->c_cc
[VMIN
] = 0;
2443 termios_p
->c_cc
[VTIME
] = 0;
2447 #if defined(__linux__) || defined(__sun__)
2448 static CharDriverState
*qemu_chr_open_pty(void)
2451 int master_fd
, slave_fd
;
2453 if (openpty(&master_fd
, &slave_fd
, NULL
, NULL
, NULL
) < 0) {
2457 /* Set raw attributes on the pty. */
2459 tcsetattr(slave_fd
, TCSAFLUSH
, &tty
);
2461 fprintf(stderr
, "char device redirected to %s\n", ptsname(master_fd
));
2462 return qemu_chr_open_fd(master_fd
, master_fd
);
2465 static void tty_serial_init(int fd
, int speed
,
2466 int parity
, int data_bits
, int stop_bits
)
2472 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
2473 speed
, parity
, data_bits
, stop_bits
);
2475 tcgetattr (fd
, &tty
);
2478 if (speed
<= 50 * MARGIN
)
2480 else if (speed
<= 75 * MARGIN
)
2482 else if (speed
<= 300 * MARGIN
)
2484 else if (speed
<= 600 * MARGIN
)
2486 else if (speed
<= 1200 * MARGIN
)
2488 else if (speed
<= 2400 * MARGIN
)
2490 else if (speed
<= 4800 * MARGIN
)
2492 else if (speed
<= 9600 * MARGIN
)
2494 else if (speed
<= 19200 * MARGIN
)
2496 else if (speed
<= 38400 * MARGIN
)
2498 else if (speed
<= 57600 * MARGIN
)
2500 else if (speed
<= 115200 * MARGIN
)
2505 cfsetispeed(&tty
, spd
);
2506 cfsetospeed(&tty
, spd
);
2508 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2509 |INLCR
|IGNCR
|ICRNL
|IXON
);
2510 tty
.c_oflag
|= OPOST
;
2511 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
2512 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
2533 tty
.c_cflag
|= PARENB
;
2536 tty
.c_cflag
|= PARENB
| PARODD
;
2540 tty
.c_cflag
|= CSTOPB
;
2542 tcsetattr (fd
, TCSANOW
, &tty
);
2545 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2547 FDCharDriver
*s
= chr
->opaque
;
2550 case CHR_IOCTL_SERIAL_SET_PARAMS
:
2552 QEMUSerialSetParams
*ssp
= arg
;
2553 tty_serial_init(s
->fd_in
, ssp
->speed
, ssp
->parity
,
2554 ssp
->data_bits
, ssp
->stop_bits
);
2557 case CHR_IOCTL_SERIAL_SET_BREAK
:
2559 int enable
= *(int *)arg
;
2561 tcsendbreak(s
->fd_in
, 1);
2570 static CharDriverState
*qemu_chr_open_tty(const char *filename
)
2572 CharDriverState
*chr
;
2575 TFR(fd
= open(filename
, O_RDWR
| O_NONBLOCK
));
2576 tty_serial_init(fd
, 115200, 'N', 8, 1);
2577 chr
= qemu_chr_open_fd(fd
, fd
);
2582 chr
->chr_ioctl
= tty_serial_ioctl
;
2583 qemu_chr_reset(chr
);
2586 #else /* ! __linux__ && ! __sun__ */
2587 static CharDriverState
*qemu_chr_open_pty(void)
2591 #endif /* __linux__ || __sun__ */
2593 #if defined(__linux__)
2597 } ParallelCharDriver
;
2599 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
2601 if (s
->mode
!= mode
) {
2603 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
2610 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2612 ParallelCharDriver
*drv
= chr
->opaque
;
2617 case CHR_IOCTL_PP_READ_DATA
:
2618 if (ioctl(fd
, PPRDATA
, &b
) < 0)
2620 *(uint8_t *)arg
= b
;
2622 case CHR_IOCTL_PP_WRITE_DATA
:
2623 b
= *(uint8_t *)arg
;
2624 if (ioctl(fd
, PPWDATA
, &b
) < 0)
2627 case CHR_IOCTL_PP_READ_CONTROL
:
2628 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
2630 /* Linux gives only the lowest bits, and no way to know data
2631 direction! For better compatibility set the fixed upper
2633 *(uint8_t *)arg
= b
| 0xc0;
2635 case CHR_IOCTL_PP_WRITE_CONTROL
:
2636 b
= *(uint8_t *)arg
;
2637 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
2640 case CHR_IOCTL_PP_READ_STATUS
:
2641 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
2643 *(uint8_t *)arg
= b
;
2645 case CHR_IOCTL_PP_EPP_READ_ADDR
:
2646 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2647 struct ParallelIOArg
*parg
= arg
;
2648 int n
= read(fd
, parg
->buffer
, parg
->count
);
2649 if (n
!= parg
->count
) {
2654 case CHR_IOCTL_PP_EPP_READ
:
2655 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2656 struct ParallelIOArg
*parg
= arg
;
2657 int n
= read(fd
, parg
->buffer
, parg
->count
);
2658 if (n
!= parg
->count
) {
2663 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
2664 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2665 struct ParallelIOArg
*parg
= arg
;
2666 int n
= write(fd
, parg
->buffer
, parg
->count
);
2667 if (n
!= parg
->count
) {
2672 case CHR_IOCTL_PP_EPP_WRITE
:
2673 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2674 struct ParallelIOArg
*parg
= arg
;
2675 int n
= write(fd
, parg
->buffer
, parg
->count
);
2676 if (n
!= parg
->count
) {
2687 static void pp_close(CharDriverState
*chr
)
2689 ParallelCharDriver
*drv
= chr
->opaque
;
2692 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
2693 ioctl(fd
, PPRELEASE
);
2698 static CharDriverState
*qemu_chr_open_pp(const char *filename
)
2700 CharDriverState
*chr
;
2701 ParallelCharDriver
*drv
;
2704 TFR(fd
= open(filename
, O_RDWR
));
2708 if (ioctl(fd
, PPCLAIM
) < 0) {
2713 drv
= qemu_mallocz(sizeof(ParallelCharDriver
));
2719 drv
->mode
= IEEE1284_MODE_COMPAT
;
2721 chr
= qemu_mallocz(sizeof(CharDriverState
));
2727 chr
->chr_write
= null_chr_write
;
2728 chr
->chr_ioctl
= pp_ioctl
;
2729 chr
->chr_close
= pp_close
;
2732 qemu_chr_reset(chr
);
2736 #endif /* __linux__ */
2742 HANDLE hcom
, hrecv
, hsend
;
2743 OVERLAPPED orecv
, osend
;
2748 #define NSENDBUF 2048
2749 #define NRECVBUF 2048
2750 #define MAXCONNECT 1
2751 #define NTIMEOUT 5000
2753 static int win_chr_poll(void *opaque
);
2754 static int win_chr_pipe_poll(void *opaque
);
2756 static void win_chr_close(CharDriverState
*chr
)
2758 WinCharState
*s
= chr
->opaque
;
2761 CloseHandle(s
->hsend
);
2765 CloseHandle(s
->hrecv
);
2769 CloseHandle(s
->hcom
);
2773 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
2775 qemu_del_polling_cb(win_chr_poll
, chr
);
2778 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
2780 WinCharState
*s
= chr
->opaque
;
2782 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
2787 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2789 fprintf(stderr
, "Failed CreateEvent\n");
2792 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2794 fprintf(stderr
, "Failed CreateEvent\n");
2798 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
2799 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
2800 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
2801 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
2806 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
2807 fprintf(stderr
, "Failed SetupComm\n");
2811 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
2812 size
= sizeof(COMMCONFIG
);
2813 GetDefaultCommConfig(filename
, &comcfg
, &size
);
2814 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
2815 CommConfigDialog(filename
, NULL
, &comcfg
);
2817 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
2818 fprintf(stderr
, "Failed SetCommState\n");
2822 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
2823 fprintf(stderr
, "Failed SetCommMask\n");
2827 cto
.ReadIntervalTimeout
= MAXDWORD
;
2828 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
2829 fprintf(stderr
, "Failed SetCommTimeouts\n");
2833 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
2834 fprintf(stderr
, "Failed ClearCommError\n");
2837 qemu_add_polling_cb(win_chr_poll
, chr
);
2845 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
2847 WinCharState
*s
= chr
->opaque
;
2848 DWORD len
, ret
, size
, err
;
2851 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
2852 s
->osend
.hEvent
= s
->hsend
;
2855 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
2857 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
2859 err
= GetLastError();
2860 if (err
== ERROR_IO_PENDING
) {
2861 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
2879 static int win_chr_read_poll(CharDriverState
*chr
)
2881 WinCharState
*s
= chr
->opaque
;
2883 s
->max_size
= qemu_chr_can_read(chr
);
2887 static void win_chr_readfile(CharDriverState
*chr
)
2889 WinCharState
*s
= chr
->opaque
;
2894 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
2895 s
->orecv
.hEvent
= s
->hrecv
;
2896 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
2898 err
= GetLastError();
2899 if (err
== ERROR_IO_PENDING
) {
2900 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
2905 qemu_chr_read(chr
, buf
, size
);
2909 static void win_chr_read(CharDriverState
*chr
)
2911 WinCharState
*s
= chr
->opaque
;
2913 if (s
->len
> s
->max_size
)
2914 s
->len
= s
->max_size
;
2918 win_chr_readfile(chr
);
2921 static int win_chr_poll(void *opaque
)
2923 CharDriverState
*chr
= opaque
;
2924 WinCharState
*s
= chr
->opaque
;
2928 ClearCommError(s
->hcom
, &comerr
, &status
);
2929 if (status
.cbInQue
> 0) {
2930 s
->len
= status
.cbInQue
;
2931 win_chr_read_poll(chr
);
2938 static CharDriverState
*qemu_chr_open_win(const char *filename
)
2940 CharDriverState
*chr
;
2943 chr
= qemu_mallocz(sizeof(CharDriverState
));
2946 s
= qemu_mallocz(sizeof(WinCharState
));
2952 chr
->chr_write
= win_chr_write
;
2953 chr
->chr_close
= win_chr_close
;
2955 if (win_chr_init(chr
, filename
) < 0) {
2960 qemu_chr_reset(chr
);
2964 static int win_chr_pipe_poll(void *opaque
)
2966 CharDriverState
*chr
= opaque
;
2967 WinCharState
*s
= chr
->opaque
;
2970 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
2973 win_chr_read_poll(chr
);
2980 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
2982 WinCharState
*s
= chr
->opaque
;
2990 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2992 fprintf(stderr
, "Failed CreateEvent\n");
2995 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2997 fprintf(stderr
, "Failed CreateEvent\n");
3001 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
3002 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
3003 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
3005 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
3006 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
3007 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
3012 ZeroMemory(&ov
, sizeof(ov
));
3013 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3014 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
3016 fprintf(stderr
, "Failed ConnectNamedPipe\n");
3020 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
3022 fprintf(stderr
, "Failed GetOverlappedResult\n");
3024 CloseHandle(ov
.hEvent
);
3031 CloseHandle(ov
.hEvent
);
3034 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
3043 static CharDriverState
*qemu_chr_open_win_pipe(const char *filename
)
3045 CharDriverState
*chr
;
3048 chr
= qemu_mallocz(sizeof(CharDriverState
));
3051 s
= qemu_mallocz(sizeof(WinCharState
));
3057 chr
->chr_write
= win_chr_write
;
3058 chr
->chr_close
= win_chr_close
;
3060 if (win_chr_pipe_init(chr
, filename
) < 0) {
3065 qemu_chr_reset(chr
);
3069 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
3071 CharDriverState
*chr
;
3074 chr
= qemu_mallocz(sizeof(CharDriverState
));
3077 s
= qemu_mallocz(sizeof(WinCharState
));
3084 chr
->chr_write
= win_chr_write
;
3085 qemu_chr_reset(chr
);
3089 static CharDriverState
*qemu_chr_open_win_con(const char *filename
)
3091 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
3094 static CharDriverState
*qemu_chr_open_win_file_out(const char *file_out
)
3098 fd_out
= CreateFile(file_out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3099 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3100 if (fd_out
== INVALID_HANDLE_VALUE
)
3103 return qemu_chr_open_win_file(fd_out
);
3105 #endif /* !_WIN32 */
3107 /***********************************************************/
3108 /* UDP Net console */
3112 struct sockaddr_in daddr
;
3119 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3121 NetCharDriver
*s
= chr
->opaque
;
3123 return sendto(s
->fd
, buf
, len
, 0,
3124 (struct sockaddr
*)&s
->daddr
, sizeof(struct sockaddr_in
));
3127 static int udp_chr_read_poll(void *opaque
)
3129 CharDriverState
*chr
= opaque
;
3130 NetCharDriver
*s
= chr
->opaque
;
3132 s
->max_size
= qemu_chr_can_read(chr
);
3134 /* If there were any stray characters in the queue process them
3137 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3138 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3140 s
->max_size
= qemu_chr_can_read(chr
);
3145 static void udp_chr_read(void *opaque
)
3147 CharDriverState
*chr
= opaque
;
3148 NetCharDriver
*s
= chr
->opaque
;
3150 if (s
->max_size
== 0)
3152 s
->bufcnt
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
3153 s
->bufptr
= s
->bufcnt
;
3158 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3159 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3161 s
->max_size
= qemu_chr_can_read(chr
);
3165 static void udp_chr_update_read_handler(CharDriverState
*chr
)
3167 NetCharDriver
*s
= chr
->opaque
;
3170 qemu_set_fd_handler2(s
->fd
, udp_chr_read_poll
,
3171 udp_chr_read
, NULL
, chr
);
3175 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
);
3177 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
);
3179 int parse_host_src_port(struct sockaddr_in
*haddr
,
3180 struct sockaddr_in
*saddr
,
3183 static CharDriverState
*qemu_chr_open_udp(const char *def
)
3185 CharDriverState
*chr
= NULL
;
3186 NetCharDriver
*s
= NULL
;
3188 struct sockaddr_in saddr
;
3190 chr
= qemu_mallocz(sizeof(CharDriverState
));
3193 s
= qemu_mallocz(sizeof(NetCharDriver
));
3197 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
3199 perror("socket(PF_INET, SOCK_DGRAM)");
3203 if (parse_host_src_port(&s
->daddr
, &saddr
, def
) < 0) {
3204 printf("Could not parse: %s\n", def
);
3208 if (bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
)) < 0)
3218 chr
->chr_write
= udp_chr_write
;
3219 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
3232 /***********************************************************/
3233 /* TCP Net console */
3244 static void tcp_chr_accept(void *opaque
);
3246 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3248 TCPCharDriver
*s
= chr
->opaque
;
3250 return send_all(s
->fd
, buf
, len
);
3252 /* XXX: indicate an error ? */
3257 static int tcp_chr_read_poll(void *opaque
)
3259 CharDriverState
*chr
= opaque
;
3260 TCPCharDriver
*s
= chr
->opaque
;
3263 s
->max_size
= qemu_chr_can_read(chr
);
3268 #define IAC_BREAK 243
3269 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
3271 uint8_t *buf
, int *size
)
3273 /* Handle any telnet client's basic IAC options to satisfy char by
3274 * char mode with no echo. All IAC options will be removed from
3275 * the buf and the do_telnetopt variable will be used to track the
3276 * state of the width of the IAC information.
3278 * IAC commands come in sets of 3 bytes with the exception of the
3279 * "IAC BREAK" command and the double IAC.
3285 for (i
= 0; i
< *size
; i
++) {
3286 if (s
->do_telnetopt
> 1) {
3287 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
3288 /* Double IAC means send an IAC */
3292 s
->do_telnetopt
= 1;
3294 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
3295 /* Handle IAC break commands by sending a serial break */
3296 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
3301 if (s
->do_telnetopt
>= 4) {
3302 s
->do_telnetopt
= 1;
3305 if ((unsigned char)buf
[i
] == IAC
) {
3306 s
->do_telnetopt
= 2;
3317 static void tcp_chr_read(void *opaque
)
3319 CharDriverState
*chr
= opaque
;
3320 TCPCharDriver
*s
= chr
->opaque
;
3324 if (!s
->connected
|| s
->max_size
<= 0)
3327 if (len
> s
->max_size
)
3329 size
= recv(s
->fd
, buf
, len
, 0);
3331 /* connection closed */
3333 if (s
->listen_fd
>= 0) {
3334 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3336 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
3339 } else if (size
> 0) {
3340 if (s
->do_telnetopt
)
3341 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
3343 qemu_chr_read(chr
, buf
, size
);
3347 static void tcp_chr_connect(void *opaque
)
3349 CharDriverState
*chr
= opaque
;
3350 TCPCharDriver
*s
= chr
->opaque
;
3353 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
3354 tcp_chr_read
, NULL
, chr
);
3355 qemu_chr_reset(chr
);
3358 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
3359 static void tcp_chr_telnet_init(int fd
)
3362 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
3363 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3364 send(fd
, (char *)buf
, 3, 0);
3365 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3366 send(fd
, (char *)buf
, 3, 0);
3367 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3368 send(fd
, (char *)buf
, 3, 0);
3369 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3370 send(fd
, (char *)buf
, 3, 0);
3373 static void socket_set_nodelay(int fd
)
3376 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, (char *)&val
, sizeof(val
));
3379 static void tcp_chr_accept(void *opaque
)
3381 CharDriverState
*chr
= opaque
;
3382 TCPCharDriver
*s
= chr
->opaque
;
3383 struct sockaddr_in saddr
;
3385 struct sockaddr_un uaddr
;
3387 struct sockaddr
*addr
;
3394 len
= sizeof(uaddr
);
3395 addr
= (struct sockaddr
*)&uaddr
;
3399 len
= sizeof(saddr
);
3400 addr
= (struct sockaddr
*)&saddr
;
3402 fd
= accept(s
->listen_fd
, addr
, &len
);
3403 if (fd
< 0 && errno
!= EINTR
) {
3405 } else if (fd
>= 0) {
3406 if (s
->do_telnetopt
)
3407 tcp_chr_telnet_init(fd
);
3411 socket_set_nonblock(fd
);
3413 socket_set_nodelay(fd
);
3415 qemu_set_fd_handler(s
->listen_fd
, NULL
, NULL
, NULL
);
3416 tcp_chr_connect(chr
);
3419 static void tcp_chr_close(CharDriverState
*chr
)
3421 TCPCharDriver
*s
= chr
->opaque
;
3424 if (s
->listen_fd
>= 0)
3425 closesocket(s
->listen_fd
);
3429 static CharDriverState
*qemu_chr_open_tcp(const char *host_str
,
3433 CharDriverState
*chr
= NULL
;
3434 TCPCharDriver
*s
= NULL
;
3435 int fd
= -1, ret
, err
, val
;
3437 int is_waitconnect
= 1;
3440 struct sockaddr_in saddr
;
3442 struct sockaddr_un uaddr
;
3444 struct sockaddr
*addr
;
3449 addr
= (struct sockaddr
*)&uaddr
;
3450 addrlen
= sizeof(uaddr
);
3451 if (parse_unix_path(&uaddr
, host_str
) < 0)
3456 addr
= (struct sockaddr
*)&saddr
;
3457 addrlen
= sizeof(saddr
);
3458 if (parse_host_port(&saddr
, host_str
) < 0)
3463 while((ptr
= strchr(ptr
,','))) {
3465 if (!strncmp(ptr
,"server",6)) {
3467 } else if (!strncmp(ptr
,"nowait",6)) {
3469 } else if (!strncmp(ptr
,"nodelay",6)) {
3472 printf("Unknown option: %s\n", ptr
);
3479 chr
= qemu_mallocz(sizeof(CharDriverState
));
3482 s
= qemu_mallocz(sizeof(TCPCharDriver
));
3488 fd
= socket(PF_UNIX
, SOCK_STREAM
, 0);
3491 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
3496 if (!is_waitconnect
)
3497 socket_set_nonblock(fd
);
3502 s
->is_unix
= is_unix
;
3503 s
->do_nodelay
= do_nodelay
&& !is_unix
;
3506 chr
->chr_write
= tcp_chr_write
;
3507 chr
->chr_close
= tcp_chr_close
;
3510 /* allow fast reuse */
3514 pstrcpy(path
, sizeof(path
), uaddr
.sun_path
);
3520 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
3523 ret
= bind(fd
, addr
, addrlen
);
3527 ret
= listen(fd
, 0);
3532 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3534 s
->do_telnetopt
= 1;
3537 ret
= connect(fd
, addr
, addrlen
);
3539 err
= socket_error();
3540 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
3541 } else if (err
== EINPROGRESS
) {
3544 } else if (err
== WSAEALREADY
) {
3556 socket_set_nodelay(fd
);
3558 tcp_chr_connect(chr
);
3560 qemu_set_fd_handler(s
->fd
, NULL
, tcp_chr_connect
, chr
);
3563 if (is_listen
&& is_waitconnect
) {
3564 printf("QEMU waiting for connection on: %s\n", host_str
);
3565 tcp_chr_accept(chr
);
3566 socket_set_nonblock(s
->listen_fd
);
3578 CharDriverState
*qemu_chr_open(const char *filename
)
3582 if (!strcmp(filename
, "vc")) {
3583 return text_console_init(&display_state
, 0);
3584 } else if (strstart(filename
, "vc:", &p
)) {
3585 return text_console_init(&display_state
, p
);
3586 } else if (!strcmp(filename
, "null")) {
3587 return qemu_chr_open_null();
3589 if (strstart(filename
, "tcp:", &p
)) {
3590 return qemu_chr_open_tcp(p
, 0, 0);
3592 if (strstart(filename
, "telnet:", &p
)) {
3593 return qemu_chr_open_tcp(p
, 1, 0);
3595 if (strstart(filename
, "udp:", &p
)) {
3596 return qemu_chr_open_udp(p
);
3598 if (strstart(filename
, "mon:", &p
)) {
3599 CharDriverState
*drv
= qemu_chr_open(p
);
3601 drv
= qemu_chr_open_mux(drv
);
3602 monitor_init(drv
, !nographic
);
3605 printf("Unable to open driver: %s\n", p
);
3609 if (strstart(filename
, "unix:", &p
)) {
3610 return qemu_chr_open_tcp(p
, 0, 1);
3611 } else if (strstart(filename
, "file:", &p
)) {
3612 return qemu_chr_open_file_out(p
);
3613 } else if (strstart(filename
, "pipe:", &p
)) {
3614 return qemu_chr_open_pipe(p
);
3615 } else if (!strcmp(filename
, "pty")) {
3616 return qemu_chr_open_pty();
3617 } else if (!strcmp(filename
, "stdio")) {
3618 return qemu_chr_open_stdio();
3620 #if defined(__linux__)
3621 if (strstart(filename
, "/dev/parport", NULL
)) {
3622 return qemu_chr_open_pp(filename
);
3625 #if defined(__linux__) || defined(__sun__)
3626 if (strstart(filename
, "/dev/", NULL
)) {
3627 return qemu_chr_open_tty(filename
);
3631 if (strstart(filename
, "COM", NULL
)) {
3632 return qemu_chr_open_win(filename
);
3634 if (strstart(filename
, "pipe:", &p
)) {
3635 return qemu_chr_open_win_pipe(p
);
3637 if (strstart(filename
, "con:", NULL
)) {
3638 return qemu_chr_open_win_con(filename
);
3640 if (strstart(filename
, "file:", &p
)) {
3641 return qemu_chr_open_win_file_out(p
);
3644 #ifdef CONFIG_BRLAPI
3645 if (!strcmp(filename
, "braille")) {
3646 return chr_baum_init();
3654 void qemu_chr_close(CharDriverState
*chr
)
3657 chr
->chr_close(chr
);
3661 /***********************************************************/
3662 /* network device redirectors */
3664 __attribute__ (( unused
))
3665 static void hex_dump(FILE *f
, const uint8_t *buf
, int size
)
3669 for(i
=0;i
<size
;i
+=16) {
3673 fprintf(f
, "%08x ", i
);
3676 fprintf(f
, " %02x", buf
[i
+j
]);
3681 for(j
=0;j
<len
;j
++) {
3683 if (c
< ' ' || c
> '~')
3685 fprintf(f
, "%c", c
);
3691 static int parse_macaddr(uint8_t *macaddr
, const char *p
)
3698 offset
= strtol(p
, &last_char
, 0);
3699 if (0 == errno
&& '\0' == *last_char
&&
3700 offset
>= 0 && offset
<= 0xFFFFFF) {
3701 macaddr
[3] = (offset
& 0xFF0000) >> 16;
3702 macaddr
[4] = (offset
& 0xFF00) >> 8;
3703 macaddr
[5] = offset
& 0xFF;
3706 for(i
= 0; i
< 6; i
++) {
3707 macaddr
[i
] = strtol(p
, (char **)&p
, 16);
3712 if (*p
!= ':' && *p
!= '-')
3723 static int get_str_sep(char *buf
, int buf_size
, const char **pp
, int sep
)
3728 p1
= strchr(p
, sep
);
3734 if (len
> buf_size
- 1)
3736 memcpy(buf
, p
, len
);
3743 int parse_host_src_port(struct sockaddr_in
*haddr
,
3744 struct sockaddr_in
*saddr
,
3745 const char *input_str
)
3747 char *str
= strdup(input_str
);
3748 char *host_str
= str
;
3753 * Chop off any extra arguments at the end of the string which
3754 * would start with a comma, then fill in the src port information
3755 * if it was provided else use the "any address" and "any port".
3757 if ((ptr
= strchr(str
,',')))
3760 if ((src_str
= strchr(input_str
,'@'))) {
3765 if (parse_host_port(haddr
, host_str
) < 0)
3768 if (!src_str
|| *src_str
== '\0')
3771 if (parse_host_port(saddr
, src_str
) < 0)
3782 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
)
3790 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3792 saddr
->sin_family
= AF_INET
;
3793 if (buf
[0] == '\0') {
3794 saddr
->sin_addr
.s_addr
= 0;
3796 if (isdigit(buf
[0])) {
3797 if (!inet_aton(buf
, &saddr
->sin_addr
))
3800 if ((he
= gethostbyname(buf
)) == NULL
)
3802 saddr
->sin_addr
= *(struct in_addr
*)he
->h_addr
;
3805 port
= strtol(p
, (char **)&r
, 0);
3808 saddr
->sin_port
= htons(port
);
3813 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
)
3818 len
= MIN(108, strlen(str
));
3819 p
= strchr(str
, ',');
3821 len
= MIN(len
, p
- str
);
3823 memset(uaddr
, 0, sizeof(*uaddr
));
3825 uaddr
->sun_family
= AF_UNIX
;
3826 memcpy(uaddr
->sun_path
, str
, len
);
3832 /* find or alloc a new VLAN */
3833 VLANState
*qemu_find_vlan(int id
)
3835 VLANState
**pvlan
, *vlan
;
3836 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
3840 vlan
= qemu_mallocz(sizeof(VLANState
));
3845 pvlan
= &first_vlan
;
3846 while (*pvlan
!= NULL
)
3847 pvlan
= &(*pvlan
)->next
;
3852 VLANClientState
*qemu_new_vlan_client(VLANState
*vlan
,
3853 IOReadHandler
*fd_read
,
3854 IOCanRWHandler
*fd_can_read
,
3857 VLANClientState
*vc
, **pvc
;
3858 vc
= qemu_mallocz(sizeof(VLANClientState
));
3861 vc
->fd_read
= fd_read
;
3862 vc
->fd_can_read
= fd_can_read
;
3863 vc
->opaque
= opaque
;
3867 pvc
= &vlan
->first_client
;
3868 while (*pvc
!= NULL
)
3869 pvc
= &(*pvc
)->next
;
3874 void qemu_del_vlan_client(VLANClientState
*vc
)
3876 VLANClientState
**pvc
= &vc
->vlan
->first_client
;
3878 while (*pvc
!= NULL
)
3884 pvc
= &(*pvc
)->next
;
3887 int qemu_can_send_packet(VLANClientState
*vc1
)
3889 VLANState
*vlan
= vc1
->vlan
;
3890 VLANClientState
*vc
;
3892 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
3894 if (vc
->fd_can_read
&& vc
->fd_can_read(vc
->opaque
))
3901 void qemu_send_packet(VLANClientState
*vc1
, const uint8_t *buf
, int size
)
3903 VLANState
*vlan
= vc1
->vlan
;
3904 VLANClientState
*vc
;
3907 printf("vlan %d send:\n", vlan
->id
);
3908 hex_dump(stdout
, buf
, size
);
3910 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
3912 vc
->fd_read(vc
->opaque
, buf
, size
);
3917 #if defined(CONFIG_SLIRP)
3919 /* slirp network adapter */
3921 static int slirp_inited
;
3922 static VLANClientState
*slirp_vc
;
3924 int slirp_can_output(void)
3926 return !slirp_vc
|| qemu_can_send_packet(slirp_vc
);
3929 void slirp_output(const uint8_t *pkt
, int pkt_len
)
3932 printf("slirp output:\n");
3933 hex_dump(stdout
, pkt
, pkt_len
);
3937 qemu_send_packet(slirp_vc
, pkt
, pkt_len
);
3940 static void slirp_receive(void *opaque
, const uint8_t *buf
, int size
)
3943 printf("slirp input:\n");
3944 hex_dump(stdout
, buf
, size
);
3946 slirp_input(buf
, size
);
3949 static int net_slirp_init(VLANState
*vlan
)
3951 if (!slirp_inited
) {
3955 slirp_vc
= qemu_new_vlan_client(vlan
,
3956 slirp_receive
, NULL
, NULL
);
3957 snprintf(slirp_vc
->info_str
, sizeof(slirp_vc
->info_str
), "user redirector");
3961 static void net_slirp_redir(const char *redir_str
)
3966 struct in_addr guest_addr
;
3967 int host_port
, guest_port
;
3969 if (!slirp_inited
) {
3975 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3977 if (!strcmp(buf
, "tcp")) {
3979 } else if (!strcmp(buf
, "udp")) {
3985 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3987 host_port
= strtol(buf
, &r
, 0);
3991 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3993 if (buf
[0] == '\0') {
3994 pstrcpy(buf
, sizeof(buf
), "10.0.2.15");
3996 if (!inet_aton(buf
, &guest_addr
))
3999 guest_port
= strtol(p
, &r
, 0);
4003 if (slirp_redir(is_udp
, host_port
, guest_addr
, guest_port
) < 0) {
4004 fprintf(stderr
, "qemu: could not set up redirection\n");
4009 fprintf(stderr
, "qemu: syntax: -redir [tcp|udp]:host-port:[guest-host]:guest-port\n");
4017 static void erase_dir(char *dir_name
)
4021 char filename
[1024];
4023 /* erase all the files in the directory */
4024 if ((d
= opendir(dir_name
)) != 0) {
4029 if (strcmp(de
->d_name
, ".") != 0 &&
4030 strcmp(de
->d_name
, "..") != 0) {
4031 snprintf(filename
, sizeof(filename
), "%s/%s",
4032 smb_dir
, de
->d_name
);
4033 if (unlink(filename
) != 0) /* is it a directory? */
4034 erase_dir(filename
);
4042 /* automatic user mode samba server configuration */
4043 static void smb_exit(void)
4048 /* automatic user mode samba server configuration */
4049 static void net_slirp_smb(const char *exported_dir
)
4051 char smb_conf
[1024];
4052 char smb_cmdline
[1024];
4055 if (!slirp_inited
) {
4060 /* XXX: better tmp dir construction */
4061 snprintf(smb_dir
, sizeof(smb_dir
), "/tmp/qemu-smb.%d", getpid());
4062 if (mkdir(smb_dir
, 0700) < 0) {
4063 fprintf(stderr
, "qemu: could not create samba server dir '%s'\n", smb_dir
);
4066 snprintf(smb_conf
, sizeof(smb_conf
), "%s/%s", smb_dir
, "smb.conf");
4068 f
= fopen(smb_conf
, "w");
4070 fprintf(stderr
, "qemu: could not create samba server configuration file '%s'\n", smb_conf
);
4077 "socket address=127.0.0.1\n"
4078 "pid directory=%s\n"
4079 "lock directory=%s\n"
4080 "log file=%s/log.smbd\n"
4081 "smb passwd file=%s/smbpasswd\n"
4082 "security = share\n"
4097 snprintf(smb_cmdline
, sizeof(smb_cmdline
), "%s -s %s",
4098 SMBD_COMMAND
, smb_conf
);
4100 slirp_add_exec(0, smb_cmdline
, 4, 139);
4103 #endif /* !defined(_WIN32) */
4104 void do_info_slirp(void)
4109 #endif /* CONFIG_SLIRP */
4111 #if !defined(_WIN32)
4113 typedef struct TAPState
{
4114 VLANClientState
*vc
;
4116 char down_script
[1024];
4119 static void tap_receive(void *opaque
, const uint8_t *buf
, int size
)
4121 TAPState
*s
= opaque
;
4124 ret
= write(s
->fd
, buf
, size
);
4125 if (ret
< 0 && (errno
== EINTR
|| errno
== EAGAIN
)) {
4132 static void tap_send(void *opaque
)
4134 TAPState
*s
= opaque
;
4141 sbuf
.maxlen
= sizeof(buf
);
4143 size
= getmsg(s
->fd
, NULL
, &sbuf
, &f
) >=0 ? sbuf
.len
: -1;
4145 size
= read(s
->fd
, buf
, sizeof(buf
));
4148 qemu_send_packet(s
->vc
, buf
, size
);
4154 static TAPState
*net_tap_fd_init(VLANState
*vlan
, int fd
)
4158 s
= qemu_mallocz(sizeof(TAPState
));
4162 s
->vc
= qemu_new_vlan_client(vlan
, tap_receive
, NULL
, s
);
4163 qemu_set_fd_handler(s
->fd
, tap_send
, NULL
, s
);
4164 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "tap: fd=%d", fd
);
4168 #if defined (_BSD) || defined (__FreeBSD_kernel__)
4169 static int tap_open(char *ifname
, int ifname_size
)
4175 TFR(fd
= open("/dev/tap", O_RDWR
));
4177 fprintf(stderr
, "warning: could not open /dev/tap: no virtual network emulation\n");
4182 dev
= devname(s
.st_rdev
, S_IFCHR
);
4183 pstrcpy(ifname
, ifname_size
, dev
);
4185 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4188 #elif defined(__sun__)
4189 #define TUNNEWPPA (('T'<<16) | 0x0001)
4191 * Allocate TAP device, returns opened fd.
4192 * Stores dev name in the first arg(must be large enough).
4194 int tap_alloc(char *dev
)
4196 int tap_fd
, if_fd
, ppa
= -1;
4197 static int ip_fd
= 0;
4200 static int arp_fd
= 0;
4201 int ip_muxid
, arp_muxid
;
4202 struct strioctl strioc_if
, strioc_ppa
;
4203 int link_type
= I_PLINK
;;
4205 char actual_name
[32] = "";
4207 memset(&ifr
, 0x0, sizeof(ifr
));
4211 while( *ptr
&& !isdigit((int)*ptr
) ) ptr
++;
4215 /* Check if IP device was opened */
4219 TFR(ip_fd
= open("/dev/udp", O_RDWR
, 0));
4221 syslog(LOG_ERR
, "Can't open /dev/ip (actually /dev/udp)");
4225 TFR(tap_fd
= open("/dev/tap", O_RDWR
, 0));
4227 syslog(LOG_ERR
, "Can't open /dev/tap");
4231 /* Assign a new PPA and get its unit number. */
4232 strioc_ppa
.ic_cmd
= TUNNEWPPA
;
4233 strioc_ppa
.ic_timout
= 0;
4234 strioc_ppa
.ic_len
= sizeof(ppa
);
4235 strioc_ppa
.ic_dp
= (char *)&ppa
;
4236 if ((ppa
= ioctl (tap_fd
, I_STR
, &strioc_ppa
)) < 0)
4237 syslog (LOG_ERR
, "Can't assign new interface");
4239 TFR(if_fd
= open("/dev/tap", O_RDWR
, 0));
4241 syslog(LOG_ERR
, "Can't open /dev/tap (2)");
4244 if(ioctl(if_fd
, I_PUSH
, "ip") < 0){
4245 syslog(LOG_ERR
, "Can't push IP module");
4249 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) < 0)
4250 syslog(LOG_ERR
, "Can't get flags\n");
4252 snprintf (actual_name
, 32, "tap%d", ppa
);
4253 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4256 /* Assign ppa according to the unit number returned by tun device */
4258 if (ioctl (if_fd
, SIOCSLIFNAME
, &ifr
) < 0)
4259 syslog (LOG_ERR
, "Can't set PPA %d", ppa
);
4260 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) <0)
4261 syslog (LOG_ERR
, "Can't get flags\n");
4262 /* Push arp module to if_fd */
4263 if (ioctl (if_fd
, I_PUSH
, "arp") < 0)
4264 syslog (LOG_ERR
, "Can't push ARP module (2)");
4266 /* Push arp module to ip_fd */
4267 if (ioctl (ip_fd
, I_POP
, NULL
) < 0)
4268 syslog (LOG_ERR
, "I_POP failed\n");
4269 if (ioctl (ip_fd
, I_PUSH
, "arp") < 0)
4270 syslog (LOG_ERR
, "Can't push ARP module (3)\n");
4272 TFR(arp_fd
= open ("/dev/tap", O_RDWR
, 0));
4274 syslog (LOG_ERR
, "Can't open %s\n", "/dev/tap");
4276 /* Set ifname to arp */
4277 strioc_if
.ic_cmd
= SIOCSLIFNAME
;
4278 strioc_if
.ic_timout
= 0;
4279 strioc_if
.ic_len
= sizeof(ifr
);
4280 strioc_if
.ic_dp
= (char *)&ifr
;
4281 if (ioctl(arp_fd
, I_STR
, &strioc_if
) < 0){
4282 syslog (LOG_ERR
, "Can't set ifname to arp\n");
4285 if((ip_muxid
= ioctl(ip_fd
, I_LINK
, if_fd
)) < 0){
4286 syslog(LOG_ERR
, "Can't link TAP device to IP");
4290 if ((arp_muxid
= ioctl (ip_fd
, link_type
, arp_fd
)) < 0)
4291 syslog (LOG_ERR
, "Can't link TAP device to ARP");
4295 memset(&ifr
, 0x0, sizeof(ifr
));
4296 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4297 ifr
.lifr_ip_muxid
= ip_muxid
;
4298 ifr
.lifr_arp_muxid
= arp_muxid
;
4300 if (ioctl (ip_fd
, SIOCSLIFMUXID
, &ifr
) < 0)
4302 ioctl (ip_fd
, I_PUNLINK
, arp_muxid
);
4303 ioctl (ip_fd
, I_PUNLINK
, ip_muxid
);
4304 syslog (LOG_ERR
, "Can't set multiplexor id");
4307 sprintf(dev
, "tap%d", ppa
);
4311 static int tap_open(char *ifname
, int ifname_size
)
4315 if( (fd
= tap_alloc(dev
)) < 0 ){
4316 fprintf(stderr
, "Cannot allocate TAP device\n");
4319 pstrcpy(ifname
, ifname_size
, dev
);
4320 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4324 static int tap_open(char *ifname
, int ifname_size
)
4329 TFR(fd
= open("/dev/net/tun", O_RDWR
));
4331 fprintf(stderr
, "warning: could not open /dev/net/tun: no virtual network emulation\n");
4334 memset(&ifr
, 0, sizeof(ifr
));
4335 ifr
.ifr_flags
= IFF_TAP
| IFF_NO_PI
;
4336 if (ifname
[0] != '\0')
4337 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, ifname
);
4339 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, "tap%d");
4340 ret
= ioctl(fd
, TUNSETIFF
, (void *) &ifr
);
4342 fprintf(stderr
, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
4346 pstrcpy(ifname
, ifname_size
, ifr
.ifr_name
);
4347 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4352 static int launch_script(const char *setup_script
, const char *ifname
, int fd
)
4358 /* try to launch network script */
4362 int open_max
= sysconf (_SC_OPEN_MAX
), i
;
4363 for (i
= 0; i
< open_max
; i
++)
4364 if (i
!= STDIN_FILENO
&&
4365 i
!= STDOUT_FILENO
&&
4366 i
!= STDERR_FILENO
&&
4371 *parg
++ = (char *)setup_script
;
4372 *parg
++ = (char *)ifname
;
4374 execv(setup_script
, args
);
4377 while (waitpid(pid
, &status
, 0) != pid
);
4378 if (!WIFEXITED(status
) ||
4379 WEXITSTATUS(status
) != 0) {
4380 fprintf(stderr
, "%s: could not launch network script\n",
4388 static int net_tap_init(VLANState
*vlan
, const char *ifname1
,
4389 const char *setup_script
, const char *down_script
)
4395 if (ifname1
!= NULL
)
4396 pstrcpy(ifname
, sizeof(ifname
), ifname1
);
4399 TFR(fd
= tap_open(ifname
, sizeof(ifname
)));
4403 if (!setup_script
|| !strcmp(setup_script
, "no"))
4405 if (setup_script
[0] != '\0') {
4406 if (launch_script(setup_script
, ifname
, fd
))
4409 s
= net_tap_fd_init(vlan
, fd
);
4412 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4413 "tap: ifname=%s setup_script=%s", ifname
, setup_script
);
4414 if (down_script
&& strcmp(down_script
, "no"))
4415 snprintf(s
->down_script
, sizeof(s
->down_script
), "%s", down_script
);
4419 #endif /* !_WIN32 */
4421 /* network connection */
4422 typedef struct NetSocketState
{
4423 VLANClientState
*vc
;
4425 int state
; /* 0 = getting length, 1 = getting data */
4429 struct sockaddr_in dgram_dst
; /* contains inet host and port destination iff connectionless (SOCK_DGRAM) */
4432 typedef struct NetSocketListenState
{
4435 } NetSocketListenState
;
4437 /* XXX: we consider we can send the whole packet without blocking */
4438 static void net_socket_receive(void *opaque
, const uint8_t *buf
, int size
)
4440 NetSocketState
*s
= opaque
;
4444 send_all(s
->fd
, (const uint8_t *)&len
, sizeof(len
));
4445 send_all(s
->fd
, buf
, size
);
4448 static void net_socket_receive_dgram(void *opaque
, const uint8_t *buf
, int size
)
4450 NetSocketState
*s
= opaque
;
4451 sendto(s
->fd
, buf
, size
, 0,
4452 (struct sockaddr
*)&s
->dgram_dst
, sizeof(s
->dgram_dst
));
4455 static void net_socket_send(void *opaque
)
4457 NetSocketState
*s
= opaque
;
4462 size
= recv(s
->fd
, buf1
, sizeof(buf1
), 0);
4464 err
= socket_error();
4465 if (err
!= EWOULDBLOCK
)
4467 } else if (size
== 0) {
4468 /* end of connection */
4470 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4476 /* reassemble a packet from the network */
4482 memcpy(s
->buf
+ s
->index
, buf
, l
);
4486 if (s
->index
== 4) {
4488 s
->packet_len
= ntohl(*(uint32_t *)s
->buf
);
4494 l
= s
->packet_len
- s
->index
;
4497 memcpy(s
->buf
+ s
->index
, buf
, l
);
4501 if (s
->index
>= s
->packet_len
) {
4502 qemu_send_packet(s
->vc
, s
->buf
, s
->packet_len
);
4511 static void net_socket_send_dgram(void *opaque
)
4513 NetSocketState
*s
= opaque
;
4516 size
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
4520 /* end of connection */
4521 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4524 qemu_send_packet(s
->vc
, s
->buf
, size
);
4527 static int net_socket_mcast_create(struct sockaddr_in
*mcastaddr
)
4532 if (!IN_MULTICAST(ntohl(mcastaddr
->sin_addr
.s_addr
))) {
4533 fprintf(stderr
, "qemu: error: specified mcastaddr \"%s\" (0x%08x) does not contain a multicast address\n",
4534 inet_ntoa(mcastaddr
->sin_addr
),
4535 (int)ntohl(mcastaddr
->sin_addr
.s_addr
));
4539 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
4541 perror("socket(PF_INET, SOCK_DGRAM)");
4546 ret
=setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
,
4547 (const char *)&val
, sizeof(val
));
4549 perror("setsockopt(SOL_SOCKET, SO_REUSEADDR)");
4553 ret
= bind(fd
, (struct sockaddr
*)mcastaddr
, sizeof(*mcastaddr
));
4559 /* Add host to multicast group */
4560 imr
.imr_multiaddr
= mcastaddr
->sin_addr
;
4561 imr
.imr_interface
.s_addr
= htonl(INADDR_ANY
);
4563 ret
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
,
4564 (const char *)&imr
, sizeof(struct ip_mreq
));
4566 perror("setsockopt(IP_ADD_MEMBERSHIP)");
4570 /* Force mcast msgs to loopback (eg. several QEMUs in same host */
4572 ret
=setsockopt(fd
, IPPROTO_IP
, IP_MULTICAST_LOOP
,
4573 (const char *)&val
, sizeof(val
));
4575 perror("setsockopt(SOL_IP, IP_MULTICAST_LOOP)");
4579 socket_set_nonblock(fd
);
4587 static NetSocketState
*net_socket_fd_init_dgram(VLANState
*vlan
, int fd
,
4590 struct sockaddr_in saddr
;
4592 socklen_t saddr_len
;
4595 /* fd passed: multicast: "learn" dgram_dst address from bound address and save it
4596 * Because this may be "shared" socket from a "master" process, datagrams would be recv()
4597 * by ONLY ONE process: we must "clone" this dgram socket --jjo
4601 if (getsockname(fd
, (struct sockaddr
*) &saddr
, &saddr_len
) == 0) {
4603 if (saddr
.sin_addr
.s_addr
==0) {
4604 fprintf(stderr
, "qemu: error: init_dgram: fd=%d unbound, cannot setup multicast dst addr\n",
4608 /* clone dgram socket */
4609 newfd
= net_socket_mcast_create(&saddr
);
4611 /* error already reported by net_socket_mcast_create() */
4615 /* clone newfd to fd, close newfd */
4620 fprintf(stderr
, "qemu: error: init_dgram: fd=%d failed getsockname(): %s\n",
4621 fd
, strerror(errno
));
4626 s
= qemu_mallocz(sizeof(NetSocketState
));
4631 s
->vc
= qemu_new_vlan_client(vlan
, net_socket_receive_dgram
, NULL
, s
);
4632 qemu_set_fd_handler(s
->fd
, net_socket_send_dgram
, NULL
, s
);
4634 /* mcast: save bound address as dst */
4635 if (is_connected
) s
->dgram_dst
=saddr
;
4637 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4638 "socket: fd=%d (%s mcast=%s:%d)",
4639 fd
, is_connected
? "cloned" : "",
4640 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4644 static void net_socket_connect(void *opaque
)
4646 NetSocketState
*s
= opaque
;
4647 qemu_set_fd_handler(s
->fd
, net_socket_send
, NULL
, s
);
4650 static NetSocketState
*net_socket_fd_init_stream(VLANState
*vlan
, int fd
,
4654 s
= qemu_mallocz(sizeof(NetSocketState
));
4658 s
->vc
= qemu_new_vlan_client(vlan
,
4659 net_socket_receive
, NULL
, s
);
4660 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4661 "socket: fd=%d", fd
);
4663 net_socket_connect(s
);
4665 qemu_set_fd_handler(s
->fd
, NULL
, net_socket_connect
, s
);
4670 static NetSocketState
*net_socket_fd_init(VLANState
*vlan
, int fd
,
4673 int so_type
=-1, optlen
=sizeof(so_type
);
4675 if(getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, (char *)&so_type
,
4676 (socklen_t
*)&optlen
)< 0) {
4677 fprintf(stderr
, "qemu: error: getsockopt(SO_TYPE) for fd=%d failed\n", fd
);
4682 return net_socket_fd_init_dgram(vlan
, fd
, is_connected
);
4684 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4686 /* who knows ... this could be a eg. a pty, do warn and continue as stream */
4687 fprintf(stderr
, "qemu: warning: socket type=%d for fd=%d is not SOCK_DGRAM or SOCK_STREAM\n", so_type
, fd
);
4688 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4693 static void net_socket_accept(void *opaque
)
4695 NetSocketListenState
*s
= opaque
;
4697 struct sockaddr_in saddr
;
4702 len
= sizeof(saddr
);
4703 fd
= accept(s
->fd
, (struct sockaddr
*)&saddr
, &len
);
4704 if (fd
< 0 && errno
!= EINTR
) {
4706 } else if (fd
>= 0) {
4710 s1
= net_socket_fd_init(s
->vlan
, fd
, 1);
4714 snprintf(s1
->vc
->info_str
, sizeof(s1
->vc
->info_str
),
4715 "socket: connection from %s:%d",
4716 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4720 static int net_socket_listen_init(VLANState
*vlan
, const char *host_str
)
4722 NetSocketListenState
*s
;
4724 struct sockaddr_in saddr
;
4726 if (parse_host_port(&saddr
, host_str
) < 0)
4729 s
= qemu_mallocz(sizeof(NetSocketListenState
));
4733 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4738 socket_set_nonblock(fd
);
4740 /* allow fast reuse */
4742 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
4744 ret
= bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
4749 ret
= listen(fd
, 0);
4756 qemu_set_fd_handler(fd
, net_socket_accept
, NULL
, s
);
4760 static int net_socket_connect_init(VLANState
*vlan
, const char *host_str
)
4763 int fd
, connected
, ret
, err
;
4764 struct sockaddr_in saddr
;
4766 if (parse_host_port(&saddr
, host_str
) < 0)
4769 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4774 socket_set_nonblock(fd
);
4778 ret
= connect(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
4780 err
= socket_error();
4781 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
4782 } else if (err
== EINPROGRESS
) {
4785 } else if (err
== WSAEALREADY
) {
4798 s
= net_socket_fd_init(vlan
, fd
, connected
);
4801 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4802 "socket: connect to %s:%d",
4803 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4807 static int net_socket_mcast_init(VLANState
*vlan
, const char *host_str
)
4811 struct sockaddr_in saddr
;
4813 if (parse_host_port(&saddr
, host_str
) < 0)
4817 fd
= net_socket_mcast_create(&saddr
);
4821 s
= net_socket_fd_init(vlan
, fd
, 0);
4825 s
->dgram_dst
= saddr
;
4827 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4828 "socket: mcast=%s:%d",
4829 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4834 static const char *get_opt_name(char *buf
, int buf_size
, const char *p
)
4839 while (*p
!= '\0' && *p
!= '=') {
4840 if (q
&& (q
- buf
) < buf_size
- 1)
4850 static const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
4855 while (*p
!= '\0') {
4857 if (*(p
+ 1) != ',')
4861 if (q
&& (q
- buf
) < buf_size
- 1)
4871 static int get_param_value(char *buf
, int buf_size
,
4872 const char *tag
, const char *str
)
4879 p
= get_opt_name(option
, sizeof(option
), p
);
4883 if (!strcmp(tag
, option
)) {
4884 (void)get_opt_value(buf
, buf_size
, p
);
4887 p
= get_opt_value(NULL
, 0, p
);
4896 static int check_params(char *buf
, int buf_size
,
4897 char **params
, const char *str
)
4904 p
= get_opt_name(buf
, buf_size
, p
);
4908 for(i
= 0; params
[i
] != NULL
; i
++)
4909 if (!strcmp(params
[i
], buf
))
4911 if (params
[i
] == NULL
)
4913 p
= get_opt_value(NULL
, 0, p
);
4922 static int net_client_init(const char *str
)
4933 while (*p
!= '\0' && *p
!= ',') {
4934 if ((q
- device
) < sizeof(device
) - 1)
4942 if (get_param_value(buf
, sizeof(buf
), "vlan", p
)) {
4943 vlan_id
= strtol(buf
, NULL
, 0);
4945 vlan
= qemu_find_vlan(vlan_id
);
4947 fprintf(stderr
, "Could not create vlan %d\n", vlan_id
);
4950 if (!strcmp(device
, "nic")) {
4954 if (nb_nics
>= MAX_NICS
) {
4955 fprintf(stderr
, "Too Many NICs\n");
4958 nd
= &nd_table
[nb_nics
];
4959 macaddr
= nd
->macaddr
;
4965 macaddr
[5] = 0x56 + nb_nics
;
4967 if (get_param_value(buf
, sizeof(buf
), "macaddr", p
)) {
4968 if (parse_macaddr(macaddr
, buf
) < 0) {
4969 fprintf(stderr
, "invalid syntax for ethernet address\n");
4973 if (get_param_value(buf
, sizeof(buf
), "model", p
)) {
4974 nd
->model
= strdup(buf
);
4978 vlan
->nb_guest_devs
++;
4981 if (!strcmp(device
, "none")) {
4982 /* does nothing. It is needed to signal that no network cards
4987 if (!strcmp(device
, "user")) {
4988 if (get_param_value(buf
, sizeof(buf
), "hostname", p
)) {
4989 pstrcpy(slirp_hostname
, sizeof(slirp_hostname
), buf
);
4991 vlan
->nb_host_devs
++;
4992 ret
= net_slirp_init(vlan
);
4996 if (!strcmp(device
, "tap")) {
4998 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
4999 fprintf(stderr
, "tap: no interface name\n");
5002 vlan
->nb_host_devs
++;
5003 ret
= tap_win32_init(vlan
, ifname
);
5006 if (!strcmp(device
, "tap")) {
5008 char setup_script
[1024], down_script
[1024];
5010 vlan
->nb_host_devs
++;
5011 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5012 fd
= strtol(buf
, NULL
, 0);
5013 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
5015 if (net_tap_fd_init(vlan
, fd
))
5018 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5021 if (get_param_value(setup_script
, sizeof(setup_script
), "script", p
) == 0) {
5022 pstrcpy(setup_script
, sizeof(setup_script
), DEFAULT_NETWORK_SCRIPT
);
5024 if (get_param_value(down_script
, sizeof(down_script
), "downscript", p
) == 0) {
5025 pstrcpy(down_script
, sizeof(down_script
), DEFAULT_NETWORK_DOWN_SCRIPT
);
5027 ret
= net_tap_init(vlan
, ifname
, setup_script
, down_script
);
5031 if (!strcmp(device
, "socket")) {
5032 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5034 fd
= strtol(buf
, NULL
, 0);
5036 if (net_socket_fd_init(vlan
, fd
, 1))
5038 } else if (get_param_value(buf
, sizeof(buf
), "listen", p
) > 0) {
5039 ret
= net_socket_listen_init(vlan
, buf
);
5040 } else if (get_param_value(buf
, sizeof(buf
), "connect", p
) > 0) {
5041 ret
= net_socket_connect_init(vlan
, buf
);
5042 } else if (get_param_value(buf
, sizeof(buf
), "mcast", p
) > 0) {
5043 ret
= net_socket_mcast_init(vlan
, buf
);
5045 fprintf(stderr
, "Unknown socket options: %s\n", p
);
5048 vlan
->nb_host_devs
++;
5051 fprintf(stderr
, "Unknown network device: %s\n", device
);
5055 fprintf(stderr
, "Could not initialize device '%s'\n", device
);
5061 void do_info_network(void)
5064 VLANClientState
*vc
;
5066 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5067 term_printf("VLAN %d devices:\n", vlan
->id
);
5068 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
)
5069 term_printf(" %s\n", vc
->info_str
);
5073 #define HD_ALIAS "index=%d,media=disk"
5075 #define CDROM_ALIAS "index=1,media=cdrom"
5077 #define CDROM_ALIAS "index=2,media=cdrom"
5079 #define FD_ALIAS "index=%d,if=floppy"
5080 #define PFLASH_ALIAS "if=pflash"
5081 #define MTD_ALIAS "if=mtd"
5082 #define SD_ALIAS "index=0,if=sd"
5084 static int drive_add(const char *file
, const char *fmt
, ...)
5088 if (nb_drives_opt
>= MAX_DRIVES
) {
5089 fprintf(stderr
, "qemu: too many drives\n");
5093 drives_opt
[nb_drives_opt
].file
= file
;
5095 vsnprintf(drives_opt
[nb_drives_opt
].opt
,
5096 sizeof(drives_opt
[0].opt
), fmt
, ap
);
5099 return nb_drives_opt
++;
5102 int drive_get_index(BlockInterfaceType type
, int bus
, int unit
)
5106 /* seek interface, bus and unit */
5108 for (index
= 0; index
< nb_drives
; index
++)
5109 if (drives_table
[index
].type
== type
&&
5110 drives_table
[index
].bus
== bus
&&
5111 drives_table
[index
].unit
== unit
)
5117 int drive_get_max_bus(BlockInterfaceType type
)
5123 for (index
= 0; index
< nb_drives
; index
++) {
5124 if(drives_table
[index
].type
== type
&&
5125 drives_table
[index
].bus
> max_bus
)
5126 max_bus
= drives_table
[index
].bus
;
5131 static void bdrv_format_print(void *opaque
, const char *name
)
5133 fprintf(stderr
, " %s", name
);
5136 static int drive_init(struct drive_opt
*arg
, int snapshot
,
5137 QEMUMachine
*machine
)
5142 const char *mediastr
= "";
5143 BlockInterfaceType type
;
5144 enum { MEDIA_DISK
, MEDIA_CDROM
} media
;
5145 int bus_id
, unit_id
;
5146 int cyls
, heads
, secs
, translation
;
5147 BlockDriverState
*bdrv
;
5148 BlockDriver
*drv
= NULL
;
5153 char *str
= arg
->opt
;
5154 char *params
[] = { "bus", "unit", "if", "index", "cyls", "heads",
5155 "secs", "trans", "media", "snapshot", "file",
5156 "cache", "format", NULL
};
5158 if (check_params(buf
, sizeof(buf
), params
, str
) < 0) {
5159 fprintf(stderr
, "qemu: unknown parameter '%s' in '%s'\n",
5165 cyls
= heads
= secs
= 0;
5168 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5172 if (!strcmp(machine
->name
, "realview") ||
5173 !strcmp(machine
->name
, "SS-5") ||
5174 !strcmp(machine
->name
, "SS-10") ||
5175 !strcmp(machine
->name
, "SS-600MP") ||
5176 !strcmp(machine
->name
, "versatilepb") ||
5177 !strcmp(machine
->name
, "versatileab")) {
5179 max_devs
= MAX_SCSI_DEVS
;
5180 strcpy(devname
, "scsi");
5183 max_devs
= MAX_IDE_DEVS
;
5184 strcpy(devname
, "ide");
5188 /* extract parameters */
5190 if (get_param_value(buf
, sizeof(buf
), "bus", str
)) {
5191 bus_id
= strtol(buf
, NULL
, 0);
5193 fprintf(stderr
, "qemu: '%s' invalid bus id\n", str
);
5198 if (get_param_value(buf
, sizeof(buf
), "unit", str
)) {
5199 unit_id
= strtol(buf
, NULL
, 0);
5201 fprintf(stderr
, "qemu: '%s' invalid unit id\n", str
);
5206 if (get_param_value(buf
, sizeof(buf
), "if", str
)) {
5207 pstrcpy(devname
, sizeof(devname
), buf
);
5208 if (!strcmp(buf
, "ide")) {
5210 max_devs
= MAX_IDE_DEVS
;
5211 } else if (!strcmp(buf
, "scsi")) {
5213 max_devs
= MAX_SCSI_DEVS
;
5214 } else if (!strcmp(buf
, "floppy")) {
5217 } else if (!strcmp(buf
, "pflash")) {
5220 } else if (!strcmp(buf
, "mtd")) {
5223 } else if (!strcmp(buf
, "sd")) {
5227 fprintf(stderr
, "qemu: '%s' unsupported bus type '%s'\n", str
, buf
);
5232 if (get_param_value(buf
, sizeof(buf
), "index", str
)) {
5233 index
= strtol(buf
, NULL
, 0);
5235 fprintf(stderr
, "qemu: '%s' invalid index\n", str
);
5240 if (get_param_value(buf
, sizeof(buf
), "cyls", str
)) {
5241 cyls
= strtol(buf
, NULL
, 0);
5244 if (get_param_value(buf
, sizeof(buf
), "heads", str
)) {
5245 heads
= strtol(buf
, NULL
, 0);
5248 if (get_param_value(buf
, sizeof(buf
), "secs", str
)) {
5249 secs
= strtol(buf
, NULL
, 0);
5252 if (cyls
|| heads
|| secs
) {
5253 if (cyls
< 1 || cyls
> 16383) {
5254 fprintf(stderr
, "qemu: '%s' invalid physical cyls number\n", str
);
5257 if (heads
< 1 || heads
> 16) {
5258 fprintf(stderr
, "qemu: '%s' invalid physical heads number\n", str
);
5261 if (secs
< 1 || secs
> 63) {
5262 fprintf(stderr
, "qemu: '%s' invalid physical secs number\n", str
);
5267 if (get_param_value(buf
, sizeof(buf
), "trans", str
)) {
5270 "qemu: '%s' trans must be used with cyls,heads and secs\n",
5274 if (!strcmp(buf
, "none"))
5275 translation
= BIOS_ATA_TRANSLATION_NONE
;
5276 else if (!strcmp(buf
, "lba"))
5277 translation
= BIOS_ATA_TRANSLATION_LBA
;
5278 else if (!strcmp(buf
, "auto"))
5279 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5281 fprintf(stderr
, "qemu: '%s' invalid translation type\n", str
);
5286 if (get_param_value(buf
, sizeof(buf
), "media", str
)) {
5287 if (!strcmp(buf
, "disk")) {
5289 } else if (!strcmp(buf
, "cdrom")) {
5290 if (cyls
|| secs
|| heads
) {
5292 "qemu: '%s' invalid physical CHS format\n", str
);
5295 media
= MEDIA_CDROM
;
5297 fprintf(stderr
, "qemu: '%s' invalid media\n", str
);
5302 if (get_param_value(buf
, sizeof(buf
), "snapshot", str
)) {
5303 if (!strcmp(buf
, "on"))
5305 else if (!strcmp(buf
, "off"))
5308 fprintf(stderr
, "qemu: '%s' invalid snapshot option\n", str
);
5313 if (get_param_value(buf
, sizeof(buf
), "cache", str
)) {
5314 if (!strcmp(buf
, "off"))
5316 else if (!strcmp(buf
, "on"))
5319 fprintf(stderr
, "qemu: invalid cache option\n");
5324 if (get_param_value(buf
, sizeof(buf
), "format", str
)) {
5325 if (strcmp(buf
, "?") == 0) {
5326 fprintf(stderr
, "qemu: Supported formats:");
5327 bdrv_iterate_format(bdrv_format_print
, NULL
);
5328 fprintf(stderr
, "\n");
5331 drv
= bdrv_find_format(buf
);
5333 fprintf(stderr
, "qemu: '%s' invalid format\n", buf
);
5338 if (arg
->file
== NULL
)
5339 get_param_value(file
, sizeof(file
), "file", str
);
5341 pstrcpy(file
, sizeof(file
), arg
->file
);
5343 /* compute bus and unit according index */
5346 if (bus_id
!= 0 || unit_id
!= -1) {
5348 "qemu: '%s' index cannot be used with bus and unit\n", str
);
5356 unit_id
= index
% max_devs
;
5357 bus_id
= index
/ max_devs
;
5361 /* if user doesn't specify a unit_id,
5362 * try to find the first free
5365 if (unit_id
== -1) {
5367 while (drive_get_index(type
, bus_id
, unit_id
) != -1) {
5369 if (max_devs
&& unit_id
>= max_devs
) {
5370 unit_id
-= max_devs
;
5378 if (max_devs
&& unit_id
>= max_devs
) {
5379 fprintf(stderr
, "qemu: '%s' unit %d too big (max is %d)\n",
5380 str
, unit_id
, max_devs
- 1);
5385 * ignore multiple definitions
5388 if (drive_get_index(type
, bus_id
, unit_id
) != -1)
5393 if (type
== IF_IDE
|| type
== IF_SCSI
)
5394 mediastr
= (media
== MEDIA_CDROM
) ? "-cd" : "-hd";
5396 snprintf(buf
, sizeof(buf
), "%s%i%s%i",
5397 devname
, bus_id
, mediastr
, unit_id
);
5399 snprintf(buf
, sizeof(buf
), "%s%s%i",
5400 devname
, mediastr
, unit_id
);
5401 bdrv
= bdrv_new(buf
);
5402 drives_table
[nb_drives
].bdrv
= bdrv
;
5403 drives_table
[nb_drives
].type
= type
;
5404 drives_table
[nb_drives
].bus
= bus_id
;
5405 drives_table
[nb_drives
].unit
= unit_id
;
5414 bdrv_set_geometry_hint(bdrv
, cyls
, heads
, secs
);
5415 bdrv_set_translation_hint(bdrv
, translation
);
5419 bdrv_set_type_hint(bdrv
, BDRV_TYPE_CDROM
);
5424 /* FIXME: This isn't really a floppy, but it's a reasonable
5427 bdrv_set_type_hint(bdrv
, BDRV_TYPE_FLOPPY
);
5437 bdrv_flags
|= BDRV_O_SNAPSHOT
;
5439 bdrv_flags
|= BDRV_O_DIRECT
;
5440 if (bdrv_open2(bdrv
, file
, bdrv_flags
, drv
) < 0 || qemu_key_check(bdrv
, file
)) {
5441 fprintf(stderr
, "qemu: could not open disk image %s\n",
5448 /***********************************************************/
5451 static USBPort
*used_usb_ports
;
5452 static USBPort
*free_usb_ports
;
5454 /* ??? Maybe change this to register a hub to keep track of the topology. */
5455 void qemu_register_usb_port(USBPort
*port
, void *opaque
, int index
,
5456 usb_attachfn attach
)
5458 port
->opaque
= opaque
;
5459 port
->index
= index
;
5460 port
->attach
= attach
;
5461 port
->next
= free_usb_ports
;
5462 free_usb_ports
= port
;
5465 static int usb_device_add(const char *devname
)
5471 if (!free_usb_ports
)
5474 if (strstart(devname
, "host:", &p
)) {
5475 dev
= usb_host_device_open(p
);
5476 } else if (!strcmp(devname
, "mouse")) {
5477 dev
= usb_mouse_init();
5478 } else if (!strcmp(devname
, "tablet")) {
5479 dev
= usb_tablet_init();
5480 } else if (!strcmp(devname
, "keyboard")) {
5481 dev
= usb_keyboard_init();
5482 } else if (strstart(devname
, "disk:", &p
)) {
5483 dev
= usb_msd_init(p
);
5484 } else if (!strcmp(devname
, "wacom-tablet")) {
5485 dev
= usb_wacom_init();
5486 } else if (strstart(devname
, "serial:", &p
)) {
5487 dev
= usb_serial_init(p
);
5488 #ifdef CONFIG_BRLAPI
5489 } else if (!strcmp(devname
, "braille")) {
5490 dev
= usb_baum_init();
5492 } else if (strstart(devname
, "net:", &p
)) {
5493 int nicidx
= strtoul(p
, NULL
, 0);
5495 if (nicidx
>= nb_nics
|| strcmp(nd_table
[nicidx
].model
, "usb"))
5497 dev
= usb_net_init(&nd_table
[nicidx
]);
5504 /* Find a USB port to add the device to. */
5505 port
= free_usb_ports
;
5509 /* Create a new hub and chain it on. */
5510 free_usb_ports
= NULL
;
5511 port
->next
= used_usb_ports
;
5512 used_usb_ports
= port
;
5514 hub
= usb_hub_init(VM_USB_HUB_SIZE
);
5515 usb_attach(port
, hub
);
5516 port
= free_usb_ports
;
5519 free_usb_ports
= port
->next
;
5520 port
->next
= used_usb_ports
;
5521 used_usb_ports
= port
;
5522 usb_attach(port
, dev
);
5526 static int usb_device_del(const char *devname
)
5534 if (!used_usb_ports
)
5537 p
= strchr(devname
, '.');
5540 bus_num
= strtoul(devname
, NULL
, 0);
5541 addr
= strtoul(p
+ 1, NULL
, 0);
5545 lastp
= &used_usb_ports
;
5546 port
= used_usb_ports
;
5547 while (port
&& port
->dev
->addr
!= addr
) {
5548 lastp
= &port
->next
;
5556 *lastp
= port
->next
;
5557 usb_attach(port
, NULL
);
5558 dev
->handle_destroy(dev
);
5559 port
->next
= free_usb_ports
;
5560 free_usb_ports
= port
;
5564 void do_usb_add(const char *devname
)
5567 ret
= usb_device_add(devname
);
5569 term_printf("Could not add USB device '%s'\n", devname
);
5572 void do_usb_del(const char *devname
)
5575 ret
= usb_device_del(devname
);
5577 term_printf("Could not remove USB device '%s'\n", devname
);
5584 const char *speed_str
;
5587 term_printf("USB support not enabled\n");
5591 for (port
= used_usb_ports
; port
; port
= port
->next
) {
5595 switch(dev
->speed
) {
5599 case USB_SPEED_FULL
:
5602 case USB_SPEED_HIGH
:
5609 term_printf(" Device %d.%d, Speed %s Mb/s, Product %s\n",
5610 0, dev
->addr
, speed_str
, dev
->devname
);
5614 /***********************************************************/
5615 /* PCMCIA/Cardbus */
5617 static struct pcmcia_socket_entry_s
{
5618 struct pcmcia_socket_s
*socket
;
5619 struct pcmcia_socket_entry_s
*next
;
5620 } *pcmcia_sockets
= 0;
5622 void pcmcia_socket_register(struct pcmcia_socket_s
*socket
)
5624 struct pcmcia_socket_entry_s
*entry
;
5626 entry
= qemu_malloc(sizeof(struct pcmcia_socket_entry_s
));
5627 entry
->socket
= socket
;
5628 entry
->next
= pcmcia_sockets
;
5629 pcmcia_sockets
= entry
;
5632 void pcmcia_socket_unregister(struct pcmcia_socket_s
*socket
)
5634 struct pcmcia_socket_entry_s
*entry
, **ptr
;
5636 ptr
= &pcmcia_sockets
;
5637 for (entry
= *ptr
; entry
; ptr
= &entry
->next
, entry
= *ptr
)
5638 if (entry
->socket
== socket
) {
5644 void pcmcia_info(void)
5646 struct pcmcia_socket_entry_s
*iter
;
5647 if (!pcmcia_sockets
)
5648 term_printf("No PCMCIA sockets\n");
5650 for (iter
= pcmcia_sockets
; iter
; iter
= iter
->next
)
5651 term_printf("%s: %s\n", iter
->socket
->slot_string
,
5652 iter
->socket
->attached
? iter
->socket
->card_string
:
5656 /***********************************************************/
5659 static void dumb_update(DisplayState
*ds
, int x
, int y
, int w
, int h
)
5663 static void dumb_resize(DisplayState
*ds
, int w
, int h
)
5667 static void dumb_refresh(DisplayState
*ds
)
5669 #if defined(CONFIG_SDL)
5674 static void dumb_display_init(DisplayState
*ds
)
5679 ds
->dpy_update
= dumb_update
;
5680 ds
->dpy_resize
= dumb_resize
;
5681 ds
->dpy_refresh
= dumb_refresh
;
5684 /***********************************************************/
5687 #define MAX_IO_HANDLERS 64
5689 typedef struct IOHandlerRecord
{
5691 IOCanRWHandler
*fd_read_poll
;
5693 IOHandler
*fd_write
;
5696 /* temporary data */
5698 struct IOHandlerRecord
*next
;
5701 static IOHandlerRecord
*first_io_handler
;
5703 /* XXX: fd_read_poll should be suppressed, but an API change is
5704 necessary in the character devices to suppress fd_can_read(). */
5705 int qemu_set_fd_handler2(int fd
,
5706 IOCanRWHandler
*fd_read_poll
,
5708 IOHandler
*fd_write
,
5711 IOHandlerRecord
**pioh
, *ioh
;
5713 if (!fd_read
&& !fd_write
) {
5714 pioh
= &first_io_handler
;
5719 if (ioh
->fd
== fd
) {
5726 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
5730 ioh
= qemu_mallocz(sizeof(IOHandlerRecord
));
5733 ioh
->next
= first_io_handler
;
5734 first_io_handler
= ioh
;
5737 ioh
->fd_read_poll
= fd_read_poll
;
5738 ioh
->fd_read
= fd_read
;
5739 ioh
->fd_write
= fd_write
;
5740 ioh
->opaque
= opaque
;
5746 int qemu_set_fd_handler(int fd
,
5748 IOHandler
*fd_write
,
5751 return qemu_set_fd_handler2(fd
, NULL
, fd_read
, fd_write
, opaque
);
5754 /***********************************************************/
5755 /* Polling handling */
5757 typedef struct PollingEntry
{
5760 struct PollingEntry
*next
;
5763 static PollingEntry
*first_polling_entry
;
5765 int qemu_add_polling_cb(PollingFunc
*func
, void *opaque
)
5767 PollingEntry
**ppe
, *pe
;
5768 pe
= qemu_mallocz(sizeof(PollingEntry
));
5772 pe
->opaque
= opaque
;
5773 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
);
5778 void qemu_del_polling_cb(PollingFunc
*func
, void *opaque
)
5780 PollingEntry
**ppe
, *pe
;
5781 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
) {
5783 if (pe
->func
== func
&& pe
->opaque
== opaque
) {
5792 /***********************************************************/
5793 /* Wait objects support */
5794 typedef struct WaitObjects
{
5796 HANDLE events
[MAXIMUM_WAIT_OBJECTS
+ 1];
5797 WaitObjectFunc
*func
[MAXIMUM_WAIT_OBJECTS
+ 1];
5798 void *opaque
[MAXIMUM_WAIT_OBJECTS
+ 1];
5801 static WaitObjects wait_objects
= {0};
5803 int qemu_add_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
5805 WaitObjects
*w
= &wait_objects
;
5807 if (w
->num
>= MAXIMUM_WAIT_OBJECTS
)
5809 w
->events
[w
->num
] = handle
;
5810 w
->func
[w
->num
] = func
;
5811 w
->opaque
[w
->num
] = opaque
;
5816 void qemu_del_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
5819 WaitObjects
*w
= &wait_objects
;
5822 for (i
= 0; i
< w
->num
; i
++) {
5823 if (w
->events
[i
] == handle
)
5826 w
->events
[i
] = w
->events
[i
+ 1];
5827 w
->func
[i
] = w
->func
[i
+ 1];
5828 w
->opaque
[i
] = w
->opaque
[i
+ 1];
5836 /***********************************************************/
5837 /* savevm/loadvm support */
5839 #define IO_BUF_SIZE 32768
5843 BlockDriverState
*bs
;
5846 int64_t base_offset
;
5847 int64_t buf_offset
; /* start of buffer when writing, end of buffer
5850 int buf_size
; /* 0 when writing */
5851 uint8_t buf
[IO_BUF_SIZE
];
5854 QEMUFile
*qemu_fopen(const char *filename
, const char *mode
)
5858 f
= qemu_mallocz(sizeof(QEMUFile
));
5861 if (!strcmp(mode
, "wb")) {
5863 } else if (!strcmp(mode
, "rb")) {
5868 f
->outfile
= fopen(filename
, mode
);
5880 static QEMUFile
*qemu_fopen_bdrv(BlockDriverState
*bs
, int64_t offset
, int is_writable
)
5884 f
= qemu_mallocz(sizeof(QEMUFile
));
5889 f
->is_writable
= is_writable
;
5890 f
->base_offset
= offset
;
5894 void qemu_fflush(QEMUFile
*f
)
5896 if (!f
->is_writable
)
5898 if (f
->buf_index
> 0) {
5900 fseek(f
->outfile
, f
->buf_offset
, SEEK_SET
);
5901 fwrite(f
->buf
, 1, f
->buf_index
, f
->outfile
);
5903 bdrv_pwrite(f
->bs
, f
->base_offset
+ f
->buf_offset
,
5904 f
->buf
, f
->buf_index
);
5906 f
->buf_offset
+= f
->buf_index
;
5911 static void qemu_fill_buffer(QEMUFile
*f
)
5918 fseek(f
->outfile
, f
->buf_offset
, SEEK_SET
);
5919 len
= fread(f
->buf
, 1, IO_BUF_SIZE
, f
->outfile
);
5923 len
= bdrv_pread(f
->bs
, f
->base_offset
+ f
->buf_offset
,
5924 f
->buf
, IO_BUF_SIZE
);
5930 f
->buf_offset
+= len
;
5933 void qemu_fclose(QEMUFile
*f
)
5943 void qemu_put_buffer(QEMUFile
*f
, const uint8_t *buf
, int size
)
5947 l
= IO_BUF_SIZE
- f
->buf_index
;
5950 memcpy(f
->buf
+ f
->buf_index
, buf
, l
);
5954 if (f
->buf_index
>= IO_BUF_SIZE
)
5959 void qemu_put_byte(QEMUFile
*f
, int v
)
5961 f
->buf
[f
->buf_index
++] = v
;
5962 if (f
->buf_index
>= IO_BUF_SIZE
)
5966 int qemu_get_buffer(QEMUFile
*f
, uint8_t *buf
, int size1
)
5972 l
= f
->buf_size
- f
->buf_index
;
5974 qemu_fill_buffer(f
);
5975 l
= f
->buf_size
- f
->buf_index
;
5981 memcpy(buf
, f
->buf
+ f
->buf_index
, l
);
5986 return size1
- size
;
5989 int qemu_get_byte(QEMUFile
*f
)
5991 if (f
->buf_index
>= f
->buf_size
) {
5992 qemu_fill_buffer(f
);
5993 if (f
->buf_index
>= f
->buf_size
)
5996 return f
->buf
[f
->buf_index
++];
5999 int64_t qemu_ftell(QEMUFile
*f
)
6001 return f
->buf_offset
- f
->buf_size
+ f
->buf_index
;
6004 int64_t qemu_fseek(QEMUFile
*f
, int64_t pos
, int whence
)
6006 if (whence
== SEEK_SET
) {
6008 } else if (whence
== SEEK_CUR
) {
6009 pos
+= qemu_ftell(f
);
6011 /* SEEK_END not supported */
6014 if (f
->is_writable
) {
6016 f
->buf_offset
= pos
;
6018 f
->buf_offset
= pos
;
6025 void qemu_put_be16(QEMUFile
*f
, unsigned int v
)
6027 qemu_put_byte(f
, v
>> 8);
6028 qemu_put_byte(f
, v
);
6031 void qemu_put_be32(QEMUFile
*f
, unsigned int v
)
6033 qemu_put_byte(f
, v
>> 24);
6034 qemu_put_byte(f
, v
>> 16);
6035 qemu_put_byte(f
, v
>> 8);
6036 qemu_put_byte(f
, v
);
6039 void qemu_put_be64(QEMUFile
*f
, uint64_t v
)
6041 qemu_put_be32(f
, v
>> 32);
6042 qemu_put_be32(f
, v
);
6045 unsigned int qemu_get_be16(QEMUFile
*f
)
6048 v
= qemu_get_byte(f
) << 8;
6049 v
|= qemu_get_byte(f
);
6053 unsigned int qemu_get_be32(QEMUFile
*f
)
6056 v
= qemu_get_byte(f
) << 24;
6057 v
|= qemu_get_byte(f
) << 16;
6058 v
|= qemu_get_byte(f
) << 8;
6059 v
|= qemu_get_byte(f
);
6063 uint64_t qemu_get_be64(QEMUFile
*f
)
6066 v
= (uint64_t)qemu_get_be32(f
) << 32;
6067 v
|= qemu_get_be32(f
);
6071 typedef struct SaveStateEntry
{
6075 SaveStateHandler
*save_state
;
6076 LoadStateHandler
*load_state
;
6078 struct SaveStateEntry
*next
;
6081 static SaveStateEntry
*first_se
;
6083 /* TODO: Individual devices generally have very little idea about the rest
6084 of the system, so instance_id should be removed/replaced.
6085 Meanwhile pass -1 as instance_id if you do not already have a clearly
6086 distinguishing id for all instances of your device class. */
6087 int register_savevm(const char *idstr
,
6090 SaveStateHandler
*save_state
,
6091 LoadStateHandler
*load_state
,
6094 SaveStateEntry
*se
, **pse
;
6096 se
= qemu_malloc(sizeof(SaveStateEntry
));
6099 pstrcpy(se
->idstr
, sizeof(se
->idstr
), idstr
);
6100 se
->instance_id
= (instance_id
== -1) ? 0 : instance_id
;
6101 se
->version_id
= version_id
;
6102 se
->save_state
= save_state
;
6103 se
->load_state
= load_state
;
6104 se
->opaque
= opaque
;
6107 /* add at the end of list */
6109 while (*pse
!= NULL
) {
6110 if (instance_id
== -1
6111 && strcmp(se
->idstr
, (*pse
)->idstr
) == 0
6112 && se
->instance_id
<= (*pse
)->instance_id
)
6113 se
->instance_id
= (*pse
)->instance_id
+ 1;
6114 pse
= &(*pse
)->next
;
6120 #define QEMU_VM_FILE_MAGIC 0x5145564d
6121 #define QEMU_VM_FILE_VERSION 0x00000002
6123 static int qemu_savevm_state(QEMUFile
*f
)
6127 int64_t cur_pos
, len_pos
, total_len_pos
;
6129 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
6130 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
6131 total_len_pos
= qemu_ftell(f
);
6132 qemu_put_be64(f
, 0); /* total size */
6134 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6135 if (se
->save_state
== NULL
)
6136 /* this one has a loader only, for backwards compatibility */
6140 len
= strlen(se
->idstr
);
6141 qemu_put_byte(f
, len
);
6142 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6144 qemu_put_be32(f
, se
->instance_id
);
6145 qemu_put_be32(f
, se
->version_id
);
6147 /* record size: filled later */
6148 len_pos
= qemu_ftell(f
);
6149 qemu_put_be32(f
, 0);
6150 se
->save_state(f
, se
->opaque
);
6152 /* fill record size */
6153 cur_pos
= qemu_ftell(f
);
6154 len
= cur_pos
- len_pos
- 4;
6155 qemu_fseek(f
, len_pos
, SEEK_SET
);
6156 qemu_put_be32(f
, len
);
6157 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6159 cur_pos
= qemu_ftell(f
);
6160 qemu_fseek(f
, total_len_pos
, SEEK_SET
);
6161 qemu_put_be64(f
, cur_pos
- total_len_pos
- 8);
6162 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6168 static SaveStateEntry
*find_se(const char *idstr
, int instance_id
)
6172 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6173 if (!strcmp(se
->idstr
, idstr
) &&
6174 instance_id
== se
->instance_id
)
6180 static int qemu_loadvm_state(QEMUFile
*f
)
6183 int len
, ret
, instance_id
, record_len
, version_id
;
6184 int64_t total_len
, end_pos
, cur_pos
;
6188 v
= qemu_get_be32(f
);
6189 if (v
!= QEMU_VM_FILE_MAGIC
)
6191 v
= qemu_get_be32(f
);
6192 if (v
!= QEMU_VM_FILE_VERSION
) {
6197 total_len
= qemu_get_be64(f
);
6198 end_pos
= total_len
+ qemu_ftell(f
);
6200 if (qemu_ftell(f
) >= end_pos
)
6202 len
= qemu_get_byte(f
);
6203 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6205 instance_id
= qemu_get_be32(f
);
6206 version_id
= qemu_get_be32(f
);
6207 record_len
= qemu_get_be32(f
);
6209 printf("idstr=%s instance=0x%x version=%d len=%d\n",
6210 idstr
, instance_id
, version_id
, record_len
);
6212 cur_pos
= qemu_ftell(f
);
6213 se
= find_se(idstr
, instance_id
);
6215 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
6216 instance_id
, idstr
);
6218 ret
= se
->load_state(f
, se
->opaque
, version_id
);
6220 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
6221 instance_id
, idstr
);
6224 /* always seek to exact end of record */
6225 qemu_fseek(f
, cur_pos
+ record_len
, SEEK_SET
);
6232 /* device can contain snapshots */
6233 static int bdrv_can_snapshot(BlockDriverState
*bs
)
6236 !bdrv_is_removable(bs
) &&
6237 !bdrv_is_read_only(bs
));
6240 /* device must be snapshots in order to have a reliable snapshot */
6241 static int bdrv_has_snapshot(BlockDriverState
*bs
)
6244 !bdrv_is_removable(bs
) &&
6245 !bdrv_is_read_only(bs
));
6248 static BlockDriverState
*get_bs_snapshots(void)
6250 BlockDriverState
*bs
;
6254 return bs_snapshots
;
6255 for(i
= 0; i
<= nb_drives
; i
++) {
6256 bs
= drives_table
[i
].bdrv
;
6257 if (bdrv_can_snapshot(bs
))
6266 static int bdrv_snapshot_find(BlockDriverState
*bs
, QEMUSnapshotInfo
*sn_info
,
6269 QEMUSnapshotInfo
*sn_tab
, *sn
;
6273 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
6276 for(i
= 0; i
< nb_sns
; i
++) {
6278 if (!strcmp(sn
->id_str
, name
) || !strcmp(sn
->name
, name
)) {
6288 void do_savevm(const char *name
)
6290 BlockDriverState
*bs
, *bs1
;
6291 QEMUSnapshotInfo sn1
, *sn
= &sn1
, old_sn1
, *old_sn
= &old_sn1
;
6292 int must_delete
, ret
, i
;
6293 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
6295 int saved_vm_running
;
6302 bs
= get_bs_snapshots();
6304 term_printf("No block device can accept snapshots\n");
6308 /* ??? Should this occur after vm_stop? */
6311 saved_vm_running
= vm_running
;
6316 ret
= bdrv_snapshot_find(bs
, old_sn
, name
);
6321 memset(sn
, 0, sizeof(*sn
));
6323 pstrcpy(sn
->name
, sizeof(sn
->name
), old_sn
->name
);
6324 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), old_sn
->id_str
);
6327 pstrcpy(sn
->name
, sizeof(sn
->name
), name
);
6330 /* fill auxiliary fields */
6333 sn
->date_sec
= tb
.time
;
6334 sn
->date_nsec
= tb
.millitm
* 1000000;
6336 gettimeofday(&tv
, NULL
);
6337 sn
->date_sec
= tv
.tv_sec
;
6338 sn
->date_nsec
= tv
.tv_usec
* 1000;
6340 sn
->vm_clock_nsec
= qemu_get_clock(vm_clock
);
6342 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
6343 term_printf("Device %s does not support VM state snapshots\n",
6344 bdrv_get_device_name(bs
));
6348 /* save the VM state */
6349 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 1);
6351 term_printf("Could not open VM state file\n");
6354 ret
= qemu_savevm_state(f
);
6355 sn
->vm_state_size
= qemu_ftell(f
);
6358 term_printf("Error %d while writing VM\n", ret
);
6362 /* create the snapshots */
6364 for(i
= 0; i
< nb_drives
; i
++) {
6365 bs1
= drives_table
[i
].bdrv
;
6366 if (bdrv_has_snapshot(bs1
)) {
6368 ret
= bdrv_snapshot_delete(bs1
, old_sn
->id_str
);
6370 term_printf("Error while deleting snapshot on '%s'\n",
6371 bdrv_get_device_name(bs1
));
6374 ret
= bdrv_snapshot_create(bs1
, sn
);
6376 term_printf("Error while creating snapshot on '%s'\n",
6377 bdrv_get_device_name(bs1
));
6383 if (saved_vm_running
)
6387 void do_loadvm(const char *name
)
6389 BlockDriverState
*bs
, *bs1
;
6390 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
6393 int saved_vm_running
;
6395 bs
= get_bs_snapshots();
6397 term_printf("No block device supports snapshots\n");
6401 /* Flush all IO requests so they don't interfere with the new state. */
6404 saved_vm_running
= vm_running
;
6407 for(i
= 0; i
<= nb_drives
; i
++) {
6408 bs1
= drives_table
[i
].bdrv
;
6409 if (bdrv_has_snapshot(bs1
)) {
6410 ret
= bdrv_snapshot_goto(bs1
, name
);
6413 term_printf("Warning: ");
6416 term_printf("Snapshots not supported on device '%s'\n",
6417 bdrv_get_device_name(bs1
));
6420 term_printf("Could not find snapshot '%s' on device '%s'\n",
6421 name
, bdrv_get_device_name(bs1
));
6424 term_printf("Error %d while activating snapshot on '%s'\n",
6425 ret
, bdrv_get_device_name(bs1
));
6428 /* fatal on snapshot block device */
6435 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
6436 term_printf("Device %s does not support VM state snapshots\n",
6437 bdrv_get_device_name(bs
));
6441 /* restore the VM state */
6442 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 0);
6444 term_printf("Could not open VM state file\n");
6447 ret
= qemu_loadvm_state(f
);
6450 term_printf("Error %d while loading VM state\n", ret
);
6453 if (saved_vm_running
)
6457 void do_delvm(const char *name
)
6459 BlockDriverState
*bs
, *bs1
;
6462 bs
= get_bs_snapshots();
6464 term_printf("No block device supports snapshots\n");
6468 for(i
= 0; i
<= nb_drives
; i
++) {
6469 bs1
= drives_table
[i
].bdrv
;
6470 if (bdrv_has_snapshot(bs1
)) {
6471 ret
= bdrv_snapshot_delete(bs1
, name
);
6473 if (ret
== -ENOTSUP
)
6474 term_printf("Snapshots not supported on device '%s'\n",
6475 bdrv_get_device_name(bs1
));
6477 term_printf("Error %d while deleting snapshot on '%s'\n",
6478 ret
, bdrv_get_device_name(bs1
));
6484 void do_info_snapshots(void)
6486 BlockDriverState
*bs
, *bs1
;
6487 QEMUSnapshotInfo
*sn_tab
, *sn
;
6491 bs
= get_bs_snapshots();
6493 term_printf("No available block device supports snapshots\n");
6496 term_printf("Snapshot devices:");
6497 for(i
= 0; i
<= nb_drives
; i
++) {
6498 bs1
= drives_table
[i
].bdrv
;
6499 if (bdrv_has_snapshot(bs1
)) {
6501 term_printf(" %s", bdrv_get_device_name(bs1
));
6506 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
6508 term_printf("bdrv_snapshot_list: error %d\n", nb_sns
);
6511 term_printf("Snapshot list (from %s):\n", bdrv_get_device_name(bs
));
6512 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), NULL
));
6513 for(i
= 0; i
< nb_sns
; i
++) {
6515 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), sn
));
6520 /***********************************************************/
6521 /* ram save/restore */
6523 static int ram_get_page(QEMUFile
*f
, uint8_t *buf
, int len
)
6527 v
= qemu_get_byte(f
);
6530 if (qemu_get_buffer(f
, buf
, len
) != len
)
6534 v
= qemu_get_byte(f
);
6535 memset(buf
, v
, len
);
6543 static int ram_load_v1(QEMUFile
*f
, void *opaque
)
6548 if (qemu_get_be32(f
) != phys_ram_size
)
6550 for(i
= 0; i
< phys_ram_size
; i
+= TARGET_PAGE_SIZE
) {
6551 ret
= ram_get_page(f
, phys_ram_base
+ i
, TARGET_PAGE_SIZE
);
6558 #define BDRV_HASH_BLOCK_SIZE 1024
6559 #define IOBUF_SIZE 4096
6560 #define RAM_CBLOCK_MAGIC 0xfabe
6562 typedef struct RamCompressState
{
6565 uint8_t buf
[IOBUF_SIZE
];
6568 static int ram_compress_open(RamCompressState
*s
, QEMUFile
*f
)
6571 memset(s
, 0, sizeof(*s
));
6573 ret
= deflateInit2(&s
->zstream
, 1,
6575 9, Z_DEFAULT_STRATEGY
);
6578 s
->zstream
.avail_out
= IOBUF_SIZE
;
6579 s
->zstream
.next_out
= s
->buf
;
6583 static void ram_put_cblock(RamCompressState
*s
, const uint8_t *buf
, int len
)
6585 qemu_put_be16(s
->f
, RAM_CBLOCK_MAGIC
);
6586 qemu_put_be16(s
->f
, len
);
6587 qemu_put_buffer(s
->f
, buf
, len
);
6590 static int ram_compress_buf(RamCompressState
*s
, const uint8_t *buf
, int len
)
6594 s
->zstream
.avail_in
= len
;
6595 s
->zstream
.next_in
= (uint8_t *)buf
;
6596 while (s
->zstream
.avail_in
> 0) {
6597 ret
= deflate(&s
->zstream
, Z_NO_FLUSH
);
6600 if (s
->zstream
.avail_out
== 0) {
6601 ram_put_cblock(s
, s
->buf
, IOBUF_SIZE
);
6602 s
->zstream
.avail_out
= IOBUF_SIZE
;
6603 s
->zstream
.next_out
= s
->buf
;
6609 static void ram_compress_close(RamCompressState
*s
)
6613 /* compress last bytes */
6615 ret
= deflate(&s
->zstream
, Z_FINISH
);
6616 if (ret
== Z_OK
|| ret
== Z_STREAM_END
) {
6617 len
= IOBUF_SIZE
- s
->zstream
.avail_out
;
6619 ram_put_cblock(s
, s
->buf
, len
);
6621 s
->zstream
.avail_out
= IOBUF_SIZE
;
6622 s
->zstream
.next_out
= s
->buf
;
6623 if (ret
== Z_STREAM_END
)
6630 deflateEnd(&s
->zstream
);
6633 typedef struct RamDecompressState
{
6636 uint8_t buf
[IOBUF_SIZE
];
6637 } RamDecompressState
;
6639 static int ram_decompress_open(RamDecompressState
*s
, QEMUFile
*f
)
6642 memset(s
, 0, sizeof(*s
));
6644 ret
= inflateInit(&s
->zstream
);
6650 static int ram_decompress_buf(RamDecompressState
*s
, uint8_t *buf
, int len
)
6654 s
->zstream
.avail_out
= len
;
6655 s
->zstream
.next_out
= buf
;
6656 while (s
->zstream
.avail_out
> 0) {
6657 if (s
->zstream
.avail_in
== 0) {
6658 if (qemu_get_be16(s
->f
) != RAM_CBLOCK_MAGIC
)
6660 clen
= qemu_get_be16(s
->f
);
6661 if (clen
> IOBUF_SIZE
)
6663 qemu_get_buffer(s
->f
, s
->buf
, clen
);
6664 s
->zstream
.avail_in
= clen
;
6665 s
->zstream
.next_in
= s
->buf
;
6667 ret
= inflate(&s
->zstream
, Z_PARTIAL_FLUSH
);
6668 if (ret
!= Z_OK
&& ret
!= Z_STREAM_END
) {
6675 static void ram_decompress_close(RamDecompressState
*s
)
6677 inflateEnd(&s
->zstream
);
6680 static void ram_save(QEMUFile
*f
, void *opaque
)
6683 RamCompressState s1
, *s
= &s1
;
6686 qemu_put_be32(f
, phys_ram_size
);
6687 if (ram_compress_open(s
, f
) < 0)
6689 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
6691 if (tight_savevm_enabled
) {
6695 /* find if the memory block is available on a virtual
6698 for(j
= 0; j
< nb_drives
; j
++) {
6699 sector_num
= bdrv_hash_find(drives_table
[j
].bdrv
,
6701 BDRV_HASH_BLOCK_SIZE
);
6702 if (sector_num
>= 0)
6706 goto normal_compress
;
6709 cpu_to_be64wu((uint64_t *)(buf
+ 2), sector_num
);
6710 ram_compress_buf(s
, buf
, 10);
6716 ram_compress_buf(s
, buf
, 1);
6717 ram_compress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
);
6720 ram_compress_close(s
);
6723 static int ram_load(QEMUFile
*f
, void *opaque
, int version_id
)
6725 RamDecompressState s1
, *s
= &s1
;
6729 if (version_id
== 1)
6730 return ram_load_v1(f
, opaque
);
6731 if (version_id
!= 2)
6733 if (qemu_get_be32(f
) != phys_ram_size
)
6735 if (ram_decompress_open(s
, f
) < 0)
6737 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
6738 if (ram_decompress_buf(s
, buf
, 1) < 0) {
6739 fprintf(stderr
, "Error while reading ram block header\n");
6743 if (ram_decompress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
) < 0) {
6744 fprintf(stderr
, "Error while reading ram block address=0x%08" PRIx64
, (uint64_t)i
);
6753 ram_decompress_buf(s
, buf
+ 1, 9);
6755 sector_num
= be64_to_cpupu((const uint64_t *)(buf
+ 2));
6756 if (bs_index
>= nb_drives
) {
6757 fprintf(stderr
, "Invalid block device index %d\n", bs_index
);
6760 if (bdrv_read(drives_table
[bs_index
].bdrv
, sector_num
,
6762 BDRV_HASH_BLOCK_SIZE
/ 512) < 0) {
6763 fprintf(stderr
, "Error while reading sector %d:%" PRId64
"\n",
6764 bs_index
, sector_num
);
6771 printf("Error block header\n");
6775 ram_decompress_close(s
);
6779 /***********************************************************/
6780 /* bottom halves (can be seen as timers which expire ASAP) */
6789 static QEMUBH
*first_bh
= NULL
;
6791 QEMUBH
*qemu_bh_new(QEMUBHFunc
*cb
, void *opaque
)
6794 bh
= qemu_mallocz(sizeof(QEMUBH
));
6798 bh
->opaque
= opaque
;
6802 int qemu_bh_poll(void)
6821 void qemu_bh_schedule(QEMUBH
*bh
)
6823 CPUState
*env
= cpu_single_env
;
6827 bh
->next
= first_bh
;
6830 /* stop the currently executing CPU to execute the BH ASAP */
6832 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
6836 void qemu_bh_cancel(QEMUBH
*bh
)
6839 if (bh
->scheduled
) {
6842 pbh
= &(*pbh
)->next
;
6848 void qemu_bh_delete(QEMUBH
*bh
)
6854 /***********************************************************/
6855 /* machine registration */
6857 QEMUMachine
*first_machine
= NULL
;
6859 int qemu_register_machine(QEMUMachine
*m
)
6862 pm
= &first_machine
;
6870 static QEMUMachine
*find_machine(const char *name
)
6874 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
6875 if (!strcmp(m
->name
, name
))
6881 /***********************************************************/
6882 /* main execution loop */
6884 static void gui_update(void *opaque
)
6886 DisplayState
*ds
= opaque
;
6887 ds
->dpy_refresh(ds
);
6888 qemu_mod_timer(ds
->gui_timer
,
6889 (ds
->gui_timer_interval
?
6890 ds
->gui_timer_interval
:
6891 GUI_REFRESH_INTERVAL
)
6892 + qemu_get_clock(rt_clock
));
6895 struct vm_change_state_entry
{
6896 VMChangeStateHandler
*cb
;
6898 LIST_ENTRY (vm_change_state_entry
) entries
;
6901 static LIST_HEAD(vm_change_state_head
, vm_change_state_entry
) vm_change_state_head
;
6903 VMChangeStateEntry
*qemu_add_vm_change_state_handler(VMChangeStateHandler
*cb
,
6906 VMChangeStateEntry
*e
;
6908 e
= qemu_mallocz(sizeof (*e
));
6914 LIST_INSERT_HEAD(&vm_change_state_head
, e
, entries
);
6918 void qemu_del_vm_change_state_handler(VMChangeStateEntry
*e
)
6920 LIST_REMOVE (e
, entries
);
6924 static void vm_state_notify(int running
)
6926 VMChangeStateEntry
*e
;
6928 for (e
= vm_change_state_head
.lh_first
; e
; e
= e
->entries
.le_next
) {
6929 e
->cb(e
->opaque
, running
);
6933 /* XXX: support several handlers */
6934 static VMStopHandler
*vm_stop_cb
;
6935 static void *vm_stop_opaque
;
6937 int qemu_add_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
6940 vm_stop_opaque
= opaque
;
6944 void qemu_del_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
6955 qemu_rearm_alarm_timer(alarm_timer
);
6959 void vm_stop(int reason
)
6962 cpu_disable_ticks();
6966 vm_stop_cb(vm_stop_opaque
, reason
);
6973 /* reset/shutdown handler */
6975 typedef struct QEMUResetEntry
{
6976 QEMUResetHandler
*func
;
6978 struct QEMUResetEntry
*next
;
6981 static QEMUResetEntry
*first_reset_entry
;
6982 static int reset_requested
;
6983 static int shutdown_requested
;
6984 static int powerdown_requested
;
6986 int qemu_shutdown_requested(void)
6988 int r
= shutdown_requested
;
6989 shutdown_requested
= 0;
6993 int qemu_reset_requested(void)
6995 int r
= reset_requested
;
6996 reset_requested
= 0;
7000 int qemu_powerdown_requested(void)
7002 int r
= powerdown_requested
;
7003 powerdown_requested
= 0;
7007 void qemu_register_reset(QEMUResetHandler
*func
, void *opaque
)
7009 QEMUResetEntry
**pre
, *re
;
7011 pre
= &first_reset_entry
;
7012 while (*pre
!= NULL
)
7013 pre
= &(*pre
)->next
;
7014 re
= qemu_mallocz(sizeof(QEMUResetEntry
));
7016 re
->opaque
= opaque
;
7021 void qemu_system_reset(void)
7025 /* reset all devices */
7026 for(re
= first_reset_entry
; re
!= NULL
; re
= re
->next
) {
7027 re
->func(re
->opaque
);
7031 void qemu_system_reset_request(void)
7034 shutdown_requested
= 1;
7036 reset_requested
= 1;
7039 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7042 void qemu_system_shutdown_request(void)
7044 shutdown_requested
= 1;
7046 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7049 void qemu_system_powerdown_request(void)
7051 powerdown_requested
= 1;
7053 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7056 void main_loop_wait(int timeout
)
7058 IOHandlerRecord
*ioh
;
7059 fd_set rfds
, wfds
, xfds
;
7068 /* XXX: need to suppress polling by better using win32 events */
7070 for(pe
= first_polling_entry
; pe
!= NULL
; pe
= pe
->next
) {
7071 ret
|= pe
->func(pe
->opaque
);
7076 WaitObjects
*w
= &wait_objects
;
7078 ret
= WaitForMultipleObjects(w
->num
, w
->events
, FALSE
, timeout
);
7079 if (WAIT_OBJECT_0
+ 0 <= ret
&& ret
<= WAIT_OBJECT_0
+ w
->num
- 1) {
7080 if (w
->func
[ret
- WAIT_OBJECT_0
])
7081 w
->func
[ret
- WAIT_OBJECT_0
](w
->opaque
[ret
- WAIT_OBJECT_0
]);
7083 /* Check for additional signaled events */
7084 for(i
= (ret
- WAIT_OBJECT_0
+ 1); i
< w
->num
; i
++) {
7086 /* Check if event is signaled */
7087 ret2
= WaitForSingleObject(w
->events
[i
], 0);
7088 if(ret2
== WAIT_OBJECT_0
) {
7090 w
->func
[i
](w
->opaque
[i
]);
7091 } else if (ret2
== WAIT_TIMEOUT
) {
7093 err
= GetLastError();
7094 fprintf(stderr
, "WaitForSingleObject error %d %d\n", i
, err
);
7097 } else if (ret
== WAIT_TIMEOUT
) {
7099 err
= GetLastError();
7100 fprintf(stderr
, "WaitForMultipleObjects error %d %d\n", ret
, err
);
7104 /* poll any events */
7105 /* XXX: separate device handlers from system ones */
7110 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7114 (!ioh
->fd_read_poll
||
7115 ioh
->fd_read_poll(ioh
->opaque
) != 0)) {
7116 FD_SET(ioh
->fd
, &rfds
);
7120 if (ioh
->fd_write
) {
7121 FD_SET(ioh
->fd
, &wfds
);
7131 tv
.tv_usec
= timeout
* 1000;
7133 #if defined(CONFIG_SLIRP)
7135 slirp_select_fill(&nfds
, &rfds
, &wfds
, &xfds
);
7138 ret
= select(nfds
+ 1, &rfds
, &wfds
, &xfds
, &tv
);
7140 IOHandlerRecord
**pioh
;
7142 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7143 if (!ioh
->deleted
&& ioh
->fd_read
&& FD_ISSET(ioh
->fd
, &rfds
)) {
7144 ioh
->fd_read(ioh
->opaque
);
7146 if (!ioh
->deleted
&& ioh
->fd_write
&& FD_ISSET(ioh
->fd
, &wfds
)) {
7147 ioh
->fd_write(ioh
->opaque
);
7151 /* remove deleted IO handlers */
7152 pioh
= &first_io_handler
;
7162 #if defined(CONFIG_SLIRP)
7169 slirp_select_poll(&rfds
, &wfds
, &xfds
);
7175 if (likely(!(cur_cpu
->singlestep_enabled
& SSTEP_NOTIMER
)))
7176 qemu_run_timers(&active_timers
[QEMU_TIMER_VIRTUAL
],
7177 qemu_get_clock(vm_clock
));
7178 /* run dma transfers, if any */
7182 /* real time timers */
7183 qemu_run_timers(&active_timers
[QEMU_TIMER_REALTIME
],
7184 qemu_get_clock(rt_clock
));
7186 if (alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) {
7187 alarm_timer
->flags
&= ~(ALARM_FLAG_EXPIRED
);
7188 qemu_rearm_alarm_timer(alarm_timer
);
7191 /* Check bottom-halves last in case any of the earlier events triggered
7197 static int main_loop(void)
7200 #ifdef CONFIG_PROFILER
7205 cur_cpu
= first_cpu
;
7206 next_cpu
= cur_cpu
->next_cpu
?: first_cpu
;
7213 #ifdef CONFIG_PROFILER
7214 ti
= profile_getclock();
7219 qemu_icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
7220 env
->icount_decr
.u16
.low
= 0;
7221 env
->icount_extra
= 0;
7222 count
= qemu_next_deadline();
7223 count
= (count
+ (1 << icount_time_shift
) - 1)
7224 >> icount_time_shift
;
7225 qemu_icount
+= count
;
7226 decr
= (count
> 0xffff) ? 0xffff : count
;
7228 env
->icount_decr
.u16
.low
= decr
;
7229 env
->icount_extra
= count
;
7231 ret
= cpu_exec(env
);
7232 #ifdef CONFIG_PROFILER
7233 qemu_time
+= profile_getclock() - ti
;
7236 /* Fold pending instructions back into the
7237 instruction counter, and clear the interrupt flag. */
7238 qemu_icount
-= (env
->icount_decr
.u16
.low
7239 + env
->icount_extra
);
7240 env
->icount_decr
.u32
= 0;
7241 env
->icount_extra
= 0;
7243 next_cpu
= env
->next_cpu
?: first_cpu
;
7244 if (event_pending
&& likely(ret
!= EXCP_DEBUG
)) {
7245 ret
= EXCP_INTERRUPT
;
7249 if (ret
== EXCP_HLT
) {
7250 /* Give the next CPU a chance to run. */
7254 if (ret
!= EXCP_HALTED
)
7256 /* all CPUs are halted ? */
7262 if (shutdown_requested
) {
7263 ret
= EXCP_INTERRUPT
;
7271 if (reset_requested
) {
7272 reset_requested
= 0;
7273 qemu_system_reset();
7274 ret
= EXCP_INTERRUPT
;
7276 if (powerdown_requested
) {
7277 powerdown_requested
= 0;
7278 qemu_system_powerdown();
7279 ret
= EXCP_INTERRUPT
;
7281 if (unlikely(ret
== EXCP_DEBUG
)) {
7282 vm_stop(EXCP_DEBUG
);
7284 /* If all cpus are halted then wait until the next IRQ */
7285 /* XXX: use timeout computed from timers */
7286 if (ret
== EXCP_HALTED
) {
7290 /* Advance virtual time to the next event. */
7291 if (use_icount
== 1) {
7292 /* When not using an adaptive execution frequency
7293 we tend to get badly out of sync with real time,
7294 so just delay for a reasonable amount of time. */
7297 delta
= cpu_get_icount() - cpu_get_clock();
7300 /* If virtual time is ahead of real time then just
7302 timeout
= (delta
/ 1000000) + 1;
7304 /* Wait for either IO to occur or the next
7306 add
= qemu_next_deadline();
7307 /* We advance the timer before checking for IO.
7308 Limit the amount we advance so that early IO
7309 activity won't get the guest too far ahead. */
7313 add
= (add
+ (1 << icount_time_shift
) - 1)
7314 >> icount_time_shift
;
7316 timeout
= delta
/ 1000000;
7329 #ifdef CONFIG_PROFILER
7330 ti
= profile_getclock();
7332 main_loop_wait(timeout
);
7333 #ifdef CONFIG_PROFILER
7334 dev_time
+= profile_getclock() - ti
;
7337 cpu_disable_ticks();
7341 static void help(int exitcode
)
7343 printf("QEMU PC emulator version " QEMU_VERSION
", Copyright (c) 2003-2008 Fabrice Bellard\n"
7344 "usage: %s [options] [disk_image]\n"
7346 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
7348 "Standard options:\n"
7349 "-M machine select emulated machine (-M ? for list)\n"
7350 "-cpu cpu select CPU (-cpu ? for list)\n"
7351 "-fda/-fdb file use 'file' as floppy disk 0/1 image\n"
7352 "-hda/-hdb file use 'file' as IDE hard disk 0/1 image\n"
7353 "-hdc/-hdd file use 'file' as IDE hard disk 2/3 image\n"
7354 "-cdrom file use 'file' as IDE cdrom image (cdrom is ide1 master)\n"
7355 "-drive [file=file][,if=type][,bus=n][,unit=m][,media=d][,index=i]\n"
7356 " [,cyls=c,heads=h,secs=s[,trans=t]][,snapshot=on|off]\n"
7357 " [,cache=on|off][,format=f]\n"
7358 " use 'file' as a drive image\n"
7359 "-mtdblock file use 'file' as on-board Flash memory image\n"
7360 "-sd file use 'file' as SecureDigital card image\n"
7361 "-pflash file use 'file' as a parallel flash image\n"
7362 "-boot [a|c|d|n] boot on floppy (a), hard disk (c), CD-ROM (d), or network (n)\n"
7363 "-snapshot write to temporary files instead of disk image files\n"
7365 "-no-frame open SDL window without a frame and window decorations\n"
7366 "-alt-grab use Ctrl-Alt-Shift to grab mouse (instead of Ctrl-Alt)\n"
7367 "-no-quit disable SDL window close capability\n"
7370 "-no-fd-bootchk disable boot signature checking for floppy disks\n"
7372 "-m megs set virtual RAM size to megs MB [default=%d]\n"
7373 "-smp n set the number of CPUs to 'n' [default=1]\n"
7374 "-nographic disable graphical output and redirect serial I/Os to console\n"
7375 "-portrait rotate graphical output 90 deg left (only PXA LCD)\n"
7377 "-k language use keyboard layout (for example \"fr\" for French)\n"
7380 "-audio-help print list of audio drivers and their options\n"
7381 "-soundhw c1,... enable audio support\n"
7382 " and only specified sound cards (comma separated list)\n"
7383 " use -soundhw ? to get the list of supported cards\n"
7384 " use -soundhw all to enable all of them\n"
7386 "-localtime set the real time clock to local time [default=utc]\n"
7387 "-full-screen start in full screen\n"
7389 "-win2k-hack use it when installing Windows 2000 to avoid a disk full bug\n"
7391 "-usb enable the USB driver (will be the default soon)\n"
7392 "-usbdevice name add the host or guest USB device 'name'\n"
7393 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
7394 "-g WxH[xDEPTH] Set the initial graphical resolution and depth\n"
7396 "-name string set the name of the guest\n"
7398 "Network options:\n"
7399 "-net nic[,vlan=n][,macaddr=addr][,model=type]\n"
7400 " create a new Network Interface Card and connect it to VLAN 'n'\n"
7402 "-net user[,vlan=n][,hostname=host]\n"
7403 " connect the user mode network stack to VLAN 'n' and send\n"
7404 " hostname 'host' to DHCP clients\n"
7407 "-net tap[,vlan=n],ifname=name\n"
7408 " connect the host TAP network interface to VLAN 'n'\n"
7410 "-net tap[,vlan=n][,fd=h][,ifname=name][,script=file][,downscript=dfile]\n"
7411 " connect the host TAP network interface to VLAN 'n' and use the\n"
7412 " network scripts 'file' (default=%s)\n"
7413 " and 'dfile' (default=%s);\n"
7414 " use '[down]script=no' to disable script execution;\n"
7415 " use 'fd=h' to connect to an already opened TAP interface\n"
7417 "-net socket[,vlan=n][,fd=h][,listen=[host]:port][,connect=host:port]\n"
7418 " connect the vlan 'n' to another VLAN using a socket connection\n"
7419 "-net socket[,vlan=n][,fd=h][,mcast=maddr:port]\n"
7420 " connect the vlan 'n' to multicast maddr and port\n"
7421 "-net none use it alone to have zero network devices; if no -net option\n"
7422 " is provided, the default is '-net nic -net user'\n"
7425 "-tftp dir allow tftp access to files in dir [-net user]\n"
7426 "-bootp file advertise file in BOOTP replies\n"
7428 "-smb dir allow SMB access to files in 'dir' [-net user]\n"
7430 "-redir [tcp|udp]:host-port:[guest-host]:guest-port\n"
7431 " redirect TCP or UDP connections from host to guest [-net user]\n"
7434 "Linux boot specific:\n"
7435 "-kernel bzImage use 'bzImage' as kernel image\n"
7436 "-append cmdline use 'cmdline' as kernel command line\n"
7437 "-initrd file use 'file' as initial ram disk\n"
7439 "Debug/Expert options:\n"
7440 "-monitor dev redirect the monitor to char device 'dev'\n"
7441 "-serial dev redirect the serial port to char device 'dev'\n"
7442 "-parallel dev redirect the parallel port to char device 'dev'\n"
7443 "-pidfile file Write PID to 'file'\n"
7444 "-S freeze CPU at startup (use 'c' to start execution)\n"
7445 "-s wait gdb connection to port\n"
7446 "-p port set gdb connection port [default=%s]\n"
7447 "-d item1,... output log to %s (use -d ? for a list of log items)\n"
7448 "-hdachs c,h,s[,t] force hard disk 0 physical geometry and the optional BIOS\n"
7449 " translation (t=none or lba) (usually qemu can guess them)\n"
7450 "-L path set the directory for the BIOS, VGA BIOS and keymaps\n"
7452 "-kernel-kqemu enable KQEMU full virtualization (default is user mode only)\n"
7453 "-no-kqemu disable KQEMU kernel module usage\n"
7456 "-std-vga simulate a standard VGA card with VESA Bochs Extensions\n"
7457 " (default is CL-GD5446 PCI VGA)\n"
7458 "-no-acpi disable ACPI\n"
7460 #ifdef CONFIG_CURSES
7461 "-curses use a curses/ncurses interface instead of SDL\n"
7463 "-no-reboot exit instead of rebooting\n"
7464 "-no-shutdown stop before shutdown\n"
7465 "-loadvm [tag|id] start right away with a saved state (loadvm in monitor)\n"
7466 "-vnc display start a VNC server on display\n"
7468 "-daemonize daemonize QEMU after initializing\n"
7470 "-option-rom rom load a file, rom, into the option ROM space\n"
7472 "-prom-env variable=value set OpenBIOS nvram variables\n"
7474 "-clock force the use of the given methods for timer alarm.\n"
7475 " To see what timers are available use -clock ?\n"
7476 "-startdate select initial date of the clock\n"
7477 "-icount [N|auto]\n"
7478 " Enable virtual instruction counter with 2^N clock ticks per instruction\n"
7480 "During emulation, the following keys are useful:\n"
7481 "ctrl-alt-f toggle full screen\n"
7482 "ctrl-alt-n switch to virtual console 'n'\n"
7483 "ctrl-alt toggle mouse and keyboard grab\n"
7485 "When using -nographic, press 'ctrl-a h' to get some help.\n"
7490 DEFAULT_NETWORK_SCRIPT
,
7491 DEFAULT_NETWORK_DOWN_SCRIPT
,
7493 DEFAULT_GDBSTUB_PORT
,
7498 #define HAS_ARG 0x0001
7513 QEMU_OPTION_mtdblock
,
7517 QEMU_OPTION_snapshot
,
7519 QEMU_OPTION_no_fd_bootchk
,
7522 QEMU_OPTION_nographic
,
7523 QEMU_OPTION_portrait
,
7525 QEMU_OPTION_audio_help
,
7526 QEMU_OPTION_soundhw
,
7547 QEMU_OPTION_localtime
,
7548 QEMU_OPTION_cirrusvga
,
7551 QEMU_OPTION_std_vga
,
7553 QEMU_OPTION_monitor
,
7555 QEMU_OPTION_parallel
,
7557 QEMU_OPTION_full_screen
,
7558 QEMU_OPTION_no_frame
,
7559 QEMU_OPTION_alt_grab
,
7560 QEMU_OPTION_no_quit
,
7561 QEMU_OPTION_pidfile
,
7562 QEMU_OPTION_no_kqemu
,
7563 QEMU_OPTION_kernel_kqemu
,
7564 QEMU_OPTION_win2k_hack
,
7566 QEMU_OPTION_usbdevice
,
7569 QEMU_OPTION_no_acpi
,
7571 QEMU_OPTION_no_reboot
,
7572 QEMU_OPTION_no_shutdown
,
7573 QEMU_OPTION_show_cursor
,
7574 QEMU_OPTION_daemonize
,
7575 QEMU_OPTION_option_rom
,
7576 QEMU_OPTION_semihosting
,
7578 QEMU_OPTION_prom_env
,
7579 QEMU_OPTION_old_param
,
7581 QEMU_OPTION_startdate
,
7582 QEMU_OPTION_tb_size
,
7586 typedef struct QEMUOption
{
7592 const QEMUOption qemu_options
[] = {
7593 { "h", 0, QEMU_OPTION_h
},
7594 { "help", 0, QEMU_OPTION_h
},
7596 { "M", HAS_ARG
, QEMU_OPTION_M
},
7597 { "cpu", HAS_ARG
, QEMU_OPTION_cpu
},
7598 { "fda", HAS_ARG
, QEMU_OPTION_fda
},
7599 { "fdb", HAS_ARG
, QEMU_OPTION_fdb
},
7600 { "hda", HAS_ARG
, QEMU_OPTION_hda
},
7601 { "hdb", HAS_ARG
, QEMU_OPTION_hdb
},
7602 { "hdc", HAS_ARG
, QEMU_OPTION_hdc
},
7603 { "hdd", HAS_ARG
, QEMU_OPTION_hdd
},
7604 { "drive", HAS_ARG
, QEMU_OPTION_drive
},
7605 { "cdrom", HAS_ARG
, QEMU_OPTION_cdrom
},
7606 { "mtdblock", HAS_ARG
, QEMU_OPTION_mtdblock
},
7607 { "sd", HAS_ARG
, QEMU_OPTION_sd
},
7608 { "pflash", HAS_ARG
, QEMU_OPTION_pflash
},
7609 { "boot", HAS_ARG
, QEMU_OPTION_boot
},
7610 { "snapshot", 0, QEMU_OPTION_snapshot
},
7612 { "no-fd-bootchk", 0, QEMU_OPTION_no_fd_bootchk
},
7614 { "m", HAS_ARG
, QEMU_OPTION_m
},
7615 { "nographic", 0, QEMU_OPTION_nographic
},
7616 { "portrait", 0, QEMU_OPTION_portrait
},
7617 { "k", HAS_ARG
, QEMU_OPTION_k
},
7619 { "audio-help", 0, QEMU_OPTION_audio_help
},
7620 { "soundhw", HAS_ARG
, QEMU_OPTION_soundhw
},
7623 { "net", HAS_ARG
, QEMU_OPTION_net
},
7625 { "tftp", HAS_ARG
, QEMU_OPTION_tftp
},
7626 { "bootp", HAS_ARG
, QEMU_OPTION_bootp
},
7628 { "smb", HAS_ARG
, QEMU_OPTION_smb
},
7630 { "redir", HAS_ARG
, QEMU_OPTION_redir
},
7633 { "kernel", HAS_ARG
, QEMU_OPTION_kernel
},
7634 { "append", HAS_ARG
, QEMU_OPTION_append
},
7635 { "initrd", HAS_ARG
, QEMU_OPTION_initrd
},
7637 { "S", 0, QEMU_OPTION_S
},
7638 { "s", 0, QEMU_OPTION_s
},
7639 { "p", HAS_ARG
, QEMU_OPTION_p
},
7640 { "d", HAS_ARG
, QEMU_OPTION_d
},
7641 { "hdachs", HAS_ARG
, QEMU_OPTION_hdachs
},
7642 { "L", HAS_ARG
, QEMU_OPTION_L
},
7643 { "bios", HAS_ARG
, QEMU_OPTION_bios
},
7645 { "no-kqemu", 0, QEMU_OPTION_no_kqemu
},
7646 { "kernel-kqemu", 0, QEMU_OPTION_kernel_kqemu
},
7648 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
7649 { "g", 1, QEMU_OPTION_g
},
7651 { "localtime", 0, QEMU_OPTION_localtime
},
7652 { "std-vga", 0, QEMU_OPTION_std_vga
},
7653 { "echr", HAS_ARG
, QEMU_OPTION_echr
},
7654 { "monitor", HAS_ARG
, QEMU_OPTION_monitor
},
7655 { "serial", HAS_ARG
, QEMU_OPTION_serial
},
7656 { "parallel", HAS_ARG
, QEMU_OPTION_parallel
},
7657 { "loadvm", HAS_ARG
, QEMU_OPTION_loadvm
},
7658 { "full-screen", 0, QEMU_OPTION_full_screen
},
7660 { "no-frame", 0, QEMU_OPTION_no_frame
},
7661 { "alt-grab", 0, QEMU_OPTION_alt_grab
},
7662 { "no-quit", 0, QEMU_OPTION_no_quit
},
7664 { "pidfile", HAS_ARG
, QEMU_OPTION_pidfile
},
7665 { "win2k-hack", 0, QEMU_OPTION_win2k_hack
},
7666 { "usbdevice", HAS_ARG
, QEMU_OPTION_usbdevice
},
7667 { "smp", HAS_ARG
, QEMU_OPTION_smp
},
7668 { "vnc", HAS_ARG
, QEMU_OPTION_vnc
},
7669 #ifdef CONFIG_CURSES
7670 { "curses", 0, QEMU_OPTION_curses
},
7673 /* temporary options */
7674 { "usb", 0, QEMU_OPTION_usb
},
7675 { "cirrusvga", 0, QEMU_OPTION_cirrusvga
},
7676 { "vmwarevga", 0, QEMU_OPTION_vmsvga
},
7677 { "no-acpi", 0, QEMU_OPTION_no_acpi
},
7678 { "no-reboot", 0, QEMU_OPTION_no_reboot
},
7679 { "no-shutdown", 0, QEMU_OPTION_no_shutdown
},
7680 { "show-cursor", 0, QEMU_OPTION_show_cursor
},
7681 { "daemonize", 0, QEMU_OPTION_daemonize
},
7682 { "option-rom", HAS_ARG
, QEMU_OPTION_option_rom
},
7683 #if defined(TARGET_ARM) || defined(TARGET_M68K)
7684 { "semihosting", 0, QEMU_OPTION_semihosting
},
7686 { "name", HAS_ARG
, QEMU_OPTION_name
},
7687 #if defined(TARGET_SPARC)
7688 { "prom-env", HAS_ARG
, QEMU_OPTION_prom_env
},
7690 #if defined(TARGET_ARM)
7691 { "old-param", 0, QEMU_OPTION_old_param
},
7693 { "clock", HAS_ARG
, QEMU_OPTION_clock
},
7694 { "startdate", HAS_ARG
, QEMU_OPTION_startdate
},
7695 { "tb-size", HAS_ARG
, QEMU_OPTION_tb_size
},
7696 { "icount", HAS_ARG
, QEMU_OPTION_icount
},
7700 /* password input */
7702 int qemu_key_check(BlockDriverState
*bs
, const char *name
)
7707 if (!bdrv_is_encrypted(bs
))
7710 term_printf("%s is encrypted.\n", name
);
7711 for(i
= 0; i
< 3; i
++) {
7712 monitor_readline("Password: ", 1, password
, sizeof(password
));
7713 if (bdrv_set_key(bs
, password
) == 0)
7715 term_printf("invalid password\n");
7720 static BlockDriverState
*get_bdrv(int index
)
7722 if (index
> nb_drives
)
7724 return drives_table
[index
].bdrv
;
7727 static void read_passwords(void)
7729 BlockDriverState
*bs
;
7732 for(i
= 0; i
< 6; i
++) {
7735 qemu_key_check(bs
, bdrv_get_device_name(bs
));
7740 struct soundhw soundhw
[] = {
7741 #ifdef HAS_AUDIO_CHOICE
7742 #if defined(TARGET_I386) || defined(TARGET_MIPS)
7748 { .init_isa
= pcspk_audio_init
}
7753 "Creative Sound Blaster 16",
7756 { .init_isa
= SB16_init
}
7759 #ifdef CONFIG_CS4231A
7765 { .init_isa
= cs4231a_init
}
7773 "Yamaha YMF262 (OPL3)",
7775 "Yamaha YM3812 (OPL2)",
7779 { .init_isa
= Adlib_init
}
7786 "Gravis Ultrasound GF1",
7789 { .init_isa
= GUS_init
}
7796 "Intel 82801AA AC97 Audio",
7799 { .init_pci
= ac97_init
}
7805 "ENSONIQ AudioPCI ES1370",
7808 { .init_pci
= es1370_init
}
7812 { NULL
, NULL
, 0, 0, { NULL
} }
7815 static void select_soundhw (const char *optarg
)
7819 if (*optarg
== '?') {
7822 printf ("Valid sound card names (comma separated):\n");
7823 for (c
= soundhw
; c
->name
; ++c
) {
7824 printf ("%-11s %s\n", c
->name
, c
->descr
);
7826 printf ("\n-soundhw all will enable all of the above\n");
7827 exit (*optarg
!= '?');
7835 if (!strcmp (optarg
, "all")) {
7836 for (c
= soundhw
; c
->name
; ++c
) {
7844 e
= strchr (p
, ',');
7845 l
= !e
? strlen (p
) : (size_t) (e
- p
);
7847 for (c
= soundhw
; c
->name
; ++c
) {
7848 if (!strncmp (c
->name
, p
, l
)) {
7857 "Unknown sound card name (too big to show)\n");
7860 fprintf (stderr
, "Unknown sound card name `%.*s'\n",
7865 p
+= l
+ (e
!= NULL
);
7869 goto show_valid_cards
;
7875 static BOOL WINAPI
qemu_ctrl_handler(DWORD type
)
7877 exit(STATUS_CONTROL_C_EXIT
);
7882 #define MAX_NET_CLIENTS 32
7884 int main(int argc
, char **argv
)
7886 #ifdef CONFIG_GDBSTUB
7888 const char *gdbstub_port
;
7890 uint32_t boot_devices_bitmap
= 0;
7892 int snapshot
, linux_boot
, net_boot
;
7893 const char *initrd_filename
;
7894 const char *kernel_filename
, *kernel_cmdline
;
7895 const char *boot_devices
= "";
7896 DisplayState
*ds
= &display_state
;
7897 int cyls
, heads
, secs
, translation
;
7898 const char *net_clients
[MAX_NET_CLIENTS
];
7902 const char *r
, *optarg
;
7903 CharDriverState
*monitor_hd
;
7904 const char *monitor_device
;
7905 const char *serial_devices
[MAX_SERIAL_PORTS
];
7906 int serial_device_index
;
7907 const char *parallel_devices
[MAX_PARALLEL_PORTS
];
7908 int parallel_device_index
;
7909 const char *loadvm
= NULL
;
7910 QEMUMachine
*machine
;
7911 const char *cpu_model
;
7912 const char *usb_devices
[MAX_USB_CMDLINE
];
7913 int usb_devices_index
;
7916 const char *pid_file
= NULL
;
7919 LIST_INIT (&vm_change_state_head
);
7922 struct sigaction act
;
7923 sigfillset(&act
.sa_mask
);
7925 act
.sa_handler
= SIG_IGN
;
7926 sigaction(SIGPIPE
, &act
, NULL
);
7929 SetConsoleCtrlHandler(qemu_ctrl_handler
, TRUE
);
7930 /* Note: cpu_interrupt() is currently not SMP safe, so we force
7931 QEMU to run on a single CPU */
7936 h
= GetCurrentProcess();
7937 if (GetProcessAffinityMask(h
, &mask
, &smask
)) {
7938 for(i
= 0; i
< 32; i
++) {
7939 if (mask
& (1 << i
))
7944 SetProcessAffinityMask(h
, mask
);
7950 register_machines();
7951 machine
= first_machine
;
7953 initrd_filename
= NULL
;
7955 vga_ram_size
= VGA_RAM_SIZE
;
7956 #ifdef CONFIG_GDBSTUB
7958 gdbstub_port
= DEFAULT_GDBSTUB_PORT
;
7963 kernel_filename
= NULL
;
7964 kernel_cmdline
= "";
7965 cyls
= heads
= secs
= 0;
7966 translation
= BIOS_ATA_TRANSLATION_AUTO
;
7967 monitor_device
= "vc";
7969 serial_devices
[0] = "vc:80Cx24C";
7970 for(i
= 1; i
< MAX_SERIAL_PORTS
; i
++)
7971 serial_devices
[i
] = NULL
;
7972 serial_device_index
= 0;
7974 parallel_devices
[0] = "vc:640x480";
7975 for(i
= 1; i
< MAX_PARALLEL_PORTS
; i
++)
7976 parallel_devices
[i
] = NULL
;
7977 parallel_device_index
= 0;
7979 usb_devices_index
= 0;
7996 hda_index
= drive_add(argv
[optind
++], HD_ALIAS
, 0);
7998 const QEMUOption
*popt
;
8001 /* Treat --foo the same as -foo. */
8004 popt
= qemu_options
;
8007 fprintf(stderr
, "%s: invalid option -- '%s'\n",
8011 if (!strcmp(popt
->name
, r
+ 1))
8015 if (popt
->flags
& HAS_ARG
) {
8016 if (optind
>= argc
) {
8017 fprintf(stderr
, "%s: option '%s' requires an argument\n",
8021 optarg
= argv
[optind
++];
8026 switch(popt
->index
) {
8028 machine
= find_machine(optarg
);
8031 printf("Supported machines are:\n");
8032 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
8033 printf("%-10s %s%s\n",
8035 m
== first_machine
? " (default)" : "");
8037 exit(*optarg
!= '?');
8040 case QEMU_OPTION_cpu
:
8041 /* hw initialization will check this */
8042 if (*optarg
== '?') {
8043 /* XXX: implement xxx_cpu_list for targets that still miss it */
8044 #if defined(cpu_list)
8045 cpu_list(stdout
, &fprintf
);
8052 case QEMU_OPTION_initrd
:
8053 initrd_filename
= optarg
;
8055 case QEMU_OPTION_hda
:
8057 hda_index
= drive_add(optarg
, HD_ALIAS
, 0);
8059 hda_index
= drive_add(optarg
, HD_ALIAS
8060 ",cyls=%d,heads=%d,secs=%d%s",
8061 0, cyls
, heads
, secs
,
8062 translation
== BIOS_ATA_TRANSLATION_LBA
?
8064 translation
== BIOS_ATA_TRANSLATION_NONE
?
8065 ",trans=none" : "");
8067 case QEMU_OPTION_hdb
:
8068 case QEMU_OPTION_hdc
:
8069 case QEMU_OPTION_hdd
:
8070 drive_add(optarg
, HD_ALIAS
, popt
->index
- QEMU_OPTION_hda
);
8072 case QEMU_OPTION_drive
:
8073 drive_add(NULL
, "%s", optarg
);
8075 case QEMU_OPTION_mtdblock
:
8076 drive_add(optarg
, MTD_ALIAS
);
8078 case QEMU_OPTION_sd
:
8079 drive_add(optarg
, SD_ALIAS
);
8081 case QEMU_OPTION_pflash
:
8082 drive_add(optarg
, PFLASH_ALIAS
);
8084 case QEMU_OPTION_snapshot
:
8087 case QEMU_OPTION_hdachs
:
8091 cyls
= strtol(p
, (char **)&p
, 0);
8092 if (cyls
< 1 || cyls
> 16383)
8097 heads
= strtol(p
, (char **)&p
, 0);
8098 if (heads
< 1 || heads
> 16)
8103 secs
= strtol(p
, (char **)&p
, 0);
8104 if (secs
< 1 || secs
> 63)
8108 if (!strcmp(p
, "none"))
8109 translation
= BIOS_ATA_TRANSLATION_NONE
;
8110 else if (!strcmp(p
, "lba"))
8111 translation
= BIOS_ATA_TRANSLATION_LBA
;
8112 else if (!strcmp(p
, "auto"))
8113 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8116 } else if (*p
!= '\0') {
8118 fprintf(stderr
, "qemu: invalid physical CHS format\n");
8121 if (hda_index
!= -1)
8122 snprintf(drives_opt
[hda_index
].opt
,
8123 sizeof(drives_opt
[hda_index
].opt
),
8124 HD_ALIAS
",cyls=%d,heads=%d,secs=%d%s",
8125 0, cyls
, heads
, secs
,
8126 translation
== BIOS_ATA_TRANSLATION_LBA
?
8128 translation
== BIOS_ATA_TRANSLATION_NONE
?
8129 ",trans=none" : "");
8132 case QEMU_OPTION_nographic
:
8133 serial_devices
[0] = "stdio";
8134 parallel_devices
[0] = "null";
8135 monitor_device
= "stdio";
8138 #ifdef CONFIG_CURSES
8139 case QEMU_OPTION_curses
:
8143 case QEMU_OPTION_portrait
:
8146 case QEMU_OPTION_kernel
:
8147 kernel_filename
= optarg
;
8149 case QEMU_OPTION_append
:
8150 kernel_cmdline
= optarg
;
8152 case QEMU_OPTION_cdrom
:
8153 drive_add(optarg
, CDROM_ALIAS
);
8155 case QEMU_OPTION_boot
:
8156 boot_devices
= optarg
;
8157 /* We just do some generic consistency checks */
8159 /* Could easily be extended to 64 devices if needed */
8162 boot_devices_bitmap
= 0;
8163 for (p
= boot_devices
; *p
!= '\0'; p
++) {
8164 /* Allowed boot devices are:
8165 * a b : floppy disk drives
8166 * c ... f : IDE disk drives
8167 * g ... m : machine implementation dependant drives
8168 * n ... p : network devices
8169 * It's up to each machine implementation to check
8170 * if the given boot devices match the actual hardware
8171 * implementation and firmware features.
8173 if (*p
< 'a' || *p
> 'q') {
8174 fprintf(stderr
, "Invalid boot device '%c'\n", *p
);
8177 if (boot_devices_bitmap
& (1 << (*p
- 'a'))) {
8179 "Boot device '%c' was given twice\n",*p
);
8182 boot_devices_bitmap
|= 1 << (*p
- 'a');
8186 case QEMU_OPTION_fda
:
8187 case QEMU_OPTION_fdb
:
8188 drive_add(optarg
, FD_ALIAS
, popt
->index
- QEMU_OPTION_fda
);
8191 case QEMU_OPTION_no_fd_bootchk
:
8195 case QEMU_OPTION_net
:
8196 if (nb_net_clients
>= MAX_NET_CLIENTS
) {
8197 fprintf(stderr
, "qemu: too many network clients\n");
8200 net_clients
[nb_net_clients
] = optarg
;
8204 case QEMU_OPTION_tftp
:
8205 tftp_prefix
= optarg
;
8207 case QEMU_OPTION_bootp
:
8208 bootp_filename
= optarg
;
8211 case QEMU_OPTION_smb
:
8212 net_slirp_smb(optarg
);
8215 case QEMU_OPTION_redir
:
8216 net_slirp_redir(optarg
);
8220 case QEMU_OPTION_audio_help
:
8224 case QEMU_OPTION_soundhw
:
8225 select_soundhw (optarg
);
8231 case QEMU_OPTION_m
: {
8235 value
= strtoul(optarg
, &ptr
, 10);
8237 case 0: case 'M': case 'm':
8244 fprintf(stderr
, "qemu: invalid ram size: %s\n", optarg
);
8248 /* On 32-bit hosts, QEMU is limited by virtual address space */
8249 if (value
> (2047 << 20)
8251 && HOST_LONG_BITS
== 32
8254 fprintf(stderr
, "qemu: at most 2047 MB RAM can be simulated\n");
8257 if (value
!= (uint64_t)(ram_addr_t
)value
) {
8258 fprintf(stderr
, "qemu: ram size too large\n");
8269 mask
= cpu_str_to_log_mask(optarg
);
8271 printf("Log items (comma separated):\n");
8272 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
8273 printf("%-10s %s\n", item
->name
, item
->help
);
8280 #ifdef CONFIG_GDBSTUB
8285 gdbstub_port
= optarg
;
8291 case QEMU_OPTION_bios
:
8298 keyboard_layout
= optarg
;
8300 case QEMU_OPTION_localtime
:
8303 case QEMU_OPTION_cirrusvga
:
8304 cirrus_vga_enabled
= 1;
8307 case QEMU_OPTION_vmsvga
:
8308 cirrus_vga_enabled
= 0;
8311 case QEMU_OPTION_std_vga
:
8312 cirrus_vga_enabled
= 0;
8320 w
= strtol(p
, (char **)&p
, 10);
8323 fprintf(stderr
, "qemu: invalid resolution or depth\n");
8329 h
= strtol(p
, (char **)&p
, 10);
8334 depth
= strtol(p
, (char **)&p
, 10);
8335 if (depth
!= 8 && depth
!= 15 && depth
!= 16 &&
8336 depth
!= 24 && depth
!= 32)
8338 } else if (*p
== '\0') {
8339 depth
= graphic_depth
;
8346 graphic_depth
= depth
;
8349 case QEMU_OPTION_echr
:
8352 term_escape_char
= strtol(optarg
, &r
, 0);
8354 printf("Bad argument to echr\n");
8357 case QEMU_OPTION_monitor
:
8358 monitor_device
= optarg
;
8360 case QEMU_OPTION_serial
:
8361 if (serial_device_index
>= MAX_SERIAL_PORTS
) {
8362 fprintf(stderr
, "qemu: too many serial ports\n");
8365 serial_devices
[serial_device_index
] = optarg
;
8366 serial_device_index
++;
8368 case QEMU_OPTION_parallel
:
8369 if (parallel_device_index
>= MAX_PARALLEL_PORTS
) {
8370 fprintf(stderr
, "qemu: too many parallel ports\n");
8373 parallel_devices
[parallel_device_index
] = optarg
;
8374 parallel_device_index
++;
8376 case QEMU_OPTION_loadvm
:
8379 case QEMU_OPTION_full_screen
:
8383 case QEMU_OPTION_no_frame
:
8386 case QEMU_OPTION_alt_grab
:
8389 case QEMU_OPTION_no_quit
:
8393 case QEMU_OPTION_pidfile
:
8397 case QEMU_OPTION_win2k_hack
:
8398 win2k_install_hack
= 1;
8402 case QEMU_OPTION_no_kqemu
:
8405 case QEMU_OPTION_kernel_kqemu
:
8409 case QEMU_OPTION_usb
:
8412 case QEMU_OPTION_usbdevice
:
8414 if (usb_devices_index
>= MAX_USB_CMDLINE
) {
8415 fprintf(stderr
, "Too many USB devices\n");
8418 usb_devices
[usb_devices_index
] = optarg
;
8419 usb_devices_index
++;
8421 case QEMU_OPTION_smp
:
8422 smp_cpus
= atoi(optarg
);
8423 if (smp_cpus
< 1 || smp_cpus
> MAX_CPUS
) {
8424 fprintf(stderr
, "Invalid number of CPUs\n");
8428 case QEMU_OPTION_vnc
:
8429 vnc_display
= optarg
;
8431 case QEMU_OPTION_no_acpi
:
8434 case QEMU_OPTION_no_reboot
:
8437 case QEMU_OPTION_no_shutdown
:
8440 case QEMU_OPTION_show_cursor
:
8443 case QEMU_OPTION_daemonize
:
8446 case QEMU_OPTION_option_rom
:
8447 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
8448 fprintf(stderr
, "Too many option ROMs\n");
8451 option_rom
[nb_option_roms
] = optarg
;
8454 case QEMU_OPTION_semihosting
:
8455 semihosting_enabled
= 1;
8457 case QEMU_OPTION_name
:
8461 case QEMU_OPTION_prom_env
:
8462 if (nb_prom_envs
>= MAX_PROM_ENVS
) {
8463 fprintf(stderr
, "Too many prom variables\n");
8466 prom_envs
[nb_prom_envs
] = optarg
;
8471 case QEMU_OPTION_old_param
:
8475 case QEMU_OPTION_clock
:
8476 configure_alarms(optarg
);
8478 case QEMU_OPTION_startdate
:
8481 time_t rtc_start_date
;
8482 if (!strcmp(optarg
, "now")) {
8483 rtc_date_offset
= -1;
8485 if (sscanf(optarg
, "%d-%d-%dT%d:%d:%d",
8493 } else if (sscanf(optarg
, "%d-%d-%d",
8496 &tm
.tm_mday
) == 3) {
8505 rtc_start_date
= mktimegm(&tm
);
8506 if (rtc_start_date
== -1) {
8508 fprintf(stderr
, "Invalid date format. Valid format are:\n"
8509 "'now' or '2006-06-17T16:01:21' or '2006-06-17'\n");
8512 rtc_date_offset
= time(NULL
) - rtc_start_date
;
8516 case QEMU_OPTION_tb_size
:
8517 tb_size
= strtol(optarg
, NULL
, 0);
8521 case QEMU_OPTION_icount
:
8523 if (strcmp(optarg
, "auto") == 0) {
8524 icount_time_shift
= -1;
8526 icount_time_shift
= strtol(optarg
, NULL
, 0);
8534 if (daemonize
&& !nographic
&& vnc_display
== NULL
) {
8535 fprintf(stderr
, "Can only daemonize if using -nographic or -vnc\n");
8542 if (pipe(fds
) == -1)
8553 len
= read(fds
[0], &status
, 1);
8554 if (len
== -1 && (errno
== EINTR
))
8559 else if (status
== 1) {
8560 fprintf(stderr
, "Could not acquire pidfile\n");
8578 signal(SIGTSTP
, SIG_IGN
);
8579 signal(SIGTTOU
, SIG_IGN
);
8580 signal(SIGTTIN
, SIG_IGN
);
8584 if (pid_file
&& qemu_create_pidfile(pid_file
) != 0) {
8587 write(fds
[1], &status
, 1);
8589 fprintf(stderr
, "Could not acquire pid file\n");
8597 linux_boot
= (kernel_filename
!= NULL
);
8598 net_boot
= (boot_devices_bitmap
>> ('n' - 'a')) & 0xF;
8600 /* XXX: this should not be: some embedded targets just have flash */
8601 if (!linux_boot
&& net_boot
== 0 &&
8605 if (!linux_boot
&& *kernel_cmdline
!= '\0') {
8606 fprintf(stderr
, "-append only allowed with -kernel option\n");
8610 if (!linux_boot
&& initrd_filename
!= NULL
) {
8611 fprintf(stderr
, "-initrd only allowed with -kernel option\n");
8615 /* boot to floppy or the default cd if no hard disk defined yet */
8616 if (!boot_devices
[0]) {
8617 boot_devices
= "cad";
8619 setvbuf(stdout
, NULL
, _IOLBF
, 0);
8624 if (use_icount
&& icount_time_shift
< 0) {
8626 /* 125MIPS seems a reasonable initial guess at the guest speed.
8627 It will be corrected fairly quickly anyway. */
8628 icount_time_shift
= 3;
8629 init_icount_adjust();
8636 /* init network clients */
8637 if (nb_net_clients
== 0) {
8638 /* if no clients, we use a default config */
8639 net_clients
[0] = "nic";
8640 net_clients
[1] = "user";
8644 for(i
= 0;i
< nb_net_clients
; i
++) {
8645 if (net_client_init(net_clients
[i
]) < 0)
8648 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
8649 if (vlan
->nb_guest_devs
== 0 && vlan
->nb_host_devs
== 0)
8651 if (vlan
->nb_guest_devs
== 0) {
8652 fprintf(stderr
, "Invalid vlan (%d) with no nics\n", vlan
->id
);
8655 if (vlan
->nb_host_devs
== 0)
8657 "Warning: vlan %d is not connected to host network\n",
8662 /* XXX: this should be moved in the PC machine instantiation code */
8663 if (net_boot
!= 0) {
8665 for (i
= 0; i
< nb_nics
&& i
< 4; i
++) {
8666 const char *model
= nd_table
[i
].model
;
8668 if (net_boot
& (1 << i
)) {
8671 snprintf(buf
, sizeof(buf
), "%s/pxe-%s.bin", bios_dir
, model
);
8672 if (get_image_size(buf
) > 0) {
8673 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
8674 fprintf(stderr
, "Too many option ROMs\n");
8677 option_rom
[nb_option_roms
] = strdup(buf
);
8684 fprintf(stderr
, "No valid PXE rom found for network device\n");
8690 /* init the memory */
8691 phys_ram_size
= machine
->ram_require
& ~RAMSIZE_FIXED
;
8693 if (machine
->ram_require
& RAMSIZE_FIXED
) {
8695 if (ram_size
< phys_ram_size
) {
8696 fprintf(stderr
, "Machine `%s' requires %llu bytes of memory\n",
8697 machine
->name
, (unsigned long long) phys_ram_size
);
8701 phys_ram_size
= ram_size
;
8703 ram_size
= phys_ram_size
;
8706 ram_size
= DEFAULT_RAM_SIZE
* 1024 * 1024;
8708 phys_ram_size
+= ram_size
;
8711 phys_ram_base
= qemu_vmalloc(phys_ram_size
);
8712 if (!phys_ram_base
) {
8713 fprintf(stderr
, "Could not allocate physical memory\n");
8717 /* init the dynamic translator */
8718 cpu_exec_init_all(tb_size
* 1024 * 1024);
8722 /* we always create the cdrom drive, even if no disk is there */
8724 if (nb_drives_opt
< MAX_DRIVES
)
8725 drive_add(NULL
, CDROM_ALIAS
);
8727 /* we always create at least one floppy */
8729 if (nb_drives_opt
< MAX_DRIVES
)
8730 drive_add(NULL
, FD_ALIAS
, 0);
8732 /* we always create one sd slot, even if no card is in it */
8734 if (nb_drives_opt
< MAX_DRIVES
)
8735 drive_add(NULL
, SD_ALIAS
);
8737 /* open the virtual block devices */
8739 for(i
= 0; i
< nb_drives_opt
; i
++)
8740 if (drive_init(&drives_opt
[i
], snapshot
, machine
) == -1)
8743 register_savevm("timer", 0, 2, timer_save
, timer_load
, NULL
);
8744 register_savevm("ram", 0, 2, ram_save
, ram_load
, NULL
);
8749 memset(&display_state
, 0, sizeof(display_state
));
8752 fprintf(stderr
, "fatal: -nographic can't be used with -curses\n");
8755 /* nearly nothing to do */
8756 dumb_display_init(ds
);
8757 } else if (vnc_display
!= NULL
) {
8758 vnc_display_init(ds
);
8759 if (vnc_display_open(ds
, vnc_display
) < 0)
8762 #if defined(CONFIG_CURSES)
8764 curses_display_init(ds
, full_screen
);
8768 #if defined(CONFIG_SDL)
8769 sdl_display_init(ds
, full_screen
, no_frame
);
8770 #elif defined(CONFIG_COCOA)
8771 cocoa_display_init(ds
, full_screen
);
8773 dumb_display_init(ds
);
8777 /* Maintain compatibility with multiple stdio monitors */
8778 if (!strcmp(monitor_device
,"stdio")) {
8779 for (i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
8780 const char *devname
= serial_devices
[i
];
8781 if (devname
&& !strcmp(devname
,"mon:stdio")) {
8782 monitor_device
= NULL
;
8784 } else if (devname
&& !strcmp(devname
,"stdio")) {
8785 monitor_device
= NULL
;
8786 serial_devices
[i
] = "mon:stdio";
8791 if (monitor_device
) {
8792 monitor_hd
= qemu_chr_open(monitor_device
);
8794 fprintf(stderr
, "qemu: could not open monitor device '%s'\n", monitor_device
);
8797 monitor_init(monitor_hd
, !nographic
);
8800 for(i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
8801 const char *devname
= serial_devices
[i
];
8802 if (devname
&& strcmp(devname
, "none")) {
8803 serial_hds
[i
] = qemu_chr_open(devname
);
8804 if (!serial_hds
[i
]) {
8805 fprintf(stderr
, "qemu: could not open serial device '%s'\n",
8809 if (strstart(devname
, "vc", 0))
8810 qemu_chr_printf(serial_hds
[i
], "serial%d console\r\n", i
);
8814 for(i
= 0; i
< MAX_PARALLEL_PORTS
; i
++) {
8815 const char *devname
= parallel_devices
[i
];
8816 if (devname
&& strcmp(devname
, "none")) {
8817 parallel_hds
[i
] = qemu_chr_open(devname
);
8818 if (!parallel_hds
[i
]) {
8819 fprintf(stderr
, "qemu: could not open parallel device '%s'\n",
8823 if (strstart(devname
, "vc", 0))
8824 qemu_chr_printf(parallel_hds
[i
], "parallel%d console\r\n", i
);
8828 machine
->init(ram_size
, vga_ram_size
, boot_devices
, ds
,
8829 kernel_filename
, kernel_cmdline
, initrd_filename
, cpu_model
);
8831 /* init USB devices */
8833 for(i
= 0; i
< usb_devices_index
; i
++) {
8834 if (usb_device_add(usb_devices
[i
]) < 0) {
8835 fprintf(stderr
, "Warning: could not add USB device %s\n",
8841 if (display_state
.dpy_refresh
) {
8842 display_state
.gui_timer
= qemu_new_timer(rt_clock
, gui_update
, &display_state
);
8843 qemu_mod_timer(display_state
.gui_timer
, qemu_get_clock(rt_clock
));
8846 #ifdef CONFIG_GDBSTUB
8848 /* XXX: use standard host:port notation and modify options
8850 if (gdbserver_start(gdbstub_port
) < 0) {
8851 fprintf(stderr
, "qemu: could not open gdbstub device on port '%s'\n",
8862 /* XXX: simplify init */
8875 len
= write(fds
[1], &status
, 1);
8876 if (len
== -1 && (errno
== EINTR
))
8882 TFR(fd
= open("/dev/null", O_RDWR
));
8896 #if !defined(_WIN32)
8897 /* close network clients */
8898 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
8899 VLANClientState
*vc
;
8901 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
8902 if (vc
->fd_read
== tap_receive
) {
8904 TAPState
*s
= vc
->opaque
;
8906 if (sscanf(vc
->info_str
, "tap: ifname=%63s ", ifname
) == 1 &&
8908 launch_script(s
->down_script
, ifname
, s
->fd
);