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"
51 #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__)
739 if (clock_gettime(CLOCK_MONOTONIC
, &ts
) == 0) {
746 static int64_t get_clock(void)
748 #if defined(__linux__)
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
);
3368 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
);
3370 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
);
3372 int parse_host_src_port(struct sockaddr_in
*haddr
,
3373 struct sockaddr_in
*saddr
,
3376 static CharDriverState
*qemu_chr_open_udp(const char *def
)
3378 CharDriverState
*chr
= NULL
;
3379 NetCharDriver
*s
= NULL
;
3381 struct sockaddr_in saddr
;
3383 chr
= qemu_mallocz(sizeof(CharDriverState
));
3386 s
= qemu_mallocz(sizeof(NetCharDriver
));
3390 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
3392 perror("socket(PF_INET, SOCK_DGRAM)");
3396 if (parse_host_src_port(&s
->daddr
, &saddr
, def
) < 0) {
3397 printf("Could not parse: %s\n", def
);
3401 if (bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
)) < 0)
3411 chr
->chr_write
= udp_chr_write
;
3412 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
3425 /***********************************************************/
3426 /* TCP Net console */
3437 static void tcp_chr_accept(void *opaque
);
3439 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3441 TCPCharDriver
*s
= chr
->opaque
;
3443 return send_all(s
->fd
, buf
, len
);
3445 /* XXX: indicate an error ? */
3450 static int tcp_chr_read_poll(void *opaque
)
3452 CharDriverState
*chr
= opaque
;
3453 TCPCharDriver
*s
= chr
->opaque
;
3456 s
->max_size
= qemu_chr_can_read(chr
);
3461 #define IAC_BREAK 243
3462 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
3464 uint8_t *buf
, int *size
)
3466 /* Handle any telnet client's basic IAC options to satisfy char by
3467 * char mode with no echo. All IAC options will be removed from
3468 * the buf and the do_telnetopt variable will be used to track the
3469 * state of the width of the IAC information.
3471 * IAC commands come in sets of 3 bytes with the exception of the
3472 * "IAC BREAK" command and the double IAC.
3478 for (i
= 0; i
< *size
; i
++) {
3479 if (s
->do_telnetopt
> 1) {
3480 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
3481 /* Double IAC means send an IAC */
3485 s
->do_telnetopt
= 1;
3487 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
3488 /* Handle IAC break commands by sending a serial break */
3489 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
3494 if (s
->do_telnetopt
>= 4) {
3495 s
->do_telnetopt
= 1;
3498 if ((unsigned char)buf
[i
] == IAC
) {
3499 s
->do_telnetopt
= 2;
3510 static void tcp_chr_read(void *opaque
)
3512 CharDriverState
*chr
= opaque
;
3513 TCPCharDriver
*s
= chr
->opaque
;
3517 if (!s
->connected
|| s
->max_size
<= 0)
3520 if (len
> s
->max_size
)
3522 size
= recv(s
->fd
, buf
, len
, 0);
3524 /* connection closed */
3526 if (s
->listen_fd
>= 0) {
3527 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3529 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
3532 } else if (size
> 0) {
3533 if (s
->do_telnetopt
)
3534 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
3536 qemu_chr_read(chr
, buf
, size
);
3540 static void tcp_chr_connect(void *opaque
)
3542 CharDriverState
*chr
= opaque
;
3543 TCPCharDriver
*s
= chr
->opaque
;
3546 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
3547 tcp_chr_read
, NULL
, chr
);
3548 qemu_chr_reset(chr
);
3551 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
3552 static void tcp_chr_telnet_init(int fd
)
3555 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
3556 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3557 send(fd
, (char *)buf
, 3, 0);
3558 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3559 send(fd
, (char *)buf
, 3, 0);
3560 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3561 send(fd
, (char *)buf
, 3, 0);
3562 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3563 send(fd
, (char *)buf
, 3, 0);
3566 static void socket_set_nodelay(int fd
)
3569 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, (char *)&val
, sizeof(val
));
3572 static void tcp_chr_accept(void *opaque
)
3574 CharDriverState
*chr
= opaque
;
3575 TCPCharDriver
*s
= chr
->opaque
;
3576 struct sockaddr_in saddr
;
3578 struct sockaddr_un uaddr
;
3580 struct sockaddr
*addr
;
3587 len
= sizeof(uaddr
);
3588 addr
= (struct sockaddr
*)&uaddr
;
3592 len
= sizeof(saddr
);
3593 addr
= (struct sockaddr
*)&saddr
;
3595 fd
= accept(s
->listen_fd
, addr
, &len
);
3596 if (fd
< 0 && errno
!= EINTR
) {
3598 } else if (fd
>= 0) {
3599 if (s
->do_telnetopt
)
3600 tcp_chr_telnet_init(fd
);
3604 socket_set_nonblock(fd
);
3606 socket_set_nodelay(fd
);
3608 qemu_set_fd_handler(s
->listen_fd
, NULL
, NULL
, NULL
);
3609 tcp_chr_connect(chr
);
3612 static void tcp_chr_close(CharDriverState
*chr
)
3614 TCPCharDriver
*s
= chr
->opaque
;
3617 if (s
->listen_fd
>= 0)
3618 closesocket(s
->listen_fd
);
3622 static CharDriverState
*qemu_chr_open_tcp(const char *host_str
,
3626 CharDriverState
*chr
= NULL
;
3627 TCPCharDriver
*s
= NULL
;
3628 int fd
= -1, ret
, err
, val
;
3630 int is_waitconnect
= 1;
3633 struct sockaddr_in saddr
;
3635 struct sockaddr_un uaddr
;
3637 struct sockaddr
*addr
;
3642 addr
= (struct sockaddr
*)&uaddr
;
3643 addrlen
= sizeof(uaddr
);
3644 if (parse_unix_path(&uaddr
, host_str
) < 0)
3649 addr
= (struct sockaddr
*)&saddr
;
3650 addrlen
= sizeof(saddr
);
3651 if (parse_host_port(&saddr
, host_str
) < 0)
3656 while((ptr
= strchr(ptr
,','))) {
3658 if (!strncmp(ptr
,"server",6)) {
3660 } else if (!strncmp(ptr
,"nowait",6)) {
3662 } else if (!strncmp(ptr
,"nodelay",6)) {
3665 printf("Unknown option: %s\n", ptr
);
3672 chr
= qemu_mallocz(sizeof(CharDriverState
));
3675 s
= qemu_mallocz(sizeof(TCPCharDriver
));
3681 fd
= socket(PF_UNIX
, SOCK_STREAM
, 0);
3684 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
3689 if (!is_waitconnect
)
3690 socket_set_nonblock(fd
);
3695 s
->is_unix
= is_unix
;
3696 s
->do_nodelay
= do_nodelay
&& !is_unix
;
3699 chr
->chr_write
= tcp_chr_write
;
3700 chr
->chr_close
= tcp_chr_close
;
3703 /* allow fast reuse */
3707 pstrcpy(path
, sizeof(path
), uaddr
.sun_path
);
3713 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
3716 ret
= bind(fd
, addr
, addrlen
);
3720 ret
= listen(fd
, 0);
3725 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3727 s
->do_telnetopt
= 1;
3730 ret
= connect(fd
, addr
, addrlen
);
3732 err
= socket_error();
3733 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
3734 } else if (err
== EINPROGRESS
) {
3737 } else if (err
== WSAEALREADY
) {
3749 socket_set_nodelay(fd
);
3751 tcp_chr_connect(chr
);
3753 qemu_set_fd_handler(s
->fd
, NULL
, tcp_chr_connect
, chr
);
3756 if (is_listen
&& is_waitconnect
) {
3757 printf("QEMU waiting for connection on: %s\n", host_str
);
3758 tcp_chr_accept(chr
);
3759 socket_set_nonblock(s
->listen_fd
);
3771 CharDriverState
*qemu_chr_open(const char *filename
)
3775 if (!strcmp(filename
, "vc")) {
3776 return text_console_init(&display_state
, 0);
3777 } else if (strstart(filename
, "vc:", &p
)) {
3778 return text_console_init(&display_state
, p
);
3779 } else if (!strcmp(filename
, "null")) {
3780 return qemu_chr_open_null();
3782 if (strstart(filename
, "tcp:", &p
)) {
3783 return qemu_chr_open_tcp(p
, 0, 0);
3785 if (strstart(filename
, "telnet:", &p
)) {
3786 return qemu_chr_open_tcp(p
, 1, 0);
3788 if (strstart(filename
, "udp:", &p
)) {
3789 return qemu_chr_open_udp(p
);
3791 if (strstart(filename
, "mon:", &p
)) {
3792 CharDriverState
*drv
= qemu_chr_open(p
);
3794 drv
= qemu_chr_open_mux(drv
);
3795 monitor_init(drv
, !nographic
);
3798 printf("Unable to open driver: %s\n", p
);
3802 if (strstart(filename
, "unix:", &p
)) {
3803 return qemu_chr_open_tcp(p
, 0, 1);
3804 } else if (strstart(filename
, "file:", &p
)) {
3805 return qemu_chr_open_file_out(p
);
3806 } else if (strstart(filename
, "pipe:", &p
)) {
3807 return qemu_chr_open_pipe(p
);
3808 } else if (!strcmp(filename
, "pty")) {
3809 return qemu_chr_open_pty();
3810 } else if (!strcmp(filename
, "stdio")) {
3811 return qemu_chr_open_stdio();
3813 #if defined(__linux__)
3814 if (strstart(filename
, "/dev/parport", NULL
)) {
3815 return qemu_chr_open_pp(filename
);
3818 #if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
3819 || defined(__NetBSD__) || defined(__OpenBSD__)
3820 if (strstart(filename
, "/dev/", NULL
)) {
3821 return qemu_chr_open_tty(filename
);
3825 if (strstart(filename
, "COM", NULL
)) {
3826 return qemu_chr_open_win(filename
);
3828 if (strstart(filename
, "pipe:", &p
)) {
3829 return qemu_chr_open_win_pipe(p
);
3831 if (strstart(filename
, "con:", NULL
)) {
3832 return qemu_chr_open_win_con(filename
);
3834 if (strstart(filename
, "file:", &p
)) {
3835 return qemu_chr_open_win_file_out(p
);
3838 #ifdef CONFIG_BRLAPI
3839 if (!strcmp(filename
, "braille")) {
3840 return chr_baum_init();
3848 void qemu_chr_close(CharDriverState
*chr
)
3851 chr
->chr_close(chr
);
3855 /***********************************************************/
3856 /* network device redirectors */
3858 #if defined(DEBUG_NET) || defined(DEBUG_SLIRP)
3859 static void hex_dump(FILE *f
, const uint8_t *buf
, int size
)
3863 for(i
=0;i
<size
;i
+=16) {
3867 fprintf(f
, "%08x ", i
);
3870 fprintf(f
, " %02x", buf
[i
+j
]);
3875 for(j
=0;j
<len
;j
++) {
3877 if (c
< ' ' || c
> '~')
3879 fprintf(f
, "%c", c
);
3886 static int parse_macaddr(uint8_t *macaddr
, const char *p
)
3893 offset
= strtol(p
, &last_char
, 0);
3894 if (0 == errno
&& '\0' == *last_char
&&
3895 offset
>= 0 && offset
<= 0xFFFFFF) {
3896 macaddr
[3] = (offset
& 0xFF0000) >> 16;
3897 macaddr
[4] = (offset
& 0xFF00) >> 8;
3898 macaddr
[5] = offset
& 0xFF;
3901 for(i
= 0; i
< 6; i
++) {
3902 macaddr
[i
] = strtol(p
, (char **)&p
, 16);
3907 if (*p
!= ':' && *p
!= '-')
3918 static int get_str_sep(char *buf
, int buf_size
, const char **pp
, int sep
)
3923 p1
= strchr(p
, sep
);
3929 if (len
> buf_size
- 1)
3931 memcpy(buf
, p
, len
);
3938 int parse_host_src_port(struct sockaddr_in
*haddr
,
3939 struct sockaddr_in
*saddr
,
3940 const char *input_str
)
3942 char *str
= strdup(input_str
);
3943 char *host_str
= str
;
3945 const char *src_str2
;
3949 * Chop off any extra arguments at the end of the string which
3950 * would start with a comma, then fill in the src port information
3951 * if it was provided else use the "any address" and "any port".
3953 if ((ptr
= strchr(str
,',')))
3956 if ((src_str
= strchr(input_str
,'@'))) {
3961 if (parse_host_port(haddr
, host_str
) < 0)
3965 if (!src_str
|| *src_str
== '\0')
3968 if (parse_host_port(saddr
, src_str2
) < 0)
3979 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
)
3987 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3989 saddr
->sin_family
= AF_INET
;
3990 if (buf
[0] == '\0') {
3991 saddr
->sin_addr
.s_addr
= 0;
3993 if (isdigit(buf
[0])) {
3994 if (!inet_aton(buf
, &saddr
->sin_addr
))
3997 if ((he
= gethostbyname(buf
)) == NULL
)
3999 saddr
->sin_addr
= *(struct in_addr
*)he
->h_addr
;
4002 port
= strtol(p
, (char **)&r
, 0);
4005 saddr
->sin_port
= htons(port
);
4010 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
)
4015 len
= MIN(108, strlen(str
));
4016 p
= strchr(str
, ',');
4018 len
= MIN(len
, p
- str
);
4020 memset(uaddr
, 0, sizeof(*uaddr
));
4022 uaddr
->sun_family
= AF_UNIX
;
4023 memcpy(uaddr
->sun_path
, str
, len
);
4029 /* find or alloc a new VLAN */
4030 VLANState
*qemu_find_vlan(int id
)
4032 VLANState
**pvlan
, *vlan
;
4033 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
4037 vlan
= qemu_mallocz(sizeof(VLANState
));
4042 pvlan
= &first_vlan
;
4043 while (*pvlan
!= NULL
)
4044 pvlan
= &(*pvlan
)->next
;
4049 VLANClientState
*qemu_new_vlan_client(VLANState
*vlan
,
4050 IOReadHandler
*fd_read
,
4051 IOCanRWHandler
*fd_can_read
,
4054 VLANClientState
*vc
, **pvc
;
4055 vc
= qemu_mallocz(sizeof(VLANClientState
));
4058 vc
->fd_read
= fd_read
;
4059 vc
->fd_can_read
= fd_can_read
;
4060 vc
->opaque
= opaque
;
4064 pvc
= &vlan
->first_client
;
4065 while (*pvc
!= NULL
)
4066 pvc
= &(*pvc
)->next
;
4071 void qemu_del_vlan_client(VLANClientState
*vc
)
4073 VLANClientState
**pvc
= &vc
->vlan
->first_client
;
4075 while (*pvc
!= NULL
)
4081 pvc
= &(*pvc
)->next
;
4084 int qemu_can_send_packet(VLANClientState
*vc1
)
4086 VLANState
*vlan
= vc1
->vlan
;
4087 VLANClientState
*vc
;
4089 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4091 if (vc
->fd_can_read
&& vc
->fd_can_read(vc
->opaque
))
4098 void qemu_send_packet(VLANClientState
*vc1
, const uint8_t *buf
, int size
)
4100 VLANState
*vlan
= vc1
->vlan
;
4101 VLANClientState
*vc
;
4104 printf("vlan %d send:\n", vlan
->id
);
4105 hex_dump(stdout
, buf
, size
);
4107 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4109 vc
->fd_read(vc
->opaque
, buf
, size
);
4114 #if defined(CONFIG_SLIRP)
4116 /* slirp network adapter */
4118 static int slirp_inited
;
4119 static VLANClientState
*slirp_vc
;
4121 int slirp_can_output(void)
4123 return !slirp_vc
|| qemu_can_send_packet(slirp_vc
);
4126 void slirp_output(const uint8_t *pkt
, int pkt_len
)
4129 printf("slirp output:\n");
4130 hex_dump(stdout
, pkt
, pkt_len
);
4134 qemu_send_packet(slirp_vc
, pkt
, pkt_len
);
4137 static void slirp_receive(void *opaque
, const uint8_t *buf
, int size
)
4140 printf("slirp input:\n");
4141 hex_dump(stdout
, buf
, size
);
4143 slirp_input(buf
, size
);
4146 static int net_slirp_init(VLANState
*vlan
)
4148 if (!slirp_inited
) {
4152 slirp_vc
= qemu_new_vlan_client(vlan
,
4153 slirp_receive
, NULL
, NULL
);
4154 snprintf(slirp_vc
->info_str
, sizeof(slirp_vc
->info_str
), "user redirector");
4158 static void net_slirp_redir(const char *redir_str
)
4163 struct in_addr guest_addr
;
4164 int host_port
, guest_port
;
4166 if (!slirp_inited
) {
4172 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4174 if (!strcmp(buf
, "tcp")) {
4176 } else if (!strcmp(buf
, "udp")) {
4182 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4184 host_port
= strtol(buf
, &r
, 0);
4188 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4190 if (buf
[0] == '\0') {
4191 pstrcpy(buf
, sizeof(buf
), "10.0.2.15");
4193 if (!inet_aton(buf
, &guest_addr
))
4196 guest_port
= strtol(p
, &r
, 0);
4200 if (slirp_redir(is_udp
, host_port
, guest_addr
, guest_port
) < 0) {
4201 fprintf(stderr
, "qemu: could not set up redirection\n");
4206 fprintf(stderr
, "qemu: syntax: -redir [tcp|udp]:host-port:[guest-host]:guest-port\n");
4212 static char smb_dir
[1024];
4214 static void erase_dir(char *dir_name
)
4218 char filename
[1024];
4220 /* erase all the files in the directory */
4221 if ((d
= opendir(dir_name
)) != 0) {
4226 if (strcmp(de
->d_name
, ".") != 0 &&
4227 strcmp(de
->d_name
, "..") != 0) {
4228 snprintf(filename
, sizeof(filename
), "%s/%s",
4229 smb_dir
, de
->d_name
);
4230 if (unlink(filename
) != 0) /* is it a directory? */
4231 erase_dir(filename
);
4239 /* automatic user mode samba server configuration */
4240 static void smb_exit(void)
4245 /* automatic user mode samba server configuration */
4246 static void net_slirp_smb(const char *exported_dir
)
4248 char smb_conf
[1024];
4249 char smb_cmdline
[1024];
4252 if (!slirp_inited
) {
4257 /* XXX: better tmp dir construction */
4258 snprintf(smb_dir
, sizeof(smb_dir
), "/tmp/qemu-smb.%d", getpid());
4259 if (mkdir(smb_dir
, 0700) < 0) {
4260 fprintf(stderr
, "qemu: could not create samba server dir '%s'\n", smb_dir
);
4263 snprintf(smb_conf
, sizeof(smb_conf
), "%s/%s", smb_dir
, "smb.conf");
4265 f
= fopen(smb_conf
, "w");
4267 fprintf(stderr
, "qemu: could not create samba server configuration file '%s'\n", smb_conf
);
4274 "socket address=127.0.0.1\n"
4275 "pid directory=%s\n"
4276 "lock directory=%s\n"
4277 "log file=%s/log.smbd\n"
4278 "smb passwd file=%s/smbpasswd\n"
4279 "security = share\n"
4294 snprintf(smb_cmdline
, sizeof(smb_cmdline
), "%s -s %s",
4295 SMBD_COMMAND
, smb_conf
);
4297 slirp_add_exec(0, smb_cmdline
, 4, 139);
4300 #endif /* !defined(_WIN32) */
4301 void do_info_slirp(void)
4306 #endif /* CONFIG_SLIRP */
4308 #if !defined(_WIN32)
4310 typedef struct TAPState
{
4311 VLANClientState
*vc
;
4313 char down_script
[1024];
4316 static void tap_receive(void *opaque
, const uint8_t *buf
, int size
)
4318 TAPState
*s
= opaque
;
4321 ret
= write(s
->fd
, buf
, size
);
4322 if (ret
< 0 && (errno
== EINTR
|| errno
== EAGAIN
)) {
4329 static void tap_send(void *opaque
)
4331 TAPState
*s
= opaque
;
4338 sbuf
.maxlen
= sizeof(buf
);
4340 size
= getmsg(s
->fd
, NULL
, &sbuf
, &f
) >=0 ? sbuf
.len
: -1;
4342 size
= read(s
->fd
, buf
, sizeof(buf
));
4345 qemu_send_packet(s
->vc
, buf
, size
);
4351 static TAPState
*net_tap_fd_init(VLANState
*vlan
, int fd
)
4355 s
= qemu_mallocz(sizeof(TAPState
));
4359 s
->vc
= qemu_new_vlan_client(vlan
, tap_receive
, NULL
, s
);
4360 qemu_set_fd_handler(s
->fd
, tap_send
, NULL
, s
);
4361 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "tap: fd=%d", fd
);
4365 #if defined (_BSD) || defined (__FreeBSD_kernel__)
4366 static int tap_open(char *ifname
, int ifname_size
)
4372 TFR(fd
= open("/dev/tap", O_RDWR
));
4374 fprintf(stderr
, "warning: could not open /dev/tap: no virtual network emulation\n");
4379 dev
= devname(s
.st_rdev
, S_IFCHR
);
4380 pstrcpy(ifname
, ifname_size
, dev
);
4382 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4385 #elif defined(__sun__)
4386 #define TUNNEWPPA (('T'<<16) | 0x0001)
4388 * Allocate TAP device, returns opened fd.
4389 * Stores dev name in the first arg(must be large enough).
4391 int tap_alloc(char *dev
, size_t dev_size
)
4393 int tap_fd
, if_fd
, ppa
= -1;
4394 static int ip_fd
= 0;
4397 static int arp_fd
= 0;
4398 int ip_muxid
, arp_muxid
;
4399 struct strioctl strioc_if
, strioc_ppa
;
4400 int link_type
= I_PLINK
;;
4402 char actual_name
[32] = "";
4404 memset(&ifr
, 0x0, sizeof(ifr
));
4408 while( *ptr
&& !isdigit((int)*ptr
) ) ptr
++;
4412 /* Check if IP device was opened */
4416 TFR(ip_fd
= open("/dev/udp", O_RDWR
, 0));
4418 syslog(LOG_ERR
, "Can't open /dev/ip (actually /dev/udp)");
4422 TFR(tap_fd
= open("/dev/tap", O_RDWR
, 0));
4424 syslog(LOG_ERR
, "Can't open /dev/tap");
4428 /* Assign a new PPA and get its unit number. */
4429 strioc_ppa
.ic_cmd
= TUNNEWPPA
;
4430 strioc_ppa
.ic_timout
= 0;
4431 strioc_ppa
.ic_len
= sizeof(ppa
);
4432 strioc_ppa
.ic_dp
= (char *)&ppa
;
4433 if ((ppa
= ioctl (tap_fd
, I_STR
, &strioc_ppa
)) < 0)
4434 syslog (LOG_ERR
, "Can't assign new interface");
4436 TFR(if_fd
= open("/dev/tap", O_RDWR
, 0));
4438 syslog(LOG_ERR
, "Can't open /dev/tap (2)");
4441 if(ioctl(if_fd
, I_PUSH
, "ip") < 0){
4442 syslog(LOG_ERR
, "Can't push IP module");
4446 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) < 0)
4447 syslog(LOG_ERR
, "Can't get flags\n");
4449 snprintf (actual_name
, 32, "tap%d", ppa
);
4450 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4453 /* Assign ppa according to the unit number returned by tun device */
4455 if (ioctl (if_fd
, SIOCSLIFNAME
, &ifr
) < 0)
4456 syslog (LOG_ERR
, "Can't set PPA %d", ppa
);
4457 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) <0)
4458 syslog (LOG_ERR
, "Can't get flags\n");
4459 /* Push arp module to if_fd */
4460 if (ioctl (if_fd
, I_PUSH
, "arp") < 0)
4461 syslog (LOG_ERR
, "Can't push ARP module (2)");
4463 /* Push arp module to ip_fd */
4464 if (ioctl (ip_fd
, I_POP
, NULL
) < 0)
4465 syslog (LOG_ERR
, "I_POP failed\n");
4466 if (ioctl (ip_fd
, I_PUSH
, "arp") < 0)
4467 syslog (LOG_ERR
, "Can't push ARP module (3)\n");
4469 TFR(arp_fd
= open ("/dev/tap", O_RDWR
, 0));
4471 syslog (LOG_ERR
, "Can't open %s\n", "/dev/tap");
4473 /* Set ifname to arp */
4474 strioc_if
.ic_cmd
= SIOCSLIFNAME
;
4475 strioc_if
.ic_timout
= 0;
4476 strioc_if
.ic_len
= sizeof(ifr
);
4477 strioc_if
.ic_dp
= (char *)&ifr
;
4478 if (ioctl(arp_fd
, I_STR
, &strioc_if
) < 0){
4479 syslog (LOG_ERR
, "Can't set ifname to arp\n");
4482 if((ip_muxid
= ioctl(ip_fd
, I_LINK
, if_fd
)) < 0){
4483 syslog(LOG_ERR
, "Can't link TAP device to IP");
4487 if ((arp_muxid
= ioctl (ip_fd
, link_type
, arp_fd
)) < 0)
4488 syslog (LOG_ERR
, "Can't link TAP device to ARP");
4492 memset(&ifr
, 0x0, sizeof(ifr
));
4493 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4494 ifr
.lifr_ip_muxid
= ip_muxid
;
4495 ifr
.lifr_arp_muxid
= arp_muxid
;
4497 if (ioctl (ip_fd
, SIOCSLIFMUXID
, &ifr
) < 0)
4499 ioctl (ip_fd
, I_PUNLINK
, arp_muxid
);
4500 ioctl (ip_fd
, I_PUNLINK
, ip_muxid
);
4501 syslog (LOG_ERR
, "Can't set multiplexor id");
4504 snprintf(dev
, dev_size
, "tap%d", ppa
);
4508 static int tap_open(char *ifname
, int ifname_size
)
4512 if( (fd
= tap_alloc(dev
, sizeof(dev
))) < 0 ){
4513 fprintf(stderr
, "Cannot allocate TAP device\n");
4516 pstrcpy(ifname
, ifname_size
, dev
);
4517 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4521 static int tap_open(char *ifname
, int ifname_size
)
4526 TFR(fd
= open("/dev/net/tun", O_RDWR
));
4528 fprintf(stderr
, "warning: could not open /dev/net/tun: no virtual network emulation\n");
4531 memset(&ifr
, 0, sizeof(ifr
));
4532 ifr
.ifr_flags
= IFF_TAP
| IFF_NO_PI
;
4533 if (ifname
[0] != '\0')
4534 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, ifname
);
4536 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, "tap%d");
4537 ret
= ioctl(fd
, TUNSETIFF
, (void *) &ifr
);
4539 fprintf(stderr
, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
4543 pstrcpy(ifname
, ifname_size
, ifr
.ifr_name
);
4544 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4549 static int launch_script(const char *setup_script
, const char *ifname
, int fd
)
4555 /* try to launch network script */
4559 int open_max
= sysconf (_SC_OPEN_MAX
), i
;
4560 for (i
= 0; i
< open_max
; i
++)
4561 if (i
!= STDIN_FILENO
&&
4562 i
!= STDOUT_FILENO
&&
4563 i
!= STDERR_FILENO
&&
4568 *parg
++ = (char *)setup_script
;
4569 *parg
++ = (char *)ifname
;
4571 execv(setup_script
, args
);
4574 while (waitpid(pid
, &status
, 0) != pid
);
4575 if (!WIFEXITED(status
) ||
4576 WEXITSTATUS(status
) != 0) {
4577 fprintf(stderr
, "%s: could not launch network script\n",
4585 static int net_tap_init(VLANState
*vlan
, const char *ifname1
,
4586 const char *setup_script
, const char *down_script
)
4592 if (ifname1
!= NULL
)
4593 pstrcpy(ifname
, sizeof(ifname
), ifname1
);
4596 TFR(fd
= tap_open(ifname
, sizeof(ifname
)));
4600 if (!setup_script
|| !strcmp(setup_script
, "no"))
4602 if (setup_script
[0] != '\0') {
4603 if (launch_script(setup_script
, ifname
, fd
))
4606 s
= net_tap_fd_init(vlan
, fd
);
4609 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4610 "tap: ifname=%s setup_script=%s", ifname
, setup_script
);
4611 if (down_script
&& strcmp(down_script
, "no"))
4612 snprintf(s
->down_script
, sizeof(s
->down_script
), "%s", down_script
);
4616 #endif /* !_WIN32 */
4618 #if defined(CONFIG_VDE)
4619 typedef struct VDEState
{
4620 VLANClientState
*vc
;
4624 static void vde_to_qemu(void *opaque
)
4626 VDEState
*s
= opaque
;
4630 size
= vde_recv(s
->vde
, buf
, sizeof(buf
), 0);
4632 qemu_send_packet(s
->vc
, buf
, size
);
4636 static void vde_from_qemu(void *opaque
, const uint8_t *buf
, int size
)
4638 VDEState
*s
= opaque
;
4641 ret
= vde_send(s
->vde
, buf
, size
, 0);
4642 if (ret
< 0 && errno
== EINTR
) {
4649 static int net_vde_init(VLANState
*vlan
, const char *sock
, int port
,
4650 const char *group
, int mode
)
4653 char *init_group
= strlen(group
) ? (char *)group
: NULL
;
4654 char *init_sock
= strlen(sock
) ? (char *)sock
: NULL
;
4656 struct vde_open_args args
= {
4658 .group
= init_group
,
4662 s
= qemu_mallocz(sizeof(VDEState
));
4665 s
->vde
= vde_open(init_sock
, "QEMU", &args
);
4670 s
->vc
= qemu_new_vlan_client(vlan
, vde_from_qemu
, NULL
, s
);
4671 qemu_set_fd_handler(vde_datafd(s
->vde
), vde_to_qemu
, NULL
, s
);
4672 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "vde: sock=%s fd=%d",
4673 sock
, vde_datafd(s
->vde
));
4678 /* network connection */
4679 typedef struct NetSocketState
{
4680 VLANClientState
*vc
;
4682 int state
; /* 0 = getting length, 1 = getting data */
4686 struct sockaddr_in dgram_dst
; /* contains inet host and port destination iff connectionless (SOCK_DGRAM) */
4689 typedef struct NetSocketListenState
{
4692 } NetSocketListenState
;
4694 /* XXX: we consider we can send the whole packet without blocking */
4695 static void net_socket_receive(void *opaque
, const uint8_t *buf
, int size
)
4697 NetSocketState
*s
= opaque
;
4701 send_all(s
->fd
, (const uint8_t *)&len
, sizeof(len
));
4702 send_all(s
->fd
, buf
, size
);
4705 static void net_socket_receive_dgram(void *opaque
, const uint8_t *buf
, int size
)
4707 NetSocketState
*s
= opaque
;
4708 sendto(s
->fd
, buf
, size
, 0,
4709 (struct sockaddr
*)&s
->dgram_dst
, sizeof(s
->dgram_dst
));
4712 static void net_socket_send(void *opaque
)
4714 NetSocketState
*s
= opaque
;
4719 size
= recv(s
->fd
, buf1
, sizeof(buf1
), 0);
4721 err
= socket_error();
4722 if (err
!= EWOULDBLOCK
)
4724 } else if (size
== 0) {
4725 /* end of connection */
4727 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4733 /* reassemble a packet from the network */
4739 memcpy(s
->buf
+ s
->index
, buf
, l
);
4743 if (s
->index
== 4) {
4745 s
->packet_len
= ntohl(*(uint32_t *)s
->buf
);
4751 l
= s
->packet_len
- s
->index
;
4754 memcpy(s
->buf
+ s
->index
, buf
, l
);
4758 if (s
->index
>= s
->packet_len
) {
4759 qemu_send_packet(s
->vc
, s
->buf
, s
->packet_len
);
4768 static void net_socket_send_dgram(void *opaque
)
4770 NetSocketState
*s
= opaque
;
4773 size
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
4777 /* end of connection */
4778 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4781 qemu_send_packet(s
->vc
, s
->buf
, size
);
4784 static int net_socket_mcast_create(struct sockaddr_in
*mcastaddr
)
4789 if (!IN_MULTICAST(ntohl(mcastaddr
->sin_addr
.s_addr
))) {
4790 fprintf(stderr
, "qemu: error: specified mcastaddr \"%s\" (0x%08x) does not contain a multicast address\n",
4791 inet_ntoa(mcastaddr
->sin_addr
),
4792 (int)ntohl(mcastaddr
->sin_addr
.s_addr
));
4796 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
4798 perror("socket(PF_INET, SOCK_DGRAM)");
4803 ret
=setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
,
4804 (const char *)&val
, sizeof(val
));
4806 perror("setsockopt(SOL_SOCKET, SO_REUSEADDR)");
4810 ret
= bind(fd
, (struct sockaddr
*)mcastaddr
, sizeof(*mcastaddr
));
4816 /* Add host to multicast group */
4817 imr
.imr_multiaddr
= mcastaddr
->sin_addr
;
4818 imr
.imr_interface
.s_addr
= htonl(INADDR_ANY
);
4820 ret
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
,
4821 (const char *)&imr
, sizeof(struct ip_mreq
));
4823 perror("setsockopt(IP_ADD_MEMBERSHIP)");
4827 /* Force mcast msgs to loopback (eg. several QEMUs in same host */
4829 ret
=setsockopt(fd
, IPPROTO_IP
, IP_MULTICAST_LOOP
,
4830 (const char *)&val
, sizeof(val
));
4832 perror("setsockopt(SOL_IP, IP_MULTICAST_LOOP)");
4836 socket_set_nonblock(fd
);
4844 static NetSocketState
*net_socket_fd_init_dgram(VLANState
*vlan
, int fd
,
4847 struct sockaddr_in saddr
;
4849 socklen_t saddr_len
;
4852 /* fd passed: multicast: "learn" dgram_dst address from bound address and save it
4853 * Because this may be "shared" socket from a "master" process, datagrams would be recv()
4854 * by ONLY ONE process: we must "clone" this dgram socket --jjo
4858 if (getsockname(fd
, (struct sockaddr
*) &saddr
, &saddr_len
) == 0) {
4860 if (saddr
.sin_addr
.s_addr
==0) {
4861 fprintf(stderr
, "qemu: error: init_dgram: fd=%d unbound, cannot setup multicast dst addr\n",
4865 /* clone dgram socket */
4866 newfd
= net_socket_mcast_create(&saddr
);
4868 /* error already reported by net_socket_mcast_create() */
4872 /* clone newfd to fd, close newfd */
4877 fprintf(stderr
, "qemu: error: init_dgram: fd=%d failed getsockname(): %s\n",
4878 fd
, strerror(errno
));
4883 s
= qemu_mallocz(sizeof(NetSocketState
));
4888 s
->vc
= qemu_new_vlan_client(vlan
, net_socket_receive_dgram
, NULL
, s
);
4889 qemu_set_fd_handler(s
->fd
, net_socket_send_dgram
, NULL
, s
);
4891 /* mcast: save bound address as dst */
4892 if (is_connected
) s
->dgram_dst
=saddr
;
4894 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4895 "socket: fd=%d (%s mcast=%s:%d)",
4896 fd
, is_connected
? "cloned" : "",
4897 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4901 static void net_socket_connect(void *opaque
)
4903 NetSocketState
*s
= opaque
;
4904 qemu_set_fd_handler(s
->fd
, net_socket_send
, NULL
, s
);
4907 static NetSocketState
*net_socket_fd_init_stream(VLANState
*vlan
, int fd
,
4911 s
= qemu_mallocz(sizeof(NetSocketState
));
4915 s
->vc
= qemu_new_vlan_client(vlan
,
4916 net_socket_receive
, NULL
, s
);
4917 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4918 "socket: fd=%d", fd
);
4920 net_socket_connect(s
);
4922 qemu_set_fd_handler(s
->fd
, NULL
, net_socket_connect
, s
);
4927 static NetSocketState
*net_socket_fd_init(VLANState
*vlan
, int fd
,
4930 int so_type
=-1, optlen
=sizeof(so_type
);
4932 if(getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, (char *)&so_type
,
4933 (socklen_t
*)&optlen
)< 0) {
4934 fprintf(stderr
, "qemu: error: getsockopt(SO_TYPE) for fd=%d failed\n", fd
);
4939 return net_socket_fd_init_dgram(vlan
, fd
, is_connected
);
4941 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4943 /* who knows ... this could be a eg. a pty, do warn and continue as stream */
4944 fprintf(stderr
, "qemu: warning: socket type=%d for fd=%d is not SOCK_DGRAM or SOCK_STREAM\n", so_type
, fd
);
4945 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4950 static void net_socket_accept(void *opaque
)
4952 NetSocketListenState
*s
= opaque
;
4954 struct sockaddr_in saddr
;
4959 len
= sizeof(saddr
);
4960 fd
= accept(s
->fd
, (struct sockaddr
*)&saddr
, &len
);
4961 if (fd
< 0 && errno
!= EINTR
) {
4963 } else if (fd
>= 0) {
4967 s1
= net_socket_fd_init(s
->vlan
, fd
, 1);
4971 snprintf(s1
->vc
->info_str
, sizeof(s1
->vc
->info_str
),
4972 "socket: connection from %s:%d",
4973 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4977 static int net_socket_listen_init(VLANState
*vlan
, const char *host_str
)
4979 NetSocketListenState
*s
;
4981 struct sockaddr_in saddr
;
4983 if (parse_host_port(&saddr
, host_str
) < 0)
4986 s
= qemu_mallocz(sizeof(NetSocketListenState
));
4990 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4995 socket_set_nonblock(fd
);
4997 /* allow fast reuse */
4999 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
5001 ret
= bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5006 ret
= listen(fd
, 0);
5013 qemu_set_fd_handler(fd
, net_socket_accept
, NULL
, s
);
5017 static int net_socket_connect_init(VLANState
*vlan
, const char *host_str
)
5020 int fd
, connected
, ret
, err
;
5021 struct sockaddr_in saddr
;
5023 if (parse_host_port(&saddr
, host_str
) < 0)
5026 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
5031 socket_set_nonblock(fd
);
5035 ret
= connect(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5037 err
= socket_error();
5038 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
5039 } else if (err
== EINPROGRESS
) {
5042 } else if (err
== WSAEALREADY
) {
5055 s
= net_socket_fd_init(vlan
, fd
, connected
);
5058 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5059 "socket: connect to %s:%d",
5060 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5064 static int net_socket_mcast_init(VLANState
*vlan
, const char *host_str
)
5068 struct sockaddr_in saddr
;
5070 if (parse_host_port(&saddr
, host_str
) < 0)
5074 fd
= net_socket_mcast_create(&saddr
);
5078 s
= net_socket_fd_init(vlan
, fd
, 0);
5082 s
->dgram_dst
= saddr
;
5084 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5085 "socket: mcast=%s:%d",
5086 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5091 static const char *get_opt_name(char *buf
, int buf_size
, const char *p
)
5096 while (*p
!= '\0' && *p
!= '=') {
5097 if (q
&& (q
- buf
) < buf_size
- 1)
5107 static const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
5112 while (*p
!= '\0') {
5114 if (*(p
+ 1) != ',')
5118 if (q
&& (q
- buf
) < buf_size
- 1)
5128 static int get_param_value(char *buf
, int buf_size
,
5129 const char *tag
, const char *str
)
5136 p
= get_opt_name(option
, sizeof(option
), p
);
5140 if (!strcmp(tag
, option
)) {
5141 (void)get_opt_value(buf
, buf_size
, p
);
5144 p
= get_opt_value(NULL
, 0, p
);
5153 static int check_params(char *buf
, int buf_size
,
5154 const char * const *params
, const char *str
)
5161 p
= get_opt_name(buf
, buf_size
, p
);
5165 for(i
= 0; params
[i
] != NULL
; i
++)
5166 if (!strcmp(params
[i
], buf
))
5168 if (params
[i
] == NULL
)
5170 p
= get_opt_value(NULL
, 0, p
);
5178 static int net_client_init(const char *device
, const char *p
)
5185 if (get_param_value(buf
, sizeof(buf
), "vlan", p
)) {
5186 vlan_id
= strtol(buf
, NULL
, 0);
5188 vlan
= qemu_find_vlan(vlan_id
);
5190 fprintf(stderr
, "Could not create vlan %d\n", vlan_id
);
5193 if (!strcmp(device
, "nic")) {
5197 if (nb_nics
>= MAX_NICS
) {
5198 fprintf(stderr
, "Too Many NICs\n");
5201 nd
= &nd_table
[nb_nics
];
5202 macaddr
= nd
->macaddr
;
5208 macaddr
[5] = 0x56 + nb_nics
;
5210 if (get_param_value(buf
, sizeof(buf
), "macaddr", p
)) {
5211 if (parse_macaddr(macaddr
, buf
) < 0) {
5212 fprintf(stderr
, "invalid syntax for ethernet address\n");
5216 if (get_param_value(buf
, sizeof(buf
), "model", p
)) {
5217 nd
->model
= strdup(buf
);
5221 vlan
->nb_guest_devs
++;
5224 if (!strcmp(device
, "none")) {
5225 /* does nothing. It is needed to signal that no network cards
5230 if (!strcmp(device
, "user")) {
5231 if (get_param_value(buf
, sizeof(buf
), "hostname", p
)) {
5232 pstrcpy(slirp_hostname
, sizeof(slirp_hostname
), buf
);
5234 vlan
->nb_host_devs
++;
5235 ret
= net_slirp_init(vlan
);
5239 if (!strcmp(device
, "tap")) {
5241 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5242 fprintf(stderr
, "tap: no interface name\n");
5245 vlan
->nb_host_devs
++;
5246 ret
= tap_win32_init(vlan
, ifname
);
5249 if (!strcmp(device
, "tap")) {
5251 char setup_script
[1024], down_script
[1024];
5253 vlan
->nb_host_devs
++;
5254 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5255 fd
= strtol(buf
, NULL
, 0);
5256 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
5258 if (net_tap_fd_init(vlan
, fd
))
5261 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5264 if (get_param_value(setup_script
, sizeof(setup_script
), "script", p
) == 0) {
5265 pstrcpy(setup_script
, sizeof(setup_script
), DEFAULT_NETWORK_SCRIPT
);
5267 if (get_param_value(down_script
, sizeof(down_script
), "downscript", p
) == 0) {
5268 pstrcpy(down_script
, sizeof(down_script
), DEFAULT_NETWORK_DOWN_SCRIPT
);
5270 ret
= net_tap_init(vlan
, ifname
, setup_script
, down_script
);
5274 if (!strcmp(device
, "socket")) {
5275 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5277 fd
= strtol(buf
, NULL
, 0);
5279 if (net_socket_fd_init(vlan
, fd
, 1))
5281 } else if (get_param_value(buf
, sizeof(buf
), "listen", p
) > 0) {
5282 ret
= net_socket_listen_init(vlan
, buf
);
5283 } else if (get_param_value(buf
, sizeof(buf
), "connect", p
) > 0) {
5284 ret
= net_socket_connect_init(vlan
, buf
);
5285 } else if (get_param_value(buf
, sizeof(buf
), "mcast", p
) > 0) {
5286 ret
= net_socket_mcast_init(vlan
, buf
);
5288 fprintf(stderr
, "Unknown socket options: %s\n", p
);
5291 vlan
->nb_host_devs
++;
5294 if (!strcmp(device
, "vde")) {
5295 char vde_sock
[1024], vde_group
[512];
5296 int vde_port
, vde_mode
;
5297 vlan
->nb_host_devs
++;
5298 if (get_param_value(vde_sock
, sizeof(vde_sock
), "sock", p
) <= 0) {
5301 if (get_param_value(buf
, sizeof(buf
), "port", p
) > 0) {
5302 vde_port
= strtol(buf
, NULL
, 10);
5306 if (get_param_value(vde_group
, sizeof(vde_group
), "group", p
) <= 0) {
5307 vde_group
[0] = '\0';
5309 if (get_param_value(buf
, sizeof(buf
), "mode", p
) > 0) {
5310 vde_mode
= strtol(buf
, NULL
, 8);
5314 ret
= net_vde_init(vlan
, vde_sock
, vde_port
, vde_group
, vde_mode
);
5318 fprintf(stderr
, "Unknown network device: %s\n", device
);
5322 fprintf(stderr
, "Could not initialize device '%s'\n", device
);
5328 static int net_client_parse(const char *str
)
5336 while (*p
!= '\0' && *p
!= ',') {
5337 if ((q
- device
) < sizeof(device
) - 1)
5345 return net_client_init(device
, p
);
5348 void do_info_network(void)
5351 VLANClientState
*vc
;
5353 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5354 term_printf("VLAN %d devices:\n", vlan
->id
);
5355 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
)
5356 term_printf(" %s\n", vc
->info_str
);
5360 /***********************************************************/
5361 /* Bluetooth support */
5364 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
;
5388 static void null_hci_send(struct HCIInfo
*hci
, const uint8_t *data
, int len
)
5392 static int null_hci_addr_set(struct HCIInfo
*hci
, const uint8_t *bd_addr
)
5397 static struct HCIInfo null_hci
= {
5398 .cmd_send
= null_hci_send
,
5399 .sco_send
= null_hci_send
,
5400 .acl_send
= null_hci_send
,
5401 .bdaddr_set
= null_hci_addr_set
,
5404 struct HCIInfo
*qemu_next_hci(void)
5406 if (cur_hci
== nb_hcis
)
5409 return hci_table
[cur_hci
++];
5412 /***********************************************************/
5413 /* QEMU Block devices */
5415 #define HD_ALIAS "index=%d,media=disk"
5417 #define CDROM_ALIAS "index=1,media=cdrom"
5419 #define CDROM_ALIAS "index=2,media=cdrom"
5421 #define FD_ALIAS "index=%d,if=floppy"
5422 #define PFLASH_ALIAS "if=pflash"
5423 #define MTD_ALIAS "if=mtd"
5424 #define SD_ALIAS "index=0,if=sd"
5426 static int drive_add(const char *file
, const char *fmt
, ...)
5430 if (nb_drives_opt
>= MAX_DRIVES
) {
5431 fprintf(stderr
, "qemu: too many drives\n");
5435 drives_opt
[nb_drives_opt
].file
= file
;
5437 vsnprintf(drives_opt
[nb_drives_opt
].opt
,
5438 sizeof(drives_opt
[0].opt
), fmt
, ap
);
5441 return nb_drives_opt
++;
5444 int drive_get_index(BlockInterfaceType type
, int bus
, int unit
)
5448 /* seek interface, bus and unit */
5450 for (index
= 0; index
< nb_drives
; index
++)
5451 if (drives_table
[index
].type
== type
&&
5452 drives_table
[index
].bus
== bus
&&
5453 drives_table
[index
].unit
== unit
)
5459 int drive_get_max_bus(BlockInterfaceType type
)
5465 for (index
= 0; index
< nb_drives
; index
++) {
5466 if(drives_table
[index
].type
== type
&&
5467 drives_table
[index
].bus
> max_bus
)
5468 max_bus
= drives_table
[index
].bus
;
5473 static void bdrv_format_print(void *opaque
, const char *name
)
5475 fprintf(stderr
, " %s", name
);
5478 static int drive_init(struct drive_opt
*arg
, int snapshot
,
5479 QEMUMachine
*machine
)
5484 const char *mediastr
= "";
5485 BlockInterfaceType type
;
5486 enum { MEDIA_DISK
, MEDIA_CDROM
} media
;
5487 int bus_id
, unit_id
;
5488 int cyls
, heads
, secs
, translation
;
5489 BlockDriverState
*bdrv
;
5490 BlockDriver
*drv
= NULL
;
5495 char *str
= arg
->opt
;
5496 static const char * const params
[] = { "bus", "unit", "if", "index",
5497 "cyls", "heads", "secs", "trans",
5498 "media", "snapshot", "file",
5499 "cache", "format", NULL
};
5501 if (check_params(buf
, sizeof(buf
), params
, str
) < 0) {
5502 fprintf(stderr
, "qemu: unknown parameter '%s' in '%s'\n",
5508 cyls
= heads
= secs
= 0;
5511 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5515 if (machine
->use_scsi
) {
5517 max_devs
= MAX_SCSI_DEVS
;
5518 pstrcpy(devname
, sizeof(devname
), "scsi");
5521 max_devs
= MAX_IDE_DEVS
;
5522 pstrcpy(devname
, sizeof(devname
), "ide");
5526 /* extract parameters */
5528 if (get_param_value(buf
, sizeof(buf
), "bus", str
)) {
5529 bus_id
= strtol(buf
, NULL
, 0);
5531 fprintf(stderr
, "qemu: '%s' invalid bus id\n", str
);
5536 if (get_param_value(buf
, sizeof(buf
), "unit", str
)) {
5537 unit_id
= strtol(buf
, NULL
, 0);
5539 fprintf(stderr
, "qemu: '%s' invalid unit id\n", str
);
5544 if (get_param_value(buf
, sizeof(buf
), "if", str
)) {
5545 pstrcpy(devname
, sizeof(devname
), buf
);
5546 if (!strcmp(buf
, "ide")) {
5548 max_devs
= MAX_IDE_DEVS
;
5549 } else if (!strcmp(buf
, "scsi")) {
5551 max_devs
= MAX_SCSI_DEVS
;
5552 } else if (!strcmp(buf
, "floppy")) {
5555 } else if (!strcmp(buf
, "pflash")) {
5558 } else if (!strcmp(buf
, "mtd")) {
5561 } else if (!strcmp(buf
, "sd")) {
5565 fprintf(stderr
, "qemu: '%s' unsupported bus type '%s'\n", str
, buf
);
5570 if (get_param_value(buf
, sizeof(buf
), "index", str
)) {
5571 index
= strtol(buf
, NULL
, 0);
5573 fprintf(stderr
, "qemu: '%s' invalid index\n", str
);
5578 if (get_param_value(buf
, sizeof(buf
), "cyls", str
)) {
5579 cyls
= strtol(buf
, NULL
, 0);
5582 if (get_param_value(buf
, sizeof(buf
), "heads", str
)) {
5583 heads
= strtol(buf
, NULL
, 0);
5586 if (get_param_value(buf
, sizeof(buf
), "secs", str
)) {
5587 secs
= strtol(buf
, NULL
, 0);
5590 if (cyls
|| heads
|| secs
) {
5591 if (cyls
< 1 || cyls
> 16383) {
5592 fprintf(stderr
, "qemu: '%s' invalid physical cyls number\n", str
);
5595 if (heads
< 1 || heads
> 16) {
5596 fprintf(stderr
, "qemu: '%s' invalid physical heads number\n", str
);
5599 if (secs
< 1 || secs
> 63) {
5600 fprintf(stderr
, "qemu: '%s' invalid physical secs number\n", str
);
5605 if (get_param_value(buf
, sizeof(buf
), "trans", str
)) {
5608 "qemu: '%s' trans must be used with cyls,heads and secs\n",
5612 if (!strcmp(buf
, "none"))
5613 translation
= BIOS_ATA_TRANSLATION_NONE
;
5614 else if (!strcmp(buf
, "lba"))
5615 translation
= BIOS_ATA_TRANSLATION_LBA
;
5616 else if (!strcmp(buf
, "auto"))
5617 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5619 fprintf(stderr
, "qemu: '%s' invalid translation type\n", str
);
5624 if (get_param_value(buf
, sizeof(buf
), "media", str
)) {
5625 if (!strcmp(buf
, "disk")) {
5627 } else if (!strcmp(buf
, "cdrom")) {
5628 if (cyls
|| secs
|| heads
) {
5630 "qemu: '%s' invalid physical CHS format\n", str
);
5633 media
= MEDIA_CDROM
;
5635 fprintf(stderr
, "qemu: '%s' invalid media\n", str
);
5640 if (get_param_value(buf
, sizeof(buf
), "snapshot", str
)) {
5641 if (!strcmp(buf
, "on"))
5643 else if (!strcmp(buf
, "off"))
5646 fprintf(stderr
, "qemu: '%s' invalid snapshot option\n", str
);
5651 if (get_param_value(buf
, sizeof(buf
), "cache", str
)) {
5652 if (!strcmp(buf
, "off"))
5654 else if (!strcmp(buf
, "on"))
5657 fprintf(stderr
, "qemu: invalid cache option\n");
5662 if (get_param_value(buf
, sizeof(buf
), "format", str
)) {
5663 if (strcmp(buf
, "?") == 0) {
5664 fprintf(stderr
, "qemu: Supported formats:");
5665 bdrv_iterate_format(bdrv_format_print
, NULL
);
5666 fprintf(stderr
, "\n");
5669 drv
= bdrv_find_format(buf
);
5671 fprintf(stderr
, "qemu: '%s' invalid format\n", buf
);
5676 if (arg
->file
== NULL
)
5677 get_param_value(file
, sizeof(file
), "file", str
);
5679 pstrcpy(file
, sizeof(file
), arg
->file
);
5681 /* compute bus and unit according index */
5684 if (bus_id
!= 0 || unit_id
!= -1) {
5686 "qemu: '%s' index cannot be used with bus and unit\n", str
);
5694 unit_id
= index
% max_devs
;
5695 bus_id
= index
/ max_devs
;
5699 /* if user doesn't specify a unit_id,
5700 * try to find the first free
5703 if (unit_id
== -1) {
5705 while (drive_get_index(type
, bus_id
, unit_id
) != -1) {
5707 if (max_devs
&& unit_id
>= max_devs
) {
5708 unit_id
-= max_devs
;
5716 if (max_devs
&& unit_id
>= max_devs
) {
5717 fprintf(stderr
, "qemu: '%s' unit %d too big (max is %d)\n",
5718 str
, unit_id
, max_devs
- 1);
5723 * ignore multiple definitions
5726 if (drive_get_index(type
, bus_id
, unit_id
) != -1)
5731 if (type
== IF_IDE
|| type
== IF_SCSI
)
5732 mediastr
= (media
== MEDIA_CDROM
) ? "-cd" : "-hd";
5734 snprintf(buf
, sizeof(buf
), "%s%i%s%i",
5735 devname
, bus_id
, mediastr
, unit_id
);
5737 snprintf(buf
, sizeof(buf
), "%s%s%i",
5738 devname
, mediastr
, unit_id
);
5739 bdrv
= bdrv_new(buf
);
5740 drives_table
[nb_drives
].bdrv
= bdrv
;
5741 drives_table
[nb_drives
].type
= type
;
5742 drives_table
[nb_drives
].bus
= bus_id
;
5743 drives_table
[nb_drives
].unit
= unit_id
;
5752 bdrv_set_geometry_hint(bdrv
, cyls
, heads
, secs
);
5753 bdrv_set_translation_hint(bdrv
, translation
);
5757 bdrv_set_type_hint(bdrv
, BDRV_TYPE_CDROM
);
5762 /* FIXME: This isn't really a floppy, but it's a reasonable
5765 bdrv_set_type_hint(bdrv
, BDRV_TYPE_FLOPPY
);
5775 bdrv_flags
|= BDRV_O_SNAPSHOT
;
5777 bdrv_flags
|= BDRV_O_DIRECT
;
5778 if (bdrv_open2(bdrv
, file
, bdrv_flags
, drv
) < 0 || qemu_key_check(bdrv
, file
)) {
5779 fprintf(stderr
, "qemu: could not open disk image %s\n",
5786 /***********************************************************/
5789 static USBPort
*used_usb_ports
;
5790 static USBPort
*free_usb_ports
;
5792 /* ??? Maybe change this to register a hub to keep track of the topology. */
5793 void qemu_register_usb_port(USBPort
*port
, void *opaque
, int index
,
5794 usb_attachfn attach
)
5796 port
->opaque
= opaque
;
5797 port
->index
= index
;
5798 port
->attach
= attach
;
5799 port
->next
= free_usb_ports
;
5800 free_usb_ports
= port
;
5803 int usb_device_add_dev(USBDevice
*dev
)
5807 /* Find a USB port to add the device to. */
5808 port
= free_usb_ports
;
5812 /* Create a new hub and chain it on. */
5813 free_usb_ports
= NULL
;
5814 port
->next
= used_usb_ports
;
5815 used_usb_ports
= port
;
5817 hub
= usb_hub_init(VM_USB_HUB_SIZE
);
5818 usb_attach(port
, hub
);
5819 port
= free_usb_ports
;
5822 free_usb_ports
= port
->next
;
5823 port
->next
= used_usb_ports
;
5824 used_usb_ports
= port
;
5825 usb_attach(port
, dev
);
5829 static int usb_device_add(const char *devname
)
5834 if (!free_usb_ports
)
5837 if (strstart(devname
, "host:", &p
)) {
5838 dev
= usb_host_device_open(p
);
5839 } else if (!strcmp(devname
, "mouse")) {
5840 dev
= usb_mouse_init();
5841 } else if (!strcmp(devname
, "tablet")) {
5842 dev
= usb_tablet_init();
5843 } else if (!strcmp(devname
, "keyboard")) {
5844 dev
= usb_keyboard_init();
5845 } else if (strstart(devname
, "disk:", &p
)) {
5846 dev
= usb_msd_init(p
);
5847 } else if (!strcmp(devname
, "wacom-tablet")) {
5848 dev
= usb_wacom_init();
5849 } else if (strstart(devname
, "serial:", &p
)) {
5850 dev
= usb_serial_init(p
);
5851 #ifdef CONFIG_BRLAPI
5852 } else if (!strcmp(devname
, "braille")) {
5853 dev
= usb_baum_init();
5855 } else if (strstart(devname
, "net:", &p
)) {
5858 if (net_client_init("nic", p
) < 0)
5860 nd_table
[nic
].model
= "usb";
5861 dev
= usb_net_init(&nd_table
[nic
]);
5868 return usb_device_add_dev(dev
);
5871 int usb_device_del_addr(int bus_num
, int addr
)
5877 if (!used_usb_ports
)
5883 lastp
= &used_usb_ports
;
5884 port
= used_usb_ports
;
5885 while (port
&& port
->dev
->addr
!= addr
) {
5886 lastp
= &port
->next
;
5894 *lastp
= port
->next
;
5895 usb_attach(port
, NULL
);
5896 dev
->handle_destroy(dev
);
5897 port
->next
= free_usb_ports
;
5898 free_usb_ports
= port
;
5902 static int usb_device_del(const char *devname
)
5907 if (strstart(devname
, "host:", &p
))
5908 return usb_host_device_close(p
);
5910 if (!used_usb_ports
)
5913 p
= strchr(devname
, '.');
5916 bus_num
= strtoul(devname
, NULL
, 0);
5917 addr
= strtoul(p
+ 1, NULL
, 0);
5919 return usb_device_del_addr(bus_num
, addr
);
5922 void do_usb_add(const char *devname
)
5924 usb_device_add(devname
);
5927 void do_usb_del(const char *devname
)
5929 usb_device_del(devname
);
5936 const char *speed_str
;
5939 term_printf("USB support not enabled\n");
5943 for (port
= used_usb_ports
; port
; port
= port
->next
) {
5947 switch(dev
->speed
) {
5951 case USB_SPEED_FULL
:
5954 case USB_SPEED_HIGH
:
5961 term_printf(" Device %d.%d, Speed %s Mb/s, Product %s\n",
5962 0, dev
->addr
, speed_str
, dev
->devname
);
5966 /***********************************************************/
5967 /* PCMCIA/Cardbus */
5969 static struct pcmcia_socket_entry_s
{
5970 struct pcmcia_socket_s
*socket
;
5971 struct pcmcia_socket_entry_s
*next
;
5972 } *pcmcia_sockets
= 0;
5974 void pcmcia_socket_register(struct pcmcia_socket_s
*socket
)
5976 struct pcmcia_socket_entry_s
*entry
;
5978 entry
= qemu_malloc(sizeof(struct pcmcia_socket_entry_s
));
5979 entry
->socket
= socket
;
5980 entry
->next
= pcmcia_sockets
;
5981 pcmcia_sockets
= entry
;
5984 void pcmcia_socket_unregister(struct pcmcia_socket_s
*socket
)
5986 struct pcmcia_socket_entry_s
*entry
, **ptr
;
5988 ptr
= &pcmcia_sockets
;
5989 for (entry
= *ptr
; entry
; ptr
= &entry
->next
, entry
= *ptr
)
5990 if (entry
->socket
== socket
) {
5996 void pcmcia_info(void)
5998 struct pcmcia_socket_entry_s
*iter
;
5999 if (!pcmcia_sockets
)
6000 term_printf("No PCMCIA sockets\n");
6002 for (iter
= pcmcia_sockets
; iter
; iter
= iter
->next
)
6003 term_printf("%s: %s\n", iter
->socket
->slot_string
,
6004 iter
->socket
->attached
? iter
->socket
->card_string
:
6008 /***********************************************************/
6011 static void dumb_update(DisplayState
*ds
, int x
, int y
, int w
, int h
)
6015 static void dumb_resize(DisplayState
*ds
, int w
, int h
)
6019 static void dumb_refresh(DisplayState
*ds
)
6021 #if defined(CONFIG_SDL)
6026 static void dumb_display_init(DisplayState
*ds
)
6031 ds
->dpy_update
= dumb_update
;
6032 ds
->dpy_resize
= dumb_resize
;
6033 ds
->dpy_refresh
= dumb_refresh
;
6034 ds
->gui_timer_interval
= 500;
6038 /***********************************************************/
6041 #define MAX_IO_HANDLERS 64
6043 typedef struct IOHandlerRecord
{
6045 IOCanRWHandler
*fd_read_poll
;
6047 IOHandler
*fd_write
;
6050 /* temporary data */
6052 struct IOHandlerRecord
*next
;
6055 static IOHandlerRecord
*first_io_handler
;
6057 /* XXX: fd_read_poll should be suppressed, but an API change is
6058 necessary in the character devices to suppress fd_can_read(). */
6059 int qemu_set_fd_handler2(int fd
,
6060 IOCanRWHandler
*fd_read_poll
,
6062 IOHandler
*fd_write
,
6065 IOHandlerRecord
**pioh
, *ioh
;
6067 if (!fd_read
&& !fd_write
) {
6068 pioh
= &first_io_handler
;
6073 if (ioh
->fd
== fd
) {
6080 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
6084 ioh
= qemu_mallocz(sizeof(IOHandlerRecord
));
6087 ioh
->next
= first_io_handler
;
6088 first_io_handler
= ioh
;
6091 ioh
->fd_read_poll
= fd_read_poll
;
6092 ioh
->fd_read
= fd_read
;
6093 ioh
->fd_write
= fd_write
;
6094 ioh
->opaque
= opaque
;
6100 int qemu_set_fd_handler(int fd
,
6102 IOHandler
*fd_write
,
6105 return qemu_set_fd_handler2(fd
, NULL
, fd_read
, fd_write
, opaque
);
6108 /***********************************************************/
6109 /* Polling handling */
6111 typedef struct PollingEntry
{
6114 struct PollingEntry
*next
;
6117 static PollingEntry
*first_polling_entry
;
6119 int qemu_add_polling_cb(PollingFunc
*func
, void *opaque
)
6121 PollingEntry
**ppe
, *pe
;
6122 pe
= qemu_mallocz(sizeof(PollingEntry
));
6126 pe
->opaque
= opaque
;
6127 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
);
6132 void qemu_del_polling_cb(PollingFunc
*func
, void *opaque
)
6134 PollingEntry
**ppe
, *pe
;
6135 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
) {
6137 if (pe
->func
== func
&& pe
->opaque
== opaque
) {
6146 /***********************************************************/
6147 /* Wait objects support */
6148 typedef struct WaitObjects
{
6150 HANDLE events
[MAXIMUM_WAIT_OBJECTS
+ 1];
6151 WaitObjectFunc
*func
[MAXIMUM_WAIT_OBJECTS
+ 1];
6152 void *opaque
[MAXIMUM_WAIT_OBJECTS
+ 1];
6155 static WaitObjects wait_objects
= {0};
6157 int qemu_add_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6159 WaitObjects
*w
= &wait_objects
;
6161 if (w
->num
>= MAXIMUM_WAIT_OBJECTS
)
6163 w
->events
[w
->num
] = handle
;
6164 w
->func
[w
->num
] = func
;
6165 w
->opaque
[w
->num
] = opaque
;
6170 void qemu_del_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6173 WaitObjects
*w
= &wait_objects
;
6176 for (i
= 0; i
< w
->num
; i
++) {
6177 if (w
->events
[i
] == handle
)
6180 w
->events
[i
] = w
->events
[i
+ 1];
6181 w
->func
[i
] = w
->func
[i
+ 1];
6182 w
->opaque
[i
] = w
->opaque
[i
+ 1];
6190 /***********************************************************/
6191 /* savevm/loadvm support */
6193 #define IO_BUF_SIZE 32768
6196 QEMUFilePutBufferFunc
*put_buffer
;
6197 QEMUFileGetBufferFunc
*get_buffer
;
6198 QEMUFileCloseFunc
*close
;
6199 QEMUFileRateLimit
*rate_limit
;
6202 int64_t buf_offset
; /* start of buffer when writing, end of buffer
6205 int buf_size
; /* 0 when writing */
6206 uint8_t buf
[IO_BUF_SIZE
];
6209 typedef struct QEMUFileFD
6215 static void fd_put_notify(void *opaque
)
6217 QEMUFileFD
*s
= opaque
;
6219 /* Remove writable callback and do a put notify */
6220 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
6221 qemu_file_put_notify(s
->file
);
6224 static void fd_put_buffer(void *opaque
, const uint8_t *buf
,
6225 int64_t pos
, int size
)
6227 QEMUFileFD
*s
= opaque
;
6231 len
= write(s
->fd
, buf
, size
);
6232 } while (len
== -1 && errno
== EINTR
);
6237 /* When the fd becomes writable again, register a callback to do
6240 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, fd_put_notify
, s
);
6243 static int fd_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6245 QEMUFileFD
*s
= opaque
;
6249 len
= read(s
->fd
, buf
, size
);
6250 } while (len
== -1 && errno
== EINTR
);
6258 static int fd_close(void *opaque
)
6260 QEMUFileFD
*s
= opaque
;
6265 QEMUFile
*qemu_fopen_fd(int fd
)
6267 QEMUFileFD
*s
= qemu_mallocz(sizeof(QEMUFileFD
));
6273 s
->file
= qemu_fopen_ops(s
, fd_put_buffer
, fd_get_buffer
, fd_close
, NULL
);
6277 typedef struct QEMUFileStdio
6282 static void file_put_buffer(void *opaque
, const uint8_t *buf
,
6283 int64_t pos
, int size
)
6285 QEMUFileStdio
*s
= opaque
;
6286 fseek(s
->outfile
, pos
, SEEK_SET
);
6287 fwrite(buf
, 1, size
, s
->outfile
);
6290 static int file_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6292 QEMUFileStdio
*s
= opaque
;
6293 fseek(s
->outfile
, pos
, SEEK_SET
);
6294 return fread(buf
, 1, size
, s
->outfile
);
6297 static int file_close(void *opaque
)
6299 QEMUFileStdio
*s
= opaque
;
6305 QEMUFile
*qemu_fopen(const char *filename
, const char *mode
)
6309 s
= qemu_mallocz(sizeof(QEMUFileStdio
));
6313 s
->outfile
= fopen(filename
, mode
);
6317 if (!strcmp(mode
, "wb"))
6318 return qemu_fopen_ops(s
, file_put_buffer
, NULL
, file_close
, NULL
);
6319 else if (!strcmp(mode
, "rb"))
6320 return qemu_fopen_ops(s
, NULL
, file_get_buffer
, file_close
, NULL
);
6329 typedef struct QEMUFileBdrv
6331 BlockDriverState
*bs
;
6332 int64_t base_offset
;
6335 static void bdrv_put_buffer(void *opaque
, const uint8_t *buf
,
6336 int64_t pos
, int size
)
6338 QEMUFileBdrv
*s
= opaque
;
6339 bdrv_pwrite(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6342 static int bdrv_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6344 QEMUFileBdrv
*s
= opaque
;
6345 return bdrv_pread(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6348 static int bdrv_fclose(void *opaque
)
6350 QEMUFileBdrv
*s
= opaque
;
6355 static QEMUFile
*qemu_fopen_bdrv(BlockDriverState
*bs
, int64_t offset
, int is_writable
)
6359 s
= qemu_mallocz(sizeof(QEMUFileBdrv
));
6364 s
->base_offset
= offset
;
6367 return qemu_fopen_ops(s
, bdrv_put_buffer
, NULL
, bdrv_fclose
, NULL
);
6369 return qemu_fopen_ops(s
, NULL
, bdrv_get_buffer
, bdrv_fclose
, NULL
);
6372 QEMUFile
*qemu_fopen_ops(void *opaque
, QEMUFilePutBufferFunc
*put_buffer
,
6373 QEMUFileGetBufferFunc
*get_buffer
,
6374 QEMUFileCloseFunc
*close
,
6375 QEMUFileRateLimit
*rate_limit
)
6379 f
= qemu_mallocz(sizeof(QEMUFile
));
6384 f
->put_buffer
= put_buffer
;
6385 f
->get_buffer
= get_buffer
;
6387 f
->rate_limit
= rate_limit
;
6392 void qemu_fflush(QEMUFile
*f
)
6397 if (f
->buf_index
> 0) {
6398 f
->put_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, f
->buf_index
);
6399 f
->buf_offset
+= f
->buf_index
;
6404 static void qemu_fill_buffer(QEMUFile
*f
)
6411 len
= f
->get_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, IO_BUF_SIZE
);
6417 f
->buf_offset
+= len
;
6420 int qemu_fclose(QEMUFile
*f
)
6425 ret
= f
->close(f
->opaque
);
6430 void qemu_file_put_notify(QEMUFile
*f
)
6432 f
->put_buffer(f
->opaque
, NULL
, 0, 0);
6435 void qemu_put_buffer(QEMUFile
*f
, const uint8_t *buf
, int size
)
6439 l
= IO_BUF_SIZE
- f
->buf_index
;
6442 memcpy(f
->buf
+ f
->buf_index
, buf
, l
);
6446 if (f
->buf_index
>= IO_BUF_SIZE
)
6451 void qemu_put_byte(QEMUFile
*f
, int v
)
6453 f
->buf
[f
->buf_index
++] = v
;
6454 if (f
->buf_index
>= IO_BUF_SIZE
)
6458 int qemu_get_buffer(QEMUFile
*f
, uint8_t *buf
, int size1
)
6464 l
= f
->buf_size
- f
->buf_index
;
6466 qemu_fill_buffer(f
);
6467 l
= f
->buf_size
- f
->buf_index
;
6473 memcpy(buf
, f
->buf
+ f
->buf_index
, l
);
6478 return size1
- size
;
6481 int qemu_get_byte(QEMUFile
*f
)
6483 if (f
->buf_index
>= f
->buf_size
) {
6484 qemu_fill_buffer(f
);
6485 if (f
->buf_index
>= f
->buf_size
)
6488 return f
->buf
[f
->buf_index
++];
6491 int64_t qemu_ftell(QEMUFile
*f
)
6493 return f
->buf_offset
- f
->buf_size
+ f
->buf_index
;
6496 int64_t qemu_fseek(QEMUFile
*f
, int64_t pos
, int whence
)
6498 if (whence
== SEEK_SET
) {
6500 } else if (whence
== SEEK_CUR
) {
6501 pos
+= qemu_ftell(f
);
6503 /* SEEK_END not supported */
6506 if (f
->put_buffer
) {
6508 f
->buf_offset
= pos
;
6510 f
->buf_offset
= pos
;
6517 int qemu_file_rate_limit(QEMUFile
*f
)
6520 return f
->rate_limit(f
->opaque
);
6525 void qemu_put_be16(QEMUFile
*f
, unsigned int v
)
6527 qemu_put_byte(f
, v
>> 8);
6528 qemu_put_byte(f
, v
);
6531 void qemu_put_be32(QEMUFile
*f
, unsigned int v
)
6533 qemu_put_byte(f
, v
>> 24);
6534 qemu_put_byte(f
, v
>> 16);
6535 qemu_put_byte(f
, v
>> 8);
6536 qemu_put_byte(f
, v
);
6539 void qemu_put_be64(QEMUFile
*f
, uint64_t v
)
6541 qemu_put_be32(f
, v
>> 32);
6542 qemu_put_be32(f
, v
);
6545 unsigned int qemu_get_be16(QEMUFile
*f
)
6548 v
= qemu_get_byte(f
) << 8;
6549 v
|= qemu_get_byte(f
);
6553 unsigned int qemu_get_be32(QEMUFile
*f
)
6556 v
= qemu_get_byte(f
) << 24;
6557 v
|= qemu_get_byte(f
) << 16;
6558 v
|= qemu_get_byte(f
) << 8;
6559 v
|= qemu_get_byte(f
);
6563 uint64_t qemu_get_be64(QEMUFile
*f
)
6566 v
= (uint64_t)qemu_get_be32(f
) << 32;
6567 v
|= qemu_get_be32(f
);
6571 typedef struct SaveStateEntry
{
6576 SaveLiveStateHandler
*save_live_state
;
6577 SaveStateHandler
*save_state
;
6578 LoadStateHandler
*load_state
;
6580 struct SaveStateEntry
*next
;
6583 static SaveStateEntry
*first_se
;
6585 /* TODO: Individual devices generally have very little idea about the rest
6586 of the system, so instance_id should be removed/replaced.
6587 Meanwhile pass -1 as instance_id if you do not already have a clearly
6588 distinguishing id for all instances of your device class. */
6589 int register_savevm_live(const char *idstr
,
6592 SaveLiveStateHandler
*save_live_state
,
6593 SaveStateHandler
*save_state
,
6594 LoadStateHandler
*load_state
,
6597 SaveStateEntry
*se
, **pse
;
6598 static int global_section_id
;
6600 se
= qemu_malloc(sizeof(SaveStateEntry
));
6603 pstrcpy(se
->idstr
, sizeof(se
->idstr
), idstr
);
6604 se
->instance_id
= (instance_id
== -1) ? 0 : instance_id
;
6605 se
->version_id
= version_id
;
6606 se
->section_id
= global_section_id
++;
6607 se
->save_live_state
= save_live_state
;
6608 se
->save_state
= save_state
;
6609 se
->load_state
= load_state
;
6610 se
->opaque
= opaque
;
6613 /* add at the end of list */
6615 while (*pse
!= NULL
) {
6616 if (instance_id
== -1
6617 && strcmp(se
->idstr
, (*pse
)->idstr
) == 0
6618 && se
->instance_id
<= (*pse
)->instance_id
)
6619 se
->instance_id
= (*pse
)->instance_id
+ 1;
6620 pse
= &(*pse
)->next
;
6626 int register_savevm(const char *idstr
,
6629 SaveStateHandler
*save_state
,
6630 LoadStateHandler
*load_state
,
6633 return register_savevm_live(idstr
, instance_id
, version_id
,
6634 NULL
, save_state
, load_state
, opaque
);
6637 #define QEMU_VM_FILE_MAGIC 0x5145564d
6638 #define QEMU_VM_FILE_VERSION_COMPAT 0x00000002
6639 #define QEMU_VM_FILE_VERSION 0x00000003
6641 #define QEMU_VM_EOF 0x00
6642 #define QEMU_VM_SECTION_START 0x01
6643 #define QEMU_VM_SECTION_PART 0x02
6644 #define QEMU_VM_SECTION_END 0x03
6645 #define QEMU_VM_SECTION_FULL 0x04
6647 int qemu_savevm_state_begin(QEMUFile
*f
)
6651 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
6652 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
6654 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6657 if (se
->save_live_state
== NULL
)
6661 qemu_put_byte(f
, QEMU_VM_SECTION_START
);
6662 qemu_put_be32(f
, se
->section_id
);
6665 len
= strlen(se
->idstr
);
6666 qemu_put_byte(f
, len
);
6667 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6669 qemu_put_be32(f
, se
->instance_id
);
6670 qemu_put_be32(f
, se
->version_id
);
6672 se
->save_live_state(f
, QEMU_VM_SECTION_START
, se
->opaque
);
6678 int qemu_savevm_state_iterate(QEMUFile
*f
)
6683 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6684 if (se
->save_live_state
== NULL
)
6688 qemu_put_byte(f
, QEMU_VM_SECTION_PART
);
6689 qemu_put_be32(f
, se
->section_id
);
6691 ret
&= !!se
->save_live_state(f
, QEMU_VM_SECTION_PART
, se
->opaque
);
6700 int qemu_savevm_state_complete(QEMUFile
*f
)
6704 for (se
= first_se
; se
!= NULL
; se
= se
->next
) {
6705 if (se
->save_live_state
== NULL
)
6709 qemu_put_byte(f
, QEMU_VM_SECTION_END
);
6710 qemu_put_be32(f
, se
->section_id
);
6712 se
->save_live_state(f
, QEMU_VM_SECTION_END
, se
->opaque
);
6715 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6718 if (se
->save_state
== NULL
)
6722 qemu_put_byte(f
, QEMU_VM_SECTION_FULL
);
6723 qemu_put_be32(f
, se
->section_id
);
6726 len
= strlen(se
->idstr
);
6727 qemu_put_byte(f
, len
);
6728 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6730 qemu_put_be32(f
, se
->instance_id
);
6731 qemu_put_be32(f
, se
->version_id
);
6733 se
->save_state(f
, se
->opaque
);
6736 qemu_put_byte(f
, QEMU_VM_EOF
);
6741 int qemu_savevm_state(QEMUFile
*f
)
6743 int saved_vm_running
;
6746 saved_vm_running
= vm_running
;
6749 ret
= qemu_savevm_state_begin(f
);
6754 ret
= qemu_savevm_state_iterate(f
);
6759 ret
= qemu_savevm_state_complete(f
);
6762 if (saved_vm_running
)
6767 static SaveStateEntry
*find_se(const char *idstr
, int instance_id
)
6771 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6772 if (!strcmp(se
->idstr
, idstr
) &&
6773 instance_id
== se
->instance_id
)
6779 typedef struct LoadStateEntry
{
6783 struct LoadStateEntry
*next
;
6786 static int qemu_loadvm_state_v2(QEMUFile
*f
)
6789 int len
, ret
, instance_id
, record_len
, version_id
;
6790 int64_t total_len
, end_pos
, cur_pos
;
6793 total_len
= qemu_get_be64(f
);
6794 end_pos
= total_len
+ qemu_ftell(f
);
6796 if (qemu_ftell(f
) >= end_pos
)
6798 len
= qemu_get_byte(f
);
6799 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6801 instance_id
= qemu_get_be32(f
);
6802 version_id
= qemu_get_be32(f
);
6803 record_len
= qemu_get_be32(f
);
6804 cur_pos
= qemu_ftell(f
);
6805 se
= find_se(idstr
, instance_id
);
6807 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
6808 instance_id
, idstr
);
6810 ret
= se
->load_state(f
, se
->opaque
, version_id
);
6812 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
6813 instance_id
, idstr
);
6816 /* always seek to exact end of record */
6817 qemu_fseek(f
, cur_pos
+ record_len
, SEEK_SET
);
6822 int qemu_loadvm_state(QEMUFile
*f
)
6824 LoadStateEntry
*first_le
= NULL
;
6825 uint8_t section_type
;
6829 v
= qemu_get_be32(f
);
6830 if (v
!= QEMU_VM_FILE_MAGIC
)
6833 v
= qemu_get_be32(f
);
6834 if (v
== QEMU_VM_FILE_VERSION_COMPAT
)
6835 return qemu_loadvm_state_v2(f
);
6836 if (v
!= QEMU_VM_FILE_VERSION
)
6839 while ((section_type
= qemu_get_byte(f
)) != QEMU_VM_EOF
) {
6840 uint32_t instance_id
, version_id
, section_id
;
6846 switch (section_type
) {
6847 case QEMU_VM_SECTION_START
:
6848 case QEMU_VM_SECTION_FULL
:
6849 /* Read section start */
6850 section_id
= qemu_get_be32(f
);
6851 len
= qemu_get_byte(f
);
6852 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6854 instance_id
= qemu_get_be32(f
);
6855 version_id
= qemu_get_be32(f
);
6857 /* Find savevm section */
6858 se
= find_se(idstr
, instance_id
);
6860 fprintf(stderr
, "Unknown savevm section or instance '%s' %d\n", idstr
, instance_id
);
6865 /* Validate version */
6866 if (version_id
> se
->version_id
) {
6867 fprintf(stderr
, "savevm: unsupported version %d for '%s' v%d\n",
6868 version_id
, idstr
, se
->version_id
);
6874 le
= qemu_mallocz(sizeof(*le
));
6881 le
->section_id
= section_id
;
6882 le
->version_id
= version_id
;
6883 le
->next
= first_le
;
6886 le
->se
->load_state(f
, le
->se
->opaque
, le
->version_id
);
6888 case QEMU_VM_SECTION_PART
:
6889 case QEMU_VM_SECTION_END
:
6890 section_id
= qemu_get_be32(f
);
6892 for (le
= first_le
; le
&& le
->section_id
!= section_id
; le
= le
->next
);
6894 fprintf(stderr
, "Unknown savevm section %d\n", section_id
);
6899 le
->se
->load_state(f
, le
->se
->opaque
, le
->version_id
);
6902 fprintf(stderr
, "Unknown savevm section type %d\n", section_type
);
6912 LoadStateEntry
*le
= first_le
;
6913 first_le
= first_le
->next
;
6920 /* device can contain snapshots */
6921 static int bdrv_can_snapshot(BlockDriverState
*bs
)
6924 !bdrv_is_removable(bs
) &&
6925 !bdrv_is_read_only(bs
));
6928 /* device must be snapshots in order to have a reliable snapshot */
6929 static int bdrv_has_snapshot(BlockDriverState
*bs
)
6932 !bdrv_is_removable(bs
) &&
6933 !bdrv_is_read_only(bs
));
6936 static BlockDriverState
*get_bs_snapshots(void)
6938 BlockDriverState
*bs
;
6942 return bs_snapshots
;
6943 for(i
= 0; i
<= nb_drives
; i
++) {
6944 bs
= drives_table
[i
].bdrv
;
6945 if (bdrv_can_snapshot(bs
))
6954 static int bdrv_snapshot_find(BlockDriverState
*bs
, QEMUSnapshotInfo
*sn_info
,
6957 QEMUSnapshotInfo
*sn_tab
, *sn
;
6961 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
6964 for(i
= 0; i
< nb_sns
; i
++) {
6966 if (!strcmp(sn
->id_str
, name
) || !strcmp(sn
->name
, name
)) {
6976 void do_savevm(const char *name
)
6978 BlockDriverState
*bs
, *bs1
;
6979 QEMUSnapshotInfo sn1
, *sn
= &sn1
, old_sn1
, *old_sn
= &old_sn1
;
6980 int must_delete
, ret
, i
;
6981 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
6983 int saved_vm_running
;
6990 bs
= get_bs_snapshots();
6992 term_printf("No block device can accept snapshots\n");
6996 /* ??? Should this occur after vm_stop? */
6999 saved_vm_running
= vm_running
;
7004 ret
= bdrv_snapshot_find(bs
, old_sn
, name
);
7009 memset(sn
, 0, sizeof(*sn
));
7011 pstrcpy(sn
->name
, sizeof(sn
->name
), old_sn
->name
);
7012 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), old_sn
->id_str
);
7015 pstrcpy(sn
->name
, sizeof(sn
->name
), name
);
7018 /* fill auxiliary fields */
7021 sn
->date_sec
= tb
.time
;
7022 sn
->date_nsec
= tb
.millitm
* 1000000;
7024 gettimeofday(&tv
, NULL
);
7025 sn
->date_sec
= tv
.tv_sec
;
7026 sn
->date_nsec
= tv
.tv_usec
* 1000;
7028 sn
->vm_clock_nsec
= qemu_get_clock(vm_clock
);
7030 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7031 term_printf("Device %s does not support VM state snapshots\n",
7032 bdrv_get_device_name(bs
));
7036 /* save the VM state */
7037 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 1);
7039 term_printf("Could not open VM state file\n");
7042 ret
= qemu_savevm_state(f
);
7043 sn
->vm_state_size
= qemu_ftell(f
);
7046 term_printf("Error %d while writing VM\n", ret
);
7050 /* create the snapshots */
7052 for(i
= 0; i
< nb_drives
; i
++) {
7053 bs1
= drives_table
[i
].bdrv
;
7054 if (bdrv_has_snapshot(bs1
)) {
7056 ret
= bdrv_snapshot_delete(bs1
, old_sn
->id_str
);
7058 term_printf("Error while deleting snapshot on '%s'\n",
7059 bdrv_get_device_name(bs1
));
7062 ret
= bdrv_snapshot_create(bs1
, sn
);
7064 term_printf("Error while creating snapshot on '%s'\n",
7065 bdrv_get_device_name(bs1
));
7071 if (saved_vm_running
)
7075 void do_loadvm(const char *name
)
7077 BlockDriverState
*bs
, *bs1
;
7078 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
7081 int saved_vm_running
;
7083 bs
= get_bs_snapshots();
7085 term_printf("No block device supports snapshots\n");
7089 /* Flush all IO requests so they don't interfere with the new state. */
7092 saved_vm_running
= vm_running
;
7095 for(i
= 0; i
<= nb_drives
; i
++) {
7096 bs1
= drives_table
[i
].bdrv
;
7097 if (bdrv_has_snapshot(bs1
)) {
7098 ret
= bdrv_snapshot_goto(bs1
, name
);
7101 term_printf("Warning: ");
7104 term_printf("Snapshots not supported on device '%s'\n",
7105 bdrv_get_device_name(bs1
));
7108 term_printf("Could not find snapshot '%s' on device '%s'\n",
7109 name
, bdrv_get_device_name(bs1
));
7112 term_printf("Error %d while activating snapshot on '%s'\n",
7113 ret
, bdrv_get_device_name(bs1
));
7116 /* fatal on snapshot block device */
7123 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7124 term_printf("Device %s does not support VM state snapshots\n",
7125 bdrv_get_device_name(bs
));
7129 /* restore the VM state */
7130 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 0);
7132 term_printf("Could not open VM state file\n");
7135 ret
= qemu_loadvm_state(f
);
7138 term_printf("Error %d while loading VM state\n", ret
);
7141 if (saved_vm_running
)
7145 void do_delvm(const char *name
)
7147 BlockDriverState
*bs
, *bs1
;
7150 bs
= get_bs_snapshots();
7152 term_printf("No block device supports snapshots\n");
7156 for(i
= 0; i
<= nb_drives
; i
++) {
7157 bs1
= drives_table
[i
].bdrv
;
7158 if (bdrv_has_snapshot(bs1
)) {
7159 ret
= bdrv_snapshot_delete(bs1
, name
);
7161 if (ret
== -ENOTSUP
)
7162 term_printf("Snapshots not supported on device '%s'\n",
7163 bdrv_get_device_name(bs1
));
7165 term_printf("Error %d while deleting snapshot on '%s'\n",
7166 ret
, bdrv_get_device_name(bs1
));
7172 void do_info_snapshots(void)
7174 BlockDriverState
*bs
, *bs1
;
7175 QEMUSnapshotInfo
*sn_tab
, *sn
;
7179 bs
= get_bs_snapshots();
7181 term_printf("No available block device supports snapshots\n");
7184 term_printf("Snapshot devices:");
7185 for(i
= 0; i
<= nb_drives
; i
++) {
7186 bs1
= drives_table
[i
].bdrv
;
7187 if (bdrv_has_snapshot(bs1
)) {
7189 term_printf(" %s", bdrv_get_device_name(bs1
));
7194 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
7196 term_printf("bdrv_snapshot_list: error %d\n", nb_sns
);
7199 term_printf("Snapshot list (from %s):\n", bdrv_get_device_name(bs
));
7200 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), NULL
));
7201 for(i
= 0; i
< nb_sns
; i
++) {
7203 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), sn
));
7208 /***********************************************************/
7209 /* ram save/restore */
7211 static int ram_get_page(QEMUFile
*f
, uint8_t *buf
, int len
)
7215 v
= qemu_get_byte(f
);
7218 if (qemu_get_buffer(f
, buf
, len
) != len
)
7222 v
= qemu_get_byte(f
);
7223 memset(buf
, v
, len
);
7231 static int ram_load_v1(QEMUFile
*f
, void *opaque
)
7236 if (qemu_get_be32(f
) != phys_ram_size
)
7238 for(i
= 0; i
< phys_ram_size
; i
+= TARGET_PAGE_SIZE
) {
7239 ret
= ram_get_page(f
, phys_ram_base
+ i
, TARGET_PAGE_SIZE
);
7246 #define BDRV_HASH_BLOCK_SIZE 1024
7247 #define IOBUF_SIZE 4096
7248 #define RAM_CBLOCK_MAGIC 0xfabe
7250 typedef struct RamDecompressState
{
7253 uint8_t buf
[IOBUF_SIZE
];
7254 } RamDecompressState
;
7256 static int ram_decompress_open(RamDecompressState
*s
, QEMUFile
*f
)
7259 memset(s
, 0, sizeof(*s
));
7261 ret
= inflateInit(&s
->zstream
);
7267 static int ram_decompress_buf(RamDecompressState
*s
, uint8_t *buf
, int len
)
7271 s
->zstream
.avail_out
= len
;
7272 s
->zstream
.next_out
= buf
;
7273 while (s
->zstream
.avail_out
> 0) {
7274 if (s
->zstream
.avail_in
== 0) {
7275 if (qemu_get_be16(s
->f
) != RAM_CBLOCK_MAGIC
)
7277 clen
= qemu_get_be16(s
->f
);
7278 if (clen
> IOBUF_SIZE
)
7280 qemu_get_buffer(s
->f
, s
->buf
, clen
);
7281 s
->zstream
.avail_in
= clen
;
7282 s
->zstream
.next_in
= s
->buf
;
7284 ret
= inflate(&s
->zstream
, Z_PARTIAL_FLUSH
);
7285 if (ret
!= Z_OK
&& ret
!= Z_STREAM_END
) {
7292 static void ram_decompress_close(RamDecompressState
*s
)
7294 inflateEnd(&s
->zstream
);
7297 #define RAM_SAVE_FLAG_FULL 0x01
7298 #define RAM_SAVE_FLAG_COMPRESS 0x02
7299 #define RAM_SAVE_FLAG_MEM_SIZE 0x04
7300 #define RAM_SAVE_FLAG_PAGE 0x08
7301 #define RAM_SAVE_FLAG_EOS 0x10
7303 static int is_dup_page(uint8_t *page
, uint8_t ch
)
7305 uint32_t val
= ch
<< 24 | ch
<< 16 | ch
<< 8 | ch
;
7306 uint32_t *array
= (uint32_t *)page
;
7309 for (i
= 0; i
< (TARGET_PAGE_SIZE
/ 4); i
++) {
7310 if (array
[i
] != val
)
7317 static int ram_save_block(QEMUFile
*f
)
7319 static ram_addr_t current_addr
= 0;
7320 ram_addr_t saved_addr
= current_addr
;
7321 ram_addr_t addr
= 0;
7324 while (addr
< phys_ram_size
) {
7325 if (cpu_physical_memory_get_dirty(current_addr
, MIGRATION_DIRTY_FLAG
)) {
7328 cpu_physical_memory_reset_dirty(current_addr
,
7329 current_addr
+ TARGET_PAGE_SIZE
,
7330 MIGRATION_DIRTY_FLAG
);
7332 ch
= *(phys_ram_base
+ current_addr
);
7334 if (is_dup_page(phys_ram_base
+ current_addr
, ch
)) {
7335 qemu_put_be64(f
, current_addr
| RAM_SAVE_FLAG_COMPRESS
);
7336 qemu_put_byte(f
, ch
);
7338 qemu_put_be64(f
, current_addr
| RAM_SAVE_FLAG_PAGE
);
7339 qemu_put_buffer(f
, phys_ram_base
+ current_addr
, TARGET_PAGE_SIZE
);
7345 addr
+= TARGET_PAGE_SIZE
;
7346 current_addr
= (saved_addr
+ addr
) % phys_ram_size
;
7352 static ram_addr_t ram_save_threshold
= 10;
7354 static ram_addr_t
ram_save_remaining(void)
7357 ram_addr_t count
= 0;
7359 for (addr
= 0; addr
< phys_ram_size
; addr
+= TARGET_PAGE_SIZE
) {
7360 if (cpu_physical_memory_get_dirty(addr
, MIGRATION_DIRTY_FLAG
))
7367 static int ram_save_live(QEMUFile
*f
, int stage
, void *opaque
)
7372 /* Make sure all dirty bits are set */
7373 for (addr
= 0; addr
< phys_ram_size
; addr
+= TARGET_PAGE_SIZE
) {
7374 if (!cpu_physical_memory_get_dirty(addr
, MIGRATION_DIRTY_FLAG
))
7375 cpu_physical_memory_set_dirty(addr
);
7378 /* Enable dirty memory tracking */
7379 cpu_physical_memory_set_dirty_tracking(1);
7381 qemu_put_be64(f
, phys_ram_size
| RAM_SAVE_FLAG_MEM_SIZE
);
7384 while (!qemu_file_rate_limit(f
)) {
7387 ret
= ram_save_block(f
);
7388 if (ret
== 0) /* no more blocks */
7392 /* try transferring iterative blocks of memory */
7395 cpu_physical_memory_set_dirty_tracking(0);
7397 /* flush all remaining blocks regardless of rate limiting */
7398 while (ram_save_block(f
) != 0);
7401 qemu_put_be64(f
, RAM_SAVE_FLAG_EOS
);
7403 return (stage
== 2) && (ram_save_remaining() < ram_save_threshold
);
7406 static int ram_load_dead(QEMUFile
*f
, void *opaque
)
7408 RamDecompressState s1
, *s
= &s1
;
7412 if (ram_decompress_open(s
, f
) < 0)
7414 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
7415 if (ram_decompress_buf(s
, buf
, 1) < 0) {
7416 fprintf(stderr
, "Error while reading ram block header\n");
7420 if (ram_decompress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
) < 0) {
7421 fprintf(stderr
, "Error while reading ram block address=0x%08" PRIx64
, (uint64_t)i
);
7426 printf("Error block header\n");
7430 ram_decompress_close(s
);
7435 static int ram_load(QEMUFile
*f
, void *opaque
, int version_id
)
7440 if (version_id
== 1)
7441 return ram_load_v1(f
, opaque
);
7443 if (version_id
== 2) {
7444 if (qemu_get_be32(f
) != phys_ram_size
)
7446 return ram_load_dead(f
, opaque
);
7449 if (version_id
!= 3)
7453 addr
= qemu_get_be64(f
);
7455 flags
= addr
& ~TARGET_PAGE_MASK
;
7456 addr
&= TARGET_PAGE_MASK
;
7458 if (flags
& RAM_SAVE_FLAG_MEM_SIZE
) {
7459 if (addr
!= phys_ram_size
)
7463 if (flags
& RAM_SAVE_FLAG_FULL
) {
7464 if (ram_load_dead(f
, opaque
) < 0)
7468 if (flags
& RAM_SAVE_FLAG_COMPRESS
) {
7469 uint8_t ch
= qemu_get_byte(f
);
7470 memset(phys_ram_base
+ addr
, ch
, TARGET_PAGE_SIZE
);
7471 } else if (flags
& RAM_SAVE_FLAG_PAGE
)
7472 qemu_get_buffer(f
, phys_ram_base
+ addr
, TARGET_PAGE_SIZE
);
7473 } while (!(flags
& RAM_SAVE_FLAG_EOS
));
7478 /***********************************************************/
7479 /* bottom halves (can be seen as timers which expire ASAP) */
7488 static QEMUBH
*first_bh
= NULL
;
7490 QEMUBH
*qemu_bh_new(QEMUBHFunc
*cb
, void *opaque
)
7493 bh
= qemu_mallocz(sizeof(QEMUBH
));
7497 bh
->opaque
= opaque
;
7501 int qemu_bh_poll(void)
7520 void qemu_bh_schedule(QEMUBH
*bh
)
7522 CPUState
*env
= cpu_single_env
;
7526 bh
->next
= first_bh
;
7529 /* stop the currently executing CPU to execute the BH ASAP */
7531 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
7535 void qemu_bh_cancel(QEMUBH
*bh
)
7538 if (bh
->scheduled
) {
7541 pbh
= &(*pbh
)->next
;
7547 void qemu_bh_delete(QEMUBH
*bh
)
7553 /***********************************************************/
7554 /* machine registration */
7556 static QEMUMachine
*first_machine
= NULL
;
7558 int qemu_register_machine(QEMUMachine
*m
)
7561 pm
= &first_machine
;
7569 static QEMUMachine
*find_machine(const char *name
)
7573 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
7574 if (!strcmp(m
->name
, name
))
7580 /***********************************************************/
7581 /* main execution loop */
7583 static void gui_update(void *opaque
)
7585 DisplayState
*ds
= opaque
;
7586 ds
->dpy_refresh(ds
);
7587 qemu_mod_timer(ds
->gui_timer
,
7588 (ds
->gui_timer_interval
?
7589 ds
->gui_timer_interval
:
7590 GUI_REFRESH_INTERVAL
)
7591 + qemu_get_clock(rt_clock
));
7594 struct vm_change_state_entry
{
7595 VMChangeStateHandler
*cb
;
7597 LIST_ENTRY (vm_change_state_entry
) entries
;
7600 static LIST_HEAD(vm_change_state_head
, vm_change_state_entry
) vm_change_state_head
;
7602 VMChangeStateEntry
*qemu_add_vm_change_state_handler(VMChangeStateHandler
*cb
,
7605 VMChangeStateEntry
*e
;
7607 e
= qemu_mallocz(sizeof (*e
));
7613 LIST_INSERT_HEAD(&vm_change_state_head
, e
, entries
);
7617 void qemu_del_vm_change_state_handler(VMChangeStateEntry
*e
)
7619 LIST_REMOVE (e
, entries
);
7623 static void vm_state_notify(int running
)
7625 VMChangeStateEntry
*e
;
7627 for (e
= vm_change_state_head
.lh_first
; e
; e
= e
->entries
.le_next
) {
7628 e
->cb(e
->opaque
, running
);
7632 /* XXX: support several handlers */
7633 static VMStopHandler
*vm_stop_cb
;
7634 static void *vm_stop_opaque
;
7636 int qemu_add_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7639 vm_stop_opaque
= opaque
;
7643 void qemu_del_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7654 qemu_rearm_alarm_timer(alarm_timer
);
7658 void vm_stop(int reason
)
7661 cpu_disable_ticks();
7665 vm_stop_cb(vm_stop_opaque
, reason
);
7672 /* reset/shutdown handler */
7674 typedef struct QEMUResetEntry
{
7675 QEMUResetHandler
*func
;
7677 struct QEMUResetEntry
*next
;
7680 static QEMUResetEntry
*first_reset_entry
;
7681 static int reset_requested
;
7682 static int shutdown_requested
;
7683 static int powerdown_requested
;
7685 int qemu_shutdown_requested(void)
7687 int r
= shutdown_requested
;
7688 shutdown_requested
= 0;
7692 int qemu_reset_requested(void)
7694 int r
= reset_requested
;
7695 reset_requested
= 0;
7699 int qemu_powerdown_requested(void)
7701 int r
= powerdown_requested
;
7702 powerdown_requested
= 0;
7706 void qemu_register_reset(QEMUResetHandler
*func
, void *opaque
)
7708 QEMUResetEntry
**pre
, *re
;
7710 pre
= &first_reset_entry
;
7711 while (*pre
!= NULL
)
7712 pre
= &(*pre
)->next
;
7713 re
= qemu_mallocz(sizeof(QEMUResetEntry
));
7715 re
->opaque
= opaque
;
7720 void qemu_system_reset(void)
7724 /* reset all devices */
7725 for(re
= first_reset_entry
; re
!= NULL
; re
= re
->next
) {
7726 re
->func(re
->opaque
);
7730 void qemu_system_reset_request(void)
7733 shutdown_requested
= 1;
7735 reset_requested
= 1;
7738 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7741 void qemu_system_shutdown_request(void)
7743 shutdown_requested
= 1;
7745 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7748 void qemu_system_powerdown_request(void)
7750 powerdown_requested
= 1;
7752 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7755 void main_loop_wait(int timeout
)
7757 IOHandlerRecord
*ioh
;
7758 fd_set rfds
, wfds
, xfds
;
7767 /* XXX: need to suppress polling by better using win32 events */
7769 for(pe
= first_polling_entry
; pe
!= NULL
; pe
= pe
->next
) {
7770 ret
|= pe
->func(pe
->opaque
);
7775 WaitObjects
*w
= &wait_objects
;
7777 ret
= WaitForMultipleObjects(w
->num
, w
->events
, FALSE
, timeout
);
7778 if (WAIT_OBJECT_0
+ 0 <= ret
&& ret
<= WAIT_OBJECT_0
+ w
->num
- 1) {
7779 if (w
->func
[ret
- WAIT_OBJECT_0
])
7780 w
->func
[ret
- WAIT_OBJECT_0
](w
->opaque
[ret
- WAIT_OBJECT_0
]);
7782 /* Check for additional signaled events */
7783 for(i
= (ret
- WAIT_OBJECT_0
+ 1); i
< w
->num
; i
++) {
7785 /* Check if event is signaled */
7786 ret2
= WaitForSingleObject(w
->events
[i
], 0);
7787 if(ret2
== WAIT_OBJECT_0
) {
7789 w
->func
[i
](w
->opaque
[i
]);
7790 } else if (ret2
== WAIT_TIMEOUT
) {
7792 err
= GetLastError();
7793 fprintf(stderr
, "WaitForSingleObject error %d %d\n", i
, err
);
7796 } else if (ret
== WAIT_TIMEOUT
) {
7798 err
= GetLastError();
7799 fprintf(stderr
, "WaitForMultipleObjects error %d %d\n", ret
, err
);
7803 /* poll any events */
7804 /* XXX: separate device handlers from system ones */
7809 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7813 (!ioh
->fd_read_poll
||
7814 ioh
->fd_read_poll(ioh
->opaque
) != 0)) {
7815 FD_SET(ioh
->fd
, &rfds
);
7819 if (ioh
->fd_write
) {
7820 FD_SET(ioh
->fd
, &wfds
);
7830 tv
.tv_usec
= timeout
* 1000;
7832 #if defined(CONFIG_SLIRP)
7834 slirp_select_fill(&nfds
, &rfds
, &wfds
, &xfds
);
7837 ret
= select(nfds
+ 1, &rfds
, &wfds
, &xfds
, &tv
);
7839 IOHandlerRecord
**pioh
;
7841 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7842 if (!ioh
->deleted
&& ioh
->fd_read
&& FD_ISSET(ioh
->fd
, &rfds
)) {
7843 ioh
->fd_read(ioh
->opaque
);
7845 if (!ioh
->deleted
&& ioh
->fd_write
&& FD_ISSET(ioh
->fd
, &wfds
)) {
7846 ioh
->fd_write(ioh
->opaque
);
7850 /* remove deleted IO handlers */
7851 pioh
= &first_io_handler
;
7861 #if defined(CONFIG_SLIRP)
7868 slirp_select_poll(&rfds
, &wfds
, &xfds
);
7873 if (likely(!(cur_cpu
->singlestep_enabled
& SSTEP_NOTIMER
)))
7874 qemu_run_timers(&active_timers
[QEMU_TIMER_VIRTUAL
],
7875 qemu_get_clock(vm_clock
));
7876 /* run dma transfers, if any */
7880 /* real time timers */
7881 qemu_run_timers(&active_timers
[QEMU_TIMER_REALTIME
],
7882 qemu_get_clock(rt_clock
));
7884 if (alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) {
7885 alarm_timer
->flags
&= ~(ALARM_FLAG_EXPIRED
);
7886 qemu_rearm_alarm_timer(alarm_timer
);
7889 /* Check bottom-halves last in case any of the earlier events triggered
7895 static int main_loop(void)
7898 #ifdef CONFIG_PROFILER
7903 cur_cpu
= first_cpu
;
7904 next_cpu
= cur_cpu
->next_cpu
?: first_cpu
;
7911 #ifdef CONFIG_PROFILER
7912 ti
= profile_getclock();
7917 qemu_icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
7918 env
->icount_decr
.u16
.low
= 0;
7919 env
->icount_extra
= 0;
7920 count
= qemu_next_deadline();
7921 count
= (count
+ (1 << icount_time_shift
) - 1)
7922 >> icount_time_shift
;
7923 qemu_icount
+= count
;
7924 decr
= (count
> 0xffff) ? 0xffff : count
;
7926 env
->icount_decr
.u16
.low
= decr
;
7927 env
->icount_extra
= count
;
7929 ret
= cpu_exec(env
);
7930 #ifdef CONFIG_PROFILER
7931 qemu_time
+= profile_getclock() - ti
;
7934 /* Fold pending instructions back into the
7935 instruction counter, and clear the interrupt flag. */
7936 qemu_icount
-= (env
->icount_decr
.u16
.low
7937 + env
->icount_extra
);
7938 env
->icount_decr
.u32
= 0;
7939 env
->icount_extra
= 0;
7941 next_cpu
= env
->next_cpu
?: first_cpu
;
7942 if (event_pending
&& likely(ret
!= EXCP_DEBUG
)) {
7943 ret
= EXCP_INTERRUPT
;
7947 if (ret
== EXCP_HLT
) {
7948 /* Give the next CPU a chance to run. */
7952 if (ret
!= EXCP_HALTED
)
7954 /* all CPUs are halted ? */
7960 if (shutdown_requested
) {
7961 ret
= EXCP_INTERRUPT
;
7969 if (reset_requested
) {
7970 reset_requested
= 0;
7971 qemu_system_reset();
7972 ret
= EXCP_INTERRUPT
;
7974 if (powerdown_requested
) {
7975 powerdown_requested
= 0;
7976 qemu_system_powerdown();
7977 ret
= EXCP_INTERRUPT
;
7979 if (unlikely(ret
== EXCP_DEBUG
)) {
7980 vm_stop(EXCP_DEBUG
);
7982 /* If all cpus are halted then wait until the next IRQ */
7983 /* XXX: use timeout computed from timers */
7984 if (ret
== EXCP_HALTED
) {
7988 /* Advance virtual time to the next event. */
7989 if (use_icount
== 1) {
7990 /* When not using an adaptive execution frequency
7991 we tend to get badly out of sync with real time,
7992 so just delay for a reasonable amount of time. */
7995 delta
= cpu_get_icount() - cpu_get_clock();
7998 /* If virtual time is ahead of real time then just
8000 timeout
= (delta
/ 1000000) + 1;
8002 /* Wait for either IO to occur or the next
8004 add
= qemu_next_deadline();
8005 /* We advance the timer before checking for IO.
8006 Limit the amount we advance so that early IO
8007 activity won't get the guest too far ahead. */
8011 add
= (add
+ (1 << icount_time_shift
) - 1)
8012 >> icount_time_shift
;
8014 timeout
= delta
/ 1000000;
8025 if (shutdown_requested
) {
8026 ret
= EXCP_INTERRUPT
;
8031 #ifdef CONFIG_PROFILER
8032 ti
= profile_getclock();
8034 main_loop_wait(timeout
);
8035 #ifdef CONFIG_PROFILER
8036 dev_time
+= profile_getclock() - ti
;
8039 cpu_disable_ticks();
8043 static void help(int exitcode
)
8045 printf("QEMU PC emulator version " QEMU_VERSION
", Copyright (c) 2003-2008 Fabrice Bellard\n"
8046 "usage: %s [options] [disk_image]\n"
8048 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
8050 "Standard options:\n"
8051 "-M machine select emulated machine (-M ? for list)\n"
8052 "-cpu cpu select CPU (-cpu ? for list)\n"
8053 "-fda/-fdb file use 'file' as floppy disk 0/1 image\n"
8054 "-hda/-hdb file use 'file' as IDE hard disk 0/1 image\n"
8055 "-hdc/-hdd file use 'file' as IDE hard disk 2/3 image\n"
8056 "-cdrom file use 'file' as IDE cdrom image (cdrom is ide1 master)\n"
8057 "-drive [file=file][,if=type][,bus=n][,unit=m][,media=d][,index=i]\n"
8058 " [,cyls=c,heads=h,secs=s[,trans=t]][,snapshot=on|off]\n"
8059 " [,cache=on|off][,format=f]\n"
8060 " use 'file' as a drive image\n"
8061 "-mtdblock file use 'file' as on-board Flash memory image\n"
8062 "-sd file use 'file' as SecureDigital card image\n"
8063 "-pflash file use 'file' as a parallel flash image\n"
8064 "-boot [a|c|d|n] boot on floppy (a), hard disk (c), CD-ROM (d), or network (n)\n"
8065 "-snapshot write to temporary files instead of disk image files\n"
8067 "-no-frame open SDL window without a frame and window decorations\n"
8068 "-alt-grab use Ctrl-Alt-Shift to grab mouse (instead of Ctrl-Alt)\n"
8069 "-no-quit disable SDL window close capability\n"
8072 "-no-fd-bootchk disable boot signature checking for floppy disks\n"
8074 "-m megs set virtual RAM size to megs MB [default=%d]\n"
8075 "-smp n set the number of CPUs to 'n' [default=1]\n"
8076 "-nographic disable graphical output and redirect serial I/Os to console\n"
8077 "-portrait rotate graphical output 90 deg left (only PXA LCD)\n"
8079 "-k language use keyboard layout (for example \"fr\" for French)\n"
8082 "-audio-help print list of audio drivers and their options\n"
8083 "-soundhw c1,... enable audio support\n"
8084 " and only specified sound cards (comma separated list)\n"
8085 " use -soundhw ? to get the list of supported cards\n"
8086 " use -soundhw all to enable all of them\n"
8088 "-vga [std|cirrus|vmware]\n"
8089 " select video card type\n"
8090 "-localtime set the real time clock to local time [default=utc]\n"
8091 "-full-screen start in full screen\n"
8093 "-win2k-hack use it when installing Windows 2000 to avoid a disk full bug\n"
8095 "-usb enable the USB driver (will be the default soon)\n"
8096 "-usbdevice name add the host or guest USB device 'name'\n"
8097 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8098 "-g WxH[xDEPTH] Set the initial graphical resolution and depth\n"
8100 "-name string set the name of the guest\n"
8101 "-uuid %%08x-%%04x-%%04x-%%04x-%%012x specify machine UUID\n"
8103 "Network options:\n"
8104 "-net nic[,vlan=n][,macaddr=addr][,model=type]\n"
8105 " create a new Network Interface Card and connect it to VLAN 'n'\n"
8107 "-net user[,vlan=n][,hostname=host]\n"
8108 " connect the user mode network stack to VLAN 'n' and send\n"
8109 " hostname 'host' to DHCP clients\n"
8112 "-net tap[,vlan=n],ifname=name\n"
8113 " connect the host TAP network interface to VLAN 'n'\n"
8115 "-net tap[,vlan=n][,fd=h][,ifname=name][,script=file][,downscript=dfile]\n"
8116 " connect the host TAP network interface to VLAN 'n' and use the\n"
8117 " network scripts 'file' (default=%s)\n"
8118 " and 'dfile' (default=%s);\n"
8119 " use '[down]script=no' to disable script execution;\n"
8120 " use 'fd=h' to connect to an already opened TAP interface\n"
8122 "-net socket[,vlan=n][,fd=h][,listen=[host]:port][,connect=host:port]\n"
8123 " connect the vlan 'n' to another VLAN using a socket connection\n"
8124 "-net socket[,vlan=n][,fd=h][,mcast=maddr:port]\n"
8125 " connect the vlan 'n' to multicast maddr and port\n"
8127 "-net vde[,vlan=n][,sock=socketpath][,port=n][,group=groupname][,mode=octalmode]\n"
8128 " connect the vlan 'n' to port 'n' of a vde switch running\n"
8129 " on host and listening for incoming connections on 'socketpath'.\n"
8130 " Use group 'groupname' and mode 'octalmode' to change default\n"
8131 " ownership and permissions for communication port.\n"
8133 "-net none use it alone to have zero network devices; if no -net option\n"
8134 " is provided, the default is '-net nic -net user'\n"
8137 "-tftp dir allow tftp access to files in dir [-net user]\n"
8138 "-bootp file advertise file in BOOTP replies\n"
8140 "-smb dir allow SMB access to files in 'dir' [-net user]\n"
8142 "-redir [tcp|udp]:host-port:[guest-host]:guest-port\n"
8143 " redirect TCP or UDP connections from host to guest [-net user]\n"
8146 "Linux boot specific:\n"
8147 "-kernel bzImage use 'bzImage' as kernel image\n"
8148 "-append cmdline use 'cmdline' as kernel command line\n"
8149 "-initrd file use 'file' as initial ram disk\n"
8151 "Debug/Expert options:\n"
8152 "-monitor dev redirect the monitor to char device 'dev'\n"
8153 "-serial dev redirect the serial port to char device 'dev'\n"
8154 "-parallel dev redirect the parallel port to char device 'dev'\n"
8155 "-pidfile file Write PID to 'file'\n"
8156 "-S freeze CPU at startup (use 'c' to start execution)\n"
8157 "-s wait gdb connection to port\n"
8158 "-p port set gdb connection port [default=%s]\n"
8159 "-d item1,... output log to %s (use -d ? for a list of log items)\n"
8160 "-hdachs c,h,s[,t] force hard disk 0 physical geometry and the optional BIOS\n"
8161 " translation (t=none or lba) (usually qemu can guess them)\n"
8162 "-L path set the directory for the BIOS, VGA BIOS and keymaps\n"
8164 "-kernel-kqemu enable KQEMU full virtualization (default is user mode only)\n"
8165 "-no-kqemu disable KQEMU kernel module usage\n"
8168 "-no-acpi disable ACPI\n"
8170 #ifdef CONFIG_CURSES
8171 "-curses use a curses/ncurses interface instead of SDL\n"
8173 "-no-reboot exit instead of rebooting\n"
8174 "-no-shutdown stop before shutdown\n"
8175 "-loadvm [tag|id] start right away with a saved state (loadvm in monitor)\n"
8176 "-vnc display start a VNC server on display\n"
8178 "-daemonize daemonize QEMU after initializing\n"
8180 "-option-rom rom load a file, rom, into the option ROM space\n"
8182 "-prom-env variable=value set OpenBIOS nvram variables\n"
8184 "-clock force the use of the given methods for timer alarm.\n"
8185 " To see what timers are available use -clock ?\n"
8186 "-startdate select initial date of the clock\n"
8187 "-icount [N|auto]\n"
8188 " Enable virtual instruction counter with 2^N clock ticks per instruction\n"
8190 "During emulation, the following keys are useful:\n"
8191 "ctrl-alt-f toggle full screen\n"
8192 "ctrl-alt-n switch to virtual console 'n'\n"
8193 "ctrl-alt toggle mouse and keyboard grab\n"
8195 "When using -nographic, press 'ctrl-a h' to get some help.\n"
8200 DEFAULT_NETWORK_SCRIPT
,
8201 DEFAULT_NETWORK_DOWN_SCRIPT
,
8203 DEFAULT_GDBSTUB_PORT
,
8208 #define HAS_ARG 0x0001
8223 QEMU_OPTION_mtdblock
,
8227 QEMU_OPTION_snapshot
,
8229 QEMU_OPTION_no_fd_bootchk
,
8232 QEMU_OPTION_nographic
,
8233 QEMU_OPTION_portrait
,
8235 QEMU_OPTION_audio_help
,
8236 QEMU_OPTION_soundhw
,
8257 QEMU_OPTION_localtime
,
8261 QEMU_OPTION_monitor
,
8263 QEMU_OPTION_parallel
,
8265 QEMU_OPTION_full_screen
,
8266 QEMU_OPTION_no_frame
,
8267 QEMU_OPTION_alt_grab
,
8268 QEMU_OPTION_no_quit
,
8269 QEMU_OPTION_pidfile
,
8270 QEMU_OPTION_no_kqemu
,
8271 QEMU_OPTION_kernel_kqemu
,
8272 QEMU_OPTION_win2k_hack
,
8274 QEMU_OPTION_usbdevice
,
8277 QEMU_OPTION_no_acpi
,
8279 QEMU_OPTION_no_reboot
,
8280 QEMU_OPTION_no_shutdown
,
8281 QEMU_OPTION_show_cursor
,
8282 QEMU_OPTION_daemonize
,
8283 QEMU_OPTION_option_rom
,
8284 QEMU_OPTION_semihosting
,
8286 QEMU_OPTION_prom_env
,
8287 QEMU_OPTION_old_param
,
8289 QEMU_OPTION_startdate
,
8290 QEMU_OPTION_tb_size
,
8295 typedef struct QEMUOption
{
8301 static const QEMUOption qemu_options
[] = {
8302 { "h", 0, QEMU_OPTION_h
},
8303 { "help", 0, QEMU_OPTION_h
},
8305 { "M", HAS_ARG
, QEMU_OPTION_M
},
8306 { "cpu", HAS_ARG
, QEMU_OPTION_cpu
},
8307 { "fda", HAS_ARG
, QEMU_OPTION_fda
},
8308 { "fdb", HAS_ARG
, QEMU_OPTION_fdb
},
8309 { "hda", HAS_ARG
, QEMU_OPTION_hda
},
8310 { "hdb", HAS_ARG
, QEMU_OPTION_hdb
},
8311 { "hdc", HAS_ARG
, QEMU_OPTION_hdc
},
8312 { "hdd", HAS_ARG
, QEMU_OPTION_hdd
},
8313 { "drive", HAS_ARG
, QEMU_OPTION_drive
},
8314 { "cdrom", HAS_ARG
, QEMU_OPTION_cdrom
},
8315 { "mtdblock", HAS_ARG
, QEMU_OPTION_mtdblock
},
8316 { "sd", HAS_ARG
, QEMU_OPTION_sd
},
8317 { "pflash", HAS_ARG
, QEMU_OPTION_pflash
},
8318 { "boot", HAS_ARG
, QEMU_OPTION_boot
},
8319 { "snapshot", 0, QEMU_OPTION_snapshot
},
8321 { "no-fd-bootchk", 0, QEMU_OPTION_no_fd_bootchk
},
8323 { "m", HAS_ARG
, QEMU_OPTION_m
},
8324 { "nographic", 0, QEMU_OPTION_nographic
},
8325 { "portrait", 0, QEMU_OPTION_portrait
},
8326 { "k", HAS_ARG
, QEMU_OPTION_k
},
8328 { "audio-help", 0, QEMU_OPTION_audio_help
},
8329 { "soundhw", HAS_ARG
, QEMU_OPTION_soundhw
},
8332 { "net", HAS_ARG
, QEMU_OPTION_net
},
8334 { "tftp", HAS_ARG
, QEMU_OPTION_tftp
},
8335 { "bootp", HAS_ARG
, QEMU_OPTION_bootp
},
8337 { "smb", HAS_ARG
, QEMU_OPTION_smb
},
8339 { "redir", HAS_ARG
, QEMU_OPTION_redir
},
8342 { "kernel", HAS_ARG
, QEMU_OPTION_kernel
},
8343 { "append", HAS_ARG
, QEMU_OPTION_append
},
8344 { "initrd", HAS_ARG
, QEMU_OPTION_initrd
},
8346 { "S", 0, QEMU_OPTION_S
},
8347 { "s", 0, QEMU_OPTION_s
},
8348 { "p", HAS_ARG
, QEMU_OPTION_p
},
8349 { "d", HAS_ARG
, QEMU_OPTION_d
},
8350 { "hdachs", HAS_ARG
, QEMU_OPTION_hdachs
},
8351 { "L", HAS_ARG
, QEMU_OPTION_L
},
8352 { "bios", HAS_ARG
, QEMU_OPTION_bios
},
8354 { "no-kqemu", 0, QEMU_OPTION_no_kqemu
},
8355 { "kernel-kqemu", 0, QEMU_OPTION_kernel_kqemu
},
8357 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8358 { "g", 1, QEMU_OPTION_g
},
8360 { "localtime", 0, QEMU_OPTION_localtime
},
8361 { "vga", HAS_ARG
, QEMU_OPTION_vga
},
8362 { "echr", HAS_ARG
, QEMU_OPTION_echr
},
8363 { "monitor", HAS_ARG
, QEMU_OPTION_monitor
},
8364 { "serial", HAS_ARG
, QEMU_OPTION_serial
},
8365 { "parallel", HAS_ARG
, QEMU_OPTION_parallel
},
8366 { "loadvm", HAS_ARG
, QEMU_OPTION_loadvm
},
8367 { "full-screen", 0, QEMU_OPTION_full_screen
},
8369 { "no-frame", 0, QEMU_OPTION_no_frame
},
8370 { "alt-grab", 0, QEMU_OPTION_alt_grab
},
8371 { "no-quit", 0, QEMU_OPTION_no_quit
},
8373 { "pidfile", HAS_ARG
, QEMU_OPTION_pidfile
},
8374 { "win2k-hack", 0, QEMU_OPTION_win2k_hack
},
8375 { "usbdevice", HAS_ARG
, QEMU_OPTION_usbdevice
},
8376 { "smp", HAS_ARG
, QEMU_OPTION_smp
},
8377 { "vnc", HAS_ARG
, QEMU_OPTION_vnc
},
8378 #ifdef CONFIG_CURSES
8379 { "curses", 0, QEMU_OPTION_curses
},
8381 { "uuid", HAS_ARG
, QEMU_OPTION_uuid
},
8383 /* temporary options */
8384 { "usb", 0, QEMU_OPTION_usb
},
8385 { "no-acpi", 0, QEMU_OPTION_no_acpi
},
8386 { "no-reboot", 0, QEMU_OPTION_no_reboot
},
8387 { "no-shutdown", 0, QEMU_OPTION_no_shutdown
},
8388 { "show-cursor", 0, QEMU_OPTION_show_cursor
},
8389 { "daemonize", 0, QEMU_OPTION_daemonize
},
8390 { "option-rom", HAS_ARG
, QEMU_OPTION_option_rom
},
8391 #if defined(TARGET_ARM) || defined(TARGET_M68K)
8392 { "semihosting", 0, QEMU_OPTION_semihosting
},
8394 { "name", HAS_ARG
, QEMU_OPTION_name
},
8395 #if defined(TARGET_SPARC)
8396 { "prom-env", HAS_ARG
, QEMU_OPTION_prom_env
},
8398 #if defined(TARGET_ARM)
8399 { "old-param", 0, QEMU_OPTION_old_param
},
8401 { "clock", HAS_ARG
, QEMU_OPTION_clock
},
8402 { "startdate", HAS_ARG
, QEMU_OPTION_startdate
},
8403 { "tb-size", HAS_ARG
, QEMU_OPTION_tb_size
},
8404 { "icount", HAS_ARG
, QEMU_OPTION_icount
},
8408 /* password input */
8410 int qemu_key_check(BlockDriverState
*bs
, const char *name
)
8415 if (!bdrv_is_encrypted(bs
))
8418 term_printf("%s is encrypted.\n", name
);
8419 for(i
= 0; i
< 3; i
++) {
8420 monitor_readline("Password: ", 1, password
, sizeof(password
));
8421 if (bdrv_set_key(bs
, password
) == 0)
8423 term_printf("invalid password\n");
8428 static BlockDriverState
*get_bdrv(int index
)
8430 if (index
> nb_drives
)
8432 return drives_table
[index
].bdrv
;
8435 static void read_passwords(void)
8437 BlockDriverState
*bs
;
8440 for(i
= 0; i
< 6; i
++) {
8443 qemu_key_check(bs
, bdrv_get_device_name(bs
));
8448 struct soundhw soundhw
[] = {
8449 #ifdef HAS_AUDIO_CHOICE
8450 #if defined(TARGET_I386) || defined(TARGET_MIPS)
8456 { .init_isa
= pcspk_audio_init
}
8461 "Creative Sound Blaster 16",
8464 { .init_isa
= SB16_init
}
8467 #ifdef CONFIG_CS4231A
8473 { .init_isa
= cs4231a_init
}
8481 "Yamaha YMF262 (OPL3)",
8483 "Yamaha YM3812 (OPL2)",
8487 { .init_isa
= Adlib_init
}
8494 "Gravis Ultrasound GF1",
8497 { .init_isa
= GUS_init
}
8504 "Intel 82801AA AC97 Audio",
8507 { .init_pci
= ac97_init
}
8513 "ENSONIQ AudioPCI ES1370",
8516 { .init_pci
= es1370_init
}
8520 { NULL
, NULL
, 0, 0, { NULL
} }
8523 static void select_soundhw (const char *optarg
)
8527 if (*optarg
== '?') {
8530 printf ("Valid sound card names (comma separated):\n");
8531 for (c
= soundhw
; c
->name
; ++c
) {
8532 printf ("%-11s %s\n", c
->name
, c
->descr
);
8534 printf ("\n-soundhw all will enable all of the above\n");
8535 exit (*optarg
!= '?');
8543 if (!strcmp (optarg
, "all")) {
8544 for (c
= soundhw
; c
->name
; ++c
) {
8552 e
= strchr (p
, ',');
8553 l
= !e
? strlen (p
) : (size_t) (e
- p
);
8555 for (c
= soundhw
; c
->name
; ++c
) {
8556 if (!strncmp (c
->name
, p
, l
)) {
8565 "Unknown sound card name (too big to show)\n");
8568 fprintf (stderr
, "Unknown sound card name `%.*s'\n",
8573 p
+= l
+ (e
!= NULL
);
8577 goto show_valid_cards
;
8582 static void select_vgahw (const char *p
)
8586 if (strstart(p
, "std", &opts
)) {
8587 cirrus_vga_enabled
= 0;
8589 } else if (strstart(p
, "cirrus", &opts
)) {
8590 cirrus_vga_enabled
= 1;
8592 } else if (strstart(p
, "vmware", &opts
)) {
8593 cirrus_vga_enabled
= 0;
8597 fprintf(stderr
, "Unknown vga type: %s\n", p
);
8601 const char *nextopt
;
8603 if (strstart(opts
, ",retrace=", &nextopt
)) {
8605 if (strstart(opts
, "dumb", &nextopt
))
8606 vga_retrace_method
= VGA_RETRACE_DUMB
;
8607 else if (strstart(opts
, "precise", &nextopt
))
8608 vga_retrace_method
= VGA_RETRACE_PRECISE
;
8609 else goto invalid_vga
;
8610 } else goto invalid_vga
;
8616 static BOOL WINAPI
qemu_ctrl_handler(DWORD type
)
8618 exit(STATUS_CONTROL_C_EXIT
);
8623 static int qemu_uuid_parse(const char *str
, uint8_t *uuid
)
8627 if(strlen(str
) != 36)
8630 ret
= sscanf(str
, UUID_FMT
, &uuid
[0], &uuid
[1], &uuid
[2], &uuid
[3],
8631 &uuid
[4], &uuid
[5], &uuid
[6], &uuid
[7], &uuid
[8], &uuid
[9],
8632 &uuid
[10], &uuid
[11], &uuid
[12], &uuid
[13], &uuid
[14], &uuid
[15]);
8640 #define MAX_NET_CLIENTS 32
8644 static void termsig_handler(int signal
)
8646 qemu_system_shutdown_request();
8649 static void termsig_setup(void)
8651 struct sigaction act
;
8653 memset(&act
, 0, sizeof(act
));
8654 act
.sa_handler
= termsig_handler
;
8655 sigaction(SIGINT
, &act
, NULL
);
8656 sigaction(SIGHUP
, &act
, NULL
);
8657 sigaction(SIGTERM
, &act
, NULL
);
8662 int main(int argc
, char **argv
)
8664 #ifdef CONFIG_GDBSTUB
8666 const char *gdbstub_port
;
8668 uint32_t boot_devices_bitmap
= 0;
8670 int snapshot
, linux_boot
, net_boot
;
8671 const char *initrd_filename
;
8672 const char *kernel_filename
, *kernel_cmdline
;
8673 const char *boot_devices
= "";
8674 DisplayState
*ds
= &display_state
;
8675 int cyls
, heads
, secs
, translation
;
8676 const char *net_clients
[MAX_NET_CLIENTS
];
8680 const char *r
, *optarg
;
8681 CharDriverState
*monitor_hd
;
8682 const char *monitor_device
;
8683 const char *serial_devices
[MAX_SERIAL_PORTS
];
8684 int serial_device_index
;
8685 const char *parallel_devices
[MAX_PARALLEL_PORTS
];
8686 int parallel_device_index
;
8687 const char *loadvm
= NULL
;
8688 QEMUMachine
*machine
;
8689 const char *cpu_model
;
8690 const char *usb_devices
[MAX_USB_CMDLINE
];
8691 int usb_devices_index
;
8694 const char *pid_file
= NULL
;
8698 LIST_INIT (&vm_change_state_head
);
8701 struct sigaction act
;
8702 sigfillset(&act
.sa_mask
);
8704 act
.sa_handler
= SIG_IGN
;
8705 sigaction(SIGPIPE
, &act
, NULL
);
8708 SetConsoleCtrlHandler(qemu_ctrl_handler
, TRUE
);
8709 /* Note: cpu_interrupt() is currently not SMP safe, so we force
8710 QEMU to run on a single CPU */
8715 h
= GetCurrentProcess();
8716 if (GetProcessAffinityMask(h
, &mask
, &smask
)) {
8717 for(i
= 0; i
< 32; i
++) {
8718 if (mask
& (1 << i
))
8723 SetProcessAffinityMask(h
, mask
);
8729 register_machines();
8730 machine
= first_machine
;
8732 initrd_filename
= NULL
;
8734 vga_ram_size
= VGA_RAM_SIZE
;
8735 #ifdef CONFIG_GDBSTUB
8737 gdbstub_port
= DEFAULT_GDBSTUB_PORT
;
8742 kernel_filename
= NULL
;
8743 kernel_cmdline
= "";
8744 cyls
= heads
= secs
= 0;
8745 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8746 monitor_device
= "vc";
8748 serial_devices
[0] = "vc:80Cx24C";
8749 for(i
= 1; i
< MAX_SERIAL_PORTS
; i
++)
8750 serial_devices
[i
] = NULL
;
8751 serial_device_index
= 0;
8753 parallel_devices
[0] = "vc:640x480";
8754 for(i
= 1; i
< MAX_PARALLEL_PORTS
; i
++)
8755 parallel_devices
[i
] = NULL
;
8756 parallel_device_index
= 0;
8758 usb_devices_index
= 0;
8776 hda_index
= drive_add(argv
[optind
++], HD_ALIAS
, 0);
8778 const QEMUOption
*popt
;
8781 /* Treat --foo the same as -foo. */
8784 popt
= qemu_options
;
8787 fprintf(stderr
, "%s: invalid option -- '%s'\n",
8791 if (!strcmp(popt
->name
, r
+ 1))
8795 if (popt
->flags
& HAS_ARG
) {
8796 if (optind
>= argc
) {
8797 fprintf(stderr
, "%s: option '%s' requires an argument\n",
8801 optarg
= argv
[optind
++];
8806 switch(popt
->index
) {
8808 machine
= find_machine(optarg
);
8811 printf("Supported machines are:\n");
8812 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
8813 printf("%-10s %s%s\n",
8815 m
== first_machine
? " (default)" : "");
8817 exit(*optarg
!= '?');
8820 case QEMU_OPTION_cpu
:
8821 /* hw initialization will check this */
8822 if (*optarg
== '?') {
8823 /* XXX: implement xxx_cpu_list for targets that still miss it */
8824 #if defined(cpu_list)
8825 cpu_list(stdout
, &fprintf
);
8832 case QEMU_OPTION_initrd
:
8833 initrd_filename
= optarg
;
8835 case QEMU_OPTION_hda
:
8837 hda_index
= drive_add(optarg
, HD_ALIAS
, 0);
8839 hda_index
= drive_add(optarg
, HD_ALIAS
8840 ",cyls=%d,heads=%d,secs=%d%s",
8841 0, cyls
, heads
, secs
,
8842 translation
== BIOS_ATA_TRANSLATION_LBA
?
8844 translation
== BIOS_ATA_TRANSLATION_NONE
?
8845 ",trans=none" : "");
8847 case QEMU_OPTION_hdb
:
8848 case QEMU_OPTION_hdc
:
8849 case QEMU_OPTION_hdd
:
8850 drive_add(optarg
, HD_ALIAS
, popt
->index
- QEMU_OPTION_hda
);
8852 case QEMU_OPTION_drive
:
8853 drive_add(NULL
, "%s", optarg
);
8855 case QEMU_OPTION_mtdblock
:
8856 drive_add(optarg
, MTD_ALIAS
);
8858 case QEMU_OPTION_sd
:
8859 drive_add(optarg
, SD_ALIAS
);
8861 case QEMU_OPTION_pflash
:
8862 drive_add(optarg
, PFLASH_ALIAS
);
8864 case QEMU_OPTION_snapshot
:
8867 case QEMU_OPTION_hdachs
:
8871 cyls
= strtol(p
, (char **)&p
, 0);
8872 if (cyls
< 1 || cyls
> 16383)
8877 heads
= strtol(p
, (char **)&p
, 0);
8878 if (heads
< 1 || heads
> 16)
8883 secs
= strtol(p
, (char **)&p
, 0);
8884 if (secs
< 1 || secs
> 63)
8888 if (!strcmp(p
, "none"))
8889 translation
= BIOS_ATA_TRANSLATION_NONE
;
8890 else if (!strcmp(p
, "lba"))
8891 translation
= BIOS_ATA_TRANSLATION_LBA
;
8892 else if (!strcmp(p
, "auto"))
8893 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8896 } else if (*p
!= '\0') {
8898 fprintf(stderr
, "qemu: invalid physical CHS format\n");
8901 if (hda_index
!= -1)
8902 snprintf(drives_opt
[hda_index
].opt
,
8903 sizeof(drives_opt
[hda_index
].opt
),
8904 HD_ALIAS
",cyls=%d,heads=%d,secs=%d%s",
8905 0, cyls
, heads
, secs
,
8906 translation
== BIOS_ATA_TRANSLATION_LBA
?
8908 translation
== BIOS_ATA_TRANSLATION_NONE
?
8909 ",trans=none" : "");
8912 case QEMU_OPTION_nographic
:
8915 #ifdef CONFIG_CURSES
8916 case QEMU_OPTION_curses
:
8920 case QEMU_OPTION_portrait
:
8923 case QEMU_OPTION_kernel
:
8924 kernel_filename
= optarg
;
8926 case QEMU_OPTION_append
:
8927 kernel_cmdline
= optarg
;
8929 case QEMU_OPTION_cdrom
:
8930 drive_add(optarg
, CDROM_ALIAS
);
8932 case QEMU_OPTION_boot
:
8933 boot_devices
= optarg
;
8934 /* We just do some generic consistency checks */
8936 /* Could easily be extended to 64 devices if needed */
8939 boot_devices_bitmap
= 0;
8940 for (p
= boot_devices
; *p
!= '\0'; p
++) {
8941 /* Allowed boot devices are:
8942 * a b : floppy disk drives
8943 * c ... f : IDE disk drives
8944 * g ... m : machine implementation dependant drives
8945 * n ... p : network devices
8946 * It's up to each machine implementation to check
8947 * if the given boot devices match the actual hardware
8948 * implementation and firmware features.
8950 if (*p
< 'a' || *p
> 'q') {
8951 fprintf(stderr
, "Invalid boot device '%c'\n", *p
);
8954 if (boot_devices_bitmap
& (1 << (*p
- 'a'))) {
8956 "Boot device '%c' was given twice\n",*p
);
8959 boot_devices_bitmap
|= 1 << (*p
- 'a');
8963 case QEMU_OPTION_fda
:
8964 case QEMU_OPTION_fdb
:
8965 drive_add(optarg
, FD_ALIAS
, popt
->index
- QEMU_OPTION_fda
);
8968 case QEMU_OPTION_no_fd_bootchk
:
8972 case QEMU_OPTION_net
:
8973 if (nb_net_clients
>= MAX_NET_CLIENTS
) {
8974 fprintf(stderr
, "qemu: too many network clients\n");
8977 net_clients
[nb_net_clients
] = optarg
;
8981 case QEMU_OPTION_tftp
:
8982 tftp_prefix
= optarg
;
8984 case QEMU_OPTION_bootp
:
8985 bootp_filename
= optarg
;
8988 case QEMU_OPTION_smb
:
8989 net_slirp_smb(optarg
);
8992 case QEMU_OPTION_redir
:
8993 net_slirp_redir(optarg
);
8997 case QEMU_OPTION_audio_help
:
9001 case QEMU_OPTION_soundhw
:
9002 select_soundhw (optarg
);
9008 case QEMU_OPTION_m
: {
9012 value
= strtoul(optarg
, &ptr
, 10);
9014 case 0: case 'M': case 'm':
9021 fprintf(stderr
, "qemu: invalid ram size: %s\n", optarg
);
9025 /* On 32-bit hosts, QEMU is limited by virtual address space */
9026 if (value
> (2047 << 20)
9028 && HOST_LONG_BITS
== 32
9031 fprintf(stderr
, "qemu: at most 2047 MB RAM can be simulated\n");
9034 if (value
!= (uint64_t)(ram_addr_t
)value
) {
9035 fprintf(stderr
, "qemu: ram size too large\n");
9044 const CPULogItem
*item
;
9046 mask
= cpu_str_to_log_mask(optarg
);
9048 printf("Log items (comma separated):\n");
9049 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
9050 printf("%-10s %s\n", item
->name
, item
->help
);
9057 #ifdef CONFIG_GDBSTUB
9062 gdbstub_port
= optarg
;
9068 case QEMU_OPTION_bios
:
9075 keyboard_layout
= optarg
;
9077 case QEMU_OPTION_localtime
:
9080 case QEMU_OPTION_vga
:
9081 select_vgahw (optarg
);
9088 w
= strtol(p
, (char **)&p
, 10);
9091 fprintf(stderr
, "qemu: invalid resolution or depth\n");
9097 h
= strtol(p
, (char **)&p
, 10);
9102 depth
= strtol(p
, (char **)&p
, 10);
9103 if (depth
!= 8 && depth
!= 15 && depth
!= 16 &&
9104 depth
!= 24 && depth
!= 32)
9106 } else if (*p
== '\0') {
9107 depth
= graphic_depth
;
9114 graphic_depth
= depth
;
9117 case QEMU_OPTION_echr
:
9120 term_escape_char
= strtol(optarg
, &r
, 0);
9122 printf("Bad argument to echr\n");
9125 case QEMU_OPTION_monitor
:
9126 monitor_device
= optarg
;
9128 case QEMU_OPTION_serial
:
9129 if (serial_device_index
>= MAX_SERIAL_PORTS
) {
9130 fprintf(stderr
, "qemu: too many serial ports\n");
9133 serial_devices
[serial_device_index
] = optarg
;
9134 serial_device_index
++;
9136 case QEMU_OPTION_parallel
:
9137 if (parallel_device_index
>= MAX_PARALLEL_PORTS
) {
9138 fprintf(stderr
, "qemu: too many parallel ports\n");
9141 parallel_devices
[parallel_device_index
] = optarg
;
9142 parallel_device_index
++;
9144 case QEMU_OPTION_loadvm
:
9147 case QEMU_OPTION_full_screen
:
9151 case QEMU_OPTION_no_frame
:
9154 case QEMU_OPTION_alt_grab
:
9157 case QEMU_OPTION_no_quit
:
9161 case QEMU_OPTION_pidfile
:
9165 case QEMU_OPTION_win2k_hack
:
9166 win2k_install_hack
= 1;
9170 case QEMU_OPTION_no_kqemu
:
9173 case QEMU_OPTION_kernel_kqemu
:
9177 case QEMU_OPTION_usb
:
9180 case QEMU_OPTION_usbdevice
:
9182 if (usb_devices_index
>= MAX_USB_CMDLINE
) {
9183 fprintf(stderr
, "Too many USB devices\n");
9186 usb_devices
[usb_devices_index
] = optarg
;
9187 usb_devices_index
++;
9189 case QEMU_OPTION_smp
:
9190 smp_cpus
= atoi(optarg
);
9192 fprintf(stderr
, "Invalid number of CPUs\n");
9196 case QEMU_OPTION_vnc
:
9197 vnc_display
= optarg
;
9199 case QEMU_OPTION_no_acpi
:
9202 case QEMU_OPTION_no_reboot
:
9205 case QEMU_OPTION_no_shutdown
:
9208 case QEMU_OPTION_show_cursor
:
9211 case QEMU_OPTION_uuid
:
9212 if(qemu_uuid_parse(optarg
, qemu_uuid
) < 0) {
9213 fprintf(stderr
, "Fail to parse UUID string."
9214 " Wrong format.\n");
9218 case QEMU_OPTION_daemonize
:
9221 case QEMU_OPTION_option_rom
:
9222 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9223 fprintf(stderr
, "Too many option ROMs\n");
9226 option_rom
[nb_option_roms
] = optarg
;
9229 case QEMU_OPTION_semihosting
:
9230 semihosting_enabled
= 1;
9232 case QEMU_OPTION_name
:
9236 case QEMU_OPTION_prom_env
:
9237 if (nb_prom_envs
>= MAX_PROM_ENVS
) {
9238 fprintf(stderr
, "Too many prom variables\n");
9241 prom_envs
[nb_prom_envs
] = optarg
;
9246 case QEMU_OPTION_old_param
:
9250 case QEMU_OPTION_clock
:
9251 configure_alarms(optarg
);
9253 case QEMU_OPTION_startdate
:
9256 time_t rtc_start_date
;
9257 if (!strcmp(optarg
, "now")) {
9258 rtc_date_offset
= -1;
9260 if (sscanf(optarg
, "%d-%d-%dT%d:%d:%d",
9268 } else if (sscanf(optarg
, "%d-%d-%d",
9271 &tm
.tm_mday
) == 3) {
9280 rtc_start_date
= mktimegm(&tm
);
9281 if (rtc_start_date
== -1) {
9283 fprintf(stderr
, "Invalid date format. Valid format are:\n"
9284 "'now' or '2006-06-17T16:01:21' or '2006-06-17'\n");
9287 rtc_date_offset
= time(NULL
) - rtc_start_date
;
9291 case QEMU_OPTION_tb_size
:
9292 tb_size
= strtol(optarg
, NULL
, 0);
9296 case QEMU_OPTION_icount
:
9298 if (strcmp(optarg
, "auto") == 0) {
9299 icount_time_shift
= -1;
9301 icount_time_shift
= strtol(optarg
, NULL
, 0);
9308 if (smp_cpus
> machine
->max_cpus
) {
9309 fprintf(stderr
, "Number of SMP cpus requested (%d), exceeds max cpus "
9310 "supported by machine `%s' (%d)\n", smp_cpus
, machine
->name
,
9316 if (serial_device_index
== 0)
9317 serial_devices
[0] = "stdio";
9318 if (parallel_device_index
== 0)
9319 parallel_devices
[0] = "null";
9320 if (strncmp(monitor_device
, "vc", 2) == 0)
9321 monitor_device
= "stdio";
9328 if (pipe(fds
) == -1)
9339 len
= read(fds
[0], &status
, 1);
9340 if (len
== -1 && (errno
== EINTR
))
9345 else if (status
== 1) {
9346 fprintf(stderr
, "Could not acquire pidfile\n");
9363 signal(SIGTSTP
, SIG_IGN
);
9364 signal(SIGTTOU
, SIG_IGN
);
9365 signal(SIGTTIN
, SIG_IGN
);
9369 if (pid_file
&& qemu_create_pidfile(pid_file
) != 0) {
9372 write(fds
[1], &status
, 1);
9374 fprintf(stderr
, "Could not acquire pid file\n");
9382 linux_boot
= (kernel_filename
!= NULL
);
9383 net_boot
= (boot_devices_bitmap
>> ('n' - 'a')) & 0xF;
9385 if (!linux_boot
&& net_boot
== 0 &&
9386 !machine
->nodisk_ok
&& nb_drives_opt
== 0)
9389 if (!linux_boot
&& *kernel_cmdline
!= '\0') {
9390 fprintf(stderr
, "-append only allowed with -kernel option\n");
9394 if (!linux_boot
&& initrd_filename
!= NULL
) {
9395 fprintf(stderr
, "-initrd only allowed with -kernel option\n");
9399 /* boot to floppy or the default cd if no hard disk defined yet */
9400 if (!boot_devices
[0]) {
9401 boot_devices
= "cad";
9403 setvbuf(stdout
, NULL
, _IOLBF
, 0);
9407 if (use_icount
&& icount_time_shift
< 0) {
9409 /* 125MIPS seems a reasonable initial guess at the guest speed.
9410 It will be corrected fairly quickly anyway. */
9411 icount_time_shift
= 3;
9412 init_icount_adjust();
9419 /* init network clients */
9420 if (nb_net_clients
== 0) {
9421 /* if no clients, we use a default config */
9422 net_clients
[nb_net_clients
++] = "nic";
9424 net_clients
[nb_net_clients
++] = "user";
9428 for(i
= 0;i
< nb_net_clients
; i
++) {
9429 if (net_client_parse(net_clients
[i
]) < 0)
9432 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9433 if (vlan
->nb_guest_devs
== 0 && vlan
->nb_host_devs
== 0)
9435 if (vlan
->nb_guest_devs
== 0)
9436 fprintf(stderr
, "Warning: vlan %d with no nics\n", vlan
->id
);
9437 if (vlan
->nb_host_devs
== 0)
9439 "Warning: vlan %d is not connected to host network\n",
9444 /* XXX: this should be moved in the PC machine instantiation code */
9445 if (net_boot
!= 0) {
9447 for (i
= 0; i
< nb_nics
&& i
< 4; i
++) {
9448 const char *model
= nd_table
[i
].model
;
9450 if (net_boot
& (1 << i
)) {
9453 snprintf(buf
, sizeof(buf
), "%s/pxe-%s.bin", bios_dir
, model
);
9454 if (get_image_size(buf
) > 0) {
9455 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9456 fprintf(stderr
, "Too many option ROMs\n");
9459 option_rom
[nb_option_roms
] = strdup(buf
);
9466 fprintf(stderr
, "No valid PXE rom found for network device\n");
9472 /* init the memory */
9473 phys_ram_size
= machine
->ram_require
& ~RAMSIZE_FIXED
;
9475 if (machine
->ram_require
& RAMSIZE_FIXED
) {
9477 if (ram_size
< phys_ram_size
) {
9478 fprintf(stderr
, "Machine `%s' requires %llu bytes of memory\n",
9479 machine
->name
, (unsigned long long) phys_ram_size
);
9483 phys_ram_size
= ram_size
;
9485 ram_size
= phys_ram_size
;
9488 ram_size
= DEFAULT_RAM_SIZE
* 1024 * 1024;
9490 phys_ram_size
+= ram_size
;
9493 phys_ram_base
= qemu_vmalloc(phys_ram_size
);
9494 if (!phys_ram_base
) {
9495 fprintf(stderr
, "Could not allocate physical memory\n");
9499 /* init the dynamic translator */
9500 cpu_exec_init_all(tb_size
* 1024 * 1024);
9504 /* we always create the cdrom drive, even if no disk is there */
9506 if (nb_drives_opt
< MAX_DRIVES
)
9507 drive_add(NULL
, CDROM_ALIAS
);
9509 /* we always create at least one floppy */
9511 if (nb_drives_opt
< MAX_DRIVES
)
9512 drive_add(NULL
, FD_ALIAS
, 0);
9514 /* we always create one sd slot, even if no card is in it */
9516 if (nb_drives_opt
< MAX_DRIVES
)
9517 drive_add(NULL
, SD_ALIAS
);
9519 /* open the virtual block devices */
9521 for(i
= 0; i
< nb_drives_opt
; i
++)
9522 if (drive_init(&drives_opt
[i
], snapshot
, machine
) == -1)
9525 register_savevm("timer", 0, 2, timer_save
, timer_load
, NULL
);
9526 register_savevm_live("ram", 0, 3, ram_save_live
, NULL
, ram_load
, NULL
);
9529 memset(&display_state
, 0, sizeof(display_state
));
9532 fprintf(stderr
, "fatal: -nographic can't be used with -curses\n");
9535 /* nearly nothing to do */
9536 dumb_display_init(ds
);
9537 } else if (vnc_display
!= NULL
) {
9538 vnc_display_init(ds
);
9539 if (vnc_display_open(ds
, vnc_display
) < 0)
9542 #if defined(CONFIG_CURSES)
9544 curses_display_init(ds
, full_screen
);
9548 #if defined(CONFIG_SDL)
9549 sdl_display_init(ds
, full_screen
, no_frame
);
9550 #elif defined(CONFIG_COCOA)
9551 cocoa_display_init(ds
, full_screen
);
9553 dumb_display_init(ds
);
9558 /* must be after terminal init, SDL library changes signal handlers */
9562 /* Maintain compatibility with multiple stdio monitors */
9563 if (!strcmp(monitor_device
,"stdio")) {
9564 for (i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9565 const char *devname
= serial_devices
[i
];
9566 if (devname
&& !strcmp(devname
,"mon:stdio")) {
9567 monitor_device
= NULL
;
9569 } else if (devname
&& !strcmp(devname
,"stdio")) {
9570 monitor_device
= NULL
;
9571 serial_devices
[i
] = "mon:stdio";
9576 if (monitor_device
) {
9577 monitor_hd
= qemu_chr_open(monitor_device
);
9579 fprintf(stderr
, "qemu: could not open monitor device '%s'\n", monitor_device
);
9582 monitor_init(monitor_hd
, !nographic
);
9585 for(i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9586 const char *devname
= serial_devices
[i
];
9587 if (devname
&& strcmp(devname
, "none")) {
9588 serial_hds
[i
] = qemu_chr_open(devname
);
9589 if (!serial_hds
[i
]) {
9590 fprintf(stderr
, "qemu: could not open serial device '%s'\n",
9594 if (strstart(devname
, "vc", 0))
9595 qemu_chr_printf(serial_hds
[i
], "serial%d console\r\n", i
);
9599 for(i
= 0; i
< MAX_PARALLEL_PORTS
; i
++) {
9600 const char *devname
= parallel_devices
[i
];
9601 if (devname
&& strcmp(devname
, "none")) {
9602 parallel_hds
[i
] = qemu_chr_open(devname
);
9603 if (!parallel_hds
[i
]) {
9604 fprintf(stderr
, "qemu: could not open parallel device '%s'\n",
9608 if (strstart(devname
, "vc", 0))
9609 qemu_chr_printf(parallel_hds
[i
], "parallel%d console\r\n", i
);
9613 machine
->init(ram_size
, vga_ram_size
, boot_devices
, ds
,
9614 kernel_filename
, kernel_cmdline
, initrd_filename
, cpu_model
);
9616 /* init USB devices */
9618 for(i
= 0; i
< usb_devices_index
; i
++) {
9619 if (usb_device_add(usb_devices
[i
]) < 0) {
9620 fprintf(stderr
, "Warning: could not add USB device %s\n",
9626 if (display_state
.dpy_refresh
) {
9627 display_state
.gui_timer
= qemu_new_timer(rt_clock
, gui_update
, &display_state
);
9628 qemu_mod_timer(display_state
.gui_timer
, qemu_get_clock(rt_clock
));
9631 #ifdef CONFIG_GDBSTUB
9633 /* XXX: use standard host:port notation and modify options
9635 if (gdbserver_start(gdbstub_port
) < 0) {
9636 fprintf(stderr
, "qemu: could not open gdbstub device on port '%s'\n",
9647 /* XXX: simplify init */
9660 len
= write(fds
[1], &status
, 1);
9661 if (len
== -1 && (errno
== EINTR
))
9668 TFR(fd
= open("/dev/null", O_RDWR
));
9682 #if !defined(_WIN32)
9683 /* close network clients */
9684 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9685 VLANClientState
*vc
;
9687 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
9688 if (vc
->fd_read
== tap_receive
) {
9690 TAPState
*s
= vc
->opaque
;
9692 if (sscanf(vc
->info_str
, "tap: ifname=%63s ", ifname
) == 1 &&
9694 launch_script(s
->down_script
, ifname
, s
->fd
);
9696 #if defined(CONFIG_VDE)
9697 if (vc
->fd_read
== vde_from_qemu
) {
9698 VDEState
*s
= vc
->opaque
;