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"
37 #include "qemu-timer.h"
38 #include "qemu-char.h"
40 #include "audio/audio.h"
41 #include "migration.h"
52 #include <sys/times.h>
56 #include <sys/ioctl.h>
57 #include <sys/socket.h>
58 #include <netinet/in.h>
61 #include <sys/select.h>
62 #include <arpa/inet.h>
65 #if !defined(__APPLE__) && !defined(__OpenBSD__)
71 #elif defined (__GLIBC__) && defined (__FreeBSD_kernel__)
72 #include <freebsd/stdlib.h>
76 #include <linux/if_tun.h>
79 #include <linux/rtc.h>
81 /* For the benefit of older linux systems which don't supply it,
82 we use a local copy of hpet.h. */
83 /* #include <linux/hpet.h> */
86 #include <linux/ppdev.h>
87 #include <linux/parport.h>
91 #include <sys/ethernet.h>
92 #include <sys/sockio.h>
93 #include <netinet/arp.h>
94 #include <netinet/in.h>
95 #include <netinet/in_systm.h>
96 #include <netinet/ip.h>
97 #include <netinet/ip_icmp.h> // must come after ip.h
98 #include <netinet/udp.h>
99 #include <netinet/tcp.h>
107 #include "qemu_socket.h"
109 #if defined(CONFIG_SLIRP)
110 #include "libslirp.h"
113 #if defined(__OpenBSD__)
117 #if defined(CONFIG_VDE)
118 #include <libvdeplug.h>
123 #include <sys/timeb.h>
124 #include <mmsystem.h>
125 #define getopt_long_only getopt_long
126 #define memalign(align, size) malloc(size)
133 #endif /* CONFIG_SDL */
137 #define main qemu_main
138 #endif /* CONFIG_COCOA */
142 #include "exec-all.h"
144 #define DEFAULT_NETWORK_SCRIPT "/etc/qemu-ifup"
145 #define DEFAULT_NETWORK_DOWN_SCRIPT "/etc/qemu-ifdown"
147 #define SMBD_COMMAND "/usr/sfw/sbin/smbd"
149 #define SMBD_COMMAND "/usr/sbin/smbd"
152 //#define DEBUG_UNUSED_IOPORT
153 //#define DEBUG_IOPORT
155 //#define DEBUG_SLIRP
158 #define DEFAULT_RAM_SIZE 144
160 #define DEFAULT_RAM_SIZE 128
163 /* Max number of USB devices that can be specified on the commandline. */
164 #define MAX_USB_CMDLINE 8
166 /* XXX: use a two level table to limit memory usage */
167 #define MAX_IOPORTS 65536
169 const char *bios_dir
= CONFIG_QEMU_SHAREDIR
;
170 const char *bios_name
= NULL
;
171 static void *ioport_opaque
[MAX_IOPORTS
];
172 static IOPortReadFunc
*ioport_read_table
[3][MAX_IOPORTS
];
173 static IOPortWriteFunc
*ioport_write_table
[3][MAX_IOPORTS
];
174 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
175 to store the VM snapshots */
176 DriveInfo drives_table
[MAX_DRIVES
+1];
178 /* point to the block driver where the snapshots are managed */
179 static BlockDriverState
*bs_snapshots
;
180 static int vga_ram_size
;
181 enum vga_retrace_method vga_retrace_method
= VGA_RETRACE_DUMB
;
182 static DisplayState display_state
;
185 const char* keyboard_layout
= NULL
;
186 int64_t ticks_per_sec
;
189 NICInfo nd_table
[MAX_NICS
];
191 static int rtc_utc
= 1;
192 static int rtc_date_offset
= -1; /* -1 means no change */
193 int cirrus_vga_enabled
= 1;
194 int vmsvga_enabled
= 0;
196 int graphic_width
= 1024;
197 int graphic_height
= 768;
198 int graphic_depth
= 8;
200 int graphic_width
= 800;
201 int graphic_height
= 600;
202 int graphic_depth
= 15;
204 static int full_screen
= 0;
205 static int no_frame
= 0;
207 CharDriverState
*serial_hds
[MAX_SERIAL_PORTS
];
208 CharDriverState
*parallel_hds
[MAX_PARALLEL_PORTS
];
210 int win2k_install_hack
= 0;
213 static VLANState
*first_vlan
;
215 const char *vnc_display
;
216 int acpi_enabled
= 1;
221 int graphic_rotate
= 0;
223 const char *option_rom
[MAX_OPTION_ROMS
];
225 int semihosting_enabled
= 0;
229 const char *qemu_name
;
232 unsigned int nb_prom_envs
= 0;
233 const char *prom_envs
[MAX_PROM_ENVS
];
235 static int nb_drives_opt
;
236 static struct drive_opt
{
239 } drives_opt
[MAX_DRIVES
];
241 static CPUState
*cur_cpu
;
242 static CPUState
*next_cpu
;
243 static int event_pending
= 1;
244 /* Conversion factor from emulated instructions to virtual clock ticks. */
245 static int icount_time_shift
;
246 /* Arbitrarily pick 1MIPS as the minimum allowable speed. */
247 #define MAX_ICOUNT_SHIFT 10
248 /* Compensate for varying guest execution speed. */
249 static int64_t qemu_icount_bias
;
250 static QEMUTimer
*icount_rt_timer
;
251 static QEMUTimer
*icount_vm_timer
;
253 uint8_t qemu_uuid
[16];
255 #define TFR(expr) do { if ((expr) != -1) break; } while (errno == EINTR)
257 /***********************************************************/
258 /* x86 ISA bus support */
260 target_phys_addr_t isa_mem_base
= 0;
263 static IOPortReadFunc default_ioport_readb
, default_ioport_readw
, default_ioport_readl
;
264 static IOPortWriteFunc default_ioport_writeb
, default_ioport_writew
, default_ioport_writel
;
266 static uint32_t ioport_read(int index
, uint32_t address
)
268 static IOPortReadFunc
*default_func
[3] = {
269 default_ioport_readb
,
270 default_ioport_readw
,
273 IOPortReadFunc
*func
= ioport_read_table
[index
][address
];
275 func
= default_func
[index
];
276 return func(ioport_opaque
[address
], address
);
279 static void ioport_write(int index
, uint32_t address
, uint32_t data
)
281 static IOPortWriteFunc
*default_func
[3] = {
282 default_ioport_writeb
,
283 default_ioport_writew
,
284 default_ioport_writel
286 IOPortWriteFunc
*func
= ioport_write_table
[index
][address
];
288 func
= default_func
[index
];
289 func(ioport_opaque
[address
], address
, data
);
292 static uint32_t default_ioport_readb(void *opaque
, uint32_t address
)
294 #ifdef DEBUG_UNUSED_IOPORT
295 fprintf(stderr
, "unused inb: port=0x%04x\n", address
);
300 static void default_ioport_writeb(void *opaque
, uint32_t address
, uint32_t data
)
302 #ifdef DEBUG_UNUSED_IOPORT
303 fprintf(stderr
, "unused outb: port=0x%04x data=0x%02x\n", address
, data
);
307 /* default is to make two byte accesses */
308 static uint32_t default_ioport_readw(void *opaque
, uint32_t address
)
311 data
= ioport_read(0, address
);
312 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
313 data
|= ioport_read(0, address
) << 8;
317 static void default_ioport_writew(void *opaque
, uint32_t address
, uint32_t data
)
319 ioport_write(0, address
, data
& 0xff);
320 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
321 ioport_write(0, address
, (data
>> 8) & 0xff);
324 static uint32_t default_ioport_readl(void *opaque
, uint32_t address
)
326 #ifdef DEBUG_UNUSED_IOPORT
327 fprintf(stderr
, "unused inl: port=0x%04x\n", address
);
332 static void default_ioport_writel(void *opaque
, uint32_t address
, uint32_t data
)
334 #ifdef DEBUG_UNUSED_IOPORT
335 fprintf(stderr
, "unused outl: port=0x%04x data=0x%02x\n", address
, data
);
339 /* size is the word size in byte */
340 int register_ioport_read(int start
, int length
, int size
,
341 IOPortReadFunc
*func
, void *opaque
)
347 } else if (size
== 2) {
349 } else if (size
== 4) {
352 hw_error("register_ioport_read: invalid size");
355 for(i
= start
; i
< start
+ length
; i
+= size
) {
356 ioport_read_table
[bsize
][i
] = func
;
357 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
358 hw_error("register_ioport_read: invalid opaque");
359 ioport_opaque
[i
] = opaque
;
364 /* size is the word size in byte */
365 int register_ioport_write(int start
, int length
, int size
,
366 IOPortWriteFunc
*func
, void *opaque
)
372 } else if (size
== 2) {
374 } else if (size
== 4) {
377 hw_error("register_ioport_write: invalid size");
380 for(i
= start
; i
< start
+ length
; i
+= size
) {
381 ioport_write_table
[bsize
][i
] = func
;
382 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
383 hw_error("register_ioport_write: invalid opaque");
384 ioport_opaque
[i
] = opaque
;
389 void isa_unassign_ioport(int start
, int length
)
393 for(i
= start
; i
< start
+ length
; i
++) {
394 ioport_read_table
[0][i
] = default_ioport_readb
;
395 ioport_read_table
[1][i
] = default_ioport_readw
;
396 ioport_read_table
[2][i
] = default_ioport_readl
;
398 ioport_write_table
[0][i
] = default_ioport_writeb
;
399 ioport_write_table
[1][i
] = default_ioport_writew
;
400 ioport_write_table
[2][i
] = default_ioport_writel
;
404 /***********************************************************/
406 void cpu_outb(CPUState
*env
, int addr
, int val
)
409 if (loglevel
& CPU_LOG_IOPORT
)
410 fprintf(logfile
, "outb: %04x %02x\n", addr
, val
);
412 ioport_write(0, addr
, val
);
415 env
->last_io_time
= cpu_get_time_fast();
419 void cpu_outw(CPUState
*env
, int addr
, int val
)
422 if (loglevel
& CPU_LOG_IOPORT
)
423 fprintf(logfile
, "outw: %04x %04x\n", addr
, val
);
425 ioport_write(1, addr
, val
);
428 env
->last_io_time
= cpu_get_time_fast();
432 void cpu_outl(CPUState
*env
, int addr
, int val
)
435 if (loglevel
& CPU_LOG_IOPORT
)
436 fprintf(logfile
, "outl: %04x %08x\n", addr
, val
);
438 ioport_write(2, addr
, val
);
441 env
->last_io_time
= cpu_get_time_fast();
445 int cpu_inb(CPUState
*env
, int addr
)
448 val
= ioport_read(0, addr
);
450 if (loglevel
& CPU_LOG_IOPORT
)
451 fprintf(logfile
, "inb : %04x %02x\n", addr
, val
);
455 env
->last_io_time
= cpu_get_time_fast();
460 int cpu_inw(CPUState
*env
, int addr
)
463 val
= ioport_read(1, addr
);
465 if (loglevel
& CPU_LOG_IOPORT
)
466 fprintf(logfile
, "inw : %04x %04x\n", addr
, val
);
470 env
->last_io_time
= cpu_get_time_fast();
475 int cpu_inl(CPUState
*env
, int addr
)
478 val
= ioport_read(2, addr
);
480 if (loglevel
& CPU_LOG_IOPORT
)
481 fprintf(logfile
, "inl : %04x %08x\n", addr
, val
);
485 env
->last_io_time
= cpu_get_time_fast();
490 /***********************************************************/
491 void hw_error(const char *fmt
, ...)
497 fprintf(stderr
, "qemu: hardware error: ");
498 vfprintf(stderr
, fmt
, ap
);
499 fprintf(stderr
, "\n");
500 for(env
= first_cpu
; env
!= NULL
; env
= env
->next_cpu
) {
501 fprintf(stderr
, "CPU #%d:\n", env
->cpu_index
);
503 cpu_dump_state(env
, stderr
, fprintf
, X86_DUMP_FPU
);
505 cpu_dump_state(env
, stderr
, fprintf
, 0);
512 /***********************************************************/
515 static QEMUPutKBDEvent
*qemu_put_kbd_event
;
516 static void *qemu_put_kbd_event_opaque
;
517 static QEMUPutMouseEntry
*qemu_put_mouse_event_head
;
518 static QEMUPutMouseEntry
*qemu_put_mouse_event_current
;
520 void qemu_add_kbd_event_handler(QEMUPutKBDEvent
*func
, void *opaque
)
522 qemu_put_kbd_event_opaque
= opaque
;
523 qemu_put_kbd_event
= func
;
526 QEMUPutMouseEntry
*qemu_add_mouse_event_handler(QEMUPutMouseEvent
*func
,
527 void *opaque
, int absolute
,
530 QEMUPutMouseEntry
*s
, *cursor
;
532 s
= qemu_mallocz(sizeof(QEMUPutMouseEntry
));
536 s
->qemu_put_mouse_event
= func
;
537 s
->qemu_put_mouse_event_opaque
= opaque
;
538 s
->qemu_put_mouse_event_absolute
= absolute
;
539 s
->qemu_put_mouse_event_name
= qemu_strdup(name
);
542 if (!qemu_put_mouse_event_head
) {
543 qemu_put_mouse_event_head
= qemu_put_mouse_event_current
= s
;
547 cursor
= qemu_put_mouse_event_head
;
548 while (cursor
->next
!= NULL
)
549 cursor
= cursor
->next
;
552 qemu_put_mouse_event_current
= s
;
557 void qemu_remove_mouse_event_handler(QEMUPutMouseEntry
*entry
)
559 QEMUPutMouseEntry
*prev
= NULL
, *cursor
;
561 if (!qemu_put_mouse_event_head
|| entry
== NULL
)
564 cursor
= qemu_put_mouse_event_head
;
565 while (cursor
!= NULL
&& cursor
!= entry
) {
567 cursor
= cursor
->next
;
570 if (cursor
== NULL
) // does not exist or list empty
572 else if (prev
== NULL
) { // entry is head
573 qemu_put_mouse_event_head
= cursor
->next
;
574 if (qemu_put_mouse_event_current
== entry
)
575 qemu_put_mouse_event_current
= cursor
->next
;
576 qemu_free(entry
->qemu_put_mouse_event_name
);
581 prev
->next
= entry
->next
;
583 if (qemu_put_mouse_event_current
== entry
)
584 qemu_put_mouse_event_current
= prev
;
586 qemu_free(entry
->qemu_put_mouse_event_name
);
590 void kbd_put_keycode(int keycode
)
592 if (qemu_put_kbd_event
) {
593 qemu_put_kbd_event(qemu_put_kbd_event_opaque
, keycode
);
597 void kbd_mouse_event(int dx
, int dy
, int dz
, int buttons_state
)
599 QEMUPutMouseEvent
*mouse_event
;
600 void *mouse_event_opaque
;
603 if (!qemu_put_mouse_event_current
) {
608 qemu_put_mouse_event_current
->qemu_put_mouse_event
;
610 qemu_put_mouse_event_current
->qemu_put_mouse_event_opaque
;
613 if (graphic_rotate
) {
614 if (qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
)
617 width
= graphic_width
- 1;
618 mouse_event(mouse_event_opaque
,
619 width
- dy
, dx
, dz
, buttons_state
);
621 mouse_event(mouse_event_opaque
,
622 dx
, dy
, dz
, buttons_state
);
626 int kbd_mouse_is_absolute(void)
628 if (!qemu_put_mouse_event_current
)
631 return qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
;
634 void do_info_mice(void)
636 QEMUPutMouseEntry
*cursor
;
639 if (!qemu_put_mouse_event_head
) {
640 term_printf("No mouse devices connected\n");
644 term_printf("Mouse devices available:\n");
645 cursor
= qemu_put_mouse_event_head
;
646 while (cursor
!= NULL
) {
647 term_printf("%c Mouse #%d: %s\n",
648 (cursor
== qemu_put_mouse_event_current
? '*' : ' '),
649 index
, cursor
->qemu_put_mouse_event_name
);
651 cursor
= cursor
->next
;
655 void do_mouse_set(int index
)
657 QEMUPutMouseEntry
*cursor
;
660 if (!qemu_put_mouse_event_head
) {
661 term_printf("No mouse devices connected\n");
665 cursor
= qemu_put_mouse_event_head
;
666 while (cursor
!= NULL
&& index
!= i
) {
668 cursor
= cursor
->next
;
672 qemu_put_mouse_event_current
= cursor
;
674 term_printf("Mouse at given index not found\n");
677 /* compute with 96 bit intermediate result: (a*b)/c */
678 uint64_t muldiv64(uint64_t a
, uint32_t b
, uint32_t c
)
683 #ifdef WORDS_BIGENDIAN
693 rl
= (uint64_t)u
.l
.low
* (uint64_t)b
;
694 rh
= (uint64_t)u
.l
.high
* (uint64_t)b
;
697 res
.l
.low
= (((rh
% c
) << 32) + (rl
& 0xffffffff)) / c
;
701 /***********************************************************/
702 /* real time host monotonic timer */
704 #define QEMU_TIMER_BASE 1000000000LL
708 static int64_t clock_freq
;
710 static void init_get_clock(void)
714 ret
= QueryPerformanceFrequency(&freq
);
716 fprintf(stderr
, "Could not calibrate ticks\n");
719 clock_freq
= freq
.QuadPart
;
722 static int64_t get_clock(void)
725 QueryPerformanceCounter(&ti
);
726 return muldiv64(ti
.QuadPart
, QEMU_TIMER_BASE
, clock_freq
);
731 static int use_rt_clock
;
733 static void init_get_clock(void)
736 #if defined(__linux__) || (defined(__FreeBSD__) && __FreeBSD_version >= 500000)
739 if (clock_gettime(CLOCK_MONOTONIC
, &ts
) == 0) {
746 static int64_t get_clock(void)
748 #if defined(__linux__) || (defined(__FreeBSD__) && __FreeBSD_version >= 500000)
751 clock_gettime(CLOCK_MONOTONIC
, &ts
);
752 return ts
.tv_sec
* 1000000000LL + ts
.tv_nsec
;
756 /* XXX: using gettimeofday leads to problems if the date
757 changes, so it should be avoided. */
759 gettimeofday(&tv
, NULL
);
760 return tv
.tv_sec
* 1000000000LL + (tv
.tv_usec
* 1000);
765 /* Return the virtual CPU time, based on the instruction counter. */
766 static int64_t cpu_get_icount(void)
769 CPUState
*env
= cpu_single_env
;;
770 icount
= qemu_icount
;
773 fprintf(stderr
, "Bad clock read\n");
774 icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
776 return qemu_icount_bias
+ (icount
<< icount_time_shift
);
779 /***********************************************************/
780 /* guest cycle counter */
782 static int64_t cpu_ticks_prev
;
783 static int64_t cpu_ticks_offset
;
784 static int64_t cpu_clock_offset
;
785 static int cpu_ticks_enabled
;
787 /* return the host CPU cycle counter and handle stop/restart */
788 int64_t cpu_get_ticks(void)
791 return cpu_get_icount();
793 if (!cpu_ticks_enabled
) {
794 return cpu_ticks_offset
;
797 ticks
= cpu_get_real_ticks();
798 if (cpu_ticks_prev
> ticks
) {
799 /* Note: non increasing ticks may happen if the host uses
801 cpu_ticks_offset
+= cpu_ticks_prev
- ticks
;
803 cpu_ticks_prev
= ticks
;
804 return ticks
+ cpu_ticks_offset
;
808 /* return the host CPU monotonic timer and handle stop/restart */
809 static int64_t cpu_get_clock(void)
812 if (!cpu_ticks_enabled
) {
813 return cpu_clock_offset
;
816 return ti
+ cpu_clock_offset
;
820 /* enable cpu_get_ticks() */
821 void cpu_enable_ticks(void)
823 if (!cpu_ticks_enabled
) {
824 cpu_ticks_offset
-= cpu_get_real_ticks();
825 cpu_clock_offset
-= get_clock();
826 cpu_ticks_enabled
= 1;
830 /* disable cpu_get_ticks() : the clock is stopped. You must not call
831 cpu_get_ticks() after that. */
832 void cpu_disable_ticks(void)
834 if (cpu_ticks_enabled
) {
835 cpu_ticks_offset
= cpu_get_ticks();
836 cpu_clock_offset
= cpu_get_clock();
837 cpu_ticks_enabled
= 0;
841 /***********************************************************/
844 #define QEMU_TIMER_REALTIME 0
845 #define QEMU_TIMER_VIRTUAL 1
849 /* XXX: add frequency */
857 struct QEMUTimer
*next
;
860 struct qemu_alarm_timer
{
864 int (*start
)(struct qemu_alarm_timer
*t
);
865 void (*stop
)(struct qemu_alarm_timer
*t
);
866 void (*rearm
)(struct qemu_alarm_timer
*t
);
870 #define ALARM_FLAG_DYNTICKS 0x1
871 #define ALARM_FLAG_EXPIRED 0x2
873 static inline int alarm_has_dynticks(struct qemu_alarm_timer
*t
)
875 return t
->flags
& ALARM_FLAG_DYNTICKS
;
878 static void qemu_rearm_alarm_timer(struct qemu_alarm_timer
*t
)
880 if (!alarm_has_dynticks(t
))
886 /* TODO: MIN_TIMER_REARM_US should be optimized */
887 #define MIN_TIMER_REARM_US 250
889 static struct qemu_alarm_timer
*alarm_timer
;
893 struct qemu_alarm_win32
{
897 } alarm_win32_data
= {0, NULL
, -1};
899 static int win32_start_timer(struct qemu_alarm_timer
*t
);
900 static void win32_stop_timer(struct qemu_alarm_timer
*t
);
901 static void win32_rearm_timer(struct qemu_alarm_timer
*t
);
905 static int unix_start_timer(struct qemu_alarm_timer
*t
);
906 static void unix_stop_timer(struct qemu_alarm_timer
*t
);
910 static int dynticks_start_timer(struct qemu_alarm_timer
*t
);
911 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
);
912 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
);
914 static int hpet_start_timer(struct qemu_alarm_timer
*t
);
915 static void hpet_stop_timer(struct qemu_alarm_timer
*t
);
917 static int rtc_start_timer(struct qemu_alarm_timer
*t
);
918 static void rtc_stop_timer(struct qemu_alarm_timer
*t
);
920 #endif /* __linux__ */
924 /* Correlation between real and virtual time is always going to be
925 fairly approximate, so ignore small variation.
926 When the guest is idle real and virtual time will be aligned in
928 #define ICOUNT_WOBBLE (QEMU_TIMER_BASE / 10)
930 static void icount_adjust(void)
935 static int64_t last_delta
;
936 /* If the VM is not running, then do nothing. */
940 cur_time
= cpu_get_clock();
941 cur_icount
= qemu_get_clock(vm_clock
);
942 delta
= cur_icount
- cur_time
;
943 /* FIXME: This is a very crude algorithm, somewhat prone to oscillation. */
945 && last_delta
+ ICOUNT_WOBBLE
< delta
* 2
946 && icount_time_shift
> 0) {
947 /* The guest is getting too far ahead. Slow time down. */
951 && last_delta
- ICOUNT_WOBBLE
> delta
* 2
952 && icount_time_shift
< MAX_ICOUNT_SHIFT
) {
953 /* The guest is getting too far behind. Speed time up. */
957 qemu_icount_bias
= cur_icount
- (qemu_icount
<< icount_time_shift
);
960 static void icount_adjust_rt(void * opaque
)
962 qemu_mod_timer(icount_rt_timer
,
963 qemu_get_clock(rt_clock
) + 1000);
967 static void icount_adjust_vm(void * opaque
)
969 qemu_mod_timer(icount_vm_timer
,
970 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
974 static void init_icount_adjust(void)
976 /* Have both realtime and virtual time triggers for speed adjustment.
977 The realtime trigger catches emulated time passing too slowly,
978 the virtual time trigger catches emulated time passing too fast.
979 Realtime triggers occur even when idle, so use them less frequently
981 icount_rt_timer
= qemu_new_timer(rt_clock
, icount_adjust_rt
, NULL
);
982 qemu_mod_timer(icount_rt_timer
,
983 qemu_get_clock(rt_clock
) + 1000);
984 icount_vm_timer
= qemu_new_timer(vm_clock
, icount_adjust_vm
, NULL
);
985 qemu_mod_timer(icount_vm_timer
,
986 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
989 static struct qemu_alarm_timer alarm_timers
[] = {
992 {"dynticks", ALARM_FLAG_DYNTICKS
, dynticks_start_timer
,
993 dynticks_stop_timer
, dynticks_rearm_timer
, NULL
},
994 /* HPET - if available - is preferred */
995 {"hpet", 0, hpet_start_timer
, hpet_stop_timer
, NULL
, NULL
},
996 /* ...otherwise try RTC */
997 {"rtc", 0, rtc_start_timer
, rtc_stop_timer
, NULL
, NULL
},
999 {"unix", 0, unix_start_timer
, unix_stop_timer
, NULL
, NULL
},
1001 {"dynticks", ALARM_FLAG_DYNTICKS
, win32_start_timer
,
1002 win32_stop_timer
, win32_rearm_timer
, &alarm_win32_data
},
1003 {"win32", 0, win32_start_timer
,
1004 win32_stop_timer
, NULL
, &alarm_win32_data
},
1009 static void show_available_alarms(void)
1013 printf("Available alarm timers, in order of precedence:\n");
1014 for (i
= 0; alarm_timers
[i
].name
; i
++)
1015 printf("%s\n", alarm_timers
[i
].name
);
1018 static void configure_alarms(char const *opt
)
1022 int count
= (sizeof(alarm_timers
) / sizeof(*alarm_timers
)) - 1;
1025 struct qemu_alarm_timer tmp
;
1027 if (!strcmp(opt
, "?")) {
1028 show_available_alarms();
1034 /* Reorder the array */
1035 name
= strtok(arg
, ",");
1037 for (i
= 0; i
< count
&& alarm_timers
[i
].name
; i
++) {
1038 if (!strcmp(alarm_timers
[i
].name
, name
))
1043 fprintf(stderr
, "Unknown clock %s\n", name
);
1052 tmp
= alarm_timers
[i
];
1053 alarm_timers
[i
] = alarm_timers
[cur
];
1054 alarm_timers
[cur
] = tmp
;
1058 name
= strtok(NULL
, ",");
1064 /* Disable remaining timers */
1065 for (i
= cur
; i
< count
; i
++)
1066 alarm_timers
[i
].name
= NULL
;
1068 show_available_alarms();
1073 QEMUClock
*rt_clock
;
1074 QEMUClock
*vm_clock
;
1076 static QEMUTimer
*active_timers
[2];
1078 static QEMUClock
*qemu_new_clock(int type
)
1081 clock
= qemu_mallocz(sizeof(QEMUClock
));
1088 QEMUTimer
*qemu_new_timer(QEMUClock
*clock
, QEMUTimerCB
*cb
, void *opaque
)
1092 ts
= qemu_mallocz(sizeof(QEMUTimer
));
1095 ts
->opaque
= opaque
;
1099 void qemu_free_timer(QEMUTimer
*ts
)
1104 /* stop a timer, but do not dealloc it */
1105 void qemu_del_timer(QEMUTimer
*ts
)
1109 /* NOTE: this code must be signal safe because
1110 qemu_timer_expired() can be called from a signal. */
1111 pt
= &active_timers
[ts
->clock
->type
];
1124 /* modify the current timer so that it will be fired when current_time
1125 >= expire_time. The corresponding callback will be called. */
1126 void qemu_mod_timer(QEMUTimer
*ts
, int64_t expire_time
)
1132 /* add the timer in the sorted list */
1133 /* NOTE: this code must be signal safe because
1134 qemu_timer_expired() can be called from a signal. */
1135 pt
= &active_timers
[ts
->clock
->type
];
1140 if (t
->expire_time
> expire_time
)
1144 ts
->expire_time
= expire_time
;
1148 /* Rearm if necessary */
1149 if (pt
== &active_timers
[ts
->clock
->type
]) {
1150 if ((alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) == 0) {
1151 qemu_rearm_alarm_timer(alarm_timer
);
1153 /* Interrupt execution to force deadline recalculation. */
1154 if (use_icount
&& cpu_single_env
) {
1155 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
1160 int qemu_timer_pending(QEMUTimer
*ts
)
1163 for(t
= active_timers
[ts
->clock
->type
]; t
!= NULL
; t
= t
->next
) {
1170 static inline int qemu_timer_expired(QEMUTimer
*timer_head
, int64_t current_time
)
1174 return (timer_head
->expire_time
<= current_time
);
1177 static void qemu_run_timers(QEMUTimer
**ptimer_head
, int64_t current_time
)
1183 if (!ts
|| ts
->expire_time
> current_time
)
1185 /* remove timer from the list before calling the callback */
1186 *ptimer_head
= ts
->next
;
1189 /* run the callback (the timer list can be modified) */
1194 int64_t qemu_get_clock(QEMUClock
*clock
)
1196 switch(clock
->type
) {
1197 case QEMU_TIMER_REALTIME
:
1198 return get_clock() / 1000000;
1200 case QEMU_TIMER_VIRTUAL
:
1202 return cpu_get_icount();
1204 return cpu_get_clock();
1209 static void init_timers(void)
1212 ticks_per_sec
= QEMU_TIMER_BASE
;
1213 rt_clock
= qemu_new_clock(QEMU_TIMER_REALTIME
);
1214 vm_clock
= qemu_new_clock(QEMU_TIMER_VIRTUAL
);
1218 void qemu_put_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1220 uint64_t expire_time
;
1222 if (qemu_timer_pending(ts
)) {
1223 expire_time
= ts
->expire_time
;
1227 qemu_put_be64(f
, expire_time
);
1230 void qemu_get_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1232 uint64_t expire_time
;
1234 expire_time
= qemu_get_be64(f
);
1235 if (expire_time
!= -1) {
1236 qemu_mod_timer(ts
, expire_time
);
1242 static void timer_save(QEMUFile
*f
, void *opaque
)
1244 if (cpu_ticks_enabled
) {
1245 hw_error("cannot save state if virtual timers are running");
1247 qemu_put_be64(f
, cpu_ticks_offset
);
1248 qemu_put_be64(f
, ticks_per_sec
);
1249 qemu_put_be64(f
, cpu_clock_offset
);
1252 static int timer_load(QEMUFile
*f
, void *opaque
, int version_id
)
1254 if (version_id
!= 1 && version_id
!= 2)
1256 if (cpu_ticks_enabled
) {
1259 cpu_ticks_offset
=qemu_get_be64(f
);
1260 ticks_per_sec
=qemu_get_be64(f
);
1261 if (version_id
== 2) {
1262 cpu_clock_offset
=qemu_get_be64(f
);
1268 void CALLBACK
host_alarm_handler(UINT uTimerID
, UINT uMsg
,
1269 DWORD_PTR dwUser
, DWORD_PTR dw1
, DWORD_PTR dw2
)
1271 static void host_alarm_handler(int host_signum
)
1275 #define DISP_FREQ 1000
1277 static int64_t delta_min
= INT64_MAX
;
1278 static int64_t delta_max
, delta_cum
, last_clock
, delta
, ti
;
1280 ti
= qemu_get_clock(vm_clock
);
1281 if (last_clock
!= 0) {
1282 delta
= ti
- last_clock
;
1283 if (delta
< delta_min
)
1285 if (delta
> delta_max
)
1288 if (++count
== DISP_FREQ
) {
1289 printf("timer: min=%" PRId64
" us max=%" PRId64
" us avg=%" PRId64
" us avg_freq=%0.3f Hz\n",
1290 muldiv64(delta_min
, 1000000, ticks_per_sec
),
1291 muldiv64(delta_max
, 1000000, ticks_per_sec
),
1292 muldiv64(delta_cum
, 1000000 / DISP_FREQ
, ticks_per_sec
),
1293 (double)ticks_per_sec
/ ((double)delta_cum
/ DISP_FREQ
));
1295 delta_min
= INT64_MAX
;
1303 if (alarm_has_dynticks(alarm_timer
) ||
1305 qemu_timer_expired(active_timers
[QEMU_TIMER_VIRTUAL
],
1306 qemu_get_clock(vm_clock
))) ||
1307 qemu_timer_expired(active_timers
[QEMU_TIMER_REALTIME
],
1308 qemu_get_clock(rt_clock
))) {
1310 struct qemu_alarm_win32
*data
= ((struct qemu_alarm_timer
*)dwUser
)->priv
;
1311 SetEvent(data
->host_alarm
);
1313 CPUState
*env
= next_cpu
;
1315 alarm_timer
->flags
|= ALARM_FLAG_EXPIRED
;
1318 /* stop the currently executing cpu because a timer occured */
1319 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
1321 if (env
->kqemu_enabled
) {
1322 kqemu_cpu_interrupt(env
);
1330 static int64_t qemu_next_deadline(void)
1334 if (active_timers
[QEMU_TIMER_VIRTUAL
]) {
1335 delta
= active_timers
[QEMU_TIMER_VIRTUAL
]->expire_time
-
1336 qemu_get_clock(vm_clock
);
1338 /* To avoid problems with overflow limit this to 2^32. */
1348 #if defined(__linux__) || defined(_WIN32)
1349 static uint64_t qemu_next_deadline_dyntick(void)
1357 delta
= (qemu_next_deadline() + 999) / 1000;
1359 if (active_timers
[QEMU_TIMER_REALTIME
]) {
1360 rtdelta
= (active_timers
[QEMU_TIMER_REALTIME
]->expire_time
-
1361 qemu_get_clock(rt_clock
))*1000;
1362 if (rtdelta
< delta
)
1366 if (delta
< MIN_TIMER_REARM_US
)
1367 delta
= MIN_TIMER_REARM_US
;
1375 #if defined(__linux__)
1377 #define RTC_FREQ 1024
1379 static void enable_sigio_timer(int fd
)
1381 struct sigaction act
;
1384 sigfillset(&act
.sa_mask
);
1386 act
.sa_handler
= host_alarm_handler
;
1388 sigaction(SIGIO
, &act
, NULL
);
1389 fcntl(fd
, F_SETFL
, O_ASYNC
);
1390 fcntl(fd
, F_SETOWN
, getpid());
1393 static int hpet_start_timer(struct qemu_alarm_timer
*t
)
1395 struct hpet_info info
;
1398 fd
= open("/dev/hpet", O_RDONLY
);
1403 r
= ioctl(fd
, HPET_IRQFREQ
, RTC_FREQ
);
1405 fprintf(stderr
, "Could not configure '/dev/hpet' to have a 1024Hz timer. This is not a fatal\n"
1406 "error, but for better emulation accuracy type:\n"
1407 "'echo 1024 > /proc/sys/dev/hpet/max-user-freq' as root.\n");
1411 /* Check capabilities */
1412 r
= ioctl(fd
, HPET_INFO
, &info
);
1416 /* Enable periodic mode */
1417 r
= ioctl(fd
, HPET_EPI
, 0);
1418 if (info
.hi_flags
&& (r
< 0))
1421 /* Enable interrupt */
1422 r
= ioctl(fd
, HPET_IE_ON
, 0);
1426 enable_sigio_timer(fd
);
1427 t
->priv
= (void *)(long)fd
;
1435 static void hpet_stop_timer(struct qemu_alarm_timer
*t
)
1437 int fd
= (long)t
->priv
;
1442 static int rtc_start_timer(struct qemu_alarm_timer
*t
)
1445 unsigned long current_rtc_freq
= 0;
1447 TFR(rtc_fd
= open("/dev/rtc", O_RDONLY
));
1450 ioctl(rtc_fd
, RTC_IRQP_READ
, ¤t_rtc_freq
);
1451 if (current_rtc_freq
!= RTC_FREQ
&&
1452 ioctl(rtc_fd
, RTC_IRQP_SET
, RTC_FREQ
) < 0) {
1453 fprintf(stderr
, "Could not configure '/dev/rtc' to have a 1024 Hz timer. This is not a fatal\n"
1454 "error, but for better emulation accuracy either use a 2.6 host Linux kernel or\n"
1455 "type 'echo 1024 > /proc/sys/dev/rtc/max-user-freq' as root.\n");
1458 if (ioctl(rtc_fd
, RTC_PIE_ON
, 0) < 0) {
1464 enable_sigio_timer(rtc_fd
);
1466 t
->priv
= (void *)(long)rtc_fd
;
1471 static void rtc_stop_timer(struct qemu_alarm_timer
*t
)
1473 int rtc_fd
= (long)t
->priv
;
1478 static int dynticks_start_timer(struct qemu_alarm_timer
*t
)
1482 struct sigaction act
;
1484 sigfillset(&act
.sa_mask
);
1486 act
.sa_handler
= host_alarm_handler
;
1488 sigaction(SIGALRM
, &act
, NULL
);
1490 ev
.sigev_value
.sival_int
= 0;
1491 ev
.sigev_notify
= SIGEV_SIGNAL
;
1492 ev
.sigev_signo
= SIGALRM
;
1494 if (timer_create(CLOCK_REALTIME
, &ev
, &host_timer
)) {
1495 perror("timer_create");
1497 /* disable dynticks */
1498 fprintf(stderr
, "Dynamic Ticks disabled\n");
1503 t
->priv
= (void *)host_timer
;
1508 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
)
1510 timer_t host_timer
= (timer_t
)t
->priv
;
1512 timer_delete(host_timer
);
1515 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
)
1517 timer_t host_timer
= (timer_t
)t
->priv
;
1518 struct itimerspec timeout
;
1519 int64_t nearest_delta_us
= INT64_MAX
;
1522 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1523 !active_timers
[QEMU_TIMER_VIRTUAL
])
1526 nearest_delta_us
= qemu_next_deadline_dyntick();
1528 /* check whether a timer is already running */
1529 if (timer_gettime(host_timer
, &timeout
)) {
1531 fprintf(stderr
, "Internal timer error: aborting\n");
1534 current_us
= timeout
.it_value
.tv_sec
* 1000000 + timeout
.it_value
.tv_nsec
/1000;
1535 if (current_us
&& current_us
<= nearest_delta_us
)
1538 timeout
.it_interval
.tv_sec
= 0;
1539 timeout
.it_interval
.tv_nsec
= 0; /* 0 for one-shot timer */
1540 timeout
.it_value
.tv_sec
= nearest_delta_us
/ 1000000;
1541 timeout
.it_value
.tv_nsec
= (nearest_delta_us
% 1000000) * 1000;
1542 if (timer_settime(host_timer
, 0 /* RELATIVE */, &timeout
, NULL
)) {
1544 fprintf(stderr
, "Internal timer error: aborting\n");
1549 #endif /* defined(__linux__) */
1551 static int unix_start_timer(struct qemu_alarm_timer
*t
)
1553 struct sigaction act
;
1554 struct itimerval itv
;
1558 sigfillset(&act
.sa_mask
);
1560 act
.sa_handler
= host_alarm_handler
;
1562 sigaction(SIGALRM
, &act
, NULL
);
1564 itv
.it_interval
.tv_sec
= 0;
1565 /* for i386 kernel 2.6 to get 1 ms */
1566 itv
.it_interval
.tv_usec
= 999;
1567 itv
.it_value
.tv_sec
= 0;
1568 itv
.it_value
.tv_usec
= 10 * 1000;
1570 err
= setitimer(ITIMER_REAL
, &itv
, NULL
);
1577 static void unix_stop_timer(struct qemu_alarm_timer
*t
)
1579 struct itimerval itv
;
1581 memset(&itv
, 0, sizeof(itv
));
1582 setitimer(ITIMER_REAL
, &itv
, NULL
);
1585 #endif /* !defined(_WIN32) */
1589 static int win32_start_timer(struct qemu_alarm_timer
*t
)
1592 struct qemu_alarm_win32
*data
= t
->priv
;
1595 data
->host_alarm
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1596 if (!data
->host_alarm
) {
1597 perror("Failed CreateEvent");
1601 memset(&tc
, 0, sizeof(tc
));
1602 timeGetDevCaps(&tc
, sizeof(tc
));
1604 if (data
->period
< tc
.wPeriodMin
)
1605 data
->period
= tc
.wPeriodMin
;
1607 timeBeginPeriod(data
->period
);
1609 flags
= TIME_CALLBACK_FUNCTION
;
1610 if (alarm_has_dynticks(t
))
1611 flags
|= TIME_ONESHOT
;
1613 flags
|= TIME_PERIODIC
;
1615 data
->timerId
= timeSetEvent(1, // interval (ms)
1616 data
->period
, // resolution
1617 host_alarm_handler
, // function
1618 (DWORD
)t
, // parameter
1621 if (!data
->timerId
) {
1622 perror("Failed to initialize win32 alarm timer");
1624 timeEndPeriod(data
->period
);
1625 CloseHandle(data
->host_alarm
);
1629 qemu_add_wait_object(data
->host_alarm
, NULL
, NULL
);
1634 static void win32_stop_timer(struct qemu_alarm_timer
*t
)
1636 struct qemu_alarm_win32
*data
= t
->priv
;
1638 timeKillEvent(data
->timerId
);
1639 timeEndPeriod(data
->period
);
1641 CloseHandle(data
->host_alarm
);
1644 static void win32_rearm_timer(struct qemu_alarm_timer
*t
)
1646 struct qemu_alarm_win32
*data
= t
->priv
;
1647 uint64_t nearest_delta_us
;
1649 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1650 !active_timers
[QEMU_TIMER_VIRTUAL
])
1653 nearest_delta_us
= qemu_next_deadline_dyntick();
1654 nearest_delta_us
/= 1000;
1656 timeKillEvent(data
->timerId
);
1658 data
->timerId
= timeSetEvent(1,
1662 TIME_ONESHOT
| TIME_PERIODIC
);
1664 if (!data
->timerId
) {
1665 perror("Failed to re-arm win32 alarm timer");
1667 timeEndPeriod(data
->period
);
1668 CloseHandle(data
->host_alarm
);
1675 static void init_timer_alarm(void)
1677 struct qemu_alarm_timer
*t
= NULL
;
1680 for (i
= 0; alarm_timers
[i
].name
; i
++) {
1681 t
= &alarm_timers
[i
];
1689 fprintf(stderr
, "Unable to find any suitable alarm timer.\n");
1690 fprintf(stderr
, "Terminating\n");
1697 static void quit_timers(void)
1699 alarm_timer
->stop(alarm_timer
);
1703 /***********************************************************/
1704 /* host time/date access */
1705 void qemu_get_timedate(struct tm
*tm
, int offset
)
1712 if (rtc_date_offset
== -1) {
1716 ret
= localtime(&ti
);
1718 ti
-= rtc_date_offset
;
1722 memcpy(tm
, ret
, sizeof(struct tm
));
1725 int qemu_timedate_diff(struct tm
*tm
)
1729 if (rtc_date_offset
== -1)
1731 seconds
= mktimegm(tm
);
1733 seconds
= mktime(tm
);
1735 seconds
= mktimegm(tm
) + rtc_date_offset
;
1737 return seconds
- time(NULL
);
1740 /***********************************************************/
1741 /* character device */
1743 static void qemu_chr_event(CharDriverState
*s
, int event
)
1747 s
->chr_event(s
->handler_opaque
, event
);
1750 static void qemu_chr_reset_bh(void *opaque
)
1752 CharDriverState
*s
= opaque
;
1753 qemu_chr_event(s
, CHR_EVENT_RESET
);
1754 qemu_bh_delete(s
->bh
);
1758 void qemu_chr_reset(CharDriverState
*s
)
1760 if (s
->bh
== NULL
) {
1761 s
->bh
= qemu_bh_new(qemu_chr_reset_bh
, s
);
1762 qemu_bh_schedule(s
->bh
);
1766 int qemu_chr_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
1768 return s
->chr_write(s
, buf
, len
);
1771 int qemu_chr_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
1775 return s
->chr_ioctl(s
, cmd
, arg
);
1778 int qemu_chr_can_read(CharDriverState
*s
)
1780 if (!s
->chr_can_read
)
1782 return s
->chr_can_read(s
->handler_opaque
);
1785 void qemu_chr_read(CharDriverState
*s
, uint8_t *buf
, int len
)
1787 s
->chr_read(s
->handler_opaque
, buf
, len
);
1790 void qemu_chr_accept_input(CharDriverState
*s
)
1792 if (s
->chr_accept_input
)
1793 s
->chr_accept_input(s
);
1796 void qemu_chr_printf(CharDriverState
*s
, const char *fmt
, ...)
1801 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
1802 qemu_chr_write(s
, (uint8_t *)buf
, strlen(buf
));
1806 void qemu_chr_send_event(CharDriverState
*s
, int event
)
1808 if (s
->chr_send_event
)
1809 s
->chr_send_event(s
, event
);
1812 void qemu_chr_add_handlers(CharDriverState
*s
,
1813 IOCanRWHandler
*fd_can_read
,
1814 IOReadHandler
*fd_read
,
1815 IOEventHandler
*fd_event
,
1818 s
->chr_can_read
= fd_can_read
;
1819 s
->chr_read
= fd_read
;
1820 s
->chr_event
= fd_event
;
1821 s
->handler_opaque
= opaque
;
1822 if (s
->chr_update_read_handler
)
1823 s
->chr_update_read_handler(s
);
1826 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1831 static CharDriverState
*qemu_chr_open_null(void)
1833 CharDriverState
*chr
;
1835 chr
= qemu_mallocz(sizeof(CharDriverState
));
1838 chr
->chr_write
= null_chr_write
;
1842 /* MUX driver for serial I/O splitting */
1843 static int term_timestamps
;
1844 static int64_t term_timestamps_start
;
1846 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
1847 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
1849 IOCanRWHandler
*chr_can_read
[MAX_MUX
];
1850 IOReadHandler
*chr_read
[MAX_MUX
];
1851 IOEventHandler
*chr_event
[MAX_MUX
];
1852 void *ext_opaque
[MAX_MUX
];
1853 CharDriverState
*drv
;
1854 unsigned char buffer
[MUX_BUFFER_SIZE
];
1858 int term_got_escape
;
1863 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1865 MuxDriver
*d
= chr
->opaque
;
1867 if (!term_timestamps
) {
1868 ret
= d
->drv
->chr_write(d
->drv
, buf
, len
);
1873 for(i
= 0; i
< len
; i
++) {
1874 ret
+= d
->drv
->chr_write(d
->drv
, buf
+i
, 1);
1875 if (buf
[i
] == '\n') {
1881 if (term_timestamps_start
== -1)
1882 term_timestamps_start
= ti
;
1883 ti
-= term_timestamps_start
;
1884 secs
= ti
/ 1000000000;
1885 snprintf(buf1
, sizeof(buf1
),
1886 "[%02d:%02d:%02d.%03d] ",
1890 (int)((ti
/ 1000000) % 1000));
1891 d
->drv
->chr_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
1898 static const char * const mux_help
[] = {
1899 "% h print this help\n\r",
1900 "% x exit emulator\n\r",
1901 "% s save disk data back to file (if -snapshot)\n\r",
1902 "% t toggle console timestamps\n\r"
1903 "% b send break (magic sysrq)\n\r",
1904 "% c switch between console and monitor\n\r",
1909 static int term_escape_char
= 0x01; /* ctrl-a is used for escape */
1910 static void mux_print_help(CharDriverState
*chr
)
1913 char ebuf
[15] = "Escape-Char";
1914 char cbuf
[50] = "\n\r";
1916 if (term_escape_char
> 0 && term_escape_char
< 26) {
1917 snprintf(cbuf
, sizeof(cbuf
), "\n\r");
1918 snprintf(ebuf
, sizeof(ebuf
), "C-%c", term_escape_char
- 1 + 'a');
1920 snprintf(cbuf
, sizeof(cbuf
),
1921 "\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
1924 chr
->chr_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
1925 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
1926 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
1927 if (mux_help
[i
][j
] == '%')
1928 chr
->chr_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
1930 chr
->chr_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
1935 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
1937 if (d
->term_got_escape
) {
1938 d
->term_got_escape
= 0;
1939 if (ch
== term_escape_char
)
1944 mux_print_help(chr
);
1948 const char *term
= "QEMU: Terminated\n\r";
1949 chr
->chr_write(chr
,(uint8_t *)term
,strlen(term
));
1956 for (i
= 0; i
< nb_drives
; i
++) {
1957 bdrv_commit(drives_table
[i
].bdrv
);
1962 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
1965 /* Switch to the next registered device */
1967 if (chr
->focus
>= d
->mux_cnt
)
1971 term_timestamps
= !term_timestamps
;
1972 term_timestamps_start
= -1;
1975 } else if (ch
== term_escape_char
) {
1976 d
->term_got_escape
= 1;
1984 static void mux_chr_accept_input(CharDriverState
*chr
)
1987 MuxDriver
*d
= chr
->opaque
;
1989 while (d
->prod
!= d
->cons
&&
1990 d
->chr_can_read
[m
] &&
1991 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
1992 d
->chr_read
[m
](d
->ext_opaque
[m
],
1993 &d
->buffer
[d
->cons
++ & MUX_BUFFER_MASK
], 1);
1997 static int mux_chr_can_read(void *opaque
)
1999 CharDriverState
*chr
= opaque
;
2000 MuxDriver
*d
= chr
->opaque
;
2002 if ((d
->prod
- d
->cons
) < MUX_BUFFER_SIZE
)
2004 if (d
->chr_can_read
[chr
->focus
])
2005 return d
->chr_can_read
[chr
->focus
](d
->ext_opaque
[chr
->focus
]);
2009 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
2011 CharDriverState
*chr
= opaque
;
2012 MuxDriver
*d
= chr
->opaque
;
2016 mux_chr_accept_input (opaque
);
2018 for(i
= 0; i
< size
; i
++)
2019 if (mux_proc_byte(chr
, d
, buf
[i
])) {
2020 if (d
->prod
== d
->cons
&&
2021 d
->chr_can_read
[m
] &&
2022 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
2023 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
2025 d
->buffer
[d
->prod
++ & MUX_BUFFER_MASK
] = buf
[i
];
2029 static void mux_chr_event(void *opaque
, int event
)
2031 CharDriverState
*chr
= opaque
;
2032 MuxDriver
*d
= chr
->opaque
;
2035 /* Send the event to all registered listeners */
2036 for (i
= 0; i
< d
->mux_cnt
; i
++)
2037 if (d
->chr_event
[i
])
2038 d
->chr_event
[i
](d
->ext_opaque
[i
], event
);
2041 static void mux_chr_update_read_handler(CharDriverState
*chr
)
2043 MuxDriver
*d
= chr
->opaque
;
2045 if (d
->mux_cnt
>= MAX_MUX
) {
2046 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
2049 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
2050 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
2051 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
2052 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
2053 /* Fix up the real driver with mux routines */
2054 if (d
->mux_cnt
== 0) {
2055 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
2056 mux_chr_event
, chr
);
2058 chr
->focus
= d
->mux_cnt
;
2062 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
2064 CharDriverState
*chr
;
2067 chr
= qemu_mallocz(sizeof(CharDriverState
));
2070 d
= qemu_mallocz(sizeof(MuxDriver
));
2079 chr
->chr_write
= mux_chr_write
;
2080 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
2081 chr
->chr_accept_input
= mux_chr_accept_input
;
2088 static void socket_cleanup(void)
2093 static int socket_init(void)
2098 ret
= WSAStartup(MAKEWORD(2,2), &Data
);
2100 err
= WSAGetLastError();
2101 fprintf(stderr
, "WSAStartup: %d\n", err
);
2104 atexit(socket_cleanup
);
2108 static int send_all(int fd
, const uint8_t *buf
, int len1
)
2114 ret
= send(fd
, buf
, len
, 0);
2117 errno
= WSAGetLastError();
2118 if (errno
!= WSAEWOULDBLOCK
) {
2121 } else if (ret
== 0) {
2133 static int unix_write(int fd
, const uint8_t *buf
, int len1
)
2139 ret
= write(fd
, buf
, len
);
2141 if (errno
!= EINTR
&& errno
!= EAGAIN
)
2143 } else if (ret
== 0) {
2153 static inline int send_all(int fd
, const uint8_t *buf
, int len1
)
2155 return unix_write(fd
, buf
, len1
);
2157 #endif /* !_WIN32 */
2166 #define STDIO_MAX_CLIENTS 1
2167 static int stdio_nb_clients
= 0;
2169 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2171 FDCharDriver
*s
= chr
->opaque
;
2172 return unix_write(s
->fd_out
, buf
, len
);
2175 static int fd_chr_read_poll(void *opaque
)
2177 CharDriverState
*chr
= opaque
;
2178 FDCharDriver
*s
= chr
->opaque
;
2180 s
->max_size
= qemu_chr_can_read(chr
);
2184 static void fd_chr_read(void *opaque
)
2186 CharDriverState
*chr
= opaque
;
2187 FDCharDriver
*s
= chr
->opaque
;
2192 if (len
> s
->max_size
)
2196 size
= read(s
->fd_in
, buf
, len
);
2198 /* FD has been closed. Remove it from the active list. */
2199 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2203 qemu_chr_read(chr
, buf
, size
);
2207 static void fd_chr_update_read_handler(CharDriverState
*chr
)
2209 FDCharDriver
*s
= chr
->opaque
;
2211 if (s
->fd_in
>= 0) {
2212 if (nographic
&& s
->fd_in
== 0) {
2214 qemu_set_fd_handler2(s
->fd_in
, fd_chr_read_poll
,
2215 fd_chr_read
, NULL
, chr
);
2220 static void fd_chr_close(struct CharDriverState
*chr
)
2222 FDCharDriver
*s
= chr
->opaque
;
2224 if (s
->fd_in
>= 0) {
2225 if (nographic
&& s
->fd_in
== 0) {
2227 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2234 /* open a character device to a unix fd */
2235 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
2237 CharDriverState
*chr
;
2240 chr
= qemu_mallocz(sizeof(CharDriverState
));
2243 s
= qemu_mallocz(sizeof(FDCharDriver
));
2251 chr
->chr_write
= fd_chr_write
;
2252 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
2253 chr
->chr_close
= fd_chr_close
;
2255 qemu_chr_reset(chr
);
2260 static CharDriverState
*qemu_chr_open_file_out(const char *file_out
)
2264 TFR(fd_out
= open(file_out
, O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
, 0666));
2267 return qemu_chr_open_fd(-1, fd_out
);
2270 static CharDriverState
*qemu_chr_open_pipe(const char *filename
)
2273 char filename_in
[256], filename_out
[256];
2275 snprintf(filename_in
, 256, "%s.in", filename
);
2276 snprintf(filename_out
, 256, "%s.out", filename
);
2277 TFR(fd_in
= open(filename_in
, O_RDWR
| O_BINARY
));
2278 TFR(fd_out
= open(filename_out
, O_RDWR
| O_BINARY
));
2279 if (fd_in
< 0 || fd_out
< 0) {
2284 TFR(fd_in
= fd_out
= open(filename
, O_RDWR
| O_BINARY
));
2288 return qemu_chr_open_fd(fd_in
, fd_out
);
2292 /* for STDIO, we handle the case where several clients use it
2295 #define TERM_FIFO_MAX_SIZE 1
2297 static uint8_t term_fifo
[TERM_FIFO_MAX_SIZE
];
2298 static int term_fifo_size
;
2300 static int stdio_read_poll(void *opaque
)
2302 CharDriverState
*chr
= opaque
;
2304 /* try to flush the queue if needed */
2305 if (term_fifo_size
!= 0 && qemu_chr_can_read(chr
) > 0) {
2306 qemu_chr_read(chr
, term_fifo
, 1);
2309 /* see if we can absorb more chars */
2310 if (term_fifo_size
== 0)
2316 static void stdio_read(void *opaque
)
2320 CharDriverState
*chr
= opaque
;
2322 size
= read(0, buf
, 1);
2324 /* stdin has been closed. Remove it from the active list. */
2325 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2329 if (qemu_chr_can_read(chr
) > 0) {
2330 qemu_chr_read(chr
, buf
, 1);
2331 } else if (term_fifo_size
== 0) {
2332 term_fifo
[term_fifo_size
++] = buf
[0];
2337 /* init terminal so that we can grab keys */
2338 static struct termios oldtty
;
2339 static int old_fd0_flags
;
2340 static int term_atexit_done
;
2342 static void term_exit(void)
2344 tcsetattr (0, TCSANOW
, &oldtty
);
2345 fcntl(0, F_SETFL
, old_fd0_flags
);
2348 static void term_init(void)
2352 tcgetattr (0, &tty
);
2354 old_fd0_flags
= fcntl(0, F_GETFL
);
2356 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2357 |INLCR
|IGNCR
|ICRNL
|IXON
);
2358 tty
.c_oflag
|= OPOST
;
2359 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
2360 /* if graphical mode, we allow Ctrl-C handling */
2362 tty
.c_lflag
&= ~ISIG
;
2363 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
2366 tty
.c_cc
[VTIME
] = 0;
2368 tcsetattr (0, TCSANOW
, &tty
);
2370 if (!term_atexit_done
++)
2373 fcntl(0, F_SETFL
, O_NONBLOCK
);
2376 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
2380 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2384 static CharDriverState
*qemu_chr_open_stdio(void)
2386 CharDriverState
*chr
;
2388 if (stdio_nb_clients
>= STDIO_MAX_CLIENTS
)
2390 chr
= qemu_chr_open_fd(0, 1);
2391 chr
->chr_close
= qemu_chr_close_stdio
;
2392 qemu_set_fd_handler2(0, stdio_read_poll
, stdio_read
, NULL
, chr
);
2400 /* Once Solaris has openpty(), this is going to be removed. */
2401 int openpty(int *amaster
, int *aslave
, char *name
,
2402 struct termios
*termp
, struct winsize
*winp
)
2405 int mfd
= -1, sfd
= -1;
2407 *amaster
= *aslave
= -1;
2409 mfd
= open("/dev/ptmx", O_RDWR
| O_NOCTTY
);
2413 if (grantpt(mfd
) == -1 || unlockpt(mfd
) == -1)
2416 if ((slave
= ptsname(mfd
)) == NULL
)
2419 if ((sfd
= open(slave
, O_RDONLY
| O_NOCTTY
)) == -1)
2422 if (ioctl(sfd
, I_PUSH
, "ptem") == -1 ||
2423 (termp
!= NULL
&& tcgetattr(sfd
, termp
) < 0))
2431 ioctl(sfd
, TIOCSWINSZ
, winp
);
2442 void cfmakeraw (struct termios
*termios_p
)
2444 termios_p
->c_iflag
&=
2445 ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
|INLCR
|IGNCR
|ICRNL
|IXON
);
2446 termios_p
->c_oflag
&= ~OPOST
;
2447 termios_p
->c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|ISIG
|IEXTEN
);
2448 termios_p
->c_cflag
&= ~(CSIZE
|PARENB
);
2449 termios_p
->c_cflag
|= CS8
;
2451 termios_p
->c_cc
[VMIN
] = 0;
2452 termios_p
->c_cc
[VTIME
] = 0;
2456 #if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
2457 || defined(__NetBSD__) || defined(__OpenBSD__)
2467 static void pty_chr_update_read_handler(CharDriverState
*chr
);
2468 static void pty_chr_state(CharDriverState
*chr
, int connected
);
2470 static int pty_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2472 PtyCharDriver
*s
= chr
->opaque
;
2474 if (!s
->connected
) {
2475 /* guest sends data, check for (re-)connect */
2476 pty_chr_update_read_handler(chr
);
2479 return unix_write(s
->fd
, buf
, len
);
2482 static int pty_chr_read_poll(void *opaque
)
2484 CharDriverState
*chr
= opaque
;
2485 PtyCharDriver
*s
= chr
->opaque
;
2487 s
->read_bytes
= qemu_chr_can_read(chr
);
2488 return s
->read_bytes
;
2491 static void pty_chr_read(void *opaque
)
2493 CharDriverState
*chr
= opaque
;
2494 PtyCharDriver
*s
= chr
->opaque
;
2499 if (len
> s
->read_bytes
)
2500 len
= s
->read_bytes
;
2503 size
= read(s
->fd
, buf
, len
);
2504 if ((size
== -1 && errno
== EIO
) ||
2506 pty_chr_state(chr
, 0);
2510 pty_chr_state(chr
, 1);
2511 qemu_chr_read(chr
, buf
, size
);
2515 static void pty_chr_update_read_handler(CharDriverState
*chr
)
2517 PtyCharDriver
*s
= chr
->opaque
;
2519 qemu_set_fd_handler2(s
->fd
, pty_chr_read_poll
,
2520 pty_chr_read
, NULL
, chr
);
2523 * Short timeout here: just need wait long enougth that qemu makes
2524 * it through the poll loop once. When reconnected we want a
2525 * short timeout so we notice it almost instantly. Otherwise
2526 * read() gives us -EIO instantly, making pty_chr_state() reset the
2527 * timeout to the normal (much longer) poll interval before the
2530 qemu_mod_timer(s
->timer
, qemu_get_clock(rt_clock
) + 10);
2533 static void pty_chr_state(CharDriverState
*chr
, int connected
)
2535 PtyCharDriver
*s
= chr
->opaque
;
2538 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2541 /* (re-)connect poll interval for idle guests: once per second.
2542 * We check more frequently in case the guests sends data to
2543 * the virtual device linked to our pty. */
2544 qemu_mod_timer(s
->timer
, qemu_get_clock(rt_clock
) + 1000);
2547 qemu_chr_reset(chr
);
2552 static void pty_chr_timer(void *opaque
)
2554 struct CharDriverState
*chr
= opaque
;
2555 PtyCharDriver
*s
= chr
->opaque
;
2560 /* If we arrive here without polling being cleared due
2561 * read returning -EIO, then we are (re-)connected */
2562 pty_chr_state(chr
, 1);
2567 pty_chr_update_read_handler(chr
);
2570 static void pty_chr_close(struct CharDriverState
*chr
)
2572 PtyCharDriver
*s
= chr
->opaque
;
2574 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2579 static CharDriverState
*qemu_chr_open_pty(void)
2581 CharDriverState
*chr
;
2585 #if defined(__OpenBSD__)
2586 char pty_name
[PATH_MAX
];
2587 #define q_ptsname(x) pty_name
2589 char *pty_name
= NULL
;
2590 #define q_ptsname(x) ptsname(x)
2593 chr
= qemu_mallocz(sizeof(CharDriverState
));
2596 s
= qemu_mallocz(sizeof(PtyCharDriver
));
2602 if (openpty(&s
->fd
, &slave_fd
, pty_name
, NULL
, NULL
) < 0) {
2606 /* Set raw attributes on the pty. */
2608 tcsetattr(slave_fd
, TCSAFLUSH
, &tty
);
2611 fprintf(stderr
, "char device redirected to %s\n", q_ptsname(s
->fd
));
2614 chr
->chr_write
= pty_chr_write
;
2615 chr
->chr_update_read_handler
= pty_chr_update_read_handler
;
2616 chr
->chr_close
= pty_chr_close
;
2618 s
->timer
= qemu_new_timer(rt_clock
, pty_chr_timer
, chr
);
2623 static void tty_serial_init(int fd
, int speed
,
2624 int parity
, int data_bits
, int stop_bits
)
2630 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
2631 speed
, parity
, data_bits
, stop_bits
);
2633 tcgetattr (fd
, &tty
);
2636 if (speed
<= 50 * MARGIN
)
2638 else if (speed
<= 75 * MARGIN
)
2640 else if (speed
<= 300 * MARGIN
)
2642 else if (speed
<= 600 * MARGIN
)
2644 else if (speed
<= 1200 * MARGIN
)
2646 else if (speed
<= 2400 * MARGIN
)
2648 else if (speed
<= 4800 * MARGIN
)
2650 else if (speed
<= 9600 * MARGIN
)
2652 else if (speed
<= 19200 * MARGIN
)
2654 else if (speed
<= 38400 * MARGIN
)
2656 else if (speed
<= 57600 * MARGIN
)
2658 else if (speed
<= 115200 * MARGIN
)
2663 cfsetispeed(&tty
, spd
);
2664 cfsetospeed(&tty
, spd
);
2666 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2667 |INLCR
|IGNCR
|ICRNL
|IXON
);
2668 tty
.c_oflag
|= OPOST
;
2669 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
2670 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
2691 tty
.c_cflag
|= PARENB
;
2694 tty
.c_cflag
|= PARENB
| PARODD
;
2698 tty
.c_cflag
|= CSTOPB
;
2700 tcsetattr (fd
, TCSANOW
, &tty
);
2703 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2705 FDCharDriver
*s
= chr
->opaque
;
2708 case CHR_IOCTL_SERIAL_SET_PARAMS
:
2710 QEMUSerialSetParams
*ssp
= arg
;
2711 tty_serial_init(s
->fd_in
, ssp
->speed
, ssp
->parity
,
2712 ssp
->data_bits
, ssp
->stop_bits
);
2715 case CHR_IOCTL_SERIAL_SET_BREAK
:
2717 int enable
= *(int *)arg
;
2719 tcsendbreak(s
->fd_in
, 1);
2722 case CHR_IOCTL_SERIAL_GET_TIOCM
:
2725 int *targ
= (int *)arg
;
2726 ioctl(s
->fd_in
, TIOCMGET
, &sarg
);
2728 if (sarg
| TIOCM_CTS
)
2729 *targ
|= CHR_TIOCM_CTS
;
2730 if (sarg
| TIOCM_CAR
)
2731 *targ
|= CHR_TIOCM_CAR
;
2732 if (sarg
| TIOCM_DSR
)
2733 *targ
|= CHR_TIOCM_DSR
;
2734 if (sarg
| TIOCM_RI
)
2735 *targ
|= CHR_TIOCM_RI
;
2736 if (sarg
| TIOCM_DTR
)
2737 *targ
|= CHR_TIOCM_DTR
;
2738 if (sarg
| TIOCM_RTS
)
2739 *targ
|= CHR_TIOCM_RTS
;
2742 case CHR_IOCTL_SERIAL_SET_TIOCM
:
2744 int sarg
= *(int *)arg
;
2746 if (sarg
| CHR_TIOCM_DTR
)
2748 if (sarg
| CHR_TIOCM_RTS
)
2750 ioctl(s
->fd_in
, TIOCMSET
, &targ
);
2759 static CharDriverState
*qemu_chr_open_tty(const char *filename
)
2761 CharDriverState
*chr
;
2764 TFR(fd
= open(filename
, O_RDWR
| O_NONBLOCK
));
2765 tty_serial_init(fd
, 115200, 'N', 8, 1);
2766 chr
= qemu_chr_open_fd(fd
, fd
);
2771 chr
->chr_ioctl
= tty_serial_ioctl
;
2772 qemu_chr_reset(chr
);
2775 #else /* ! __linux__ && ! __sun__ */
2776 static CharDriverState
*qemu_chr_open_pty(void)
2780 #endif /* __linux__ || __sun__ */
2782 #if defined(__linux__)
2786 } ParallelCharDriver
;
2788 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
2790 if (s
->mode
!= mode
) {
2792 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
2799 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2801 ParallelCharDriver
*drv
= chr
->opaque
;
2806 case CHR_IOCTL_PP_READ_DATA
:
2807 if (ioctl(fd
, PPRDATA
, &b
) < 0)
2809 *(uint8_t *)arg
= b
;
2811 case CHR_IOCTL_PP_WRITE_DATA
:
2812 b
= *(uint8_t *)arg
;
2813 if (ioctl(fd
, PPWDATA
, &b
) < 0)
2816 case CHR_IOCTL_PP_READ_CONTROL
:
2817 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
2819 /* Linux gives only the lowest bits, and no way to know data
2820 direction! For better compatibility set the fixed upper
2822 *(uint8_t *)arg
= b
| 0xc0;
2824 case CHR_IOCTL_PP_WRITE_CONTROL
:
2825 b
= *(uint8_t *)arg
;
2826 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
2829 case CHR_IOCTL_PP_READ_STATUS
:
2830 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
2832 *(uint8_t *)arg
= b
;
2834 case CHR_IOCTL_PP_DATA_DIR
:
2835 if (ioctl(fd
, PPDATADIR
, (int *)arg
) < 0)
2838 case CHR_IOCTL_PP_EPP_READ_ADDR
:
2839 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2840 struct ParallelIOArg
*parg
= arg
;
2841 int n
= read(fd
, parg
->buffer
, parg
->count
);
2842 if (n
!= parg
->count
) {
2847 case CHR_IOCTL_PP_EPP_READ
:
2848 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2849 struct ParallelIOArg
*parg
= arg
;
2850 int n
= read(fd
, parg
->buffer
, parg
->count
);
2851 if (n
!= parg
->count
) {
2856 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
2857 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2858 struct ParallelIOArg
*parg
= arg
;
2859 int n
= write(fd
, parg
->buffer
, parg
->count
);
2860 if (n
!= parg
->count
) {
2865 case CHR_IOCTL_PP_EPP_WRITE
:
2866 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2867 struct ParallelIOArg
*parg
= arg
;
2868 int n
= write(fd
, parg
->buffer
, parg
->count
);
2869 if (n
!= parg
->count
) {
2880 static void pp_close(CharDriverState
*chr
)
2882 ParallelCharDriver
*drv
= chr
->opaque
;
2885 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
2886 ioctl(fd
, PPRELEASE
);
2891 static CharDriverState
*qemu_chr_open_pp(const char *filename
)
2893 CharDriverState
*chr
;
2894 ParallelCharDriver
*drv
;
2897 TFR(fd
= open(filename
, O_RDWR
));
2901 if (ioctl(fd
, PPCLAIM
) < 0) {
2906 drv
= qemu_mallocz(sizeof(ParallelCharDriver
));
2912 drv
->mode
= IEEE1284_MODE_COMPAT
;
2914 chr
= qemu_mallocz(sizeof(CharDriverState
));
2920 chr
->chr_write
= null_chr_write
;
2921 chr
->chr_ioctl
= pp_ioctl
;
2922 chr
->chr_close
= pp_close
;
2925 qemu_chr_reset(chr
);
2929 #endif /* __linux__ */
2935 HANDLE hcom
, hrecv
, hsend
;
2936 OVERLAPPED orecv
, osend
;
2941 #define NSENDBUF 2048
2942 #define NRECVBUF 2048
2943 #define MAXCONNECT 1
2944 #define NTIMEOUT 5000
2946 static int win_chr_poll(void *opaque
);
2947 static int win_chr_pipe_poll(void *opaque
);
2949 static void win_chr_close(CharDriverState
*chr
)
2951 WinCharState
*s
= chr
->opaque
;
2954 CloseHandle(s
->hsend
);
2958 CloseHandle(s
->hrecv
);
2962 CloseHandle(s
->hcom
);
2966 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
2968 qemu_del_polling_cb(win_chr_poll
, chr
);
2971 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
2973 WinCharState
*s
= chr
->opaque
;
2975 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
2980 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2982 fprintf(stderr
, "Failed CreateEvent\n");
2985 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2987 fprintf(stderr
, "Failed CreateEvent\n");
2991 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
2992 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
2993 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
2994 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
2999 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
3000 fprintf(stderr
, "Failed SetupComm\n");
3004 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
3005 size
= sizeof(COMMCONFIG
);
3006 GetDefaultCommConfig(filename
, &comcfg
, &size
);
3007 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
3008 CommConfigDialog(filename
, NULL
, &comcfg
);
3010 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
3011 fprintf(stderr
, "Failed SetCommState\n");
3015 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
3016 fprintf(stderr
, "Failed SetCommMask\n");
3020 cto
.ReadIntervalTimeout
= MAXDWORD
;
3021 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
3022 fprintf(stderr
, "Failed SetCommTimeouts\n");
3026 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
3027 fprintf(stderr
, "Failed ClearCommError\n");
3030 qemu_add_polling_cb(win_chr_poll
, chr
);
3038 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
3040 WinCharState
*s
= chr
->opaque
;
3041 DWORD len
, ret
, size
, err
;
3044 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
3045 s
->osend
.hEvent
= s
->hsend
;
3048 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
3050 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
3052 err
= GetLastError();
3053 if (err
== ERROR_IO_PENDING
) {
3054 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
3072 static int win_chr_read_poll(CharDriverState
*chr
)
3074 WinCharState
*s
= chr
->opaque
;
3076 s
->max_size
= qemu_chr_can_read(chr
);
3080 static void win_chr_readfile(CharDriverState
*chr
)
3082 WinCharState
*s
= chr
->opaque
;
3087 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
3088 s
->orecv
.hEvent
= s
->hrecv
;
3089 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
3091 err
= GetLastError();
3092 if (err
== ERROR_IO_PENDING
) {
3093 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
3098 qemu_chr_read(chr
, buf
, size
);
3102 static void win_chr_read(CharDriverState
*chr
)
3104 WinCharState
*s
= chr
->opaque
;
3106 if (s
->len
> s
->max_size
)
3107 s
->len
= s
->max_size
;
3111 win_chr_readfile(chr
);
3114 static int win_chr_poll(void *opaque
)
3116 CharDriverState
*chr
= opaque
;
3117 WinCharState
*s
= chr
->opaque
;
3121 ClearCommError(s
->hcom
, &comerr
, &status
);
3122 if (status
.cbInQue
> 0) {
3123 s
->len
= status
.cbInQue
;
3124 win_chr_read_poll(chr
);
3131 static CharDriverState
*qemu_chr_open_win(const char *filename
)
3133 CharDriverState
*chr
;
3136 chr
= qemu_mallocz(sizeof(CharDriverState
));
3139 s
= qemu_mallocz(sizeof(WinCharState
));
3145 chr
->chr_write
= win_chr_write
;
3146 chr
->chr_close
= win_chr_close
;
3148 if (win_chr_init(chr
, filename
) < 0) {
3153 qemu_chr_reset(chr
);
3157 static int win_chr_pipe_poll(void *opaque
)
3159 CharDriverState
*chr
= opaque
;
3160 WinCharState
*s
= chr
->opaque
;
3163 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
3166 win_chr_read_poll(chr
);
3173 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
3175 WinCharState
*s
= chr
->opaque
;
3183 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3185 fprintf(stderr
, "Failed CreateEvent\n");
3188 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3190 fprintf(stderr
, "Failed CreateEvent\n");
3194 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
3195 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
3196 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
3198 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
3199 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
3200 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
3205 ZeroMemory(&ov
, sizeof(ov
));
3206 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3207 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
3209 fprintf(stderr
, "Failed ConnectNamedPipe\n");
3213 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
3215 fprintf(stderr
, "Failed GetOverlappedResult\n");
3217 CloseHandle(ov
.hEvent
);
3224 CloseHandle(ov
.hEvent
);
3227 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
3236 static CharDriverState
*qemu_chr_open_win_pipe(const char *filename
)
3238 CharDriverState
*chr
;
3241 chr
= qemu_mallocz(sizeof(CharDriverState
));
3244 s
= qemu_mallocz(sizeof(WinCharState
));
3250 chr
->chr_write
= win_chr_write
;
3251 chr
->chr_close
= win_chr_close
;
3253 if (win_chr_pipe_init(chr
, filename
) < 0) {
3258 qemu_chr_reset(chr
);
3262 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
3264 CharDriverState
*chr
;
3267 chr
= qemu_mallocz(sizeof(CharDriverState
));
3270 s
= qemu_mallocz(sizeof(WinCharState
));
3277 chr
->chr_write
= win_chr_write
;
3278 qemu_chr_reset(chr
);
3282 static CharDriverState
*qemu_chr_open_win_con(const char *filename
)
3284 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
3287 static CharDriverState
*qemu_chr_open_win_file_out(const char *file_out
)
3291 fd_out
= CreateFile(file_out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3292 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3293 if (fd_out
== INVALID_HANDLE_VALUE
)
3296 return qemu_chr_open_win_file(fd_out
);
3298 #endif /* !_WIN32 */
3300 /***********************************************************/
3301 /* UDP Net console */
3305 struct sockaddr_in daddr
;
3312 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3314 NetCharDriver
*s
= chr
->opaque
;
3316 return sendto(s
->fd
, buf
, len
, 0,
3317 (struct sockaddr
*)&s
->daddr
, sizeof(struct sockaddr_in
));
3320 static int udp_chr_read_poll(void *opaque
)
3322 CharDriverState
*chr
= opaque
;
3323 NetCharDriver
*s
= chr
->opaque
;
3325 s
->max_size
= qemu_chr_can_read(chr
);
3327 /* If there were any stray characters in the queue process them
3330 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3331 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3333 s
->max_size
= qemu_chr_can_read(chr
);
3338 static void udp_chr_read(void *opaque
)
3340 CharDriverState
*chr
= opaque
;
3341 NetCharDriver
*s
= chr
->opaque
;
3343 if (s
->max_size
== 0)
3345 s
->bufcnt
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
3346 s
->bufptr
= s
->bufcnt
;
3351 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3352 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3354 s
->max_size
= qemu_chr_can_read(chr
);
3358 static void udp_chr_update_read_handler(CharDriverState
*chr
)
3360 NetCharDriver
*s
= chr
->opaque
;
3363 qemu_set_fd_handler2(s
->fd
, udp_chr_read_poll
,
3364 udp_chr_read
, NULL
, chr
);
3369 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
);
3371 int parse_host_src_port(struct sockaddr_in
*haddr
,
3372 struct sockaddr_in
*saddr
,
3375 static CharDriverState
*qemu_chr_open_udp(const char *def
)
3377 CharDriverState
*chr
= NULL
;
3378 NetCharDriver
*s
= NULL
;
3380 struct sockaddr_in saddr
;
3382 chr
= qemu_mallocz(sizeof(CharDriverState
));
3385 s
= qemu_mallocz(sizeof(NetCharDriver
));
3389 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
3391 perror("socket(PF_INET, SOCK_DGRAM)");
3395 if (parse_host_src_port(&s
->daddr
, &saddr
, def
) < 0) {
3396 printf("Could not parse: %s\n", def
);
3400 if (bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
)) < 0)
3410 chr
->chr_write
= udp_chr_write
;
3411 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
3424 /***********************************************************/
3425 /* TCP Net console */
3436 static void tcp_chr_accept(void *opaque
);
3438 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3440 TCPCharDriver
*s
= chr
->opaque
;
3442 return send_all(s
->fd
, buf
, len
);
3444 /* XXX: indicate an error ? */
3449 static int tcp_chr_read_poll(void *opaque
)
3451 CharDriverState
*chr
= opaque
;
3452 TCPCharDriver
*s
= chr
->opaque
;
3455 s
->max_size
= qemu_chr_can_read(chr
);
3460 #define IAC_BREAK 243
3461 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
3463 uint8_t *buf
, int *size
)
3465 /* Handle any telnet client's basic IAC options to satisfy char by
3466 * char mode with no echo. All IAC options will be removed from
3467 * the buf and the do_telnetopt variable will be used to track the
3468 * state of the width of the IAC information.
3470 * IAC commands come in sets of 3 bytes with the exception of the
3471 * "IAC BREAK" command and the double IAC.
3477 for (i
= 0; i
< *size
; i
++) {
3478 if (s
->do_telnetopt
> 1) {
3479 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
3480 /* Double IAC means send an IAC */
3484 s
->do_telnetopt
= 1;
3486 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
3487 /* Handle IAC break commands by sending a serial break */
3488 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
3493 if (s
->do_telnetopt
>= 4) {
3494 s
->do_telnetopt
= 1;
3497 if ((unsigned char)buf
[i
] == IAC
) {
3498 s
->do_telnetopt
= 2;
3509 static void tcp_chr_read(void *opaque
)
3511 CharDriverState
*chr
= opaque
;
3512 TCPCharDriver
*s
= chr
->opaque
;
3516 if (!s
->connected
|| s
->max_size
<= 0)
3519 if (len
> s
->max_size
)
3521 size
= recv(s
->fd
, buf
, len
, 0);
3523 /* connection closed */
3525 if (s
->listen_fd
>= 0) {
3526 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3528 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
3531 } else if (size
> 0) {
3532 if (s
->do_telnetopt
)
3533 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
3535 qemu_chr_read(chr
, buf
, size
);
3539 static void tcp_chr_connect(void *opaque
)
3541 CharDriverState
*chr
= opaque
;
3542 TCPCharDriver
*s
= chr
->opaque
;
3545 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
3546 tcp_chr_read
, NULL
, chr
);
3547 qemu_chr_reset(chr
);
3550 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
3551 static void tcp_chr_telnet_init(int fd
)
3554 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
3555 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3556 send(fd
, (char *)buf
, 3, 0);
3557 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3558 send(fd
, (char *)buf
, 3, 0);
3559 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3560 send(fd
, (char *)buf
, 3, 0);
3561 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3562 send(fd
, (char *)buf
, 3, 0);
3565 static void socket_set_nodelay(int fd
)
3568 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, (char *)&val
, sizeof(val
));
3571 static void tcp_chr_accept(void *opaque
)
3573 CharDriverState
*chr
= opaque
;
3574 TCPCharDriver
*s
= chr
->opaque
;
3575 struct sockaddr_in saddr
;
3577 struct sockaddr_un uaddr
;
3579 struct sockaddr
*addr
;
3586 len
= sizeof(uaddr
);
3587 addr
= (struct sockaddr
*)&uaddr
;
3591 len
= sizeof(saddr
);
3592 addr
= (struct sockaddr
*)&saddr
;
3594 fd
= accept(s
->listen_fd
, addr
, &len
);
3595 if (fd
< 0 && errno
!= EINTR
) {
3597 } else if (fd
>= 0) {
3598 if (s
->do_telnetopt
)
3599 tcp_chr_telnet_init(fd
);
3603 socket_set_nonblock(fd
);
3605 socket_set_nodelay(fd
);
3607 qemu_set_fd_handler(s
->listen_fd
, NULL
, NULL
, NULL
);
3608 tcp_chr_connect(chr
);
3611 static void tcp_chr_close(CharDriverState
*chr
)
3613 TCPCharDriver
*s
= chr
->opaque
;
3616 if (s
->listen_fd
>= 0)
3617 closesocket(s
->listen_fd
);
3621 static CharDriverState
*qemu_chr_open_tcp(const char *host_str
,
3625 CharDriverState
*chr
= NULL
;
3626 TCPCharDriver
*s
= NULL
;
3627 int fd
= -1, ret
, err
, val
;
3629 int is_waitconnect
= 1;
3632 struct sockaddr_in saddr
;
3634 struct sockaddr_un uaddr
;
3636 struct sockaddr
*addr
;
3641 addr
= (struct sockaddr
*)&uaddr
;
3642 addrlen
= sizeof(uaddr
);
3643 if (parse_unix_path(&uaddr
, host_str
) < 0)
3648 addr
= (struct sockaddr
*)&saddr
;
3649 addrlen
= sizeof(saddr
);
3650 if (parse_host_port(&saddr
, host_str
) < 0)
3655 while((ptr
= strchr(ptr
,','))) {
3657 if (!strncmp(ptr
,"server",6)) {
3659 } else if (!strncmp(ptr
,"nowait",6)) {
3661 } else if (!strncmp(ptr
,"nodelay",6)) {
3664 printf("Unknown option: %s\n", ptr
);
3671 chr
= qemu_mallocz(sizeof(CharDriverState
));
3674 s
= qemu_mallocz(sizeof(TCPCharDriver
));
3680 fd
= socket(PF_UNIX
, SOCK_STREAM
, 0);
3683 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
3688 if (!is_waitconnect
)
3689 socket_set_nonblock(fd
);
3694 s
->is_unix
= is_unix
;
3695 s
->do_nodelay
= do_nodelay
&& !is_unix
;
3698 chr
->chr_write
= tcp_chr_write
;
3699 chr
->chr_close
= tcp_chr_close
;
3702 /* allow fast reuse */
3706 pstrcpy(path
, sizeof(path
), uaddr
.sun_path
);
3712 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
3715 ret
= bind(fd
, addr
, addrlen
);
3719 ret
= listen(fd
, 0);
3724 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3726 s
->do_telnetopt
= 1;
3729 ret
= connect(fd
, addr
, addrlen
);
3731 err
= socket_error();
3732 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
3733 } else if (err
== EINPROGRESS
) {
3736 } else if (err
== WSAEALREADY
) {
3748 socket_set_nodelay(fd
);
3750 tcp_chr_connect(chr
);
3752 qemu_set_fd_handler(s
->fd
, NULL
, tcp_chr_connect
, chr
);
3755 if (is_listen
&& is_waitconnect
) {
3756 printf("QEMU waiting for connection on: %s\n", host_str
);
3757 tcp_chr_accept(chr
);
3758 socket_set_nonblock(s
->listen_fd
);
3770 CharDriverState
*qemu_chr_open(const char *filename
)
3774 if (!strcmp(filename
, "vc")) {
3775 return text_console_init(&display_state
, 0);
3776 } else if (strstart(filename
, "vc:", &p
)) {
3777 return text_console_init(&display_state
, p
);
3778 } else if (!strcmp(filename
, "null")) {
3779 return qemu_chr_open_null();
3781 if (strstart(filename
, "tcp:", &p
)) {
3782 return qemu_chr_open_tcp(p
, 0, 0);
3784 if (strstart(filename
, "telnet:", &p
)) {
3785 return qemu_chr_open_tcp(p
, 1, 0);
3787 if (strstart(filename
, "udp:", &p
)) {
3788 return qemu_chr_open_udp(p
);
3790 if (strstart(filename
, "mon:", &p
)) {
3791 CharDriverState
*drv
= qemu_chr_open(p
);
3793 drv
= qemu_chr_open_mux(drv
);
3794 monitor_init(drv
, !nographic
);
3797 printf("Unable to open driver: %s\n", p
);
3801 if (strstart(filename
, "unix:", &p
)) {
3802 return qemu_chr_open_tcp(p
, 0, 1);
3803 } else if (strstart(filename
, "file:", &p
)) {
3804 return qemu_chr_open_file_out(p
);
3805 } else if (strstart(filename
, "pipe:", &p
)) {
3806 return qemu_chr_open_pipe(p
);
3807 } else if (!strcmp(filename
, "pty")) {
3808 return qemu_chr_open_pty();
3809 } else if (!strcmp(filename
, "stdio")) {
3810 return qemu_chr_open_stdio();
3812 #if defined(__linux__)
3813 if (strstart(filename
, "/dev/parport", NULL
)) {
3814 return qemu_chr_open_pp(filename
);
3817 #if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
3818 || defined(__NetBSD__) || defined(__OpenBSD__)
3819 if (strstart(filename
, "/dev/", NULL
)) {
3820 return qemu_chr_open_tty(filename
);
3824 if (strstart(filename
, "COM", NULL
)) {
3825 return qemu_chr_open_win(filename
);
3827 if (strstart(filename
, "pipe:", &p
)) {
3828 return qemu_chr_open_win_pipe(p
);
3830 if (strstart(filename
, "con:", NULL
)) {
3831 return qemu_chr_open_win_con(filename
);
3833 if (strstart(filename
, "file:", &p
)) {
3834 return qemu_chr_open_win_file_out(p
);
3837 #ifdef CONFIG_BRLAPI
3838 if (!strcmp(filename
, "braille")) {
3839 return chr_baum_init();
3847 void qemu_chr_close(CharDriverState
*chr
)
3850 chr
->chr_close(chr
);
3854 /***********************************************************/
3855 /* network device redirectors */
3857 #if defined(DEBUG_NET) || defined(DEBUG_SLIRP)
3858 static void hex_dump(FILE *f
, const uint8_t *buf
, int size
)
3862 for(i
=0;i
<size
;i
+=16) {
3866 fprintf(f
, "%08x ", i
);
3869 fprintf(f
, " %02x", buf
[i
+j
]);
3874 for(j
=0;j
<len
;j
++) {
3876 if (c
< ' ' || c
> '~')
3878 fprintf(f
, "%c", c
);
3885 static int parse_macaddr(uint8_t *macaddr
, const char *p
)
3892 offset
= strtol(p
, &last_char
, 0);
3893 if (0 == errno
&& '\0' == *last_char
&&
3894 offset
>= 0 && offset
<= 0xFFFFFF) {
3895 macaddr
[3] = (offset
& 0xFF0000) >> 16;
3896 macaddr
[4] = (offset
& 0xFF00) >> 8;
3897 macaddr
[5] = offset
& 0xFF;
3900 for(i
= 0; i
< 6; i
++) {
3901 macaddr
[i
] = strtol(p
, (char **)&p
, 16);
3906 if (*p
!= ':' && *p
!= '-')
3917 static int get_str_sep(char *buf
, int buf_size
, const char **pp
, int sep
)
3922 p1
= strchr(p
, sep
);
3928 if (len
> buf_size
- 1)
3930 memcpy(buf
, p
, len
);
3937 int parse_host_src_port(struct sockaddr_in
*haddr
,
3938 struct sockaddr_in
*saddr
,
3939 const char *input_str
)
3941 char *str
= strdup(input_str
);
3942 char *host_str
= str
;
3944 const char *src_str2
;
3948 * Chop off any extra arguments at the end of the string which
3949 * would start with a comma, then fill in the src port information
3950 * if it was provided else use the "any address" and "any port".
3952 if ((ptr
= strchr(str
,',')))
3955 if ((src_str
= strchr(input_str
,'@'))) {
3960 if (parse_host_port(haddr
, host_str
) < 0)
3964 if (!src_str
|| *src_str
== '\0')
3967 if (parse_host_port(saddr
, src_str2
) < 0)
3978 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
)
3986 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3988 saddr
->sin_family
= AF_INET
;
3989 if (buf
[0] == '\0') {
3990 saddr
->sin_addr
.s_addr
= 0;
3992 if (isdigit(buf
[0])) {
3993 if (!inet_aton(buf
, &saddr
->sin_addr
))
3996 if ((he
= gethostbyname(buf
)) == NULL
)
3998 saddr
->sin_addr
= *(struct in_addr
*)he
->h_addr
;
4001 port
= strtol(p
, (char **)&r
, 0);
4004 saddr
->sin_port
= htons(port
);
4009 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
)
4014 len
= MIN(108, strlen(str
));
4015 p
= strchr(str
, ',');
4017 len
= MIN(len
, p
- str
);
4019 memset(uaddr
, 0, sizeof(*uaddr
));
4021 uaddr
->sun_family
= AF_UNIX
;
4022 memcpy(uaddr
->sun_path
, str
, len
);
4028 /* find or alloc a new VLAN */
4029 VLANState
*qemu_find_vlan(int id
)
4031 VLANState
**pvlan
, *vlan
;
4032 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
4036 vlan
= qemu_mallocz(sizeof(VLANState
));
4041 pvlan
= &first_vlan
;
4042 while (*pvlan
!= NULL
)
4043 pvlan
= &(*pvlan
)->next
;
4048 VLANClientState
*qemu_new_vlan_client(VLANState
*vlan
,
4049 IOReadHandler
*fd_read
,
4050 IOCanRWHandler
*fd_can_read
,
4053 VLANClientState
*vc
, **pvc
;
4054 vc
= qemu_mallocz(sizeof(VLANClientState
));
4057 vc
->fd_read
= fd_read
;
4058 vc
->fd_can_read
= fd_can_read
;
4059 vc
->opaque
= opaque
;
4063 pvc
= &vlan
->first_client
;
4064 while (*pvc
!= NULL
)
4065 pvc
= &(*pvc
)->next
;
4070 void qemu_del_vlan_client(VLANClientState
*vc
)
4072 VLANClientState
**pvc
= &vc
->vlan
->first_client
;
4074 while (*pvc
!= NULL
)
4080 pvc
= &(*pvc
)->next
;
4083 int qemu_can_send_packet(VLANClientState
*vc1
)
4085 VLANState
*vlan
= vc1
->vlan
;
4086 VLANClientState
*vc
;
4088 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4090 if (vc
->fd_can_read
&& vc
->fd_can_read(vc
->opaque
))
4097 void qemu_send_packet(VLANClientState
*vc1
, const uint8_t *buf
, int size
)
4099 VLANState
*vlan
= vc1
->vlan
;
4100 VLANClientState
*vc
;
4103 printf("vlan %d send:\n", vlan
->id
);
4104 hex_dump(stdout
, buf
, size
);
4106 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4108 vc
->fd_read(vc
->opaque
, buf
, size
);
4113 #if defined(CONFIG_SLIRP)
4115 /* slirp network adapter */
4117 static int slirp_inited
;
4118 static VLANClientState
*slirp_vc
;
4120 int slirp_can_output(void)
4122 return !slirp_vc
|| qemu_can_send_packet(slirp_vc
);
4125 void slirp_output(const uint8_t *pkt
, int pkt_len
)
4128 printf("slirp output:\n");
4129 hex_dump(stdout
, pkt
, pkt_len
);
4133 qemu_send_packet(slirp_vc
, pkt
, pkt_len
);
4136 static void slirp_receive(void *opaque
, const uint8_t *buf
, int size
)
4139 printf("slirp input:\n");
4140 hex_dump(stdout
, buf
, size
);
4142 slirp_input(buf
, size
);
4145 static int net_slirp_init(VLANState
*vlan
)
4147 if (!slirp_inited
) {
4151 slirp_vc
= qemu_new_vlan_client(vlan
,
4152 slirp_receive
, NULL
, NULL
);
4153 snprintf(slirp_vc
->info_str
, sizeof(slirp_vc
->info_str
), "user redirector");
4157 static void net_slirp_redir(const char *redir_str
)
4162 struct in_addr guest_addr
;
4163 int host_port
, guest_port
;
4165 if (!slirp_inited
) {
4171 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4173 if (!strcmp(buf
, "tcp")) {
4175 } else if (!strcmp(buf
, "udp")) {
4181 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4183 host_port
= strtol(buf
, &r
, 0);
4187 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4189 if (buf
[0] == '\0') {
4190 pstrcpy(buf
, sizeof(buf
), "10.0.2.15");
4192 if (!inet_aton(buf
, &guest_addr
))
4195 guest_port
= strtol(p
, &r
, 0);
4199 if (slirp_redir(is_udp
, host_port
, guest_addr
, guest_port
) < 0) {
4200 fprintf(stderr
, "qemu: could not set up redirection\n");
4205 fprintf(stderr
, "qemu: syntax: -redir [tcp|udp]:host-port:[guest-host]:guest-port\n");
4211 static char smb_dir
[1024];
4213 static void erase_dir(char *dir_name
)
4217 char filename
[1024];
4219 /* erase all the files in the directory */
4220 if ((d
= opendir(dir_name
)) != 0) {
4225 if (strcmp(de
->d_name
, ".") != 0 &&
4226 strcmp(de
->d_name
, "..") != 0) {
4227 snprintf(filename
, sizeof(filename
), "%s/%s",
4228 smb_dir
, de
->d_name
);
4229 if (unlink(filename
) != 0) /* is it a directory? */
4230 erase_dir(filename
);
4238 /* automatic user mode samba server configuration */
4239 static void smb_exit(void)
4244 /* automatic user mode samba server configuration */
4245 static void net_slirp_smb(const char *exported_dir
)
4247 char smb_conf
[1024];
4248 char smb_cmdline
[1024];
4251 if (!slirp_inited
) {
4256 /* XXX: better tmp dir construction */
4257 snprintf(smb_dir
, sizeof(smb_dir
), "/tmp/qemu-smb.%d", getpid());
4258 if (mkdir(smb_dir
, 0700) < 0) {
4259 fprintf(stderr
, "qemu: could not create samba server dir '%s'\n", smb_dir
);
4262 snprintf(smb_conf
, sizeof(smb_conf
), "%s/%s", smb_dir
, "smb.conf");
4264 f
= fopen(smb_conf
, "w");
4266 fprintf(stderr
, "qemu: could not create samba server configuration file '%s'\n", smb_conf
);
4273 "socket address=127.0.0.1\n"
4274 "pid directory=%s\n"
4275 "lock directory=%s\n"
4276 "log file=%s/log.smbd\n"
4277 "smb passwd file=%s/smbpasswd\n"
4278 "security = share\n"
4293 snprintf(smb_cmdline
, sizeof(smb_cmdline
), "%s -s %s",
4294 SMBD_COMMAND
, smb_conf
);
4296 slirp_add_exec(0, smb_cmdline
, 4, 139);
4299 #endif /* !defined(_WIN32) */
4300 void do_info_slirp(void)
4305 #endif /* CONFIG_SLIRP */
4307 #if !defined(_WIN32)
4309 typedef struct TAPState
{
4310 VLANClientState
*vc
;
4312 char down_script
[1024];
4315 static void tap_receive(void *opaque
, const uint8_t *buf
, int size
)
4317 TAPState
*s
= opaque
;
4320 ret
= write(s
->fd
, buf
, size
);
4321 if (ret
< 0 && (errno
== EINTR
|| errno
== EAGAIN
)) {
4328 static void tap_send(void *opaque
)
4330 TAPState
*s
= opaque
;
4337 sbuf
.maxlen
= sizeof(buf
);
4339 size
= getmsg(s
->fd
, NULL
, &sbuf
, &f
) >=0 ? sbuf
.len
: -1;
4341 size
= read(s
->fd
, buf
, sizeof(buf
));
4344 qemu_send_packet(s
->vc
, buf
, size
);
4350 static TAPState
*net_tap_fd_init(VLANState
*vlan
, int fd
)
4354 s
= qemu_mallocz(sizeof(TAPState
));
4358 s
->vc
= qemu_new_vlan_client(vlan
, tap_receive
, NULL
, s
);
4359 qemu_set_fd_handler(s
->fd
, tap_send
, NULL
, s
);
4360 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "tap: fd=%d", fd
);
4364 #if defined (_BSD) || defined (__FreeBSD_kernel__)
4365 static int tap_open(char *ifname
, int ifname_size
)
4371 TFR(fd
= open("/dev/tap", O_RDWR
));
4373 fprintf(stderr
, "warning: could not open /dev/tap: no virtual network emulation\n");
4378 dev
= devname(s
.st_rdev
, S_IFCHR
);
4379 pstrcpy(ifname
, ifname_size
, dev
);
4381 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4384 #elif defined(__sun__)
4385 #define TUNNEWPPA (('T'<<16) | 0x0001)
4387 * Allocate TAP device, returns opened fd.
4388 * Stores dev name in the first arg(must be large enough).
4390 int tap_alloc(char *dev
, size_t dev_size
)
4392 int tap_fd
, if_fd
, ppa
= -1;
4393 static int ip_fd
= 0;
4396 static int arp_fd
= 0;
4397 int ip_muxid
, arp_muxid
;
4398 struct strioctl strioc_if
, strioc_ppa
;
4399 int link_type
= I_PLINK
;;
4401 char actual_name
[32] = "";
4403 memset(&ifr
, 0x0, sizeof(ifr
));
4407 while( *ptr
&& !isdigit((int)*ptr
) ) ptr
++;
4411 /* Check if IP device was opened */
4415 TFR(ip_fd
= open("/dev/udp", O_RDWR
, 0));
4417 syslog(LOG_ERR
, "Can't open /dev/ip (actually /dev/udp)");
4421 TFR(tap_fd
= open("/dev/tap", O_RDWR
, 0));
4423 syslog(LOG_ERR
, "Can't open /dev/tap");
4427 /* Assign a new PPA and get its unit number. */
4428 strioc_ppa
.ic_cmd
= TUNNEWPPA
;
4429 strioc_ppa
.ic_timout
= 0;
4430 strioc_ppa
.ic_len
= sizeof(ppa
);
4431 strioc_ppa
.ic_dp
= (char *)&ppa
;
4432 if ((ppa
= ioctl (tap_fd
, I_STR
, &strioc_ppa
)) < 0)
4433 syslog (LOG_ERR
, "Can't assign new interface");
4435 TFR(if_fd
= open("/dev/tap", O_RDWR
, 0));
4437 syslog(LOG_ERR
, "Can't open /dev/tap (2)");
4440 if(ioctl(if_fd
, I_PUSH
, "ip") < 0){
4441 syslog(LOG_ERR
, "Can't push IP module");
4445 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) < 0)
4446 syslog(LOG_ERR
, "Can't get flags\n");
4448 snprintf (actual_name
, 32, "tap%d", ppa
);
4449 pstrcpy(ifr
.lifr_name
, sizeof(ifr
.lifr_name
), actual_name
);
4452 /* Assign ppa according to the unit number returned by tun device */
4454 if (ioctl (if_fd
, SIOCSLIFNAME
, &ifr
) < 0)
4455 syslog (LOG_ERR
, "Can't set PPA %d", ppa
);
4456 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) <0)
4457 syslog (LOG_ERR
, "Can't get flags\n");
4458 /* Push arp module to if_fd */
4459 if (ioctl (if_fd
, I_PUSH
, "arp") < 0)
4460 syslog (LOG_ERR
, "Can't push ARP module (2)");
4462 /* Push arp module to ip_fd */
4463 if (ioctl (ip_fd
, I_POP
, NULL
) < 0)
4464 syslog (LOG_ERR
, "I_POP failed\n");
4465 if (ioctl (ip_fd
, I_PUSH
, "arp") < 0)
4466 syslog (LOG_ERR
, "Can't push ARP module (3)\n");
4468 TFR(arp_fd
= open ("/dev/tap", O_RDWR
, 0));
4470 syslog (LOG_ERR
, "Can't open %s\n", "/dev/tap");
4472 /* Set ifname to arp */
4473 strioc_if
.ic_cmd
= SIOCSLIFNAME
;
4474 strioc_if
.ic_timout
= 0;
4475 strioc_if
.ic_len
= sizeof(ifr
);
4476 strioc_if
.ic_dp
= (char *)&ifr
;
4477 if (ioctl(arp_fd
, I_STR
, &strioc_if
) < 0){
4478 syslog (LOG_ERR
, "Can't set ifname to arp\n");
4481 if((ip_muxid
= ioctl(ip_fd
, I_LINK
, if_fd
)) < 0){
4482 syslog(LOG_ERR
, "Can't link TAP device to IP");
4486 if ((arp_muxid
= ioctl (ip_fd
, link_type
, arp_fd
)) < 0)
4487 syslog (LOG_ERR
, "Can't link TAP device to ARP");
4491 memset(&ifr
, 0x0, sizeof(ifr
));
4492 pstrcpy(ifr
.lifr_name
, sizeof(ifr
.lifr_name
), actual_name
);
4493 ifr
.lifr_ip_muxid
= ip_muxid
;
4494 ifr
.lifr_arp_muxid
= arp_muxid
;
4496 if (ioctl (ip_fd
, SIOCSLIFMUXID
, &ifr
) < 0)
4498 ioctl (ip_fd
, I_PUNLINK
, arp_muxid
);
4499 ioctl (ip_fd
, I_PUNLINK
, ip_muxid
);
4500 syslog (LOG_ERR
, "Can't set multiplexor id");
4503 snprintf(dev
, dev_size
, "tap%d", ppa
);
4507 static int tap_open(char *ifname
, int ifname_size
)
4511 if( (fd
= tap_alloc(dev
, sizeof(dev
))) < 0 ){
4512 fprintf(stderr
, "Cannot allocate TAP device\n");
4515 pstrcpy(ifname
, ifname_size
, dev
);
4516 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4520 static int tap_open(char *ifname
, int ifname_size
)
4525 TFR(fd
= open("/dev/net/tun", O_RDWR
));
4527 fprintf(stderr
, "warning: could not open /dev/net/tun: no virtual network emulation\n");
4530 memset(&ifr
, 0, sizeof(ifr
));
4531 ifr
.ifr_flags
= IFF_TAP
| IFF_NO_PI
;
4532 if (ifname
[0] != '\0')
4533 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, ifname
);
4535 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, "tap%d");
4536 ret
= ioctl(fd
, TUNSETIFF
, (void *) &ifr
);
4538 fprintf(stderr
, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
4542 pstrcpy(ifname
, ifname_size
, ifr
.ifr_name
);
4543 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4548 static int launch_script(const char *setup_script
, const char *ifname
, int fd
)
4554 /* try to launch network script */
4558 int open_max
= sysconf (_SC_OPEN_MAX
), i
;
4559 for (i
= 0; i
< open_max
; i
++)
4560 if (i
!= STDIN_FILENO
&&
4561 i
!= STDOUT_FILENO
&&
4562 i
!= STDERR_FILENO
&&
4567 *parg
++ = (char *)setup_script
;
4568 *parg
++ = (char *)ifname
;
4570 execv(setup_script
, args
);
4573 while (waitpid(pid
, &status
, 0) != pid
);
4574 if (!WIFEXITED(status
) ||
4575 WEXITSTATUS(status
) != 0) {
4576 fprintf(stderr
, "%s: could not launch network script\n",
4584 static int net_tap_init(VLANState
*vlan
, const char *ifname1
,
4585 const char *setup_script
, const char *down_script
)
4591 if (ifname1
!= NULL
)
4592 pstrcpy(ifname
, sizeof(ifname
), ifname1
);
4595 TFR(fd
= tap_open(ifname
, sizeof(ifname
)));
4599 if (!setup_script
|| !strcmp(setup_script
, "no"))
4601 if (setup_script
[0] != '\0') {
4602 if (launch_script(setup_script
, ifname
, fd
))
4605 s
= net_tap_fd_init(vlan
, fd
);
4608 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4609 "tap: ifname=%s setup_script=%s", ifname
, setup_script
);
4610 if (down_script
&& strcmp(down_script
, "no"))
4611 snprintf(s
->down_script
, sizeof(s
->down_script
), "%s", down_script
);
4615 #endif /* !_WIN32 */
4617 #if defined(CONFIG_VDE)
4618 typedef struct VDEState
{
4619 VLANClientState
*vc
;
4623 static void vde_to_qemu(void *opaque
)
4625 VDEState
*s
= opaque
;
4629 size
= vde_recv(s
->vde
, buf
, sizeof(buf
), 0);
4631 qemu_send_packet(s
->vc
, buf
, size
);
4635 static void vde_from_qemu(void *opaque
, const uint8_t *buf
, int size
)
4637 VDEState
*s
= opaque
;
4640 ret
= vde_send(s
->vde
, buf
, size
, 0);
4641 if (ret
< 0 && errno
== EINTR
) {
4648 static int net_vde_init(VLANState
*vlan
, const char *sock
, int port
,
4649 const char *group
, int mode
)
4652 char *init_group
= strlen(group
) ? (char *)group
: NULL
;
4653 char *init_sock
= strlen(sock
) ? (char *)sock
: NULL
;
4655 struct vde_open_args args
= {
4657 .group
= init_group
,
4661 s
= qemu_mallocz(sizeof(VDEState
));
4664 s
->vde
= vde_open(init_sock
, "QEMU", &args
);
4669 s
->vc
= qemu_new_vlan_client(vlan
, vde_from_qemu
, NULL
, s
);
4670 qemu_set_fd_handler(vde_datafd(s
->vde
), vde_to_qemu
, NULL
, s
);
4671 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "vde: sock=%s fd=%d",
4672 sock
, vde_datafd(s
->vde
));
4677 /* network connection */
4678 typedef struct NetSocketState
{
4679 VLANClientState
*vc
;
4681 int state
; /* 0 = getting length, 1 = getting data */
4685 struct sockaddr_in dgram_dst
; /* contains inet host and port destination iff connectionless (SOCK_DGRAM) */
4688 typedef struct NetSocketListenState
{
4691 } NetSocketListenState
;
4693 /* XXX: we consider we can send the whole packet without blocking */
4694 static void net_socket_receive(void *opaque
, const uint8_t *buf
, int size
)
4696 NetSocketState
*s
= opaque
;
4700 send_all(s
->fd
, (const uint8_t *)&len
, sizeof(len
));
4701 send_all(s
->fd
, buf
, size
);
4704 static void net_socket_receive_dgram(void *opaque
, const uint8_t *buf
, int size
)
4706 NetSocketState
*s
= opaque
;
4707 sendto(s
->fd
, buf
, size
, 0,
4708 (struct sockaddr
*)&s
->dgram_dst
, sizeof(s
->dgram_dst
));
4711 static void net_socket_send(void *opaque
)
4713 NetSocketState
*s
= opaque
;
4718 size
= recv(s
->fd
, buf1
, sizeof(buf1
), 0);
4720 err
= socket_error();
4721 if (err
!= EWOULDBLOCK
)
4723 } else if (size
== 0) {
4724 /* end of connection */
4726 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4732 /* reassemble a packet from the network */
4738 memcpy(s
->buf
+ s
->index
, buf
, l
);
4742 if (s
->index
== 4) {
4744 s
->packet_len
= ntohl(*(uint32_t *)s
->buf
);
4750 l
= s
->packet_len
- s
->index
;
4753 memcpy(s
->buf
+ s
->index
, buf
, l
);
4757 if (s
->index
>= s
->packet_len
) {
4758 qemu_send_packet(s
->vc
, s
->buf
, s
->packet_len
);
4767 static void net_socket_send_dgram(void *opaque
)
4769 NetSocketState
*s
= opaque
;
4772 size
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
4776 /* end of connection */
4777 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4780 qemu_send_packet(s
->vc
, s
->buf
, size
);
4783 static int net_socket_mcast_create(struct sockaddr_in
*mcastaddr
)
4788 if (!IN_MULTICAST(ntohl(mcastaddr
->sin_addr
.s_addr
))) {
4789 fprintf(stderr
, "qemu: error: specified mcastaddr \"%s\" (0x%08x) does not contain a multicast address\n",
4790 inet_ntoa(mcastaddr
->sin_addr
),
4791 (int)ntohl(mcastaddr
->sin_addr
.s_addr
));
4795 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
4797 perror("socket(PF_INET, SOCK_DGRAM)");
4802 ret
=setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
,
4803 (const char *)&val
, sizeof(val
));
4805 perror("setsockopt(SOL_SOCKET, SO_REUSEADDR)");
4809 ret
= bind(fd
, (struct sockaddr
*)mcastaddr
, sizeof(*mcastaddr
));
4815 /* Add host to multicast group */
4816 imr
.imr_multiaddr
= mcastaddr
->sin_addr
;
4817 imr
.imr_interface
.s_addr
= htonl(INADDR_ANY
);
4819 ret
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
,
4820 (const char *)&imr
, sizeof(struct ip_mreq
));
4822 perror("setsockopt(IP_ADD_MEMBERSHIP)");
4826 /* Force mcast msgs to loopback (eg. several QEMUs in same host */
4828 ret
=setsockopt(fd
, IPPROTO_IP
, IP_MULTICAST_LOOP
,
4829 (const char *)&val
, sizeof(val
));
4831 perror("setsockopt(SOL_IP, IP_MULTICAST_LOOP)");
4835 socket_set_nonblock(fd
);
4843 static NetSocketState
*net_socket_fd_init_dgram(VLANState
*vlan
, int fd
,
4846 struct sockaddr_in saddr
;
4848 socklen_t saddr_len
;
4851 /* fd passed: multicast: "learn" dgram_dst address from bound address and save it
4852 * Because this may be "shared" socket from a "master" process, datagrams would be recv()
4853 * by ONLY ONE process: we must "clone" this dgram socket --jjo
4857 if (getsockname(fd
, (struct sockaddr
*) &saddr
, &saddr_len
) == 0) {
4859 if (saddr
.sin_addr
.s_addr
==0) {
4860 fprintf(stderr
, "qemu: error: init_dgram: fd=%d unbound, cannot setup multicast dst addr\n",
4864 /* clone dgram socket */
4865 newfd
= net_socket_mcast_create(&saddr
);
4867 /* error already reported by net_socket_mcast_create() */
4871 /* clone newfd to fd, close newfd */
4876 fprintf(stderr
, "qemu: error: init_dgram: fd=%d failed getsockname(): %s\n",
4877 fd
, strerror(errno
));
4882 s
= qemu_mallocz(sizeof(NetSocketState
));
4887 s
->vc
= qemu_new_vlan_client(vlan
, net_socket_receive_dgram
, NULL
, s
);
4888 qemu_set_fd_handler(s
->fd
, net_socket_send_dgram
, NULL
, s
);
4890 /* mcast: save bound address as dst */
4891 if (is_connected
) s
->dgram_dst
=saddr
;
4893 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4894 "socket: fd=%d (%s mcast=%s:%d)",
4895 fd
, is_connected
? "cloned" : "",
4896 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4900 static void net_socket_connect(void *opaque
)
4902 NetSocketState
*s
= opaque
;
4903 qemu_set_fd_handler(s
->fd
, net_socket_send
, NULL
, s
);
4906 static NetSocketState
*net_socket_fd_init_stream(VLANState
*vlan
, int fd
,
4910 s
= qemu_mallocz(sizeof(NetSocketState
));
4914 s
->vc
= qemu_new_vlan_client(vlan
,
4915 net_socket_receive
, NULL
, s
);
4916 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4917 "socket: fd=%d", fd
);
4919 net_socket_connect(s
);
4921 qemu_set_fd_handler(s
->fd
, NULL
, net_socket_connect
, s
);
4926 static NetSocketState
*net_socket_fd_init(VLANState
*vlan
, int fd
,
4929 int so_type
=-1, optlen
=sizeof(so_type
);
4931 if(getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, (char *)&so_type
,
4932 (socklen_t
*)&optlen
)< 0) {
4933 fprintf(stderr
, "qemu: error: getsockopt(SO_TYPE) for fd=%d failed\n", fd
);
4938 return net_socket_fd_init_dgram(vlan
, fd
, is_connected
);
4940 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4942 /* who knows ... this could be a eg. a pty, do warn and continue as stream */
4943 fprintf(stderr
, "qemu: warning: socket type=%d for fd=%d is not SOCK_DGRAM or SOCK_STREAM\n", so_type
, fd
);
4944 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4949 static void net_socket_accept(void *opaque
)
4951 NetSocketListenState
*s
= opaque
;
4953 struct sockaddr_in saddr
;
4958 len
= sizeof(saddr
);
4959 fd
= accept(s
->fd
, (struct sockaddr
*)&saddr
, &len
);
4960 if (fd
< 0 && errno
!= EINTR
) {
4962 } else if (fd
>= 0) {
4966 s1
= net_socket_fd_init(s
->vlan
, fd
, 1);
4970 snprintf(s1
->vc
->info_str
, sizeof(s1
->vc
->info_str
),
4971 "socket: connection from %s:%d",
4972 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4976 static int net_socket_listen_init(VLANState
*vlan
, const char *host_str
)
4978 NetSocketListenState
*s
;
4980 struct sockaddr_in saddr
;
4982 if (parse_host_port(&saddr
, host_str
) < 0)
4985 s
= qemu_mallocz(sizeof(NetSocketListenState
));
4989 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4994 socket_set_nonblock(fd
);
4996 /* allow fast reuse */
4998 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
5000 ret
= bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5005 ret
= listen(fd
, 0);
5012 qemu_set_fd_handler(fd
, net_socket_accept
, NULL
, s
);
5016 static int net_socket_connect_init(VLANState
*vlan
, const char *host_str
)
5019 int fd
, connected
, ret
, err
;
5020 struct sockaddr_in saddr
;
5022 if (parse_host_port(&saddr
, host_str
) < 0)
5025 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
5030 socket_set_nonblock(fd
);
5034 ret
= connect(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5036 err
= socket_error();
5037 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
5038 } else if (err
== EINPROGRESS
) {
5041 } else if (err
== WSAEALREADY
) {
5054 s
= net_socket_fd_init(vlan
, fd
, connected
);
5057 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5058 "socket: connect to %s:%d",
5059 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5063 static int net_socket_mcast_init(VLANState
*vlan
, const char *host_str
)
5067 struct sockaddr_in saddr
;
5069 if (parse_host_port(&saddr
, host_str
) < 0)
5073 fd
= net_socket_mcast_create(&saddr
);
5077 s
= net_socket_fd_init(vlan
, fd
, 0);
5081 s
->dgram_dst
= saddr
;
5083 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5084 "socket: mcast=%s:%d",
5085 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5090 static const char *get_opt_name(char *buf
, int buf_size
, const char *p
)
5095 while (*p
!= '\0' && *p
!= '=') {
5096 if (q
&& (q
- buf
) < buf_size
- 1)
5106 static const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
5111 while (*p
!= '\0') {
5113 if (*(p
+ 1) != ',')
5117 if (q
&& (q
- buf
) < buf_size
- 1)
5127 static int get_param_value(char *buf
, int buf_size
,
5128 const char *tag
, const char *str
)
5135 p
= get_opt_name(option
, sizeof(option
), p
);
5139 if (!strcmp(tag
, option
)) {
5140 (void)get_opt_value(buf
, buf_size
, p
);
5143 p
= get_opt_value(NULL
, 0, p
);
5152 static int check_params(char *buf
, int buf_size
,
5153 const char * const *params
, const char *str
)
5160 p
= get_opt_name(buf
, buf_size
, p
);
5164 for(i
= 0; params
[i
] != NULL
; i
++)
5165 if (!strcmp(params
[i
], buf
))
5167 if (params
[i
] == NULL
)
5169 p
= get_opt_value(NULL
, 0, p
);
5177 static int net_client_init(const char *device
, const char *p
)
5184 if (get_param_value(buf
, sizeof(buf
), "vlan", p
)) {
5185 vlan_id
= strtol(buf
, NULL
, 0);
5187 vlan
= qemu_find_vlan(vlan_id
);
5189 fprintf(stderr
, "Could not create vlan %d\n", vlan_id
);
5192 if (!strcmp(device
, "nic")) {
5196 if (nb_nics
>= MAX_NICS
) {
5197 fprintf(stderr
, "Too Many NICs\n");
5200 nd
= &nd_table
[nb_nics
];
5201 macaddr
= nd
->macaddr
;
5207 macaddr
[5] = 0x56 + nb_nics
;
5209 if (get_param_value(buf
, sizeof(buf
), "macaddr", p
)) {
5210 if (parse_macaddr(macaddr
, buf
) < 0) {
5211 fprintf(stderr
, "invalid syntax for ethernet address\n");
5215 if (get_param_value(buf
, sizeof(buf
), "model", p
)) {
5216 nd
->model
= strdup(buf
);
5220 vlan
->nb_guest_devs
++;
5223 if (!strcmp(device
, "none")) {
5224 /* does nothing. It is needed to signal that no network cards
5229 if (!strcmp(device
, "user")) {
5230 if (get_param_value(buf
, sizeof(buf
), "hostname", p
)) {
5231 pstrcpy(slirp_hostname
, sizeof(slirp_hostname
), buf
);
5233 vlan
->nb_host_devs
++;
5234 ret
= net_slirp_init(vlan
);
5238 if (!strcmp(device
, "tap")) {
5240 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5241 fprintf(stderr
, "tap: no interface name\n");
5244 vlan
->nb_host_devs
++;
5245 ret
= tap_win32_init(vlan
, ifname
);
5248 if (!strcmp(device
, "tap")) {
5250 char setup_script
[1024], down_script
[1024];
5252 vlan
->nb_host_devs
++;
5253 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5254 fd
= strtol(buf
, NULL
, 0);
5255 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
5257 if (net_tap_fd_init(vlan
, fd
))
5260 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5263 if (get_param_value(setup_script
, sizeof(setup_script
), "script", p
) == 0) {
5264 pstrcpy(setup_script
, sizeof(setup_script
), DEFAULT_NETWORK_SCRIPT
);
5266 if (get_param_value(down_script
, sizeof(down_script
), "downscript", p
) == 0) {
5267 pstrcpy(down_script
, sizeof(down_script
), DEFAULT_NETWORK_DOWN_SCRIPT
);
5269 ret
= net_tap_init(vlan
, ifname
, setup_script
, down_script
);
5273 if (!strcmp(device
, "socket")) {
5274 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5276 fd
= strtol(buf
, NULL
, 0);
5278 if (net_socket_fd_init(vlan
, fd
, 1))
5280 } else if (get_param_value(buf
, sizeof(buf
), "listen", p
) > 0) {
5281 ret
= net_socket_listen_init(vlan
, buf
);
5282 } else if (get_param_value(buf
, sizeof(buf
), "connect", p
) > 0) {
5283 ret
= net_socket_connect_init(vlan
, buf
);
5284 } else if (get_param_value(buf
, sizeof(buf
), "mcast", p
) > 0) {
5285 ret
= net_socket_mcast_init(vlan
, buf
);
5287 fprintf(stderr
, "Unknown socket options: %s\n", p
);
5290 vlan
->nb_host_devs
++;
5293 if (!strcmp(device
, "vde")) {
5294 char vde_sock
[1024], vde_group
[512];
5295 int vde_port
, vde_mode
;
5296 vlan
->nb_host_devs
++;
5297 if (get_param_value(vde_sock
, sizeof(vde_sock
), "sock", p
) <= 0) {
5300 if (get_param_value(buf
, sizeof(buf
), "port", p
) > 0) {
5301 vde_port
= strtol(buf
, NULL
, 10);
5305 if (get_param_value(vde_group
, sizeof(vde_group
), "group", p
) <= 0) {
5306 vde_group
[0] = '\0';
5308 if (get_param_value(buf
, sizeof(buf
), "mode", p
) > 0) {
5309 vde_mode
= strtol(buf
, NULL
, 8);
5313 ret
= net_vde_init(vlan
, vde_sock
, vde_port
, vde_group
, vde_mode
);
5317 fprintf(stderr
, "Unknown network device: %s\n", device
);
5321 fprintf(stderr
, "Could not initialize device '%s'\n", device
);
5327 static int net_client_parse(const char *str
)
5335 while (*p
!= '\0' && *p
!= ',') {
5336 if ((q
- device
) < sizeof(device
) - 1)
5344 return net_client_init(device
, p
);
5347 void do_info_network(void)
5350 VLANClientState
*vc
;
5352 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5353 term_printf("VLAN %d devices:\n", vlan
->id
);
5354 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
)
5355 term_printf(" %s\n", vc
->info_str
);
5359 /***********************************************************/
5360 /* Bluetooth support */
5363 static struct HCIInfo
*hci_table
[MAX_NICS
];
5365 static struct bt_vlan_s
{
5366 struct bt_scatternet_s net
;
5368 struct bt_vlan_s
*next
;
5371 /* find or alloc a new bluetooth "VLAN" */
5372 static struct bt_scatternet_s
*qemu_find_bt_vlan(int id
)
5374 struct bt_vlan_s
**pvlan
, *vlan
;
5375 for (vlan
= first_bt_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5379 vlan
= qemu_mallocz(sizeof(struct bt_vlan_s
));
5381 pvlan
= &first_bt_vlan
;
5382 while (*pvlan
!= NULL
)
5383 pvlan
= &(*pvlan
)->next
;
5389 static void null_hci_send(struct HCIInfo
*hci
, const uint8_t *data
, int len
)
5393 static int null_hci_addr_set(struct HCIInfo
*hci
, const uint8_t *bd_addr
)
5398 static struct HCIInfo null_hci
= {
5399 .cmd_send
= null_hci_send
,
5400 .sco_send
= null_hci_send
,
5401 .acl_send
= null_hci_send
,
5402 .bdaddr_set
= null_hci_addr_set
,
5405 struct HCIInfo
*qemu_next_hci(void)
5407 if (cur_hci
== nb_hcis
)
5410 return hci_table
[cur_hci
++];
5413 /***********************************************************/
5414 /* QEMU Block devices */
5416 #define HD_ALIAS "index=%d,media=disk"
5418 #define CDROM_ALIAS "index=1,media=cdrom"
5420 #define CDROM_ALIAS "index=2,media=cdrom"
5422 #define FD_ALIAS "index=%d,if=floppy"
5423 #define PFLASH_ALIAS "if=pflash"
5424 #define MTD_ALIAS "if=mtd"
5425 #define SD_ALIAS "index=0,if=sd"
5427 static int drive_add(const char *file
, const char *fmt
, ...)
5431 if (nb_drives_opt
>= MAX_DRIVES
) {
5432 fprintf(stderr
, "qemu: too many drives\n");
5436 drives_opt
[nb_drives_opt
].file
= file
;
5438 vsnprintf(drives_opt
[nb_drives_opt
].opt
,
5439 sizeof(drives_opt
[0].opt
), fmt
, ap
);
5442 return nb_drives_opt
++;
5445 int drive_get_index(BlockInterfaceType type
, int bus
, int unit
)
5449 /* seek interface, bus and unit */
5451 for (index
= 0; index
< nb_drives
; index
++)
5452 if (drives_table
[index
].type
== type
&&
5453 drives_table
[index
].bus
== bus
&&
5454 drives_table
[index
].unit
== unit
)
5460 int drive_get_max_bus(BlockInterfaceType type
)
5466 for (index
= 0; index
< nb_drives
; index
++) {
5467 if(drives_table
[index
].type
== type
&&
5468 drives_table
[index
].bus
> max_bus
)
5469 max_bus
= drives_table
[index
].bus
;
5474 static void bdrv_format_print(void *opaque
, const char *name
)
5476 fprintf(stderr
, " %s", name
);
5479 static int drive_init(struct drive_opt
*arg
, int snapshot
,
5480 QEMUMachine
*machine
)
5485 const char *mediastr
= "";
5486 BlockInterfaceType type
;
5487 enum { MEDIA_DISK
, MEDIA_CDROM
} media
;
5488 int bus_id
, unit_id
;
5489 int cyls
, heads
, secs
, translation
;
5490 BlockDriverState
*bdrv
;
5491 BlockDriver
*drv
= NULL
;
5496 char *str
= arg
->opt
;
5497 static const char * const params
[] = { "bus", "unit", "if", "index",
5498 "cyls", "heads", "secs", "trans",
5499 "media", "snapshot", "file",
5500 "cache", "format", NULL
};
5502 if (check_params(buf
, sizeof(buf
), params
, str
) < 0) {
5503 fprintf(stderr
, "qemu: unknown parameter '%s' in '%s'\n",
5509 cyls
= heads
= secs
= 0;
5512 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5516 if (machine
->use_scsi
) {
5518 max_devs
= MAX_SCSI_DEVS
;
5519 pstrcpy(devname
, sizeof(devname
), "scsi");
5522 max_devs
= MAX_IDE_DEVS
;
5523 pstrcpy(devname
, sizeof(devname
), "ide");
5527 /* extract parameters */
5529 if (get_param_value(buf
, sizeof(buf
), "bus", str
)) {
5530 bus_id
= strtol(buf
, NULL
, 0);
5532 fprintf(stderr
, "qemu: '%s' invalid bus id\n", str
);
5537 if (get_param_value(buf
, sizeof(buf
), "unit", str
)) {
5538 unit_id
= strtol(buf
, NULL
, 0);
5540 fprintf(stderr
, "qemu: '%s' invalid unit id\n", str
);
5545 if (get_param_value(buf
, sizeof(buf
), "if", str
)) {
5546 pstrcpy(devname
, sizeof(devname
), buf
);
5547 if (!strcmp(buf
, "ide")) {
5549 max_devs
= MAX_IDE_DEVS
;
5550 } else if (!strcmp(buf
, "scsi")) {
5552 max_devs
= MAX_SCSI_DEVS
;
5553 } else if (!strcmp(buf
, "floppy")) {
5556 } else if (!strcmp(buf
, "pflash")) {
5559 } else if (!strcmp(buf
, "mtd")) {
5562 } else if (!strcmp(buf
, "sd")) {
5566 fprintf(stderr
, "qemu: '%s' unsupported bus type '%s'\n", str
, buf
);
5571 if (get_param_value(buf
, sizeof(buf
), "index", str
)) {
5572 index
= strtol(buf
, NULL
, 0);
5574 fprintf(stderr
, "qemu: '%s' invalid index\n", str
);
5579 if (get_param_value(buf
, sizeof(buf
), "cyls", str
)) {
5580 cyls
= strtol(buf
, NULL
, 0);
5583 if (get_param_value(buf
, sizeof(buf
), "heads", str
)) {
5584 heads
= strtol(buf
, NULL
, 0);
5587 if (get_param_value(buf
, sizeof(buf
), "secs", str
)) {
5588 secs
= strtol(buf
, NULL
, 0);
5591 if (cyls
|| heads
|| secs
) {
5592 if (cyls
< 1 || cyls
> 16383) {
5593 fprintf(stderr
, "qemu: '%s' invalid physical cyls number\n", str
);
5596 if (heads
< 1 || heads
> 16) {
5597 fprintf(stderr
, "qemu: '%s' invalid physical heads number\n", str
);
5600 if (secs
< 1 || secs
> 63) {
5601 fprintf(stderr
, "qemu: '%s' invalid physical secs number\n", str
);
5606 if (get_param_value(buf
, sizeof(buf
), "trans", str
)) {
5609 "qemu: '%s' trans must be used with cyls,heads and secs\n",
5613 if (!strcmp(buf
, "none"))
5614 translation
= BIOS_ATA_TRANSLATION_NONE
;
5615 else if (!strcmp(buf
, "lba"))
5616 translation
= BIOS_ATA_TRANSLATION_LBA
;
5617 else if (!strcmp(buf
, "auto"))
5618 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5620 fprintf(stderr
, "qemu: '%s' invalid translation type\n", str
);
5625 if (get_param_value(buf
, sizeof(buf
), "media", str
)) {
5626 if (!strcmp(buf
, "disk")) {
5628 } else if (!strcmp(buf
, "cdrom")) {
5629 if (cyls
|| secs
|| heads
) {
5631 "qemu: '%s' invalid physical CHS format\n", str
);
5634 media
= MEDIA_CDROM
;
5636 fprintf(stderr
, "qemu: '%s' invalid media\n", str
);
5641 if (get_param_value(buf
, sizeof(buf
), "snapshot", str
)) {
5642 if (!strcmp(buf
, "on"))
5644 else if (!strcmp(buf
, "off"))
5647 fprintf(stderr
, "qemu: '%s' invalid snapshot option\n", str
);
5652 if (get_param_value(buf
, sizeof(buf
), "cache", str
)) {
5653 if (!strcmp(buf
, "off") || !strcmp(buf
, "none"))
5655 else if (!strcmp(buf
, "writethrough"))
5657 else if (!strcmp(buf
, "writeback"))
5660 fprintf(stderr
, "qemu: invalid cache option\n");
5665 if (get_param_value(buf
, sizeof(buf
), "format", str
)) {
5666 if (strcmp(buf
, "?") == 0) {
5667 fprintf(stderr
, "qemu: Supported formats:");
5668 bdrv_iterate_format(bdrv_format_print
, NULL
);
5669 fprintf(stderr
, "\n");
5672 drv
= bdrv_find_format(buf
);
5674 fprintf(stderr
, "qemu: '%s' invalid format\n", buf
);
5679 if (arg
->file
== NULL
)
5680 get_param_value(file
, sizeof(file
), "file", str
);
5682 pstrcpy(file
, sizeof(file
), arg
->file
);
5684 /* compute bus and unit according index */
5687 if (bus_id
!= 0 || unit_id
!= -1) {
5689 "qemu: '%s' index cannot be used with bus and unit\n", str
);
5697 unit_id
= index
% max_devs
;
5698 bus_id
= index
/ max_devs
;
5702 /* if user doesn't specify a unit_id,
5703 * try to find the first free
5706 if (unit_id
== -1) {
5708 while (drive_get_index(type
, bus_id
, unit_id
) != -1) {
5710 if (max_devs
&& unit_id
>= max_devs
) {
5711 unit_id
-= max_devs
;
5719 if (max_devs
&& unit_id
>= max_devs
) {
5720 fprintf(stderr
, "qemu: '%s' unit %d too big (max is %d)\n",
5721 str
, unit_id
, max_devs
- 1);
5726 * ignore multiple definitions
5729 if (drive_get_index(type
, bus_id
, unit_id
) != -1)
5734 if (type
== IF_IDE
|| type
== IF_SCSI
)
5735 mediastr
= (media
== MEDIA_CDROM
) ? "-cd" : "-hd";
5737 snprintf(buf
, sizeof(buf
), "%s%i%s%i",
5738 devname
, bus_id
, mediastr
, unit_id
);
5740 snprintf(buf
, sizeof(buf
), "%s%s%i",
5741 devname
, mediastr
, unit_id
);
5742 bdrv
= bdrv_new(buf
);
5743 drives_table
[nb_drives
].bdrv
= bdrv
;
5744 drives_table
[nb_drives
].type
= type
;
5745 drives_table
[nb_drives
].bus
= bus_id
;
5746 drives_table
[nb_drives
].unit
= unit_id
;
5755 bdrv_set_geometry_hint(bdrv
, cyls
, heads
, secs
);
5756 bdrv_set_translation_hint(bdrv
, translation
);
5760 bdrv_set_type_hint(bdrv
, BDRV_TYPE_CDROM
);
5765 /* FIXME: This isn't really a floppy, but it's a reasonable
5768 bdrv_set_type_hint(bdrv
, BDRV_TYPE_FLOPPY
);
5778 bdrv_flags
|= BDRV_O_SNAPSHOT
;
5779 cache
= 2; /* always use write-back with snapshot */
5781 if (cache
== 0) /* no caching */
5782 bdrv_flags
|= BDRV_O_NOCACHE
;
5783 else if (cache
== 2) /* write-back */
5784 bdrv_flags
|= BDRV_O_CACHE_WB
;
5785 if (bdrv_open2(bdrv
, file
, bdrv_flags
, drv
) < 0 || qemu_key_check(bdrv
, file
)) {
5786 fprintf(stderr
, "qemu: could not open disk image %s\n",
5793 /***********************************************************/
5796 static USBPort
*used_usb_ports
;
5797 static USBPort
*free_usb_ports
;
5799 /* ??? Maybe change this to register a hub to keep track of the topology. */
5800 void qemu_register_usb_port(USBPort
*port
, void *opaque
, int index
,
5801 usb_attachfn attach
)
5803 port
->opaque
= opaque
;
5804 port
->index
= index
;
5805 port
->attach
= attach
;
5806 port
->next
= free_usb_ports
;
5807 free_usb_ports
= port
;
5810 int usb_device_add_dev(USBDevice
*dev
)
5814 /* Find a USB port to add the device to. */
5815 port
= free_usb_ports
;
5819 /* Create a new hub and chain it on. */
5820 free_usb_ports
= NULL
;
5821 port
->next
= used_usb_ports
;
5822 used_usb_ports
= port
;
5824 hub
= usb_hub_init(VM_USB_HUB_SIZE
);
5825 usb_attach(port
, hub
);
5826 port
= free_usb_ports
;
5829 free_usb_ports
= port
->next
;
5830 port
->next
= used_usb_ports
;
5831 used_usb_ports
= port
;
5832 usb_attach(port
, dev
);
5836 static int usb_device_add(const char *devname
)
5841 if (!free_usb_ports
)
5844 if (strstart(devname
, "host:", &p
)) {
5845 dev
= usb_host_device_open(p
);
5846 } else if (!strcmp(devname
, "mouse")) {
5847 dev
= usb_mouse_init();
5848 } else if (!strcmp(devname
, "tablet")) {
5849 dev
= usb_tablet_init();
5850 } else if (!strcmp(devname
, "keyboard")) {
5851 dev
= usb_keyboard_init();
5852 } else if (strstart(devname
, "disk:", &p
)) {
5853 dev
= usb_msd_init(p
);
5854 } else if (!strcmp(devname
, "wacom-tablet")) {
5855 dev
= usb_wacom_init();
5856 } else if (strstart(devname
, "serial:", &p
)) {
5857 dev
= usb_serial_init(p
);
5858 #ifdef CONFIG_BRLAPI
5859 } else if (!strcmp(devname
, "braille")) {
5860 dev
= usb_baum_init();
5862 } else if (strstart(devname
, "net:", &p
)) {
5865 if (net_client_init("nic", p
) < 0)
5867 nd_table
[nic
].model
= "usb";
5868 dev
= usb_net_init(&nd_table
[nic
]);
5875 return usb_device_add_dev(dev
);
5878 int usb_device_del_addr(int bus_num
, int addr
)
5884 if (!used_usb_ports
)
5890 lastp
= &used_usb_ports
;
5891 port
= used_usb_ports
;
5892 while (port
&& port
->dev
->addr
!= addr
) {
5893 lastp
= &port
->next
;
5901 *lastp
= port
->next
;
5902 usb_attach(port
, NULL
);
5903 dev
->handle_destroy(dev
);
5904 port
->next
= free_usb_ports
;
5905 free_usb_ports
= port
;
5909 static int usb_device_del(const char *devname
)
5914 if (strstart(devname
, "host:", &p
))
5915 return usb_host_device_close(p
);
5917 if (!used_usb_ports
)
5920 p
= strchr(devname
, '.');
5923 bus_num
= strtoul(devname
, NULL
, 0);
5924 addr
= strtoul(p
+ 1, NULL
, 0);
5926 return usb_device_del_addr(bus_num
, addr
);
5929 void do_usb_add(const char *devname
)
5931 usb_device_add(devname
);
5934 void do_usb_del(const char *devname
)
5936 usb_device_del(devname
);
5943 const char *speed_str
;
5946 term_printf("USB support not enabled\n");
5950 for (port
= used_usb_ports
; port
; port
= port
->next
) {
5954 switch(dev
->speed
) {
5958 case USB_SPEED_FULL
:
5961 case USB_SPEED_HIGH
:
5968 term_printf(" Device %d.%d, Speed %s Mb/s, Product %s\n",
5969 0, dev
->addr
, speed_str
, dev
->devname
);
5973 /***********************************************************/
5974 /* PCMCIA/Cardbus */
5976 static struct pcmcia_socket_entry_s
{
5977 struct pcmcia_socket_s
*socket
;
5978 struct pcmcia_socket_entry_s
*next
;
5979 } *pcmcia_sockets
= 0;
5981 void pcmcia_socket_register(struct pcmcia_socket_s
*socket
)
5983 struct pcmcia_socket_entry_s
*entry
;
5985 entry
= qemu_malloc(sizeof(struct pcmcia_socket_entry_s
));
5986 entry
->socket
= socket
;
5987 entry
->next
= pcmcia_sockets
;
5988 pcmcia_sockets
= entry
;
5991 void pcmcia_socket_unregister(struct pcmcia_socket_s
*socket
)
5993 struct pcmcia_socket_entry_s
*entry
, **ptr
;
5995 ptr
= &pcmcia_sockets
;
5996 for (entry
= *ptr
; entry
; ptr
= &entry
->next
, entry
= *ptr
)
5997 if (entry
->socket
== socket
) {
6003 void pcmcia_info(void)
6005 struct pcmcia_socket_entry_s
*iter
;
6006 if (!pcmcia_sockets
)
6007 term_printf("No PCMCIA sockets\n");
6009 for (iter
= pcmcia_sockets
; iter
; iter
= iter
->next
)
6010 term_printf("%s: %s\n", iter
->socket
->slot_string
,
6011 iter
->socket
->attached
? iter
->socket
->card_string
:
6015 /***********************************************************/
6018 static void dumb_update(DisplayState
*ds
, int x
, int y
, int w
, int h
)
6022 static void dumb_resize(DisplayState
*ds
, int w
, int h
)
6026 static void dumb_refresh(DisplayState
*ds
)
6028 #if defined(CONFIG_SDL)
6033 static void dumb_display_init(DisplayState
*ds
)
6038 ds
->dpy_update
= dumb_update
;
6039 ds
->dpy_resize
= dumb_resize
;
6040 ds
->dpy_refresh
= dumb_refresh
;
6041 ds
->gui_timer_interval
= 500;
6045 /***********************************************************/
6048 #define MAX_IO_HANDLERS 64
6050 typedef struct IOHandlerRecord
{
6052 IOCanRWHandler
*fd_read_poll
;
6054 IOHandler
*fd_write
;
6057 /* temporary data */
6059 struct IOHandlerRecord
*next
;
6062 static IOHandlerRecord
*first_io_handler
;
6064 /* XXX: fd_read_poll should be suppressed, but an API change is
6065 necessary in the character devices to suppress fd_can_read(). */
6066 int qemu_set_fd_handler2(int fd
,
6067 IOCanRWHandler
*fd_read_poll
,
6069 IOHandler
*fd_write
,
6072 IOHandlerRecord
**pioh
, *ioh
;
6074 if (!fd_read
&& !fd_write
) {
6075 pioh
= &first_io_handler
;
6080 if (ioh
->fd
== fd
) {
6087 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
6091 ioh
= qemu_mallocz(sizeof(IOHandlerRecord
));
6094 ioh
->next
= first_io_handler
;
6095 first_io_handler
= ioh
;
6098 ioh
->fd_read_poll
= fd_read_poll
;
6099 ioh
->fd_read
= fd_read
;
6100 ioh
->fd_write
= fd_write
;
6101 ioh
->opaque
= opaque
;
6107 int qemu_set_fd_handler(int fd
,
6109 IOHandler
*fd_write
,
6112 return qemu_set_fd_handler2(fd
, NULL
, fd_read
, fd_write
, opaque
);
6115 /***********************************************************/
6116 /* Polling handling */
6118 typedef struct PollingEntry
{
6121 struct PollingEntry
*next
;
6124 static PollingEntry
*first_polling_entry
;
6126 int qemu_add_polling_cb(PollingFunc
*func
, void *opaque
)
6128 PollingEntry
**ppe
, *pe
;
6129 pe
= qemu_mallocz(sizeof(PollingEntry
));
6133 pe
->opaque
= opaque
;
6134 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
);
6139 void qemu_del_polling_cb(PollingFunc
*func
, void *opaque
)
6141 PollingEntry
**ppe
, *pe
;
6142 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
) {
6144 if (pe
->func
== func
&& pe
->opaque
== opaque
) {
6153 /***********************************************************/
6154 /* Wait objects support */
6155 typedef struct WaitObjects
{
6157 HANDLE events
[MAXIMUM_WAIT_OBJECTS
+ 1];
6158 WaitObjectFunc
*func
[MAXIMUM_WAIT_OBJECTS
+ 1];
6159 void *opaque
[MAXIMUM_WAIT_OBJECTS
+ 1];
6162 static WaitObjects wait_objects
= {0};
6164 int qemu_add_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6166 WaitObjects
*w
= &wait_objects
;
6168 if (w
->num
>= MAXIMUM_WAIT_OBJECTS
)
6170 w
->events
[w
->num
] = handle
;
6171 w
->func
[w
->num
] = func
;
6172 w
->opaque
[w
->num
] = opaque
;
6177 void qemu_del_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6180 WaitObjects
*w
= &wait_objects
;
6183 for (i
= 0; i
< w
->num
; i
++) {
6184 if (w
->events
[i
] == handle
)
6187 w
->events
[i
] = w
->events
[i
+ 1];
6188 w
->func
[i
] = w
->func
[i
+ 1];
6189 w
->opaque
[i
] = w
->opaque
[i
+ 1];
6197 #define SELF_ANNOUNCE_ROUNDS 5
6198 #define ETH_P_EXPERIMENTAL 0x01F1 /* just a number */
6199 //#define ETH_P_EXPERIMENTAL 0x0012 /* make it the size of the packet */
6200 #define EXPERIMENTAL_MAGIC 0xf1f23f4f
6202 static int announce_self_create(uint8_t *buf
,
6205 uint32_t magic
= EXPERIMENTAL_MAGIC
;
6206 uint16_t proto
= htons(ETH_P_EXPERIMENTAL
);
6208 /* FIXME: should we send a different packet (arp/rarp/ping)? */
6210 memset(buf
, 0xff, 6); /* h_dst */
6211 memcpy(buf
+ 6, mac_addr
, 6); /* h_src */
6212 memcpy(buf
+ 12, &proto
, 2); /* h_proto */
6213 memcpy(buf
+ 14, &magic
, 4); /* magic */
6215 return 18; /* len */
6218 void qemu_announce_self(void)
6222 VLANClientState
*vc
;
6225 for (i
= 0; i
< nb_nics
; i
++) {
6226 len
= announce_self_create(buf
, nd_table
[i
].macaddr
);
6227 vlan
= nd_table
[i
].vlan
;
6228 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
6229 for (j
=0; j
< SELF_ANNOUNCE_ROUNDS
; j
++)
6230 vc
->fd_read(vc
->opaque
, buf
, len
);
6235 /***********************************************************/
6236 /* savevm/loadvm support */
6238 #define IO_BUF_SIZE 32768
6241 QEMUFilePutBufferFunc
*put_buffer
;
6242 QEMUFileGetBufferFunc
*get_buffer
;
6243 QEMUFileCloseFunc
*close
;
6244 QEMUFileRateLimit
*rate_limit
;
6248 int64_t buf_offset
; /* start of buffer when writing, end of buffer
6251 int buf_size
; /* 0 when writing */
6252 uint8_t buf
[IO_BUF_SIZE
];
6257 typedef struct QEMUFileSocket
6263 static int socket_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6265 QEMUFileSocket
*s
= opaque
;
6269 len
= recv(s
->fd
, buf
, size
, 0);
6270 } while (len
== -1 && socket_error() == EINTR
);
6273 len
= -socket_error();
6278 static int socket_close(void *opaque
)
6280 QEMUFileSocket
*s
= opaque
;
6285 QEMUFile
*qemu_fopen_socket(int fd
)
6287 QEMUFileSocket
*s
= qemu_mallocz(sizeof(QEMUFileSocket
));
6293 s
->file
= qemu_fopen_ops(s
, NULL
, socket_get_buffer
, socket_close
, NULL
);
6297 typedef struct QEMUFileStdio
6302 static int file_put_buffer(void *opaque
, const uint8_t *buf
,
6303 int64_t pos
, int size
)
6305 QEMUFileStdio
*s
= opaque
;
6306 fseek(s
->outfile
, pos
, SEEK_SET
);
6307 fwrite(buf
, 1, size
, s
->outfile
);
6311 static int file_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6313 QEMUFileStdio
*s
= opaque
;
6314 fseek(s
->outfile
, pos
, SEEK_SET
);
6315 return fread(buf
, 1, size
, s
->outfile
);
6318 static int file_close(void *opaque
)
6320 QEMUFileStdio
*s
= opaque
;
6326 QEMUFile
*qemu_fopen(const char *filename
, const char *mode
)
6330 s
= qemu_mallocz(sizeof(QEMUFileStdio
));
6334 s
->outfile
= fopen(filename
, mode
);
6338 if (!strcmp(mode
, "wb"))
6339 return qemu_fopen_ops(s
, file_put_buffer
, NULL
, file_close
, NULL
);
6340 else if (!strcmp(mode
, "rb"))
6341 return qemu_fopen_ops(s
, NULL
, file_get_buffer
, file_close
, NULL
);
6350 typedef struct QEMUFileBdrv
6352 BlockDriverState
*bs
;
6353 int64_t base_offset
;
6356 static int bdrv_put_buffer(void *opaque
, const uint8_t *buf
,
6357 int64_t pos
, int size
)
6359 QEMUFileBdrv
*s
= opaque
;
6360 bdrv_pwrite(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6364 static int bdrv_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6366 QEMUFileBdrv
*s
= opaque
;
6367 return bdrv_pread(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6370 static int bdrv_fclose(void *opaque
)
6372 QEMUFileBdrv
*s
= opaque
;
6377 static QEMUFile
*qemu_fopen_bdrv(BlockDriverState
*bs
, int64_t offset
, int is_writable
)
6381 s
= qemu_mallocz(sizeof(QEMUFileBdrv
));
6386 s
->base_offset
= offset
;
6389 return qemu_fopen_ops(s
, bdrv_put_buffer
, NULL
, bdrv_fclose
, NULL
);
6391 return qemu_fopen_ops(s
, NULL
, bdrv_get_buffer
, bdrv_fclose
, NULL
);
6394 QEMUFile
*qemu_fopen_ops(void *opaque
, QEMUFilePutBufferFunc
*put_buffer
,
6395 QEMUFileGetBufferFunc
*get_buffer
,
6396 QEMUFileCloseFunc
*close
,
6397 QEMUFileRateLimit
*rate_limit
)
6401 f
= qemu_mallocz(sizeof(QEMUFile
));
6406 f
->put_buffer
= put_buffer
;
6407 f
->get_buffer
= get_buffer
;
6409 f
->rate_limit
= rate_limit
;
6415 int qemu_file_has_error(QEMUFile
*f
)
6417 return f
->has_error
;
6420 void qemu_fflush(QEMUFile
*f
)
6425 if (f
->is_write
&& f
->buf_index
> 0) {
6428 len
= f
->put_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, f
->buf_index
);
6430 f
->buf_offset
+= f
->buf_index
;
6437 static void qemu_fill_buffer(QEMUFile
*f
)
6447 len
= f
->get_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, IO_BUF_SIZE
);
6451 f
->buf_offset
+= len
;
6452 } else if (len
!= -EAGAIN
)
6456 int qemu_fclose(QEMUFile
*f
)
6461 ret
= f
->close(f
->opaque
);
6466 void qemu_file_put_notify(QEMUFile
*f
)
6468 f
->put_buffer(f
->opaque
, NULL
, 0, 0);
6471 void qemu_put_buffer(QEMUFile
*f
, const uint8_t *buf
, int size
)
6475 if (!f
->has_error
&& f
->is_write
== 0 && f
->buf_index
> 0) {
6477 "Attempted to write to buffer while read buffer is not empty\n");
6481 while (!f
->has_error
&& size
> 0) {
6482 l
= IO_BUF_SIZE
- f
->buf_index
;
6485 memcpy(f
->buf
+ f
->buf_index
, buf
, l
);
6490 if (f
->buf_index
>= IO_BUF_SIZE
)
6495 void qemu_put_byte(QEMUFile
*f
, int v
)
6497 if (!f
->has_error
&& f
->is_write
== 0 && f
->buf_index
> 0) {
6499 "Attempted to write to buffer while read buffer is not empty\n");
6503 f
->buf
[f
->buf_index
++] = v
;
6505 if (f
->buf_index
>= IO_BUF_SIZE
)
6509 int qemu_get_buffer(QEMUFile
*f
, uint8_t *buf
, int size1
)
6518 l
= f
->buf_size
- f
->buf_index
;
6520 qemu_fill_buffer(f
);
6521 l
= f
->buf_size
- f
->buf_index
;
6527 memcpy(buf
, f
->buf
+ f
->buf_index
, l
);
6532 return size1
- size
;
6535 int qemu_get_byte(QEMUFile
*f
)
6540 if (f
->buf_index
>= f
->buf_size
) {
6541 qemu_fill_buffer(f
);
6542 if (f
->buf_index
>= f
->buf_size
)
6545 return f
->buf
[f
->buf_index
++];
6548 int64_t qemu_ftell(QEMUFile
*f
)
6550 return f
->buf_offset
- f
->buf_size
+ f
->buf_index
;
6553 int64_t qemu_fseek(QEMUFile
*f
, int64_t pos
, int whence
)
6555 if (whence
== SEEK_SET
) {
6557 } else if (whence
== SEEK_CUR
) {
6558 pos
+= qemu_ftell(f
);
6560 /* SEEK_END not supported */
6563 if (f
->put_buffer
) {
6565 f
->buf_offset
= pos
;
6567 f
->buf_offset
= pos
;
6574 int qemu_file_rate_limit(QEMUFile
*f
)
6577 return f
->rate_limit(f
->opaque
);
6582 void qemu_put_be16(QEMUFile
*f
, unsigned int v
)
6584 qemu_put_byte(f
, v
>> 8);
6585 qemu_put_byte(f
, v
);
6588 void qemu_put_be32(QEMUFile
*f
, unsigned int v
)
6590 qemu_put_byte(f
, v
>> 24);
6591 qemu_put_byte(f
, v
>> 16);
6592 qemu_put_byte(f
, v
>> 8);
6593 qemu_put_byte(f
, v
);
6596 void qemu_put_be64(QEMUFile
*f
, uint64_t v
)
6598 qemu_put_be32(f
, v
>> 32);
6599 qemu_put_be32(f
, v
);
6602 unsigned int qemu_get_be16(QEMUFile
*f
)
6605 v
= qemu_get_byte(f
) << 8;
6606 v
|= qemu_get_byte(f
);
6610 unsigned int qemu_get_be32(QEMUFile
*f
)
6613 v
= qemu_get_byte(f
) << 24;
6614 v
|= qemu_get_byte(f
) << 16;
6615 v
|= qemu_get_byte(f
) << 8;
6616 v
|= qemu_get_byte(f
);
6620 uint64_t qemu_get_be64(QEMUFile
*f
)
6623 v
= (uint64_t)qemu_get_be32(f
) << 32;
6624 v
|= qemu_get_be32(f
);
6628 typedef struct SaveStateEntry
{
6633 SaveLiveStateHandler
*save_live_state
;
6634 SaveStateHandler
*save_state
;
6635 LoadStateHandler
*load_state
;
6637 struct SaveStateEntry
*next
;
6640 static SaveStateEntry
*first_se
;
6642 /* TODO: Individual devices generally have very little idea about the rest
6643 of the system, so instance_id should be removed/replaced.
6644 Meanwhile pass -1 as instance_id if you do not already have a clearly
6645 distinguishing id for all instances of your device class. */
6646 int register_savevm_live(const char *idstr
,
6649 SaveLiveStateHandler
*save_live_state
,
6650 SaveStateHandler
*save_state
,
6651 LoadStateHandler
*load_state
,
6654 SaveStateEntry
*se
, **pse
;
6655 static int global_section_id
;
6657 se
= qemu_malloc(sizeof(SaveStateEntry
));
6660 pstrcpy(se
->idstr
, sizeof(se
->idstr
), idstr
);
6661 se
->instance_id
= (instance_id
== -1) ? 0 : instance_id
;
6662 se
->version_id
= version_id
;
6663 se
->section_id
= global_section_id
++;
6664 se
->save_live_state
= save_live_state
;
6665 se
->save_state
= save_state
;
6666 se
->load_state
= load_state
;
6667 se
->opaque
= opaque
;
6670 /* add at the end of list */
6672 while (*pse
!= NULL
) {
6673 if (instance_id
== -1
6674 && strcmp(se
->idstr
, (*pse
)->idstr
) == 0
6675 && se
->instance_id
<= (*pse
)->instance_id
)
6676 se
->instance_id
= (*pse
)->instance_id
+ 1;
6677 pse
= &(*pse
)->next
;
6683 int register_savevm(const char *idstr
,
6686 SaveStateHandler
*save_state
,
6687 LoadStateHandler
*load_state
,
6690 return register_savevm_live(idstr
, instance_id
, version_id
,
6691 NULL
, save_state
, load_state
, opaque
);
6694 #define QEMU_VM_FILE_MAGIC 0x5145564d
6695 #define QEMU_VM_FILE_VERSION_COMPAT 0x00000002
6696 #define QEMU_VM_FILE_VERSION 0x00000003
6698 #define QEMU_VM_EOF 0x00
6699 #define QEMU_VM_SECTION_START 0x01
6700 #define QEMU_VM_SECTION_PART 0x02
6701 #define QEMU_VM_SECTION_END 0x03
6702 #define QEMU_VM_SECTION_FULL 0x04
6704 int qemu_savevm_state_begin(QEMUFile
*f
)
6708 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
6709 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
6711 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6714 if (se
->save_live_state
== NULL
)
6718 qemu_put_byte(f
, QEMU_VM_SECTION_START
);
6719 qemu_put_be32(f
, se
->section_id
);
6722 len
= strlen(se
->idstr
);
6723 qemu_put_byte(f
, len
);
6724 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6726 qemu_put_be32(f
, se
->instance_id
);
6727 qemu_put_be32(f
, se
->version_id
);
6729 se
->save_live_state(f
, QEMU_VM_SECTION_START
, se
->opaque
);
6732 if (qemu_file_has_error(f
))
6738 int qemu_savevm_state_iterate(QEMUFile
*f
)
6743 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6744 if (se
->save_live_state
== NULL
)
6748 qemu_put_byte(f
, QEMU_VM_SECTION_PART
);
6749 qemu_put_be32(f
, se
->section_id
);
6751 ret
&= !!se
->save_live_state(f
, QEMU_VM_SECTION_PART
, se
->opaque
);
6757 if (qemu_file_has_error(f
))
6763 int qemu_savevm_state_complete(QEMUFile
*f
)
6767 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6768 if (se
->save_live_state
== NULL
)
6772 qemu_put_byte(f
, QEMU_VM_SECTION_END
);
6773 qemu_put_be32(f
, se
->section_id
);
6775 se
->save_live_state(f
, QEMU_VM_SECTION_END
, se
->opaque
);
6778 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6781 if (se
->save_state
== NULL
)
6785 qemu_put_byte(f
, QEMU_VM_SECTION_FULL
);
6786 qemu_put_be32(f
, se
->section_id
);
6789 len
= strlen(se
->idstr
);
6790 qemu_put_byte(f
, len
);
6791 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6793 qemu_put_be32(f
, se
->instance_id
);
6794 qemu_put_be32(f
, se
->version_id
);
6796 se
->save_state(f
, se
->opaque
);
6799 qemu_put_byte(f
, QEMU_VM_EOF
);
6801 if (qemu_file_has_error(f
))
6807 int qemu_savevm_state(QEMUFile
*f
)
6809 int saved_vm_running
;
6812 saved_vm_running
= vm_running
;
6817 ret
= qemu_savevm_state_begin(f
);
6822 ret
= qemu_savevm_state_iterate(f
);
6827 ret
= qemu_savevm_state_complete(f
);
6830 if (qemu_file_has_error(f
))
6833 if (!ret
&& saved_vm_running
)
6839 static SaveStateEntry
*find_se(const char *idstr
, int instance_id
)
6843 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6844 if (!strcmp(se
->idstr
, idstr
) &&
6845 instance_id
== se
->instance_id
)
6851 typedef struct LoadStateEntry
{
6855 struct LoadStateEntry
*next
;
6858 static int qemu_loadvm_state_v2(QEMUFile
*f
)
6861 int len
, ret
, instance_id
, record_len
, version_id
;
6862 int64_t total_len
, end_pos
, cur_pos
;
6865 total_len
= qemu_get_be64(f
);
6866 end_pos
= total_len
+ qemu_ftell(f
);
6868 if (qemu_ftell(f
) >= end_pos
)
6870 len
= qemu_get_byte(f
);
6871 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6873 instance_id
= qemu_get_be32(f
);
6874 version_id
= qemu_get_be32(f
);
6875 record_len
= qemu_get_be32(f
);
6876 cur_pos
= qemu_ftell(f
);
6877 se
= find_se(idstr
, instance_id
);
6879 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
6880 instance_id
, idstr
);
6882 ret
= se
->load_state(f
, se
->opaque
, version_id
);
6884 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
6885 instance_id
, idstr
);
6888 /* always seek to exact end of record */
6889 qemu_fseek(f
, cur_pos
+ record_len
, SEEK_SET
);
6892 if (qemu_file_has_error(f
))
6898 int qemu_loadvm_state(QEMUFile
*f
)
6900 LoadStateEntry
*first_le
= NULL
;
6901 uint8_t section_type
;
6905 v
= qemu_get_be32(f
);
6906 if (v
!= QEMU_VM_FILE_MAGIC
)
6909 v
= qemu_get_be32(f
);
6910 if (v
== QEMU_VM_FILE_VERSION_COMPAT
)
6911 return qemu_loadvm_state_v2(f
);
6912 if (v
!= QEMU_VM_FILE_VERSION
)
6915 while ((section_type
= qemu_get_byte(f
)) != QEMU_VM_EOF
) {
6916 uint32_t instance_id
, version_id
, section_id
;
6922 switch (section_type
) {
6923 case QEMU_VM_SECTION_START
:
6924 case QEMU_VM_SECTION_FULL
:
6925 /* Read section start */
6926 section_id
= qemu_get_be32(f
);
6927 len
= qemu_get_byte(f
);
6928 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6930 instance_id
= qemu_get_be32(f
);
6931 version_id
= qemu_get_be32(f
);
6933 /* Find savevm section */
6934 se
= find_se(idstr
, instance_id
);
6936 fprintf(stderr
, "Unknown savevm section or instance '%s' %d\n", idstr
, instance_id
);
6941 /* Validate version */
6942 if (version_id
> se
->version_id
) {
6943 fprintf(stderr
, "savevm: unsupported version %d for '%s' v%d\n",
6944 version_id
, idstr
, se
->version_id
);
6950 le
= qemu_mallocz(sizeof(*le
));
6957 le
->section_id
= section_id
;
6958 le
->version_id
= version_id
;
6959 le
->next
= first_le
;
6962 le
->se
->load_state(f
, le
->se
->opaque
, le
->version_id
);
6964 case QEMU_VM_SECTION_PART
:
6965 case QEMU_VM_SECTION_END
:
6966 section_id
= qemu_get_be32(f
);
6968 for (le
= first_le
; le
&& le
->section_id
!= section_id
; le
= le
->next
);
6970 fprintf(stderr
, "Unknown savevm section %d\n", section_id
);
6975 le
->se
->load_state(f
, le
->se
->opaque
, le
->version_id
);
6978 fprintf(stderr
, "Unknown savevm section type %d\n", section_type
);
6988 LoadStateEntry
*le
= first_le
;
6989 first_le
= first_le
->next
;
6993 if (qemu_file_has_error(f
))
6999 /* device can contain snapshots */
7000 static int bdrv_can_snapshot(BlockDriverState
*bs
)
7003 !bdrv_is_removable(bs
) &&
7004 !bdrv_is_read_only(bs
));
7007 /* device must be snapshots in order to have a reliable snapshot */
7008 static int bdrv_has_snapshot(BlockDriverState
*bs
)
7011 !bdrv_is_removable(bs
) &&
7012 !bdrv_is_read_only(bs
));
7015 static BlockDriverState
*get_bs_snapshots(void)
7017 BlockDriverState
*bs
;
7021 return bs_snapshots
;
7022 for(i
= 0; i
<= nb_drives
; i
++) {
7023 bs
= drives_table
[i
].bdrv
;
7024 if (bdrv_can_snapshot(bs
))
7033 static int bdrv_snapshot_find(BlockDriverState
*bs
, QEMUSnapshotInfo
*sn_info
,
7036 QEMUSnapshotInfo
*sn_tab
, *sn
;
7040 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
7043 for(i
= 0; i
< nb_sns
; i
++) {
7045 if (!strcmp(sn
->id_str
, name
) || !strcmp(sn
->name
, name
)) {
7055 void do_savevm(const char *name
)
7057 BlockDriverState
*bs
, *bs1
;
7058 QEMUSnapshotInfo sn1
, *sn
= &sn1
, old_sn1
, *old_sn
= &old_sn1
;
7059 int must_delete
, ret
, i
;
7060 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
7062 int saved_vm_running
;
7069 bs
= get_bs_snapshots();
7071 term_printf("No block device can accept snapshots\n");
7075 /* ??? Should this occur after vm_stop? */
7078 saved_vm_running
= vm_running
;
7083 ret
= bdrv_snapshot_find(bs
, old_sn
, name
);
7088 memset(sn
, 0, sizeof(*sn
));
7090 pstrcpy(sn
->name
, sizeof(sn
->name
), old_sn
->name
);
7091 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), old_sn
->id_str
);
7094 pstrcpy(sn
->name
, sizeof(sn
->name
), name
);
7097 /* fill auxiliary fields */
7100 sn
->date_sec
= tb
.time
;
7101 sn
->date_nsec
= tb
.millitm
* 1000000;
7103 gettimeofday(&tv
, NULL
);
7104 sn
->date_sec
= tv
.tv_sec
;
7105 sn
->date_nsec
= tv
.tv_usec
* 1000;
7107 sn
->vm_clock_nsec
= qemu_get_clock(vm_clock
);
7109 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7110 term_printf("Device %s does not support VM state snapshots\n",
7111 bdrv_get_device_name(bs
));
7115 /* save the VM state */
7116 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 1);
7118 term_printf("Could not open VM state file\n");
7121 ret
= qemu_savevm_state(f
);
7122 sn
->vm_state_size
= qemu_ftell(f
);
7125 term_printf("Error %d while writing VM\n", ret
);
7129 /* create the snapshots */
7131 for(i
= 0; i
< nb_drives
; i
++) {
7132 bs1
= drives_table
[i
].bdrv
;
7133 if (bdrv_has_snapshot(bs1
)) {
7135 ret
= bdrv_snapshot_delete(bs1
, old_sn
->id_str
);
7137 term_printf("Error while deleting snapshot on '%s'\n",
7138 bdrv_get_device_name(bs1
));
7141 ret
= bdrv_snapshot_create(bs1
, sn
);
7143 term_printf("Error while creating snapshot on '%s'\n",
7144 bdrv_get_device_name(bs1
));
7150 if (saved_vm_running
)
7154 void do_loadvm(const char *name
)
7156 BlockDriverState
*bs
, *bs1
;
7157 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
7160 int saved_vm_running
;
7162 bs
= get_bs_snapshots();
7164 term_printf("No block device supports snapshots\n");
7168 /* Flush all IO requests so they don't interfere with the new state. */
7171 saved_vm_running
= vm_running
;
7174 for(i
= 0; i
<= nb_drives
; i
++) {
7175 bs1
= drives_table
[i
].bdrv
;
7176 if (bdrv_has_snapshot(bs1
)) {
7177 ret
= bdrv_snapshot_goto(bs1
, name
);
7180 term_printf("Warning: ");
7183 term_printf("Snapshots not supported on device '%s'\n",
7184 bdrv_get_device_name(bs1
));
7187 term_printf("Could not find snapshot '%s' on device '%s'\n",
7188 name
, bdrv_get_device_name(bs1
));
7191 term_printf("Error %d while activating snapshot on '%s'\n",
7192 ret
, bdrv_get_device_name(bs1
));
7195 /* fatal on snapshot block device */
7202 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7203 term_printf("Device %s does not support VM state snapshots\n",
7204 bdrv_get_device_name(bs
));
7208 /* restore the VM state */
7209 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 0);
7211 term_printf("Could not open VM state file\n");
7214 ret
= qemu_loadvm_state(f
);
7217 term_printf("Error %d while loading VM state\n", ret
);
7220 if (saved_vm_running
)
7224 void do_delvm(const char *name
)
7226 BlockDriverState
*bs
, *bs1
;
7229 bs
= get_bs_snapshots();
7231 term_printf("No block device supports snapshots\n");
7235 for(i
= 0; i
<= nb_drives
; i
++) {
7236 bs1
= drives_table
[i
].bdrv
;
7237 if (bdrv_has_snapshot(bs1
)) {
7238 ret
= bdrv_snapshot_delete(bs1
, name
);
7240 if (ret
== -ENOTSUP
)
7241 term_printf("Snapshots not supported on device '%s'\n",
7242 bdrv_get_device_name(bs1
));
7244 term_printf("Error %d while deleting snapshot on '%s'\n",
7245 ret
, bdrv_get_device_name(bs1
));
7251 void do_info_snapshots(void)
7253 BlockDriverState
*bs
, *bs1
;
7254 QEMUSnapshotInfo
*sn_tab
, *sn
;
7258 bs
= get_bs_snapshots();
7260 term_printf("No available block device supports snapshots\n");
7263 term_printf("Snapshot devices:");
7264 for(i
= 0; i
<= nb_drives
; i
++) {
7265 bs1
= drives_table
[i
].bdrv
;
7266 if (bdrv_has_snapshot(bs1
)) {
7268 term_printf(" %s", bdrv_get_device_name(bs1
));
7273 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
7275 term_printf("bdrv_snapshot_list: error %d\n", nb_sns
);
7278 term_printf("Snapshot list (from %s):\n", bdrv_get_device_name(bs
));
7279 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), NULL
));
7280 for(i
= 0; i
< nb_sns
; i
++) {
7282 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), sn
));
7287 /***********************************************************/
7288 /* ram save/restore */
7290 static int ram_get_page(QEMUFile
*f
, uint8_t *buf
, int len
)
7294 v
= qemu_get_byte(f
);
7297 if (qemu_get_buffer(f
, buf
, len
) != len
)
7301 v
= qemu_get_byte(f
);
7302 memset(buf
, v
, len
);
7308 if (qemu_file_has_error(f
))
7314 static int ram_load_v1(QEMUFile
*f
, void *opaque
)
7319 if (qemu_get_be32(f
) != phys_ram_size
)
7321 for(i
= 0; i
< phys_ram_size
; i
+= TARGET_PAGE_SIZE
) {
7322 ret
= ram_get_page(f
, phys_ram_base
+ i
, TARGET_PAGE_SIZE
);
7329 #define BDRV_HASH_BLOCK_SIZE 1024
7330 #define IOBUF_SIZE 4096
7331 #define RAM_CBLOCK_MAGIC 0xfabe
7333 typedef struct RamDecompressState
{
7336 uint8_t buf
[IOBUF_SIZE
];
7337 } RamDecompressState
;
7339 static int ram_decompress_open(RamDecompressState
*s
, QEMUFile
*f
)
7342 memset(s
, 0, sizeof(*s
));
7344 ret
= inflateInit(&s
->zstream
);
7350 static int ram_decompress_buf(RamDecompressState
*s
, uint8_t *buf
, int len
)
7354 s
->zstream
.avail_out
= len
;
7355 s
->zstream
.next_out
= buf
;
7356 while (s
->zstream
.avail_out
> 0) {
7357 if (s
->zstream
.avail_in
== 0) {
7358 if (qemu_get_be16(s
->f
) != RAM_CBLOCK_MAGIC
)
7360 clen
= qemu_get_be16(s
->f
);
7361 if (clen
> IOBUF_SIZE
)
7363 qemu_get_buffer(s
->f
, s
->buf
, clen
);
7364 s
->zstream
.avail_in
= clen
;
7365 s
->zstream
.next_in
= s
->buf
;
7367 ret
= inflate(&s
->zstream
, Z_PARTIAL_FLUSH
);
7368 if (ret
!= Z_OK
&& ret
!= Z_STREAM_END
) {
7375 static void ram_decompress_close(RamDecompressState
*s
)
7377 inflateEnd(&s
->zstream
);
7380 #define RAM_SAVE_FLAG_FULL 0x01
7381 #define RAM_SAVE_FLAG_COMPRESS 0x02
7382 #define RAM_SAVE_FLAG_MEM_SIZE 0x04
7383 #define RAM_SAVE_FLAG_PAGE 0x08
7384 #define RAM_SAVE_FLAG_EOS 0x10
7386 static int is_dup_page(uint8_t *page
, uint8_t ch
)
7388 uint32_t val
= ch
<< 24 | ch
<< 16 | ch
<< 8 | ch
;
7389 uint32_t *array
= (uint32_t *)page
;
7392 for (i
= 0; i
< (TARGET_PAGE_SIZE
/ 4); i
++) {
7393 if (array
[i
] != val
)
7400 static int ram_save_block(QEMUFile
*f
)
7402 static ram_addr_t current_addr
= 0;
7403 ram_addr_t saved_addr
= current_addr
;
7404 ram_addr_t addr
= 0;
7407 while (addr
< phys_ram_size
) {
7408 if (cpu_physical_memory_get_dirty(current_addr
, MIGRATION_DIRTY_FLAG
)) {
7411 cpu_physical_memory_reset_dirty(current_addr
,
7412 current_addr
+ TARGET_PAGE_SIZE
,
7413 MIGRATION_DIRTY_FLAG
);
7415 ch
= *(phys_ram_base
+ current_addr
);
7417 if (is_dup_page(phys_ram_base
+ current_addr
, ch
)) {
7418 qemu_put_be64(f
, current_addr
| RAM_SAVE_FLAG_COMPRESS
);
7419 qemu_put_byte(f
, ch
);
7421 qemu_put_be64(f
, current_addr
| RAM_SAVE_FLAG_PAGE
);
7422 qemu_put_buffer(f
, phys_ram_base
+ current_addr
, TARGET_PAGE_SIZE
);
7428 addr
+= TARGET_PAGE_SIZE
;
7429 current_addr
= (saved_addr
+ addr
) % phys_ram_size
;
7435 static ram_addr_t ram_save_threshold
= 10;
7437 static ram_addr_t
ram_save_remaining(void)
7440 ram_addr_t count
= 0;
7442 for (addr
= 0; addr
< phys_ram_size
; addr
+= TARGET_PAGE_SIZE
) {
7443 if (cpu_physical_memory_get_dirty(addr
, MIGRATION_DIRTY_FLAG
))
7450 static int ram_save_live(QEMUFile
*f
, int stage
, void *opaque
)
7455 /* Make sure all dirty bits are set */
7456 for (addr
= 0; addr
< phys_ram_size
; addr
+= TARGET_PAGE_SIZE
) {
7457 if (!cpu_physical_memory_get_dirty(addr
, MIGRATION_DIRTY_FLAG
))
7458 cpu_physical_memory_set_dirty(addr
);
7461 /* Enable dirty memory tracking */
7462 cpu_physical_memory_set_dirty_tracking(1);
7464 qemu_put_be64(f
, phys_ram_size
| RAM_SAVE_FLAG_MEM_SIZE
);
7467 while (!qemu_file_rate_limit(f
)) {
7470 ret
= ram_save_block(f
);
7471 if (ret
== 0) /* no more blocks */
7475 /* try transferring iterative blocks of memory */
7478 cpu_physical_memory_set_dirty_tracking(0);
7480 /* flush all remaining blocks regardless of rate limiting */
7481 while (ram_save_block(f
) != 0);
7484 qemu_put_be64(f
, RAM_SAVE_FLAG_EOS
);
7486 return (stage
== 2) && (ram_save_remaining() < ram_save_threshold
);
7489 static int ram_load_dead(QEMUFile
*f
, void *opaque
)
7491 RamDecompressState s1
, *s
= &s1
;
7495 if (ram_decompress_open(s
, f
) < 0)
7497 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
7498 if (ram_decompress_buf(s
, buf
, 1) < 0) {
7499 fprintf(stderr
, "Error while reading ram block header\n");
7503 if (ram_decompress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
) < 0) {
7504 fprintf(stderr
, "Error while reading ram block address=0x%08" PRIx64
, (uint64_t)i
);
7509 printf("Error block header\n");
7513 ram_decompress_close(s
);
7518 static int ram_load(QEMUFile
*f
, void *opaque
, int version_id
)
7523 if (version_id
== 1)
7524 return ram_load_v1(f
, opaque
);
7526 if (version_id
== 2) {
7527 if (qemu_get_be32(f
) != phys_ram_size
)
7529 return ram_load_dead(f
, opaque
);
7532 if (version_id
!= 3)
7536 addr
= qemu_get_be64(f
);
7538 flags
= addr
& ~TARGET_PAGE_MASK
;
7539 addr
&= TARGET_PAGE_MASK
;
7541 if (flags
& RAM_SAVE_FLAG_MEM_SIZE
) {
7542 if (addr
!= phys_ram_size
)
7546 if (flags
& RAM_SAVE_FLAG_FULL
) {
7547 if (ram_load_dead(f
, opaque
) < 0)
7551 if (flags
& RAM_SAVE_FLAG_COMPRESS
) {
7552 uint8_t ch
= qemu_get_byte(f
);
7553 memset(phys_ram_base
+ addr
, ch
, TARGET_PAGE_SIZE
);
7554 } else if (flags
& RAM_SAVE_FLAG_PAGE
)
7555 qemu_get_buffer(f
, phys_ram_base
+ addr
, TARGET_PAGE_SIZE
);
7556 } while (!(flags
& RAM_SAVE_FLAG_EOS
));
7561 void qemu_service_io(void)
7563 CPUState
*env
= cpu_single_env
;
7565 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
7567 if (env
->kqemu_enabled
) {
7568 kqemu_cpu_interrupt(env
);
7574 /***********************************************************/
7575 /* bottom halves (can be seen as timers which expire ASAP) */
7586 static QEMUBH
*first_bh
= NULL
;
7588 QEMUBH
*qemu_bh_new(QEMUBHFunc
*cb
, void *opaque
)
7591 bh
= qemu_mallocz(sizeof(QEMUBH
));
7595 bh
->opaque
= opaque
;
7596 bh
->next
= first_bh
;
7601 int qemu_bh_poll(void)
7607 for (bh
= first_bh
; bh
; bh
= bh
->next
) {
7608 if (!bh
->deleted
&& bh
->scheduled
) {
7617 /* remove deleted bhs */
7631 void qemu_bh_schedule_idle(QEMUBH
*bh
)
7639 void qemu_bh_schedule(QEMUBH
*bh
)
7641 CPUState
*env
= cpu_single_env
;
7646 /* stop the currently executing CPU to execute the BH ASAP */
7648 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
7652 void qemu_bh_cancel(QEMUBH
*bh
)
7657 void qemu_bh_delete(QEMUBH
*bh
)
7663 /***********************************************************/
7664 /* machine registration */
7666 static QEMUMachine
*first_machine
= NULL
;
7668 int qemu_register_machine(QEMUMachine
*m
)
7671 pm
= &first_machine
;
7679 static QEMUMachine
*find_machine(const char *name
)
7683 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
7684 if (!strcmp(m
->name
, name
))
7690 /***********************************************************/
7691 /* main execution loop */
7693 static void gui_update(void *opaque
)
7695 DisplayState
*ds
= opaque
;
7696 ds
->dpy_refresh(ds
);
7697 qemu_mod_timer(ds
->gui_timer
,
7698 (ds
->gui_timer_interval
?
7699 ds
->gui_timer_interval
:
7700 GUI_REFRESH_INTERVAL
)
7701 + qemu_get_clock(rt_clock
));
7704 struct vm_change_state_entry
{
7705 VMChangeStateHandler
*cb
;
7707 LIST_ENTRY (vm_change_state_entry
) entries
;
7710 static LIST_HEAD(vm_change_state_head
, vm_change_state_entry
) vm_change_state_head
;
7712 VMChangeStateEntry
*qemu_add_vm_change_state_handler(VMChangeStateHandler
*cb
,
7715 VMChangeStateEntry
*e
;
7717 e
= qemu_mallocz(sizeof (*e
));
7723 LIST_INSERT_HEAD(&vm_change_state_head
, e
, entries
);
7727 void qemu_del_vm_change_state_handler(VMChangeStateEntry
*e
)
7729 LIST_REMOVE (e
, entries
);
7733 static void vm_state_notify(int running
)
7735 VMChangeStateEntry
*e
;
7737 for (e
= vm_change_state_head
.lh_first
; e
; e
= e
->entries
.le_next
) {
7738 e
->cb(e
->opaque
, running
);
7742 /* XXX: support several handlers */
7743 static VMStopHandler
*vm_stop_cb
;
7744 static void *vm_stop_opaque
;
7746 int qemu_add_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7749 vm_stop_opaque
= opaque
;
7753 void qemu_del_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7764 qemu_rearm_alarm_timer(alarm_timer
);
7768 void vm_stop(int reason
)
7771 cpu_disable_ticks();
7775 vm_stop_cb(vm_stop_opaque
, reason
);
7782 /* reset/shutdown handler */
7784 typedef struct QEMUResetEntry
{
7785 QEMUResetHandler
*func
;
7787 struct QEMUResetEntry
*next
;
7790 static QEMUResetEntry
*first_reset_entry
;
7791 static int reset_requested
;
7792 static int shutdown_requested
;
7793 static int powerdown_requested
;
7795 int qemu_shutdown_requested(void)
7797 int r
= shutdown_requested
;
7798 shutdown_requested
= 0;
7802 int qemu_reset_requested(void)
7804 int r
= reset_requested
;
7805 reset_requested
= 0;
7809 int qemu_powerdown_requested(void)
7811 int r
= powerdown_requested
;
7812 powerdown_requested
= 0;
7816 void qemu_register_reset(QEMUResetHandler
*func
, void *opaque
)
7818 QEMUResetEntry
**pre
, *re
;
7820 pre
= &first_reset_entry
;
7821 while (*pre
!= NULL
)
7822 pre
= &(*pre
)->next
;
7823 re
= qemu_mallocz(sizeof(QEMUResetEntry
));
7825 re
->opaque
= opaque
;
7830 void qemu_system_reset(void)
7834 /* reset all devices */
7835 for(re
= first_reset_entry
; re
!= NULL
; re
= re
->next
) {
7836 re
->func(re
->opaque
);
7840 void qemu_system_reset_request(void)
7843 shutdown_requested
= 1;
7845 reset_requested
= 1;
7848 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7851 void qemu_system_shutdown_request(void)
7853 shutdown_requested
= 1;
7855 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7858 void qemu_system_powerdown_request(void)
7860 powerdown_requested
= 1;
7862 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7865 void main_loop_wait(int timeout
)
7867 IOHandlerRecord
*ioh
;
7868 fd_set rfds
, wfds
, xfds
;
7877 /* XXX: need to suppress polling by better using win32 events */
7879 for(pe
= first_polling_entry
; pe
!= NULL
; pe
= pe
->next
) {
7880 ret
|= pe
->func(pe
->opaque
);
7885 WaitObjects
*w
= &wait_objects
;
7887 ret
= WaitForMultipleObjects(w
->num
, w
->events
, FALSE
, timeout
);
7888 if (WAIT_OBJECT_0
+ 0 <= ret
&& ret
<= WAIT_OBJECT_0
+ w
->num
- 1) {
7889 if (w
->func
[ret
- WAIT_OBJECT_0
])
7890 w
->func
[ret
- WAIT_OBJECT_0
](w
->opaque
[ret
- WAIT_OBJECT_0
]);
7892 /* Check for additional signaled events */
7893 for(i
= (ret
- WAIT_OBJECT_0
+ 1); i
< w
->num
; i
++) {
7895 /* Check if event is signaled */
7896 ret2
= WaitForSingleObject(w
->events
[i
], 0);
7897 if(ret2
== WAIT_OBJECT_0
) {
7899 w
->func
[i
](w
->opaque
[i
]);
7900 } else if (ret2
== WAIT_TIMEOUT
) {
7902 err
= GetLastError();
7903 fprintf(stderr
, "WaitForSingleObject error %d %d\n", i
, err
);
7906 } else if (ret
== WAIT_TIMEOUT
) {
7908 err
= GetLastError();
7909 fprintf(stderr
, "WaitForMultipleObjects error %d %d\n", ret
, err
);
7913 /* poll any events */
7914 /* XXX: separate device handlers from system ones */
7919 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7923 (!ioh
->fd_read_poll
||
7924 ioh
->fd_read_poll(ioh
->opaque
) != 0)) {
7925 FD_SET(ioh
->fd
, &rfds
);
7929 if (ioh
->fd_write
) {
7930 FD_SET(ioh
->fd
, &wfds
);
7940 tv
.tv_usec
= timeout
* 1000;
7942 #if defined(CONFIG_SLIRP)
7944 slirp_select_fill(&nfds
, &rfds
, &wfds
, &xfds
);
7947 ret
= select(nfds
+ 1, &rfds
, &wfds
, &xfds
, &tv
);
7949 IOHandlerRecord
**pioh
;
7951 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7952 if (!ioh
->deleted
&& ioh
->fd_read
&& FD_ISSET(ioh
->fd
, &rfds
)) {
7953 ioh
->fd_read(ioh
->opaque
);
7955 if (!ioh
->deleted
&& ioh
->fd_write
&& FD_ISSET(ioh
->fd
, &wfds
)) {
7956 ioh
->fd_write(ioh
->opaque
);
7960 /* remove deleted IO handlers */
7961 pioh
= &first_io_handler
;
7971 #if defined(CONFIG_SLIRP)
7978 slirp_select_poll(&rfds
, &wfds
, &xfds
);
7983 if (likely(!(cur_cpu
->singlestep_enabled
& SSTEP_NOTIMER
)))
7984 qemu_run_timers(&active_timers
[QEMU_TIMER_VIRTUAL
],
7985 qemu_get_clock(vm_clock
));
7986 /* run dma transfers, if any */
7990 /* real time timers */
7991 qemu_run_timers(&active_timers
[QEMU_TIMER_REALTIME
],
7992 qemu_get_clock(rt_clock
));
7994 if (alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) {
7995 alarm_timer
->flags
&= ~(ALARM_FLAG_EXPIRED
);
7996 qemu_rearm_alarm_timer(alarm_timer
);
7999 /* Check bottom-halves last in case any of the earlier events triggered
8005 static int main_loop(void)
8008 #ifdef CONFIG_PROFILER
8013 cur_cpu
= first_cpu
;
8014 next_cpu
= cur_cpu
->next_cpu
?: first_cpu
;
8021 #ifdef CONFIG_PROFILER
8022 ti
= profile_getclock();
8027 qemu_icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
8028 env
->icount_decr
.u16
.low
= 0;
8029 env
->icount_extra
= 0;
8030 count
= qemu_next_deadline();
8031 count
= (count
+ (1 << icount_time_shift
) - 1)
8032 >> icount_time_shift
;
8033 qemu_icount
+= count
;
8034 decr
= (count
> 0xffff) ? 0xffff : count
;
8036 env
->icount_decr
.u16
.low
= decr
;
8037 env
->icount_extra
= count
;
8039 ret
= cpu_exec(env
);
8040 #ifdef CONFIG_PROFILER
8041 qemu_time
+= profile_getclock() - ti
;
8044 /* Fold pending instructions back into the
8045 instruction counter, and clear the interrupt flag. */
8046 qemu_icount
-= (env
->icount_decr
.u16
.low
8047 + env
->icount_extra
);
8048 env
->icount_decr
.u32
= 0;
8049 env
->icount_extra
= 0;
8051 next_cpu
= env
->next_cpu
?: first_cpu
;
8052 if (event_pending
&& likely(ret
!= EXCP_DEBUG
)) {
8053 ret
= EXCP_INTERRUPT
;
8057 if (ret
== EXCP_HLT
) {
8058 /* Give the next CPU a chance to run. */
8062 if (ret
!= EXCP_HALTED
)
8064 /* all CPUs are halted ? */
8070 if (shutdown_requested
) {
8071 ret
= EXCP_INTERRUPT
;
8079 if (reset_requested
) {
8080 reset_requested
= 0;
8081 qemu_system_reset();
8082 ret
= EXCP_INTERRUPT
;
8084 if (powerdown_requested
) {
8085 powerdown_requested
= 0;
8086 qemu_system_powerdown();
8087 ret
= EXCP_INTERRUPT
;
8089 if (unlikely(ret
== EXCP_DEBUG
)) {
8090 vm_stop(EXCP_DEBUG
);
8092 /* If all cpus are halted then wait until the next IRQ */
8093 /* XXX: use timeout computed from timers */
8094 if (ret
== EXCP_HALTED
) {
8098 /* Advance virtual time to the next event. */
8099 if (use_icount
== 1) {
8100 /* When not using an adaptive execution frequency
8101 we tend to get badly out of sync with real time,
8102 so just delay for a reasonable amount of time. */
8105 delta
= cpu_get_icount() - cpu_get_clock();
8108 /* If virtual time is ahead of real time then just
8110 timeout
= (delta
/ 1000000) + 1;
8112 /* Wait for either IO to occur or the next
8114 add
= qemu_next_deadline();
8115 /* We advance the timer before checking for IO.
8116 Limit the amount we advance so that early IO
8117 activity won't get the guest too far ahead. */
8121 add
= (add
+ (1 << icount_time_shift
) - 1)
8122 >> icount_time_shift
;
8124 timeout
= delta
/ 1000000;
8135 if (shutdown_requested
) {
8136 ret
= EXCP_INTERRUPT
;
8141 #ifdef CONFIG_PROFILER
8142 ti
= profile_getclock();
8144 main_loop_wait(timeout
);
8145 #ifdef CONFIG_PROFILER
8146 dev_time
+= profile_getclock() - ti
;
8149 cpu_disable_ticks();
8153 static void help(int exitcode
)
8155 printf("QEMU PC emulator version " QEMU_VERSION
", Copyright (c) 2003-2008 Fabrice Bellard\n"
8156 "usage: %s [options] [disk_image]\n"
8158 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
8160 "Standard options:\n"
8161 "-M machine select emulated machine (-M ? for list)\n"
8162 "-cpu cpu select CPU (-cpu ? for list)\n"
8163 "-fda/-fdb file use 'file' as floppy disk 0/1 image\n"
8164 "-hda/-hdb file use 'file' as IDE hard disk 0/1 image\n"
8165 "-hdc/-hdd file use 'file' as IDE hard disk 2/3 image\n"
8166 "-cdrom file use 'file' as IDE cdrom image (cdrom is ide1 master)\n"
8167 "-drive [file=file][,if=type][,bus=n][,unit=m][,media=d][,index=i]\n"
8168 " [,cyls=c,heads=h,secs=s[,trans=t]][,snapshot=on|off]\n"
8169 " [,cache=writethrough|writeback|none][,format=f]\n"
8170 " use 'file' as a drive image\n"
8171 "-mtdblock file use 'file' as on-board Flash memory image\n"
8172 "-sd file use 'file' as SecureDigital card image\n"
8173 "-pflash file use 'file' as a parallel flash image\n"
8174 "-boot [a|c|d|n] boot on floppy (a), hard disk (c), CD-ROM (d), or network (n)\n"
8175 "-snapshot write to temporary files instead of disk image files\n"
8177 "-no-frame open SDL window without a frame and window decorations\n"
8178 "-alt-grab use Ctrl-Alt-Shift to grab mouse (instead of Ctrl-Alt)\n"
8179 "-no-quit disable SDL window close capability\n"
8182 "-no-fd-bootchk disable boot signature checking for floppy disks\n"
8184 "-m megs set virtual RAM size to megs MB [default=%d]\n"
8185 "-smp n set the number of CPUs to 'n' [default=1]\n"
8186 "-nographic disable graphical output and redirect serial I/Os to console\n"
8187 "-portrait rotate graphical output 90 deg left (only PXA LCD)\n"
8189 "-k language use keyboard layout (for example \"fr\" for French)\n"
8192 "-audio-help print list of audio drivers and their options\n"
8193 "-soundhw c1,... enable audio support\n"
8194 " and only specified sound cards (comma separated list)\n"
8195 " use -soundhw ? to get the list of supported cards\n"
8196 " use -soundhw all to enable all of them\n"
8198 "-vga [std|cirrus|vmware]\n"
8199 " select video card type\n"
8200 "-localtime set the real time clock to local time [default=utc]\n"
8201 "-full-screen start in full screen\n"
8203 "-win2k-hack use it when installing Windows 2000 to avoid a disk full bug\n"
8205 "-usb enable the USB driver (will be the default soon)\n"
8206 "-usbdevice name add the host or guest USB device 'name'\n"
8207 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8208 "-g WxH[xDEPTH] Set the initial graphical resolution and depth\n"
8210 "-name string set the name of the guest\n"
8211 "-uuid %%08x-%%04x-%%04x-%%04x-%%012x specify machine UUID\n"
8213 "Network options:\n"
8214 "-net nic[,vlan=n][,macaddr=addr][,model=type]\n"
8215 " create a new Network Interface Card and connect it to VLAN 'n'\n"
8217 "-net user[,vlan=n][,hostname=host]\n"
8218 " connect the user mode network stack to VLAN 'n' and send\n"
8219 " hostname 'host' to DHCP clients\n"
8222 "-net tap[,vlan=n],ifname=name\n"
8223 " connect the host TAP network interface to VLAN 'n'\n"
8225 "-net tap[,vlan=n][,fd=h][,ifname=name][,script=file][,downscript=dfile]\n"
8226 " connect the host TAP network interface to VLAN 'n' and use the\n"
8227 " network scripts 'file' (default=%s)\n"
8228 " and 'dfile' (default=%s);\n"
8229 " use '[down]script=no' to disable script execution;\n"
8230 " use 'fd=h' to connect to an already opened TAP interface\n"
8232 "-net socket[,vlan=n][,fd=h][,listen=[host]:port][,connect=host:port]\n"
8233 " connect the vlan 'n' to another VLAN using a socket connection\n"
8234 "-net socket[,vlan=n][,fd=h][,mcast=maddr:port]\n"
8235 " connect the vlan 'n' to multicast maddr and port\n"
8237 "-net vde[,vlan=n][,sock=socketpath][,port=n][,group=groupname][,mode=octalmode]\n"
8238 " connect the vlan 'n' to port 'n' of a vde switch running\n"
8239 " on host and listening for incoming connections on 'socketpath'.\n"
8240 " Use group 'groupname' and mode 'octalmode' to change default\n"
8241 " ownership and permissions for communication port.\n"
8243 "-net none use it alone to have zero network devices; if no -net option\n"
8244 " is provided, the default is '-net nic -net user'\n"
8247 "-tftp dir allow tftp access to files in dir [-net user]\n"
8248 "-bootp file advertise file in BOOTP replies\n"
8250 "-smb dir allow SMB access to files in 'dir' [-net user]\n"
8252 "-redir [tcp|udp]:host-port:[guest-host]:guest-port\n"
8253 " redirect TCP or UDP connections from host to guest [-net user]\n"
8256 "Linux boot specific:\n"
8257 "-kernel bzImage use 'bzImage' as kernel image\n"
8258 "-append cmdline use 'cmdline' as kernel command line\n"
8259 "-initrd file use 'file' as initial ram disk\n"
8261 "Debug/Expert options:\n"
8262 "-monitor dev redirect the monitor to char device 'dev'\n"
8263 "-serial dev redirect the serial port to char device 'dev'\n"
8264 "-parallel dev redirect the parallel port to char device 'dev'\n"
8265 "-pidfile file Write PID to 'file'\n"
8266 "-S freeze CPU at startup (use 'c' to start execution)\n"
8267 "-s wait gdb connection to port\n"
8268 "-p port set gdb connection port [default=%s]\n"
8269 "-d item1,... output log to %s (use -d ? for a list of log items)\n"
8270 "-hdachs c,h,s[,t] force hard disk 0 physical geometry and the optional BIOS\n"
8271 " translation (t=none or lba) (usually qemu can guess them)\n"
8272 "-L path set the directory for the BIOS, VGA BIOS and keymaps\n"
8274 "-kernel-kqemu enable KQEMU full virtualization (default is user mode only)\n"
8275 "-no-kqemu disable KQEMU kernel module usage\n"
8278 "-no-acpi disable ACPI\n"
8280 #ifdef CONFIG_CURSES
8281 "-curses use a curses/ncurses interface instead of SDL\n"
8283 "-no-reboot exit instead of rebooting\n"
8284 "-no-shutdown stop before shutdown\n"
8285 "-loadvm [tag|id] start right away with a saved state (loadvm in monitor)\n"
8286 "-vnc display start a VNC server on display\n"
8288 "-daemonize daemonize QEMU after initializing\n"
8290 "-option-rom rom load a file, rom, into the option ROM space\n"
8292 "-prom-env variable=value set OpenBIOS nvram variables\n"
8294 "-clock force the use of the given methods for timer alarm.\n"
8295 " To see what timers are available use -clock ?\n"
8296 "-startdate select initial date of the clock\n"
8297 "-icount [N|auto]\n"
8298 " Enable virtual instruction counter with 2^N clock ticks per instruction\n"
8300 "During emulation, the following keys are useful:\n"
8301 "ctrl-alt-f toggle full screen\n"
8302 "ctrl-alt-n switch to virtual console 'n'\n"
8303 "ctrl-alt toggle mouse and keyboard grab\n"
8305 "When using -nographic, press 'ctrl-a h' to get some help.\n"
8310 DEFAULT_NETWORK_SCRIPT
,
8311 DEFAULT_NETWORK_DOWN_SCRIPT
,
8313 DEFAULT_GDBSTUB_PORT
,
8318 #define HAS_ARG 0x0001
8333 QEMU_OPTION_mtdblock
,
8337 QEMU_OPTION_snapshot
,
8339 QEMU_OPTION_no_fd_bootchk
,
8342 QEMU_OPTION_nographic
,
8343 QEMU_OPTION_portrait
,
8345 QEMU_OPTION_audio_help
,
8346 QEMU_OPTION_soundhw
,
8367 QEMU_OPTION_localtime
,
8371 QEMU_OPTION_monitor
,
8373 QEMU_OPTION_parallel
,
8375 QEMU_OPTION_full_screen
,
8376 QEMU_OPTION_no_frame
,
8377 QEMU_OPTION_alt_grab
,
8378 QEMU_OPTION_no_quit
,
8379 QEMU_OPTION_pidfile
,
8380 QEMU_OPTION_no_kqemu
,
8381 QEMU_OPTION_kernel_kqemu
,
8382 QEMU_OPTION_win2k_hack
,
8384 QEMU_OPTION_usbdevice
,
8387 QEMU_OPTION_no_acpi
,
8389 QEMU_OPTION_no_reboot
,
8390 QEMU_OPTION_no_shutdown
,
8391 QEMU_OPTION_show_cursor
,
8392 QEMU_OPTION_daemonize
,
8393 QEMU_OPTION_option_rom
,
8394 QEMU_OPTION_semihosting
,
8396 QEMU_OPTION_prom_env
,
8397 QEMU_OPTION_old_param
,
8399 QEMU_OPTION_startdate
,
8400 QEMU_OPTION_tb_size
,
8403 QEMU_OPTION_incoming
,
8406 typedef struct QEMUOption
{
8412 static const QEMUOption qemu_options
[] = {
8413 { "h", 0, QEMU_OPTION_h
},
8414 { "help", 0, QEMU_OPTION_h
},
8416 { "M", HAS_ARG
, QEMU_OPTION_M
},
8417 { "cpu", HAS_ARG
, QEMU_OPTION_cpu
},
8418 { "fda", HAS_ARG
, QEMU_OPTION_fda
},
8419 { "fdb", HAS_ARG
, QEMU_OPTION_fdb
},
8420 { "hda", HAS_ARG
, QEMU_OPTION_hda
},
8421 { "hdb", HAS_ARG
, QEMU_OPTION_hdb
},
8422 { "hdc", HAS_ARG
, QEMU_OPTION_hdc
},
8423 { "hdd", HAS_ARG
, QEMU_OPTION_hdd
},
8424 { "drive", HAS_ARG
, QEMU_OPTION_drive
},
8425 { "cdrom", HAS_ARG
, QEMU_OPTION_cdrom
},
8426 { "mtdblock", HAS_ARG
, QEMU_OPTION_mtdblock
},
8427 { "sd", HAS_ARG
, QEMU_OPTION_sd
},
8428 { "pflash", HAS_ARG
, QEMU_OPTION_pflash
},
8429 { "boot", HAS_ARG
, QEMU_OPTION_boot
},
8430 { "snapshot", 0, QEMU_OPTION_snapshot
},
8432 { "no-fd-bootchk", 0, QEMU_OPTION_no_fd_bootchk
},
8434 { "m", HAS_ARG
, QEMU_OPTION_m
},
8435 { "nographic", 0, QEMU_OPTION_nographic
},
8436 { "portrait", 0, QEMU_OPTION_portrait
},
8437 { "k", HAS_ARG
, QEMU_OPTION_k
},
8439 { "audio-help", 0, QEMU_OPTION_audio_help
},
8440 { "soundhw", HAS_ARG
, QEMU_OPTION_soundhw
},
8443 { "net", HAS_ARG
, QEMU_OPTION_net
},
8445 { "tftp", HAS_ARG
, QEMU_OPTION_tftp
},
8446 { "bootp", HAS_ARG
, QEMU_OPTION_bootp
},
8448 { "smb", HAS_ARG
, QEMU_OPTION_smb
},
8450 { "redir", HAS_ARG
, QEMU_OPTION_redir
},
8453 { "kernel", HAS_ARG
, QEMU_OPTION_kernel
},
8454 { "append", HAS_ARG
, QEMU_OPTION_append
},
8455 { "initrd", HAS_ARG
, QEMU_OPTION_initrd
},
8457 { "S", 0, QEMU_OPTION_S
},
8458 { "s", 0, QEMU_OPTION_s
},
8459 { "p", HAS_ARG
, QEMU_OPTION_p
},
8460 { "d", HAS_ARG
, QEMU_OPTION_d
},
8461 { "hdachs", HAS_ARG
, QEMU_OPTION_hdachs
},
8462 { "L", HAS_ARG
, QEMU_OPTION_L
},
8463 { "bios", HAS_ARG
, QEMU_OPTION_bios
},
8465 { "no-kqemu", 0, QEMU_OPTION_no_kqemu
},
8466 { "kernel-kqemu", 0, QEMU_OPTION_kernel_kqemu
},
8468 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8469 { "g", 1, QEMU_OPTION_g
},
8471 { "localtime", 0, QEMU_OPTION_localtime
},
8472 { "vga", HAS_ARG
, QEMU_OPTION_vga
},
8473 { "echr", HAS_ARG
, QEMU_OPTION_echr
},
8474 { "monitor", HAS_ARG
, QEMU_OPTION_monitor
},
8475 { "serial", HAS_ARG
, QEMU_OPTION_serial
},
8476 { "parallel", HAS_ARG
, QEMU_OPTION_parallel
},
8477 { "loadvm", HAS_ARG
, QEMU_OPTION_loadvm
},
8478 { "full-screen", 0, QEMU_OPTION_full_screen
},
8480 { "no-frame", 0, QEMU_OPTION_no_frame
},
8481 { "alt-grab", 0, QEMU_OPTION_alt_grab
},
8482 { "no-quit", 0, QEMU_OPTION_no_quit
},
8484 { "pidfile", HAS_ARG
, QEMU_OPTION_pidfile
},
8485 { "win2k-hack", 0, QEMU_OPTION_win2k_hack
},
8486 { "usbdevice", HAS_ARG
, QEMU_OPTION_usbdevice
},
8487 { "smp", HAS_ARG
, QEMU_OPTION_smp
},
8488 { "vnc", HAS_ARG
, QEMU_OPTION_vnc
},
8489 #ifdef CONFIG_CURSES
8490 { "curses", 0, QEMU_OPTION_curses
},
8492 { "uuid", HAS_ARG
, QEMU_OPTION_uuid
},
8494 /* temporary options */
8495 { "usb", 0, QEMU_OPTION_usb
},
8496 { "no-acpi", 0, QEMU_OPTION_no_acpi
},
8497 { "no-reboot", 0, QEMU_OPTION_no_reboot
},
8498 { "no-shutdown", 0, QEMU_OPTION_no_shutdown
},
8499 { "show-cursor", 0, QEMU_OPTION_show_cursor
},
8500 { "daemonize", 0, QEMU_OPTION_daemonize
},
8501 { "option-rom", HAS_ARG
, QEMU_OPTION_option_rom
},
8502 #if defined(TARGET_ARM) || defined(TARGET_M68K)
8503 { "semihosting", 0, QEMU_OPTION_semihosting
},
8505 { "name", HAS_ARG
, QEMU_OPTION_name
},
8506 #if defined(TARGET_SPARC)
8507 { "prom-env", HAS_ARG
, QEMU_OPTION_prom_env
},
8509 #if defined(TARGET_ARM)
8510 { "old-param", 0, QEMU_OPTION_old_param
},
8512 { "clock", HAS_ARG
, QEMU_OPTION_clock
},
8513 { "startdate", HAS_ARG
, QEMU_OPTION_startdate
},
8514 { "tb-size", HAS_ARG
, QEMU_OPTION_tb_size
},
8515 { "icount", HAS_ARG
, QEMU_OPTION_icount
},
8516 { "incoming", HAS_ARG
, QEMU_OPTION_incoming
},
8520 /* password input */
8522 int qemu_key_check(BlockDriverState
*bs
, const char *name
)
8527 if (!bdrv_is_encrypted(bs
))
8530 term_printf("%s is encrypted.\n", name
);
8531 for(i
= 0; i
< 3; i
++) {
8532 monitor_readline("Password: ", 1, password
, sizeof(password
));
8533 if (bdrv_set_key(bs
, password
) == 0)
8535 term_printf("invalid password\n");
8540 static BlockDriverState
*get_bdrv(int index
)
8542 if (index
> nb_drives
)
8544 return drives_table
[index
].bdrv
;
8547 static void read_passwords(void)
8549 BlockDriverState
*bs
;
8552 for(i
= 0; i
< 6; i
++) {
8555 qemu_key_check(bs
, bdrv_get_device_name(bs
));
8560 struct soundhw soundhw
[] = {
8561 #ifdef HAS_AUDIO_CHOICE
8562 #if defined(TARGET_I386) || defined(TARGET_MIPS)
8568 { .init_isa
= pcspk_audio_init
}
8573 "Creative Sound Blaster 16",
8576 { .init_isa
= SB16_init
}
8579 #ifdef CONFIG_CS4231A
8585 { .init_isa
= cs4231a_init
}
8593 "Yamaha YMF262 (OPL3)",
8595 "Yamaha YM3812 (OPL2)",
8599 { .init_isa
= Adlib_init
}
8606 "Gravis Ultrasound GF1",
8609 { .init_isa
= GUS_init
}
8616 "Intel 82801AA AC97 Audio",
8619 { .init_pci
= ac97_init
}
8625 "ENSONIQ AudioPCI ES1370",
8628 { .init_pci
= es1370_init
}
8632 { NULL
, NULL
, 0, 0, { NULL
} }
8635 static void select_soundhw (const char *optarg
)
8639 if (*optarg
== '?') {
8642 printf ("Valid sound card names (comma separated):\n");
8643 for (c
= soundhw
; c
->name
; ++c
) {
8644 printf ("%-11s %s\n", c
->name
, c
->descr
);
8646 printf ("\n-soundhw all will enable all of the above\n");
8647 exit (*optarg
!= '?');
8655 if (!strcmp (optarg
, "all")) {
8656 for (c
= soundhw
; c
->name
; ++c
) {
8664 e
= strchr (p
, ',');
8665 l
= !e
? strlen (p
) : (size_t) (e
- p
);
8667 for (c
= soundhw
; c
->name
; ++c
) {
8668 if (!strncmp (c
->name
, p
, l
)) {
8677 "Unknown sound card name (too big to show)\n");
8680 fprintf (stderr
, "Unknown sound card name `%.*s'\n",
8685 p
+= l
+ (e
!= NULL
);
8689 goto show_valid_cards
;
8694 static void select_vgahw (const char *p
)
8698 if (strstart(p
, "std", &opts
)) {
8699 cirrus_vga_enabled
= 0;
8701 } else if (strstart(p
, "cirrus", &opts
)) {
8702 cirrus_vga_enabled
= 1;
8704 } else if (strstart(p
, "vmware", &opts
)) {
8705 cirrus_vga_enabled
= 0;
8709 fprintf(stderr
, "Unknown vga type: %s\n", p
);
8713 const char *nextopt
;
8715 if (strstart(opts
, ",retrace=", &nextopt
)) {
8717 if (strstart(opts
, "dumb", &nextopt
))
8718 vga_retrace_method
= VGA_RETRACE_DUMB
;
8719 else if (strstart(opts
, "precise", &nextopt
))
8720 vga_retrace_method
= VGA_RETRACE_PRECISE
;
8721 else goto invalid_vga
;
8722 } else goto invalid_vga
;
8728 static BOOL WINAPI
qemu_ctrl_handler(DWORD type
)
8730 exit(STATUS_CONTROL_C_EXIT
);
8735 static int qemu_uuid_parse(const char *str
, uint8_t *uuid
)
8739 if(strlen(str
) != 36)
8742 ret
= sscanf(str
, UUID_FMT
, &uuid
[0], &uuid
[1], &uuid
[2], &uuid
[3],
8743 &uuid
[4], &uuid
[5], &uuid
[6], &uuid
[7], &uuid
[8], &uuid
[9],
8744 &uuid
[10], &uuid
[11], &uuid
[12], &uuid
[13], &uuid
[14], &uuid
[15]);
8752 #define MAX_NET_CLIENTS 32
8756 static void termsig_handler(int signal
)
8758 qemu_system_shutdown_request();
8761 static void termsig_setup(void)
8763 struct sigaction act
;
8765 memset(&act
, 0, sizeof(act
));
8766 act
.sa_handler
= termsig_handler
;
8767 sigaction(SIGINT
, &act
, NULL
);
8768 sigaction(SIGHUP
, &act
, NULL
);
8769 sigaction(SIGTERM
, &act
, NULL
);
8774 int main(int argc
, char **argv
)
8776 #ifdef CONFIG_GDBSTUB
8778 const char *gdbstub_port
;
8780 uint32_t boot_devices_bitmap
= 0;
8782 int snapshot
, linux_boot
, net_boot
;
8783 const char *initrd_filename
;
8784 const char *kernel_filename
, *kernel_cmdline
;
8785 const char *boot_devices
= "";
8786 DisplayState
*ds
= &display_state
;
8787 int cyls
, heads
, secs
, translation
;
8788 const char *net_clients
[MAX_NET_CLIENTS
];
8792 const char *r
, *optarg
;
8793 CharDriverState
*monitor_hd
;
8794 const char *monitor_device
;
8795 const char *serial_devices
[MAX_SERIAL_PORTS
];
8796 int serial_device_index
;
8797 const char *parallel_devices
[MAX_PARALLEL_PORTS
];
8798 int parallel_device_index
;
8799 const char *loadvm
= NULL
;
8800 QEMUMachine
*machine
;
8801 const char *cpu_model
;
8802 const char *usb_devices
[MAX_USB_CMDLINE
];
8803 int usb_devices_index
;
8806 const char *pid_file
= NULL
;
8809 const char *incoming
= NULL
;
8811 LIST_INIT (&vm_change_state_head
);
8814 struct sigaction act
;
8815 sigfillset(&act
.sa_mask
);
8817 act
.sa_handler
= SIG_IGN
;
8818 sigaction(SIGPIPE
, &act
, NULL
);
8821 SetConsoleCtrlHandler(qemu_ctrl_handler
, TRUE
);
8822 /* Note: cpu_interrupt() is currently not SMP safe, so we force
8823 QEMU to run on a single CPU */
8828 h
= GetCurrentProcess();
8829 if (GetProcessAffinityMask(h
, &mask
, &smask
)) {
8830 for(i
= 0; i
< 32; i
++) {
8831 if (mask
& (1 << i
))
8836 SetProcessAffinityMask(h
, mask
);
8842 register_machines();
8843 machine
= first_machine
;
8845 initrd_filename
= NULL
;
8847 vga_ram_size
= VGA_RAM_SIZE
;
8848 #ifdef CONFIG_GDBSTUB
8850 gdbstub_port
= DEFAULT_GDBSTUB_PORT
;
8855 kernel_filename
= NULL
;
8856 kernel_cmdline
= "";
8857 cyls
= heads
= secs
= 0;
8858 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8859 monitor_device
= "vc";
8861 serial_devices
[0] = "vc:80Cx24C";
8862 for(i
= 1; i
< MAX_SERIAL_PORTS
; i
++)
8863 serial_devices
[i
] = NULL
;
8864 serial_device_index
= 0;
8866 parallel_devices
[0] = "vc:640x480";
8867 for(i
= 1; i
< MAX_PARALLEL_PORTS
; i
++)
8868 parallel_devices
[i
] = NULL
;
8869 parallel_device_index
= 0;
8871 usb_devices_index
= 0;
8889 hda_index
= drive_add(argv
[optind
++], HD_ALIAS
, 0);
8891 const QEMUOption
*popt
;
8894 /* Treat --foo the same as -foo. */
8897 popt
= qemu_options
;
8900 fprintf(stderr
, "%s: invalid option -- '%s'\n",
8904 if (!strcmp(popt
->name
, r
+ 1))
8908 if (popt
->flags
& HAS_ARG
) {
8909 if (optind
>= argc
) {
8910 fprintf(stderr
, "%s: option '%s' requires an argument\n",
8914 optarg
= argv
[optind
++];
8919 switch(popt
->index
) {
8921 machine
= find_machine(optarg
);
8924 printf("Supported machines are:\n");
8925 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
8926 printf("%-10s %s%s\n",
8928 m
== first_machine
? " (default)" : "");
8930 exit(*optarg
!= '?');
8933 case QEMU_OPTION_cpu
:
8934 /* hw initialization will check this */
8935 if (*optarg
== '?') {
8936 /* XXX: implement xxx_cpu_list for targets that still miss it */
8937 #if defined(cpu_list)
8938 cpu_list(stdout
, &fprintf
);
8945 case QEMU_OPTION_initrd
:
8946 initrd_filename
= optarg
;
8948 case QEMU_OPTION_hda
:
8950 hda_index
= drive_add(optarg
, HD_ALIAS
, 0);
8952 hda_index
= drive_add(optarg
, HD_ALIAS
8953 ",cyls=%d,heads=%d,secs=%d%s",
8954 0, cyls
, heads
, secs
,
8955 translation
== BIOS_ATA_TRANSLATION_LBA
?
8957 translation
== BIOS_ATA_TRANSLATION_NONE
?
8958 ",trans=none" : "");
8960 case QEMU_OPTION_hdb
:
8961 case QEMU_OPTION_hdc
:
8962 case QEMU_OPTION_hdd
:
8963 drive_add(optarg
, HD_ALIAS
, popt
->index
- QEMU_OPTION_hda
);
8965 case QEMU_OPTION_drive
:
8966 drive_add(NULL
, "%s", optarg
);
8968 case QEMU_OPTION_mtdblock
:
8969 drive_add(optarg
, MTD_ALIAS
);
8971 case QEMU_OPTION_sd
:
8972 drive_add(optarg
, SD_ALIAS
);
8974 case QEMU_OPTION_pflash
:
8975 drive_add(optarg
, PFLASH_ALIAS
);
8977 case QEMU_OPTION_snapshot
:
8980 case QEMU_OPTION_hdachs
:
8984 cyls
= strtol(p
, (char **)&p
, 0);
8985 if (cyls
< 1 || cyls
> 16383)
8990 heads
= strtol(p
, (char **)&p
, 0);
8991 if (heads
< 1 || heads
> 16)
8996 secs
= strtol(p
, (char **)&p
, 0);
8997 if (secs
< 1 || secs
> 63)
9001 if (!strcmp(p
, "none"))
9002 translation
= BIOS_ATA_TRANSLATION_NONE
;
9003 else if (!strcmp(p
, "lba"))
9004 translation
= BIOS_ATA_TRANSLATION_LBA
;
9005 else if (!strcmp(p
, "auto"))
9006 translation
= BIOS_ATA_TRANSLATION_AUTO
;
9009 } else if (*p
!= '\0') {
9011 fprintf(stderr
, "qemu: invalid physical CHS format\n");
9014 if (hda_index
!= -1)
9015 snprintf(drives_opt
[hda_index
].opt
,
9016 sizeof(drives_opt
[hda_index
].opt
),
9017 HD_ALIAS
",cyls=%d,heads=%d,secs=%d%s",
9018 0, cyls
, heads
, secs
,
9019 translation
== BIOS_ATA_TRANSLATION_LBA
?
9021 translation
== BIOS_ATA_TRANSLATION_NONE
?
9022 ",trans=none" : "");
9025 case QEMU_OPTION_nographic
:
9028 #ifdef CONFIG_CURSES
9029 case QEMU_OPTION_curses
:
9033 case QEMU_OPTION_portrait
:
9036 case QEMU_OPTION_kernel
:
9037 kernel_filename
= optarg
;
9039 case QEMU_OPTION_append
:
9040 kernel_cmdline
= optarg
;
9042 case QEMU_OPTION_cdrom
:
9043 drive_add(optarg
, CDROM_ALIAS
);
9045 case QEMU_OPTION_boot
:
9046 boot_devices
= optarg
;
9047 /* We just do some generic consistency checks */
9049 /* Could easily be extended to 64 devices if needed */
9052 boot_devices_bitmap
= 0;
9053 for (p
= boot_devices
; *p
!= '\0'; p
++) {
9054 /* Allowed boot devices are:
9055 * a b : floppy disk drives
9056 * c ... f : IDE disk drives
9057 * g ... m : machine implementation dependant drives
9058 * n ... p : network devices
9059 * It's up to each machine implementation to check
9060 * if the given boot devices match the actual hardware
9061 * implementation and firmware features.
9063 if (*p
< 'a' || *p
> 'q') {
9064 fprintf(stderr
, "Invalid boot device '%c'\n", *p
);
9067 if (boot_devices_bitmap
& (1 << (*p
- 'a'))) {
9069 "Boot device '%c' was given twice\n",*p
);
9072 boot_devices_bitmap
|= 1 << (*p
- 'a');
9076 case QEMU_OPTION_fda
:
9077 case QEMU_OPTION_fdb
:
9078 drive_add(optarg
, FD_ALIAS
, popt
->index
- QEMU_OPTION_fda
);
9081 case QEMU_OPTION_no_fd_bootchk
:
9085 case QEMU_OPTION_net
:
9086 if (nb_net_clients
>= MAX_NET_CLIENTS
) {
9087 fprintf(stderr
, "qemu: too many network clients\n");
9090 net_clients
[nb_net_clients
] = optarg
;
9094 case QEMU_OPTION_tftp
:
9095 tftp_prefix
= optarg
;
9097 case QEMU_OPTION_bootp
:
9098 bootp_filename
= optarg
;
9101 case QEMU_OPTION_smb
:
9102 net_slirp_smb(optarg
);
9105 case QEMU_OPTION_redir
:
9106 net_slirp_redir(optarg
);
9110 case QEMU_OPTION_audio_help
:
9114 case QEMU_OPTION_soundhw
:
9115 select_soundhw (optarg
);
9121 case QEMU_OPTION_m
: {
9125 value
= strtoul(optarg
, &ptr
, 10);
9127 case 0: case 'M': case 'm':
9134 fprintf(stderr
, "qemu: invalid ram size: %s\n", optarg
);
9138 /* On 32-bit hosts, QEMU is limited by virtual address space */
9139 if (value
> (2047 << 20)
9141 && HOST_LONG_BITS
== 32
9144 fprintf(stderr
, "qemu: at most 2047 MB RAM can be simulated\n");
9147 if (value
!= (uint64_t)(ram_addr_t
)value
) {
9148 fprintf(stderr
, "qemu: ram size too large\n");
9157 const CPULogItem
*item
;
9159 mask
= cpu_str_to_log_mask(optarg
);
9161 printf("Log items (comma separated):\n");
9162 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
9163 printf("%-10s %s\n", item
->name
, item
->help
);
9170 #ifdef CONFIG_GDBSTUB
9175 gdbstub_port
= optarg
;
9181 case QEMU_OPTION_bios
:
9188 keyboard_layout
= optarg
;
9190 case QEMU_OPTION_localtime
:
9193 case QEMU_OPTION_vga
:
9194 select_vgahw (optarg
);
9201 w
= strtol(p
, (char **)&p
, 10);
9204 fprintf(stderr
, "qemu: invalid resolution or depth\n");
9210 h
= strtol(p
, (char **)&p
, 10);
9215 depth
= strtol(p
, (char **)&p
, 10);
9216 if (depth
!= 8 && depth
!= 15 && depth
!= 16 &&
9217 depth
!= 24 && depth
!= 32)
9219 } else if (*p
== '\0') {
9220 depth
= graphic_depth
;
9227 graphic_depth
= depth
;
9230 case QEMU_OPTION_echr
:
9233 term_escape_char
= strtol(optarg
, &r
, 0);
9235 printf("Bad argument to echr\n");
9238 case QEMU_OPTION_monitor
:
9239 monitor_device
= optarg
;
9241 case QEMU_OPTION_serial
:
9242 if (serial_device_index
>= MAX_SERIAL_PORTS
) {
9243 fprintf(stderr
, "qemu: too many serial ports\n");
9246 serial_devices
[serial_device_index
] = optarg
;
9247 serial_device_index
++;
9249 case QEMU_OPTION_parallel
:
9250 if (parallel_device_index
>= MAX_PARALLEL_PORTS
) {
9251 fprintf(stderr
, "qemu: too many parallel ports\n");
9254 parallel_devices
[parallel_device_index
] = optarg
;
9255 parallel_device_index
++;
9257 case QEMU_OPTION_loadvm
:
9260 case QEMU_OPTION_full_screen
:
9264 case QEMU_OPTION_no_frame
:
9267 case QEMU_OPTION_alt_grab
:
9270 case QEMU_OPTION_no_quit
:
9274 case QEMU_OPTION_pidfile
:
9278 case QEMU_OPTION_win2k_hack
:
9279 win2k_install_hack
= 1;
9283 case QEMU_OPTION_no_kqemu
:
9286 case QEMU_OPTION_kernel_kqemu
:
9290 case QEMU_OPTION_usb
:
9293 case QEMU_OPTION_usbdevice
:
9295 if (usb_devices_index
>= MAX_USB_CMDLINE
) {
9296 fprintf(stderr
, "Too many USB devices\n");
9299 usb_devices
[usb_devices_index
] = optarg
;
9300 usb_devices_index
++;
9302 case QEMU_OPTION_smp
:
9303 smp_cpus
= atoi(optarg
);
9305 fprintf(stderr
, "Invalid number of CPUs\n");
9309 case QEMU_OPTION_vnc
:
9310 vnc_display
= optarg
;
9312 case QEMU_OPTION_no_acpi
:
9315 case QEMU_OPTION_no_reboot
:
9318 case QEMU_OPTION_no_shutdown
:
9321 case QEMU_OPTION_show_cursor
:
9324 case QEMU_OPTION_uuid
:
9325 if(qemu_uuid_parse(optarg
, qemu_uuid
) < 0) {
9326 fprintf(stderr
, "Fail to parse UUID string."
9327 " Wrong format.\n");
9331 case QEMU_OPTION_daemonize
:
9334 case QEMU_OPTION_option_rom
:
9335 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9336 fprintf(stderr
, "Too many option ROMs\n");
9339 option_rom
[nb_option_roms
] = optarg
;
9342 case QEMU_OPTION_semihosting
:
9343 semihosting_enabled
= 1;
9345 case QEMU_OPTION_name
:
9349 case QEMU_OPTION_prom_env
:
9350 if (nb_prom_envs
>= MAX_PROM_ENVS
) {
9351 fprintf(stderr
, "Too many prom variables\n");
9354 prom_envs
[nb_prom_envs
] = optarg
;
9359 case QEMU_OPTION_old_param
:
9363 case QEMU_OPTION_clock
:
9364 configure_alarms(optarg
);
9366 case QEMU_OPTION_startdate
:
9369 time_t rtc_start_date
;
9370 if (!strcmp(optarg
, "now")) {
9371 rtc_date_offset
= -1;
9373 if (sscanf(optarg
, "%d-%d-%dT%d:%d:%d",
9381 } else if (sscanf(optarg
, "%d-%d-%d",
9384 &tm
.tm_mday
) == 3) {
9393 rtc_start_date
= mktimegm(&tm
);
9394 if (rtc_start_date
== -1) {
9396 fprintf(stderr
, "Invalid date format. Valid format are:\n"
9397 "'now' or '2006-06-17T16:01:21' or '2006-06-17'\n");
9400 rtc_date_offset
= time(NULL
) - rtc_start_date
;
9404 case QEMU_OPTION_tb_size
:
9405 tb_size
= strtol(optarg
, NULL
, 0);
9409 case QEMU_OPTION_icount
:
9411 if (strcmp(optarg
, "auto") == 0) {
9412 icount_time_shift
= -1;
9414 icount_time_shift
= strtol(optarg
, NULL
, 0);
9417 case QEMU_OPTION_incoming
:
9424 machine
->max_cpus
= machine
->max_cpus
?: 1; /* Default to UP */
9425 if (smp_cpus
> machine
->max_cpus
) {
9426 fprintf(stderr
, "Number of SMP cpus requested (%d), exceeds max cpus "
9427 "supported by machine `%s' (%d)\n", smp_cpus
, machine
->name
,
9433 if (serial_device_index
== 0)
9434 serial_devices
[0] = "stdio";
9435 if (parallel_device_index
== 0)
9436 parallel_devices
[0] = "null";
9437 if (strncmp(monitor_device
, "vc", 2) == 0)
9438 monitor_device
= "stdio";
9445 if (pipe(fds
) == -1)
9456 len
= read(fds
[0], &status
, 1);
9457 if (len
== -1 && (errno
== EINTR
))
9462 else if (status
== 1) {
9463 fprintf(stderr
, "Could not acquire pidfile\n");
9480 signal(SIGTSTP
, SIG_IGN
);
9481 signal(SIGTTOU
, SIG_IGN
);
9482 signal(SIGTTIN
, SIG_IGN
);
9486 if (pid_file
&& qemu_create_pidfile(pid_file
) != 0) {
9489 write(fds
[1], &status
, 1);
9491 fprintf(stderr
, "Could not acquire pid file\n");
9499 linux_boot
= (kernel_filename
!= NULL
);
9500 net_boot
= (boot_devices_bitmap
>> ('n' - 'a')) & 0xF;
9502 if (!linux_boot
&& net_boot
== 0 &&
9503 !machine
->nodisk_ok
&& nb_drives_opt
== 0)
9506 if (!linux_boot
&& *kernel_cmdline
!= '\0') {
9507 fprintf(stderr
, "-append only allowed with -kernel option\n");
9511 if (!linux_boot
&& initrd_filename
!= NULL
) {
9512 fprintf(stderr
, "-initrd only allowed with -kernel option\n");
9516 /* boot to floppy or the default cd if no hard disk defined yet */
9517 if (!boot_devices
[0]) {
9518 boot_devices
= "cad";
9520 setvbuf(stdout
, NULL
, _IOLBF
, 0);
9524 if (use_icount
&& icount_time_shift
< 0) {
9526 /* 125MIPS seems a reasonable initial guess at the guest speed.
9527 It will be corrected fairly quickly anyway. */
9528 icount_time_shift
= 3;
9529 init_icount_adjust();
9536 /* init network clients */
9537 if (nb_net_clients
== 0) {
9538 /* if no clients, we use a default config */
9539 net_clients
[nb_net_clients
++] = "nic";
9541 net_clients
[nb_net_clients
++] = "user";
9545 for(i
= 0;i
< nb_net_clients
; i
++) {
9546 if (net_client_parse(net_clients
[i
]) < 0)
9549 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9550 if (vlan
->nb_guest_devs
== 0 && vlan
->nb_host_devs
== 0)
9552 if (vlan
->nb_guest_devs
== 0)
9553 fprintf(stderr
, "Warning: vlan %d with no nics\n", vlan
->id
);
9554 if (vlan
->nb_host_devs
== 0)
9556 "Warning: vlan %d is not connected to host network\n",
9561 /* XXX: this should be moved in the PC machine instantiation code */
9562 if (net_boot
!= 0) {
9564 for (i
= 0; i
< nb_nics
&& i
< 4; i
++) {
9565 const char *model
= nd_table
[i
].model
;
9567 if (net_boot
& (1 << i
)) {
9570 snprintf(buf
, sizeof(buf
), "%s/pxe-%s.bin", bios_dir
, model
);
9571 if (get_image_size(buf
) > 0) {
9572 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9573 fprintf(stderr
, "Too many option ROMs\n");
9576 option_rom
[nb_option_roms
] = strdup(buf
);
9583 fprintf(stderr
, "No valid PXE rom found for network device\n");
9589 /* init the memory */
9590 phys_ram_size
= machine
->ram_require
& ~RAMSIZE_FIXED
;
9592 if (machine
->ram_require
& RAMSIZE_FIXED
) {
9594 if (ram_size
< phys_ram_size
) {
9595 fprintf(stderr
, "Machine `%s' requires %llu bytes of memory\n",
9596 machine
->name
, (unsigned long long) phys_ram_size
);
9600 phys_ram_size
= ram_size
;
9602 ram_size
= phys_ram_size
;
9605 ram_size
= DEFAULT_RAM_SIZE
* 1024 * 1024;
9607 phys_ram_size
+= ram_size
;
9610 phys_ram_base
= qemu_vmalloc(phys_ram_size
);
9611 if (!phys_ram_base
) {
9612 fprintf(stderr
, "Could not allocate physical memory\n");
9616 /* init the dynamic translator */
9617 cpu_exec_init_all(tb_size
* 1024 * 1024);
9621 /* we always create the cdrom drive, even if no disk is there */
9623 if (nb_drives_opt
< MAX_DRIVES
)
9624 drive_add(NULL
, CDROM_ALIAS
);
9626 /* we always create at least one floppy */
9628 if (nb_drives_opt
< MAX_DRIVES
)
9629 drive_add(NULL
, FD_ALIAS
, 0);
9631 /* we always create one sd slot, even if no card is in it */
9633 if (nb_drives_opt
< MAX_DRIVES
)
9634 drive_add(NULL
, SD_ALIAS
);
9636 /* open the virtual block devices */
9638 for(i
= 0; i
< nb_drives_opt
; i
++)
9639 if (drive_init(&drives_opt
[i
], snapshot
, machine
) == -1)
9642 register_savevm("timer", 0, 2, timer_save
, timer_load
, NULL
);
9643 register_savevm_live("ram", 0, 3, ram_save_live
, NULL
, ram_load
, NULL
);
9646 memset(&display_state
, 0, sizeof(display_state
));
9649 fprintf(stderr
, "fatal: -nographic can't be used with -curses\n");
9652 /* nearly nothing to do */
9653 dumb_display_init(ds
);
9654 } else if (vnc_display
!= NULL
) {
9655 vnc_display_init(ds
);
9656 if (vnc_display_open(ds
, vnc_display
) < 0)
9659 #if defined(CONFIG_CURSES)
9661 curses_display_init(ds
, full_screen
);
9665 #if defined(CONFIG_SDL)
9666 sdl_display_init(ds
, full_screen
, no_frame
);
9667 #elif defined(CONFIG_COCOA)
9668 cocoa_display_init(ds
, full_screen
);
9670 dumb_display_init(ds
);
9675 /* must be after terminal init, SDL library changes signal handlers */
9679 /* Maintain compatibility with multiple stdio monitors */
9680 if (!strcmp(monitor_device
,"stdio")) {
9681 for (i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9682 const char *devname
= serial_devices
[i
];
9683 if (devname
&& !strcmp(devname
,"mon:stdio")) {
9684 monitor_device
= NULL
;
9686 } else if (devname
&& !strcmp(devname
,"stdio")) {
9687 monitor_device
= NULL
;
9688 serial_devices
[i
] = "mon:stdio";
9693 if (monitor_device
) {
9694 monitor_hd
= qemu_chr_open(monitor_device
);
9696 fprintf(stderr
, "qemu: could not open monitor device '%s'\n", monitor_device
);
9699 monitor_init(monitor_hd
, !nographic
);
9702 for(i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9703 const char *devname
= serial_devices
[i
];
9704 if (devname
&& strcmp(devname
, "none")) {
9705 serial_hds
[i
] = qemu_chr_open(devname
);
9706 if (!serial_hds
[i
]) {
9707 fprintf(stderr
, "qemu: could not open serial device '%s'\n",
9711 if (strstart(devname
, "vc", 0))
9712 qemu_chr_printf(serial_hds
[i
], "serial%d console\r\n", i
);
9716 for(i
= 0; i
< MAX_PARALLEL_PORTS
; i
++) {
9717 const char *devname
= parallel_devices
[i
];
9718 if (devname
&& strcmp(devname
, "none")) {
9719 parallel_hds
[i
] = qemu_chr_open(devname
);
9720 if (!parallel_hds
[i
]) {
9721 fprintf(stderr
, "qemu: could not open parallel device '%s'\n",
9725 if (strstart(devname
, "vc", 0))
9726 qemu_chr_printf(parallel_hds
[i
], "parallel%d console\r\n", i
);
9730 machine
->init(ram_size
, vga_ram_size
, boot_devices
, ds
,
9731 kernel_filename
, kernel_cmdline
, initrd_filename
, cpu_model
);
9733 /* init USB devices */
9735 for(i
= 0; i
< usb_devices_index
; i
++) {
9736 if (usb_device_add(usb_devices
[i
]) < 0) {
9737 fprintf(stderr
, "Warning: could not add USB device %s\n",
9743 if (display_state
.dpy_refresh
) {
9744 display_state
.gui_timer
= qemu_new_timer(rt_clock
, gui_update
, &display_state
);
9745 qemu_mod_timer(display_state
.gui_timer
, qemu_get_clock(rt_clock
));
9748 #ifdef CONFIG_GDBSTUB
9750 /* XXX: use standard host:port notation and modify options
9752 if (gdbserver_start(gdbstub_port
) < 0) {
9753 fprintf(stderr
, "qemu: could not open gdbstub device on port '%s'\n",
9764 autostart
= 0; /* fixme how to deal with -daemonize */
9765 qemu_start_incoming_migration(incoming
);
9769 /* XXX: simplify init */
9782 len
= write(fds
[1], &status
, 1);
9783 if (len
== -1 && (errno
== EINTR
))
9790 TFR(fd
= open("/dev/null", O_RDWR
));
9804 #if !defined(_WIN32)
9805 /* close network clients */
9806 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9807 VLANClientState
*vc
;
9809 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
9810 if (vc
->fd_read
== tap_receive
) {
9812 TAPState
*s
= vc
->opaque
;
9814 if (sscanf(vc
->info_str
, "tap: ifname=%63s ", ifname
) == 1 &&
9816 launch_script(s
->down_script
, ifname
, s
->fd
);
9818 #if defined(CONFIG_VDE)
9819 if (vc
->fd_read
== vde_from_qemu
) {
9820 VDEState
*s
= vc
->opaque
;