4 * Copyright (c) 2003-2008 Fabrice Bellard
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
25 #include "hw/boards.h"
27 #include "hw/pcmcia.h"
29 #include "hw/audiodev.h"
36 #include "qemu-timer.h"
37 #include "qemu-char.h"
39 #include "audio/audio.h"
50 #include <sys/times.h>
55 #include <sys/ioctl.h>
56 #include <sys/socket.h>
57 #include <netinet/in.h>
60 #include <sys/select.h>
61 #include <arpa/inet.h>
67 #elif defined (__GLIBC__) && defined (__FreeBSD_kernel__)
68 #include <freebsd/stdlib.h>
72 #include <linux/if_tun.h>
75 #include <linux/rtc.h>
77 /* For the benefit of older linux systems which don't supply it,
78 we use a local copy of hpet.h. */
79 /* #include <linux/hpet.h> */
82 #include <linux/ppdev.h>
83 #include <linux/parport.h>
86 #include <sys/ethernet.h>
87 #include <sys/sockio.h>
88 #include <netinet/arp.h>
89 #include <netinet/in.h>
90 #include <netinet/in_systm.h>
91 #include <netinet/ip.h>
92 #include <netinet/ip_icmp.h> // must come after ip.h
93 #include <netinet/udp.h>
94 #include <netinet/tcp.h>
101 #include <winsock2.h>
102 int inet_aton(const char *cp
, struct in_addr
*ia
);
105 #if defined(CONFIG_SLIRP)
106 #include "libslirp.h"
109 #if defined(CONFIG_VDE)
110 #include <libvdeplug.h>
115 #include <sys/timeb.h>
116 #include <mmsystem.h>
117 #define getopt_long_only getopt_long
118 #define memalign(align, size) malloc(size)
121 #include "qemu_socket.h"
127 #endif /* CONFIG_SDL */
131 #define main qemu_main
132 #endif /* CONFIG_COCOA */
136 #include "exec-all.h"
138 #define DEFAULT_NETWORK_SCRIPT "/etc/qemu-ifup"
139 #define DEFAULT_NETWORK_DOWN_SCRIPT "/etc/qemu-ifdown"
141 #define SMBD_COMMAND "/usr/sfw/sbin/smbd"
143 #define SMBD_COMMAND "/usr/sbin/smbd"
146 //#define DEBUG_UNUSED_IOPORT
147 //#define DEBUG_IOPORT
150 #define DEFAULT_RAM_SIZE 144
152 #define DEFAULT_RAM_SIZE 128
155 #define GUI_REFRESH_INTERVAL 30
157 /* Max number of USB devices that can be specified on the commandline. */
158 #define MAX_USB_CMDLINE 8
160 /* XXX: use a two level table to limit memory usage */
161 #define MAX_IOPORTS 65536
163 const char *bios_dir
= CONFIG_QEMU_SHAREDIR
;
164 const char *bios_name
= NULL
;
165 void *ioport_opaque
[MAX_IOPORTS
];
166 IOPortReadFunc
*ioport_read_table
[3][MAX_IOPORTS
];
167 IOPortWriteFunc
*ioport_write_table
[3][MAX_IOPORTS
];
168 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
169 to store the VM snapshots */
170 DriveInfo drives_table
[MAX_DRIVES
+1];
172 /* point to the block driver where the snapshots are managed */
173 BlockDriverState
*bs_snapshots
;
175 static DisplayState display_state
;
178 const char* keyboard_layout
= NULL
;
179 int64_t ticks_per_sec
;
181 int pit_min_timer_count
= 0;
183 NICInfo nd_table
[MAX_NICS
];
185 static int rtc_utc
= 1;
186 static int rtc_date_offset
= -1; /* -1 means no change */
187 int cirrus_vga_enabled
= 1;
188 int vmsvga_enabled
= 0;
190 int graphic_width
= 1024;
191 int graphic_height
= 768;
192 int graphic_depth
= 8;
194 int graphic_width
= 800;
195 int graphic_height
= 600;
196 int graphic_depth
= 15;
201 CharDriverState
*serial_hds
[MAX_SERIAL_PORTS
];
202 CharDriverState
*parallel_hds
[MAX_PARALLEL_PORTS
];
204 int win2k_install_hack
= 0;
207 static VLANState
*first_vlan
;
209 const char *vnc_display
;
210 #if defined(TARGET_SPARC)
212 #elif defined(TARGET_I386)
217 int acpi_enabled
= 1;
222 int graphic_rotate
= 0;
224 const char *option_rom
[MAX_OPTION_ROMS
];
226 int semihosting_enabled
= 0;
231 const char *qemu_name
;
234 unsigned int nb_prom_envs
= 0;
235 const char *prom_envs
[MAX_PROM_ENVS
];
241 } drives_opt
[MAX_DRIVES
];
243 static CPUState
*cur_cpu
;
244 static CPUState
*next_cpu
;
245 static int event_pending
= 1;
246 /* Conversion factor from emulated instructions to virtual clock ticks. */
247 static int icount_time_shift
;
248 /* Arbitrarily pick 1MIPS as the minimum allowable speed. */
249 #define MAX_ICOUNT_SHIFT 10
250 /* Compensate for varying guest execution speed. */
251 static int64_t qemu_icount_bias
;
252 QEMUTimer
*icount_rt_timer
;
253 QEMUTimer
*icount_vm_timer
;
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 static uint64_t qemu_next_deadline_dyntick(void)
1356 delta
= (qemu_next_deadline() + 999) / 1000;
1358 if (active_timers
[QEMU_TIMER_REALTIME
]) {
1359 rtdelta
= (active_timers
[QEMU_TIMER_REALTIME
]->expire_time
-
1360 qemu_get_clock(rt_clock
))*1000;
1361 if (rtdelta
< delta
)
1365 if (delta
< MIN_TIMER_REARM_US
)
1366 delta
= MIN_TIMER_REARM_US
;
1373 #if defined(__linux__)
1375 #define RTC_FREQ 1024
1377 static void enable_sigio_timer(int fd
)
1379 struct sigaction act
;
1382 sigfillset(&act
.sa_mask
);
1384 act
.sa_handler
= host_alarm_handler
;
1386 sigaction(SIGIO
, &act
, NULL
);
1387 fcntl(fd
, F_SETFL
, O_ASYNC
);
1388 fcntl(fd
, F_SETOWN
, getpid());
1391 static int hpet_start_timer(struct qemu_alarm_timer
*t
)
1393 struct hpet_info info
;
1396 fd
= open("/dev/hpet", O_RDONLY
);
1401 r
= ioctl(fd
, HPET_IRQFREQ
, RTC_FREQ
);
1403 fprintf(stderr
, "Could not configure '/dev/hpet' to have a 1024Hz timer. This is not a fatal\n"
1404 "error, but for better emulation accuracy type:\n"
1405 "'echo 1024 > /proc/sys/dev/hpet/max-user-freq' as root.\n");
1409 /* Check capabilities */
1410 r
= ioctl(fd
, HPET_INFO
, &info
);
1414 /* Enable periodic mode */
1415 r
= ioctl(fd
, HPET_EPI
, 0);
1416 if (info
.hi_flags
&& (r
< 0))
1419 /* Enable interrupt */
1420 r
= ioctl(fd
, HPET_IE_ON
, 0);
1424 enable_sigio_timer(fd
);
1425 t
->priv
= (void *)(long)fd
;
1433 static void hpet_stop_timer(struct qemu_alarm_timer
*t
)
1435 int fd
= (long)t
->priv
;
1440 static int rtc_start_timer(struct qemu_alarm_timer
*t
)
1443 unsigned long current_rtc_freq
= 0;
1445 TFR(rtc_fd
= open("/dev/rtc", O_RDONLY
));
1448 ioctl(rtc_fd
, RTC_IRQP_READ
, ¤t_rtc_freq
);
1449 if (current_rtc_freq
!= RTC_FREQ
&&
1450 ioctl(rtc_fd
, RTC_IRQP_SET
, RTC_FREQ
) < 0) {
1451 fprintf(stderr
, "Could not configure '/dev/rtc' to have a 1024 Hz timer. This is not a fatal\n"
1452 "error, but for better emulation accuracy either use a 2.6 host Linux kernel or\n"
1453 "type 'echo 1024 > /proc/sys/dev/rtc/max-user-freq' as root.\n");
1456 if (ioctl(rtc_fd
, RTC_PIE_ON
, 0) < 0) {
1462 enable_sigio_timer(rtc_fd
);
1464 t
->priv
= (void *)(long)rtc_fd
;
1469 static void rtc_stop_timer(struct qemu_alarm_timer
*t
)
1471 int rtc_fd
= (long)t
->priv
;
1476 static int dynticks_start_timer(struct qemu_alarm_timer
*t
)
1480 struct sigaction act
;
1482 sigfillset(&act
.sa_mask
);
1484 act
.sa_handler
= host_alarm_handler
;
1486 sigaction(SIGALRM
, &act
, NULL
);
1488 ev
.sigev_value
.sival_int
= 0;
1489 ev
.sigev_notify
= SIGEV_SIGNAL
;
1490 ev
.sigev_signo
= SIGALRM
;
1492 if (timer_create(CLOCK_REALTIME
, &ev
, &host_timer
)) {
1493 perror("timer_create");
1495 /* disable dynticks */
1496 fprintf(stderr
, "Dynamic Ticks disabled\n");
1501 t
->priv
= (void *)host_timer
;
1506 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
)
1508 timer_t host_timer
= (timer_t
)t
->priv
;
1510 timer_delete(host_timer
);
1513 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
)
1515 timer_t host_timer
= (timer_t
)t
->priv
;
1516 struct itimerspec timeout
;
1517 int64_t nearest_delta_us
= INT64_MAX
;
1520 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1521 !active_timers
[QEMU_TIMER_VIRTUAL
])
1524 nearest_delta_us
= qemu_next_deadline_dyntick();
1526 /* check whether a timer is already running */
1527 if (timer_gettime(host_timer
, &timeout
)) {
1529 fprintf(stderr
, "Internal timer error: aborting\n");
1532 current_us
= timeout
.it_value
.tv_sec
* 1000000 + timeout
.it_value
.tv_nsec
/1000;
1533 if (current_us
&& current_us
<= nearest_delta_us
)
1536 timeout
.it_interval
.tv_sec
= 0;
1537 timeout
.it_interval
.tv_nsec
= 0; /* 0 for one-shot timer */
1538 timeout
.it_value
.tv_sec
= nearest_delta_us
/ 1000000;
1539 timeout
.it_value
.tv_nsec
= (nearest_delta_us
% 1000000) * 1000;
1540 if (timer_settime(host_timer
, 0 /* RELATIVE */, &timeout
, NULL
)) {
1542 fprintf(stderr
, "Internal timer error: aborting\n");
1547 #endif /* defined(__linux__) */
1549 static int unix_start_timer(struct qemu_alarm_timer
*t
)
1551 struct sigaction act
;
1552 struct itimerval itv
;
1556 sigfillset(&act
.sa_mask
);
1558 act
.sa_handler
= host_alarm_handler
;
1560 sigaction(SIGALRM
, &act
, NULL
);
1562 itv
.it_interval
.tv_sec
= 0;
1563 /* for i386 kernel 2.6 to get 1 ms */
1564 itv
.it_interval
.tv_usec
= 999;
1565 itv
.it_value
.tv_sec
= 0;
1566 itv
.it_value
.tv_usec
= 10 * 1000;
1568 err
= setitimer(ITIMER_REAL
, &itv
, NULL
);
1575 static void unix_stop_timer(struct qemu_alarm_timer
*t
)
1577 struct itimerval itv
;
1579 memset(&itv
, 0, sizeof(itv
));
1580 setitimer(ITIMER_REAL
, &itv
, NULL
);
1583 #endif /* !defined(_WIN32) */
1587 static int win32_start_timer(struct qemu_alarm_timer
*t
)
1590 struct qemu_alarm_win32
*data
= t
->priv
;
1593 data
->host_alarm
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1594 if (!data
->host_alarm
) {
1595 perror("Failed CreateEvent");
1599 memset(&tc
, 0, sizeof(tc
));
1600 timeGetDevCaps(&tc
, sizeof(tc
));
1602 if (data
->period
< tc
.wPeriodMin
)
1603 data
->period
= tc
.wPeriodMin
;
1605 timeBeginPeriod(data
->period
);
1607 flags
= TIME_CALLBACK_FUNCTION
;
1608 if (alarm_has_dynticks(t
))
1609 flags
|= TIME_ONESHOT
;
1611 flags
|= TIME_PERIODIC
;
1613 data
->timerId
= timeSetEvent(1, // interval (ms)
1614 data
->period
, // resolution
1615 host_alarm_handler
, // function
1616 (DWORD
)t
, // parameter
1619 if (!data
->timerId
) {
1620 perror("Failed to initialize win32 alarm timer");
1622 timeEndPeriod(data
->period
);
1623 CloseHandle(data
->host_alarm
);
1627 qemu_add_wait_object(data
->host_alarm
, NULL
, NULL
);
1632 static void win32_stop_timer(struct qemu_alarm_timer
*t
)
1634 struct qemu_alarm_win32
*data
= t
->priv
;
1636 timeKillEvent(data
->timerId
);
1637 timeEndPeriod(data
->period
);
1639 CloseHandle(data
->host_alarm
);
1642 static void win32_rearm_timer(struct qemu_alarm_timer
*t
)
1644 struct qemu_alarm_win32
*data
= t
->priv
;
1645 uint64_t nearest_delta_us
;
1647 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1648 !active_timers
[QEMU_TIMER_VIRTUAL
])
1651 nearest_delta_us
= qemu_next_deadline_dyntick();
1652 nearest_delta_us
/= 1000;
1654 timeKillEvent(data
->timerId
);
1656 data
->timerId
= timeSetEvent(1,
1660 TIME_ONESHOT
| TIME_PERIODIC
);
1662 if (!data
->timerId
) {
1663 perror("Failed to re-arm win32 alarm timer");
1665 timeEndPeriod(data
->period
);
1666 CloseHandle(data
->host_alarm
);
1673 static void init_timer_alarm(void)
1675 struct qemu_alarm_timer
*t
;
1678 for (i
= 0; alarm_timers
[i
].name
; i
++) {
1679 t
= &alarm_timers
[i
];
1687 fprintf(stderr
, "Unable to find any suitable alarm timer.\n");
1688 fprintf(stderr
, "Terminating\n");
1695 static void quit_timers(void)
1697 alarm_timer
->stop(alarm_timer
);
1701 /***********************************************************/
1702 /* host time/date access */
1703 void qemu_get_timedate(struct tm
*tm
, int offset
)
1710 if (rtc_date_offset
== -1) {
1714 ret
= localtime(&ti
);
1716 ti
-= rtc_date_offset
;
1720 memcpy(tm
, ret
, sizeof(struct tm
));
1723 int qemu_timedate_diff(struct tm
*tm
)
1727 if (rtc_date_offset
== -1)
1729 seconds
= mktimegm(tm
);
1731 seconds
= mktime(tm
);
1733 seconds
= mktimegm(tm
) + rtc_date_offset
;
1735 return seconds
- time(NULL
);
1738 /***********************************************************/
1739 /* character device */
1741 static void qemu_chr_event(CharDriverState
*s
, int event
)
1745 s
->chr_event(s
->handler_opaque
, event
);
1748 static void qemu_chr_reset_bh(void *opaque
)
1750 CharDriverState
*s
= opaque
;
1751 qemu_chr_event(s
, CHR_EVENT_RESET
);
1752 qemu_bh_delete(s
->bh
);
1756 void qemu_chr_reset(CharDriverState
*s
)
1758 if (s
->bh
== NULL
) {
1759 s
->bh
= qemu_bh_new(qemu_chr_reset_bh
, s
);
1760 qemu_bh_schedule(s
->bh
);
1764 int qemu_chr_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
1766 return s
->chr_write(s
, buf
, len
);
1769 int qemu_chr_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
1773 return s
->chr_ioctl(s
, cmd
, arg
);
1776 int qemu_chr_can_read(CharDriverState
*s
)
1778 if (!s
->chr_can_read
)
1780 return s
->chr_can_read(s
->handler_opaque
);
1783 void qemu_chr_read(CharDriverState
*s
, uint8_t *buf
, int len
)
1785 s
->chr_read(s
->handler_opaque
, buf
, len
);
1788 void qemu_chr_accept_input(CharDriverState
*s
)
1790 if (s
->chr_accept_input
)
1791 s
->chr_accept_input(s
);
1794 void qemu_chr_printf(CharDriverState
*s
, const char *fmt
, ...)
1799 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
1800 qemu_chr_write(s
, (uint8_t *)buf
, strlen(buf
));
1804 void qemu_chr_send_event(CharDriverState
*s
, int event
)
1806 if (s
->chr_send_event
)
1807 s
->chr_send_event(s
, event
);
1810 void qemu_chr_add_handlers(CharDriverState
*s
,
1811 IOCanRWHandler
*fd_can_read
,
1812 IOReadHandler
*fd_read
,
1813 IOEventHandler
*fd_event
,
1816 s
->chr_can_read
= fd_can_read
;
1817 s
->chr_read
= fd_read
;
1818 s
->chr_event
= fd_event
;
1819 s
->handler_opaque
= opaque
;
1820 if (s
->chr_update_read_handler
)
1821 s
->chr_update_read_handler(s
);
1824 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1829 static CharDriverState
*qemu_chr_open_null(void)
1831 CharDriverState
*chr
;
1833 chr
= qemu_mallocz(sizeof(CharDriverState
));
1836 chr
->chr_write
= null_chr_write
;
1840 /* MUX driver for serial I/O splitting */
1841 static int term_timestamps
;
1842 static int64_t term_timestamps_start
;
1844 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
1845 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
1847 IOCanRWHandler
*chr_can_read
[MAX_MUX
];
1848 IOReadHandler
*chr_read
[MAX_MUX
];
1849 IOEventHandler
*chr_event
[MAX_MUX
];
1850 void *ext_opaque
[MAX_MUX
];
1851 CharDriverState
*drv
;
1852 unsigned char buffer
[MUX_BUFFER_SIZE
];
1856 int term_got_escape
;
1861 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1863 MuxDriver
*d
= chr
->opaque
;
1865 if (!term_timestamps
) {
1866 ret
= d
->drv
->chr_write(d
->drv
, buf
, len
);
1871 for(i
= 0; i
< len
; i
++) {
1872 ret
+= d
->drv
->chr_write(d
->drv
, buf
+i
, 1);
1873 if (buf
[i
] == '\n') {
1879 if (term_timestamps_start
== -1)
1880 term_timestamps_start
= ti
;
1881 ti
-= term_timestamps_start
;
1882 secs
= ti
/ 1000000000;
1883 snprintf(buf1
, sizeof(buf1
),
1884 "[%02d:%02d:%02d.%03d] ",
1888 (int)((ti
/ 1000000) % 1000));
1889 d
->drv
->chr_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
1896 static char *mux_help
[] = {
1897 "% h print this help\n\r",
1898 "% x exit emulator\n\r",
1899 "% s save disk data back to file (if -snapshot)\n\r",
1900 "% t toggle console timestamps\n\r"
1901 "% b send break (magic sysrq)\n\r",
1902 "% c switch between console and monitor\n\r",
1907 static int term_escape_char
= 0x01; /* ctrl-a is used for escape */
1908 static void mux_print_help(CharDriverState
*chr
)
1911 char ebuf
[15] = "Escape-Char";
1912 char cbuf
[50] = "\n\r";
1914 if (term_escape_char
> 0 && term_escape_char
< 26) {
1915 sprintf(cbuf
,"\n\r");
1916 sprintf(ebuf
,"C-%c", term_escape_char
- 1 + 'a');
1918 sprintf(cbuf
,"\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
1921 chr
->chr_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
1922 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
1923 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
1924 if (mux_help
[i
][j
] == '%')
1925 chr
->chr_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
1927 chr
->chr_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
1932 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
1934 if (d
->term_got_escape
) {
1935 d
->term_got_escape
= 0;
1936 if (ch
== term_escape_char
)
1941 mux_print_help(chr
);
1945 char *term
= "QEMU: Terminated\n\r";
1946 chr
->chr_write(chr
,(uint8_t *)term
,strlen(term
));
1953 for (i
= 0; i
< nb_drives
; i
++) {
1954 bdrv_commit(drives_table
[i
].bdrv
);
1959 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
1962 /* Switch to the next registered device */
1964 if (chr
->focus
>= d
->mux_cnt
)
1968 term_timestamps
= !term_timestamps
;
1969 term_timestamps_start
= -1;
1972 } else if (ch
== term_escape_char
) {
1973 d
->term_got_escape
= 1;
1981 static void mux_chr_accept_input(CharDriverState
*chr
)
1984 MuxDriver
*d
= chr
->opaque
;
1986 while (d
->prod
!= d
->cons
&&
1987 d
->chr_can_read
[m
] &&
1988 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
1989 d
->chr_read
[m
](d
->ext_opaque
[m
],
1990 &d
->buffer
[d
->cons
++ & MUX_BUFFER_MASK
], 1);
1994 static int mux_chr_can_read(void *opaque
)
1996 CharDriverState
*chr
= opaque
;
1997 MuxDriver
*d
= chr
->opaque
;
1999 if ((d
->prod
- d
->cons
) < MUX_BUFFER_SIZE
)
2001 if (d
->chr_can_read
[chr
->focus
])
2002 return d
->chr_can_read
[chr
->focus
](d
->ext_opaque
[chr
->focus
]);
2006 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
2008 CharDriverState
*chr
= opaque
;
2009 MuxDriver
*d
= chr
->opaque
;
2013 mux_chr_accept_input (opaque
);
2015 for(i
= 0; i
< size
; i
++)
2016 if (mux_proc_byte(chr
, d
, buf
[i
])) {
2017 if (d
->prod
== d
->cons
&&
2018 d
->chr_can_read
[m
] &&
2019 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
2020 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
2022 d
->buffer
[d
->prod
++ & MUX_BUFFER_MASK
] = buf
[i
];
2026 static void mux_chr_event(void *opaque
, int event
)
2028 CharDriverState
*chr
= opaque
;
2029 MuxDriver
*d
= chr
->opaque
;
2032 /* Send the event to all registered listeners */
2033 for (i
= 0; i
< d
->mux_cnt
; i
++)
2034 if (d
->chr_event
[i
])
2035 d
->chr_event
[i
](d
->ext_opaque
[i
], event
);
2038 static void mux_chr_update_read_handler(CharDriverState
*chr
)
2040 MuxDriver
*d
= chr
->opaque
;
2042 if (d
->mux_cnt
>= MAX_MUX
) {
2043 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
2046 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
2047 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
2048 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
2049 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
2050 /* Fix up the real driver with mux routines */
2051 if (d
->mux_cnt
== 0) {
2052 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
2053 mux_chr_event
, chr
);
2055 chr
->focus
= d
->mux_cnt
;
2059 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
2061 CharDriverState
*chr
;
2064 chr
= qemu_mallocz(sizeof(CharDriverState
));
2067 d
= qemu_mallocz(sizeof(MuxDriver
));
2076 chr
->chr_write
= mux_chr_write
;
2077 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
2078 chr
->chr_accept_input
= mux_chr_accept_input
;
2085 static void socket_cleanup(void)
2090 static int socket_init(void)
2095 ret
= WSAStartup(MAKEWORD(2,2), &Data
);
2097 err
= WSAGetLastError();
2098 fprintf(stderr
, "WSAStartup: %d\n", err
);
2101 atexit(socket_cleanup
);
2105 static int send_all(int fd
, const uint8_t *buf
, int len1
)
2111 ret
= send(fd
, buf
, len
, 0);
2114 errno
= WSAGetLastError();
2115 if (errno
!= WSAEWOULDBLOCK
) {
2118 } else if (ret
== 0) {
2128 void socket_set_nonblock(int fd
)
2130 unsigned long opt
= 1;
2131 ioctlsocket(fd
, FIONBIO
, &opt
);
2136 static int unix_write(int fd
, const uint8_t *buf
, int len1
)
2142 ret
= write(fd
, buf
, len
);
2144 if (errno
!= EINTR
&& errno
!= EAGAIN
)
2146 } else if (ret
== 0) {
2156 static inline int send_all(int fd
, const uint8_t *buf
, int len1
)
2158 return unix_write(fd
, buf
, len1
);
2161 void socket_set_nonblock(int fd
)
2164 f
= fcntl(fd
, F_GETFL
);
2165 fcntl(fd
, F_SETFL
, f
| O_NONBLOCK
);
2167 #endif /* !_WIN32 */
2176 #define STDIO_MAX_CLIENTS 1
2177 static int stdio_nb_clients
= 0;
2179 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2181 FDCharDriver
*s
= chr
->opaque
;
2182 return unix_write(s
->fd_out
, buf
, len
);
2185 static int fd_chr_read_poll(void *opaque
)
2187 CharDriverState
*chr
= opaque
;
2188 FDCharDriver
*s
= chr
->opaque
;
2190 s
->max_size
= qemu_chr_can_read(chr
);
2194 static void fd_chr_read(void *opaque
)
2196 CharDriverState
*chr
= opaque
;
2197 FDCharDriver
*s
= chr
->opaque
;
2202 if (len
> s
->max_size
)
2206 size
= read(s
->fd_in
, buf
, len
);
2208 /* FD has been closed. Remove it from the active list. */
2209 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2213 qemu_chr_read(chr
, buf
, size
);
2217 static void fd_chr_update_read_handler(CharDriverState
*chr
)
2219 FDCharDriver
*s
= chr
->opaque
;
2221 if (s
->fd_in
>= 0) {
2222 if (nographic
&& s
->fd_in
== 0) {
2224 qemu_set_fd_handler2(s
->fd_in
, fd_chr_read_poll
,
2225 fd_chr_read
, NULL
, chr
);
2230 static void fd_chr_close(struct CharDriverState
*chr
)
2232 FDCharDriver
*s
= chr
->opaque
;
2234 if (s
->fd_in
>= 0) {
2235 if (nographic
&& s
->fd_in
== 0) {
2237 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2244 /* open a character device to a unix fd */
2245 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
2247 CharDriverState
*chr
;
2250 chr
= qemu_mallocz(sizeof(CharDriverState
));
2253 s
= qemu_mallocz(sizeof(FDCharDriver
));
2261 chr
->chr_write
= fd_chr_write
;
2262 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
2263 chr
->chr_close
= fd_chr_close
;
2265 qemu_chr_reset(chr
);
2270 static CharDriverState
*qemu_chr_open_file_out(const char *file_out
)
2274 TFR(fd_out
= open(file_out
, O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
, 0666));
2277 return qemu_chr_open_fd(-1, fd_out
);
2280 static CharDriverState
*qemu_chr_open_pipe(const char *filename
)
2283 char filename_in
[256], filename_out
[256];
2285 snprintf(filename_in
, 256, "%s.in", filename
);
2286 snprintf(filename_out
, 256, "%s.out", filename
);
2287 TFR(fd_in
= open(filename_in
, O_RDWR
| O_BINARY
));
2288 TFR(fd_out
= open(filename_out
, O_RDWR
| O_BINARY
));
2289 if (fd_in
< 0 || fd_out
< 0) {
2294 TFR(fd_in
= fd_out
= open(filename
, O_RDWR
| O_BINARY
));
2298 return qemu_chr_open_fd(fd_in
, fd_out
);
2302 /* for STDIO, we handle the case where several clients use it
2305 #define TERM_FIFO_MAX_SIZE 1
2307 static uint8_t term_fifo
[TERM_FIFO_MAX_SIZE
];
2308 static int term_fifo_size
;
2310 static int stdio_read_poll(void *opaque
)
2312 CharDriverState
*chr
= opaque
;
2314 /* try to flush the queue if needed */
2315 if (term_fifo_size
!= 0 && qemu_chr_can_read(chr
) > 0) {
2316 qemu_chr_read(chr
, term_fifo
, 1);
2319 /* see if we can absorb more chars */
2320 if (term_fifo_size
== 0)
2326 static void stdio_read(void *opaque
)
2330 CharDriverState
*chr
= opaque
;
2332 size
= read(0, buf
, 1);
2334 /* stdin has been closed. Remove it from the active list. */
2335 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2339 if (qemu_chr_can_read(chr
) > 0) {
2340 qemu_chr_read(chr
, buf
, 1);
2341 } else if (term_fifo_size
== 0) {
2342 term_fifo
[term_fifo_size
++] = buf
[0];
2347 /* init terminal so that we can grab keys */
2348 static struct termios oldtty
;
2349 static int old_fd0_flags
;
2350 static int term_atexit_done
;
2352 static void term_exit(void)
2354 tcsetattr (0, TCSANOW
, &oldtty
);
2355 fcntl(0, F_SETFL
, old_fd0_flags
);
2358 static void term_init(void)
2362 tcgetattr (0, &tty
);
2364 old_fd0_flags
= fcntl(0, F_GETFL
);
2366 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2367 |INLCR
|IGNCR
|ICRNL
|IXON
);
2368 tty
.c_oflag
|= OPOST
;
2369 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
2370 /* if graphical mode, we allow Ctrl-C handling */
2372 tty
.c_lflag
&= ~ISIG
;
2373 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
2376 tty
.c_cc
[VTIME
] = 0;
2378 tcsetattr (0, TCSANOW
, &tty
);
2380 if (!term_atexit_done
++)
2383 fcntl(0, F_SETFL
, O_NONBLOCK
);
2386 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
2390 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2394 static CharDriverState
*qemu_chr_open_stdio(void)
2396 CharDriverState
*chr
;
2398 if (stdio_nb_clients
>= STDIO_MAX_CLIENTS
)
2400 chr
= qemu_chr_open_fd(0, 1);
2401 chr
->chr_close
= qemu_chr_close_stdio
;
2402 qemu_set_fd_handler2(0, stdio_read_poll
, stdio_read
, NULL
, chr
);
2410 /* Once Solaris has openpty(), this is going to be removed. */
2411 int openpty(int *amaster
, int *aslave
, char *name
,
2412 struct termios
*termp
, struct winsize
*winp
)
2415 int mfd
= -1, sfd
= -1;
2417 *amaster
= *aslave
= -1;
2419 mfd
= open("/dev/ptmx", O_RDWR
| O_NOCTTY
);
2423 if (grantpt(mfd
) == -1 || unlockpt(mfd
) == -1)
2426 if ((slave
= ptsname(mfd
)) == NULL
)
2429 if ((sfd
= open(slave
, O_RDONLY
| O_NOCTTY
)) == -1)
2432 if (ioctl(sfd
, I_PUSH
, "ptem") == -1 ||
2433 (termp
!= NULL
&& tcgetattr(sfd
, termp
) < 0))
2441 ioctl(sfd
, TIOCSWINSZ
, winp
);
2452 void cfmakeraw (struct termios
*termios_p
)
2454 termios_p
->c_iflag
&=
2455 ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
|INLCR
|IGNCR
|ICRNL
|IXON
);
2456 termios_p
->c_oflag
&= ~OPOST
;
2457 termios_p
->c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|ISIG
|IEXTEN
);
2458 termios_p
->c_cflag
&= ~(CSIZE
|PARENB
);
2459 termios_p
->c_cflag
|= CS8
;
2461 termios_p
->c_cc
[VMIN
] = 0;
2462 termios_p
->c_cc
[VTIME
] = 0;
2466 #if defined(__linux__) || defined(__sun__)
2467 static CharDriverState
*qemu_chr_open_pty(void)
2470 int master_fd
, slave_fd
;
2472 if (openpty(&master_fd
, &slave_fd
, NULL
, NULL
, NULL
) < 0) {
2476 /* Set raw attributes on the pty. */
2478 tcsetattr(slave_fd
, TCSAFLUSH
, &tty
);
2480 fprintf(stderr
, "char device redirected to %s\n", ptsname(master_fd
));
2481 return qemu_chr_open_fd(master_fd
, master_fd
);
2484 static void tty_serial_init(int fd
, int speed
,
2485 int parity
, int data_bits
, int stop_bits
)
2491 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
2492 speed
, parity
, data_bits
, stop_bits
);
2494 tcgetattr (fd
, &tty
);
2497 if (speed
<= 50 * MARGIN
)
2499 else if (speed
<= 75 * MARGIN
)
2501 else if (speed
<= 300 * MARGIN
)
2503 else if (speed
<= 600 * MARGIN
)
2505 else if (speed
<= 1200 * MARGIN
)
2507 else if (speed
<= 2400 * MARGIN
)
2509 else if (speed
<= 4800 * MARGIN
)
2511 else if (speed
<= 9600 * MARGIN
)
2513 else if (speed
<= 19200 * MARGIN
)
2515 else if (speed
<= 38400 * MARGIN
)
2517 else if (speed
<= 57600 * MARGIN
)
2519 else if (speed
<= 115200 * MARGIN
)
2524 cfsetispeed(&tty
, spd
);
2525 cfsetospeed(&tty
, spd
);
2527 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2528 |INLCR
|IGNCR
|ICRNL
|IXON
);
2529 tty
.c_oflag
|= OPOST
;
2530 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
2531 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
2552 tty
.c_cflag
|= PARENB
;
2555 tty
.c_cflag
|= PARENB
| PARODD
;
2559 tty
.c_cflag
|= CSTOPB
;
2561 tcsetattr (fd
, TCSANOW
, &tty
);
2564 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2566 FDCharDriver
*s
= chr
->opaque
;
2569 case CHR_IOCTL_SERIAL_SET_PARAMS
:
2571 QEMUSerialSetParams
*ssp
= arg
;
2572 tty_serial_init(s
->fd_in
, ssp
->speed
, ssp
->parity
,
2573 ssp
->data_bits
, ssp
->stop_bits
);
2576 case CHR_IOCTL_SERIAL_SET_BREAK
:
2578 int enable
= *(int *)arg
;
2580 tcsendbreak(s
->fd_in
, 1);
2589 static CharDriverState
*qemu_chr_open_tty(const char *filename
)
2591 CharDriverState
*chr
;
2594 TFR(fd
= open(filename
, O_RDWR
| O_NONBLOCK
));
2595 tty_serial_init(fd
, 115200, 'N', 8, 1);
2596 chr
= qemu_chr_open_fd(fd
, fd
);
2601 chr
->chr_ioctl
= tty_serial_ioctl
;
2602 qemu_chr_reset(chr
);
2605 #else /* ! __linux__ && ! __sun__ */
2606 static CharDriverState
*qemu_chr_open_pty(void)
2610 #endif /* __linux__ || __sun__ */
2612 #if defined(__linux__)
2616 } ParallelCharDriver
;
2618 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
2620 if (s
->mode
!= mode
) {
2622 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
2629 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2631 ParallelCharDriver
*drv
= chr
->opaque
;
2636 case CHR_IOCTL_PP_READ_DATA
:
2637 if (ioctl(fd
, PPRDATA
, &b
) < 0)
2639 *(uint8_t *)arg
= b
;
2641 case CHR_IOCTL_PP_WRITE_DATA
:
2642 b
= *(uint8_t *)arg
;
2643 if (ioctl(fd
, PPWDATA
, &b
) < 0)
2646 case CHR_IOCTL_PP_READ_CONTROL
:
2647 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
2649 /* Linux gives only the lowest bits, and no way to know data
2650 direction! For better compatibility set the fixed upper
2652 *(uint8_t *)arg
= b
| 0xc0;
2654 case CHR_IOCTL_PP_WRITE_CONTROL
:
2655 b
= *(uint8_t *)arg
;
2656 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
2659 case CHR_IOCTL_PP_READ_STATUS
:
2660 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
2662 *(uint8_t *)arg
= b
;
2664 case CHR_IOCTL_PP_EPP_READ_ADDR
:
2665 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2666 struct ParallelIOArg
*parg
= arg
;
2667 int n
= read(fd
, parg
->buffer
, parg
->count
);
2668 if (n
!= parg
->count
) {
2673 case CHR_IOCTL_PP_EPP_READ
:
2674 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2675 struct ParallelIOArg
*parg
= arg
;
2676 int n
= read(fd
, parg
->buffer
, parg
->count
);
2677 if (n
!= parg
->count
) {
2682 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
2683 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2684 struct ParallelIOArg
*parg
= arg
;
2685 int n
= write(fd
, parg
->buffer
, parg
->count
);
2686 if (n
!= parg
->count
) {
2691 case CHR_IOCTL_PP_EPP_WRITE
:
2692 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2693 struct ParallelIOArg
*parg
= arg
;
2694 int n
= write(fd
, parg
->buffer
, parg
->count
);
2695 if (n
!= parg
->count
) {
2706 static void pp_close(CharDriverState
*chr
)
2708 ParallelCharDriver
*drv
= chr
->opaque
;
2711 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
2712 ioctl(fd
, PPRELEASE
);
2717 static CharDriverState
*qemu_chr_open_pp(const char *filename
)
2719 CharDriverState
*chr
;
2720 ParallelCharDriver
*drv
;
2723 TFR(fd
= open(filename
, O_RDWR
));
2727 if (ioctl(fd
, PPCLAIM
) < 0) {
2732 drv
= qemu_mallocz(sizeof(ParallelCharDriver
));
2738 drv
->mode
= IEEE1284_MODE_COMPAT
;
2740 chr
= qemu_mallocz(sizeof(CharDriverState
));
2746 chr
->chr_write
= null_chr_write
;
2747 chr
->chr_ioctl
= pp_ioctl
;
2748 chr
->chr_close
= pp_close
;
2751 qemu_chr_reset(chr
);
2755 #endif /* __linux__ */
2761 HANDLE hcom
, hrecv
, hsend
;
2762 OVERLAPPED orecv
, osend
;
2767 #define NSENDBUF 2048
2768 #define NRECVBUF 2048
2769 #define MAXCONNECT 1
2770 #define NTIMEOUT 5000
2772 static int win_chr_poll(void *opaque
);
2773 static int win_chr_pipe_poll(void *opaque
);
2775 static void win_chr_close(CharDriverState
*chr
)
2777 WinCharState
*s
= chr
->opaque
;
2780 CloseHandle(s
->hsend
);
2784 CloseHandle(s
->hrecv
);
2788 CloseHandle(s
->hcom
);
2792 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
2794 qemu_del_polling_cb(win_chr_poll
, chr
);
2797 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
2799 WinCharState
*s
= chr
->opaque
;
2801 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
2806 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2808 fprintf(stderr
, "Failed CreateEvent\n");
2811 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2813 fprintf(stderr
, "Failed CreateEvent\n");
2817 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
2818 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
2819 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
2820 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
2825 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
2826 fprintf(stderr
, "Failed SetupComm\n");
2830 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
2831 size
= sizeof(COMMCONFIG
);
2832 GetDefaultCommConfig(filename
, &comcfg
, &size
);
2833 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
2834 CommConfigDialog(filename
, NULL
, &comcfg
);
2836 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
2837 fprintf(stderr
, "Failed SetCommState\n");
2841 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
2842 fprintf(stderr
, "Failed SetCommMask\n");
2846 cto
.ReadIntervalTimeout
= MAXDWORD
;
2847 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
2848 fprintf(stderr
, "Failed SetCommTimeouts\n");
2852 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
2853 fprintf(stderr
, "Failed ClearCommError\n");
2856 qemu_add_polling_cb(win_chr_poll
, chr
);
2864 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
2866 WinCharState
*s
= chr
->opaque
;
2867 DWORD len
, ret
, size
, err
;
2870 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
2871 s
->osend
.hEvent
= s
->hsend
;
2874 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
2876 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
2878 err
= GetLastError();
2879 if (err
== ERROR_IO_PENDING
) {
2880 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
2898 static int win_chr_read_poll(CharDriverState
*chr
)
2900 WinCharState
*s
= chr
->opaque
;
2902 s
->max_size
= qemu_chr_can_read(chr
);
2906 static void win_chr_readfile(CharDriverState
*chr
)
2908 WinCharState
*s
= chr
->opaque
;
2913 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
2914 s
->orecv
.hEvent
= s
->hrecv
;
2915 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
2917 err
= GetLastError();
2918 if (err
== ERROR_IO_PENDING
) {
2919 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
2924 qemu_chr_read(chr
, buf
, size
);
2928 static void win_chr_read(CharDriverState
*chr
)
2930 WinCharState
*s
= chr
->opaque
;
2932 if (s
->len
> s
->max_size
)
2933 s
->len
= s
->max_size
;
2937 win_chr_readfile(chr
);
2940 static int win_chr_poll(void *opaque
)
2942 CharDriverState
*chr
= opaque
;
2943 WinCharState
*s
= chr
->opaque
;
2947 ClearCommError(s
->hcom
, &comerr
, &status
);
2948 if (status
.cbInQue
> 0) {
2949 s
->len
= status
.cbInQue
;
2950 win_chr_read_poll(chr
);
2957 static CharDriverState
*qemu_chr_open_win(const char *filename
)
2959 CharDriverState
*chr
;
2962 chr
= qemu_mallocz(sizeof(CharDriverState
));
2965 s
= qemu_mallocz(sizeof(WinCharState
));
2971 chr
->chr_write
= win_chr_write
;
2972 chr
->chr_close
= win_chr_close
;
2974 if (win_chr_init(chr
, filename
) < 0) {
2979 qemu_chr_reset(chr
);
2983 static int win_chr_pipe_poll(void *opaque
)
2985 CharDriverState
*chr
= opaque
;
2986 WinCharState
*s
= chr
->opaque
;
2989 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
2992 win_chr_read_poll(chr
);
2999 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
3001 WinCharState
*s
= chr
->opaque
;
3009 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3011 fprintf(stderr
, "Failed CreateEvent\n");
3014 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3016 fprintf(stderr
, "Failed CreateEvent\n");
3020 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
3021 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
3022 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
3024 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
3025 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
3026 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
3031 ZeroMemory(&ov
, sizeof(ov
));
3032 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3033 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
3035 fprintf(stderr
, "Failed ConnectNamedPipe\n");
3039 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
3041 fprintf(stderr
, "Failed GetOverlappedResult\n");
3043 CloseHandle(ov
.hEvent
);
3050 CloseHandle(ov
.hEvent
);
3053 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
3062 static CharDriverState
*qemu_chr_open_win_pipe(const char *filename
)
3064 CharDriverState
*chr
;
3067 chr
= qemu_mallocz(sizeof(CharDriverState
));
3070 s
= qemu_mallocz(sizeof(WinCharState
));
3076 chr
->chr_write
= win_chr_write
;
3077 chr
->chr_close
= win_chr_close
;
3079 if (win_chr_pipe_init(chr
, filename
) < 0) {
3084 qemu_chr_reset(chr
);
3088 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
3090 CharDriverState
*chr
;
3093 chr
= qemu_mallocz(sizeof(CharDriverState
));
3096 s
= qemu_mallocz(sizeof(WinCharState
));
3103 chr
->chr_write
= win_chr_write
;
3104 qemu_chr_reset(chr
);
3108 static CharDriverState
*qemu_chr_open_win_con(const char *filename
)
3110 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
3113 static CharDriverState
*qemu_chr_open_win_file_out(const char *file_out
)
3117 fd_out
= CreateFile(file_out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3118 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3119 if (fd_out
== INVALID_HANDLE_VALUE
)
3122 return qemu_chr_open_win_file(fd_out
);
3124 #endif /* !_WIN32 */
3126 /***********************************************************/
3127 /* UDP Net console */
3131 struct sockaddr_in daddr
;
3138 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3140 NetCharDriver
*s
= chr
->opaque
;
3142 return sendto(s
->fd
, buf
, len
, 0,
3143 (struct sockaddr
*)&s
->daddr
, sizeof(struct sockaddr_in
));
3146 static int udp_chr_read_poll(void *opaque
)
3148 CharDriverState
*chr
= opaque
;
3149 NetCharDriver
*s
= chr
->opaque
;
3151 s
->max_size
= qemu_chr_can_read(chr
);
3153 /* If there were any stray characters in the queue process them
3156 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3157 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3159 s
->max_size
= qemu_chr_can_read(chr
);
3164 static void udp_chr_read(void *opaque
)
3166 CharDriverState
*chr
= opaque
;
3167 NetCharDriver
*s
= chr
->opaque
;
3169 if (s
->max_size
== 0)
3171 s
->bufcnt
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
3172 s
->bufptr
= s
->bufcnt
;
3177 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3178 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3180 s
->max_size
= qemu_chr_can_read(chr
);
3184 static void udp_chr_update_read_handler(CharDriverState
*chr
)
3186 NetCharDriver
*s
= chr
->opaque
;
3189 qemu_set_fd_handler2(s
->fd
, udp_chr_read_poll
,
3190 udp_chr_read
, NULL
, chr
);
3194 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
);
3196 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
);
3198 int parse_host_src_port(struct sockaddr_in
*haddr
,
3199 struct sockaddr_in
*saddr
,
3202 static CharDriverState
*qemu_chr_open_udp(const char *def
)
3204 CharDriverState
*chr
= NULL
;
3205 NetCharDriver
*s
= NULL
;
3207 struct sockaddr_in saddr
;
3209 chr
= qemu_mallocz(sizeof(CharDriverState
));
3212 s
= qemu_mallocz(sizeof(NetCharDriver
));
3216 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
3218 perror("socket(PF_INET, SOCK_DGRAM)");
3222 if (parse_host_src_port(&s
->daddr
, &saddr
, def
) < 0) {
3223 printf("Could not parse: %s\n", def
);
3227 if (bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
)) < 0)
3237 chr
->chr_write
= udp_chr_write
;
3238 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
3251 /***********************************************************/
3252 /* TCP Net console */
3263 static void tcp_chr_accept(void *opaque
);
3265 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3267 TCPCharDriver
*s
= chr
->opaque
;
3269 return send_all(s
->fd
, buf
, len
);
3271 /* XXX: indicate an error ? */
3276 static int tcp_chr_read_poll(void *opaque
)
3278 CharDriverState
*chr
= opaque
;
3279 TCPCharDriver
*s
= chr
->opaque
;
3282 s
->max_size
= qemu_chr_can_read(chr
);
3287 #define IAC_BREAK 243
3288 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
3290 uint8_t *buf
, int *size
)
3292 /* Handle any telnet client's basic IAC options to satisfy char by
3293 * char mode with no echo. All IAC options will be removed from
3294 * the buf and the do_telnetopt variable will be used to track the
3295 * state of the width of the IAC information.
3297 * IAC commands come in sets of 3 bytes with the exception of the
3298 * "IAC BREAK" command and the double IAC.
3304 for (i
= 0; i
< *size
; i
++) {
3305 if (s
->do_telnetopt
> 1) {
3306 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
3307 /* Double IAC means send an IAC */
3311 s
->do_telnetopt
= 1;
3313 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
3314 /* Handle IAC break commands by sending a serial break */
3315 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
3320 if (s
->do_telnetopt
>= 4) {
3321 s
->do_telnetopt
= 1;
3324 if ((unsigned char)buf
[i
] == IAC
) {
3325 s
->do_telnetopt
= 2;
3336 static void tcp_chr_read(void *opaque
)
3338 CharDriverState
*chr
= opaque
;
3339 TCPCharDriver
*s
= chr
->opaque
;
3343 if (!s
->connected
|| s
->max_size
<= 0)
3346 if (len
> s
->max_size
)
3348 size
= recv(s
->fd
, buf
, len
, 0);
3350 /* connection closed */
3352 if (s
->listen_fd
>= 0) {
3353 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3355 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
3358 } else if (size
> 0) {
3359 if (s
->do_telnetopt
)
3360 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
3362 qemu_chr_read(chr
, buf
, size
);
3366 static void tcp_chr_connect(void *opaque
)
3368 CharDriverState
*chr
= opaque
;
3369 TCPCharDriver
*s
= chr
->opaque
;
3372 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
3373 tcp_chr_read
, NULL
, chr
);
3374 qemu_chr_reset(chr
);
3377 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
3378 static void tcp_chr_telnet_init(int fd
)
3381 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
3382 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3383 send(fd
, (char *)buf
, 3, 0);
3384 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3385 send(fd
, (char *)buf
, 3, 0);
3386 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3387 send(fd
, (char *)buf
, 3, 0);
3388 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3389 send(fd
, (char *)buf
, 3, 0);
3392 static void socket_set_nodelay(int fd
)
3395 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, (char *)&val
, sizeof(val
));
3398 static void tcp_chr_accept(void *opaque
)
3400 CharDriverState
*chr
= opaque
;
3401 TCPCharDriver
*s
= chr
->opaque
;
3402 struct sockaddr_in saddr
;
3404 struct sockaddr_un uaddr
;
3406 struct sockaddr
*addr
;
3413 len
= sizeof(uaddr
);
3414 addr
= (struct sockaddr
*)&uaddr
;
3418 len
= sizeof(saddr
);
3419 addr
= (struct sockaddr
*)&saddr
;
3421 fd
= accept(s
->listen_fd
, addr
, &len
);
3422 if (fd
< 0 && errno
!= EINTR
) {
3424 } else if (fd
>= 0) {
3425 if (s
->do_telnetopt
)
3426 tcp_chr_telnet_init(fd
);
3430 socket_set_nonblock(fd
);
3432 socket_set_nodelay(fd
);
3434 qemu_set_fd_handler(s
->listen_fd
, NULL
, NULL
, NULL
);
3435 tcp_chr_connect(chr
);
3438 static void tcp_chr_close(CharDriverState
*chr
)
3440 TCPCharDriver
*s
= chr
->opaque
;
3443 if (s
->listen_fd
>= 0)
3444 closesocket(s
->listen_fd
);
3448 static CharDriverState
*qemu_chr_open_tcp(const char *host_str
,
3452 CharDriverState
*chr
= NULL
;
3453 TCPCharDriver
*s
= NULL
;
3454 int fd
= -1, ret
, err
, val
;
3456 int is_waitconnect
= 1;
3459 struct sockaddr_in saddr
;
3461 struct sockaddr_un uaddr
;
3463 struct sockaddr
*addr
;
3468 addr
= (struct sockaddr
*)&uaddr
;
3469 addrlen
= sizeof(uaddr
);
3470 if (parse_unix_path(&uaddr
, host_str
) < 0)
3475 addr
= (struct sockaddr
*)&saddr
;
3476 addrlen
= sizeof(saddr
);
3477 if (parse_host_port(&saddr
, host_str
) < 0)
3482 while((ptr
= strchr(ptr
,','))) {
3484 if (!strncmp(ptr
,"server",6)) {
3486 } else if (!strncmp(ptr
,"nowait",6)) {
3488 } else if (!strncmp(ptr
,"nodelay",6)) {
3491 printf("Unknown option: %s\n", ptr
);
3498 chr
= qemu_mallocz(sizeof(CharDriverState
));
3501 s
= qemu_mallocz(sizeof(TCPCharDriver
));
3507 fd
= socket(PF_UNIX
, SOCK_STREAM
, 0);
3510 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
3515 if (!is_waitconnect
)
3516 socket_set_nonblock(fd
);
3521 s
->is_unix
= is_unix
;
3522 s
->do_nodelay
= do_nodelay
&& !is_unix
;
3525 chr
->chr_write
= tcp_chr_write
;
3526 chr
->chr_close
= tcp_chr_close
;
3529 /* allow fast reuse */
3533 pstrcpy(path
, sizeof(path
), uaddr
.sun_path
);
3539 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
3542 ret
= bind(fd
, addr
, addrlen
);
3546 ret
= listen(fd
, 0);
3551 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3553 s
->do_telnetopt
= 1;
3556 ret
= connect(fd
, addr
, addrlen
);
3558 err
= socket_error();
3559 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
3560 } else if (err
== EINPROGRESS
) {
3563 } else if (err
== WSAEALREADY
) {
3575 socket_set_nodelay(fd
);
3577 tcp_chr_connect(chr
);
3579 qemu_set_fd_handler(s
->fd
, NULL
, tcp_chr_connect
, chr
);
3582 if (is_listen
&& is_waitconnect
) {
3583 printf("QEMU waiting for connection on: %s\n", host_str
);
3584 tcp_chr_accept(chr
);
3585 socket_set_nonblock(s
->listen_fd
);
3597 CharDriverState
*qemu_chr_open(const char *filename
)
3601 if (!strcmp(filename
, "vc")) {
3602 return text_console_init(&display_state
, 0);
3603 } else if (strstart(filename
, "vc:", &p
)) {
3604 return text_console_init(&display_state
, p
);
3605 } else if (!strcmp(filename
, "null")) {
3606 return qemu_chr_open_null();
3608 if (strstart(filename
, "tcp:", &p
)) {
3609 return qemu_chr_open_tcp(p
, 0, 0);
3611 if (strstart(filename
, "telnet:", &p
)) {
3612 return qemu_chr_open_tcp(p
, 1, 0);
3614 if (strstart(filename
, "udp:", &p
)) {
3615 return qemu_chr_open_udp(p
);
3617 if (strstart(filename
, "mon:", &p
)) {
3618 CharDriverState
*drv
= qemu_chr_open(p
);
3620 drv
= qemu_chr_open_mux(drv
);
3621 monitor_init(drv
, !nographic
);
3624 printf("Unable to open driver: %s\n", p
);
3628 if (strstart(filename
, "unix:", &p
)) {
3629 return qemu_chr_open_tcp(p
, 0, 1);
3630 } else if (strstart(filename
, "file:", &p
)) {
3631 return qemu_chr_open_file_out(p
);
3632 } else if (strstart(filename
, "pipe:", &p
)) {
3633 return qemu_chr_open_pipe(p
);
3634 } else if (!strcmp(filename
, "pty")) {
3635 return qemu_chr_open_pty();
3636 } else if (!strcmp(filename
, "stdio")) {
3637 return qemu_chr_open_stdio();
3639 #if defined(__linux__)
3640 if (strstart(filename
, "/dev/parport", NULL
)) {
3641 return qemu_chr_open_pp(filename
);
3644 #if defined(__linux__) || defined(__sun__)
3645 if (strstart(filename
, "/dev/", NULL
)) {
3646 return qemu_chr_open_tty(filename
);
3650 if (strstart(filename
, "COM", NULL
)) {
3651 return qemu_chr_open_win(filename
);
3653 if (strstart(filename
, "pipe:", &p
)) {
3654 return qemu_chr_open_win_pipe(p
);
3656 if (strstart(filename
, "con:", NULL
)) {
3657 return qemu_chr_open_win_con(filename
);
3659 if (strstart(filename
, "file:", &p
)) {
3660 return qemu_chr_open_win_file_out(p
);
3663 #ifdef CONFIG_BRLAPI
3664 if (!strcmp(filename
, "braille")) {
3665 return chr_baum_init();
3673 void qemu_chr_close(CharDriverState
*chr
)
3676 chr
->chr_close(chr
);
3680 /***********************************************************/
3681 /* network device redirectors */
3683 __attribute__ (( unused
))
3684 static void hex_dump(FILE *f
, const uint8_t *buf
, int size
)
3688 for(i
=0;i
<size
;i
+=16) {
3692 fprintf(f
, "%08x ", i
);
3695 fprintf(f
, " %02x", buf
[i
+j
]);
3700 for(j
=0;j
<len
;j
++) {
3702 if (c
< ' ' || c
> '~')
3704 fprintf(f
, "%c", c
);
3710 static int parse_macaddr(uint8_t *macaddr
, const char *p
)
3717 offset
= strtol(p
, &last_char
, 0);
3718 if (0 == errno
&& '\0' == *last_char
&&
3719 offset
>= 0 && offset
<= 0xFFFFFF) {
3720 macaddr
[3] = (offset
& 0xFF0000) >> 16;
3721 macaddr
[4] = (offset
& 0xFF00) >> 8;
3722 macaddr
[5] = offset
& 0xFF;
3725 for(i
= 0; i
< 6; i
++) {
3726 macaddr
[i
] = strtol(p
, (char **)&p
, 16);
3731 if (*p
!= ':' && *p
!= '-')
3742 static int get_str_sep(char *buf
, int buf_size
, const char **pp
, int sep
)
3747 p1
= strchr(p
, sep
);
3753 if (len
> buf_size
- 1)
3755 memcpy(buf
, p
, len
);
3762 int parse_host_src_port(struct sockaddr_in
*haddr
,
3763 struct sockaddr_in
*saddr
,
3764 const char *input_str
)
3766 char *str
= strdup(input_str
);
3767 char *host_str
= str
;
3772 * Chop off any extra arguments at the end of the string which
3773 * would start with a comma, then fill in the src port information
3774 * if it was provided else use the "any address" and "any port".
3776 if ((ptr
= strchr(str
,',')))
3779 if ((src_str
= strchr(input_str
,'@'))) {
3784 if (parse_host_port(haddr
, host_str
) < 0)
3787 if (!src_str
|| *src_str
== '\0')
3790 if (parse_host_port(saddr
, src_str
) < 0)
3801 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
)
3809 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3811 saddr
->sin_family
= AF_INET
;
3812 if (buf
[0] == '\0') {
3813 saddr
->sin_addr
.s_addr
= 0;
3815 if (isdigit(buf
[0])) {
3816 if (!inet_aton(buf
, &saddr
->sin_addr
))
3819 if ((he
= gethostbyname(buf
)) == NULL
)
3821 saddr
->sin_addr
= *(struct in_addr
*)he
->h_addr
;
3824 port
= strtol(p
, (char **)&r
, 0);
3827 saddr
->sin_port
= htons(port
);
3832 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
)
3837 len
= MIN(108, strlen(str
));
3838 p
= strchr(str
, ',');
3840 len
= MIN(len
, p
- str
);
3842 memset(uaddr
, 0, sizeof(*uaddr
));
3844 uaddr
->sun_family
= AF_UNIX
;
3845 memcpy(uaddr
->sun_path
, str
, len
);
3851 /* find or alloc a new VLAN */
3852 VLANState
*qemu_find_vlan(int id
)
3854 VLANState
**pvlan
, *vlan
;
3855 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
3859 vlan
= qemu_mallocz(sizeof(VLANState
));
3864 pvlan
= &first_vlan
;
3865 while (*pvlan
!= NULL
)
3866 pvlan
= &(*pvlan
)->next
;
3871 VLANClientState
*qemu_new_vlan_client(VLANState
*vlan
,
3872 IOReadHandler
*fd_read
,
3873 IOCanRWHandler
*fd_can_read
,
3876 VLANClientState
*vc
, **pvc
;
3877 vc
= qemu_mallocz(sizeof(VLANClientState
));
3880 vc
->fd_read
= fd_read
;
3881 vc
->fd_can_read
= fd_can_read
;
3882 vc
->opaque
= opaque
;
3886 pvc
= &vlan
->first_client
;
3887 while (*pvc
!= NULL
)
3888 pvc
= &(*pvc
)->next
;
3893 void qemu_del_vlan_client(VLANClientState
*vc
)
3895 VLANClientState
**pvc
= &vc
->vlan
->first_client
;
3897 while (*pvc
!= NULL
)
3903 pvc
= &(*pvc
)->next
;
3906 int qemu_can_send_packet(VLANClientState
*vc1
)
3908 VLANState
*vlan
= vc1
->vlan
;
3909 VLANClientState
*vc
;
3911 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
3913 if (vc
->fd_can_read
&& vc
->fd_can_read(vc
->opaque
))
3920 void qemu_send_packet(VLANClientState
*vc1
, const uint8_t *buf
, int size
)
3922 VLANState
*vlan
= vc1
->vlan
;
3923 VLANClientState
*vc
;
3926 printf("vlan %d send:\n", vlan
->id
);
3927 hex_dump(stdout
, buf
, size
);
3929 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
3931 vc
->fd_read(vc
->opaque
, buf
, size
);
3936 #if defined(CONFIG_SLIRP)
3938 /* slirp network adapter */
3940 static int slirp_inited
;
3941 static VLANClientState
*slirp_vc
;
3943 int slirp_can_output(void)
3945 return !slirp_vc
|| qemu_can_send_packet(slirp_vc
);
3948 void slirp_output(const uint8_t *pkt
, int pkt_len
)
3951 printf("slirp output:\n");
3952 hex_dump(stdout
, pkt
, pkt_len
);
3956 qemu_send_packet(slirp_vc
, pkt
, pkt_len
);
3959 static void slirp_receive(void *opaque
, const uint8_t *buf
, int size
)
3962 printf("slirp input:\n");
3963 hex_dump(stdout
, buf
, size
);
3965 slirp_input(buf
, size
);
3968 static int net_slirp_init(VLANState
*vlan
)
3970 if (!slirp_inited
) {
3974 slirp_vc
= qemu_new_vlan_client(vlan
,
3975 slirp_receive
, NULL
, NULL
);
3976 snprintf(slirp_vc
->info_str
, sizeof(slirp_vc
->info_str
), "user redirector");
3980 static void net_slirp_redir(const char *redir_str
)
3985 struct in_addr guest_addr
;
3986 int host_port
, guest_port
;
3988 if (!slirp_inited
) {
3994 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
3996 if (!strcmp(buf
, "tcp")) {
3998 } else if (!strcmp(buf
, "udp")) {
4004 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4006 host_port
= strtol(buf
, &r
, 0);
4010 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4012 if (buf
[0] == '\0') {
4013 pstrcpy(buf
, sizeof(buf
), "10.0.2.15");
4015 if (!inet_aton(buf
, &guest_addr
))
4018 guest_port
= strtol(p
, &r
, 0);
4022 if (slirp_redir(is_udp
, host_port
, guest_addr
, guest_port
) < 0) {
4023 fprintf(stderr
, "qemu: could not set up redirection\n");
4028 fprintf(stderr
, "qemu: syntax: -redir [tcp|udp]:host-port:[guest-host]:guest-port\n");
4036 static void erase_dir(char *dir_name
)
4040 char filename
[1024];
4042 /* erase all the files in the directory */
4043 if ((d
= opendir(dir_name
)) != 0) {
4048 if (strcmp(de
->d_name
, ".") != 0 &&
4049 strcmp(de
->d_name
, "..") != 0) {
4050 snprintf(filename
, sizeof(filename
), "%s/%s",
4051 smb_dir
, de
->d_name
);
4052 if (unlink(filename
) != 0) /* is it a directory? */
4053 erase_dir(filename
);
4061 /* automatic user mode samba server configuration */
4062 static void smb_exit(void)
4067 /* automatic user mode samba server configuration */
4068 static void net_slirp_smb(const char *exported_dir
)
4070 char smb_conf
[1024];
4071 char smb_cmdline
[1024];
4074 if (!slirp_inited
) {
4079 /* XXX: better tmp dir construction */
4080 snprintf(smb_dir
, sizeof(smb_dir
), "/tmp/qemu-smb.%d", getpid());
4081 if (mkdir(smb_dir
, 0700) < 0) {
4082 fprintf(stderr
, "qemu: could not create samba server dir '%s'\n", smb_dir
);
4085 snprintf(smb_conf
, sizeof(smb_conf
), "%s/%s", smb_dir
, "smb.conf");
4087 f
= fopen(smb_conf
, "w");
4089 fprintf(stderr
, "qemu: could not create samba server configuration file '%s'\n", smb_conf
);
4096 "socket address=127.0.0.1\n"
4097 "pid directory=%s\n"
4098 "lock directory=%s\n"
4099 "log file=%s/log.smbd\n"
4100 "smb passwd file=%s/smbpasswd\n"
4101 "security = share\n"
4116 snprintf(smb_cmdline
, sizeof(smb_cmdline
), "%s -s %s",
4117 SMBD_COMMAND
, smb_conf
);
4119 slirp_add_exec(0, smb_cmdline
, 4, 139);
4122 #endif /* !defined(_WIN32) */
4123 void do_info_slirp(void)
4128 #endif /* CONFIG_SLIRP */
4130 #if !defined(_WIN32)
4132 typedef struct TAPState
{
4133 VLANClientState
*vc
;
4135 char down_script
[1024];
4138 static void tap_receive(void *opaque
, const uint8_t *buf
, int size
)
4140 TAPState
*s
= opaque
;
4143 ret
= write(s
->fd
, buf
, size
);
4144 if (ret
< 0 && (errno
== EINTR
|| errno
== EAGAIN
)) {
4151 static void tap_send(void *opaque
)
4153 TAPState
*s
= opaque
;
4160 sbuf
.maxlen
= sizeof(buf
);
4162 size
= getmsg(s
->fd
, NULL
, &sbuf
, &f
) >=0 ? sbuf
.len
: -1;
4164 size
= read(s
->fd
, buf
, sizeof(buf
));
4167 qemu_send_packet(s
->vc
, buf
, size
);
4173 static TAPState
*net_tap_fd_init(VLANState
*vlan
, int fd
)
4177 s
= qemu_mallocz(sizeof(TAPState
));
4181 s
->vc
= qemu_new_vlan_client(vlan
, tap_receive
, NULL
, s
);
4182 qemu_set_fd_handler(s
->fd
, tap_send
, NULL
, s
);
4183 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "tap: fd=%d", fd
);
4187 #if defined (_BSD) || defined (__FreeBSD_kernel__)
4188 static int tap_open(char *ifname
, int ifname_size
)
4194 TFR(fd
= open("/dev/tap", O_RDWR
));
4196 fprintf(stderr
, "warning: could not open /dev/tap: no virtual network emulation\n");
4201 dev
= devname(s
.st_rdev
, S_IFCHR
);
4202 pstrcpy(ifname
, ifname_size
, dev
);
4204 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4207 #elif defined(__sun__)
4208 #define TUNNEWPPA (('T'<<16) | 0x0001)
4210 * Allocate TAP device, returns opened fd.
4211 * Stores dev name in the first arg(must be large enough).
4213 int tap_alloc(char *dev
)
4215 int tap_fd
, if_fd
, ppa
= -1;
4216 static int ip_fd
= 0;
4219 static int arp_fd
= 0;
4220 int ip_muxid
, arp_muxid
;
4221 struct strioctl strioc_if
, strioc_ppa
;
4222 int link_type
= I_PLINK
;;
4224 char actual_name
[32] = "";
4226 memset(&ifr
, 0x0, sizeof(ifr
));
4230 while( *ptr
&& !isdigit((int)*ptr
) ) ptr
++;
4234 /* Check if IP device was opened */
4238 TFR(ip_fd
= open("/dev/udp", O_RDWR
, 0));
4240 syslog(LOG_ERR
, "Can't open /dev/ip (actually /dev/udp)");
4244 TFR(tap_fd
= open("/dev/tap", O_RDWR
, 0));
4246 syslog(LOG_ERR
, "Can't open /dev/tap");
4250 /* Assign a new PPA and get its unit number. */
4251 strioc_ppa
.ic_cmd
= TUNNEWPPA
;
4252 strioc_ppa
.ic_timout
= 0;
4253 strioc_ppa
.ic_len
= sizeof(ppa
);
4254 strioc_ppa
.ic_dp
= (char *)&ppa
;
4255 if ((ppa
= ioctl (tap_fd
, I_STR
, &strioc_ppa
)) < 0)
4256 syslog (LOG_ERR
, "Can't assign new interface");
4258 TFR(if_fd
= open("/dev/tap", O_RDWR
, 0));
4260 syslog(LOG_ERR
, "Can't open /dev/tap (2)");
4263 if(ioctl(if_fd
, I_PUSH
, "ip") < 0){
4264 syslog(LOG_ERR
, "Can't push IP module");
4268 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) < 0)
4269 syslog(LOG_ERR
, "Can't get flags\n");
4271 snprintf (actual_name
, 32, "tap%d", ppa
);
4272 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4275 /* Assign ppa according to the unit number returned by tun device */
4277 if (ioctl (if_fd
, SIOCSLIFNAME
, &ifr
) < 0)
4278 syslog (LOG_ERR
, "Can't set PPA %d", ppa
);
4279 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) <0)
4280 syslog (LOG_ERR
, "Can't get flags\n");
4281 /* Push arp module to if_fd */
4282 if (ioctl (if_fd
, I_PUSH
, "arp") < 0)
4283 syslog (LOG_ERR
, "Can't push ARP module (2)");
4285 /* Push arp module to ip_fd */
4286 if (ioctl (ip_fd
, I_POP
, NULL
) < 0)
4287 syslog (LOG_ERR
, "I_POP failed\n");
4288 if (ioctl (ip_fd
, I_PUSH
, "arp") < 0)
4289 syslog (LOG_ERR
, "Can't push ARP module (3)\n");
4291 TFR(arp_fd
= open ("/dev/tap", O_RDWR
, 0));
4293 syslog (LOG_ERR
, "Can't open %s\n", "/dev/tap");
4295 /* Set ifname to arp */
4296 strioc_if
.ic_cmd
= SIOCSLIFNAME
;
4297 strioc_if
.ic_timout
= 0;
4298 strioc_if
.ic_len
= sizeof(ifr
);
4299 strioc_if
.ic_dp
= (char *)&ifr
;
4300 if (ioctl(arp_fd
, I_STR
, &strioc_if
) < 0){
4301 syslog (LOG_ERR
, "Can't set ifname to arp\n");
4304 if((ip_muxid
= ioctl(ip_fd
, I_LINK
, if_fd
)) < 0){
4305 syslog(LOG_ERR
, "Can't link TAP device to IP");
4309 if ((arp_muxid
= ioctl (ip_fd
, link_type
, arp_fd
)) < 0)
4310 syslog (LOG_ERR
, "Can't link TAP device to ARP");
4314 memset(&ifr
, 0x0, sizeof(ifr
));
4315 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4316 ifr
.lifr_ip_muxid
= ip_muxid
;
4317 ifr
.lifr_arp_muxid
= arp_muxid
;
4319 if (ioctl (ip_fd
, SIOCSLIFMUXID
, &ifr
) < 0)
4321 ioctl (ip_fd
, I_PUNLINK
, arp_muxid
);
4322 ioctl (ip_fd
, I_PUNLINK
, ip_muxid
);
4323 syslog (LOG_ERR
, "Can't set multiplexor id");
4326 sprintf(dev
, "tap%d", ppa
);
4330 static int tap_open(char *ifname
, int ifname_size
)
4334 if( (fd
= tap_alloc(dev
)) < 0 ){
4335 fprintf(stderr
, "Cannot allocate TAP device\n");
4338 pstrcpy(ifname
, ifname_size
, dev
);
4339 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4343 static int tap_open(char *ifname
, int ifname_size
)
4348 TFR(fd
= open("/dev/net/tun", O_RDWR
));
4350 fprintf(stderr
, "warning: could not open /dev/net/tun: no virtual network emulation\n");
4353 memset(&ifr
, 0, sizeof(ifr
));
4354 ifr
.ifr_flags
= IFF_TAP
| IFF_NO_PI
;
4355 if (ifname
[0] != '\0')
4356 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, ifname
);
4358 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, "tap%d");
4359 ret
= ioctl(fd
, TUNSETIFF
, (void *) &ifr
);
4361 fprintf(stderr
, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
4365 pstrcpy(ifname
, ifname_size
, ifr
.ifr_name
);
4366 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4371 static int launch_script(const char *setup_script
, const char *ifname
, int fd
)
4377 /* try to launch network script */
4381 int open_max
= sysconf (_SC_OPEN_MAX
), i
;
4382 for (i
= 0; i
< open_max
; i
++)
4383 if (i
!= STDIN_FILENO
&&
4384 i
!= STDOUT_FILENO
&&
4385 i
!= STDERR_FILENO
&&
4390 *parg
++ = (char *)setup_script
;
4391 *parg
++ = (char *)ifname
;
4393 execv(setup_script
, args
);
4396 while (waitpid(pid
, &status
, 0) != pid
);
4397 if (!WIFEXITED(status
) ||
4398 WEXITSTATUS(status
) != 0) {
4399 fprintf(stderr
, "%s: could not launch network script\n",
4407 static int net_tap_init(VLANState
*vlan
, const char *ifname1
,
4408 const char *setup_script
, const char *down_script
)
4414 if (ifname1
!= NULL
)
4415 pstrcpy(ifname
, sizeof(ifname
), ifname1
);
4418 TFR(fd
= tap_open(ifname
, sizeof(ifname
)));
4422 if (!setup_script
|| !strcmp(setup_script
, "no"))
4424 if (setup_script
[0] != '\0') {
4425 if (launch_script(setup_script
, ifname
, fd
))
4428 s
= net_tap_fd_init(vlan
, fd
);
4431 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4432 "tap: ifname=%s setup_script=%s", ifname
, setup_script
);
4433 if (down_script
&& strcmp(down_script
, "no"))
4434 snprintf(s
->down_script
, sizeof(s
->down_script
), "%s", down_script
);
4438 #endif /* !_WIN32 */
4440 #if defined(CONFIG_VDE)
4441 typedef struct VDEState
{
4442 VLANClientState
*vc
;
4446 static void vde_to_qemu(void *opaque
)
4448 VDEState
*s
= opaque
;
4452 size
= vde_recv(s
->vde
, buf
, sizeof(buf
), 0);
4454 qemu_send_packet(s
->vc
, buf
, size
);
4458 static void vde_from_qemu(void *opaque
, const uint8_t *buf
, int size
)
4460 VDEState
*s
= opaque
;
4463 ret
= vde_send(s
->vde
, buf
, size
, 0);
4464 if (ret
< 0 && errno
== EINTR
) {
4471 static int net_vde_init(VLANState
*vlan
, const char *sock
, int port
,
4472 const char *group
, int mode
)
4475 char *init_group
= strlen(group
) ? (char *)group
: NULL
;
4476 char *init_sock
= strlen(sock
) ? (char *)sock
: NULL
;
4478 struct vde_open_args args
= {
4480 .group
= init_group
,
4484 s
= qemu_mallocz(sizeof(VDEState
));
4487 s
->vde
= vde_open(init_sock
, "QEMU", &args
);
4492 s
->vc
= qemu_new_vlan_client(vlan
, vde_from_qemu
, NULL
, s
);
4493 qemu_set_fd_handler(vde_datafd(s
->vde
), vde_to_qemu
, NULL
, s
);
4494 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "vde: sock=%s fd=%d",
4495 sock
, vde_datafd(s
->vde
));
4500 /* network connection */
4501 typedef struct NetSocketState
{
4502 VLANClientState
*vc
;
4504 int state
; /* 0 = getting length, 1 = getting data */
4508 struct sockaddr_in dgram_dst
; /* contains inet host and port destination iff connectionless (SOCK_DGRAM) */
4511 typedef struct NetSocketListenState
{
4514 } NetSocketListenState
;
4516 /* XXX: we consider we can send the whole packet without blocking */
4517 static void net_socket_receive(void *opaque
, const uint8_t *buf
, int size
)
4519 NetSocketState
*s
= opaque
;
4523 send_all(s
->fd
, (const uint8_t *)&len
, sizeof(len
));
4524 send_all(s
->fd
, buf
, size
);
4527 static void net_socket_receive_dgram(void *opaque
, const uint8_t *buf
, int size
)
4529 NetSocketState
*s
= opaque
;
4530 sendto(s
->fd
, buf
, size
, 0,
4531 (struct sockaddr
*)&s
->dgram_dst
, sizeof(s
->dgram_dst
));
4534 static void net_socket_send(void *opaque
)
4536 NetSocketState
*s
= opaque
;
4541 size
= recv(s
->fd
, buf1
, sizeof(buf1
), 0);
4543 err
= socket_error();
4544 if (err
!= EWOULDBLOCK
)
4546 } else if (size
== 0) {
4547 /* end of connection */
4549 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4555 /* reassemble a packet from the network */
4561 memcpy(s
->buf
+ s
->index
, buf
, l
);
4565 if (s
->index
== 4) {
4567 s
->packet_len
= ntohl(*(uint32_t *)s
->buf
);
4573 l
= s
->packet_len
- s
->index
;
4576 memcpy(s
->buf
+ s
->index
, buf
, l
);
4580 if (s
->index
>= s
->packet_len
) {
4581 qemu_send_packet(s
->vc
, s
->buf
, s
->packet_len
);
4590 static void net_socket_send_dgram(void *opaque
)
4592 NetSocketState
*s
= opaque
;
4595 size
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
4599 /* end of connection */
4600 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
4603 qemu_send_packet(s
->vc
, s
->buf
, size
);
4606 static int net_socket_mcast_create(struct sockaddr_in
*mcastaddr
)
4611 if (!IN_MULTICAST(ntohl(mcastaddr
->sin_addr
.s_addr
))) {
4612 fprintf(stderr
, "qemu: error: specified mcastaddr \"%s\" (0x%08x) does not contain a multicast address\n",
4613 inet_ntoa(mcastaddr
->sin_addr
),
4614 (int)ntohl(mcastaddr
->sin_addr
.s_addr
));
4618 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
4620 perror("socket(PF_INET, SOCK_DGRAM)");
4625 ret
=setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
,
4626 (const char *)&val
, sizeof(val
));
4628 perror("setsockopt(SOL_SOCKET, SO_REUSEADDR)");
4632 ret
= bind(fd
, (struct sockaddr
*)mcastaddr
, sizeof(*mcastaddr
));
4638 /* Add host to multicast group */
4639 imr
.imr_multiaddr
= mcastaddr
->sin_addr
;
4640 imr
.imr_interface
.s_addr
= htonl(INADDR_ANY
);
4642 ret
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
,
4643 (const char *)&imr
, sizeof(struct ip_mreq
));
4645 perror("setsockopt(IP_ADD_MEMBERSHIP)");
4649 /* Force mcast msgs to loopback (eg. several QEMUs in same host */
4651 ret
=setsockopt(fd
, IPPROTO_IP
, IP_MULTICAST_LOOP
,
4652 (const char *)&val
, sizeof(val
));
4654 perror("setsockopt(SOL_IP, IP_MULTICAST_LOOP)");
4658 socket_set_nonblock(fd
);
4666 static NetSocketState
*net_socket_fd_init_dgram(VLANState
*vlan
, int fd
,
4669 struct sockaddr_in saddr
;
4671 socklen_t saddr_len
;
4674 /* fd passed: multicast: "learn" dgram_dst address from bound address and save it
4675 * Because this may be "shared" socket from a "master" process, datagrams would be recv()
4676 * by ONLY ONE process: we must "clone" this dgram socket --jjo
4680 if (getsockname(fd
, (struct sockaddr
*) &saddr
, &saddr_len
) == 0) {
4682 if (saddr
.sin_addr
.s_addr
==0) {
4683 fprintf(stderr
, "qemu: error: init_dgram: fd=%d unbound, cannot setup multicast dst addr\n",
4687 /* clone dgram socket */
4688 newfd
= net_socket_mcast_create(&saddr
);
4690 /* error already reported by net_socket_mcast_create() */
4694 /* clone newfd to fd, close newfd */
4699 fprintf(stderr
, "qemu: error: init_dgram: fd=%d failed getsockname(): %s\n",
4700 fd
, strerror(errno
));
4705 s
= qemu_mallocz(sizeof(NetSocketState
));
4710 s
->vc
= qemu_new_vlan_client(vlan
, net_socket_receive_dgram
, NULL
, s
);
4711 qemu_set_fd_handler(s
->fd
, net_socket_send_dgram
, NULL
, s
);
4713 /* mcast: save bound address as dst */
4714 if (is_connected
) s
->dgram_dst
=saddr
;
4716 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4717 "socket: fd=%d (%s mcast=%s:%d)",
4718 fd
, is_connected
? "cloned" : "",
4719 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4723 static void net_socket_connect(void *opaque
)
4725 NetSocketState
*s
= opaque
;
4726 qemu_set_fd_handler(s
->fd
, net_socket_send
, NULL
, s
);
4729 static NetSocketState
*net_socket_fd_init_stream(VLANState
*vlan
, int fd
,
4733 s
= qemu_mallocz(sizeof(NetSocketState
));
4737 s
->vc
= qemu_new_vlan_client(vlan
,
4738 net_socket_receive
, NULL
, s
);
4739 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4740 "socket: fd=%d", fd
);
4742 net_socket_connect(s
);
4744 qemu_set_fd_handler(s
->fd
, NULL
, net_socket_connect
, s
);
4749 static NetSocketState
*net_socket_fd_init(VLANState
*vlan
, int fd
,
4752 int so_type
=-1, optlen
=sizeof(so_type
);
4754 if(getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, (char *)&so_type
,
4755 (socklen_t
*)&optlen
)< 0) {
4756 fprintf(stderr
, "qemu: error: getsockopt(SO_TYPE) for fd=%d failed\n", fd
);
4761 return net_socket_fd_init_dgram(vlan
, fd
, is_connected
);
4763 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4765 /* who knows ... this could be a eg. a pty, do warn and continue as stream */
4766 fprintf(stderr
, "qemu: warning: socket type=%d for fd=%d is not SOCK_DGRAM or SOCK_STREAM\n", so_type
, fd
);
4767 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
4772 static void net_socket_accept(void *opaque
)
4774 NetSocketListenState
*s
= opaque
;
4776 struct sockaddr_in saddr
;
4781 len
= sizeof(saddr
);
4782 fd
= accept(s
->fd
, (struct sockaddr
*)&saddr
, &len
);
4783 if (fd
< 0 && errno
!= EINTR
) {
4785 } else if (fd
>= 0) {
4789 s1
= net_socket_fd_init(s
->vlan
, fd
, 1);
4793 snprintf(s1
->vc
->info_str
, sizeof(s1
->vc
->info_str
),
4794 "socket: connection from %s:%d",
4795 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4799 static int net_socket_listen_init(VLANState
*vlan
, const char *host_str
)
4801 NetSocketListenState
*s
;
4803 struct sockaddr_in saddr
;
4805 if (parse_host_port(&saddr
, host_str
) < 0)
4808 s
= qemu_mallocz(sizeof(NetSocketListenState
));
4812 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4817 socket_set_nonblock(fd
);
4819 /* allow fast reuse */
4821 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
4823 ret
= bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
4828 ret
= listen(fd
, 0);
4835 qemu_set_fd_handler(fd
, net_socket_accept
, NULL
, s
);
4839 static int net_socket_connect_init(VLANState
*vlan
, const char *host_str
)
4842 int fd
, connected
, ret
, err
;
4843 struct sockaddr_in saddr
;
4845 if (parse_host_port(&saddr
, host_str
) < 0)
4848 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
4853 socket_set_nonblock(fd
);
4857 ret
= connect(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
4859 err
= socket_error();
4860 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
4861 } else if (err
== EINPROGRESS
) {
4864 } else if (err
== WSAEALREADY
) {
4877 s
= net_socket_fd_init(vlan
, fd
, connected
);
4880 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4881 "socket: connect to %s:%d",
4882 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4886 static int net_socket_mcast_init(VLANState
*vlan
, const char *host_str
)
4890 struct sockaddr_in saddr
;
4892 if (parse_host_port(&saddr
, host_str
) < 0)
4896 fd
= net_socket_mcast_create(&saddr
);
4900 s
= net_socket_fd_init(vlan
, fd
, 0);
4904 s
->dgram_dst
= saddr
;
4906 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4907 "socket: mcast=%s:%d",
4908 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
4913 static const char *get_opt_name(char *buf
, int buf_size
, const char *p
)
4918 while (*p
!= '\0' && *p
!= '=') {
4919 if (q
&& (q
- buf
) < buf_size
- 1)
4929 static const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
4934 while (*p
!= '\0') {
4936 if (*(p
+ 1) != ',')
4940 if (q
&& (q
- buf
) < buf_size
- 1)
4950 static int get_param_value(char *buf
, int buf_size
,
4951 const char *tag
, const char *str
)
4958 p
= get_opt_name(option
, sizeof(option
), p
);
4962 if (!strcmp(tag
, option
)) {
4963 (void)get_opt_value(buf
, buf_size
, p
);
4966 p
= get_opt_value(NULL
, 0, p
);
4975 static int check_params(char *buf
, int buf_size
,
4976 char **params
, const char *str
)
4983 p
= get_opt_name(buf
, buf_size
, p
);
4987 for(i
= 0; params
[i
] != NULL
; i
++)
4988 if (!strcmp(params
[i
], buf
))
4990 if (params
[i
] == NULL
)
4992 p
= get_opt_value(NULL
, 0, p
);
5001 static int net_client_init(const char *str
)
5012 while (*p
!= '\0' && *p
!= ',') {
5013 if ((q
- device
) < sizeof(device
) - 1)
5021 if (get_param_value(buf
, sizeof(buf
), "vlan", p
)) {
5022 vlan_id
= strtol(buf
, NULL
, 0);
5024 vlan
= qemu_find_vlan(vlan_id
);
5026 fprintf(stderr
, "Could not create vlan %d\n", vlan_id
);
5029 if (!strcmp(device
, "nic")) {
5033 if (nb_nics
>= MAX_NICS
) {
5034 fprintf(stderr
, "Too Many NICs\n");
5037 nd
= &nd_table
[nb_nics
];
5038 macaddr
= nd
->macaddr
;
5044 macaddr
[5] = 0x56 + nb_nics
;
5046 if (get_param_value(buf
, sizeof(buf
), "macaddr", p
)) {
5047 if (parse_macaddr(macaddr
, buf
) < 0) {
5048 fprintf(stderr
, "invalid syntax for ethernet address\n");
5052 if (get_param_value(buf
, sizeof(buf
), "model", p
)) {
5053 nd
->model
= strdup(buf
);
5057 vlan
->nb_guest_devs
++;
5060 if (!strcmp(device
, "none")) {
5061 /* does nothing. It is needed to signal that no network cards
5066 if (!strcmp(device
, "user")) {
5067 if (get_param_value(buf
, sizeof(buf
), "hostname", p
)) {
5068 pstrcpy(slirp_hostname
, sizeof(slirp_hostname
), buf
);
5070 vlan
->nb_host_devs
++;
5071 ret
= net_slirp_init(vlan
);
5075 if (!strcmp(device
, "tap")) {
5077 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5078 fprintf(stderr
, "tap: no interface name\n");
5081 vlan
->nb_host_devs
++;
5082 ret
= tap_win32_init(vlan
, ifname
);
5085 if (!strcmp(device
, "tap")) {
5087 char setup_script
[1024], down_script
[1024];
5089 vlan
->nb_host_devs
++;
5090 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5091 fd
= strtol(buf
, NULL
, 0);
5092 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
5094 if (net_tap_fd_init(vlan
, fd
))
5097 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5100 if (get_param_value(setup_script
, sizeof(setup_script
), "script", p
) == 0) {
5101 pstrcpy(setup_script
, sizeof(setup_script
), DEFAULT_NETWORK_SCRIPT
);
5103 if (get_param_value(down_script
, sizeof(down_script
), "downscript", p
) == 0) {
5104 pstrcpy(down_script
, sizeof(down_script
), DEFAULT_NETWORK_DOWN_SCRIPT
);
5106 ret
= net_tap_init(vlan
, ifname
, setup_script
, down_script
);
5110 if (!strcmp(device
, "socket")) {
5111 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5113 fd
= strtol(buf
, NULL
, 0);
5115 if (net_socket_fd_init(vlan
, fd
, 1))
5117 } else if (get_param_value(buf
, sizeof(buf
), "listen", p
) > 0) {
5118 ret
= net_socket_listen_init(vlan
, buf
);
5119 } else if (get_param_value(buf
, sizeof(buf
), "connect", p
) > 0) {
5120 ret
= net_socket_connect_init(vlan
, buf
);
5121 } else if (get_param_value(buf
, sizeof(buf
), "mcast", p
) > 0) {
5122 ret
= net_socket_mcast_init(vlan
, buf
);
5124 fprintf(stderr
, "Unknown socket options: %s\n", p
);
5127 vlan
->nb_host_devs
++;
5130 if (!strcmp(device
, "vde")) {
5131 char vde_sock
[1024], vde_group
[512];
5132 int vde_port
, vde_mode
;
5133 vlan
->nb_host_devs
++;
5134 if (get_param_value(vde_sock
, sizeof(vde_sock
), "sock", p
) <= 0) {
5137 if (get_param_value(buf
, sizeof(buf
), "port", p
) > 0) {
5138 vde_port
= strtol(buf
, NULL
, 10);
5142 if (get_param_value(vde_group
, sizeof(vde_group
), "group", p
) <= 0) {
5143 vde_group
[0] = '\0';
5145 if (get_param_value(buf
, sizeof(buf
), "mode", p
) > 0) {
5146 vde_mode
= strtol(buf
, NULL
, 8);
5150 ret
= net_vde_init(vlan
, vde_sock
, vde_port
, vde_group
, vde_mode
);
5154 fprintf(stderr
, "Unknown network device: %s\n", device
);
5158 fprintf(stderr
, "Could not initialize device '%s'\n", device
);
5164 void do_info_network(void)
5167 VLANClientState
*vc
;
5169 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5170 term_printf("VLAN %d devices:\n", vlan
->id
);
5171 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
)
5172 term_printf(" %s\n", vc
->info_str
);
5176 #define HD_ALIAS "index=%d,media=disk"
5178 #define CDROM_ALIAS "index=1,media=cdrom"
5180 #define CDROM_ALIAS "index=2,media=cdrom"
5182 #define FD_ALIAS "index=%d,if=floppy"
5183 #define PFLASH_ALIAS "if=pflash"
5184 #define MTD_ALIAS "if=mtd"
5185 #define SD_ALIAS "index=0,if=sd"
5187 static int drive_add(const char *file
, const char *fmt
, ...)
5191 if (nb_drives_opt
>= MAX_DRIVES
) {
5192 fprintf(stderr
, "qemu: too many drives\n");
5196 drives_opt
[nb_drives_opt
].file
= file
;
5198 vsnprintf(drives_opt
[nb_drives_opt
].opt
,
5199 sizeof(drives_opt
[0].opt
), fmt
, ap
);
5202 return nb_drives_opt
++;
5205 int drive_get_index(BlockInterfaceType type
, int bus
, int unit
)
5209 /* seek interface, bus and unit */
5211 for (index
= 0; index
< nb_drives
; index
++)
5212 if (drives_table
[index
].type
== type
&&
5213 drives_table
[index
].bus
== bus
&&
5214 drives_table
[index
].unit
== unit
)
5220 int drive_get_max_bus(BlockInterfaceType type
)
5226 for (index
= 0; index
< nb_drives
; index
++) {
5227 if(drives_table
[index
].type
== type
&&
5228 drives_table
[index
].bus
> max_bus
)
5229 max_bus
= drives_table
[index
].bus
;
5234 static void bdrv_format_print(void *opaque
, const char *name
)
5236 fprintf(stderr
, " %s", name
);
5239 static int drive_init(struct drive_opt
*arg
, int snapshot
,
5240 QEMUMachine
*machine
)
5245 const char *mediastr
= "";
5246 BlockInterfaceType type
;
5247 enum { MEDIA_DISK
, MEDIA_CDROM
} media
;
5248 int bus_id
, unit_id
;
5249 int cyls
, heads
, secs
, translation
;
5250 BlockDriverState
*bdrv
;
5251 BlockDriver
*drv
= NULL
;
5256 char *str
= arg
->opt
;
5257 char *params
[] = { "bus", "unit", "if", "index", "cyls", "heads",
5258 "secs", "trans", "media", "snapshot", "file",
5259 "cache", "format", NULL
};
5261 if (check_params(buf
, sizeof(buf
), params
, str
) < 0) {
5262 fprintf(stderr
, "qemu: unknown parameter '%s' in '%s'\n",
5268 cyls
= heads
= secs
= 0;
5271 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5275 if (!strcmp(machine
->name
, "realview") ||
5276 !strcmp(machine
->name
, "SS-5") ||
5277 !strcmp(machine
->name
, "SS-10") ||
5278 !strcmp(machine
->name
, "SS-600MP") ||
5279 !strcmp(machine
->name
, "versatilepb") ||
5280 !strcmp(machine
->name
, "versatileab")) {
5282 max_devs
= MAX_SCSI_DEVS
;
5283 strcpy(devname
, "scsi");
5286 max_devs
= MAX_IDE_DEVS
;
5287 strcpy(devname
, "ide");
5291 /* extract parameters */
5293 if (get_param_value(buf
, sizeof(buf
), "bus", str
)) {
5294 bus_id
= strtol(buf
, NULL
, 0);
5296 fprintf(stderr
, "qemu: '%s' invalid bus id\n", str
);
5301 if (get_param_value(buf
, sizeof(buf
), "unit", str
)) {
5302 unit_id
= strtol(buf
, NULL
, 0);
5304 fprintf(stderr
, "qemu: '%s' invalid unit id\n", str
);
5309 if (get_param_value(buf
, sizeof(buf
), "if", str
)) {
5310 pstrcpy(devname
, sizeof(devname
), buf
);
5311 if (!strcmp(buf
, "ide")) {
5313 max_devs
= MAX_IDE_DEVS
;
5314 } else if (!strcmp(buf
, "scsi")) {
5316 max_devs
= MAX_SCSI_DEVS
;
5317 } else if (!strcmp(buf
, "floppy")) {
5320 } else if (!strcmp(buf
, "pflash")) {
5323 } else if (!strcmp(buf
, "mtd")) {
5326 } else if (!strcmp(buf
, "sd")) {
5330 fprintf(stderr
, "qemu: '%s' unsupported bus type '%s'\n", str
, buf
);
5335 if (get_param_value(buf
, sizeof(buf
), "index", str
)) {
5336 index
= strtol(buf
, NULL
, 0);
5338 fprintf(stderr
, "qemu: '%s' invalid index\n", str
);
5343 if (get_param_value(buf
, sizeof(buf
), "cyls", str
)) {
5344 cyls
= strtol(buf
, NULL
, 0);
5347 if (get_param_value(buf
, sizeof(buf
), "heads", str
)) {
5348 heads
= strtol(buf
, NULL
, 0);
5351 if (get_param_value(buf
, sizeof(buf
), "secs", str
)) {
5352 secs
= strtol(buf
, NULL
, 0);
5355 if (cyls
|| heads
|| secs
) {
5356 if (cyls
< 1 || cyls
> 16383) {
5357 fprintf(stderr
, "qemu: '%s' invalid physical cyls number\n", str
);
5360 if (heads
< 1 || heads
> 16) {
5361 fprintf(stderr
, "qemu: '%s' invalid physical heads number\n", str
);
5364 if (secs
< 1 || secs
> 63) {
5365 fprintf(stderr
, "qemu: '%s' invalid physical secs number\n", str
);
5370 if (get_param_value(buf
, sizeof(buf
), "trans", str
)) {
5373 "qemu: '%s' trans must be used with cyls,heads and secs\n",
5377 if (!strcmp(buf
, "none"))
5378 translation
= BIOS_ATA_TRANSLATION_NONE
;
5379 else if (!strcmp(buf
, "lba"))
5380 translation
= BIOS_ATA_TRANSLATION_LBA
;
5381 else if (!strcmp(buf
, "auto"))
5382 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5384 fprintf(stderr
, "qemu: '%s' invalid translation type\n", str
);
5389 if (get_param_value(buf
, sizeof(buf
), "media", str
)) {
5390 if (!strcmp(buf
, "disk")) {
5392 } else if (!strcmp(buf
, "cdrom")) {
5393 if (cyls
|| secs
|| heads
) {
5395 "qemu: '%s' invalid physical CHS format\n", str
);
5398 media
= MEDIA_CDROM
;
5400 fprintf(stderr
, "qemu: '%s' invalid media\n", str
);
5405 if (get_param_value(buf
, sizeof(buf
), "snapshot", str
)) {
5406 if (!strcmp(buf
, "on"))
5408 else if (!strcmp(buf
, "off"))
5411 fprintf(stderr
, "qemu: '%s' invalid snapshot option\n", str
);
5416 if (get_param_value(buf
, sizeof(buf
), "cache", str
)) {
5417 if (!strcmp(buf
, "off"))
5419 else if (!strcmp(buf
, "on"))
5422 fprintf(stderr
, "qemu: invalid cache option\n");
5427 if (get_param_value(buf
, sizeof(buf
), "format", str
)) {
5428 if (strcmp(buf
, "?") == 0) {
5429 fprintf(stderr
, "qemu: Supported formats:");
5430 bdrv_iterate_format(bdrv_format_print
, NULL
);
5431 fprintf(stderr
, "\n");
5434 drv
= bdrv_find_format(buf
);
5436 fprintf(stderr
, "qemu: '%s' invalid format\n", buf
);
5441 if (arg
->file
== NULL
)
5442 get_param_value(file
, sizeof(file
), "file", str
);
5444 pstrcpy(file
, sizeof(file
), arg
->file
);
5446 /* compute bus and unit according index */
5449 if (bus_id
!= 0 || unit_id
!= -1) {
5451 "qemu: '%s' index cannot be used with bus and unit\n", str
);
5459 unit_id
= index
% max_devs
;
5460 bus_id
= index
/ max_devs
;
5464 /* if user doesn't specify a unit_id,
5465 * try to find the first free
5468 if (unit_id
== -1) {
5470 while (drive_get_index(type
, bus_id
, unit_id
) != -1) {
5472 if (max_devs
&& unit_id
>= max_devs
) {
5473 unit_id
-= max_devs
;
5481 if (max_devs
&& unit_id
>= max_devs
) {
5482 fprintf(stderr
, "qemu: '%s' unit %d too big (max is %d)\n",
5483 str
, unit_id
, max_devs
- 1);
5488 * ignore multiple definitions
5491 if (drive_get_index(type
, bus_id
, unit_id
) != -1)
5496 if (type
== IF_IDE
|| type
== IF_SCSI
)
5497 mediastr
= (media
== MEDIA_CDROM
) ? "-cd" : "-hd";
5499 snprintf(buf
, sizeof(buf
), "%s%i%s%i",
5500 devname
, bus_id
, mediastr
, unit_id
);
5502 snprintf(buf
, sizeof(buf
), "%s%s%i",
5503 devname
, mediastr
, unit_id
);
5504 bdrv
= bdrv_new(buf
);
5505 drives_table
[nb_drives
].bdrv
= bdrv
;
5506 drives_table
[nb_drives
].type
= type
;
5507 drives_table
[nb_drives
].bus
= bus_id
;
5508 drives_table
[nb_drives
].unit
= unit_id
;
5517 bdrv_set_geometry_hint(bdrv
, cyls
, heads
, secs
);
5518 bdrv_set_translation_hint(bdrv
, translation
);
5522 bdrv_set_type_hint(bdrv
, BDRV_TYPE_CDROM
);
5527 /* FIXME: This isn't really a floppy, but it's a reasonable
5530 bdrv_set_type_hint(bdrv
, BDRV_TYPE_FLOPPY
);
5540 bdrv_flags
|= BDRV_O_SNAPSHOT
;
5542 bdrv_flags
|= BDRV_O_DIRECT
;
5543 if (bdrv_open2(bdrv
, file
, bdrv_flags
, drv
) < 0 || qemu_key_check(bdrv
, file
)) {
5544 fprintf(stderr
, "qemu: could not open disk image %s\n",
5551 /***********************************************************/
5554 static USBPort
*used_usb_ports
;
5555 static USBPort
*free_usb_ports
;
5557 /* ??? Maybe change this to register a hub to keep track of the topology. */
5558 void qemu_register_usb_port(USBPort
*port
, void *opaque
, int index
,
5559 usb_attachfn attach
)
5561 port
->opaque
= opaque
;
5562 port
->index
= index
;
5563 port
->attach
= attach
;
5564 port
->next
= free_usb_ports
;
5565 free_usb_ports
= port
;
5568 static int usb_device_add(const char *devname
)
5574 if (!free_usb_ports
)
5577 if (strstart(devname
, "host:", &p
)) {
5578 dev
= usb_host_device_open(p
);
5579 } else if (!strcmp(devname
, "mouse")) {
5580 dev
= usb_mouse_init();
5581 } else if (!strcmp(devname
, "tablet")) {
5582 dev
= usb_tablet_init();
5583 } else if (!strcmp(devname
, "keyboard")) {
5584 dev
= usb_keyboard_init();
5585 } else if (strstart(devname
, "disk:", &p
)) {
5586 dev
= usb_msd_init(p
);
5587 } else if (!strcmp(devname
, "wacom-tablet")) {
5588 dev
= usb_wacom_init();
5589 } else if (strstart(devname
, "serial:", &p
)) {
5590 dev
= usb_serial_init(p
);
5591 #ifdef CONFIG_BRLAPI
5592 } else if (!strcmp(devname
, "braille")) {
5593 dev
= usb_baum_init();
5595 } else if (strstart(devname
, "net:", &p
)) {
5596 int nicidx
= strtoul(p
, NULL
, 0);
5598 if (nicidx
>= nb_nics
|| strcmp(nd_table
[nicidx
].model
, "usb"))
5600 dev
= usb_net_init(&nd_table
[nicidx
]);
5607 /* Find a USB port to add the device to. */
5608 port
= free_usb_ports
;
5612 /* Create a new hub and chain it on. */
5613 free_usb_ports
= NULL
;
5614 port
->next
= used_usb_ports
;
5615 used_usb_ports
= port
;
5617 hub
= usb_hub_init(VM_USB_HUB_SIZE
);
5618 usb_attach(port
, hub
);
5619 port
= free_usb_ports
;
5622 free_usb_ports
= port
->next
;
5623 port
->next
= used_usb_ports
;
5624 used_usb_ports
= port
;
5625 usb_attach(port
, dev
);
5629 static int usb_device_del(const char *devname
)
5637 if (!used_usb_ports
)
5640 p
= strchr(devname
, '.');
5643 bus_num
= strtoul(devname
, NULL
, 0);
5644 addr
= strtoul(p
+ 1, NULL
, 0);
5648 lastp
= &used_usb_ports
;
5649 port
= used_usb_ports
;
5650 while (port
&& port
->dev
->addr
!= addr
) {
5651 lastp
= &port
->next
;
5659 *lastp
= port
->next
;
5660 usb_attach(port
, NULL
);
5661 dev
->handle_destroy(dev
);
5662 port
->next
= free_usb_ports
;
5663 free_usb_ports
= port
;
5667 void do_usb_add(const char *devname
)
5670 ret
= usb_device_add(devname
);
5672 term_printf("Could not add USB device '%s'\n", devname
);
5675 void do_usb_del(const char *devname
)
5678 ret
= usb_device_del(devname
);
5680 term_printf("Could not remove USB device '%s'\n", devname
);
5687 const char *speed_str
;
5690 term_printf("USB support not enabled\n");
5694 for (port
= used_usb_ports
; port
; port
= port
->next
) {
5698 switch(dev
->speed
) {
5702 case USB_SPEED_FULL
:
5705 case USB_SPEED_HIGH
:
5712 term_printf(" Device %d.%d, Speed %s Mb/s, Product %s\n",
5713 0, dev
->addr
, speed_str
, dev
->devname
);
5717 /***********************************************************/
5718 /* PCMCIA/Cardbus */
5720 static struct pcmcia_socket_entry_s
{
5721 struct pcmcia_socket_s
*socket
;
5722 struct pcmcia_socket_entry_s
*next
;
5723 } *pcmcia_sockets
= 0;
5725 void pcmcia_socket_register(struct pcmcia_socket_s
*socket
)
5727 struct pcmcia_socket_entry_s
*entry
;
5729 entry
= qemu_malloc(sizeof(struct pcmcia_socket_entry_s
));
5730 entry
->socket
= socket
;
5731 entry
->next
= pcmcia_sockets
;
5732 pcmcia_sockets
= entry
;
5735 void pcmcia_socket_unregister(struct pcmcia_socket_s
*socket
)
5737 struct pcmcia_socket_entry_s
*entry
, **ptr
;
5739 ptr
= &pcmcia_sockets
;
5740 for (entry
= *ptr
; entry
; ptr
= &entry
->next
, entry
= *ptr
)
5741 if (entry
->socket
== socket
) {
5747 void pcmcia_info(void)
5749 struct pcmcia_socket_entry_s
*iter
;
5750 if (!pcmcia_sockets
)
5751 term_printf("No PCMCIA sockets\n");
5753 for (iter
= pcmcia_sockets
; iter
; iter
= iter
->next
)
5754 term_printf("%s: %s\n", iter
->socket
->slot_string
,
5755 iter
->socket
->attached
? iter
->socket
->card_string
:
5759 /***********************************************************/
5762 static void dumb_update(DisplayState
*ds
, int x
, int y
, int w
, int h
)
5766 static void dumb_resize(DisplayState
*ds
, int w
, int h
)
5770 static void dumb_refresh(DisplayState
*ds
)
5772 #if defined(CONFIG_SDL)
5777 static void dumb_display_init(DisplayState
*ds
)
5782 ds
->dpy_update
= dumb_update
;
5783 ds
->dpy_resize
= dumb_resize
;
5784 ds
->dpy_refresh
= dumb_refresh
;
5787 /***********************************************************/
5790 #define MAX_IO_HANDLERS 64
5792 typedef struct IOHandlerRecord
{
5794 IOCanRWHandler
*fd_read_poll
;
5796 IOHandler
*fd_write
;
5799 /* temporary data */
5801 struct IOHandlerRecord
*next
;
5804 static IOHandlerRecord
*first_io_handler
;
5806 /* XXX: fd_read_poll should be suppressed, but an API change is
5807 necessary in the character devices to suppress fd_can_read(). */
5808 int qemu_set_fd_handler2(int fd
,
5809 IOCanRWHandler
*fd_read_poll
,
5811 IOHandler
*fd_write
,
5814 IOHandlerRecord
**pioh
, *ioh
;
5816 if (!fd_read
&& !fd_write
) {
5817 pioh
= &first_io_handler
;
5822 if (ioh
->fd
== fd
) {
5829 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
5833 ioh
= qemu_mallocz(sizeof(IOHandlerRecord
));
5836 ioh
->next
= first_io_handler
;
5837 first_io_handler
= ioh
;
5840 ioh
->fd_read_poll
= fd_read_poll
;
5841 ioh
->fd_read
= fd_read
;
5842 ioh
->fd_write
= fd_write
;
5843 ioh
->opaque
= opaque
;
5849 int qemu_set_fd_handler(int fd
,
5851 IOHandler
*fd_write
,
5854 return qemu_set_fd_handler2(fd
, NULL
, fd_read
, fd_write
, opaque
);
5857 /***********************************************************/
5858 /* Polling handling */
5860 typedef struct PollingEntry
{
5863 struct PollingEntry
*next
;
5866 static PollingEntry
*first_polling_entry
;
5868 int qemu_add_polling_cb(PollingFunc
*func
, void *opaque
)
5870 PollingEntry
**ppe
, *pe
;
5871 pe
= qemu_mallocz(sizeof(PollingEntry
));
5875 pe
->opaque
= opaque
;
5876 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
);
5881 void qemu_del_polling_cb(PollingFunc
*func
, void *opaque
)
5883 PollingEntry
**ppe
, *pe
;
5884 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
) {
5886 if (pe
->func
== func
&& pe
->opaque
== opaque
) {
5895 /***********************************************************/
5896 /* Wait objects support */
5897 typedef struct WaitObjects
{
5899 HANDLE events
[MAXIMUM_WAIT_OBJECTS
+ 1];
5900 WaitObjectFunc
*func
[MAXIMUM_WAIT_OBJECTS
+ 1];
5901 void *opaque
[MAXIMUM_WAIT_OBJECTS
+ 1];
5904 static WaitObjects wait_objects
= {0};
5906 int qemu_add_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
5908 WaitObjects
*w
= &wait_objects
;
5910 if (w
->num
>= MAXIMUM_WAIT_OBJECTS
)
5912 w
->events
[w
->num
] = handle
;
5913 w
->func
[w
->num
] = func
;
5914 w
->opaque
[w
->num
] = opaque
;
5919 void qemu_del_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
5922 WaitObjects
*w
= &wait_objects
;
5925 for (i
= 0; i
< w
->num
; i
++) {
5926 if (w
->events
[i
] == handle
)
5929 w
->events
[i
] = w
->events
[i
+ 1];
5930 w
->func
[i
] = w
->func
[i
+ 1];
5931 w
->opaque
[i
] = w
->opaque
[i
+ 1];
5939 /***********************************************************/
5940 /* savevm/loadvm support */
5942 #define IO_BUF_SIZE 32768
5946 BlockDriverState
*bs
;
5949 int64_t base_offset
;
5950 int64_t buf_offset
; /* start of buffer when writing, end of buffer
5953 int buf_size
; /* 0 when writing */
5954 uint8_t buf
[IO_BUF_SIZE
];
5957 QEMUFile
*qemu_fopen(const char *filename
, const char *mode
)
5961 f
= qemu_mallocz(sizeof(QEMUFile
));
5964 if (!strcmp(mode
, "wb")) {
5966 } else if (!strcmp(mode
, "rb")) {
5971 f
->outfile
= fopen(filename
, mode
);
5983 static QEMUFile
*qemu_fopen_bdrv(BlockDriverState
*bs
, int64_t offset
, int is_writable
)
5987 f
= qemu_mallocz(sizeof(QEMUFile
));
5992 f
->is_writable
= is_writable
;
5993 f
->base_offset
= offset
;
5997 void qemu_fflush(QEMUFile
*f
)
5999 if (!f
->is_writable
)
6001 if (f
->buf_index
> 0) {
6003 fseek(f
->outfile
, f
->buf_offset
, SEEK_SET
);
6004 fwrite(f
->buf
, 1, f
->buf_index
, f
->outfile
);
6006 bdrv_pwrite(f
->bs
, f
->base_offset
+ f
->buf_offset
,
6007 f
->buf
, f
->buf_index
);
6009 f
->buf_offset
+= f
->buf_index
;
6014 static void qemu_fill_buffer(QEMUFile
*f
)
6021 fseek(f
->outfile
, f
->buf_offset
, SEEK_SET
);
6022 len
= fread(f
->buf
, 1, IO_BUF_SIZE
, f
->outfile
);
6026 len
= bdrv_pread(f
->bs
, f
->base_offset
+ f
->buf_offset
,
6027 f
->buf
, IO_BUF_SIZE
);
6033 f
->buf_offset
+= len
;
6036 void qemu_fclose(QEMUFile
*f
)
6046 void qemu_put_buffer(QEMUFile
*f
, const uint8_t *buf
, int size
)
6050 l
= IO_BUF_SIZE
- f
->buf_index
;
6053 memcpy(f
->buf
+ f
->buf_index
, buf
, l
);
6057 if (f
->buf_index
>= IO_BUF_SIZE
)
6062 void qemu_put_byte(QEMUFile
*f
, int v
)
6064 f
->buf
[f
->buf_index
++] = v
;
6065 if (f
->buf_index
>= IO_BUF_SIZE
)
6069 int qemu_get_buffer(QEMUFile
*f
, uint8_t *buf
, int size1
)
6075 l
= f
->buf_size
- f
->buf_index
;
6077 qemu_fill_buffer(f
);
6078 l
= f
->buf_size
- f
->buf_index
;
6084 memcpy(buf
, f
->buf
+ f
->buf_index
, l
);
6089 return size1
- size
;
6092 int qemu_get_byte(QEMUFile
*f
)
6094 if (f
->buf_index
>= f
->buf_size
) {
6095 qemu_fill_buffer(f
);
6096 if (f
->buf_index
>= f
->buf_size
)
6099 return f
->buf
[f
->buf_index
++];
6102 int64_t qemu_ftell(QEMUFile
*f
)
6104 return f
->buf_offset
- f
->buf_size
+ f
->buf_index
;
6107 int64_t qemu_fseek(QEMUFile
*f
, int64_t pos
, int whence
)
6109 if (whence
== SEEK_SET
) {
6111 } else if (whence
== SEEK_CUR
) {
6112 pos
+= qemu_ftell(f
);
6114 /* SEEK_END not supported */
6117 if (f
->is_writable
) {
6119 f
->buf_offset
= pos
;
6121 f
->buf_offset
= pos
;
6128 void qemu_put_be16(QEMUFile
*f
, unsigned int v
)
6130 qemu_put_byte(f
, v
>> 8);
6131 qemu_put_byte(f
, v
);
6134 void qemu_put_be32(QEMUFile
*f
, unsigned int v
)
6136 qemu_put_byte(f
, v
>> 24);
6137 qemu_put_byte(f
, v
>> 16);
6138 qemu_put_byte(f
, v
>> 8);
6139 qemu_put_byte(f
, v
);
6142 void qemu_put_be64(QEMUFile
*f
, uint64_t v
)
6144 qemu_put_be32(f
, v
>> 32);
6145 qemu_put_be32(f
, v
);
6148 unsigned int qemu_get_be16(QEMUFile
*f
)
6151 v
= qemu_get_byte(f
) << 8;
6152 v
|= qemu_get_byte(f
);
6156 unsigned int qemu_get_be32(QEMUFile
*f
)
6159 v
= qemu_get_byte(f
) << 24;
6160 v
|= qemu_get_byte(f
) << 16;
6161 v
|= qemu_get_byte(f
) << 8;
6162 v
|= qemu_get_byte(f
);
6166 uint64_t qemu_get_be64(QEMUFile
*f
)
6169 v
= (uint64_t)qemu_get_be32(f
) << 32;
6170 v
|= qemu_get_be32(f
);
6174 typedef struct SaveStateEntry
{
6178 SaveStateHandler
*save_state
;
6179 LoadStateHandler
*load_state
;
6181 struct SaveStateEntry
*next
;
6184 static SaveStateEntry
*first_se
;
6186 /* TODO: Individual devices generally have very little idea about the rest
6187 of the system, so instance_id should be removed/replaced.
6188 Meanwhile pass -1 as instance_id if you do not already have a clearly
6189 distinguishing id for all instances of your device class. */
6190 int register_savevm(const char *idstr
,
6193 SaveStateHandler
*save_state
,
6194 LoadStateHandler
*load_state
,
6197 SaveStateEntry
*se
, **pse
;
6199 se
= qemu_malloc(sizeof(SaveStateEntry
));
6202 pstrcpy(se
->idstr
, sizeof(se
->idstr
), idstr
);
6203 se
->instance_id
= (instance_id
== -1) ? 0 : instance_id
;
6204 se
->version_id
= version_id
;
6205 se
->save_state
= save_state
;
6206 se
->load_state
= load_state
;
6207 se
->opaque
= opaque
;
6210 /* add at the end of list */
6212 while (*pse
!= NULL
) {
6213 if (instance_id
== -1
6214 && strcmp(se
->idstr
, (*pse
)->idstr
) == 0
6215 && se
->instance_id
<= (*pse
)->instance_id
)
6216 se
->instance_id
= (*pse
)->instance_id
+ 1;
6217 pse
= &(*pse
)->next
;
6223 #define QEMU_VM_FILE_MAGIC 0x5145564d
6224 #define QEMU_VM_FILE_VERSION 0x00000002
6226 static int qemu_savevm_state(QEMUFile
*f
)
6230 int64_t cur_pos
, len_pos
, total_len_pos
;
6232 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
6233 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
6234 total_len_pos
= qemu_ftell(f
);
6235 qemu_put_be64(f
, 0); /* total size */
6237 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6238 if (se
->save_state
== NULL
)
6239 /* this one has a loader only, for backwards compatibility */
6243 len
= strlen(se
->idstr
);
6244 qemu_put_byte(f
, len
);
6245 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6247 qemu_put_be32(f
, se
->instance_id
);
6248 qemu_put_be32(f
, se
->version_id
);
6250 /* record size: filled later */
6251 len_pos
= qemu_ftell(f
);
6252 qemu_put_be32(f
, 0);
6253 se
->save_state(f
, se
->opaque
);
6255 /* fill record size */
6256 cur_pos
= qemu_ftell(f
);
6257 len
= cur_pos
- len_pos
- 4;
6258 qemu_fseek(f
, len_pos
, SEEK_SET
);
6259 qemu_put_be32(f
, len
);
6260 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6262 cur_pos
= qemu_ftell(f
);
6263 qemu_fseek(f
, total_len_pos
, SEEK_SET
);
6264 qemu_put_be64(f
, cur_pos
- total_len_pos
- 8);
6265 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6271 static SaveStateEntry
*find_se(const char *idstr
, int instance_id
)
6275 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6276 if (!strcmp(se
->idstr
, idstr
) &&
6277 instance_id
== se
->instance_id
)
6283 static int qemu_loadvm_state(QEMUFile
*f
)
6286 int len
, ret
, instance_id
, record_len
, version_id
;
6287 int64_t total_len
, end_pos
, cur_pos
;
6291 v
= qemu_get_be32(f
);
6292 if (v
!= QEMU_VM_FILE_MAGIC
)
6294 v
= qemu_get_be32(f
);
6295 if (v
!= QEMU_VM_FILE_VERSION
) {
6300 total_len
= qemu_get_be64(f
);
6301 end_pos
= total_len
+ qemu_ftell(f
);
6303 if (qemu_ftell(f
) >= end_pos
)
6305 len
= qemu_get_byte(f
);
6306 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6308 instance_id
= qemu_get_be32(f
);
6309 version_id
= qemu_get_be32(f
);
6310 record_len
= qemu_get_be32(f
);
6312 printf("idstr=%s instance=0x%x version=%d len=%d\n",
6313 idstr
, instance_id
, version_id
, record_len
);
6315 cur_pos
= qemu_ftell(f
);
6316 se
= find_se(idstr
, instance_id
);
6318 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
6319 instance_id
, idstr
);
6321 ret
= se
->load_state(f
, se
->opaque
, version_id
);
6323 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
6324 instance_id
, idstr
);
6327 /* always seek to exact end of record */
6328 qemu_fseek(f
, cur_pos
+ record_len
, SEEK_SET
);
6335 /* device can contain snapshots */
6336 static int bdrv_can_snapshot(BlockDriverState
*bs
)
6339 !bdrv_is_removable(bs
) &&
6340 !bdrv_is_read_only(bs
));
6343 /* device must be snapshots in order to have a reliable snapshot */
6344 static int bdrv_has_snapshot(BlockDriverState
*bs
)
6347 !bdrv_is_removable(bs
) &&
6348 !bdrv_is_read_only(bs
));
6351 static BlockDriverState
*get_bs_snapshots(void)
6353 BlockDriverState
*bs
;
6357 return bs_snapshots
;
6358 for(i
= 0; i
<= nb_drives
; i
++) {
6359 bs
= drives_table
[i
].bdrv
;
6360 if (bdrv_can_snapshot(bs
))
6369 static int bdrv_snapshot_find(BlockDriverState
*bs
, QEMUSnapshotInfo
*sn_info
,
6372 QEMUSnapshotInfo
*sn_tab
, *sn
;
6376 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
6379 for(i
= 0; i
< nb_sns
; i
++) {
6381 if (!strcmp(sn
->id_str
, name
) || !strcmp(sn
->name
, name
)) {
6391 void do_savevm(const char *name
)
6393 BlockDriverState
*bs
, *bs1
;
6394 QEMUSnapshotInfo sn1
, *sn
= &sn1
, old_sn1
, *old_sn
= &old_sn1
;
6395 int must_delete
, ret
, i
;
6396 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
6398 int saved_vm_running
;
6405 bs
= get_bs_snapshots();
6407 term_printf("No block device can accept snapshots\n");
6411 /* ??? Should this occur after vm_stop? */
6414 saved_vm_running
= vm_running
;
6419 ret
= bdrv_snapshot_find(bs
, old_sn
, name
);
6424 memset(sn
, 0, sizeof(*sn
));
6426 pstrcpy(sn
->name
, sizeof(sn
->name
), old_sn
->name
);
6427 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), old_sn
->id_str
);
6430 pstrcpy(sn
->name
, sizeof(sn
->name
), name
);
6433 /* fill auxiliary fields */
6436 sn
->date_sec
= tb
.time
;
6437 sn
->date_nsec
= tb
.millitm
* 1000000;
6439 gettimeofday(&tv
, NULL
);
6440 sn
->date_sec
= tv
.tv_sec
;
6441 sn
->date_nsec
= tv
.tv_usec
* 1000;
6443 sn
->vm_clock_nsec
= qemu_get_clock(vm_clock
);
6445 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
6446 term_printf("Device %s does not support VM state snapshots\n",
6447 bdrv_get_device_name(bs
));
6451 /* save the VM state */
6452 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 1);
6454 term_printf("Could not open VM state file\n");
6457 ret
= qemu_savevm_state(f
);
6458 sn
->vm_state_size
= qemu_ftell(f
);
6461 term_printf("Error %d while writing VM\n", ret
);
6465 /* create the snapshots */
6467 for(i
= 0; i
< nb_drives
; i
++) {
6468 bs1
= drives_table
[i
].bdrv
;
6469 if (bdrv_has_snapshot(bs1
)) {
6471 ret
= bdrv_snapshot_delete(bs1
, old_sn
->id_str
);
6473 term_printf("Error while deleting snapshot on '%s'\n",
6474 bdrv_get_device_name(bs1
));
6477 ret
= bdrv_snapshot_create(bs1
, sn
);
6479 term_printf("Error while creating snapshot on '%s'\n",
6480 bdrv_get_device_name(bs1
));
6486 if (saved_vm_running
)
6490 void do_loadvm(const char *name
)
6492 BlockDriverState
*bs
, *bs1
;
6493 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
6496 int saved_vm_running
;
6498 bs
= get_bs_snapshots();
6500 term_printf("No block device supports snapshots\n");
6504 /* Flush all IO requests so they don't interfere with the new state. */
6507 saved_vm_running
= vm_running
;
6510 for(i
= 0; i
<= nb_drives
; i
++) {
6511 bs1
= drives_table
[i
].bdrv
;
6512 if (bdrv_has_snapshot(bs1
)) {
6513 ret
= bdrv_snapshot_goto(bs1
, name
);
6516 term_printf("Warning: ");
6519 term_printf("Snapshots not supported on device '%s'\n",
6520 bdrv_get_device_name(bs1
));
6523 term_printf("Could not find snapshot '%s' on device '%s'\n",
6524 name
, bdrv_get_device_name(bs1
));
6527 term_printf("Error %d while activating snapshot on '%s'\n",
6528 ret
, bdrv_get_device_name(bs1
));
6531 /* fatal on snapshot block device */
6538 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
6539 term_printf("Device %s does not support VM state snapshots\n",
6540 bdrv_get_device_name(bs
));
6544 /* restore the VM state */
6545 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 0);
6547 term_printf("Could not open VM state file\n");
6550 ret
= qemu_loadvm_state(f
);
6553 term_printf("Error %d while loading VM state\n", ret
);
6556 if (saved_vm_running
)
6560 void do_delvm(const char *name
)
6562 BlockDriverState
*bs
, *bs1
;
6565 bs
= get_bs_snapshots();
6567 term_printf("No block device supports snapshots\n");
6571 for(i
= 0; i
<= nb_drives
; i
++) {
6572 bs1
= drives_table
[i
].bdrv
;
6573 if (bdrv_has_snapshot(bs1
)) {
6574 ret
= bdrv_snapshot_delete(bs1
, name
);
6576 if (ret
== -ENOTSUP
)
6577 term_printf("Snapshots not supported on device '%s'\n",
6578 bdrv_get_device_name(bs1
));
6580 term_printf("Error %d while deleting snapshot on '%s'\n",
6581 ret
, bdrv_get_device_name(bs1
));
6587 void do_info_snapshots(void)
6589 BlockDriverState
*bs
, *bs1
;
6590 QEMUSnapshotInfo
*sn_tab
, *sn
;
6594 bs
= get_bs_snapshots();
6596 term_printf("No available block device supports snapshots\n");
6599 term_printf("Snapshot devices:");
6600 for(i
= 0; i
<= nb_drives
; i
++) {
6601 bs1
= drives_table
[i
].bdrv
;
6602 if (bdrv_has_snapshot(bs1
)) {
6604 term_printf(" %s", bdrv_get_device_name(bs1
));
6609 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
6611 term_printf("bdrv_snapshot_list: error %d\n", nb_sns
);
6614 term_printf("Snapshot list (from %s):\n", bdrv_get_device_name(bs
));
6615 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), NULL
));
6616 for(i
= 0; i
< nb_sns
; i
++) {
6618 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), sn
));
6623 /***********************************************************/
6624 /* ram save/restore */
6626 static int ram_get_page(QEMUFile
*f
, uint8_t *buf
, int len
)
6630 v
= qemu_get_byte(f
);
6633 if (qemu_get_buffer(f
, buf
, len
) != len
)
6637 v
= qemu_get_byte(f
);
6638 memset(buf
, v
, len
);
6646 static int ram_load_v1(QEMUFile
*f
, void *opaque
)
6651 if (qemu_get_be32(f
) != phys_ram_size
)
6653 for(i
= 0; i
< phys_ram_size
; i
+= TARGET_PAGE_SIZE
) {
6654 ret
= ram_get_page(f
, phys_ram_base
+ i
, TARGET_PAGE_SIZE
);
6661 #define BDRV_HASH_BLOCK_SIZE 1024
6662 #define IOBUF_SIZE 4096
6663 #define RAM_CBLOCK_MAGIC 0xfabe
6665 typedef struct RamCompressState
{
6668 uint8_t buf
[IOBUF_SIZE
];
6671 static int ram_compress_open(RamCompressState
*s
, QEMUFile
*f
)
6674 memset(s
, 0, sizeof(*s
));
6676 ret
= deflateInit2(&s
->zstream
, 1,
6678 9, Z_DEFAULT_STRATEGY
);
6681 s
->zstream
.avail_out
= IOBUF_SIZE
;
6682 s
->zstream
.next_out
= s
->buf
;
6686 static void ram_put_cblock(RamCompressState
*s
, const uint8_t *buf
, int len
)
6688 qemu_put_be16(s
->f
, RAM_CBLOCK_MAGIC
);
6689 qemu_put_be16(s
->f
, len
);
6690 qemu_put_buffer(s
->f
, buf
, len
);
6693 static int ram_compress_buf(RamCompressState
*s
, const uint8_t *buf
, int len
)
6697 s
->zstream
.avail_in
= len
;
6698 s
->zstream
.next_in
= (uint8_t *)buf
;
6699 while (s
->zstream
.avail_in
> 0) {
6700 ret
= deflate(&s
->zstream
, Z_NO_FLUSH
);
6703 if (s
->zstream
.avail_out
== 0) {
6704 ram_put_cblock(s
, s
->buf
, IOBUF_SIZE
);
6705 s
->zstream
.avail_out
= IOBUF_SIZE
;
6706 s
->zstream
.next_out
= s
->buf
;
6712 static void ram_compress_close(RamCompressState
*s
)
6716 /* compress last bytes */
6718 ret
= deflate(&s
->zstream
, Z_FINISH
);
6719 if (ret
== Z_OK
|| ret
== Z_STREAM_END
) {
6720 len
= IOBUF_SIZE
- s
->zstream
.avail_out
;
6722 ram_put_cblock(s
, s
->buf
, len
);
6724 s
->zstream
.avail_out
= IOBUF_SIZE
;
6725 s
->zstream
.next_out
= s
->buf
;
6726 if (ret
== Z_STREAM_END
)
6733 deflateEnd(&s
->zstream
);
6736 typedef struct RamDecompressState
{
6739 uint8_t buf
[IOBUF_SIZE
];
6740 } RamDecompressState
;
6742 static int ram_decompress_open(RamDecompressState
*s
, QEMUFile
*f
)
6745 memset(s
, 0, sizeof(*s
));
6747 ret
= inflateInit(&s
->zstream
);
6753 static int ram_decompress_buf(RamDecompressState
*s
, uint8_t *buf
, int len
)
6757 s
->zstream
.avail_out
= len
;
6758 s
->zstream
.next_out
= buf
;
6759 while (s
->zstream
.avail_out
> 0) {
6760 if (s
->zstream
.avail_in
== 0) {
6761 if (qemu_get_be16(s
->f
) != RAM_CBLOCK_MAGIC
)
6763 clen
= qemu_get_be16(s
->f
);
6764 if (clen
> IOBUF_SIZE
)
6766 qemu_get_buffer(s
->f
, s
->buf
, clen
);
6767 s
->zstream
.avail_in
= clen
;
6768 s
->zstream
.next_in
= s
->buf
;
6770 ret
= inflate(&s
->zstream
, Z_PARTIAL_FLUSH
);
6771 if (ret
!= Z_OK
&& ret
!= Z_STREAM_END
) {
6778 static void ram_decompress_close(RamDecompressState
*s
)
6780 inflateEnd(&s
->zstream
);
6783 static void ram_save(QEMUFile
*f
, void *opaque
)
6786 RamCompressState s1
, *s
= &s1
;
6789 qemu_put_be32(f
, phys_ram_size
);
6790 if (ram_compress_open(s
, f
) < 0)
6792 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
6794 if (tight_savevm_enabled
) {
6798 /* find if the memory block is available on a virtual
6801 for(j
= 0; j
< nb_drives
; j
++) {
6802 sector_num
= bdrv_hash_find(drives_table
[j
].bdrv
,
6804 BDRV_HASH_BLOCK_SIZE
);
6805 if (sector_num
>= 0)
6809 goto normal_compress
;
6812 cpu_to_be64wu((uint64_t *)(buf
+ 2), sector_num
);
6813 ram_compress_buf(s
, buf
, 10);
6819 ram_compress_buf(s
, buf
, 1);
6820 ram_compress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
);
6823 ram_compress_close(s
);
6826 static int ram_load(QEMUFile
*f
, void *opaque
, int version_id
)
6828 RamDecompressState s1
, *s
= &s1
;
6832 if (version_id
== 1)
6833 return ram_load_v1(f
, opaque
);
6834 if (version_id
!= 2)
6836 if (qemu_get_be32(f
) != phys_ram_size
)
6838 if (ram_decompress_open(s
, f
) < 0)
6840 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
6841 if (ram_decompress_buf(s
, buf
, 1) < 0) {
6842 fprintf(stderr
, "Error while reading ram block header\n");
6846 if (ram_decompress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
) < 0) {
6847 fprintf(stderr
, "Error while reading ram block address=0x%08" PRIx64
, (uint64_t)i
);
6856 ram_decompress_buf(s
, buf
+ 1, 9);
6858 sector_num
= be64_to_cpupu((const uint64_t *)(buf
+ 2));
6859 if (bs_index
>= nb_drives
) {
6860 fprintf(stderr
, "Invalid block device index %d\n", bs_index
);
6863 if (bdrv_read(drives_table
[bs_index
].bdrv
, sector_num
,
6865 BDRV_HASH_BLOCK_SIZE
/ 512) < 0) {
6866 fprintf(stderr
, "Error while reading sector %d:%" PRId64
"\n",
6867 bs_index
, sector_num
);
6874 printf("Error block header\n");
6878 ram_decompress_close(s
);
6882 /***********************************************************/
6883 /* bottom halves (can be seen as timers which expire ASAP) */
6892 static QEMUBH
*first_bh
= NULL
;
6894 QEMUBH
*qemu_bh_new(QEMUBHFunc
*cb
, void *opaque
)
6897 bh
= qemu_mallocz(sizeof(QEMUBH
));
6901 bh
->opaque
= opaque
;
6905 int qemu_bh_poll(void)
6924 void qemu_bh_schedule(QEMUBH
*bh
)
6926 CPUState
*env
= cpu_single_env
;
6930 bh
->next
= first_bh
;
6933 /* stop the currently executing CPU to execute the BH ASAP */
6935 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
6939 void qemu_bh_cancel(QEMUBH
*bh
)
6942 if (bh
->scheduled
) {
6945 pbh
= &(*pbh
)->next
;
6951 void qemu_bh_delete(QEMUBH
*bh
)
6957 /***********************************************************/
6958 /* machine registration */
6960 QEMUMachine
*first_machine
= NULL
;
6962 int qemu_register_machine(QEMUMachine
*m
)
6965 pm
= &first_machine
;
6973 static QEMUMachine
*find_machine(const char *name
)
6977 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
6978 if (!strcmp(m
->name
, name
))
6984 /***********************************************************/
6985 /* main execution loop */
6987 static void gui_update(void *opaque
)
6989 DisplayState
*ds
= opaque
;
6990 ds
->dpy_refresh(ds
);
6991 qemu_mod_timer(ds
->gui_timer
,
6992 (ds
->gui_timer_interval
?
6993 ds
->gui_timer_interval
:
6994 GUI_REFRESH_INTERVAL
)
6995 + qemu_get_clock(rt_clock
));
6998 struct vm_change_state_entry
{
6999 VMChangeStateHandler
*cb
;
7001 LIST_ENTRY (vm_change_state_entry
) entries
;
7004 static LIST_HEAD(vm_change_state_head
, vm_change_state_entry
) vm_change_state_head
;
7006 VMChangeStateEntry
*qemu_add_vm_change_state_handler(VMChangeStateHandler
*cb
,
7009 VMChangeStateEntry
*e
;
7011 e
= qemu_mallocz(sizeof (*e
));
7017 LIST_INSERT_HEAD(&vm_change_state_head
, e
, entries
);
7021 void qemu_del_vm_change_state_handler(VMChangeStateEntry
*e
)
7023 LIST_REMOVE (e
, entries
);
7027 static void vm_state_notify(int running
)
7029 VMChangeStateEntry
*e
;
7031 for (e
= vm_change_state_head
.lh_first
; e
; e
= e
->entries
.le_next
) {
7032 e
->cb(e
->opaque
, running
);
7036 /* XXX: support several handlers */
7037 static VMStopHandler
*vm_stop_cb
;
7038 static void *vm_stop_opaque
;
7040 int qemu_add_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7043 vm_stop_opaque
= opaque
;
7047 void qemu_del_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7058 qemu_rearm_alarm_timer(alarm_timer
);
7062 void vm_stop(int reason
)
7065 cpu_disable_ticks();
7069 vm_stop_cb(vm_stop_opaque
, reason
);
7076 /* reset/shutdown handler */
7078 typedef struct QEMUResetEntry
{
7079 QEMUResetHandler
*func
;
7081 struct QEMUResetEntry
*next
;
7084 static QEMUResetEntry
*first_reset_entry
;
7085 static int reset_requested
;
7086 static int shutdown_requested
;
7087 static int powerdown_requested
;
7089 int qemu_shutdown_requested(void)
7091 int r
= shutdown_requested
;
7092 shutdown_requested
= 0;
7096 int qemu_reset_requested(void)
7098 int r
= reset_requested
;
7099 reset_requested
= 0;
7103 int qemu_powerdown_requested(void)
7105 int r
= powerdown_requested
;
7106 powerdown_requested
= 0;
7110 void qemu_register_reset(QEMUResetHandler
*func
, void *opaque
)
7112 QEMUResetEntry
**pre
, *re
;
7114 pre
= &first_reset_entry
;
7115 while (*pre
!= NULL
)
7116 pre
= &(*pre
)->next
;
7117 re
= qemu_mallocz(sizeof(QEMUResetEntry
));
7119 re
->opaque
= opaque
;
7124 void qemu_system_reset(void)
7128 /* reset all devices */
7129 for(re
= first_reset_entry
; re
!= NULL
; re
= re
->next
) {
7130 re
->func(re
->opaque
);
7134 void qemu_system_reset_request(void)
7137 shutdown_requested
= 1;
7139 reset_requested
= 1;
7142 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7145 void qemu_system_shutdown_request(void)
7147 shutdown_requested
= 1;
7149 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7152 void qemu_system_powerdown_request(void)
7154 powerdown_requested
= 1;
7156 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7159 void main_loop_wait(int timeout
)
7161 IOHandlerRecord
*ioh
;
7162 fd_set rfds
, wfds
, xfds
;
7171 /* XXX: need to suppress polling by better using win32 events */
7173 for(pe
= first_polling_entry
; pe
!= NULL
; pe
= pe
->next
) {
7174 ret
|= pe
->func(pe
->opaque
);
7179 WaitObjects
*w
= &wait_objects
;
7181 ret
= WaitForMultipleObjects(w
->num
, w
->events
, FALSE
, timeout
);
7182 if (WAIT_OBJECT_0
+ 0 <= ret
&& ret
<= WAIT_OBJECT_0
+ w
->num
- 1) {
7183 if (w
->func
[ret
- WAIT_OBJECT_0
])
7184 w
->func
[ret
- WAIT_OBJECT_0
](w
->opaque
[ret
- WAIT_OBJECT_0
]);
7186 /* Check for additional signaled events */
7187 for(i
= (ret
- WAIT_OBJECT_0
+ 1); i
< w
->num
; i
++) {
7189 /* Check if event is signaled */
7190 ret2
= WaitForSingleObject(w
->events
[i
], 0);
7191 if(ret2
== WAIT_OBJECT_0
) {
7193 w
->func
[i
](w
->opaque
[i
]);
7194 } else if (ret2
== WAIT_TIMEOUT
) {
7196 err
= GetLastError();
7197 fprintf(stderr
, "WaitForSingleObject error %d %d\n", i
, err
);
7200 } else if (ret
== WAIT_TIMEOUT
) {
7202 err
= GetLastError();
7203 fprintf(stderr
, "WaitForMultipleObjects error %d %d\n", ret
, err
);
7207 /* poll any events */
7208 /* XXX: separate device handlers from system ones */
7213 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7217 (!ioh
->fd_read_poll
||
7218 ioh
->fd_read_poll(ioh
->opaque
) != 0)) {
7219 FD_SET(ioh
->fd
, &rfds
);
7223 if (ioh
->fd_write
) {
7224 FD_SET(ioh
->fd
, &wfds
);
7234 tv
.tv_usec
= timeout
* 1000;
7236 #if defined(CONFIG_SLIRP)
7238 slirp_select_fill(&nfds
, &rfds
, &wfds
, &xfds
);
7241 ret
= select(nfds
+ 1, &rfds
, &wfds
, &xfds
, &tv
);
7243 IOHandlerRecord
**pioh
;
7245 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
7246 if (!ioh
->deleted
&& ioh
->fd_read
&& FD_ISSET(ioh
->fd
, &rfds
)) {
7247 ioh
->fd_read(ioh
->opaque
);
7249 if (!ioh
->deleted
&& ioh
->fd_write
&& FD_ISSET(ioh
->fd
, &wfds
)) {
7250 ioh
->fd_write(ioh
->opaque
);
7254 /* remove deleted IO handlers */
7255 pioh
= &first_io_handler
;
7265 #if defined(CONFIG_SLIRP)
7272 slirp_select_poll(&rfds
, &wfds
, &xfds
);
7278 if (likely(!(cur_cpu
->singlestep_enabled
& SSTEP_NOTIMER
)))
7279 qemu_run_timers(&active_timers
[QEMU_TIMER_VIRTUAL
],
7280 qemu_get_clock(vm_clock
));
7281 /* run dma transfers, if any */
7285 /* real time timers */
7286 qemu_run_timers(&active_timers
[QEMU_TIMER_REALTIME
],
7287 qemu_get_clock(rt_clock
));
7289 if (alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) {
7290 alarm_timer
->flags
&= ~(ALARM_FLAG_EXPIRED
);
7291 qemu_rearm_alarm_timer(alarm_timer
);
7294 /* Check bottom-halves last in case any of the earlier events triggered
7300 static int main_loop(void)
7303 #ifdef CONFIG_PROFILER
7308 cur_cpu
= first_cpu
;
7309 next_cpu
= cur_cpu
->next_cpu
?: first_cpu
;
7316 #ifdef CONFIG_PROFILER
7317 ti
= profile_getclock();
7322 qemu_icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
7323 env
->icount_decr
.u16
.low
= 0;
7324 env
->icount_extra
= 0;
7325 count
= qemu_next_deadline();
7326 count
= (count
+ (1 << icount_time_shift
) - 1)
7327 >> icount_time_shift
;
7328 qemu_icount
+= count
;
7329 decr
= (count
> 0xffff) ? 0xffff : count
;
7331 env
->icount_decr
.u16
.low
= decr
;
7332 env
->icount_extra
= count
;
7334 ret
= cpu_exec(env
);
7335 #ifdef CONFIG_PROFILER
7336 qemu_time
+= profile_getclock() - ti
;
7339 /* Fold pending instructions back into the
7340 instruction counter, and clear the interrupt flag. */
7341 qemu_icount
-= (env
->icount_decr
.u16
.low
7342 + env
->icount_extra
);
7343 env
->icount_decr
.u32
= 0;
7344 env
->icount_extra
= 0;
7346 next_cpu
= env
->next_cpu
?: first_cpu
;
7347 if (event_pending
&& likely(ret
!= EXCP_DEBUG
)) {
7348 ret
= EXCP_INTERRUPT
;
7352 if (ret
== EXCP_HLT
) {
7353 /* Give the next CPU a chance to run. */
7357 if (ret
!= EXCP_HALTED
)
7359 /* all CPUs are halted ? */
7365 if (shutdown_requested
) {
7366 ret
= EXCP_INTERRUPT
;
7374 if (reset_requested
) {
7375 reset_requested
= 0;
7376 qemu_system_reset();
7377 ret
= EXCP_INTERRUPT
;
7379 if (powerdown_requested
) {
7380 powerdown_requested
= 0;
7381 qemu_system_powerdown();
7382 ret
= EXCP_INTERRUPT
;
7384 if (unlikely(ret
== EXCP_DEBUG
)) {
7385 vm_stop(EXCP_DEBUG
);
7387 /* If all cpus are halted then wait until the next IRQ */
7388 /* XXX: use timeout computed from timers */
7389 if (ret
== EXCP_HALTED
) {
7393 /* Advance virtual time to the next event. */
7394 if (use_icount
== 1) {
7395 /* When not using an adaptive execution frequency
7396 we tend to get badly out of sync with real time,
7397 so just delay for a reasonable amount of time. */
7400 delta
= cpu_get_icount() - cpu_get_clock();
7403 /* If virtual time is ahead of real time then just
7405 timeout
= (delta
/ 1000000) + 1;
7407 /* Wait for either IO to occur or the next
7409 add
= qemu_next_deadline();
7410 /* We advance the timer before checking for IO.
7411 Limit the amount we advance so that early IO
7412 activity won't get the guest too far ahead. */
7416 add
= (add
+ (1 << icount_time_shift
) - 1)
7417 >> icount_time_shift
;
7419 timeout
= delta
/ 1000000;
7432 #ifdef CONFIG_PROFILER
7433 ti
= profile_getclock();
7435 main_loop_wait(timeout
);
7436 #ifdef CONFIG_PROFILER
7437 dev_time
+= profile_getclock() - ti
;
7440 cpu_disable_ticks();
7444 static void help(int exitcode
)
7446 printf("QEMU PC emulator version " QEMU_VERSION
", Copyright (c) 2003-2008 Fabrice Bellard\n"
7447 "usage: %s [options] [disk_image]\n"
7449 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
7451 "Standard options:\n"
7452 "-M machine select emulated machine (-M ? for list)\n"
7453 "-cpu cpu select CPU (-cpu ? for list)\n"
7454 "-fda/-fdb file use 'file' as floppy disk 0/1 image\n"
7455 "-hda/-hdb file use 'file' as IDE hard disk 0/1 image\n"
7456 "-hdc/-hdd file use 'file' as IDE hard disk 2/3 image\n"
7457 "-cdrom file use 'file' as IDE cdrom image (cdrom is ide1 master)\n"
7458 "-drive [file=file][,if=type][,bus=n][,unit=m][,media=d][,index=i]\n"
7459 " [,cyls=c,heads=h,secs=s[,trans=t]][,snapshot=on|off]\n"
7460 " [,cache=on|off][,format=f]\n"
7461 " use 'file' as a drive image\n"
7462 "-mtdblock file use 'file' as on-board Flash memory image\n"
7463 "-sd file use 'file' as SecureDigital card image\n"
7464 "-pflash file use 'file' as a parallel flash image\n"
7465 "-boot [a|c|d|n] boot on floppy (a), hard disk (c), CD-ROM (d), or network (n)\n"
7466 "-snapshot write to temporary files instead of disk image files\n"
7468 "-no-frame open SDL window without a frame and window decorations\n"
7469 "-alt-grab use Ctrl-Alt-Shift to grab mouse (instead of Ctrl-Alt)\n"
7470 "-no-quit disable SDL window close capability\n"
7473 "-no-fd-bootchk disable boot signature checking for floppy disks\n"
7475 "-m megs set virtual RAM size to megs MB [default=%d]\n"
7476 "-smp n set the number of CPUs to 'n' [default=1]\n"
7477 "-nographic disable graphical output and redirect serial I/Os to console\n"
7478 "-portrait rotate graphical output 90 deg left (only PXA LCD)\n"
7480 "-k language use keyboard layout (for example \"fr\" for French)\n"
7483 "-audio-help print list of audio drivers and their options\n"
7484 "-soundhw c1,... enable audio support\n"
7485 " and only specified sound cards (comma separated list)\n"
7486 " use -soundhw ? to get the list of supported cards\n"
7487 " use -soundhw all to enable all of them\n"
7489 "-localtime set the real time clock to local time [default=utc]\n"
7490 "-full-screen start in full screen\n"
7492 "-win2k-hack use it when installing Windows 2000 to avoid a disk full bug\n"
7494 "-usb enable the USB driver (will be the default soon)\n"
7495 "-usbdevice name add the host or guest USB device 'name'\n"
7496 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
7497 "-g WxH[xDEPTH] Set the initial graphical resolution and depth\n"
7499 "-name string set the name of the guest\n"
7501 "Network options:\n"
7502 "-net nic[,vlan=n][,macaddr=addr][,model=type]\n"
7503 " create a new Network Interface Card and connect it to VLAN 'n'\n"
7505 "-net user[,vlan=n][,hostname=host]\n"
7506 " connect the user mode network stack to VLAN 'n' and send\n"
7507 " hostname 'host' to DHCP clients\n"
7510 "-net tap[,vlan=n],ifname=name\n"
7511 " connect the host TAP network interface to VLAN 'n'\n"
7513 "-net tap[,vlan=n][,fd=h][,ifname=name][,script=file][,downscript=dfile]\n"
7514 " connect the host TAP network interface to VLAN 'n' and use the\n"
7515 " network scripts 'file' (default=%s)\n"
7516 " and 'dfile' (default=%s);\n"
7517 " use '[down]script=no' to disable script execution;\n"
7518 " use 'fd=h' to connect to an already opened TAP interface\n"
7520 "-net socket[,vlan=n][,fd=h][,listen=[host]:port][,connect=host:port]\n"
7521 " connect the vlan 'n' to another VLAN using a socket connection\n"
7522 "-net socket[,vlan=n][,fd=h][,mcast=maddr:port]\n"
7523 " connect the vlan 'n' to multicast maddr and port\n"
7525 "-net vde[,vlan=n][,sock=socketpath][,port=n][,group=groupname][,mode=octalmode]\n"
7526 " connect the vlan 'n' to port 'n' of a vde switch running\n"
7527 " on host and listening for incoming connections on 'socketpath'.\n"
7528 " Use group 'groupname' and mode 'octalmode' to change default\n"
7529 " ownership and permissions for communication port.\n"
7531 "-net none use it alone to have zero network devices; if no -net option\n"
7532 " is provided, the default is '-net nic -net user'\n"
7535 "-tftp dir allow tftp access to files in dir [-net user]\n"
7536 "-bootp file advertise file in BOOTP replies\n"
7538 "-smb dir allow SMB access to files in 'dir' [-net user]\n"
7540 "-redir [tcp|udp]:host-port:[guest-host]:guest-port\n"
7541 " redirect TCP or UDP connections from host to guest [-net user]\n"
7544 "Linux boot specific:\n"
7545 "-kernel bzImage use 'bzImage' as kernel image\n"
7546 "-append cmdline use 'cmdline' as kernel command line\n"
7547 "-initrd file use 'file' as initial ram disk\n"
7549 "Debug/Expert options:\n"
7550 "-monitor dev redirect the monitor to char device 'dev'\n"
7551 "-serial dev redirect the serial port to char device 'dev'\n"
7552 "-parallel dev redirect the parallel port to char device 'dev'\n"
7553 "-pidfile file Write PID to 'file'\n"
7554 "-S freeze CPU at startup (use 'c' to start execution)\n"
7555 "-s wait gdb connection to port\n"
7556 "-p port set gdb connection port [default=%s]\n"
7557 "-d item1,... output log to %s (use -d ? for a list of log items)\n"
7558 "-hdachs c,h,s[,t] force hard disk 0 physical geometry and the optional BIOS\n"
7559 " translation (t=none or lba) (usually qemu can guess them)\n"
7560 "-L path set the directory for the BIOS, VGA BIOS and keymaps\n"
7562 "-kernel-kqemu enable KQEMU full virtualization (default is user mode only)\n"
7563 "-no-kqemu disable KQEMU kernel module usage\n"
7566 "-std-vga simulate a standard VGA card with VESA Bochs Extensions\n"
7567 " (default is CL-GD5446 PCI VGA)\n"
7568 "-no-acpi disable ACPI\n"
7570 #ifdef CONFIG_CURSES
7571 "-curses use a curses/ncurses interface instead of SDL\n"
7573 "-no-reboot exit instead of rebooting\n"
7574 "-no-shutdown stop before shutdown\n"
7575 "-loadvm [tag|id] start right away with a saved state (loadvm in monitor)\n"
7576 "-vnc display start a VNC server on display\n"
7578 "-daemonize daemonize QEMU after initializing\n"
7580 "-option-rom rom load a file, rom, into the option ROM space\n"
7582 "-prom-env variable=value set OpenBIOS nvram variables\n"
7584 "-clock force the use of the given methods for timer alarm.\n"
7585 " To see what timers are available use -clock ?\n"
7586 "-startdate select initial date of the clock\n"
7587 "-icount [N|auto]\n"
7588 " Enable virtual instruction counter with 2^N clock ticks per instruction\n"
7590 "During emulation, the following keys are useful:\n"
7591 "ctrl-alt-f toggle full screen\n"
7592 "ctrl-alt-n switch to virtual console 'n'\n"
7593 "ctrl-alt toggle mouse and keyboard grab\n"
7595 "When using -nographic, press 'ctrl-a h' to get some help.\n"
7600 DEFAULT_NETWORK_SCRIPT
,
7601 DEFAULT_NETWORK_DOWN_SCRIPT
,
7603 DEFAULT_GDBSTUB_PORT
,
7608 #define HAS_ARG 0x0001
7623 QEMU_OPTION_mtdblock
,
7627 QEMU_OPTION_snapshot
,
7629 QEMU_OPTION_no_fd_bootchk
,
7632 QEMU_OPTION_nographic
,
7633 QEMU_OPTION_portrait
,
7635 QEMU_OPTION_audio_help
,
7636 QEMU_OPTION_soundhw
,
7657 QEMU_OPTION_localtime
,
7658 QEMU_OPTION_cirrusvga
,
7661 QEMU_OPTION_std_vga
,
7663 QEMU_OPTION_monitor
,
7665 QEMU_OPTION_parallel
,
7667 QEMU_OPTION_full_screen
,
7668 QEMU_OPTION_no_frame
,
7669 QEMU_OPTION_alt_grab
,
7670 QEMU_OPTION_no_quit
,
7671 QEMU_OPTION_pidfile
,
7672 QEMU_OPTION_no_kqemu
,
7673 QEMU_OPTION_kernel_kqemu
,
7674 QEMU_OPTION_win2k_hack
,
7676 QEMU_OPTION_usbdevice
,
7679 QEMU_OPTION_no_acpi
,
7681 QEMU_OPTION_no_reboot
,
7682 QEMU_OPTION_no_shutdown
,
7683 QEMU_OPTION_show_cursor
,
7684 QEMU_OPTION_daemonize
,
7685 QEMU_OPTION_option_rom
,
7686 QEMU_OPTION_semihosting
,
7688 QEMU_OPTION_prom_env
,
7689 QEMU_OPTION_old_param
,
7691 QEMU_OPTION_startdate
,
7692 QEMU_OPTION_tb_size
,
7696 typedef struct QEMUOption
{
7702 const QEMUOption qemu_options
[] = {
7703 { "h", 0, QEMU_OPTION_h
},
7704 { "help", 0, QEMU_OPTION_h
},
7706 { "M", HAS_ARG
, QEMU_OPTION_M
},
7707 { "cpu", HAS_ARG
, QEMU_OPTION_cpu
},
7708 { "fda", HAS_ARG
, QEMU_OPTION_fda
},
7709 { "fdb", HAS_ARG
, QEMU_OPTION_fdb
},
7710 { "hda", HAS_ARG
, QEMU_OPTION_hda
},
7711 { "hdb", HAS_ARG
, QEMU_OPTION_hdb
},
7712 { "hdc", HAS_ARG
, QEMU_OPTION_hdc
},
7713 { "hdd", HAS_ARG
, QEMU_OPTION_hdd
},
7714 { "drive", HAS_ARG
, QEMU_OPTION_drive
},
7715 { "cdrom", HAS_ARG
, QEMU_OPTION_cdrom
},
7716 { "mtdblock", HAS_ARG
, QEMU_OPTION_mtdblock
},
7717 { "sd", HAS_ARG
, QEMU_OPTION_sd
},
7718 { "pflash", HAS_ARG
, QEMU_OPTION_pflash
},
7719 { "boot", HAS_ARG
, QEMU_OPTION_boot
},
7720 { "snapshot", 0, QEMU_OPTION_snapshot
},
7722 { "no-fd-bootchk", 0, QEMU_OPTION_no_fd_bootchk
},
7724 { "m", HAS_ARG
, QEMU_OPTION_m
},
7725 { "nographic", 0, QEMU_OPTION_nographic
},
7726 { "portrait", 0, QEMU_OPTION_portrait
},
7727 { "k", HAS_ARG
, QEMU_OPTION_k
},
7729 { "audio-help", 0, QEMU_OPTION_audio_help
},
7730 { "soundhw", HAS_ARG
, QEMU_OPTION_soundhw
},
7733 { "net", HAS_ARG
, QEMU_OPTION_net
},
7735 { "tftp", HAS_ARG
, QEMU_OPTION_tftp
},
7736 { "bootp", HAS_ARG
, QEMU_OPTION_bootp
},
7738 { "smb", HAS_ARG
, QEMU_OPTION_smb
},
7740 { "redir", HAS_ARG
, QEMU_OPTION_redir
},
7743 { "kernel", HAS_ARG
, QEMU_OPTION_kernel
},
7744 { "append", HAS_ARG
, QEMU_OPTION_append
},
7745 { "initrd", HAS_ARG
, QEMU_OPTION_initrd
},
7747 { "S", 0, QEMU_OPTION_S
},
7748 { "s", 0, QEMU_OPTION_s
},
7749 { "p", HAS_ARG
, QEMU_OPTION_p
},
7750 { "d", HAS_ARG
, QEMU_OPTION_d
},
7751 { "hdachs", HAS_ARG
, QEMU_OPTION_hdachs
},
7752 { "L", HAS_ARG
, QEMU_OPTION_L
},
7753 { "bios", HAS_ARG
, QEMU_OPTION_bios
},
7755 { "no-kqemu", 0, QEMU_OPTION_no_kqemu
},
7756 { "kernel-kqemu", 0, QEMU_OPTION_kernel_kqemu
},
7758 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
7759 { "g", 1, QEMU_OPTION_g
},
7761 { "localtime", 0, QEMU_OPTION_localtime
},
7762 { "std-vga", 0, QEMU_OPTION_std_vga
},
7763 { "echr", HAS_ARG
, QEMU_OPTION_echr
},
7764 { "monitor", HAS_ARG
, QEMU_OPTION_monitor
},
7765 { "serial", HAS_ARG
, QEMU_OPTION_serial
},
7766 { "parallel", HAS_ARG
, QEMU_OPTION_parallel
},
7767 { "loadvm", HAS_ARG
, QEMU_OPTION_loadvm
},
7768 { "full-screen", 0, QEMU_OPTION_full_screen
},
7770 { "no-frame", 0, QEMU_OPTION_no_frame
},
7771 { "alt-grab", 0, QEMU_OPTION_alt_grab
},
7772 { "no-quit", 0, QEMU_OPTION_no_quit
},
7774 { "pidfile", HAS_ARG
, QEMU_OPTION_pidfile
},
7775 { "win2k-hack", 0, QEMU_OPTION_win2k_hack
},
7776 { "usbdevice", HAS_ARG
, QEMU_OPTION_usbdevice
},
7777 { "smp", HAS_ARG
, QEMU_OPTION_smp
},
7778 { "vnc", HAS_ARG
, QEMU_OPTION_vnc
},
7779 #ifdef CONFIG_CURSES
7780 { "curses", 0, QEMU_OPTION_curses
},
7783 /* temporary options */
7784 { "usb", 0, QEMU_OPTION_usb
},
7785 { "cirrusvga", 0, QEMU_OPTION_cirrusvga
},
7786 { "vmwarevga", 0, QEMU_OPTION_vmsvga
},
7787 { "no-acpi", 0, QEMU_OPTION_no_acpi
},
7788 { "no-reboot", 0, QEMU_OPTION_no_reboot
},
7789 { "no-shutdown", 0, QEMU_OPTION_no_shutdown
},
7790 { "show-cursor", 0, QEMU_OPTION_show_cursor
},
7791 { "daemonize", 0, QEMU_OPTION_daemonize
},
7792 { "option-rom", HAS_ARG
, QEMU_OPTION_option_rom
},
7793 #if defined(TARGET_ARM) || defined(TARGET_M68K)
7794 { "semihosting", 0, QEMU_OPTION_semihosting
},
7796 { "name", HAS_ARG
, QEMU_OPTION_name
},
7797 #if defined(TARGET_SPARC)
7798 { "prom-env", HAS_ARG
, QEMU_OPTION_prom_env
},
7800 #if defined(TARGET_ARM)
7801 { "old-param", 0, QEMU_OPTION_old_param
},
7803 { "clock", HAS_ARG
, QEMU_OPTION_clock
},
7804 { "startdate", HAS_ARG
, QEMU_OPTION_startdate
},
7805 { "tb-size", HAS_ARG
, QEMU_OPTION_tb_size
},
7806 { "icount", HAS_ARG
, QEMU_OPTION_icount
},
7810 /* password input */
7812 int qemu_key_check(BlockDriverState
*bs
, const char *name
)
7817 if (!bdrv_is_encrypted(bs
))
7820 term_printf("%s is encrypted.\n", name
);
7821 for(i
= 0; i
< 3; i
++) {
7822 monitor_readline("Password: ", 1, password
, sizeof(password
));
7823 if (bdrv_set_key(bs
, password
) == 0)
7825 term_printf("invalid password\n");
7830 static BlockDriverState
*get_bdrv(int index
)
7832 if (index
> nb_drives
)
7834 return drives_table
[index
].bdrv
;
7837 static void read_passwords(void)
7839 BlockDriverState
*bs
;
7842 for(i
= 0; i
< 6; i
++) {
7845 qemu_key_check(bs
, bdrv_get_device_name(bs
));
7850 struct soundhw soundhw
[] = {
7851 #ifdef HAS_AUDIO_CHOICE
7852 #if defined(TARGET_I386) || defined(TARGET_MIPS)
7858 { .init_isa
= pcspk_audio_init
}
7863 "Creative Sound Blaster 16",
7866 { .init_isa
= SB16_init
}
7869 #ifdef CONFIG_CS4231A
7875 { .init_isa
= cs4231a_init
}
7883 "Yamaha YMF262 (OPL3)",
7885 "Yamaha YM3812 (OPL2)",
7889 { .init_isa
= Adlib_init
}
7896 "Gravis Ultrasound GF1",
7899 { .init_isa
= GUS_init
}
7906 "Intel 82801AA AC97 Audio",
7909 { .init_pci
= ac97_init
}
7915 "ENSONIQ AudioPCI ES1370",
7918 { .init_pci
= es1370_init
}
7922 { NULL
, NULL
, 0, 0, { NULL
} }
7925 static void select_soundhw (const char *optarg
)
7929 if (*optarg
== '?') {
7932 printf ("Valid sound card names (comma separated):\n");
7933 for (c
= soundhw
; c
->name
; ++c
) {
7934 printf ("%-11s %s\n", c
->name
, c
->descr
);
7936 printf ("\n-soundhw all will enable all of the above\n");
7937 exit (*optarg
!= '?');
7945 if (!strcmp (optarg
, "all")) {
7946 for (c
= soundhw
; c
->name
; ++c
) {
7954 e
= strchr (p
, ',');
7955 l
= !e
? strlen (p
) : (size_t) (e
- p
);
7957 for (c
= soundhw
; c
->name
; ++c
) {
7958 if (!strncmp (c
->name
, p
, l
)) {
7967 "Unknown sound card name (too big to show)\n");
7970 fprintf (stderr
, "Unknown sound card name `%.*s'\n",
7975 p
+= l
+ (e
!= NULL
);
7979 goto show_valid_cards
;
7985 static BOOL WINAPI
qemu_ctrl_handler(DWORD type
)
7987 exit(STATUS_CONTROL_C_EXIT
);
7992 #define MAX_NET_CLIENTS 32
7994 int main(int argc
, char **argv
)
7996 #ifdef CONFIG_GDBSTUB
7998 const char *gdbstub_port
;
8000 uint32_t boot_devices_bitmap
= 0;
8002 int snapshot
, linux_boot
, net_boot
;
8003 const char *initrd_filename
;
8004 const char *kernel_filename
, *kernel_cmdline
;
8005 const char *boot_devices
= "";
8006 DisplayState
*ds
= &display_state
;
8007 int cyls
, heads
, secs
, translation
;
8008 const char *net_clients
[MAX_NET_CLIENTS
];
8012 const char *r
, *optarg
;
8013 CharDriverState
*monitor_hd
;
8014 const char *monitor_device
;
8015 const char *serial_devices
[MAX_SERIAL_PORTS
];
8016 int serial_device_index
;
8017 const char *parallel_devices
[MAX_PARALLEL_PORTS
];
8018 int parallel_device_index
;
8019 const char *loadvm
= NULL
;
8020 QEMUMachine
*machine
;
8021 const char *cpu_model
;
8022 const char *usb_devices
[MAX_USB_CMDLINE
];
8023 int usb_devices_index
;
8026 const char *pid_file
= NULL
;
8029 LIST_INIT (&vm_change_state_head
);
8032 struct sigaction act
;
8033 sigfillset(&act
.sa_mask
);
8035 act
.sa_handler
= SIG_IGN
;
8036 sigaction(SIGPIPE
, &act
, NULL
);
8039 SetConsoleCtrlHandler(qemu_ctrl_handler
, TRUE
);
8040 /* Note: cpu_interrupt() is currently not SMP safe, so we force
8041 QEMU to run on a single CPU */
8046 h
= GetCurrentProcess();
8047 if (GetProcessAffinityMask(h
, &mask
, &smask
)) {
8048 for(i
= 0; i
< 32; i
++) {
8049 if (mask
& (1 << i
))
8054 SetProcessAffinityMask(h
, mask
);
8060 register_machines();
8061 machine
= first_machine
;
8063 initrd_filename
= NULL
;
8065 vga_ram_size
= VGA_RAM_SIZE
;
8066 #ifdef CONFIG_GDBSTUB
8068 gdbstub_port
= DEFAULT_GDBSTUB_PORT
;
8073 kernel_filename
= NULL
;
8074 kernel_cmdline
= "";
8075 cyls
= heads
= secs
= 0;
8076 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8077 monitor_device
= "vc";
8079 serial_devices
[0] = "vc:80Cx24C";
8080 for(i
= 1; i
< MAX_SERIAL_PORTS
; i
++)
8081 serial_devices
[i
] = NULL
;
8082 serial_device_index
= 0;
8084 parallel_devices
[0] = "vc:640x480";
8085 for(i
= 1; i
< MAX_PARALLEL_PORTS
; i
++)
8086 parallel_devices
[i
] = NULL
;
8087 parallel_device_index
= 0;
8089 usb_devices_index
= 0;
8106 hda_index
= drive_add(argv
[optind
++], HD_ALIAS
, 0);
8108 const QEMUOption
*popt
;
8111 /* Treat --foo the same as -foo. */
8114 popt
= qemu_options
;
8117 fprintf(stderr
, "%s: invalid option -- '%s'\n",
8121 if (!strcmp(popt
->name
, r
+ 1))
8125 if (popt
->flags
& HAS_ARG
) {
8126 if (optind
>= argc
) {
8127 fprintf(stderr
, "%s: option '%s' requires an argument\n",
8131 optarg
= argv
[optind
++];
8136 switch(popt
->index
) {
8138 machine
= find_machine(optarg
);
8141 printf("Supported machines are:\n");
8142 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
8143 printf("%-10s %s%s\n",
8145 m
== first_machine
? " (default)" : "");
8147 exit(*optarg
!= '?');
8150 case QEMU_OPTION_cpu
:
8151 /* hw initialization will check this */
8152 if (*optarg
== '?') {
8153 /* XXX: implement xxx_cpu_list for targets that still miss it */
8154 #if defined(cpu_list)
8155 cpu_list(stdout
, &fprintf
);
8162 case QEMU_OPTION_initrd
:
8163 initrd_filename
= optarg
;
8165 case QEMU_OPTION_hda
:
8167 hda_index
= drive_add(optarg
, HD_ALIAS
, 0);
8169 hda_index
= drive_add(optarg
, HD_ALIAS
8170 ",cyls=%d,heads=%d,secs=%d%s",
8171 0, cyls
, heads
, secs
,
8172 translation
== BIOS_ATA_TRANSLATION_LBA
?
8174 translation
== BIOS_ATA_TRANSLATION_NONE
?
8175 ",trans=none" : "");
8177 case QEMU_OPTION_hdb
:
8178 case QEMU_OPTION_hdc
:
8179 case QEMU_OPTION_hdd
:
8180 drive_add(optarg
, HD_ALIAS
, popt
->index
- QEMU_OPTION_hda
);
8182 case QEMU_OPTION_drive
:
8183 drive_add(NULL
, "%s", optarg
);
8185 case QEMU_OPTION_mtdblock
:
8186 drive_add(optarg
, MTD_ALIAS
);
8188 case QEMU_OPTION_sd
:
8189 drive_add(optarg
, SD_ALIAS
);
8191 case QEMU_OPTION_pflash
:
8192 drive_add(optarg
, PFLASH_ALIAS
);
8194 case QEMU_OPTION_snapshot
:
8197 case QEMU_OPTION_hdachs
:
8201 cyls
= strtol(p
, (char **)&p
, 0);
8202 if (cyls
< 1 || cyls
> 16383)
8207 heads
= strtol(p
, (char **)&p
, 0);
8208 if (heads
< 1 || heads
> 16)
8213 secs
= strtol(p
, (char **)&p
, 0);
8214 if (secs
< 1 || secs
> 63)
8218 if (!strcmp(p
, "none"))
8219 translation
= BIOS_ATA_TRANSLATION_NONE
;
8220 else if (!strcmp(p
, "lba"))
8221 translation
= BIOS_ATA_TRANSLATION_LBA
;
8222 else if (!strcmp(p
, "auto"))
8223 translation
= BIOS_ATA_TRANSLATION_AUTO
;
8226 } else if (*p
!= '\0') {
8228 fprintf(stderr
, "qemu: invalid physical CHS format\n");
8231 if (hda_index
!= -1)
8232 snprintf(drives_opt
[hda_index
].opt
,
8233 sizeof(drives_opt
[hda_index
].opt
),
8234 HD_ALIAS
",cyls=%d,heads=%d,secs=%d%s",
8235 0, cyls
, heads
, secs
,
8236 translation
== BIOS_ATA_TRANSLATION_LBA
?
8238 translation
== BIOS_ATA_TRANSLATION_NONE
?
8239 ",trans=none" : "");
8242 case QEMU_OPTION_nographic
:
8243 serial_devices
[0] = "stdio";
8244 parallel_devices
[0] = "null";
8245 monitor_device
= "stdio";
8248 #ifdef CONFIG_CURSES
8249 case QEMU_OPTION_curses
:
8253 case QEMU_OPTION_portrait
:
8256 case QEMU_OPTION_kernel
:
8257 kernel_filename
= optarg
;
8259 case QEMU_OPTION_append
:
8260 kernel_cmdline
= optarg
;
8262 case QEMU_OPTION_cdrom
:
8263 drive_add(optarg
, CDROM_ALIAS
);
8265 case QEMU_OPTION_boot
:
8266 boot_devices
= optarg
;
8267 /* We just do some generic consistency checks */
8269 /* Could easily be extended to 64 devices if needed */
8272 boot_devices_bitmap
= 0;
8273 for (p
= boot_devices
; *p
!= '\0'; p
++) {
8274 /* Allowed boot devices are:
8275 * a b : floppy disk drives
8276 * c ... f : IDE disk drives
8277 * g ... m : machine implementation dependant drives
8278 * n ... p : network devices
8279 * It's up to each machine implementation to check
8280 * if the given boot devices match the actual hardware
8281 * implementation and firmware features.
8283 if (*p
< 'a' || *p
> 'q') {
8284 fprintf(stderr
, "Invalid boot device '%c'\n", *p
);
8287 if (boot_devices_bitmap
& (1 << (*p
- 'a'))) {
8289 "Boot device '%c' was given twice\n",*p
);
8292 boot_devices_bitmap
|= 1 << (*p
- 'a');
8296 case QEMU_OPTION_fda
:
8297 case QEMU_OPTION_fdb
:
8298 drive_add(optarg
, FD_ALIAS
, popt
->index
- QEMU_OPTION_fda
);
8301 case QEMU_OPTION_no_fd_bootchk
:
8305 case QEMU_OPTION_net
:
8306 if (nb_net_clients
>= MAX_NET_CLIENTS
) {
8307 fprintf(stderr
, "qemu: too many network clients\n");
8310 net_clients
[nb_net_clients
] = optarg
;
8314 case QEMU_OPTION_tftp
:
8315 tftp_prefix
= optarg
;
8317 case QEMU_OPTION_bootp
:
8318 bootp_filename
= optarg
;
8321 case QEMU_OPTION_smb
:
8322 net_slirp_smb(optarg
);
8325 case QEMU_OPTION_redir
:
8326 net_slirp_redir(optarg
);
8330 case QEMU_OPTION_audio_help
:
8334 case QEMU_OPTION_soundhw
:
8335 select_soundhw (optarg
);
8341 case QEMU_OPTION_m
: {
8345 value
= strtoul(optarg
, &ptr
, 10);
8347 case 0: case 'M': case 'm':
8354 fprintf(stderr
, "qemu: invalid ram size: %s\n", optarg
);
8358 /* On 32-bit hosts, QEMU is limited by virtual address space */
8359 if (value
> (2047 << 20)
8361 && HOST_LONG_BITS
== 32
8364 fprintf(stderr
, "qemu: at most 2047 MB RAM can be simulated\n");
8367 if (value
!= (uint64_t)(ram_addr_t
)value
) {
8368 fprintf(stderr
, "qemu: ram size too large\n");
8379 mask
= cpu_str_to_log_mask(optarg
);
8381 printf("Log items (comma separated):\n");
8382 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
8383 printf("%-10s %s\n", item
->name
, item
->help
);
8390 #ifdef CONFIG_GDBSTUB
8395 gdbstub_port
= optarg
;
8401 case QEMU_OPTION_bios
:
8408 keyboard_layout
= optarg
;
8410 case QEMU_OPTION_localtime
:
8413 case QEMU_OPTION_cirrusvga
:
8414 cirrus_vga_enabled
= 1;
8417 case QEMU_OPTION_vmsvga
:
8418 cirrus_vga_enabled
= 0;
8421 case QEMU_OPTION_std_vga
:
8422 cirrus_vga_enabled
= 0;
8430 w
= strtol(p
, (char **)&p
, 10);
8433 fprintf(stderr
, "qemu: invalid resolution or depth\n");
8439 h
= strtol(p
, (char **)&p
, 10);
8444 depth
= strtol(p
, (char **)&p
, 10);
8445 if (depth
!= 8 && depth
!= 15 && depth
!= 16 &&
8446 depth
!= 24 && depth
!= 32)
8448 } else if (*p
== '\0') {
8449 depth
= graphic_depth
;
8456 graphic_depth
= depth
;
8459 case QEMU_OPTION_echr
:
8462 term_escape_char
= strtol(optarg
, &r
, 0);
8464 printf("Bad argument to echr\n");
8467 case QEMU_OPTION_monitor
:
8468 monitor_device
= optarg
;
8470 case QEMU_OPTION_serial
:
8471 if (serial_device_index
>= MAX_SERIAL_PORTS
) {
8472 fprintf(stderr
, "qemu: too many serial ports\n");
8475 serial_devices
[serial_device_index
] = optarg
;
8476 serial_device_index
++;
8478 case QEMU_OPTION_parallel
:
8479 if (parallel_device_index
>= MAX_PARALLEL_PORTS
) {
8480 fprintf(stderr
, "qemu: too many parallel ports\n");
8483 parallel_devices
[parallel_device_index
] = optarg
;
8484 parallel_device_index
++;
8486 case QEMU_OPTION_loadvm
:
8489 case QEMU_OPTION_full_screen
:
8493 case QEMU_OPTION_no_frame
:
8496 case QEMU_OPTION_alt_grab
:
8499 case QEMU_OPTION_no_quit
:
8503 case QEMU_OPTION_pidfile
:
8507 case QEMU_OPTION_win2k_hack
:
8508 win2k_install_hack
= 1;
8512 case QEMU_OPTION_no_kqemu
:
8515 case QEMU_OPTION_kernel_kqemu
:
8519 case QEMU_OPTION_usb
:
8522 case QEMU_OPTION_usbdevice
:
8524 if (usb_devices_index
>= MAX_USB_CMDLINE
) {
8525 fprintf(stderr
, "Too many USB devices\n");
8528 usb_devices
[usb_devices_index
] = optarg
;
8529 usb_devices_index
++;
8531 case QEMU_OPTION_smp
:
8532 smp_cpus
= atoi(optarg
);
8533 if (smp_cpus
< 1 || smp_cpus
> MAX_CPUS
) {
8534 fprintf(stderr
, "Invalid number of CPUs\n");
8538 case QEMU_OPTION_vnc
:
8539 vnc_display
= optarg
;
8541 case QEMU_OPTION_no_acpi
:
8544 case QEMU_OPTION_no_reboot
:
8547 case QEMU_OPTION_no_shutdown
:
8550 case QEMU_OPTION_show_cursor
:
8553 case QEMU_OPTION_daemonize
:
8556 case QEMU_OPTION_option_rom
:
8557 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
8558 fprintf(stderr
, "Too many option ROMs\n");
8561 option_rom
[nb_option_roms
] = optarg
;
8564 case QEMU_OPTION_semihosting
:
8565 semihosting_enabled
= 1;
8567 case QEMU_OPTION_name
:
8571 case QEMU_OPTION_prom_env
:
8572 if (nb_prom_envs
>= MAX_PROM_ENVS
) {
8573 fprintf(stderr
, "Too many prom variables\n");
8576 prom_envs
[nb_prom_envs
] = optarg
;
8581 case QEMU_OPTION_old_param
:
8585 case QEMU_OPTION_clock
:
8586 configure_alarms(optarg
);
8588 case QEMU_OPTION_startdate
:
8591 time_t rtc_start_date
;
8592 if (!strcmp(optarg
, "now")) {
8593 rtc_date_offset
= -1;
8595 if (sscanf(optarg
, "%d-%d-%dT%d:%d:%d",
8603 } else if (sscanf(optarg
, "%d-%d-%d",
8606 &tm
.tm_mday
) == 3) {
8615 rtc_start_date
= mktimegm(&tm
);
8616 if (rtc_start_date
== -1) {
8618 fprintf(stderr
, "Invalid date format. Valid format are:\n"
8619 "'now' or '2006-06-17T16:01:21' or '2006-06-17'\n");
8622 rtc_date_offset
= time(NULL
) - rtc_start_date
;
8626 case QEMU_OPTION_tb_size
:
8627 tb_size
= strtol(optarg
, NULL
, 0);
8631 case QEMU_OPTION_icount
:
8633 if (strcmp(optarg
, "auto") == 0) {
8634 icount_time_shift
= -1;
8636 icount_time_shift
= strtol(optarg
, NULL
, 0);
8647 if (pipe(fds
) == -1)
8658 len
= read(fds
[0], &status
, 1);
8659 if (len
== -1 && (errno
== EINTR
))
8664 else if (status
== 1) {
8665 fprintf(stderr
, "Could not acquire pidfile\n");
8682 signal(SIGTSTP
, SIG_IGN
);
8683 signal(SIGTTOU
, SIG_IGN
);
8684 signal(SIGTTIN
, SIG_IGN
);
8688 if (pid_file
&& qemu_create_pidfile(pid_file
) != 0) {
8691 write(fds
[1], &status
, 1);
8693 fprintf(stderr
, "Could not acquire pid file\n");
8701 linux_boot
= (kernel_filename
!= NULL
);
8702 net_boot
= (boot_devices_bitmap
>> ('n' - 'a')) & 0xF;
8704 /* XXX: this should not be: some embedded targets just have flash */
8705 if (!linux_boot
&& net_boot
== 0 &&
8709 if (!linux_boot
&& *kernel_cmdline
!= '\0') {
8710 fprintf(stderr
, "-append only allowed with -kernel option\n");
8714 if (!linux_boot
&& initrd_filename
!= NULL
) {
8715 fprintf(stderr
, "-initrd only allowed with -kernel option\n");
8719 /* boot to floppy or the default cd if no hard disk defined yet */
8720 if (!boot_devices
[0]) {
8721 boot_devices
= "cad";
8723 setvbuf(stdout
, NULL
, _IOLBF
, 0);
8728 if (use_icount
&& icount_time_shift
< 0) {
8730 /* 125MIPS seems a reasonable initial guess at the guest speed.
8731 It will be corrected fairly quickly anyway. */
8732 icount_time_shift
= 3;
8733 init_icount_adjust();
8740 /* init network clients */
8741 if (nb_net_clients
== 0) {
8742 /* if no clients, we use a default config */
8743 net_clients
[0] = "nic";
8744 net_clients
[1] = "user";
8748 for(i
= 0;i
< nb_net_clients
; i
++) {
8749 if (net_client_init(net_clients
[i
]) < 0)
8752 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
8753 if (vlan
->nb_guest_devs
== 0 && vlan
->nb_host_devs
== 0)
8755 if (vlan
->nb_guest_devs
== 0) {
8756 fprintf(stderr
, "Invalid vlan (%d) with no nics\n", vlan
->id
);
8759 if (vlan
->nb_host_devs
== 0)
8761 "Warning: vlan %d is not connected to host network\n",
8766 /* XXX: this should be moved in the PC machine instantiation code */
8767 if (net_boot
!= 0) {
8769 for (i
= 0; i
< nb_nics
&& i
< 4; i
++) {
8770 const char *model
= nd_table
[i
].model
;
8772 if (net_boot
& (1 << i
)) {
8775 snprintf(buf
, sizeof(buf
), "%s/pxe-%s.bin", bios_dir
, model
);
8776 if (get_image_size(buf
) > 0) {
8777 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
8778 fprintf(stderr
, "Too many option ROMs\n");
8781 option_rom
[nb_option_roms
] = strdup(buf
);
8788 fprintf(stderr
, "No valid PXE rom found for network device\n");
8794 /* init the memory */
8795 phys_ram_size
= machine
->ram_require
& ~RAMSIZE_FIXED
;
8797 if (machine
->ram_require
& RAMSIZE_FIXED
) {
8799 if (ram_size
< phys_ram_size
) {
8800 fprintf(stderr
, "Machine `%s' requires %llu bytes of memory\n",
8801 machine
->name
, (unsigned long long) phys_ram_size
);
8805 phys_ram_size
= ram_size
;
8807 ram_size
= phys_ram_size
;
8810 ram_size
= DEFAULT_RAM_SIZE
* 1024 * 1024;
8812 phys_ram_size
+= ram_size
;
8815 phys_ram_base
= qemu_vmalloc(phys_ram_size
);
8816 if (!phys_ram_base
) {
8817 fprintf(stderr
, "Could not allocate physical memory\n");
8821 /* init the dynamic translator */
8822 cpu_exec_init_all(tb_size
* 1024 * 1024);
8826 /* we always create the cdrom drive, even if no disk is there */
8828 if (nb_drives_opt
< MAX_DRIVES
)
8829 drive_add(NULL
, CDROM_ALIAS
);
8831 /* we always create at least one floppy */
8833 if (nb_drives_opt
< MAX_DRIVES
)
8834 drive_add(NULL
, FD_ALIAS
, 0);
8836 /* we always create one sd slot, even if no card is in it */
8838 if (nb_drives_opt
< MAX_DRIVES
)
8839 drive_add(NULL
, SD_ALIAS
);
8841 /* open the virtual block devices */
8843 for(i
= 0; i
< nb_drives_opt
; i
++)
8844 if (drive_init(&drives_opt
[i
], snapshot
, machine
) == -1)
8847 register_savevm("timer", 0, 2, timer_save
, timer_load
, NULL
);
8848 register_savevm("ram", 0, 2, ram_save
, ram_load
, NULL
);
8851 memset(&display_state
, 0, sizeof(display_state
));
8854 fprintf(stderr
, "fatal: -nographic can't be used with -curses\n");
8857 /* nearly nothing to do */
8858 dumb_display_init(ds
);
8859 } else if (vnc_display
!= NULL
) {
8860 vnc_display_init(ds
);
8861 if (vnc_display_open(ds
, vnc_display
) < 0)
8864 #if defined(CONFIG_CURSES)
8866 curses_display_init(ds
, full_screen
);
8870 #if defined(CONFIG_SDL)
8871 sdl_display_init(ds
, full_screen
, no_frame
);
8872 #elif defined(CONFIG_COCOA)
8873 cocoa_display_init(ds
, full_screen
);
8875 dumb_display_init(ds
);
8879 /* Maintain compatibility with multiple stdio monitors */
8880 if (!strcmp(monitor_device
,"stdio")) {
8881 for (i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
8882 const char *devname
= serial_devices
[i
];
8883 if (devname
&& !strcmp(devname
,"mon:stdio")) {
8884 monitor_device
= NULL
;
8886 } else if (devname
&& !strcmp(devname
,"stdio")) {
8887 monitor_device
= NULL
;
8888 serial_devices
[i
] = "mon:stdio";
8893 if (monitor_device
) {
8894 monitor_hd
= qemu_chr_open(monitor_device
);
8896 fprintf(stderr
, "qemu: could not open monitor device '%s'\n", monitor_device
);
8899 monitor_init(monitor_hd
, !nographic
);
8902 for(i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
8903 const char *devname
= serial_devices
[i
];
8904 if (devname
&& strcmp(devname
, "none")) {
8905 serial_hds
[i
] = qemu_chr_open(devname
);
8906 if (!serial_hds
[i
]) {
8907 fprintf(stderr
, "qemu: could not open serial device '%s'\n",
8911 if (strstart(devname
, "vc", 0))
8912 qemu_chr_printf(serial_hds
[i
], "serial%d console\r\n", i
);
8916 for(i
= 0; i
< MAX_PARALLEL_PORTS
; i
++) {
8917 const char *devname
= parallel_devices
[i
];
8918 if (devname
&& strcmp(devname
, "none")) {
8919 parallel_hds
[i
] = qemu_chr_open(devname
);
8920 if (!parallel_hds
[i
]) {
8921 fprintf(stderr
, "qemu: could not open parallel device '%s'\n",
8925 if (strstart(devname
, "vc", 0))
8926 qemu_chr_printf(parallel_hds
[i
], "parallel%d console\r\n", i
);
8930 machine
->init(ram_size
, vga_ram_size
, boot_devices
, ds
,
8931 kernel_filename
, kernel_cmdline
, initrd_filename
, cpu_model
);
8933 /* init USB devices */
8935 for(i
= 0; i
< usb_devices_index
; i
++) {
8936 if (usb_device_add(usb_devices
[i
]) < 0) {
8937 fprintf(stderr
, "Warning: could not add USB device %s\n",
8943 if (display_state
.dpy_refresh
) {
8944 display_state
.gui_timer
= qemu_new_timer(rt_clock
, gui_update
, &display_state
);
8945 qemu_mod_timer(display_state
.gui_timer
, qemu_get_clock(rt_clock
));
8948 #ifdef CONFIG_GDBSTUB
8950 /* XXX: use standard host:port notation and modify options
8952 if (gdbserver_start(gdbstub_port
) < 0) {
8953 fprintf(stderr
, "qemu: could not open gdbstub device on port '%s'\n",
8964 /* XXX: simplify init */
8977 len
= write(fds
[1], &status
, 1);
8978 if (len
== -1 && (errno
== EINTR
))
8985 TFR(fd
= open("/dev/null", O_RDWR
));
8999 #if !defined(_WIN32)
9000 /* close network clients */
9001 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9002 VLANClientState
*vc
;
9004 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
9005 if (vc
->fd_read
== tap_receive
) {
9007 TAPState
*s
= vc
->opaque
;
9009 if (sscanf(vc
->info_str
, "tap: ifname=%63s ", ifname
) == 1 &&
9011 launch_script(s
->down_script
, ifname
, s
->fd
);
9013 #if defined(CONFIG_VDE)
9014 if (vc
->fd_read
== vde_from_qemu
) {
9015 VDEState
*s
= vc
->opaque
;