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"
40 #include "migration.h"
52 #include <sys/times.h>
57 #include <sys/ioctl.h>
58 #include <sys/socket.h>
59 #include <netinet/in.h>
62 #include <sys/select.h>
63 #include <arpa/inet.h>
66 #if !defined(__APPLE__) && !defined(__OpenBSD__)
72 #elif defined (__GLIBC__) && defined (__FreeBSD_kernel__)
73 #include <freebsd/stdlib.h>
77 #include <linux/if_tun.h>
80 #include <linux/rtc.h>
82 /* For the benefit of older linux systems which don't supply it,
83 we use a local copy of hpet.h. */
84 /* #include <linux/hpet.h> */
87 #include <linux/ppdev.h>
88 #include <linux/parport.h>
91 #include <sys/ethernet.h>
92 #include <sys/sockio.h>
93 #include <netinet/arp.h>
94 #include <netinet/in.h>
95 #include <netinet/in_systm.h>
96 #include <netinet/ip.h>
97 #include <netinet/ip_icmp.h> // must come after ip.h
98 #include <netinet/udp.h>
99 #include <netinet/tcp.h>
106 #include <winsock2.h>
107 int inet_aton(const char *cp
, struct in_addr
*ia
);
110 #if defined(CONFIG_SLIRP)
111 #include "libslirp.h"
114 #if defined(CONFIG_VDE)
115 #include <libvdeplug.h>
120 #include <sys/timeb.h>
121 #include <mmsystem.h>
122 #define getopt_long_only getopt_long
123 #define memalign(align, size) malloc(size)
126 #include "qemu_socket.h"
132 #endif /* CONFIG_SDL */
136 #define main qemu_main
137 #endif /* CONFIG_COCOA */
141 #include "exec-all.h"
143 #include "qemu-kvm.h"
145 #define DEFAULT_NETWORK_SCRIPT "/etc/qemu-ifup"
146 #define DEFAULT_NETWORK_DOWN_SCRIPT "/etc/qemu-ifdown"
148 #define SMBD_COMMAND "/usr/sfw/sbin/smbd"
150 #define SMBD_COMMAND "/usr/sbin/smbd"
153 //#define DEBUG_UNUSED_IOPORT
154 //#define DEBUG_IOPORT
157 #define DEFAULT_RAM_SIZE 144
159 #define DEFAULT_RAM_SIZE 128
162 #define GUI_REFRESH_INTERVAL 30
164 /* Max number of USB devices that can be specified on the commandline. */
165 #define MAX_USB_CMDLINE 8
167 /* XXX: use a two level table to limit memory usage */
168 #define MAX_IOPORTS 65536
170 const char *bios_dir
= CONFIG_QEMU_SHAREDIR
;
171 const char *bios_name
= NULL
;
172 void *ioport_opaque
[MAX_IOPORTS
];
173 IOPortReadFunc
*ioport_read_table
[3][MAX_IOPORTS
];
174 IOPortWriteFunc
*ioport_write_table
[3][MAX_IOPORTS
];
175 /* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
176 to store the VM snapshots */
177 DriveInfo drives_table
[MAX_DRIVES
+1];
179 int extboot_drive
= -1;
180 /* point to the block driver where the snapshots are managed */
181 BlockDriverState
*bs_snapshots
;
183 static DisplayState display_state
;
186 const char* keyboard_layout
= NULL
;
187 int64_t ticks_per_sec
;
189 int pit_min_timer_count
= 0;
191 NICInfo nd_table
[MAX_NICS
];
193 static int rtc_utc
= 1;
194 static int rtc_date_offset
= -1; /* -1 means no change */
195 int cirrus_vga_enabled
= 1;
196 int vmsvga_enabled
= 0;
198 int graphic_width
= 1024;
199 int graphic_height
= 768;
200 int graphic_depth
= 8;
202 int graphic_width
= 800;
203 int graphic_height
= 600;
204 int graphic_depth
= 15;
209 CharDriverState
*serial_hds
[MAX_SERIAL_PORTS
];
210 CharDriverState
*parallel_hds
[MAX_PARALLEL_PORTS
];
212 int win2k_install_hack
= 0;
215 static VLANState
*first_vlan
;
217 const char *vnc_display
;
218 #if defined(TARGET_SPARC)
220 #elif defined(TARGET_I386)
222 #elif defined(TARGET_IA64)
227 int acpi_enabled
= 1;
232 int graphic_rotate
= 0;
234 const char *incoming
;
235 const char *option_rom
[MAX_OPTION_ROMS
];
237 int semihosting_enabled
= 0;
239 int time_drift_fix
= 0;
240 unsigned int kvm_shadow_memory
= 0;
241 const char *mem_path
= NULL
;
243 const char *cpu_vendor_string
;
247 const char *qemu_name
;
250 unsigned int nb_prom_envs
= 0;
251 const char *prom_envs
[MAX_PROM_ENVS
];
254 struct drive_opt drives_opt
[MAX_DRIVES
];
256 static CPUState
*cur_cpu
;
257 static CPUState
*next_cpu
;
258 static int event_pending
= 1;
259 /* Conversion factor from emulated instructions to virtual clock ticks. */
260 static int icount_time_shift
;
261 /* Arbitrarily pick 1MIPS as the minimum allowable speed. */
262 #define MAX_ICOUNT_SHIFT 10
263 /* Compensate for varying guest execution speed. */
264 static int64_t qemu_icount_bias
;
265 QEMUTimer
*icount_rt_timer
;
266 QEMUTimer
*icount_vm_timer
;
268 #define TFR(expr) do { if ((expr) != -1) break; } while (errno == EINTR)
270 /* KVM runs the main loop in a separate thread. If we update one of the lists
271 * that are polled before or after select(), we need to make sure to break out
272 * of the select() to ensure the new item is serviced.
274 static void main_loop_break(void)
277 qemu_kvm_notify_work();
280 /***********************************************************/
281 /* x86 ISA bus support */
283 target_phys_addr_t isa_mem_base
= 0;
286 static IOPortReadFunc default_ioport_readb
, default_ioport_readw
, default_ioport_readl
;
287 static IOPortWriteFunc default_ioport_writeb
, default_ioport_writew
, default_ioport_writel
;
289 static uint32_t ioport_read(int index
, uint32_t address
)
291 static IOPortReadFunc
*default_func
[3] = {
292 default_ioport_readb
,
293 default_ioport_readw
,
296 IOPortReadFunc
*func
= ioport_read_table
[index
][address
];
298 func
= default_func
[index
];
299 return func(ioport_opaque
[address
], address
);
302 static void ioport_write(int index
, uint32_t address
, uint32_t data
)
304 static IOPortWriteFunc
*default_func
[3] = {
305 default_ioport_writeb
,
306 default_ioport_writew
,
307 default_ioport_writel
309 IOPortWriteFunc
*func
= ioport_write_table
[index
][address
];
311 func
= default_func
[index
];
312 func(ioport_opaque
[address
], address
, data
);
315 static uint32_t default_ioport_readb(void *opaque
, uint32_t address
)
317 #ifdef DEBUG_UNUSED_IOPORT
318 fprintf(stderr
, "unused inb: port=0x%04x\n", address
);
323 static void default_ioport_writeb(void *opaque
, uint32_t address
, uint32_t data
)
325 #ifdef DEBUG_UNUSED_IOPORT
326 fprintf(stderr
, "unused outb: port=0x%04x data=0x%02x\n", address
, data
);
330 /* default is to make two byte accesses */
331 static uint32_t default_ioport_readw(void *opaque
, uint32_t address
)
334 data
= ioport_read(0, address
);
335 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
336 data
|= ioport_read(0, address
) << 8;
340 static void default_ioport_writew(void *opaque
, uint32_t address
, uint32_t data
)
342 ioport_write(0, address
, data
& 0xff);
343 address
= (address
+ 1) & (MAX_IOPORTS
- 1);
344 ioport_write(0, address
, (data
>> 8) & 0xff);
347 static uint32_t default_ioport_readl(void *opaque
, uint32_t address
)
349 #ifdef DEBUG_UNUSED_IOPORT
350 fprintf(stderr
, "unused inl: port=0x%04x\n", address
);
355 static void default_ioport_writel(void *opaque
, uint32_t address
, uint32_t data
)
357 #ifdef DEBUG_UNUSED_IOPORT
358 fprintf(stderr
, "unused outl: port=0x%04x data=0x%02x\n", address
, data
);
362 /* size is the word size in byte */
363 int register_ioport_read(int start
, int length
, int size
,
364 IOPortReadFunc
*func
, void *opaque
)
370 } else if (size
== 2) {
372 } else if (size
== 4) {
375 hw_error("register_ioport_read: invalid size");
378 for(i
= start
; i
< start
+ length
; i
+= size
) {
379 ioport_read_table
[bsize
][i
] = func
;
380 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
381 hw_error("register_ioport_read: invalid opaque");
382 ioport_opaque
[i
] = opaque
;
387 /* size is the word size in byte */
388 int register_ioport_write(int start
, int length
, int size
,
389 IOPortWriteFunc
*func
, void *opaque
)
395 } else if (size
== 2) {
397 } else if (size
== 4) {
400 hw_error("register_ioport_write: invalid size");
403 for(i
= start
; i
< start
+ length
; i
+= size
) {
404 ioport_write_table
[bsize
][i
] = func
;
405 if (ioport_opaque
[i
] != NULL
&& ioport_opaque
[i
] != opaque
)
406 hw_error("register_ioport_write: invalid opaque");
407 ioport_opaque
[i
] = opaque
;
412 void isa_unassign_ioport(int start
, int length
)
416 for(i
= start
; i
< start
+ length
; i
++) {
417 ioport_read_table
[0][i
] = default_ioport_readb
;
418 ioport_read_table
[1][i
] = default_ioport_readw
;
419 ioport_read_table
[2][i
] = default_ioport_readl
;
421 ioport_write_table
[0][i
] = default_ioport_writeb
;
422 ioport_write_table
[1][i
] = default_ioport_writew
;
423 ioport_write_table
[2][i
] = default_ioport_writel
;
425 ioport_opaque
[i
] = NULL
;
429 /***********************************************************/
431 void cpu_outb(CPUState
*env
, int addr
, int val
)
434 if (loglevel
& CPU_LOG_IOPORT
)
435 fprintf(logfile
, "outb: %04x %02x\n", addr
, val
);
437 ioport_write(0, addr
, val
);
440 env
->last_io_time
= cpu_get_time_fast();
444 void cpu_outw(CPUState
*env
, int addr
, int val
)
447 if (loglevel
& CPU_LOG_IOPORT
)
448 fprintf(logfile
, "outw: %04x %04x\n", addr
, val
);
450 ioport_write(1, addr
, val
);
453 env
->last_io_time
= cpu_get_time_fast();
457 void cpu_outl(CPUState
*env
, int addr
, int val
)
460 if (loglevel
& CPU_LOG_IOPORT
)
461 fprintf(logfile
, "outl: %04x %08x\n", addr
, val
);
463 ioport_write(2, addr
, val
);
466 env
->last_io_time
= cpu_get_time_fast();
470 int cpu_inb(CPUState
*env
, int addr
)
473 val
= ioport_read(0, addr
);
475 if (loglevel
& CPU_LOG_IOPORT
)
476 fprintf(logfile
, "inb : %04x %02x\n", addr
, val
);
480 env
->last_io_time
= cpu_get_time_fast();
485 int cpu_inw(CPUState
*env
, int addr
)
488 val
= ioport_read(1, addr
);
490 if (loglevel
& CPU_LOG_IOPORT
)
491 fprintf(logfile
, "inw : %04x %04x\n", addr
, val
);
495 env
->last_io_time
= cpu_get_time_fast();
500 int cpu_inl(CPUState
*env
, int addr
)
503 val
= ioport_read(2, addr
);
505 if (loglevel
& CPU_LOG_IOPORT
)
506 fprintf(logfile
, "inl : %04x %08x\n", addr
, val
);
510 env
->last_io_time
= cpu_get_time_fast();
515 /***********************************************************/
516 void hw_error(const char *fmt
, ...)
522 fprintf(stderr
, "qemu: hardware error: ");
523 vfprintf(stderr
, fmt
, ap
);
524 fprintf(stderr
, "\n");
525 for(env
= first_cpu
; env
!= NULL
; env
= env
->next_cpu
) {
526 fprintf(stderr
, "CPU #%d:\n", env
->cpu_index
);
528 cpu_dump_state(env
, stderr
, fprintf
, X86_DUMP_FPU
);
530 cpu_dump_state(env
, stderr
, fprintf
, 0);
537 /***********************************************************/
540 static QEMUPutKBDEvent
*qemu_put_kbd_event
;
541 static void *qemu_put_kbd_event_opaque
;
542 static QEMUPutMouseEntry
*qemu_put_mouse_event_head
;
543 static QEMUPutMouseEntry
*qemu_put_mouse_event_current
;
545 void qemu_add_kbd_event_handler(QEMUPutKBDEvent
*func
, void *opaque
)
547 qemu_put_kbd_event_opaque
= opaque
;
548 qemu_put_kbd_event
= func
;
551 QEMUPutMouseEntry
*qemu_add_mouse_event_handler(QEMUPutMouseEvent
*func
,
552 void *opaque
, int absolute
,
555 QEMUPutMouseEntry
*s
, *cursor
;
557 s
= qemu_mallocz(sizeof(QEMUPutMouseEntry
));
561 s
->qemu_put_mouse_event
= func
;
562 s
->qemu_put_mouse_event_opaque
= opaque
;
563 s
->qemu_put_mouse_event_absolute
= absolute
;
564 s
->qemu_put_mouse_event_name
= qemu_strdup(name
);
567 if (!qemu_put_mouse_event_head
) {
568 qemu_put_mouse_event_head
= qemu_put_mouse_event_current
= s
;
572 cursor
= qemu_put_mouse_event_head
;
573 while (cursor
->next
!= NULL
)
574 cursor
= cursor
->next
;
577 qemu_put_mouse_event_current
= s
;
582 void qemu_remove_mouse_event_handler(QEMUPutMouseEntry
*entry
)
584 QEMUPutMouseEntry
*prev
= NULL
, *cursor
;
586 if (!qemu_put_mouse_event_head
|| entry
== NULL
)
589 cursor
= qemu_put_mouse_event_head
;
590 while (cursor
!= NULL
&& cursor
!= entry
) {
592 cursor
= cursor
->next
;
595 if (cursor
== NULL
) // does not exist or list empty
597 else if (prev
== NULL
) { // entry is head
598 qemu_put_mouse_event_head
= cursor
->next
;
599 if (qemu_put_mouse_event_current
== entry
)
600 qemu_put_mouse_event_current
= cursor
->next
;
601 qemu_free(entry
->qemu_put_mouse_event_name
);
606 prev
->next
= entry
->next
;
608 if (qemu_put_mouse_event_current
== entry
)
609 qemu_put_mouse_event_current
= prev
;
611 qemu_free(entry
->qemu_put_mouse_event_name
);
615 void kbd_put_keycode(int keycode
)
617 if (qemu_put_kbd_event
) {
618 qemu_put_kbd_event(qemu_put_kbd_event_opaque
, keycode
);
622 void kbd_mouse_event(int dx
, int dy
, int dz
, int buttons_state
)
624 QEMUPutMouseEvent
*mouse_event
;
625 void *mouse_event_opaque
;
628 if (!qemu_put_mouse_event_current
) {
633 qemu_put_mouse_event_current
->qemu_put_mouse_event
;
635 qemu_put_mouse_event_current
->qemu_put_mouse_event_opaque
;
638 if (graphic_rotate
) {
639 if (qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
)
642 width
= graphic_width
- 1;
643 mouse_event(mouse_event_opaque
,
644 width
- dy
, dx
, dz
, buttons_state
);
646 mouse_event(mouse_event_opaque
,
647 dx
, dy
, dz
, buttons_state
);
651 int kbd_mouse_is_absolute(void)
653 if (!qemu_put_mouse_event_current
)
656 return qemu_put_mouse_event_current
->qemu_put_mouse_event_absolute
;
659 void do_info_mice(void)
661 QEMUPutMouseEntry
*cursor
;
664 if (!qemu_put_mouse_event_head
) {
665 term_printf("No mouse devices connected\n");
669 term_printf("Mouse devices available:\n");
670 cursor
= qemu_put_mouse_event_head
;
671 while (cursor
!= NULL
) {
672 term_printf("%c Mouse #%d: %s\n",
673 (cursor
== qemu_put_mouse_event_current
? '*' : ' '),
674 index
, cursor
->qemu_put_mouse_event_name
);
676 cursor
= cursor
->next
;
680 void do_mouse_set(int index
)
682 QEMUPutMouseEntry
*cursor
;
685 if (!qemu_put_mouse_event_head
) {
686 term_printf("No mouse devices connected\n");
690 cursor
= qemu_put_mouse_event_head
;
691 while (cursor
!= NULL
&& index
!= i
) {
693 cursor
= cursor
->next
;
697 qemu_put_mouse_event_current
= cursor
;
699 term_printf("Mouse at given index not found\n");
702 /* compute with 96 bit intermediate result: (a*b)/c */
703 uint64_t muldiv64(uint64_t a
, uint32_t b
, uint32_t c
)
708 #ifdef WORDS_BIGENDIAN
718 rl
= (uint64_t)u
.l
.low
* (uint64_t)b
;
719 rh
= (uint64_t)u
.l
.high
* (uint64_t)b
;
722 res
.l
.low
= (((rh
% c
) << 32) + (rl
& 0xffffffff)) / c
;
726 /***********************************************************/
727 /* real time host monotonic timer */
729 #define QEMU_TIMER_BASE 1000000000LL
733 static int64_t clock_freq
;
735 static void init_get_clock(void)
739 ret
= QueryPerformanceFrequency(&freq
);
741 fprintf(stderr
, "Could not calibrate ticks\n");
744 clock_freq
= freq
.QuadPart
;
747 static int64_t get_clock(void)
750 QueryPerformanceCounter(&ti
);
751 return muldiv64(ti
.QuadPart
, QEMU_TIMER_BASE
, clock_freq
);
756 static int use_rt_clock
;
758 static void init_get_clock(void)
761 #if defined(__linux__)
764 if (clock_gettime(CLOCK_MONOTONIC
, &ts
) == 0) {
771 static int64_t get_clock(void)
773 #if defined(__linux__)
776 clock_gettime(CLOCK_MONOTONIC
, &ts
);
777 return ts
.tv_sec
* 1000000000LL + ts
.tv_nsec
;
781 /* XXX: using gettimeofday leads to problems if the date
782 changes, so it should be avoided. */
784 gettimeofday(&tv
, NULL
);
785 return tv
.tv_sec
* 1000000000LL + (tv
.tv_usec
* 1000);
790 /* Return the virtual CPU time, based on the instruction counter. */
791 static int64_t cpu_get_icount(void)
794 CPUState
*env
= cpu_single_env
;;
795 icount
= qemu_icount
;
798 fprintf(stderr
, "Bad clock read\n");
799 icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
801 return qemu_icount_bias
+ (icount
<< icount_time_shift
);
804 /***********************************************************/
805 /* guest cycle counter */
807 static int64_t cpu_ticks_prev
;
808 static int64_t cpu_ticks_offset
;
809 static int64_t cpu_clock_offset
;
810 static int cpu_ticks_enabled
;
812 /* return the host CPU cycle counter and handle stop/restart */
813 int64_t cpu_get_ticks(void)
816 return cpu_get_icount();
818 if (!cpu_ticks_enabled
) {
819 return cpu_ticks_offset
;
822 ticks
= cpu_get_real_ticks();
823 if (cpu_ticks_prev
> ticks
) {
824 /* Note: non increasing ticks may happen if the host uses
826 cpu_ticks_offset
+= cpu_ticks_prev
- ticks
;
828 cpu_ticks_prev
= ticks
;
829 return ticks
+ cpu_ticks_offset
;
833 /* return the host CPU monotonic timer and handle stop/restart */
834 static int64_t cpu_get_clock(void)
837 if (!cpu_ticks_enabled
) {
838 return cpu_clock_offset
;
841 return ti
+ cpu_clock_offset
;
845 /* enable cpu_get_ticks() */
846 void cpu_enable_ticks(void)
848 if (!cpu_ticks_enabled
) {
849 cpu_ticks_offset
-= cpu_get_real_ticks();
850 cpu_clock_offset
-= get_clock();
851 cpu_ticks_enabled
= 1;
855 /* disable cpu_get_ticks() : the clock is stopped. You must not call
856 cpu_get_ticks() after that. */
857 void cpu_disable_ticks(void)
859 if (cpu_ticks_enabled
) {
860 cpu_ticks_offset
= cpu_get_ticks();
861 cpu_clock_offset
= cpu_get_clock();
862 cpu_ticks_enabled
= 0;
866 /***********************************************************/
869 #define QEMU_TIMER_REALTIME 0
870 #define QEMU_TIMER_VIRTUAL 1
874 /* XXX: add frequency */
882 struct QEMUTimer
*next
;
885 struct qemu_alarm_timer
{
889 int (*start
)(struct qemu_alarm_timer
*t
);
890 void (*stop
)(struct qemu_alarm_timer
*t
);
891 void (*rearm
)(struct qemu_alarm_timer
*t
);
895 #define ALARM_FLAG_DYNTICKS 0x1
896 #define ALARM_FLAG_EXPIRED 0x2
898 static inline int alarm_has_dynticks(struct qemu_alarm_timer
*t
)
900 return t
->flags
& ALARM_FLAG_DYNTICKS
;
903 static void qemu_rearm_alarm_timer(struct qemu_alarm_timer
*t
)
905 if (!alarm_has_dynticks(t
))
911 /* TODO: MIN_TIMER_REARM_US should be optimized */
912 #define MIN_TIMER_REARM_US 250
914 static struct qemu_alarm_timer
*alarm_timer
;
918 struct qemu_alarm_win32
{
922 } alarm_win32_data
= {0, NULL
, -1};
924 static int win32_start_timer(struct qemu_alarm_timer
*t
);
925 static void win32_stop_timer(struct qemu_alarm_timer
*t
);
926 static void win32_rearm_timer(struct qemu_alarm_timer
*t
);
930 static int unix_start_timer(struct qemu_alarm_timer
*t
);
931 static void unix_stop_timer(struct qemu_alarm_timer
*t
);
935 static int dynticks_start_timer(struct qemu_alarm_timer
*t
);
936 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
);
937 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
);
939 static int hpet_start_timer(struct qemu_alarm_timer
*t
);
940 static void hpet_stop_timer(struct qemu_alarm_timer
*t
);
942 static int rtc_start_timer(struct qemu_alarm_timer
*t
);
943 static void rtc_stop_timer(struct qemu_alarm_timer
*t
);
945 #endif /* __linux__ */
949 /* Correlation between real and virtual time is always going to be
950 fairly approximate, so ignore small variation.
951 When the guest is idle real and virtual time will be aligned in
953 #define ICOUNT_WOBBLE (QEMU_TIMER_BASE / 10)
955 static void icount_adjust(void)
960 static int64_t last_delta
;
961 /* If the VM is not running, then do nothing. */
965 cur_time
= cpu_get_clock();
966 cur_icount
= qemu_get_clock(vm_clock
);
967 delta
= cur_icount
- cur_time
;
968 /* FIXME: This is a very crude algorithm, somewhat prone to oscillation. */
970 && last_delta
+ ICOUNT_WOBBLE
< delta
* 2
971 && icount_time_shift
> 0) {
972 /* The guest is getting too far ahead. Slow time down. */
976 && last_delta
- ICOUNT_WOBBLE
> delta
* 2
977 && icount_time_shift
< MAX_ICOUNT_SHIFT
) {
978 /* The guest is getting too far behind. Speed time up. */
982 qemu_icount_bias
= cur_icount
- (qemu_icount
<< icount_time_shift
);
985 static void icount_adjust_rt(void * opaque
)
987 qemu_mod_timer(icount_rt_timer
,
988 qemu_get_clock(rt_clock
) + 1000);
992 static void icount_adjust_vm(void * opaque
)
994 qemu_mod_timer(icount_vm_timer
,
995 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
999 static void init_icount_adjust(void)
1001 /* Have both realtime and virtual time triggers for speed adjustment.
1002 The realtime trigger catches emulated time passing too slowly,
1003 the virtual time trigger catches emulated time passing too fast.
1004 Realtime triggers occur even when idle, so use them less frequently
1005 than VM triggers. */
1006 icount_rt_timer
= qemu_new_timer(rt_clock
, icount_adjust_rt
, NULL
);
1007 qemu_mod_timer(icount_rt_timer
,
1008 qemu_get_clock(rt_clock
) + 1000);
1009 icount_vm_timer
= qemu_new_timer(vm_clock
, icount_adjust_vm
, NULL
);
1010 qemu_mod_timer(icount_vm_timer
,
1011 qemu_get_clock(vm_clock
) + QEMU_TIMER_BASE
/ 10);
1014 static struct qemu_alarm_timer alarm_timers
[] = {
1017 {"dynticks", ALARM_FLAG_DYNTICKS
, dynticks_start_timer
,
1018 dynticks_stop_timer
, dynticks_rearm_timer
, NULL
},
1019 /* HPET - if available - is preferred */
1020 {"hpet", 0, hpet_start_timer
, hpet_stop_timer
, NULL
, NULL
},
1021 /* ...otherwise try RTC */
1022 {"rtc", 0, rtc_start_timer
, rtc_stop_timer
, NULL
, NULL
},
1024 {"unix", 0, unix_start_timer
, unix_stop_timer
, NULL
, NULL
},
1026 {"dynticks", ALARM_FLAG_DYNTICKS
, win32_start_timer
,
1027 win32_stop_timer
, win32_rearm_timer
, &alarm_win32_data
},
1028 {"win32", 0, win32_start_timer
,
1029 win32_stop_timer
, NULL
, &alarm_win32_data
},
1034 static void show_available_alarms(void)
1038 printf("Available alarm timers, in order of precedence:\n");
1039 for (i
= 0; alarm_timers
[i
].name
; i
++)
1040 printf("%s\n", alarm_timers
[i
].name
);
1043 static void configure_alarms(char const *opt
)
1047 int count
= (sizeof(alarm_timers
) / sizeof(*alarm_timers
)) - 1;
1050 struct qemu_alarm_timer tmp
;
1052 if (!strcmp(opt
, "?")) {
1053 show_available_alarms();
1059 /* Reorder the array */
1060 name
= strtok(arg
, ",");
1062 for (i
= 0; i
< count
&& alarm_timers
[i
].name
; i
++) {
1063 if (!strcmp(alarm_timers
[i
].name
, name
))
1068 fprintf(stderr
, "Unknown clock %s\n", name
);
1077 tmp
= alarm_timers
[i
];
1078 alarm_timers
[i
] = alarm_timers
[cur
];
1079 alarm_timers
[cur
] = tmp
;
1083 name
= strtok(NULL
, ",");
1089 /* Disable remaining timers */
1090 for (i
= cur
; i
< count
; i
++)
1091 alarm_timers
[i
].name
= NULL
;
1093 show_available_alarms();
1098 QEMUClock
*rt_clock
;
1099 QEMUClock
*vm_clock
;
1101 static QEMUTimer
*active_timers
[2];
1103 static QEMUClock
*qemu_new_clock(int type
)
1106 clock
= qemu_mallocz(sizeof(QEMUClock
));
1113 QEMUTimer
*qemu_new_timer(QEMUClock
*clock
, QEMUTimerCB
*cb
, void *opaque
)
1117 ts
= qemu_mallocz(sizeof(QEMUTimer
));
1120 ts
->opaque
= opaque
;
1124 void qemu_free_timer(QEMUTimer
*ts
)
1129 /* stop a timer, but do not dealloc it */
1130 void qemu_del_timer(QEMUTimer
*ts
)
1134 /* NOTE: this code must be signal safe because
1135 qemu_timer_expired() can be called from a signal. */
1136 pt
= &active_timers
[ts
->clock
->type
];
1149 /* modify the current timer so that it will be fired when current_time
1150 >= expire_time. The corresponding callback will be called. */
1151 void qemu_mod_timer(QEMUTimer
*ts
, int64_t expire_time
)
1157 /* add the timer in the sorted list */
1158 /* NOTE: this code must be signal safe because
1159 qemu_timer_expired() can be called from a signal. */
1160 pt
= &active_timers
[ts
->clock
->type
];
1165 if (t
->expire_time
> expire_time
)
1169 ts
->expire_time
= expire_time
;
1173 /* Rearm if necessary */
1174 if (pt
== &active_timers
[ts
->clock
->type
]) {
1175 if ((alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) == 0) {
1176 qemu_rearm_alarm_timer(alarm_timer
);
1178 /* Interrupt execution to force deadline recalculation. */
1179 if (use_icount
&& cpu_single_env
) {
1180 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
1185 int qemu_timer_pending(QEMUTimer
*ts
)
1188 for(t
= active_timers
[ts
->clock
->type
]; t
!= NULL
; t
= t
->next
) {
1195 static inline int qemu_timer_expired(QEMUTimer
*timer_head
, int64_t current_time
)
1199 return (timer_head
->expire_time
<= current_time
);
1202 static void qemu_run_timers(QEMUTimer
**ptimer_head
, int64_t current_time
)
1208 if (!ts
|| ts
->expire_time
> current_time
)
1210 /* remove timer from the list before calling the callback */
1211 *ptimer_head
= ts
->next
;
1214 /* run the callback (the timer list can be modified) */
1219 int64_t qemu_get_clock(QEMUClock
*clock
)
1221 switch(clock
->type
) {
1222 case QEMU_TIMER_REALTIME
:
1223 return get_clock() / 1000000;
1225 case QEMU_TIMER_VIRTUAL
:
1227 return cpu_get_icount();
1229 return cpu_get_clock();
1234 static void init_timers(void)
1237 ticks_per_sec
= QEMU_TIMER_BASE
;
1238 rt_clock
= qemu_new_clock(QEMU_TIMER_REALTIME
);
1239 vm_clock
= qemu_new_clock(QEMU_TIMER_VIRTUAL
);
1243 void qemu_put_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1245 uint64_t expire_time
;
1247 if (qemu_timer_pending(ts
)) {
1248 expire_time
= ts
->expire_time
;
1252 qemu_put_be64(f
, expire_time
);
1255 void qemu_get_timer(QEMUFile
*f
, QEMUTimer
*ts
)
1257 uint64_t expire_time
;
1259 expire_time
= qemu_get_be64(f
);
1260 if (expire_time
!= -1) {
1261 qemu_mod_timer(ts
, expire_time
);
1267 static void timer_save(QEMUFile
*f
, void *opaque
)
1269 if (cpu_ticks_enabled
) {
1270 hw_error("cannot save state if virtual timers are running");
1272 qemu_put_be64(f
, cpu_ticks_offset
);
1273 qemu_put_be64(f
, ticks_per_sec
);
1274 qemu_put_be64(f
, cpu_clock_offset
);
1277 static int timer_load(QEMUFile
*f
, void *opaque
, int version_id
)
1279 if (version_id
!= 1 && version_id
!= 2)
1281 if (cpu_ticks_enabled
) {
1284 cpu_ticks_offset
=qemu_get_be64(f
);
1285 ticks_per_sec
=qemu_get_be64(f
);
1286 if (version_id
== 2) {
1287 cpu_clock_offset
=qemu_get_be64(f
);
1293 void CALLBACK
host_alarm_handler(UINT uTimerID
, UINT uMsg
,
1294 DWORD_PTR dwUser
, DWORD_PTR dw1
, DWORD_PTR dw2
)
1296 static void host_alarm_handler(int host_signum
)
1300 #define DISP_FREQ 1000
1302 static int64_t delta_min
= INT64_MAX
;
1303 static int64_t delta_max
, delta_cum
, last_clock
, delta
, ti
;
1305 ti
= qemu_get_clock(vm_clock
);
1306 if (last_clock
!= 0) {
1307 delta
= ti
- last_clock
;
1308 if (delta
< delta_min
)
1310 if (delta
> delta_max
)
1313 if (++count
== DISP_FREQ
) {
1314 printf("timer: min=%" PRId64
" us max=%" PRId64
" us avg=%" PRId64
" us avg_freq=%0.3f Hz\n",
1315 muldiv64(delta_min
, 1000000, ticks_per_sec
),
1316 muldiv64(delta_max
, 1000000, ticks_per_sec
),
1317 muldiv64(delta_cum
, 1000000 / DISP_FREQ
, ticks_per_sec
),
1318 (double)ticks_per_sec
/ ((double)delta_cum
/ DISP_FREQ
));
1320 delta_min
= INT64_MAX
;
1329 alarm_has_dynticks(alarm_timer
) ||
1331 qemu_timer_expired(active_timers
[QEMU_TIMER_VIRTUAL
],
1332 qemu_get_clock(vm_clock
))) ||
1333 qemu_timer_expired(active_timers
[QEMU_TIMER_REALTIME
],
1334 qemu_get_clock(rt_clock
))) {
1336 struct qemu_alarm_win32
*data
= ((struct qemu_alarm_timer
*)dwUser
)->priv
;
1337 SetEvent(data
->host_alarm
);
1339 CPUState
*env
= next_cpu
;
1341 alarm_timer
->flags
|= ALARM_FLAG_EXPIRED
;
1344 /* stop the currently executing cpu because a timer occured */
1345 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
1347 if (env
->kqemu_enabled
) {
1348 kqemu_cpu_interrupt(env
);
1356 static int64_t qemu_next_deadline(void)
1360 if (active_timers
[QEMU_TIMER_VIRTUAL
]) {
1361 delta
= active_timers
[QEMU_TIMER_VIRTUAL
]->expire_time
-
1362 qemu_get_clock(vm_clock
);
1364 /* To avoid problems with overflow limit this to 2^32. */
1374 static uint64_t qemu_next_deadline_dyntick(void)
1382 delta
= (qemu_next_deadline() + 999) / 1000;
1384 if (active_timers
[QEMU_TIMER_REALTIME
]) {
1385 rtdelta
= (active_timers
[QEMU_TIMER_REALTIME
]->expire_time
-
1386 qemu_get_clock(rt_clock
))*1000;
1387 if (rtdelta
< delta
)
1391 if (delta
< MIN_TIMER_REARM_US
)
1392 delta
= MIN_TIMER_REARM_US
;
1399 #if defined(__linux__)
1401 #define RTC_FREQ 1024
1403 static void enable_sigio_timer(int fd
)
1405 struct sigaction act
;
1408 sigfillset(&act
.sa_mask
);
1410 act
.sa_handler
= host_alarm_handler
;
1412 sigaction(SIGIO
, &act
, NULL
);
1413 fcntl(fd
, F_SETFL
, O_ASYNC
);
1414 fcntl(fd
, F_SETOWN
, getpid());
1417 static int hpet_start_timer(struct qemu_alarm_timer
*t
)
1419 struct hpet_info info
;
1422 fd
= open("/dev/hpet", O_RDONLY
);
1427 r
= ioctl(fd
, HPET_IRQFREQ
, RTC_FREQ
);
1429 fprintf(stderr
, "Could not configure '/dev/hpet' to have a 1024Hz timer. This is not a fatal\n"
1430 "error, but for better emulation accuracy type:\n"
1431 "'echo 1024 > /proc/sys/dev/hpet/max-user-freq' as root.\n");
1435 /* Check capabilities */
1436 r
= ioctl(fd
, HPET_INFO
, &info
);
1440 /* Enable periodic mode */
1441 r
= ioctl(fd
, HPET_EPI
, 0);
1442 if (info
.hi_flags
&& (r
< 0))
1445 /* Enable interrupt */
1446 r
= ioctl(fd
, HPET_IE_ON
, 0);
1450 enable_sigio_timer(fd
);
1451 t
->priv
= (void *)(long)fd
;
1459 static void hpet_stop_timer(struct qemu_alarm_timer
*t
)
1461 int fd
= (long)t
->priv
;
1466 static int rtc_start_timer(struct qemu_alarm_timer
*t
)
1469 unsigned long current_rtc_freq
= 0;
1471 TFR(rtc_fd
= open("/dev/rtc", O_RDONLY
));
1474 ioctl(rtc_fd
, RTC_IRQP_READ
, ¤t_rtc_freq
);
1475 if (current_rtc_freq
!= RTC_FREQ
&&
1476 ioctl(rtc_fd
, RTC_IRQP_SET
, RTC_FREQ
) < 0) {
1477 fprintf(stderr
, "Could not configure '/dev/rtc' to have a 1024 Hz timer. This is not a fatal\n"
1478 "error, but for better emulation accuracy either use a 2.6 host Linux kernel or\n"
1479 "type 'echo 1024 > /proc/sys/dev/rtc/max-user-freq' as root.\n");
1482 if (ioctl(rtc_fd
, RTC_PIE_ON
, 0) < 0) {
1488 enable_sigio_timer(rtc_fd
);
1490 t
->priv
= (void *)(long)rtc_fd
;
1495 static void rtc_stop_timer(struct qemu_alarm_timer
*t
)
1497 int rtc_fd
= (long)t
->priv
;
1502 static int dynticks_start_timer(struct qemu_alarm_timer
*t
)
1506 struct sigaction act
;
1508 sigfillset(&act
.sa_mask
);
1510 act
.sa_handler
= host_alarm_handler
;
1512 sigaction(SIGALRM
, &act
, NULL
);
1514 ev
.sigev_value
.sival_int
= 0;
1515 ev
.sigev_notify
= SIGEV_SIGNAL
;
1516 ev
.sigev_signo
= SIGALRM
;
1518 if (timer_create(CLOCK_REALTIME
, &ev
, &host_timer
)) {
1519 perror("timer_create");
1521 /* disable dynticks */
1522 fprintf(stderr
, "Dynamic Ticks disabled\n");
1527 t
->priv
= (void *)host_timer
;
1532 static void dynticks_stop_timer(struct qemu_alarm_timer
*t
)
1534 timer_t host_timer
= (timer_t
)t
->priv
;
1536 timer_delete(host_timer
);
1539 static void dynticks_rearm_timer(struct qemu_alarm_timer
*t
)
1541 timer_t host_timer
= (timer_t
)t
->priv
;
1542 struct itimerspec timeout
;
1543 int64_t nearest_delta_us
= INT64_MAX
;
1546 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1547 !active_timers
[QEMU_TIMER_VIRTUAL
])
1550 nearest_delta_us
= qemu_next_deadline_dyntick();
1552 /* check whether a timer is already running */
1553 if (timer_gettime(host_timer
, &timeout
)) {
1555 fprintf(stderr
, "Internal timer error: aborting\n");
1558 current_us
= timeout
.it_value
.tv_sec
* 1000000 + timeout
.it_value
.tv_nsec
/1000;
1559 if (current_us
&& current_us
<= nearest_delta_us
)
1562 timeout
.it_interval
.tv_sec
= 0;
1563 timeout
.it_interval
.tv_nsec
= 0; /* 0 for one-shot timer */
1564 timeout
.it_value
.tv_sec
= nearest_delta_us
/ 1000000;
1565 timeout
.it_value
.tv_nsec
= (nearest_delta_us
% 1000000) * 1000;
1566 if (timer_settime(host_timer
, 0 /* RELATIVE */, &timeout
, NULL
)) {
1568 fprintf(stderr
, "Internal timer error: aborting\n");
1573 #endif /* defined(__linux__) */
1575 static int unix_start_timer(struct qemu_alarm_timer
*t
)
1577 struct sigaction act
;
1578 struct itimerval itv
;
1582 sigfillset(&act
.sa_mask
);
1584 act
.sa_handler
= host_alarm_handler
;
1586 sigaction(SIGALRM
, &act
, NULL
);
1588 itv
.it_interval
.tv_sec
= 0;
1589 /* for i386 kernel 2.6 to get 1 ms */
1590 itv
.it_interval
.tv_usec
= 999;
1591 itv
.it_value
.tv_sec
= 0;
1592 itv
.it_value
.tv_usec
= 10 * 1000;
1594 err
= setitimer(ITIMER_REAL
, &itv
, NULL
);
1601 static void unix_stop_timer(struct qemu_alarm_timer
*t
)
1603 struct itimerval itv
;
1605 memset(&itv
, 0, sizeof(itv
));
1606 setitimer(ITIMER_REAL
, &itv
, NULL
);
1609 #endif /* !defined(_WIN32) */
1613 static int win32_start_timer(struct qemu_alarm_timer
*t
)
1616 struct qemu_alarm_win32
*data
= t
->priv
;
1619 data
->host_alarm
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1620 if (!data
->host_alarm
) {
1621 perror("Failed CreateEvent");
1625 memset(&tc
, 0, sizeof(tc
));
1626 timeGetDevCaps(&tc
, sizeof(tc
));
1628 if (data
->period
< tc
.wPeriodMin
)
1629 data
->period
= tc
.wPeriodMin
;
1631 timeBeginPeriod(data
->period
);
1633 flags
= TIME_CALLBACK_FUNCTION
;
1634 if (alarm_has_dynticks(t
))
1635 flags
|= TIME_ONESHOT
;
1637 flags
|= TIME_PERIODIC
;
1639 data
->timerId
= timeSetEvent(1, // interval (ms)
1640 data
->period
, // resolution
1641 host_alarm_handler
, // function
1642 (DWORD
)t
, // parameter
1645 if (!data
->timerId
) {
1646 perror("Failed to initialize win32 alarm timer");
1648 timeEndPeriod(data
->period
);
1649 CloseHandle(data
->host_alarm
);
1653 qemu_add_wait_object(data
->host_alarm
, NULL
, NULL
);
1658 static void win32_stop_timer(struct qemu_alarm_timer
*t
)
1660 struct qemu_alarm_win32
*data
= t
->priv
;
1662 timeKillEvent(data
->timerId
);
1663 timeEndPeriod(data
->period
);
1665 CloseHandle(data
->host_alarm
);
1668 static void win32_rearm_timer(struct qemu_alarm_timer
*t
)
1670 struct qemu_alarm_win32
*data
= t
->priv
;
1671 uint64_t nearest_delta_us
;
1673 if (!active_timers
[QEMU_TIMER_REALTIME
] &&
1674 !active_timers
[QEMU_TIMER_VIRTUAL
])
1677 nearest_delta_us
= qemu_next_deadline_dyntick();
1678 nearest_delta_us
/= 1000;
1680 timeKillEvent(data
->timerId
);
1682 data
->timerId
= timeSetEvent(1,
1686 TIME_ONESHOT
| TIME_PERIODIC
);
1688 if (!data
->timerId
) {
1689 perror("Failed to re-arm win32 alarm timer");
1691 timeEndPeriod(data
->period
);
1692 CloseHandle(data
->host_alarm
);
1699 static void init_timer_alarm(void)
1701 struct qemu_alarm_timer
*t
;
1704 for (i
= 0; alarm_timers
[i
].name
; i
++) {
1705 t
= &alarm_timers
[i
];
1713 fprintf(stderr
, "Unable to find any suitable alarm timer.\n");
1714 fprintf(stderr
, "Terminating\n");
1721 static void quit_timers(void)
1723 alarm_timer
->stop(alarm_timer
);
1727 /***********************************************************/
1728 /* host time/date access */
1729 void qemu_get_timedate(struct tm
*tm
, int offset
)
1736 if (rtc_date_offset
== -1) {
1740 ret
= localtime(&ti
);
1742 ti
-= rtc_date_offset
;
1746 memcpy(tm
, ret
, sizeof(struct tm
));
1749 int qemu_timedate_diff(struct tm
*tm
)
1753 if (rtc_date_offset
== -1)
1755 seconds
= mktimegm(tm
);
1757 seconds
= mktime(tm
);
1759 seconds
= mktimegm(tm
) + rtc_date_offset
;
1761 return seconds
- time(NULL
);
1764 /***********************************************************/
1765 /* character device */
1767 static void qemu_chr_event(CharDriverState
*s
, int event
)
1771 s
->chr_event(s
->handler_opaque
, event
);
1774 static void qemu_chr_reset_bh(void *opaque
)
1776 CharDriverState
*s
= opaque
;
1777 qemu_chr_event(s
, CHR_EVENT_RESET
);
1778 qemu_bh_delete(s
->bh
);
1782 void qemu_chr_reset(CharDriverState
*s
)
1784 if (s
->bh
== NULL
) {
1785 s
->bh
= qemu_bh_new(qemu_chr_reset_bh
, s
);
1786 qemu_bh_schedule(s
->bh
);
1790 int qemu_chr_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
1792 return s
->chr_write(s
, buf
, len
);
1795 int qemu_chr_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
1799 return s
->chr_ioctl(s
, cmd
, arg
);
1802 int qemu_chr_can_read(CharDriverState
*s
)
1804 if (!s
->chr_can_read
)
1806 return s
->chr_can_read(s
->handler_opaque
);
1809 void qemu_chr_read(CharDriverState
*s
, uint8_t *buf
, int len
)
1811 s
->chr_read(s
->handler_opaque
, buf
, len
);
1814 void qemu_chr_accept_input(CharDriverState
*s
)
1816 if (s
->chr_accept_input
)
1817 s
->chr_accept_input(s
);
1820 void qemu_chr_printf(CharDriverState
*s
, const char *fmt
, ...)
1825 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
1826 qemu_chr_write(s
, (uint8_t *)buf
, strlen(buf
));
1830 void qemu_chr_send_event(CharDriverState
*s
, int event
)
1832 if (s
->chr_send_event
)
1833 s
->chr_send_event(s
, event
);
1836 void qemu_chr_add_handlers(CharDriverState
*s
,
1837 IOCanRWHandler
*fd_can_read
,
1838 IOReadHandler
*fd_read
,
1839 IOEventHandler
*fd_event
,
1842 s
->chr_can_read
= fd_can_read
;
1843 s
->chr_read
= fd_read
;
1844 s
->chr_event
= fd_event
;
1845 s
->handler_opaque
= opaque
;
1846 if (s
->chr_update_read_handler
)
1847 s
->chr_update_read_handler(s
);
1850 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1855 static CharDriverState
*qemu_chr_open_null(void)
1857 CharDriverState
*chr
;
1859 chr
= qemu_mallocz(sizeof(CharDriverState
));
1862 chr
->chr_write
= null_chr_write
;
1866 /* MUX driver for serial I/O splitting */
1867 static int term_timestamps
;
1868 static int64_t term_timestamps_start
;
1870 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
1871 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
1873 IOCanRWHandler
*chr_can_read
[MAX_MUX
];
1874 IOReadHandler
*chr_read
[MAX_MUX
];
1875 IOEventHandler
*chr_event
[MAX_MUX
];
1876 void *ext_opaque
[MAX_MUX
];
1877 CharDriverState
*drv
;
1878 unsigned char buffer
[MUX_BUFFER_SIZE
];
1882 int term_got_escape
;
1887 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1889 MuxDriver
*d
= chr
->opaque
;
1891 if (!term_timestamps
) {
1892 ret
= d
->drv
->chr_write(d
->drv
, buf
, len
);
1897 for(i
= 0; i
< len
; i
++) {
1898 ret
+= d
->drv
->chr_write(d
->drv
, buf
+i
, 1);
1899 if (buf
[i
] == '\n') {
1905 if (term_timestamps_start
== -1)
1906 term_timestamps_start
= ti
;
1907 ti
-= term_timestamps_start
;
1908 secs
= ti
/ 1000000000;
1909 snprintf(buf1
, sizeof(buf1
),
1910 "[%02d:%02d:%02d.%03d] ",
1914 (int)((ti
/ 1000000) % 1000));
1915 d
->drv
->chr_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
1922 static char *mux_help
[] = {
1923 "% h print this help\n\r",
1924 "% x exit emulator\n\r",
1925 "% s save disk data back to file (if -snapshot)\n\r",
1926 "% t toggle console timestamps\n\r"
1927 "% b send break (magic sysrq)\n\r",
1928 "% c switch between console and monitor\n\r",
1933 static int term_escape_char
= 0x01; /* ctrl-a is used for escape */
1934 static void mux_print_help(CharDriverState
*chr
)
1937 char ebuf
[15] = "Escape-Char";
1938 char cbuf
[50] = "\n\r";
1940 if (term_escape_char
> 0 && term_escape_char
< 26) {
1941 sprintf(cbuf
,"\n\r");
1942 sprintf(ebuf
,"C-%c", term_escape_char
- 1 + 'a');
1944 sprintf(cbuf
,"\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
1947 chr
->chr_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
1948 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
1949 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
1950 if (mux_help
[i
][j
] == '%')
1951 chr
->chr_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
1953 chr
->chr_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
1958 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
1960 if (d
->term_got_escape
) {
1961 d
->term_got_escape
= 0;
1962 if (ch
== term_escape_char
)
1967 mux_print_help(chr
);
1971 char *term
= "QEMU: Terminated\n\r";
1972 chr
->chr_write(chr
,(uint8_t *)term
,strlen(term
));
1979 for (i
= 0; i
< nb_drives
; i
++) {
1980 bdrv_commit(drives_table
[i
].bdrv
);
1985 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
1988 /* Switch to the next registered device */
1990 if (chr
->focus
>= d
->mux_cnt
)
1994 term_timestamps
= !term_timestamps
;
1995 term_timestamps_start
= -1;
1998 } else if (ch
== term_escape_char
) {
1999 d
->term_got_escape
= 1;
2007 static void mux_chr_accept_input(CharDriverState
*chr
)
2010 MuxDriver
*d
= chr
->opaque
;
2012 while (d
->prod
!= d
->cons
&&
2013 d
->chr_can_read
[m
] &&
2014 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
2015 d
->chr_read
[m
](d
->ext_opaque
[m
],
2016 &d
->buffer
[d
->cons
++ & MUX_BUFFER_MASK
], 1);
2020 static int mux_chr_can_read(void *opaque
)
2022 CharDriverState
*chr
= opaque
;
2023 MuxDriver
*d
= chr
->opaque
;
2025 if ((d
->prod
- d
->cons
) < MUX_BUFFER_SIZE
)
2027 if (d
->chr_can_read
[chr
->focus
])
2028 return d
->chr_can_read
[chr
->focus
](d
->ext_opaque
[chr
->focus
]);
2032 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
2034 CharDriverState
*chr
= opaque
;
2035 MuxDriver
*d
= chr
->opaque
;
2039 mux_chr_accept_input (opaque
);
2041 for(i
= 0; i
< size
; i
++)
2042 if (mux_proc_byte(chr
, d
, buf
[i
])) {
2043 if (d
->prod
== d
->cons
&&
2044 d
->chr_can_read
[m
] &&
2045 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
2046 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
2048 d
->buffer
[d
->prod
++ & MUX_BUFFER_MASK
] = buf
[i
];
2052 static void mux_chr_event(void *opaque
, int event
)
2054 CharDriverState
*chr
= opaque
;
2055 MuxDriver
*d
= chr
->opaque
;
2058 /* Send the event to all registered listeners */
2059 for (i
= 0; i
< d
->mux_cnt
; i
++)
2060 if (d
->chr_event
[i
])
2061 d
->chr_event
[i
](d
->ext_opaque
[i
], event
);
2064 static void mux_chr_update_read_handler(CharDriverState
*chr
)
2066 MuxDriver
*d
= chr
->opaque
;
2068 if (d
->mux_cnt
>= MAX_MUX
) {
2069 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
2072 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
2073 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
2074 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
2075 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
2076 /* Fix up the real driver with mux routines */
2077 if (d
->mux_cnt
== 0) {
2078 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
2079 mux_chr_event
, chr
);
2081 chr
->focus
= d
->mux_cnt
;
2085 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
2087 CharDriverState
*chr
;
2090 chr
= qemu_mallocz(sizeof(CharDriverState
));
2093 d
= qemu_mallocz(sizeof(MuxDriver
));
2102 chr
->chr_write
= mux_chr_write
;
2103 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
2104 chr
->chr_accept_input
= mux_chr_accept_input
;
2111 static void socket_cleanup(void)
2116 static int socket_init(void)
2121 ret
= WSAStartup(MAKEWORD(2,2), &Data
);
2123 err
= WSAGetLastError();
2124 fprintf(stderr
, "WSAStartup: %d\n", err
);
2127 atexit(socket_cleanup
);
2131 static int send_all(int fd
, const uint8_t *buf
, int len1
)
2137 ret
= send(fd
, buf
, len
, 0);
2140 errno
= WSAGetLastError();
2141 if (errno
!= WSAEWOULDBLOCK
) {
2144 } else if (ret
== 0) {
2154 void socket_set_nonblock(int fd
)
2156 unsigned long opt
= 1;
2157 ioctlsocket(fd
, FIONBIO
, &opt
);
2162 static int unix_write(int fd
, const uint8_t *buf
, int len1
)
2168 ret
= write(fd
, buf
, len
);
2170 if (errno
!= EINTR
&& errno
!= EAGAIN
)
2172 } else if (ret
== 0) {
2182 static inline int send_all(int fd
, const uint8_t *buf
, int len1
)
2184 return unix_write(fd
, buf
, len1
);
2187 void socket_set_nonblock(int fd
)
2190 f
= fcntl(fd
, F_GETFL
);
2191 fcntl(fd
, F_SETFL
, f
| O_NONBLOCK
);
2193 #endif /* !_WIN32 */
2202 #define STDIO_MAX_CLIENTS 1
2203 static int stdio_nb_clients
= 0;
2205 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2207 FDCharDriver
*s
= chr
->opaque
;
2208 return unix_write(s
->fd_out
, buf
, len
);
2211 static int fd_chr_read_poll(void *opaque
)
2213 CharDriverState
*chr
= opaque
;
2214 FDCharDriver
*s
= chr
->opaque
;
2216 s
->max_size
= qemu_chr_can_read(chr
);
2220 static void fd_chr_read(void *opaque
)
2222 CharDriverState
*chr
= opaque
;
2223 FDCharDriver
*s
= chr
->opaque
;
2228 if (len
> s
->max_size
)
2232 size
= read(s
->fd_in
, buf
, len
);
2234 /* FD has been closed. Remove it from the active list. */
2235 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2239 qemu_chr_read(chr
, buf
, size
);
2243 static void fd_chr_update_read_handler(CharDriverState
*chr
)
2245 FDCharDriver
*s
= chr
->opaque
;
2247 if (s
->fd_in
>= 0) {
2248 if (nographic
&& s
->fd_in
== 0) {
2250 qemu_set_fd_handler2(s
->fd_in
, fd_chr_read_poll
,
2251 fd_chr_read
, NULL
, chr
);
2256 static void fd_chr_close(struct CharDriverState
*chr
)
2258 FDCharDriver
*s
= chr
->opaque
;
2260 if (s
->fd_in
>= 0) {
2261 if (nographic
&& s
->fd_in
== 0) {
2263 qemu_set_fd_handler2(s
->fd_in
, NULL
, NULL
, NULL
, NULL
);
2270 /* open a character device to a unix fd */
2271 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
2273 CharDriverState
*chr
;
2276 chr
= qemu_mallocz(sizeof(CharDriverState
));
2279 s
= qemu_mallocz(sizeof(FDCharDriver
));
2287 chr
->chr_write
= fd_chr_write
;
2288 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
2289 chr
->chr_close
= fd_chr_close
;
2291 qemu_chr_reset(chr
);
2296 static CharDriverState
*qemu_chr_open_file_out(const char *file_out
)
2300 TFR(fd_out
= open(file_out
, O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
, 0666));
2303 return qemu_chr_open_fd(-1, fd_out
);
2306 static CharDriverState
*qemu_chr_open_pipe(const char *filename
)
2309 char filename_in
[256], filename_out
[256];
2311 snprintf(filename_in
, 256, "%s.in", filename
);
2312 snprintf(filename_out
, 256, "%s.out", filename
);
2313 TFR(fd_in
= open(filename_in
, O_RDWR
| O_BINARY
));
2314 TFR(fd_out
= open(filename_out
, O_RDWR
| O_BINARY
));
2315 if (fd_in
< 0 || fd_out
< 0) {
2320 TFR(fd_in
= fd_out
= open(filename
, O_RDWR
| O_BINARY
));
2324 return qemu_chr_open_fd(fd_in
, fd_out
);
2328 /* for STDIO, we handle the case where several clients use it
2331 #define TERM_FIFO_MAX_SIZE 1
2333 static uint8_t term_fifo
[TERM_FIFO_MAX_SIZE
];
2334 static int term_fifo_size
;
2336 static int stdio_read_poll(void *opaque
)
2338 CharDriverState
*chr
= opaque
;
2340 /* try to flush the queue if needed */
2341 if (term_fifo_size
!= 0 && qemu_chr_can_read(chr
) > 0) {
2342 qemu_chr_read(chr
, term_fifo
, 1);
2345 /* see if we can absorb more chars */
2346 if (term_fifo_size
== 0)
2352 static void stdio_read(void *opaque
)
2356 CharDriverState
*chr
= opaque
;
2358 size
= read(0, buf
, 1);
2360 /* stdin has been closed. Remove it from the active list. */
2361 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2365 if (qemu_chr_can_read(chr
) > 0) {
2366 qemu_chr_read(chr
, buf
, 1);
2367 } else if (term_fifo_size
== 0) {
2368 term_fifo
[term_fifo_size
++] = buf
[0];
2373 /* init terminal so that we can grab keys */
2374 static struct termios oldtty
;
2375 static int old_fd0_flags
;
2376 static int term_atexit_done
;
2378 static void term_exit(void)
2380 tcsetattr (0, TCSANOW
, &oldtty
);
2381 fcntl(0, F_SETFL
, old_fd0_flags
);
2384 static void term_init(void)
2388 tcgetattr (0, &tty
);
2390 old_fd0_flags
= fcntl(0, F_GETFL
);
2392 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2393 |INLCR
|IGNCR
|ICRNL
|IXON
);
2394 tty
.c_oflag
|= OPOST
;
2395 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
2396 /* if graphical mode, we allow Ctrl-C handling */
2398 tty
.c_lflag
&= ~ISIG
;
2399 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
2402 tty
.c_cc
[VTIME
] = 0;
2404 tcsetattr (0, TCSANOW
, &tty
);
2406 if (!term_atexit_done
++)
2409 fcntl(0, F_SETFL
, O_NONBLOCK
);
2412 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
2416 qemu_set_fd_handler2(0, NULL
, NULL
, NULL
, NULL
);
2420 static CharDriverState
*qemu_chr_open_stdio(void)
2422 CharDriverState
*chr
;
2424 if (stdio_nb_clients
>= STDIO_MAX_CLIENTS
)
2426 chr
= qemu_chr_open_fd(0, 1);
2427 chr
->chr_close
= qemu_chr_close_stdio
;
2428 qemu_set_fd_handler2(0, stdio_read_poll
, stdio_read
, NULL
, chr
);
2436 /* Once Solaris has openpty(), this is going to be removed. */
2437 int openpty(int *amaster
, int *aslave
, char *name
,
2438 struct termios
*termp
, struct winsize
*winp
)
2441 int mfd
= -1, sfd
= -1;
2443 *amaster
= *aslave
= -1;
2445 mfd
= open("/dev/ptmx", O_RDWR
| O_NOCTTY
);
2449 if (grantpt(mfd
) == -1 || unlockpt(mfd
) == -1)
2452 if ((slave
= ptsname(mfd
)) == NULL
)
2455 if ((sfd
= open(slave
, O_RDONLY
| O_NOCTTY
)) == -1)
2458 if (ioctl(sfd
, I_PUSH
, "ptem") == -1 ||
2459 (termp
!= NULL
&& tcgetattr(sfd
, termp
) < 0))
2467 ioctl(sfd
, TIOCSWINSZ
, winp
);
2478 void cfmakeraw (struct termios
*termios_p
)
2480 termios_p
->c_iflag
&=
2481 ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
|INLCR
|IGNCR
|ICRNL
|IXON
);
2482 termios_p
->c_oflag
&= ~OPOST
;
2483 termios_p
->c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|ISIG
|IEXTEN
);
2484 termios_p
->c_cflag
&= ~(CSIZE
|PARENB
);
2485 termios_p
->c_cflag
|= CS8
;
2487 termios_p
->c_cc
[VMIN
] = 0;
2488 termios_p
->c_cc
[VTIME
] = 0;
2492 #if defined(__linux__) || defined(__sun__)
2502 static void pty_chr_update_read_handler(CharDriverState
*chr
);
2503 static void pty_chr_state(CharDriverState
*chr
, int connected
);
2505 static int pty_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2507 PtyCharDriver
*s
= chr
->opaque
;
2509 if (!s
->connected
) {
2510 /* guest sends data, check for (re-)connect */
2511 pty_chr_update_read_handler(chr
);
2514 return unix_write(s
->fd
, buf
, len
);
2517 static int pty_chr_read_poll(void *opaque
)
2519 CharDriverState
*chr
= opaque
;
2520 PtyCharDriver
*s
= chr
->opaque
;
2522 s
->read_bytes
= qemu_chr_can_read(chr
);
2523 return s
->read_bytes
;
2526 static void pty_chr_read(void *opaque
)
2528 CharDriverState
*chr
= opaque
;
2529 PtyCharDriver
*s
= chr
->opaque
;
2534 if (len
> s
->read_bytes
)
2535 len
= s
->read_bytes
;
2538 size
= read(s
->fd
, buf
, len
);
2539 if ((size
== -1 && errno
== EIO
) ||
2541 pty_chr_state(chr
, 0);
2545 pty_chr_state(chr
, 1);
2546 qemu_chr_read(chr
, buf
, size
);
2550 static void pty_chr_update_read_handler(CharDriverState
*chr
)
2552 PtyCharDriver
*s
= chr
->opaque
;
2554 qemu_set_fd_handler2(s
->fd
, pty_chr_read_poll
,
2555 pty_chr_read
, NULL
, chr
);
2558 * Short timeout here: just need wait long enougth that qemu makes
2559 * it through the poll loop once. When reconnected we want a
2560 * short timeout so we notice it almost instantly. Otherwise
2561 * read() gives us -EIO instantly, making pty_chr_state() reset the
2562 * timeout to the normal (much longer) poll interval before the
2565 qemu_mod_timer(s
->timer
, qemu_get_clock(rt_clock
) + 10);
2568 static void pty_chr_state(CharDriverState
*chr
, int connected
)
2570 PtyCharDriver
*s
= chr
->opaque
;
2573 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2576 /* (re-)connect poll interval for idle guests: once per second.
2577 * We check more frequently in case the guests sends data to
2578 * the virtual device linked to our pty. */
2579 qemu_mod_timer(s
->timer
, qemu_get_clock(rt_clock
) + 1000);
2582 qemu_chr_reset(chr
);
2587 void pty_chr_timer(void *opaque
)
2589 struct CharDriverState
*chr
= opaque
;
2590 PtyCharDriver
*s
= chr
->opaque
;
2595 /* If we arrive here without polling being cleared due
2596 * read returning -EIO, then we are (re-)connected */
2597 pty_chr_state(chr
, 1);
2602 pty_chr_update_read_handler(chr
);
2605 static void pty_chr_close(struct CharDriverState
*chr
)
2607 PtyCharDriver
*s
= chr
->opaque
;
2609 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2614 static CharDriverState
*qemu_chr_open_pty(void)
2616 CharDriverState
*chr
;
2621 chr
= qemu_mallocz(sizeof(CharDriverState
));
2624 s
= qemu_mallocz(sizeof(PtyCharDriver
));
2630 if (openpty(&s
->fd
, &slave_fd
, NULL
, NULL
, NULL
) < 0) {
2634 /* Set raw attributes on the pty. */
2636 tcsetattr(slave_fd
, TCSAFLUSH
, &tty
);
2639 fprintf(stderr
, "char device redirected to %s\n", ptsname(s
->fd
));
2642 chr
->chr_write
= pty_chr_write
;
2643 chr
->chr_update_read_handler
= pty_chr_update_read_handler
;
2644 chr
->chr_close
= pty_chr_close
;
2646 s
->timer
= qemu_new_timer(rt_clock
, pty_chr_timer
, chr
);
2651 static void tty_serial_init(int fd
, int speed
,
2652 int parity
, int data_bits
, int stop_bits
)
2658 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
2659 speed
, parity
, data_bits
, stop_bits
);
2661 tcgetattr (fd
, &tty
);
2664 if (speed
<= 50 * MARGIN
)
2666 else if (speed
<= 75 * MARGIN
)
2668 else if (speed
<= 300 * MARGIN
)
2670 else if (speed
<= 600 * MARGIN
)
2672 else if (speed
<= 1200 * MARGIN
)
2674 else if (speed
<= 2400 * MARGIN
)
2676 else if (speed
<= 4800 * MARGIN
)
2678 else if (speed
<= 9600 * MARGIN
)
2680 else if (speed
<= 19200 * MARGIN
)
2682 else if (speed
<= 38400 * MARGIN
)
2684 else if (speed
<= 57600 * MARGIN
)
2686 else if (speed
<= 115200 * MARGIN
)
2691 cfsetispeed(&tty
, spd
);
2692 cfsetospeed(&tty
, spd
);
2694 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
2695 |INLCR
|IGNCR
|ICRNL
|IXON
);
2696 tty
.c_oflag
|= OPOST
;
2697 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
2698 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
2719 tty
.c_cflag
|= PARENB
;
2722 tty
.c_cflag
|= PARENB
| PARODD
;
2726 tty
.c_cflag
|= CSTOPB
;
2728 tcsetattr (fd
, TCSANOW
, &tty
);
2731 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2733 FDCharDriver
*s
= chr
->opaque
;
2736 case CHR_IOCTL_SERIAL_SET_PARAMS
:
2738 QEMUSerialSetParams
*ssp
= arg
;
2739 tty_serial_init(s
->fd_in
, ssp
->speed
, ssp
->parity
,
2740 ssp
->data_bits
, ssp
->stop_bits
);
2743 case CHR_IOCTL_SERIAL_SET_BREAK
:
2745 int enable
= *(int *)arg
;
2747 tcsendbreak(s
->fd_in
, 1);
2750 case CHR_IOCTL_SERIAL_GET_TIOCM
:
2753 int *targ
= (int *)arg
;
2754 ioctl(s
->fd_in
, TIOCMGET
, &sarg
);
2756 if (sarg
| TIOCM_CTS
)
2757 *targ
|= CHR_TIOCM_CTS
;
2758 if (sarg
| TIOCM_CAR
)
2759 *targ
|= CHR_TIOCM_CAR
;
2760 if (sarg
| TIOCM_DSR
)
2761 *targ
|= CHR_TIOCM_DSR
;
2762 if (sarg
| TIOCM_RI
)
2763 *targ
|= CHR_TIOCM_RI
;
2764 if (sarg
| TIOCM_DTR
)
2765 *targ
|= CHR_TIOCM_DTR
;
2766 if (sarg
| TIOCM_RTS
)
2767 *targ
|= CHR_TIOCM_RTS
;
2770 case CHR_IOCTL_SERIAL_SET_TIOCM
:
2772 int sarg
= *(int *)arg
;
2774 if (sarg
| CHR_TIOCM_DTR
)
2776 if (sarg
| CHR_TIOCM_RTS
)
2778 ioctl(s
->fd_in
, TIOCMSET
, &targ
);
2787 static CharDriverState
*qemu_chr_open_tty(const char *filename
)
2789 CharDriverState
*chr
;
2792 TFR(fd
= open(filename
, O_RDWR
| O_NONBLOCK
));
2793 tty_serial_init(fd
, 115200, 'N', 8, 1);
2794 chr
= qemu_chr_open_fd(fd
, fd
);
2799 chr
->chr_ioctl
= tty_serial_ioctl
;
2800 qemu_chr_reset(chr
);
2803 #else /* ! __linux__ && ! __sun__ */
2804 static CharDriverState
*qemu_chr_open_pty(void)
2808 #endif /* __linux__ || __sun__ */
2810 #if defined(__linux__)
2814 } ParallelCharDriver
;
2816 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
2818 if (s
->mode
!= mode
) {
2820 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
2827 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
2829 ParallelCharDriver
*drv
= chr
->opaque
;
2834 case CHR_IOCTL_PP_READ_DATA
:
2835 if (ioctl(fd
, PPRDATA
, &b
) < 0)
2837 *(uint8_t *)arg
= b
;
2839 case CHR_IOCTL_PP_WRITE_DATA
:
2840 b
= *(uint8_t *)arg
;
2841 if (ioctl(fd
, PPWDATA
, &b
) < 0)
2844 case CHR_IOCTL_PP_READ_CONTROL
:
2845 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
2847 /* Linux gives only the lowest bits, and no way to know data
2848 direction! For better compatibility set the fixed upper
2850 *(uint8_t *)arg
= b
| 0xc0;
2852 case CHR_IOCTL_PP_WRITE_CONTROL
:
2853 b
= *(uint8_t *)arg
;
2854 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
2857 case CHR_IOCTL_PP_READ_STATUS
:
2858 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
2860 *(uint8_t *)arg
= b
;
2862 case CHR_IOCTL_PP_EPP_READ_ADDR
:
2863 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2864 struct ParallelIOArg
*parg
= arg
;
2865 int n
= read(fd
, parg
->buffer
, parg
->count
);
2866 if (n
!= parg
->count
) {
2871 case CHR_IOCTL_PP_EPP_READ
:
2872 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2873 struct ParallelIOArg
*parg
= arg
;
2874 int n
= read(fd
, parg
->buffer
, parg
->count
);
2875 if (n
!= parg
->count
) {
2880 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
2881 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
2882 struct ParallelIOArg
*parg
= arg
;
2883 int n
= write(fd
, parg
->buffer
, parg
->count
);
2884 if (n
!= parg
->count
) {
2889 case CHR_IOCTL_PP_EPP_WRITE
:
2890 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
2891 struct ParallelIOArg
*parg
= arg
;
2892 int n
= write(fd
, parg
->buffer
, parg
->count
);
2893 if (n
!= parg
->count
) {
2904 static void pp_close(CharDriverState
*chr
)
2906 ParallelCharDriver
*drv
= chr
->opaque
;
2909 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
2910 ioctl(fd
, PPRELEASE
);
2915 static CharDriverState
*qemu_chr_open_pp(const char *filename
)
2917 CharDriverState
*chr
;
2918 ParallelCharDriver
*drv
;
2921 TFR(fd
= open(filename
, O_RDWR
));
2925 if (ioctl(fd
, PPCLAIM
) < 0) {
2930 drv
= qemu_mallocz(sizeof(ParallelCharDriver
));
2936 drv
->mode
= IEEE1284_MODE_COMPAT
;
2938 chr
= qemu_mallocz(sizeof(CharDriverState
));
2944 chr
->chr_write
= null_chr_write
;
2945 chr
->chr_ioctl
= pp_ioctl
;
2946 chr
->chr_close
= pp_close
;
2949 qemu_chr_reset(chr
);
2953 #endif /* __linux__ */
2959 HANDLE hcom
, hrecv
, hsend
;
2960 OVERLAPPED orecv
, osend
;
2965 #define NSENDBUF 2048
2966 #define NRECVBUF 2048
2967 #define MAXCONNECT 1
2968 #define NTIMEOUT 5000
2970 static int win_chr_poll(void *opaque
);
2971 static int win_chr_pipe_poll(void *opaque
);
2973 static void win_chr_close(CharDriverState
*chr
)
2975 WinCharState
*s
= chr
->opaque
;
2978 CloseHandle(s
->hsend
);
2982 CloseHandle(s
->hrecv
);
2986 CloseHandle(s
->hcom
);
2990 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
2992 qemu_del_polling_cb(win_chr_poll
, chr
);
2995 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
2997 WinCharState
*s
= chr
->opaque
;
2999 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
3004 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3006 fprintf(stderr
, "Failed CreateEvent\n");
3009 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3011 fprintf(stderr
, "Failed CreateEvent\n");
3015 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
3016 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
3017 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
3018 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
3023 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
3024 fprintf(stderr
, "Failed SetupComm\n");
3028 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
3029 size
= sizeof(COMMCONFIG
);
3030 GetDefaultCommConfig(filename
, &comcfg
, &size
);
3031 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
3032 CommConfigDialog(filename
, NULL
, &comcfg
);
3034 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
3035 fprintf(stderr
, "Failed SetCommState\n");
3039 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
3040 fprintf(stderr
, "Failed SetCommMask\n");
3044 cto
.ReadIntervalTimeout
= MAXDWORD
;
3045 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
3046 fprintf(stderr
, "Failed SetCommTimeouts\n");
3050 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
3051 fprintf(stderr
, "Failed ClearCommError\n");
3054 qemu_add_polling_cb(win_chr_poll
, chr
);
3062 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
3064 WinCharState
*s
= chr
->opaque
;
3065 DWORD len
, ret
, size
, err
;
3068 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
3069 s
->osend
.hEvent
= s
->hsend
;
3072 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
3074 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
3076 err
= GetLastError();
3077 if (err
== ERROR_IO_PENDING
) {
3078 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
3096 static int win_chr_read_poll(CharDriverState
*chr
)
3098 WinCharState
*s
= chr
->opaque
;
3100 s
->max_size
= qemu_chr_can_read(chr
);
3104 static void win_chr_readfile(CharDriverState
*chr
)
3106 WinCharState
*s
= chr
->opaque
;
3111 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
3112 s
->orecv
.hEvent
= s
->hrecv
;
3113 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
3115 err
= GetLastError();
3116 if (err
== ERROR_IO_PENDING
) {
3117 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
3122 qemu_chr_read(chr
, buf
, size
);
3126 static void win_chr_read(CharDriverState
*chr
)
3128 WinCharState
*s
= chr
->opaque
;
3130 if (s
->len
> s
->max_size
)
3131 s
->len
= s
->max_size
;
3135 win_chr_readfile(chr
);
3138 static int win_chr_poll(void *opaque
)
3140 CharDriverState
*chr
= opaque
;
3141 WinCharState
*s
= chr
->opaque
;
3145 ClearCommError(s
->hcom
, &comerr
, &status
);
3146 if (status
.cbInQue
> 0) {
3147 s
->len
= status
.cbInQue
;
3148 win_chr_read_poll(chr
);
3155 static CharDriverState
*qemu_chr_open_win(const char *filename
)
3157 CharDriverState
*chr
;
3160 chr
= qemu_mallocz(sizeof(CharDriverState
));
3163 s
= qemu_mallocz(sizeof(WinCharState
));
3169 chr
->chr_write
= win_chr_write
;
3170 chr
->chr_close
= win_chr_close
;
3172 if (win_chr_init(chr
, filename
) < 0) {
3177 qemu_chr_reset(chr
);
3181 static int win_chr_pipe_poll(void *opaque
)
3183 CharDriverState
*chr
= opaque
;
3184 WinCharState
*s
= chr
->opaque
;
3187 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
3190 win_chr_read_poll(chr
);
3197 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
3199 WinCharState
*s
= chr
->opaque
;
3207 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3209 fprintf(stderr
, "Failed CreateEvent\n");
3212 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3214 fprintf(stderr
, "Failed CreateEvent\n");
3218 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
3219 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
3220 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
3222 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
3223 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
3224 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
3229 ZeroMemory(&ov
, sizeof(ov
));
3230 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
3231 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
3233 fprintf(stderr
, "Failed ConnectNamedPipe\n");
3237 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
3239 fprintf(stderr
, "Failed GetOverlappedResult\n");
3241 CloseHandle(ov
.hEvent
);
3248 CloseHandle(ov
.hEvent
);
3251 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
3260 static CharDriverState
*qemu_chr_open_win_pipe(const char *filename
)
3262 CharDriverState
*chr
;
3265 chr
= qemu_mallocz(sizeof(CharDriverState
));
3268 s
= qemu_mallocz(sizeof(WinCharState
));
3274 chr
->chr_write
= win_chr_write
;
3275 chr
->chr_close
= win_chr_close
;
3277 if (win_chr_pipe_init(chr
, filename
) < 0) {
3282 qemu_chr_reset(chr
);
3286 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
3288 CharDriverState
*chr
;
3291 chr
= qemu_mallocz(sizeof(CharDriverState
));
3294 s
= qemu_mallocz(sizeof(WinCharState
));
3301 chr
->chr_write
= win_chr_write
;
3302 qemu_chr_reset(chr
);
3306 static CharDriverState
*qemu_chr_open_win_con(const char *filename
)
3308 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
3311 static CharDriverState
*qemu_chr_open_win_file_out(const char *file_out
)
3315 fd_out
= CreateFile(file_out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3316 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3317 if (fd_out
== INVALID_HANDLE_VALUE
)
3320 return qemu_chr_open_win_file(fd_out
);
3322 #endif /* !_WIN32 */
3324 /***********************************************************/
3325 /* UDP Net console */
3329 struct sockaddr_in daddr
;
3336 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3338 NetCharDriver
*s
= chr
->opaque
;
3340 return sendto(s
->fd
, buf
, len
, 0,
3341 (struct sockaddr
*)&s
->daddr
, sizeof(struct sockaddr_in
));
3344 static int udp_chr_read_poll(void *opaque
)
3346 CharDriverState
*chr
= opaque
;
3347 NetCharDriver
*s
= chr
->opaque
;
3349 s
->max_size
= qemu_chr_can_read(chr
);
3351 /* If there were any stray characters in the queue process them
3354 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3355 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3357 s
->max_size
= qemu_chr_can_read(chr
);
3362 static void udp_chr_read(void *opaque
)
3364 CharDriverState
*chr
= opaque
;
3365 NetCharDriver
*s
= chr
->opaque
;
3367 if (s
->max_size
== 0)
3369 s
->bufcnt
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
3370 s
->bufptr
= s
->bufcnt
;
3375 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
3376 qemu_chr_read(chr
, &s
->buf
[s
->bufptr
], 1);
3378 s
->max_size
= qemu_chr_can_read(chr
);
3382 static void udp_chr_update_read_handler(CharDriverState
*chr
)
3384 NetCharDriver
*s
= chr
->opaque
;
3387 qemu_set_fd_handler2(s
->fd
, udp_chr_read_poll
,
3388 udp_chr_read
, NULL
, chr
);
3393 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
);
3395 int parse_host_src_port(struct sockaddr_in
*haddr
,
3396 struct sockaddr_in
*saddr
,
3399 static CharDriverState
*qemu_chr_open_udp(const char *def
)
3401 CharDriverState
*chr
= NULL
;
3402 NetCharDriver
*s
= NULL
;
3404 struct sockaddr_in saddr
;
3406 chr
= qemu_mallocz(sizeof(CharDriverState
));
3409 s
= qemu_mallocz(sizeof(NetCharDriver
));
3413 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
3415 perror("socket(PF_INET, SOCK_DGRAM)");
3419 if (parse_host_src_port(&s
->daddr
, &saddr
, def
) < 0) {
3420 printf("Could not parse: %s\n", def
);
3424 if (bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
)) < 0)
3434 chr
->chr_write
= udp_chr_write
;
3435 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
3448 /***********************************************************/
3449 /* TCP Net console */
3460 static void tcp_chr_accept(void *opaque
);
3462 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3464 TCPCharDriver
*s
= chr
->opaque
;
3466 return send_all(s
->fd
, buf
, len
);
3468 /* XXX: indicate an error ? */
3473 static int tcp_chr_read_poll(void *opaque
)
3475 CharDriverState
*chr
= opaque
;
3476 TCPCharDriver
*s
= chr
->opaque
;
3479 s
->max_size
= qemu_chr_can_read(chr
);
3484 #define IAC_BREAK 243
3485 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
3487 uint8_t *buf
, int *size
)
3489 /* Handle any telnet client's basic IAC options to satisfy char by
3490 * char mode with no echo. All IAC options will be removed from
3491 * the buf and the do_telnetopt variable will be used to track the
3492 * state of the width of the IAC information.
3494 * IAC commands come in sets of 3 bytes with the exception of the
3495 * "IAC BREAK" command and the double IAC.
3501 for (i
= 0; i
< *size
; i
++) {
3502 if (s
->do_telnetopt
> 1) {
3503 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
3504 /* Double IAC means send an IAC */
3508 s
->do_telnetopt
= 1;
3510 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
3511 /* Handle IAC break commands by sending a serial break */
3512 qemu_chr_event(chr
, CHR_EVENT_BREAK
);
3517 if (s
->do_telnetopt
>= 4) {
3518 s
->do_telnetopt
= 1;
3521 if ((unsigned char)buf
[i
] == IAC
) {
3522 s
->do_telnetopt
= 2;
3533 static void tcp_chr_read(void *opaque
)
3535 CharDriverState
*chr
= opaque
;
3536 TCPCharDriver
*s
= chr
->opaque
;
3540 if (!s
->connected
|| s
->max_size
<= 0)
3543 if (len
> s
->max_size
)
3545 size
= recv(s
->fd
, buf
, len
, 0);
3547 /* connection closed */
3549 if (s
->listen_fd
>= 0) {
3550 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3552 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
3555 } else if (size
> 0) {
3556 if (s
->do_telnetopt
)
3557 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
3559 qemu_chr_read(chr
, buf
, size
);
3563 static void tcp_chr_connect(void *opaque
)
3565 CharDriverState
*chr
= opaque
;
3566 TCPCharDriver
*s
= chr
->opaque
;
3569 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
3570 tcp_chr_read
, NULL
, chr
);
3571 qemu_chr_reset(chr
);
3574 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
3575 static void tcp_chr_telnet_init(int fd
)
3578 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
3579 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3580 send(fd
, (char *)buf
, 3, 0);
3581 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3582 send(fd
, (char *)buf
, 3, 0);
3583 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3584 send(fd
, (char *)buf
, 3, 0);
3585 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3586 send(fd
, (char *)buf
, 3, 0);
3589 static void socket_set_nodelay(int fd
)
3592 setsockopt(fd
, IPPROTO_TCP
, TCP_NODELAY
, (char *)&val
, sizeof(val
));
3595 static void tcp_chr_accept(void *opaque
)
3597 CharDriverState
*chr
= opaque
;
3598 TCPCharDriver
*s
= chr
->opaque
;
3599 struct sockaddr_in saddr
;
3601 struct sockaddr_un uaddr
;
3603 struct sockaddr
*addr
;
3610 len
= sizeof(uaddr
);
3611 addr
= (struct sockaddr
*)&uaddr
;
3615 len
= sizeof(saddr
);
3616 addr
= (struct sockaddr
*)&saddr
;
3618 fd
= accept(s
->listen_fd
, addr
, &len
);
3619 if (fd
< 0 && errno
!= EINTR
) {
3621 } else if (fd
>= 0) {
3622 if (s
->do_telnetopt
)
3623 tcp_chr_telnet_init(fd
);
3627 socket_set_nonblock(fd
);
3629 socket_set_nodelay(fd
);
3631 qemu_set_fd_handler(s
->listen_fd
, NULL
, NULL
, NULL
);
3632 tcp_chr_connect(chr
);
3635 static void tcp_chr_close(CharDriverState
*chr
)
3637 TCPCharDriver
*s
= chr
->opaque
;
3640 if (s
->listen_fd
>= 0)
3641 closesocket(s
->listen_fd
);
3645 static CharDriverState
*qemu_chr_open_tcp(const char *host_str
,
3649 CharDriverState
*chr
= NULL
;
3650 TCPCharDriver
*s
= NULL
;
3651 int fd
= -1, ret
, err
, val
;
3653 int is_waitconnect
= 1;
3656 struct sockaddr_in saddr
;
3658 struct sockaddr_un uaddr
;
3660 struct sockaddr
*addr
;
3665 addr
= (struct sockaddr
*)&uaddr
;
3666 addrlen
= sizeof(uaddr
);
3667 if (parse_unix_path(&uaddr
, host_str
) < 0)
3672 addr
= (struct sockaddr
*)&saddr
;
3673 addrlen
= sizeof(saddr
);
3674 if (parse_host_port(&saddr
, host_str
) < 0)
3679 while((ptr
= strchr(ptr
,','))) {
3681 if (!strncmp(ptr
,"server",6)) {
3683 } else if (!strncmp(ptr
,"nowait",6)) {
3685 } else if (!strncmp(ptr
,"nodelay",6)) {
3688 printf("Unknown option: %s\n", ptr
);
3695 chr
= qemu_mallocz(sizeof(CharDriverState
));
3698 s
= qemu_mallocz(sizeof(TCPCharDriver
));
3704 fd
= socket(PF_UNIX
, SOCK_STREAM
, 0);
3707 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
3712 if (!is_waitconnect
)
3713 socket_set_nonblock(fd
);
3718 s
->is_unix
= is_unix
;
3719 s
->do_nodelay
= do_nodelay
&& !is_unix
;
3722 chr
->chr_write
= tcp_chr_write
;
3723 chr
->chr_close
= tcp_chr_close
;
3726 /* allow fast reuse */
3730 pstrcpy(path
, sizeof(path
), uaddr
.sun_path
);
3736 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
3739 ret
= bind(fd
, addr
, addrlen
);
3743 ret
= listen(fd
, 0);
3748 qemu_set_fd_handler(s
->listen_fd
, tcp_chr_accept
, NULL
, chr
);
3750 s
->do_telnetopt
= 1;
3753 ret
= connect(fd
, addr
, addrlen
);
3755 err
= socket_error();
3756 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
3757 } else if (err
== EINPROGRESS
) {
3760 } else if (err
== WSAEALREADY
) {
3772 socket_set_nodelay(fd
);
3774 tcp_chr_connect(chr
);
3776 qemu_set_fd_handler(s
->fd
, NULL
, tcp_chr_connect
, chr
);
3779 if (is_listen
&& is_waitconnect
) {
3780 printf("QEMU waiting for connection on: %s\n", host_str
);
3781 tcp_chr_accept(chr
);
3782 socket_set_nonblock(s
->listen_fd
);
3794 CharDriverState
*qemu_chr_open(const char *filename
)
3798 if (!strcmp(filename
, "vc")) {
3799 return text_console_init(&display_state
, 0);
3800 } else if (strstart(filename
, "vc:", &p
)) {
3801 return text_console_init(&display_state
, p
);
3802 } else if (!strcmp(filename
, "null")) {
3803 return qemu_chr_open_null();
3805 if (strstart(filename
, "tcp:", &p
)) {
3806 return qemu_chr_open_tcp(p
, 0, 0);
3808 if (strstart(filename
, "telnet:", &p
)) {
3809 return qemu_chr_open_tcp(p
, 1, 0);
3811 if (strstart(filename
, "udp:", &p
)) {
3812 return qemu_chr_open_udp(p
);
3814 if (strstart(filename
, "mon:", &p
)) {
3815 CharDriverState
*drv
= qemu_chr_open(p
);
3817 drv
= qemu_chr_open_mux(drv
);
3818 monitor_init(drv
, !nographic
);
3821 printf("Unable to open driver: %s\n", p
);
3825 if (strstart(filename
, "unix:", &p
)) {
3826 return qemu_chr_open_tcp(p
, 0, 1);
3827 } else if (strstart(filename
, "file:", &p
)) {
3828 return qemu_chr_open_file_out(p
);
3829 } else if (strstart(filename
, "pipe:", &p
)) {
3830 return qemu_chr_open_pipe(p
);
3831 } else if (!strcmp(filename
, "pty")) {
3832 return qemu_chr_open_pty();
3833 } else if (!strcmp(filename
, "stdio")) {
3834 return qemu_chr_open_stdio();
3836 #if defined(__linux__)
3837 if (strstart(filename
, "/dev/parport", NULL
)) {
3838 return qemu_chr_open_pp(filename
);
3841 #if defined(__linux__) || defined(__sun__)
3842 if (strstart(filename
, "/dev/", NULL
)) {
3843 return qemu_chr_open_tty(filename
);
3847 if (strstart(filename
, "COM", NULL
)) {
3848 return qemu_chr_open_win(filename
);
3850 if (strstart(filename
, "pipe:", &p
)) {
3851 return qemu_chr_open_win_pipe(p
);
3853 if (strstart(filename
, "con:", NULL
)) {
3854 return qemu_chr_open_win_con(filename
);
3856 if (strstart(filename
, "file:", &p
)) {
3857 return qemu_chr_open_win_file_out(p
);
3860 #ifdef CONFIG_BRLAPI
3861 if (!strcmp(filename
, "braille")) {
3862 return chr_baum_init();
3870 void qemu_chr_close(CharDriverState
*chr
)
3873 chr
->chr_close(chr
);
3877 /***********************************************************/
3878 /* network device redirectors */
3880 __attribute__ (( unused
))
3881 static void hex_dump(FILE *f
, const uint8_t *buf
, int size
)
3885 for(i
=0;i
<size
;i
+=16) {
3889 fprintf(f
, "%08x ", i
);
3892 fprintf(f
, " %02x", buf
[i
+j
]);
3897 for(j
=0;j
<len
;j
++) {
3899 if (c
< ' ' || c
> '~')
3901 fprintf(f
, "%c", c
);
3907 static int parse_macaddr(uint8_t *macaddr
, const char *p
)
3914 offset
= strtol(p
, &last_char
, 0);
3915 if (0 == errno
&& '\0' == *last_char
&&
3916 offset
>= 0 && offset
<= 0xFFFFFF) {
3917 macaddr
[3] = (offset
& 0xFF0000) >> 16;
3918 macaddr
[4] = (offset
& 0xFF00) >> 8;
3919 macaddr
[5] = offset
& 0xFF;
3922 for(i
= 0; i
< 6; i
++) {
3923 macaddr
[i
] = strtol(p
, (char **)&p
, 16);
3928 if (*p
!= ':' && *p
!= '-')
3939 static int get_str_sep(char *buf
, int buf_size
, const char **pp
, int sep
)
3944 p1
= strchr(p
, sep
);
3950 if (len
> buf_size
- 1)
3952 memcpy(buf
, p
, len
);
3959 int parse_host_src_port(struct sockaddr_in
*haddr
,
3960 struct sockaddr_in
*saddr
,
3961 const char *input_str
)
3963 char *str
= strdup(input_str
);
3964 char *host_str
= str
;
3969 * Chop off any extra arguments at the end of the string which
3970 * would start with a comma, then fill in the src port information
3971 * if it was provided else use the "any address" and "any port".
3973 if ((ptr
= strchr(str
,',')))
3976 if ((src_str
= strchr(input_str
,'@'))) {
3981 if (parse_host_port(haddr
, host_str
) < 0)
3984 if (!src_str
|| *src_str
== '\0')
3987 if (parse_host_port(saddr
, src_str
) < 0)
3998 int parse_host_port(struct sockaddr_in
*saddr
, const char *str
)
4006 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4008 saddr
->sin_family
= AF_INET
;
4009 if (buf
[0] == '\0') {
4010 saddr
->sin_addr
.s_addr
= 0;
4012 if (isdigit(buf
[0])) {
4013 if (!inet_aton(buf
, &saddr
->sin_addr
))
4016 if ((he
= gethostbyname(buf
)) == NULL
)
4018 saddr
->sin_addr
= *(struct in_addr
*)he
->h_addr
;
4021 port
= strtol(p
, (char **)&r
, 0);
4024 saddr
->sin_port
= htons(port
);
4029 static int parse_unix_path(struct sockaddr_un
*uaddr
, const char *str
)
4034 len
= MIN(108, strlen(str
));
4035 p
= strchr(str
, ',');
4037 len
= MIN(len
, p
- str
);
4039 memset(uaddr
, 0, sizeof(*uaddr
));
4041 uaddr
->sun_family
= AF_UNIX
;
4042 memcpy(uaddr
->sun_path
, str
, len
);
4048 /* find or alloc a new VLAN */
4049 VLANState
*qemu_find_vlan(int id
)
4051 VLANState
**pvlan
, *vlan
;
4052 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
4056 vlan
= qemu_mallocz(sizeof(VLANState
));
4061 pvlan
= &first_vlan
;
4062 while (*pvlan
!= NULL
)
4063 pvlan
= &(*pvlan
)->next
;
4068 VLANClientState
*qemu_new_vlan_client(VLANState
*vlan
,
4069 IOReadHandler
*fd_read
,
4070 IOCanRWHandler
*fd_can_read
,
4073 VLANClientState
*vc
, **pvc
;
4074 vc
= qemu_mallocz(sizeof(VLANClientState
));
4077 vc
->fd_read
= fd_read
;
4078 vc
->fd_can_read
= fd_can_read
;
4079 vc
->opaque
= opaque
;
4083 pvc
= &vlan
->first_client
;
4084 while (*pvc
!= NULL
)
4085 pvc
= &(*pvc
)->next
;
4090 void qemu_del_vlan_client(VLANClientState
*vc
)
4092 VLANClientState
**pvc
= &vc
->vlan
->first_client
;
4094 while (*pvc
!= NULL
)
4100 pvc
= &(*pvc
)->next
;
4103 int qemu_can_send_packet(VLANClientState
*vc1
)
4105 VLANState
*vlan
= vc1
->vlan
;
4106 VLANClientState
*vc
;
4108 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4110 if (vc
->fd_can_read
&& vc
->fd_can_read(vc
->opaque
))
4117 int qemu_send_packet(VLANClientState
*vc1
, const uint8_t *buf
, int size
)
4119 VLANState
*vlan
= vc1
->vlan
;
4120 VLANClientState
*vc
;
4124 printf("vlan %d send:\n", vlan
->id
);
4125 hex_dump(stdout
, buf
, size
);
4127 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4129 if (!vc
->fd_can_read
|| vc
->fd_can_read(vc
->opaque
)) {
4130 vc
->fd_read(vc
->opaque
, buf
, size
);
4139 static ssize_t
vc_sendv_compat(VLANClientState
*vc
, const struct iovec
*iov
,
4146 for (i
= 0; i
< iovcnt
; i
++) {
4149 len
= MIN(sizeof(buffer
) - offset
, iov
[i
].iov_len
);
4150 memcpy(buffer
+ offset
, iov
[i
].iov_base
, len
);
4154 vc
->fd_read(vc
->opaque
, buffer
, offset
);
4159 ssize_t
qemu_sendv_packet(VLANClientState
*vc1
, const struct iovec
*iov
,
4162 VLANState
*vlan
= vc1
->vlan
;
4163 VLANClientState
*vc
;
4164 ssize_t max_len
= 0;
4166 for (vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
4173 len
= vc
->fd_readv(vc
->opaque
, iov
, iovcnt
);
4174 else if (vc
->fd_read
)
4175 len
= vc_sendv_compat(vc
, iov
, iovcnt
);
4177 max_len
= MAX(max_len
, len
);
4183 #if defined(CONFIG_SLIRP)
4185 /* slirp network adapter */
4187 static int slirp_inited
;
4188 static VLANClientState
*slirp_vc
;
4190 int slirp_can_output(void)
4192 return !slirp_vc
|| qemu_can_send_packet(slirp_vc
);
4195 void slirp_output(const uint8_t *pkt
, int pkt_len
)
4198 printf("slirp output:\n");
4199 hex_dump(stdout
, pkt
, pkt_len
);
4203 qemu_send_packet(slirp_vc
, pkt
, pkt_len
);
4206 static void slirp_receive(void *opaque
, const uint8_t *buf
, int size
)
4209 printf("slirp input:\n");
4210 hex_dump(stdout
, buf
, size
);
4212 slirp_input(buf
, size
);
4215 static int net_slirp_init(VLANState
*vlan
)
4217 if (!slirp_inited
) {
4221 slirp_vc
= qemu_new_vlan_client(vlan
,
4222 slirp_receive
, NULL
, NULL
);
4223 snprintf(slirp_vc
->info_str
, sizeof(slirp_vc
->info_str
), "user redirector");
4227 static void net_slirp_redir(const char *redir_str
)
4232 struct in_addr guest_addr
;
4233 int host_port
, guest_port
;
4235 if (!slirp_inited
) {
4241 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4243 if (!strcmp(buf
, "tcp")) {
4245 } else if (!strcmp(buf
, "udp")) {
4251 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4253 host_port
= strtol(buf
, &r
, 0);
4257 if (get_str_sep(buf
, sizeof(buf
), &p
, ':') < 0)
4259 if (buf
[0] == '\0') {
4260 pstrcpy(buf
, sizeof(buf
), "10.0.2.15");
4262 if (!inet_aton(buf
, &guest_addr
))
4265 guest_port
= strtol(p
, &r
, 0);
4269 if (slirp_redir(is_udp
, host_port
, guest_addr
, guest_port
) < 0) {
4270 fprintf(stderr
, "qemu: could not set up redirection\n");
4275 fprintf(stderr
, "qemu: syntax: -redir [tcp|udp]:host-port:[guest-host]:guest-port\n");
4283 static void erase_dir(char *dir_name
)
4287 char filename
[1024];
4289 /* erase all the files in the directory */
4290 if ((d
= opendir(dir_name
)) != 0) {
4295 if (strcmp(de
->d_name
, ".") != 0 &&
4296 strcmp(de
->d_name
, "..") != 0) {
4297 snprintf(filename
, sizeof(filename
), "%s/%s",
4298 smb_dir
, de
->d_name
);
4299 if (unlink(filename
) != 0) /* is it a directory? */
4300 erase_dir(filename
);
4308 /* automatic user mode samba server configuration */
4309 static void smb_exit(void)
4314 /* automatic user mode samba server configuration */
4315 static void net_slirp_smb(const char *exported_dir
)
4317 char smb_conf
[1024];
4318 char smb_cmdline
[1024];
4321 if (!slirp_inited
) {
4326 /* XXX: better tmp dir construction */
4327 snprintf(smb_dir
, sizeof(smb_dir
), "/tmp/qemu-smb.%d", getpid());
4328 if (mkdir(smb_dir
, 0700) < 0) {
4329 fprintf(stderr
, "qemu: could not create samba server dir '%s'\n", smb_dir
);
4332 snprintf(smb_conf
, sizeof(smb_conf
), "%s/%s", smb_dir
, "smb.conf");
4334 f
= fopen(smb_conf
, "w");
4336 fprintf(stderr
, "qemu: could not create samba server configuration file '%s'\n", smb_conf
);
4343 "socket address=127.0.0.1\n"
4344 "pid directory=%s\n"
4345 "lock directory=%s\n"
4346 "log file=%s/log.smbd\n"
4347 "smb passwd file=%s/smbpasswd\n"
4348 "security = share\n"
4363 snprintf(smb_cmdline
, sizeof(smb_cmdline
), "%s -s %s",
4364 SMBD_COMMAND
, smb_conf
);
4366 slirp_add_exec(0, smb_cmdline
, 4, 139);
4369 #endif /* !defined(_WIN32) */
4370 void do_info_slirp(void)
4375 #endif /* CONFIG_SLIRP */
4379 int tap_has_vnet_hdr(void *opaque
)
4384 void tap_using_vnet_hdr(void *opaque
, int using_vnet_hdr
)
4388 #else /* !defined(_WIN32) */
4390 #ifndef IFF_VNET_HDR
4391 #define TAP_BUFSIZE 4096
4393 #include <linux/virtio_net.h>
4395 #define ETH_DATA_LEN 1500
4396 #define MAX_PACKET_LEN (ETH_HLEN + ETH_DATA_LEN)
4397 #define MAX_SKB_FRAGS ((65536/TARGET_PAGE_SIZE) + 2)
4398 #define TAP_BUFSIZE (sizeof(struct virtio_net_hdr) + MAX_PACKET_LEN + (MAX_SKB_FRAGS*TARGET_PAGE_SIZE))
4401 typedef struct TAPState
{
4402 VLANClientState
*vc
;
4404 char down_script
[1024];
4405 char buf
[TAP_BUFSIZE
];
4407 unsigned int has_vnet_hdr
: 1;
4408 unsigned int using_vnet_hdr
: 1;
4411 static ssize_t
tap_writev(void *opaque
, const struct iovec
*iov
,
4414 TAPState
*s
= opaque
;
4418 len
= writev(s
->fd
, iov
, iovcnt
);
4419 } while (len
== -1 && (errno
== EINTR
|| errno
== EAGAIN
));
4424 static ssize_t
tap_receive_iov(void *opaque
, const struct iovec
*iov
,
4428 TAPState
*s
= opaque
;
4430 if (s
->has_vnet_hdr
&& !s
->using_vnet_hdr
) {
4431 struct iovec
*iov_copy
;
4432 struct virtio_net_hdr hdr
= { 0, };
4434 iov_copy
= alloca(sizeof(struct iovec
) * (iovcnt
+ 1));
4436 iov_copy
[0].iov_base
= &hdr
;
4437 iov_copy
[0].iov_len
= sizeof(hdr
);
4439 memcpy(&iov_copy
[1], iov
, sizeof(struct iovec
) * iovcnt
);
4441 return tap_writev(opaque
, iov_copy
, iovcnt
+ 1);
4445 return tap_writev(opaque
, iov
, iovcnt
);
4448 static void tap_receive(void *opaque
, const uint8_t *buf
, int size
)
4450 struct iovec iov
[2];
4454 TAPState
*s
= opaque
;
4455 struct virtio_net_hdr hdr
= { 0, };
4457 if (s
->has_vnet_hdr
&& !s
->using_vnet_hdr
) {
4458 iov
[i
].iov_base
= &hdr
;
4459 iov
[i
].iov_len
= sizeof(hdr
);
4464 iov
[i
].iov_base
= (char *) buf
;
4465 iov
[i
].iov_len
= size
;
4468 tap_writev(opaque
, iov
, i
);
4471 static int tap_can_send(void *opaque
)
4473 TAPState
*s
= opaque
;
4474 VLANClientState
*vc
;
4475 int can_receive
= 0;
4477 /* Check to see if any of our clients can receive a packet */
4478 for (vc
= s
->vc
->vlan
->first_client
; vc
; vc
= vc
->next
) {
4479 /* Skip ourselves */
4483 if (!vc
->fd_can_read
) {
4484 /* no fd_can_read handler, they always can receive */
4487 can_receive
= vc
->fd_can_read(vc
->opaque
);
4489 /* Once someone can receive, we try to send a packet */
4497 static int tap_send_packet(TAPState
*s
)
4499 uint8_t *buf
= s
->buf
;
4503 if (s
->has_vnet_hdr
&& !s
->using_vnet_hdr
) {
4504 buf
+= sizeof(struct virtio_net_hdr
);
4505 size
-= sizeof(struct virtio_net_hdr
);
4509 return qemu_send_packet(s
->vc
, buf
, size
);
4512 static void tap_send(void *opaque
)
4514 TAPState
*s
= opaque
;
4516 /* First try to send any buffered packet */
4520 /* If noone can receive the packet, buffer it */
4521 err
= tap_send_packet(s
);
4526 /* Read packets until we hit EAGAIN */
4531 sbuf
.maxlen
= sizeof(s
->buf
);
4533 s
->size
= getmsg(s
->fd
, NULL
, &sbuf
, &f
) >=0 ? sbuf
.len
: -1;
4536 s
->size
= read(s
->fd
, s
->buf
, sizeof(s
->buf
));
4540 if (s
->size
== -1 && errno
== EINTR
)
4546 /* If noone can receive the packet, buffer it */
4547 err
= tap_send_packet(s
);
4551 } while (s
->size
> 0);
4554 int tap_has_vnet_hdr(void *opaque
)
4556 VLANClientState
*vc
= opaque
;
4557 TAPState
*s
= vc
->opaque
;
4559 return s
? s
->has_vnet_hdr
: 0;
4562 void tap_using_vnet_hdr(void *opaque
, int using_vnet_hdr
)
4564 VLANClientState
*vc
= opaque
;
4565 TAPState
*s
= vc
->opaque
;
4567 if (!s
|| !s
->has_vnet_hdr
)
4570 s
->using_vnet_hdr
= using_vnet_hdr
!= 0;
4573 #ifdef TUNSETOFFLOAD
4574 static void tap_set_offload(VLANClientState
*vc
, int csum
, int tso4
, int tso6
,
4577 TAPState
*s
= vc
->opaque
;
4578 unsigned int offload
= 0;
4581 offload
|= TUN_F_CSUM
;
4583 offload
|= TUN_F_TSO4
;
4585 offload
|= TUN_F_TSO6
;
4586 if ((tso4
|| tso6
) && ecn
)
4587 offload
|= TUN_F_TSO_ECN
;
4590 if (ioctl(s
->fd
, TUNSETOFFLOAD
, offload
) != 0)
4591 fprintf(stderr
, "TUNSETOFFLOAD ioctl() failed: %s\n",
4594 #endif /* TUNSETOFFLOAD */
4598 static TAPState
*net_tap_fd_init(VLANState
*vlan
, int fd
, int vnet_hdr
)
4602 s
= qemu_mallocz(sizeof(TAPState
));
4606 s
->has_vnet_hdr
= vnet_hdr
!= 0;
4607 s
->vc
= qemu_new_vlan_client(vlan
, tap_receive
, NULL
, s
);
4608 s
->vc
->fd_readv
= tap_receive_iov
;
4609 #ifdef TUNSETOFFLOAD
4610 s
->vc
->set_offload
= tap_set_offload
;
4612 qemu_set_fd_handler2(s
->fd
, tap_can_send
, tap_send
, NULL
, s
);
4613 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "tap: fd=%d", fd
);
4617 #if defined (_BSD) || defined (__FreeBSD_kernel__)
4618 static int tap_open(char *ifname
, int ifname_size
, int *vnet_hdr
)
4624 TFR(fd
= open("/dev/tap", O_RDWR
));
4626 fprintf(stderr
, "warning: could not open /dev/tap: no virtual network emulation\n");
4631 dev
= devname(s
.st_rdev
, S_IFCHR
);
4632 pstrcpy(ifname
, ifname_size
, dev
);
4634 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4637 #elif defined(__sun__)
4638 #define TUNNEWPPA (('T'<<16) | 0x0001)
4640 * Allocate TAP device, returns opened fd.
4641 * Stores dev name in the first arg(must be large enough).
4643 int tap_alloc(char *dev
)
4645 int tap_fd
, if_fd
, ppa
= -1;
4646 static int ip_fd
= 0;
4649 static int arp_fd
= 0;
4650 int ip_muxid
, arp_muxid
;
4651 struct strioctl strioc_if
, strioc_ppa
;
4652 int link_type
= I_PLINK
;;
4654 char actual_name
[32] = "";
4656 memset(&ifr
, 0x0, sizeof(ifr
));
4660 while( *ptr
&& !isdigit((int)*ptr
) ) ptr
++;
4664 /* Check if IP device was opened */
4668 TFR(ip_fd
= open("/dev/udp", O_RDWR
, 0));
4670 syslog(LOG_ERR
, "Can't open /dev/ip (actually /dev/udp)");
4674 TFR(tap_fd
= open("/dev/tap", O_RDWR
, 0));
4676 syslog(LOG_ERR
, "Can't open /dev/tap");
4680 /* Assign a new PPA and get its unit number. */
4681 strioc_ppa
.ic_cmd
= TUNNEWPPA
;
4682 strioc_ppa
.ic_timout
= 0;
4683 strioc_ppa
.ic_len
= sizeof(ppa
);
4684 strioc_ppa
.ic_dp
= (char *)&ppa
;
4685 if ((ppa
= ioctl (tap_fd
, I_STR
, &strioc_ppa
)) < 0)
4686 syslog (LOG_ERR
, "Can't assign new interface");
4688 TFR(if_fd
= open("/dev/tap", O_RDWR
, 0));
4690 syslog(LOG_ERR
, "Can't open /dev/tap (2)");
4693 if(ioctl(if_fd
, I_PUSH
, "ip") < 0){
4694 syslog(LOG_ERR
, "Can't push IP module");
4698 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) < 0)
4699 syslog(LOG_ERR
, "Can't get flags\n");
4701 snprintf (actual_name
, 32, "tap%d", ppa
);
4702 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4705 /* Assign ppa according to the unit number returned by tun device */
4707 if (ioctl (if_fd
, SIOCSLIFNAME
, &ifr
) < 0)
4708 syslog (LOG_ERR
, "Can't set PPA %d", ppa
);
4709 if (ioctl(if_fd
, SIOCGLIFFLAGS
, &ifr
) <0)
4710 syslog (LOG_ERR
, "Can't get flags\n");
4711 /* Push arp module to if_fd */
4712 if (ioctl (if_fd
, I_PUSH
, "arp") < 0)
4713 syslog (LOG_ERR
, "Can't push ARP module (2)");
4715 /* Push arp module to ip_fd */
4716 if (ioctl (ip_fd
, I_POP
, NULL
) < 0)
4717 syslog (LOG_ERR
, "I_POP failed\n");
4718 if (ioctl (ip_fd
, I_PUSH
, "arp") < 0)
4719 syslog (LOG_ERR
, "Can't push ARP module (3)\n");
4721 TFR(arp_fd
= open ("/dev/tap", O_RDWR
, 0));
4723 syslog (LOG_ERR
, "Can't open %s\n", "/dev/tap");
4725 /* Set ifname to arp */
4726 strioc_if
.ic_cmd
= SIOCSLIFNAME
;
4727 strioc_if
.ic_timout
= 0;
4728 strioc_if
.ic_len
= sizeof(ifr
);
4729 strioc_if
.ic_dp
= (char *)&ifr
;
4730 if (ioctl(arp_fd
, I_STR
, &strioc_if
) < 0){
4731 syslog (LOG_ERR
, "Can't set ifname to arp\n");
4734 if((ip_muxid
= ioctl(ip_fd
, I_LINK
, if_fd
)) < 0){
4735 syslog(LOG_ERR
, "Can't link TAP device to IP");
4739 if ((arp_muxid
= ioctl (ip_fd
, link_type
, arp_fd
)) < 0)
4740 syslog (LOG_ERR
, "Can't link TAP device to ARP");
4744 memset(&ifr
, 0x0, sizeof(ifr
));
4745 strncpy (ifr
.lifr_name
, actual_name
, sizeof (ifr
.lifr_name
));
4746 ifr
.lifr_ip_muxid
= ip_muxid
;
4747 ifr
.lifr_arp_muxid
= arp_muxid
;
4749 if (ioctl (ip_fd
, SIOCSLIFMUXID
, &ifr
) < 0)
4751 ioctl (ip_fd
, I_PUNLINK
, arp_muxid
);
4752 ioctl (ip_fd
, I_PUNLINK
, ip_muxid
);
4753 syslog (LOG_ERR
, "Can't set multiplexor id");
4756 sprintf(dev
, "tap%d", ppa
);
4760 static int tap_open(char *ifname
, int ifname_size
, int *vnet_hdr
)
4764 if( (fd
= tap_alloc(dev
)) < 0 ){
4765 fprintf(stderr
, "Cannot allocate TAP device\n");
4768 pstrcpy(ifname
, ifname_size
, dev
);
4769 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4773 static int tap_open(char *ifname
, int ifname_size
, int *vnet_hdr
)
4778 TFR(fd
= open("/dev/net/tun", O_RDWR
));
4780 fprintf(stderr
, "warning: could not open /dev/net/tun: no virtual network emulation\n");
4783 memset(&ifr
, 0, sizeof(ifr
));
4784 ifr
.ifr_flags
= IFF_TAP
| IFF_NO_PI
;
4786 #if defined(TUNGETFEATURES) && defined(IFF_VNET_HDR)
4788 unsigned int features
;
4790 if (ioctl(fd
, TUNGETFEATURES
, &features
) == 0 &&
4791 features
& IFF_VNET_HDR
) {
4793 ifr
.ifr_flags
|= IFF_VNET_HDR
;
4798 if (ifname
[0] != '\0')
4799 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, ifname
);
4801 pstrcpy(ifr
.ifr_name
, IFNAMSIZ
, "tap%d");
4802 ret
= ioctl(fd
, TUNSETIFF
, (void *) &ifr
);
4804 fprintf(stderr
, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
4808 pstrcpy(ifname
, ifname_size
, ifr
.ifr_name
);
4809 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
4814 static int launch_script(const char *setup_script
, const char *ifname
, int fd
)
4820 /* try to launch network script */
4824 int open_max
= sysconf (_SC_OPEN_MAX
), i
;
4825 for (i
= 0; i
< open_max
; i
++)
4826 if (i
!= STDIN_FILENO
&&
4827 i
!= STDOUT_FILENO
&&
4828 i
!= STDERR_FILENO
&&
4833 *parg
++ = (char *)setup_script
;
4834 *parg
++ = (char *)ifname
;
4836 execv(setup_script
, args
);
4839 while (waitpid(pid
, &status
, 0) != pid
);
4840 if (!WIFEXITED(status
) ||
4841 WEXITSTATUS(status
) != 0) {
4842 fprintf(stderr
, "%s: could not launch network script\n",
4850 static int net_tap_init(VLANState
*vlan
, const char *ifname1
,
4851 const char *setup_script
, const char *down_script
)
4858 if (ifname1
!= NULL
)
4859 pstrcpy(ifname
, sizeof(ifname
), ifname1
);
4863 TFR(fd
= tap_open(ifname
, sizeof(ifname
), &vnet_hdr
));
4867 if (!setup_script
|| !strcmp(setup_script
, "no"))
4869 if (setup_script
[0] != '\0') {
4870 if (launch_script(setup_script
, ifname
, fd
))
4873 s
= net_tap_fd_init(vlan
, fd
, vnet_hdr
);
4877 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
4878 "tap: ifname=%s setup_script=%s", ifname
, setup_script
);
4879 if (down_script
&& strcmp(down_script
, "no"))
4880 snprintf(s
->down_script
, sizeof(s
->down_script
), "%s", down_script
);
4884 #endif /* !_WIN32 */
4886 #if defined(CONFIG_VDE)
4887 typedef struct VDEState
{
4888 VLANClientState
*vc
;
4892 static void vde_to_qemu(void *opaque
)
4894 VDEState
*s
= opaque
;
4898 size
= vde_recv(s
->vde
, buf
, sizeof(buf
), 0);
4900 qemu_send_packet(s
->vc
, buf
, size
);
4904 static void vde_from_qemu(void *opaque
, const uint8_t *buf
, int size
)
4906 VDEState
*s
= opaque
;
4909 ret
= vde_send(s
->vde
, buf
, size
, 0);
4910 if (ret
< 0 && errno
== EINTR
) {
4917 static int net_vde_init(VLANState
*vlan
, const char *sock
, int port
,
4918 const char *group
, int mode
)
4921 char *init_group
= strlen(group
) ? (char *)group
: NULL
;
4922 char *init_sock
= strlen(sock
) ? (char *)sock
: NULL
;
4924 struct vde_open_args args
= {
4926 .group
= init_group
,
4930 s
= qemu_mallocz(sizeof(VDEState
));
4933 s
->vde
= vde_open(init_sock
, "QEMU", &args
);
4938 s
->vc
= qemu_new_vlan_client(vlan
, vde_from_qemu
, NULL
, s
);
4939 qemu_set_fd_handler(vde_datafd(s
->vde
), vde_to_qemu
, NULL
, s
);
4940 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
), "vde: sock=%s fd=%d",
4941 sock
, vde_datafd(s
->vde
));
4946 /* network connection */
4947 typedef struct NetSocketState
{
4948 VLANClientState
*vc
;
4950 int state
; /* 0 = getting length, 1 = getting data */
4954 struct sockaddr_in dgram_dst
; /* contains inet host and port destination iff connectionless (SOCK_DGRAM) */
4957 typedef struct NetSocketListenState
{
4960 } NetSocketListenState
;
4962 /* XXX: we consider we can send the whole packet without blocking */
4963 static void net_socket_receive(void *opaque
, const uint8_t *buf
, int size
)
4965 NetSocketState
*s
= opaque
;
4969 send_all(s
->fd
, (const uint8_t *)&len
, sizeof(len
));
4970 send_all(s
->fd
, buf
, size
);
4973 static void net_socket_receive_dgram(void *opaque
, const uint8_t *buf
, int size
)
4975 NetSocketState
*s
= opaque
;
4976 sendto(s
->fd
, buf
, size
, 0,
4977 (struct sockaddr
*)&s
->dgram_dst
, sizeof(s
->dgram_dst
));
4980 static void net_socket_send(void *opaque
)
4982 NetSocketState
*s
= opaque
;
4987 size
= recv(s
->fd
, buf1
, sizeof(buf1
), 0);
4989 err
= socket_error();
4990 if (err
!= EWOULDBLOCK
)
4992 } else if (size
== 0) {
4993 /* end of connection */
4995 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
5001 /* reassemble a packet from the network */
5007 memcpy(s
->buf
+ s
->index
, buf
, l
);
5011 if (s
->index
== 4) {
5013 s
->packet_len
= ntohl(*(uint32_t *)s
->buf
);
5019 l
= s
->packet_len
- s
->index
;
5022 memcpy(s
->buf
+ s
->index
, buf
, l
);
5026 if (s
->index
>= s
->packet_len
) {
5027 qemu_send_packet(s
->vc
, s
->buf
, s
->packet_len
);
5036 static void net_socket_send_dgram(void *opaque
)
5038 NetSocketState
*s
= opaque
;
5041 size
= recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
5045 /* end of connection */
5046 qemu_set_fd_handler(s
->fd
, NULL
, NULL
, NULL
);
5049 qemu_send_packet(s
->vc
, s
->buf
, size
);
5052 static int net_socket_mcast_create(struct sockaddr_in
*mcastaddr
)
5057 if (!IN_MULTICAST(ntohl(mcastaddr
->sin_addr
.s_addr
))) {
5058 fprintf(stderr
, "qemu: error: specified mcastaddr \"%s\" (0x%08x) does not contain a multicast address\n",
5059 inet_ntoa(mcastaddr
->sin_addr
),
5060 (int)ntohl(mcastaddr
->sin_addr
.s_addr
));
5064 fd
= socket(PF_INET
, SOCK_DGRAM
, 0);
5066 perror("socket(PF_INET, SOCK_DGRAM)");
5071 ret
=setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
,
5072 (const char *)&val
, sizeof(val
));
5074 perror("setsockopt(SOL_SOCKET, SO_REUSEADDR)");
5078 ret
= bind(fd
, (struct sockaddr
*)mcastaddr
, sizeof(*mcastaddr
));
5084 /* Add host to multicast group */
5085 imr
.imr_multiaddr
= mcastaddr
->sin_addr
;
5086 imr
.imr_interface
.s_addr
= htonl(INADDR_ANY
);
5088 ret
= setsockopt(fd
, IPPROTO_IP
, IP_ADD_MEMBERSHIP
,
5089 (const char *)&imr
, sizeof(struct ip_mreq
));
5091 perror("setsockopt(IP_ADD_MEMBERSHIP)");
5095 /* Force mcast msgs to loopback (eg. several QEMUs in same host */
5097 ret
=setsockopt(fd
, IPPROTO_IP
, IP_MULTICAST_LOOP
,
5098 (const char *)&val
, sizeof(val
));
5100 perror("setsockopt(SOL_IP, IP_MULTICAST_LOOP)");
5104 socket_set_nonblock(fd
);
5112 static NetSocketState
*net_socket_fd_init_dgram(VLANState
*vlan
, int fd
,
5115 struct sockaddr_in saddr
;
5117 socklen_t saddr_len
;
5120 /* fd passed: multicast: "learn" dgram_dst address from bound address and save it
5121 * Because this may be "shared" socket from a "master" process, datagrams would be recv()
5122 * by ONLY ONE process: we must "clone" this dgram socket --jjo
5126 if (getsockname(fd
, (struct sockaddr
*) &saddr
, &saddr_len
) == 0) {
5128 if (saddr
.sin_addr
.s_addr
==0) {
5129 fprintf(stderr
, "qemu: error: init_dgram: fd=%d unbound, cannot setup multicast dst addr\n",
5133 /* clone dgram socket */
5134 newfd
= net_socket_mcast_create(&saddr
);
5136 /* error already reported by net_socket_mcast_create() */
5140 /* clone newfd to fd, close newfd */
5145 fprintf(stderr
, "qemu: error: init_dgram: fd=%d failed getsockname(): %s\n",
5146 fd
, strerror(errno
));
5151 s
= qemu_mallocz(sizeof(NetSocketState
));
5156 s
->vc
= qemu_new_vlan_client(vlan
, net_socket_receive_dgram
, NULL
, s
);
5157 qemu_set_fd_handler(s
->fd
, net_socket_send_dgram
, NULL
, s
);
5159 /* mcast: save bound address as dst */
5160 if (is_connected
) s
->dgram_dst
=saddr
;
5162 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5163 "socket: fd=%d (%s mcast=%s:%d)",
5164 fd
, is_connected
? "cloned" : "",
5165 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5169 static void net_socket_connect(void *opaque
)
5171 NetSocketState
*s
= opaque
;
5172 qemu_set_fd_handler(s
->fd
, net_socket_send
, NULL
, s
);
5175 static NetSocketState
*net_socket_fd_init_stream(VLANState
*vlan
, int fd
,
5179 s
= qemu_mallocz(sizeof(NetSocketState
));
5183 s
->vc
= qemu_new_vlan_client(vlan
,
5184 net_socket_receive
, NULL
, s
);
5185 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5186 "socket: fd=%d", fd
);
5188 net_socket_connect(s
);
5190 qemu_set_fd_handler(s
->fd
, NULL
, net_socket_connect
, s
);
5195 static NetSocketState
*net_socket_fd_init(VLANState
*vlan
, int fd
,
5198 int so_type
=-1, optlen
=sizeof(so_type
);
5200 if(getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, (char *)&so_type
,
5201 (socklen_t
*)&optlen
)< 0) {
5202 fprintf(stderr
, "qemu: error: getsockopt(SO_TYPE) for fd=%d failed\n", fd
);
5207 return net_socket_fd_init_dgram(vlan
, fd
, is_connected
);
5209 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
5211 /* who knows ... this could be a eg. a pty, do warn and continue as stream */
5212 fprintf(stderr
, "qemu: warning: socket type=%d for fd=%d is not SOCK_DGRAM or SOCK_STREAM\n", so_type
, fd
);
5213 return net_socket_fd_init_stream(vlan
, fd
, is_connected
);
5218 static void net_socket_accept(void *opaque
)
5220 NetSocketListenState
*s
= opaque
;
5222 struct sockaddr_in saddr
;
5227 len
= sizeof(saddr
);
5228 fd
= accept(s
->fd
, (struct sockaddr
*)&saddr
, &len
);
5229 if (fd
< 0 && errno
!= EINTR
) {
5231 } else if (fd
>= 0) {
5235 s1
= net_socket_fd_init(s
->vlan
, fd
, 1);
5239 snprintf(s1
->vc
->info_str
, sizeof(s1
->vc
->info_str
),
5240 "socket: connection from %s:%d",
5241 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5245 static int net_socket_listen_init(VLANState
*vlan
, const char *host_str
)
5247 NetSocketListenState
*s
;
5249 struct sockaddr_in saddr
;
5251 if (parse_host_port(&saddr
, host_str
) < 0)
5254 s
= qemu_mallocz(sizeof(NetSocketListenState
));
5258 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
5263 socket_set_nonblock(fd
);
5265 /* allow fast reuse */
5267 setsockopt(fd
, SOL_SOCKET
, SO_REUSEADDR
, (const char *)&val
, sizeof(val
));
5269 ret
= bind(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5274 ret
= listen(fd
, 0);
5281 qemu_set_fd_handler(fd
, net_socket_accept
, NULL
, s
);
5285 static int net_socket_connect_init(VLANState
*vlan
, const char *host_str
)
5288 int fd
, connected
, ret
, err
;
5289 struct sockaddr_in saddr
;
5291 if (parse_host_port(&saddr
, host_str
) < 0)
5294 fd
= socket(PF_INET
, SOCK_STREAM
, 0);
5299 socket_set_nonblock(fd
);
5303 ret
= connect(fd
, (struct sockaddr
*)&saddr
, sizeof(saddr
));
5305 err
= socket_error();
5306 if (err
== EINTR
|| err
== EWOULDBLOCK
) {
5307 } else if (err
== EINPROGRESS
) {
5310 } else if (err
== WSAEALREADY
) {
5323 s
= net_socket_fd_init(vlan
, fd
, connected
);
5326 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5327 "socket: connect to %s:%d",
5328 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5332 static int net_socket_mcast_init(VLANState
*vlan
, const char *host_str
)
5336 struct sockaddr_in saddr
;
5338 if (parse_host_port(&saddr
, host_str
) < 0)
5342 fd
= net_socket_mcast_create(&saddr
);
5346 s
= net_socket_fd_init(vlan
, fd
, 0);
5350 s
->dgram_dst
= saddr
;
5352 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
5353 "socket: mcast=%s:%d",
5354 inet_ntoa(saddr
.sin_addr
), ntohs(saddr
.sin_port
));
5359 static const char *get_opt_name(char *buf
, int buf_size
, const char *p
)
5364 while (*p
!= '\0' && *p
!= '=') {
5365 if (q
&& (q
- buf
) < buf_size
- 1)
5375 static const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
5380 while (*p
!= '\0') {
5382 if (*(p
+ 1) != ',')
5386 if (q
&& (q
- buf
) < buf_size
- 1)
5396 int get_param_value(char *buf
, int buf_size
,
5397 const char *tag
, const char *str
)
5404 p
= get_opt_name(option
, sizeof(option
), p
);
5408 if (!strcmp(tag
, option
)) {
5409 (void)get_opt_value(buf
, buf_size
, p
);
5412 p
= get_opt_value(NULL
, 0, p
);
5421 int check_params(char *buf
, int buf_size
,
5422 char **params
, const char *str
)
5429 p
= get_opt_name(buf
, buf_size
, p
);
5433 for(i
= 0; params
[i
] != NULL
; i
++)
5434 if (!strcmp(params
[i
], buf
))
5436 if (params
[i
] == NULL
)
5438 p
= get_opt_value(NULL
, 0, p
);
5446 static int nic_get_free_idx(void)
5450 for (index
= 0; index
< MAX_NICS
; index
++)
5451 if (!nd_table
[index
].used
)
5456 int net_client_init(const char *device
, const char *p
)
5463 if (get_param_value(buf
, sizeof(buf
), "vlan", p
)) {
5464 vlan_id
= strtol(buf
, NULL
, 0);
5466 vlan
= qemu_find_vlan(vlan_id
);
5468 fprintf(stderr
, "Could not create vlan %d\n", vlan_id
);
5471 if (!strcmp(device
, "nic")) {
5474 int idx
= nic_get_free_idx();
5476 if (idx
== -1 || nb_nics
>= MAX_NICS
) {
5477 fprintf(stderr
, "Too Many NICs\n");
5480 nd
= &nd_table
[idx
];
5481 macaddr
= nd
->macaddr
;
5487 macaddr
[5] = 0x56 + idx
;
5489 if (get_param_value(buf
, sizeof(buf
), "macaddr", p
)) {
5490 if (parse_macaddr(macaddr
, buf
) < 0) {
5491 fprintf(stderr
, "invalid syntax for ethernet address\n");
5495 if (get_param_value(buf
, sizeof(buf
), "model", p
)) {
5496 nd
->model
= strdup(buf
);
5501 vlan
->nb_guest_devs
++;
5504 if (!strcmp(device
, "none")) {
5505 /* does nothing. It is needed to signal that no network cards
5510 if (!strcmp(device
, "user")) {
5511 if (get_param_value(buf
, sizeof(buf
), "hostname", p
)) {
5512 pstrcpy(slirp_hostname
, sizeof(slirp_hostname
), buf
);
5514 vlan
->nb_host_devs
++;
5515 ret
= net_slirp_init(vlan
);
5519 if (!strcmp(device
, "tap")) {
5521 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5522 fprintf(stderr
, "tap: no interface name\n");
5525 vlan
->nb_host_devs
++;
5526 ret
= tap_win32_init(vlan
, ifname
);
5529 if (!strcmp(device
, "tap")) {
5531 char setup_script
[1024], down_script
[1024];
5533 vlan
->nb_host_devs
++;
5534 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5535 fd
= strtol(buf
, NULL
, 0);
5536 fcntl(fd
, F_SETFL
, O_NONBLOCK
);
5538 if (net_tap_fd_init(vlan
, fd
, 0))
5541 if (get_param_value(ifname
, sizeof(ifname
), "ifname", p
) <= 0) {
5544 if (get_param_value(setup_script
, sizeof(setup_script
), "script", p
) == 0) {
5545 pstrcpy(setup_script
, sizeof(setup_script
), DEFAULT_NETWORK_SCRIPT
);
5547 if (get_param_value(down_script
, sizeof(down_script
), "downscript", p
) == 0) {
5548 pstrcpy(down_script
, sizeof(down_script
), DEFAULT_NETWORK_DOWN_SCRIPT
);
5550 ret
= net_tap_init(vlan
, ifname
, setup_script
, down_script
);
5554 if (!strcmp(device
, "socket")) {
5555 if (get_param_value(buf
, sizeof(buf
), "fd", p
) > 0) {
5557 fd
= strtol(buf
, NULL
, 0);
5559 if (net_socket_fd_init(vlan
, fd
, 1))
5561 } else if (get_param_value(buf
, sizeof(buf
), "listen", p
) > 0) {
5562 ret
= net_socket_listen_init(vlan
, buf
);
5563 } else if (get_param_value(buf
, sizeof(buf
), "connect", p
) > 0) {
5564 ret
= net_socket_connect_init(vlan
, buf
);
5565 } else if (get_param_value(buf
, sizeof(buf
), "mcast", p
) > 0) {
5566 ret
= net_socket_mcast_init(vlan
, buf
);
5568 fprintf(stderr
, "Unknown socket options: %s\n", p
);
5571 vlan
->nb_host_devs
++;
5574 if (!strcmp(device
, "vde")) {
5575 char vde_sock
[1024], vde_group
[512];
5576 int vde_port
, vde_mode
;
5577 vlan
->nb_host_devs
++;
5578 if (get_param_value(vde_sock
, sizeof(vde_sock
), "sock", p
) <= 0) {
5581 if (get_param_value(buf
, sizeof(buf
), "port", p
) > 0) {
5582 vde_port
= strtol(buf
, NULL
, 10);
5586 if (get_param_value(vde_group
, sizeof(vde_group
), "group", p
) <= 0) {
5587 vde_group
[0] = '\0';
5589 if (get_param_value(buf
, sizeof(buf
), "mode", p
) > 0) {
5590 vde_mode
= strtol(buf
, NULL
, 8);
5594 ret
= net_vde_init(vlan
, vde_sock
, vde_port
, vde_group
, vde_mode
);
5598 fprintf(stderr
, "Unknown network device: %s\n", device
);
5602 fprintf(stderr
, "Could not initialize device '%s'\n", device
);
5608 void net_client_uninit(NICInfo
*nd
)
5610 nd
->vlan
->nb_guest_devs
--; /* XXX: free vlan on last reference */
5613 free((void *)nd
->model
);
5616 static int net_client_parse(const char *str
)
5624 while (*p
!= '\0' && *p
!= ',') {
5625 if ((q
- device
) < sizeof(device
) - 1)
5633 return net_client_init(device
, p
);
5636 void do_info_network(void)
5639 VLANClientState
*vc
;
5641 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
5642 term_printf("VLAN %d devices:\n", vlan
->id
);
5643 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
)
5644 term_printf(" %s\n", vc
->info_str
);
5648 #define HD_ALIAS "index=%d,media=disk"
5650 #define CDROM_ALIAS "index=1,media=cdrom"
5652 #define CDROM_ALIAS "index=2,media=cdrom"
5654 #define FD_ALIAS "index=%d,if=floppy"
5655 #define PFLASH_ALIAS "if=pflash"
5656 #define MTD_ALIAS "if=mtd"
5657 #define SD_ALIAS "index=0,if=sd"
5659 static int drive_opt_get_free_idx(void)
5663 for (index
= 0; index
< MAX_DRIVES
; index
++)
5664 if (!drives_opt
[index
].used
) {
5665 drives_opt
[index
].used
= 1;
5672 static int drive_get_free_idx(void)
5676 for (index
= 0; index
< MAX_DRIVES
; index
++)
5677 if (!drives_table
[index
].used
) {
5678 drives_table
[index
].used
= 1;
5685 int drive_add(const char *file
, const char *fmt
, ...)
5688 int index
= drive_opt_get_free_idx();
5690 if (nb_drives_opt
>= MAX_DRIVES
|| index
== -1) {
5691 fprintf(stderr
, "qemu: too many drives\n");
5695 drives_opt
[index
].file
= file
;
5697 vsnprintf(drives_opt
[index
].opt
,
5698 sizeof(drives_opt
[0].opt
), fmt
, ap
);
5705 void drive_remove(int index
)
5707 drives_opt
[index
].used
= 0;
5711 int drive_get_index(BlockInterfaceType type
, int bus
, int unit
)
5715 /* seek interface, bus and unit */
5717 for (index
= 0; index
< MAX_DRIVES
; index
++)
5718 if (drives_table
[index
].type
== type
&&
5719 drives_table
[index
].bus
== bus
&&
5720 drives_table
[index
].unit
== unit
&&
5721 drives_table
[index
].used
)
5727 int drive_get_max_bus(BlockInterfaceType type
)
5733 for (index
= 0; index
< nb_drives
; index
++) {
5734 if(drives_table
[index
].type
== type
&&
5735 drives_table
[index
].bus
> max_bus
)
5736 max_bus
= drives_table
[index
].bus
;
5741 static void bdrv_format_print(void *opaque
, const char *name
)
5743 fprintf(stderr
, " %s", name
);
5746 void drive_uninit(BlockDriverState
*bdrv
)
5750 for (i
= 0; i
< MAX_DRIVES
; i
++)
5751 if (drives_table
[i
].bdrv
== bdrv
) {
5752 drives_table
[i
].bdrv
= NULL
;
5753 drives_table
[i
].used
= 0;
5754 drive_remove(drives_table
[i
].drive_opt_idx
);
5760 int drive_init(struct drive_opt
*arg
, int snapshot
,
5761 QEMUMachine
*machine
)
5766 const char *mediastr
= "";
5767 BlockInterfaceType type
;
5768 enum { MEDIA_DISK
, MEDIA_CDROM
} media
;
5769 int bus_id
, unit_id
;
5770 int cyls
, heads
, secs
, translation
;
5771 BlockDriverState
*bdrv
;
5772 BlockDriver
*drv
= NULL
;
5777 int drives_table_idx
;
5778 char *str
= arg
->opt
;
5779 char *params
[] = { "bus", "unit", "if", "index", "cyls", "heads",
5780 "secs", "trans", "media", "snapshot", "file",
5781 "cache", "format", "boot", NULL
};
5783 if (check_params(buf
, sizeof(buf
), params
, str
) < 0) {
5784 fprintf(stderr
, "qemu: unknown parameter '%s' in '%s'\n",
5790 cyls
= heads
= secs
= 0;
5793 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5797 if (!strcmp(machine
->name
, "realview") ||
5798 !strcmp(machine
->name
, "SS-5") ||
5799 !strcmp(machine
->name
, "SS-10") ||
5800 !strcmp(machine
->name
, "SS-600MP") ||
5801 !strcmp(machine
->name
, "versatilepb") ||
5802 !strcmp(machine
->name
, "versatileab")) {
5804 max_devs
= MAX_SCSI_DEVS
;
5805 strcpy(devname
, "scsi");
5808 max_devs
= MAX_IDE_DEVS
;
5809 strcpy(devname
, "ide");
5813 /* extract parameters */
5815 if (get_param_value(buf
, sizeof(buf
), "bus", str
)) {
5816 bus_id
= strtol(buf
, NULL
, 0);
5818 fprintf(stderr
, "qemu: '%s' invalid bus id\n", str
);
5823 if (get_param_value(buf
, sizeof(buf
), "unit", str
)) {
5824 unit_id
= strtol(buf
, NULL
, 0);
5826 fprintf(stderr
, "qemu: '%s' invalid unit id\n", str
);
5831 if (get_param_value(buf
, sizeof(buf
), "if", str
)) {
5832 pstrcpy(devname
, sizeof(devname
), buf
);
5833 if (!strcmp(buf
, "ide")) {
5835 max_devs
= MAX_IDE_DEVS
;
5836 } else if (!strcmp(buf
, "scsi")) {
5838 max_devs
= MAX_SCSI_DEVS
;
5839 } else if (!strcmp(buf
, "floppy")) {
5842 } else if (!strcmp(buf
, "pflash")) {
5845 } else if (!strcmp(buf
, "mtd")) {
5848 } else if (!strcmp(buf
, "sd")) {
5851 } else if (!strcmp(buf
, "virtio")) {
5855 fprintf(stderr
, "qemu: '%s' unsupported bus type '%s'\n", str
, buf
);
5860 if (get_param_value(buf
, sizeof(buf
), "index", str
)) {
5861 index
= strtol(buf
, NULL
, 0);
5863 fprintf(stderr
, "qemu: '%s' invalid index\n", str
);
5868 if (get_param_value(buf
, sizeof(buf
), "cyls", str
)) {
5869 cyls
= strtol(buf
, NULL
, 0);
5872 if (get_param_value(buf
, sizeof(buf
), "heads", str
)) {
5873 heads
= strtol(buf
, NULL
, 0);
5876 if (get_param_value(buf
, sizeof(buf
), "secs", str
)) {
5877 secs
= strtol(buf
, NULL
, 0);
5880 if (cyls
|| heads
|| secs
) {
5881 if (cyls
< 1 || cyls
> 16383) {
5882 fprintf(stderr
, "qemu: '%s' invalid physical cyls number\n", str
);
5885 if (heads
< 1 || heads
> 16) {
5886 fprintf(stderr
, "qemu: '%s' invalid physical heads number\n", str
);
5889 if (secs
< 1 || secs
> 63) {
5890 fprintf(stderr
, "qemu: '%s' invalid physical secs number\n", str
);
5895 if (get_param_value(buf
, sizeof(buf
), "trans", str
)) {
5898 "qemu: '%s' trans must be used with cyls,heads and secs\n",
5902 if (!strcmp(buf
, "none"))
5903 translation
= BIOS_ATA_TRANSLATION_NONE
;
5904 else if (!strcmp(buf
, "lba"))
5905 translation
= BIOS_ATA_TRANSLATION_LBA
;
5906 else if (!strcmp(buf
, "auto"))
5907 translation
= BIOS_ATA_TRANSLATION_AUTO
;
5909 fprintf(stderr
, "qemu: '%s' invalid translation type\n", str
);
5914 if (get_param_value(buf
, sizeof(buf
), "media", str
)) {
5915 if (!strcmp(buf
, "disk")) {
5917 } else if (!strcmp(buf
, "cdrom")) {
5918 if (cyls
|| secs
|| heads
) {
5920 "qemu: '%s' invalid physical CHS format\n", str
);
5923 media
= MEDIA_CDROM
;
5925 fprintf(stderr
, "qemu: '%s' invalid media\n", str
);
5930 if (get_param_value(buf
, sizeof(buf
), "snapshot", str
)) {
5931 if (!strcmp(buf
, "on"))
5933 else if (!strcmp(buf
, "off"))
5936 fprintf(stderr
, "qemu: '%s' invalid snapshot option\n", str
);
5941 if (get_param_value(buf
, sizeof(buf
), "cache", str
)) {
5942 if (!strcmp(buf
, "off"))
5944 else if (!strcmp(buf
, "on"))
5947 fprintf(stderr
, "qemu: invalid cache option\n");
5952 if (get_param_value(buf
, sizeof(buf
), "format", str
)) {
5953 if (strcmp(buf
, "?") == 0) {
5954 fprintf(stderr
, "qemu: Supported formats:");
5955 bdrv_iterate_format(bdrv_format_print
, NULL
);
5956 fprintf(stderr
, "\n");
5959 drv
= bdrv_find_format(buf
);
5961 fprintf(stderr
, "qemu: '%s' invalid format\n", buf
);
5966 if (get_param_value(buf
, sizeof(buf
), "boot", str
)) {
5967 if (!strcmp(buf
, "on")) {
5968 if (extboot_drive
!= -1) {
5969 fprintf(stderr
, "qemu: two bootable drives specified\n");
5972 extboot_drive
= nb_drives
;
5973 } else if (strcmp(buf
, "off")) {
5974 fprintf(stderr
, "qemu: '%s' invalid boot option\n", str
);
5979 if (arg
->file
== NULL
)
5980 get_param_value(file
, sizeof(file
), "file", str
);
5982 pstrcpy(file
, sizeof(file
), arg
->file
);
5984 /* compute bus and unit according index */
5987 if (bus_id
!= 0 || unit_id
!= -1) {
5989 "qemu: '%s' index cannot be used with bus and unit\n", str
);
5997 unit_id
= index
% max_devs
;
5998 bus_id
= index
/ max_devs
;
6002 /* if user doesn't specify a unit_id,
6003 * try to find the first free
6006 if (unit_id
== -1) {
6008 while (drive_get_index(type
, bus_id
, unit_id
) != -1) {
6010 if (max_devs
&& unit_id
>= max_devs
) {
6011 unit_id
-= max_devs
;
6019 if (max_devs
&& unit_id
>= max_devs
) {
6020 fprintf(stderr
, "qemu: '%s' unit %d too big (max is %d)\n",
6021 str
, unit_id
, max_devs
- 1);
6026 * ignore multiple definitions
6029 if (drive_get_index(type
, bus_id
, unit_id
) != -1)
6034 if (type
== IF_IDE
|| type
== IF_SCSI
)
6035 mediastr
= (media
== MEDIA_CDROM
) ? "-cd" : "-hd";
6037 snprintf(buf
, sizeof(buf
), "%s%i%s%i",
6038 devname
, bus_id
, mediastr
, unit_id
);
6040 snprintf(buf
, sizeof(buf
), "%s%s%i",
6041 devname
, mediastr
, unit_id
);
6042 bdrv
= bdrv_new(buf
);
6043 drives_table_idx
= drive_get_free_idx();
6044 drives_table
[drives_table_idx
].bdrv
= bdrv
;
6045 drives_table
[drives_table_idx
].type
= type
;
6046 drives_table
[drives_table_idx
].bus
= bus_id
;
6047 drives_table
[drives_table_idx
].unit
= unit_id
;
6048 drives_table
[drives_table_idx
].drive_opt_idx
= arg
- drives_opt
;
6057 bdrv_set_geometry_hint(bdrv
, cyls
, heads
, secs
);
6058 bdrv_set_translation_hint(bdrv
, translation
);
6062 bdrv_set_type_hint(bdrv
, BDRV_TYPE_CDROM
);
6067 /* FIXME: This isn't really a floppy, but it's a reasonable
6070 bdrv_set_type_hint(bdrv
, BDRV_TYPE_FLOPPY
);
6081 bdrv_flags
|= BDRV_O_SNAPSHOT
;
6083 bdrv_flags
|= BDRV_O_DIRECT
;
6084 if (bdrv_open2(bdrv
, file
, bdrv_flags
, drv
) < 0) {
6085 fprintf(stderr
, "qemu: could not open disk image %s\n",
6089 return drives_table_idx
;
6092 /***********************************************************/
6095 static USBPort
*used_usb_ports
;
6096 static USBPort
*free_usb_ports
;
6098 /* ??? Maybe change this to register a hub to keep track of the topology. */
6099 void qemu_register_usb_port(USBPort
*port
, void *opaque
, int index
,
6100 usb_attachfn attach
)
6102 port
->opaque
= opaque
;
6103 port
->index
= index
;
6104 port
->attach
= attach
;
6105 port
->next
= free_usb_ports
;
6106 free_usb_ports
= port
;
6109 static int usb_device_add(const char *devname
)
6115 if (!free_usb_ports
)
6118 if (strstart(devname
, "host:", &p
)) {
6119 dev
= usb_host_device_open(p
);
6120 } else if (!strcmp(devname
, "mouse")) {
6121 dev
= usb_mouse_init();
6122 } else if (!strcmp(devname
, "tablet")) {
6123 dev
= usb_tablet_init();
6124 } else if (!strcmp(devname
, "keyboard")) {
6125 dev
= usb_keyboard_init();
6126 } else if (strstart(devname
, "disk:", &p
)) {
6127 dev
= usb_msd_init(p
);
6128 } else if (!strcmp(devname
, "wacom-tablet")) {
6129 dev
= usb_wacom_init();
6130 } else if (strstart(devname
, "serial:", &p
)) {
6131 dev
= usb_serial_init(p
);
6132 #ifdef CONFIG_BRLAPI
6133 } else if (!strcmp(devname
, "braille")) {
6134 dev
= usb_baum_init();
6136 } else if (strstart(devname
, "net:", &p
)) {
6139 if (net_client_init("nic", p
) < 0)
6141 nd_table
[nic
].model
= "usb";
6142 dev
= usb_net_init(&nd_table
[nic
]);
6149 /* Find a USB port to add the device to. */
6150 port
= free_usb_ports
;
6154 /* Create a new hub and chain it on. */
6155 free_usb_ports
= NULL
;
6156 port
->next
= used_usb_ports
;
6157 used_usb_ports
= port
;
6159 hub
= usb_hub_init(VM_USB_HUB_SIZE
);
6160 usb_attach(port
, hub
);
6161 port
= free_usb_ports
;
6164 free_usb_ports
= port
->next
;
6165 port
->next
= used_usb_ports
;
6166 used_usb_ports
= port
;
6167 usb_attach(port
, dev
);
6171 static int usb_device_del(const char *devname
)
6179 if (!used_usb_ports
)
6182 p
= strchr(devname
, '.');
6185 bus_num
= strtoul(devname
, NULL
, 0);
6186 addr
= strtoul(p
+ 1, NULL
, 0);
6190 lastp
= &used_usb_ports
;
6191 port
= used_usb_ports
;
6192 while (port
&& port
->dev
->addr
!= addr
) {
6193 lastp
= &port
->next
;
6201 *lastp
= port
->next
;
6202 usb_attach(port
, NULL
);
6203 dev
->handle_destroy(dev
);
6204 port
->next
= free_usb_ports
;
6205 free_usb_ports
= port
;
6209 void do_usb_add(const char *devname
)
6212 ret
= usb_device_add(devname
);
6214 term_printf("Could not add USB device '%s'\n", devname
);
6217 void do_usb_del(const char *devname
)
6220 ret
= usb_device_del(devname
);
6222 term_printf("Could not remove USB device '%s'\n", devname
);
6229 const char *speed_str
;
6232 term_printf("USB support not enabled\n");
6236 for (port
= used_usb_ports
; port
; port
= port
->next
) {
6240 switch(dev
->speed
) {
6244 case USB_SPEED_FULL
:
6247 case USB_SPEED_HIGH
:
6254 term_printf(" Device %d.%d, Speed %s Mb/s, Product %s\n",
6255 0, dev
->addr
, speed_str
, dev
->devname
);
6259 /***********************************************************/
6260 /* PCMCIA/Cardbus */
6262 static struct pcmcia_socket_entry_s
{
6263 struct pcmcia_socket_s
*socket
;
6264 struct pcmcia_socket_entry_s
*next
;
6265 } *pcmcia_sockets
= 0;
6267 void pcmcia_socket_register(struct pcmcia_socket_s
*socket
)
6269 struct pcmcia_socket_entry_s
*entry
;
6271 entry
= qemu_malloc(sizeof(struct pcmcia_socket_entry_s
));
6272 entry
->socket
= socket
;
6273 entry
->next
= pcmcia_sockets
;
6274 pcmcia_sockets
= entry
;
6277 void pcmcia_socket_unregister(struct pcmcia_socket_s
*socket
)
6279 struct pcmcia_socket_entry_s
*entry
, **ptr
;
6281 ptr
= &pcmcia_sockets
;
6282 for (entry
= *ptr
; entry
; ptr
= &entry
->next
, entry
= *ptr
)
6283 if (entry
->socket
== socket
) {
6289 void pcmcia_info(void)
6291 struct pcmcia_socket_entry_s
*iter
;
6292 if (!pcmcia_sockets
)
6293 term_printf("No PCMCIA sockets\n");
6295 for (iter
= pcmcia_sockets
; iter
; iter
= iter
->next
)
6296 term_printf("%s: %s\n", iter
->socket
->slot_string
,
6297 iter
->socket
->attached
? iter
->socket
->card_string
:
6301 /***********************************************************/
6304 static void dumb_update(DisplayState
*ds
, int x
, int y
, int w
, int h
)
6308 static void dumb_resize(DisplayState
*ds
, int w
, int h
)
6312 static void dumb_refresh(DisplayState
*ds
)
6314 #if defined(CONFIG_SDL)
6319 static void dumb_display_init(DisplayState
*ds
)
6324 ds
->dpy_update
= dumb_update
;
6325 ds
->dpy_resize
= dumb_resize
;
6326 ds
->dpy_refresh
= dumb_refresh
;
6329 /***********************************************************/
6332 #define MAX_IO_HANDLERS 64
6334 typedef struct IOHandlerRecord
{
6336 IOCanRWHandler
*fd_read_poll
;
6338 IOHandler
*fd_write
;
6341 /* temporary data */
6343 struct IOHandlerRecord
*next
;
6346 static IOHandlerRecord
*first_io_handler
;
6348 /* XXX: fd_read_poll should be suppressed, but an API change is
6349 necessary in the character devices to suppress fd_can_read(). */
6350 int qemu_set_fd_handler2(int fd
,
6351 IOCanRWHandler
*fd_read_poll
,
6353 IOHandler
*fd_write
,
6356 IOHandlerRecord
**pioh
, *ioh
;
6358 if (!fd_read
&& !fd_write
) {
6359 pioh
= &first_io_handler
;
6364 if (ioh
->fd
== fd
) {
6371 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
6375 ioh
= qemu_mallocz(sizeof(IOHandlerRecord
));
6378 ioh
->next
= first_io_handler
;
6379 first_io_handler
= ioh
;
6382 ioh
->fd_read_poll
= fd_read_poll
;
6383 ioh
->fd_read
= fd_read
;
6384 ioh
->fd_write
= fd_write
;
6385 ioh
->opaque
= opaque
;
6392 int qemu_set_fd_handler(int fd
,
6394 IOHandler
*fd_write
,
6397 return qemu_set_fd_handler2(fd
, NULL
, fd_read
, fd_write
, opaque
);
6400 /***********************************************************/
6401 /* Polling handling */
6403 typedef struct PollingEntry
{
6406 struct PollingEntry
*next
;
6409 static PollingEntry
*first_polling_entry
;
6411 int qemu_add_polling_cb(PollingFunc
*func
, void *opaque
)
6413 PollingEntry
**ppe
, *pe
;
6414 pe
= qemu_mallocz(sizeof(PollingEntry
));
6418 pe
->opaque
= opaque
;
6419 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
);
6424 void qemu_del_polling_cb(PollingFunc
*func
, void *opaque
)
6426 PollingEntry
**ppe
, *pe
;
6427 for(ppe
= &first_polling_entry
; *ppe
!= NULL
; ppe
= &(*ppe
)->next
) {
6429 if (pe
->func
== func
&& pe
->opaque
== opaque
) {
6438 /***********************************************************/
6439 /* Wait objects support */
6440 typedef struct WaitObjects
{
6442 HANDLE events
[MAXIMUM_WAIT_OBJECTS
+ 1];
6443 WaitObjectFunc
*func
[MAXIMUM_WAIT_OBJECTS
+ 1];
6444 void *opaque
[MAXIMUM_WAIT_OBJECTS
+ 1];
6447 static WaitObjects wait_objects
= {0};
6449 int qemu_add_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6451 WaitObjects
*w
= &wait_objects
;
6453 if (w
->num
>= MAXIMUM_WAIT_OBJECTS
)
6455 w
->events
[w
->num
] = handle
;
6456 w
->func
[w
->num
] = func
;
6457 w
->opaque
[w
->num
] = opaque
;
6462 void qemu_del_wait_object(HANDLE handle
, WaitObjectFunc
*func
, void *opaque
)
6465 WaitObjects
*w
= &wait_objects
;
6468 for (i
= 0; i
< w
->num
; i
++) {
6469 if (w
->events
[i
] == handle
)
6472 w
->events
[i
] = w
->events
[i
+ 1];
6473 w
->func
[i
] = w
->func
[i
+ 1];
6474 w
->opaque
[i
] = w
->opaque
[i
+ 1];
6482 #define SELF_ANNOUNCE_ROUNDS 5
6483 #define ETH_P_EXPERIMENTAL 0x01F1 /* just a number */
6484 //#define ETH_P_EXPERIMENTAL 0x0012 /* make it the size of the packet */
6485 #define EXPERIMENTAL_MAGIC 0xf1f23f4f
6487 static int announce_self_create(uint8_t *buf
,
6490 uint32_t magic
= EXPERIMENTAL_MAGIC
;
6491 uint16_t proto
= htons(ETH_P_EXPERIMENTAL
);
6493 /* FIXME: should we send a different packet (arp/rarp/ping)? */
6495 memset(buf
, 0xff, 6); /* h_dst */
6496 memcpy(buf
+ 6, mac_addr
, 6); /* h_src */
6497 memcpy(buf
+ 12, &proto
, 2); /* h_proto */
6498 memcpy(buf
+ 14, &magic
, 4); /* magic */
6500 return 18; /* len */
6503 static void qemu_announce_self(void)
6507 VLANClientState
*vc
;
6510 for (i
= 0; i
< nb_nics
; i
++) {
6511 len
= announce_self_create(buf
, nd_table
[i
].macaddr
);
6512 vlan
= nd_table
[i
].vlan
;
6513 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
6514 if (vc
->fd_read
== tap_receive
) /* send only if tap */
6515 for (j
=0; j
< SELF_ANNOUNCE_ROUNDS
; j
++)
6516 vc
->fd_read(vc
->opaque
, buf
, len
);
6521 /***********************************************************/
6522 /* savevm/loadvm support */
6524 #define IO_BUF_SIZE 32768
6527 QEMUFilePutBufferFunc
*put_buffer
;
6528 QEMUFileGetBufferFunc
*get_buffer
;
6529 QEMUFileCloseFunc
*close
;
6532 int64_t buf_offset
; /* start of buffer when writing, end of buffer
6535 int buf_size
; /* 0 when writing */
6536 uint8_t buf
[IO_BUF_SIZE
];
6539 typedef struct QEMUFileFD
6544 static int fd_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6546 QEMUFileFD
*s
= opaque
;
6551 len
= read(s
->fd
, buf
+ offset
, size
- offset
);
6553 if (errno
== EINTR
|| errno
== EAGAIN
)
6560 QEMUFile
*qemu_fopen_fd(int fd
)
6562 QEMUFileFD
*s
= qemu_mallocz(sizeof(QEMUFileFD
));
6564 return qemu_fopen(s
, NULL
, fd_get_buffer
, qemu_free
);
6567 typedef struct QEMUFileUnix
6572 static void file_put_buffer(void *opaque
, const uint8_t *buf
, int64_t pos
, int size
)
6574 QEMUFileUnix
*s
= opaque
;
6575 fseek(s
->outfile
, pos
, SEEK_SET
);
6576 fwrite(buf
, 1, size
, s
->outfile
);
6579 static int file_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6581 QEMUFileUnix
*s
= opaque
;
6582 fseek(s
->outfile
, pos
, SEEK_SET
);
6583 return fread(buf
, 1, size
, s
->outfile
);
6586 static void file_close(void *opaque
)
6588 QEMUFileUnix
*s
= opaque
;
6593 QEMUFile
*qemu_fopen_file(const char *filename
, const char *mode
)
6597 s
= qemu_mallocz(sizeof(QEMUFileUnix
));
6601 s
->outfile
= fopen(filename
, mode
);
6605 if (!strcmp(mode
, "wb"))
6606 return qemu_fopen(s
, file_put_buffer
, NULL
, file_close
);
6607 else if (!strcmp(mode
, "rb"))
6608 return qemu_fopen(s
, NULL
, file_get_buffer
, file_close
);
6617 typedef struct QEMUFileBdrv
6619 BlockDriverState
*bs
;
6620 int64_t base_offset
;
6623 static void bdrv_put_buffer(void *opaque
, const uint8_t *buf
, int64_t pos
, int size
)
6625 QEMUFileBdrv
*s
= opaque
;
6626 bdrv_pwrite(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6629 static int bdrv_get_buffer(void *opaque
, uint8_t *buf
, int64_t pos
, int size
)
6631 QEMUFileBdrv
*s
= opaque
;
6632 return bdrv_pread(s
->bs
, s
->base_offset
+ pos
, buf
, size
);
6635 QEMUFile
*qemu_fopen_bdrv(BlockDriverState
*bs
, int64_t offset
, int is_writable
)
6639 s
= qemu_mallocz(sizeof(QEMUFileBdrv
));
6644 s
->base_offset
= offset
;
6647 return qemu_fopen(s
, bdrv_put_buffer
, NULL
, qemu_free
);
6649 return qemu_fopen(s
, NULL
, bdrv_get_buffer
, qemu_free
);
6652 QEMUFile
*qemu_fopen(void *opaque
, QEMUFilePutBufferFunc
*put_buffer
,
6653 QEMUFileGetBufferFunc
*get_buffer
, QEMUFileCloseFunc
*close
)
6657 f
= qemu_mallocz(sizeof(QEMUFile
));
6662 f
->put_buffer
= put_buffer
;
6663 f
->get_buffer
= get_buffer
;
6669 void qemu_fflush(QEMUFile
*f
)
6674 if (f
->buf_index
> 0) {
6675 f
->put_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, f
->buf_index
);
6676 f
->buf_offset
+= f
->buf_index
;
6681 static void qemu_fill_buffer(QEMUFile
*f
)
6688 len
= f
->get_buffer(f
->opaque
, f
->buf
, f
->buf_offset
, IO_BUF_SIZE
);
6694 f
->buf_offset
+= len
;
6697 void qemu_fclose(QEMUFile
*f
)
6701 f
->close(f
->opaque
);
6705 void qemu_put_buffer(QEMUFile
*f
, const uint8_t *buf
, int size
)
6709 l
= IO_BUF_SIZE
- f
->buf_index
;
6712 memcpy(f
->buf
+ f
->buf_index
, buf
, l
);
6716 if (f
->buf_index
>= IO_BUF_SIZE
)
6721 void qemu_put_byte(QEMUFile
*f
, int v
)
6723 f
->buf
[f
->buf_index
++] = v
;
6724 if (f
->buf_index
>= IO_BUF_SIZE
)
6728 int qemu_get_buffer(QEMUFile
*f
, uint8_t *buf
, int size1
)
6734 l
= f
->buf_size
- f
->buf_index
;
6736 qemu_fill_buffer(f
);
6737 l
= f
->buf_size
- f
->buf_index
;
6743 memcpy(buf
, f
->buf
+ f
->buf_index
, l
);
6748 return size1
- size
;
6751 int qemu_get_byte(QEMUFile
*f
)
6753 if (f
->buf_index
>= f
->buf_size
) {
6754 qemu_fill_buffer(f
);
6755 if (f
->buf_index
>= f
->buf_size
)
6758 return f
->buf
[f
->buf_index
++];
6761 int64_t qemu_ftell(QEMUFile
*f
)
6763 return f
->buf_offset
- f
->buf_size
+ f
->buf_index
;
6766 int64_t qemu_fseek(QEMUFile
*f
, int64_t pos
, int whence
)
6768 if (whence
== SEEK_SET
) {
6770 } else if (whence
== SEEK_CUR
) {
6771 pos
+= qemu_ftell(f
);
6773 /* SEEK_END not supported */
6776 if (f
->put_buffer
) {
6778 f
->buf_offset
= pos
;
6780 f
->buf_offset
= pos
;
6787 void qemu_put_be16(QEMUFile
*f
, unsigned int v
)
6789 qemu_put_byte(f
, v
>> 8);
6790 qemu_put_byte(f
, v
);
6793 void qemu_put_be32(QEMUFile
*f
, unsigned int v
)
6795 qemu_put_byte(f
, v
>> 24);
6796 qemu_put_byte(f
, v
>> 16);
6797 qemu_put_byte(f
, v
>> 8);
6798 qemu_put_byte(f
, v
);
6801 void qemu_put_be64(QEMUFile
*f
, uint64_t v
)
6803 qemu_put_be32(f
, v
>> 32);
6804 qemu_put_be32(f
, v
);
6807 unsigned int qemu_get_be16(QEMUFile
*f
)
6810 v
= qemu_get_byte(f
) << 8;
6811 v
|= qemu_get_byte(f
);
6815 unsigned int qemu_get_be32(QEMUFile
*f
)
6818 v
= qemu_get_byte(f
) << 24;
6819 v
|= qemu_get_byte(f
) << 16;
6820 v
|= qemu_get_byte(f
) << 8;
6821 v
|= qemu_get_byte(f
);
6825 uint64_t qemu_get_be64(QEMUFile
*f
)
6828 v
= (uint64_t)qemu_get_be32(f
) << 32;
6829 v
|= qemu_get_be32(f
);
6833 typedef struct SaveStateEntry
{
6837 SaveStateHandler
*save_state
;
6838 LoadStateHandler
*load_state
;
6840 struct SaveStateEntry
*next
;
6843 static SaveStateEntry
*first_se
;
6845 /* TODO: Individual devices generally have very little idea about the rest
6846 of the system, so instance_id should be removed/replaced.
6847 Meanwhile pass -1 as instance_id if you do not already have a clearly
6848 distinguishing id for all instances of your device class. */
6849 int register_savevm(const char *idstr
,
6852 SaveStateHandler
*save_state
,
6853 LoadStateHandler
*load_state
,
6856 SaveStateEntry
*se
, **pse
;
6858 se
= qemu_malloc(sizeof(SaveStateEntry
));
6861 pstrcpy(se
->idstr
, sizeof(se
->idstr
), idstr
);
6862 se
->instance_id
= (instance_id
== -1) ? 0 : instance_id
;
6863 se
->version_id
= version_id
;
6864 se
->save_state
= save_state
;
6865 se
->load_state
= load_state
;
6866 se
->opaque
= opaque
;
6869 /* add at the end of list */
6871 while (*pse
!= NULL
) {
6872 if (instance_id
== -1
6873 && strcmp(se
->idstr
, (*pse
)->idstr
) == 0
6874 && se
->instance_id
<= (*pse
)->instance_id
)
6875 se
->instance_id
= (*pse
)->instance_id
+ 1;
6876 pse
= &(*pse
)->next
;
6882 #define QEMU_VM_FILE_MAGIC 0x5145564d
6883 #define QEMU_VM_FILE_VERSION 0x00000002
6885 static int qemu_savevm_state(QEMUFile
*f
)
6889 int64_t cur_pos
, len_pos
, total_len_pos
;
6891 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
6892 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
6893 total_len_pos
= qemu_ftell(f
);
6894 qemu_put_be64(f
, 0); /* total size */
6896 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6897 if (se
->save_state
== NULL
)
6898 /* this one has a loader only, for backwards compatibility */
6902 len
= strlen(se
->idstr
);
6903 qemu_put_byte(f
, len
);
6904 qemu_put_buffer(f
, (uint8_t *)se
->idstr
, len
);
6906 qemu_put_be32(f
, se
->instance_id
);
6907 qemu_put_be32(f
, se
->version_id
);
6909 /* record size: filled later */
6910 len_pos
= qemu_ftell(f
);
6911 qemu_put_be32(f
, 0);
6912 se
->save_state(f
, se
->opaque
);
6914 /* fill record size */
6915 cur_pos
= qemu_ftell(f
);
6916 len
= cur_pos
- len_pos
- 4;
6917 qemu_fseek(f
, len_pos
, SEEK_SET
);
6918 qemu_put_be32(f
, len
);
6919 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6921 cur_pos
= qemu_ftell(f
);
6922 qemu_fseek(f
, total_len_pos
, SEEK_SET
);
6923 qemu_put_be64(f
, cur_pos
- total_len_pos
- 8);
6924 qemu_fseek(f
, cur_pos
, SEEK_SET
);
6930 static SaveStateEntry
*find_se(const char *idstr
, int instance_id
)
6934 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
6935 if (!strcmp(se
->idstr
, idstr
) &&
6936 instance_id
== se
->instance_id
)
6942 static int qemu_loadvm_state(QEMUFile
*f
)
6945 int len
, ret
, instance_id
, record_len
, version_id
;
6946 int64_t total_len
, end_pos
, cur_pos
;
6950 v
= qemu_get_be32(f
);
6951 if (v
!= QEMU_VM_FILE_MAGIC
)
6953 v
= qemu_get_be32(f
);
6954 if (v
!= QEMU_VM_FILE_VERSION
) {
6959 total_len
= qemu_get_be64(f
);
6960 end_pos
= total_len
+ qemu_ftell(f
);
6962 if (qemu_ftell(f
) >= end_pos
)
6964 len
= qemu_get_byte(f
);
6965 qemu_get_buffer(f
, (uint8_t *)idstr
, len
);
6967 instance_id
= qemu_get_be32(f
);
6968 version_id
= qemu_get_be32(f
);
6969 record_len
= qemu_get_be32(f
);
6971 printf("idstr=%s instance=0x%x version=%d len=%d\n",
6972 idstr
, instance_id
, version_id
, record_len
);
6974 cur_pos
= qemu_ftell(f
);
6975 se
= find_se(idstr
, instance_id
);
6977 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
6978 instance_id
, idstr
);
6980 ret
= se
->load_state(f
, se
->opaque
, version_id
);
6982 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
6983 instance_id
, idstr
);
6987 /* always seek to exact end of record */
6988 qemu_fseek(f
, cur_pos
+ record_len
, SEEK_SET
);
6995 int qemu_live_savevm_state(QEMUFile
*f
)
7000 qemu_put_be32(f
, QEMU_VM_FILE_MAGIC
);
7001 qemu_put_be32(f
, QEMU_VM_FILE_VERSION
);
7003 for(se
= first_se
; se
!= NULL
; se
= se
->next
) {
7004 len
= strlen(se
->idstr
);
7006 qemu_put_byte(f
, len
);
7007 qemu_put_buffer(f
, se
->idstr
, len
);
7008 qemu_put_be32(f
, se
->instance_id
);
7009 qemu_put_be32(f
, se
->version_id
);
7011 se
->save_state(f
, se
->opaque
);
7014 qemu_put_byte(f
, 0);
7020 int qemu_live_loadvm_state(QEMUFile
*f
)
7023 int len
, ret
, instance_id
, version_id
;
7027 v
= qemu_get_be32(f
);
7028 if (v
!= QEMU_VM_FILE_MAGIC
)
7030 v
= qemu_get_be32(f
);
7031 if (v
!= QEMU_VM_FILE_VERSION
) {
7038 len
= qemu_get_byte(f
);
7041 qemu_get_buffer(f
, idstr
, len
);
7043 instance_id
= qemu_get_be32(f
);
7044 version_id
= qemu_get_be32(f
);
7045 se
= find_se(idstr
, instance_id
);
7047 fprintf(stderr
, "qemu: warning: instance 0x%x of device '%s' not present in current VM\n",
7048 instance_id
, idstr
);
7050 if (version_id
> se
->version_id
) { /* src version > dst version */
7051 fprintf(stderr
, "migration:version mismatch:%s:%d(s)>%d(d)\n",
7052 idstr
, version_id
, se
->version_id
);
7056 ret
= se
->load_state(f
, se
->opaque
, version_id
);
7058 fprintf(stderr
, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n",
7059 instance_id
, idstr
);
7066 qemu_announce_self();
7072 /* device can contain snapshots */
7073 static int bdrv_can_snapshot(BlockDriverState
*bs
)
7076 !bdrv_is_removable(bs
) &&
7077 !bdrv_is_read_only(bs
));
7080 /* device must be snapshots in order to have a reliable snapshot */
7081 static int bdrv_has_snapshot(BlockDriverState
*bs
)
7084 !bdrv_is_removable(bs
) &&
7085 !bdrv_is_read_only(bs
));
7088 static BlockDriverState
*get_bs_snapshots(void)
7090 BlockDriverState
*bs
;
7094 return bs_snapshots
;
7095 for(i
= 0; i
<= nb_drives
; i
++) {
7096 bs
= drives_table
[i
].bdrv
;
7097 if (bdrv_can_snapshot(bs
))
7106 static int bdrv_snapshot_find(BlockDriverState
*bs
, QEMUSnapshotInfo
*sn_info
,
7109 QEMUSnapshotInfo
*sn_tab
, *sn
;
7113 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
7116 for(i
= 0; i
< nb_sns
; i
++) {
7118 if (!strcmp(sn
->id_str
, name
) || !strcmp(sn
->name
, name
)) {
7128 void do_savevm(const char *name
)
7130 BlockDriverState
*bs
, *bs1
;
7131 QEMUSnapshotInfo sn1
, *sn
= &sn1
, old_sn1
, *old_sn
= &old_sn1
;
7132 int must_delete
, ret
, i
;
7133 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
7135 int saved_vm_running
;
7142 bs
= get_bs_snapshots();
7144 term_printf("No block device can accept snapshots\n");
7148 /* ??? Should this occur after vm_stop? */
7151 saved_vm_running
= vm_running
;
7156 ret
= bdrv_snapshot_find(bs
, old_sn
, name
);
7161 memset(sn
, 0, sizeof(*sn
));
7163 pstrcpy(sn
->name
, sizeof(sn
->name
), old_sn
->name
);
7164 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), old_sn
->id_str
);
7167 pstrcpy(sn
->name
, sizeof(sn
->name
), name
);
7170 /* fill auxiliary fields */
7173 sn
->date_sec
= tb
.time
;
7174 sn
->date_nsec
= tb
.millitm
* 1000000;
7176 gettimeofday(&tv
, NULL
);
7177 sn
->date_sec
= tv
.tv_sec
;
7178 sn
->date_nsec
= tv
.tv_usec
* 1000;
7180 sn
->vm_clock_nsec
= qemu_get_clock(vm_clock
);
7182 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7183 term_printf("Device %s does not support VM state snapshots\n",
7184 bdrv_get_device_name(bs
));
7188 /* save the VM state */
7189 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 1);
7191 term_printf("Could not open VM state file\n");
7194 ret
= qemu_savevm_state(f
);
7195 sn
->vm_state_size
= qemu_ftell(f
);
7198 term_printf("Error %d while writing VM\n", ret
);
7202 /* create the snapshots */
7204 for(i
= 0; i
< nb_drives
; i
++) {
7205 bs1
= drives_table
[i
].bdrv
;
7206 if (bdrv_has_snapshot(bs1
)) {
7208 ret
= bdrv_snapshot_delete(bs1
, old_sn
->id_str
);
7210 term_printf("Error while deleting snapshot on '%s'\n",
7211 bdrv_get_device_name(bs1
));
7214 ret
= bdrv_snapshot_create(bs1
, sn
);
7216 term_printf("Error while creating snapshot on '%s'\n",
7217 bdrv_get_device_name(bs1
));
7223 if (saved_vm_running
)
7227 void do_loadvm(const char *name
)
7229 BlockDriverState
*bs
, *bs1
;
7230 BlockDriverInfo bdi1
, *bdi
= &bdi1
;
7233 int saved_vm_running
;
7235 bs
= get_bs_snapshots();
7237 term_printf("No block device supports snapshots\n");
7241 /* Flush all IO requests so they don't interfere with the new state. */
7244 saved_vm_running
= vm_running
;
7247 for(i
= 0; i
<= nb_drives
; i
++) {
7248 bs1
= drives_table
[i
].bdrv
;
7249 if (bdrv_has_snapshot(bs1
)) {
7250 ret
= bdrv_snapshot_goto(bs1
, name
);
7253 term_printf("Warning: ");
7256 term_printf("Snapshots not supported on device '%s'\n",
7257 bdrv_get_device_name(bs1
));
7260 term_printf("Could not find snapshot '%s' on device '%s'\n",
7261 name
, bdrv_get_device_name(bs1
));
7264 term_printf("Error %d while activating snapshot on '%s'\n",
7265 ret
, bdrv_get_device_name(bs1
));
7268 /* fatal on snapshot block device */
7275 if (bdrv_get_info(bs
, bdi
) < 0 || bdi
->vm_state_offset
<= 0) {
7276 term_printf("Device %s does not support VM state snapshots\n",
7277 bdrv_get_device_name(bs
));
7281 /* restore the VM state */
7282 f
= qemu_fopen_bdrv(bs
, bdi
->vm_state_offset
, 0);
7284 term_printf("Could not open VM state file\n");
7287 ret
= qemu_loadvm_state(f
);
7290 term_printf("Error %d while loading VM state\n", ret
);
7293 if (saved_vm_running
)
7297 void do_delvm(const char *name
)
7299 BlockDriverState
*bs
, *bs1
;
7302 bs
= get_bs_snapshots();
7304 term_printf("No block device supports snapshots\n");
7308 for(i
= 0; i
<= nb_drives
; i
++) {
7309 bs1
= drives_table
[i
].bdrv
;
7310 if (bdrv_has_snapshot(bs1
)) {
7311 ret
= bdrv_snapshot_delete(bs1
, name
);
7313 if (ret
== -ENOTSUP
)
7314 term_printf("Snapshots not supported on device '%s'\n",
7315 bdrv_get_device_name(bs1
));
7317 term_printf("Error %d while deleting snapshot on '%s'\n",
7318 ret
, bdrv_get_device_name(bs1
));
7324 void do_info_snapshots(void)
7326 BlockDriverState
*bs
, *bs1
;
7327 QEMUSnapshotInfo
*sn_tab
, *sn
;
7331 bs
= get_bs_snapshots();
7333 term_printf("No available block device supports snapshots\n");
7336 term_printf("Snapshot devices:");
7337 for(i
= 0; i
<= nb_drives
; i
++) {
7338 bs1
= drives_table
[i
].bdrv
;
7339 if (bdrv_has_snapshot(bs1
)) {
7341 term_printf(" %s", bdrv_get_device_name(bs1
));
7346 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
7348 term_printf("bdrv_snapshot_list: error %d\n", nb_sns
);
7351 term_printf("Snapshot list (from %s):\n", bdrv_get_device_name(bs
));
7352 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), NULL
));
7353 for(i
= 0; i
< nb_sns
; i
++) {
7355 term_printf("%s\n", bdrv_snapshot_dump(buf
, sizeof(buf
), sn
));
7360 /***********************************************************/
7361 /* ram save/restore */
7363 static int ram_get_page(QEMUFile
*f
, uint8_t *buf
, int len
)
7367 v
= qemu_get_byte(f
);
7370 if (qemu_get_buffer(f
, buf
, len
) != len
)
7374 v
= qemu_get_byte(f
);
7375 memset(buf
, v
, len
);
7383 static int ram_load_v1(QEMUFile
*f
, void *opaque
)
7388 if (qemu_get_be32(f
) != phys_ram_size
)
7390 for(i
= 0; i
< phys_ram_size
; i
+= TARGET_PAGE_SIZE
) {
7391 if (kvm_enabled() && (i
>=0xa0000) && (i
<0xc0000)) /* do not access video-addresses */
7393 ret
= ram_get_page(f
, phys_ram_base
+ i
, TARGET_PAGE_SIZE
);
7400 #define BDRV_HASH_BLOCK_SIZE 1024
7401 #define IOBUF_SIZE 4096
7402 #define RAM_CBLOCK_MAGIC 0xfabe
7404 typedef struct RamCompressState
{
7407 uint8_t buf
[IOBUF_SIZE
];
7410 static int ram_compress_open(RamCompressState
*s
, QEMUFile
*f
)
7413 memset(s
, 0, sizeof(*s
));
7415 ret
= deflateInit2(&s
->zstream
, 1,
7417 9, Z_DEFAULT_STRATEGY
);
7420 s
->zstream
.avail_out
= IOBUF_SIZE
;
7421 s
->zstream
.next_out
= s
->buf
;
7425 static void ram_put_cblock(RamCompressState
*s
, const uint8_t *buf
, int len
)
7427 qemu_put_be16(s
->f
, RAM_CBLOCK_MAGIC
);
7428 qemu_put_be16(s
->f
, len
);
7429 qemu_put_buffer(s
->f
, buf
, len
);
7432 static int ram_compress_buf(RamCompressState
*s
, const uint8_t *buf
, int len
)
7436 s
->zstream
.avail_in
= len
;
7437 s
->zstream
.next_in
= (uint8_t *)buf
;
7438 while (s
->zstream
.avail_in
> 0) {
7439 ret
= deflate(&s
->zstream
, Z_NO_FLUSH
);
7442 if (s
->zstream
.avail_out
== 0) {
7443 ram_put_cblock(s
, s
->buf
, IOBUF_SIZE
);
7444 s
->zstream
.avail_out
= IOBUF_SIZE
;
7445 s
->zstream
.next_out
= s
->buf
;
7451 static void ram_compress_close(RamCompressState
*s
)
7455 /* compress last bytes */
7457 ret
= deflate(&s
->zstream
, Z_FINISH
);
7458 if (ret
== Z_OK
|| ret
== Z_STREAM_END
) {
7459 len
= IOBUF_SIZE
- s
->zstream
.avail_out
;
7461 ram_put_cblock(s
, s
->buf
, len
);
7463 s
->zstream
.avail_out
= IOBUF_SIZE
;
7464 s
->zstream
.next_out
= s
->buf
;
7465 if (ret
== Z_STREAM_END
)
7472 deflateEnd(&s
->zstream
);
7475 typedef struct RamDecompressState
{
7478 uint8_t buf
[IOBUF_SIZE
];
7479 } RamDecompressState
;
7481 static int ram_decompress_open(RamDecompressState
*s
, QEMUFile
*f
)
7484 memset(s
, 0, sizeof(*s
));
7486 ret
= inflateInit(&s
->zstream
);
7492 static int ram_decompress_buf(RamDecompressState
*s
, uint8_t *buf
, int len
)
7496 s
->zstream
.avail_out
= len
;
7497 s
->zstream
.next_out
= buf
;
7498 while (s
->zstream
.avail_out
> 0) {
7499 if (s
->zstream
.avail_in
== 0) {
7500 if (qemu_get_be16(s
->f
) != RAM_CBLOCK_MAGIC
)
7502 clen
= qemu_get_be16(s
->f
);
7503 if (clen
> IOBUF_SIZE
)
7505 qemu_get_buffer(s
->f
, s
->buf
, clen
);
7506 s
->zstream
.avail_in
= clen
;
7507 s
->zstream
.next_in
= s
->buf
;
7509 ret
= inflate(&s
->zstream
, Z_PARTIAL_FLUSH
);
7510 if (ret
!= Z_OK
&& ret
!= Z_STREAM_END
) {
7517 static void ram_decompress_close(RamDecompressState
*s
)
7519 inflateEnd(&s
->zstream
);
7522 static void ram_save_live(QEMUFile
*f
, void *opaque
)
7526 for (addr
= 0; addr
< phys_ram_size
; addr
+= TARGET_PAGE_SIZE
) {
7527 if (kvm_enabled() && (addr
>=0xa0000) && (addr
<0xc0000)) /* do not access video-addresses */
7529 if (cpu_physical_memory_get_dirty(addr
, MIGRATION_DIRTY_FLAG
)) {
7530 qemu_put_be32(f
, addr
);
7531 qemu_put_buffer(f
, phys_ram_base
+ addr
, TARGET_PAGE_SIZE
);
7534 qemu_put_be32(f
, 1);
7537 static void ram_save_static(QEMUFile
*f
, void *opaque
)
7540 RamCompressState s1
, *s
= &s1
;
7543 qemu_put_be32(f
, phys_ram_size
);
7544 if (ram_compress_open(s
, f
) < 0)
7546 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
7547 if (kvm_enabled() && (i
>=0xa0000) && (i
<0xc0000)) /* do not access video-addresses */
7550 if (tight_savevm_enabled
) {
7554 /* find if the memory block is available on a virtual
7557 for(j
= 0; j
< nb_drives
; j
++) {
7558 sector_num
= bdrv_hash_find(drives_table
[j
].bdrv
,
7560 BDRV_HASH_BLOCK_SIZE
);
7561 if (sector_num
>= 0)
7565 goto normal_compress
;
7568 cpu_to_be64wu((uint64_t *)(buf
+ 2), sector_num
);
7569 ram_compress_buf(s
, buf
, 10);
7575 ram_compress_buf(s
, buf
, 1);
7576 ram_compress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
);
7579 ram_compress_close(s
);
7582 static void ram_save(QEMUFile
*f
, void *opaque
)
7584 int in_migration
= cpu_physical_memory_get_dirty_tracking();
7586 qemu_put_byte(f
, in_migration
);
7589 ram_save_live(f
, opaque
);
7591 ram_save_static(f
, opaque
);
7594 static int ram_load_live(QEMUFile
*f
, void *opaque
)
7599 addr
= qemu_get_be32(f
);
7603 qemu_get_buffer(f
, phys_ram_base
+ addr
, TARGET_PAGE_SIZE
);
7609 static int ram_load_static(QEMUFile
*f
, void *opaque
)
7611 RamDecompressState s1
, *s
= &s1
;
7615 if (qemu_get_be32(f
) != phys_ram_size
)
7617 if (ram_decompress_open(s
, f
) < 0)
7619 for(i
= 0; i
< phys_ram_size
; i
+= BDRV_HASH_BLOCK_SIZE
) {
7620 if (kvm_enabled() && (i
>=0xa0000) && (i
<0xc0000)) /* do not access video-addresses */
7622 if (ram_decompress_buf(s
, buf
, 1) < 0) {
7623 fprintf(stderr
, "Error while reading ram block header\n");
7627 if (ram_decompress_buf(s
, phys_ram_base
+ i
, BDRV_HASH_BLOCK_SIZE
) < 0) {
7628 fprintf(stderr
, "Error while reading ram block address=0x%08" PRIx64
, (uint64_t)i
);
7637 ram_decompress_buf(s
, buf
+ 1, 9);
7639 sector_num
= be64_to_cpupu((const uint64_t *)(buf
+ 2));
7640 if (bs_index
>= nb_drives
) {
7641 fprintf(stderr
, "Invalid block device index %d\n", bs_index
);
7644 if (bdrv_read(drives_table
[bs_index
].bdrv
, sector_num
,
7646 BDRV_HASH_BLOCK_SIZE
/ 512) < 0) {
7647 fprintf(stderr
, "Error while reading sector %d:%" PRId64
"\n",
7648 bs_index
, sector_num
);
7655 printf("Error block header\n");
7659 ram_decompress_close(s
);
7663 static int ram_load(QEMUFile
*f
, void *opaque
, int version_id
)
7667 switch (version_id
) {
7669 ret
= ram_load_v1(f
, opaque
);
7672 if (qemu_get_byte(f
)) {
7673 ret
= ram_load_live(f
, opaque
);
7677 ret
= ram_load_static(f
, opaque
);
7687 /***********************************************************/
7688 /* bottom halves (can be seen as timers which expire ASAP) */
7697 static QEMUBH
*first_bh
= NULL
;
7699 QEMUBH
*qemu_bh_new(QEMUBHFunc
*cb
, void *opaque
)
7702 bh
= qemu_mallocz(sizeof(QEMUBH
));
7706 bh
->opaque
= opaque
;
7710 int qemu_bh_poll(void)
7729 void qemu_bh_schedule(QEMUBH
*bh
)
7731 CPUState
*env
= cpu_single_env
;
7735 bh
->next
= first_bh
;
7738 /* stop the currently executing CPU to execute the BH ASAP */
7740 cpu_interrupt(env
, CPU_INTERRUPT_EXIT
);
7745 void qemu_bh_cancel(QEMUBH
*bh
)
7748 if (bh
->scheduled
) {
7751 pbh
= &(*pbh
)->next
;
7757 void qemu_bh_delete(QEMUBH
*bh
)
7763 /***********************************************************/
7764 /* machine registration */
7766 QEMUMachine
*first_machine
= NULL
;
7767 QEMUMachine
*current_machine
= NULL
;
7769 int qemu_register_machine(QEMUMachine
*m
)
7772 pm
= &first_machine
;
7780 static QEMUMachine
*find_machine(const char *name
)
7784 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
7785 if (!strcmp(m
->name
, name
))
7791 /***********************************************************/
7792 /* main execution loop */
7794 static void gui_update(void *opaque
)
7796 DisplayState
*ds
= opaque
;
7797 ds
->dpy_refresh(ds
);
7798 qemu_mod_timer(ds
->gui_timer
,
7799 (ds
->gui_timer_interval
?
7800 ds
->gui_timer_interval
:
7801 GUI_REFRESH_INTERVAL
)
7802 + qemu_get_clock(rt_clock
));
7805 struct vm_change_state_entry
{
7806 VMChangeStateHandler
*cb
;
7808 LIST_ENTRY (vm_change_state_entry
) entries
;
7811 static LIST_HEAD(vm_change_state_head
, vm_change_state_entry
) vm_change_state_head
;
7813 VMChangeStateEntry
*qemu_add_vm_change_state_handler(VMChangeStateHandler
*cb
,
7816 VMChangeStateEntry
*e
;
7818 e
= qemu_mallocz(sizeof (*e
));
7824 LIST_INSERT_HEAD(&vm_change_state_head
, e
, entries
);
7828 void qemu_del_vm_change_state_handler(VMChangeStateEntry
*e
)
7830 LIST_REMOVE (e
, entries
);
7834 static void vm_state_notify(int running
)
7836 VMChangeStateEntry
*e
;
7838 for (e
= vm_change_state_head
.lh_first
; e
; e
= e
->entries
.le_next
) {
7839 e
->cb(e
->opaque
, running
);
7843 /* XXX: support several handlers */
7844 static VMStopHandler
*vm_stop_cb
;
7845 static void *vm_stop_opaque
;
7847 int qemu_add_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7850 vm_stop_opaque
= opaque
;
7854 void qemu_del_vm_stop_handler(VMStopHandler
*cb
, void *opaque
)
7865 qemu_rearm_alarm_timer(alarm_timer
);
7869 void vm_stop(int reason
)
7872 cpu_disable_ticks();
7876 vm_stop_cb(vm_stop_opaque
, reason
);
7883 /* reset/shutdown handler */
7885 typedef struct QEMUResetEntry
{
7886 QEMUResetHandler
*func
;
7888 struct QEMUResetEntry
*next
;
7891 static QEMUResetEntry
*first_reset_entry
;
7892 static int reset_requested
;
7893 static int shutdown_requested
;
7894 static int powerdown_requested
;
7896 int qemu_shutdown_requested(void)
7898 int r
= shutdown_requested
;
7899 shutdown_requested
= 0;
7903 int qemu_reset_requested(void)
7905 int r
= reset_requested
;
7906 reset_requested
= 0;
7910 int qemu_powerdown_requested(void)
7912 int r
= powerdown_requested
;
7913 powerdown_requested
= 0;
7917 void qemu_register_reset(QEMUResetHandler
*func
, void *opaque
)
7919 QEMUResetEntry
**pre
, *re
;
7921 pre
= &first_reset_entry
;
7922 while (*pre
!= NULL
)
7923 pre
= &(*pre
)->next
;
7924 re
= qemu_mallocz(sizeof(QEMUResetEntry
));
7926 re
->opaque
= opaque
;
7931 void qemu_system_reset(void)
7935 /* reset all devices */
7936 for(re
= first_reset_entry
; re
!= NULL
; re
= re
->next
) {
7937 re
->func(re
->opaque
);
7941 void qemu_system_reset_request(void)
7944 shutdown_requested
= 1;
7946 reset_requested
= 1;
7949 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7953 void qemu_system_shutdown_request(void)
7955 shutdown_requested
= 1;
7957 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7960 void qemu_system_powerdown_request(void)
7962 powerdown_requested
= 1;
7964 cpu_interrupt(cpu_single_env
, CPU_INTERRUPT_EXIT
);
7967 static int qemu_select(int max_fd
, fd_set
*rfds
, fd_set
*wfds
, fd_set
*xfds
,
7972 /* KVM holds a mutex while QEMU code is running, we need hooks to
7973 release the mutex whenever QEMU code sleeps. */
7977 ret
= select(max_fd
, rfds
, wfds
, xfds
, tv
);
7984 void main_loop_wait(int timeout
)
7986 IOHandlerRecord
*ioh
;
7987 fd_set rfds
, wfds
, xfds
;
7996 /* XXX: need to suppress polling by better using win32 events */
7998 for(pe
= first_polling_entry
; pe
!= NULL
; pe
= pe
->next
) {
7999 ret
|= pe
->func(pe
->opaque
);
8004 WaitObjects
*w
= &wait_objects
;
8006 ret
= WaitForMultipleObjects(w
->num
, w
->events
, FALSE
, timeout
);
8007 if (WAIT_OBJECT_0
+ 0 <= ret
&& ret
<= WAIT_OBJECT_0
+ w
->num
- 1) {
8008 if (w
->func
[ret
- WAIT_OBJECT_0
])
8009 w
->func
[ret
- WAIT_OBJECT_0
](w
->opaque
[ret
- WAIT_OBJECT_0
]);
8011 /* Check for additional signaled events */
8012 for(i
= (ret
- WAIT_OBJECT_0
+ 1); i
< w
->num
; i
++) {
8014 /* Check if event is signaled */
8015 ret2
= WaitForSingleObject(w
->events
[i
], 0);
8016 if(ret2
== WAIT_OBJECT_0
) {
8018 w
->func
[i
](w
->opaque
[i
]);
8019 } else if (ret2
== WAIT_TIMEOUT
) {
8021 err
= GetLastError();
8022 fprintf(stderr
, "WaitForSingleObject error %d %d\n", i
, err
);
8025 } else if (ret
== WAIT_TIMEOUT
) {
8027 err
= GetLastError();
8028 fprintf(stderr
, "WaitForMultipleObjects error %d %d\n", ret
, err
);
8032 /* poll any events */
8033 /* XXX: separate device handlers from system ones */
8038 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
8042 (!ioh
->fd_read_poll
||
8043 ioh
->fd_read_poll(ioh
->opaque
) != 0)) {
8044 FD_SET(ioh
->fd
, &rfds
);
8048 if (ioh
->fd_write
) {
8049 FD_SET(ioh
->fd
, &wfds
);
8059 tv
.tv_sec
= timeout
/ 1000;
8060 tv
.tv_usec
= (timeout
% 1000) * 1000;
8062 #if defined(CONFIG_SLIRP)
8064 slirp_select_fill(&nfds
, &rfds
, &wfds
, &xfds
);
8067 ret
= qemu_select(nfds
+ 1, &rfds
, &wfds
, &xfds
, &tv
);
8069 IOHandlerRecord
**pioh
;
8071 for(ioh
= first_io_handler
; ioh
!= NULL
; ioh
= ioh
->next
) {
8072 if (!ioh
->deleted
&& ioh
->fd_read
&& FD_ISSET(ioh
->fd
, &rfds
)) {
8073 ioh
->fd_read(ioh
->opaque
);
8074 if (!(ioh
->fd_read_poll
&& ioh
->fd_read_poll(ioh
->opaque
)))
8075 FD_CLR(ioh
->fd
, &rfds
);
8077 if (!ioh
->deleted
&& ioh
->fd_write
&& FD_ISSET(ioh
->fd
, &wfds
)) {
8078 ioh
->fd_write(ioh
->opaque
);
8082 /* remove deleted IO handlers */
8083 pioh
= &first_io_handler
;
8093 #if defined(CONFIG_SLIRP)
8100 slirp_select_poll(&rfds
, &wfds
, &xfds
);
8105 if (likely(!cur_cpu
|| !(cur_cpu
->singlestep_enabled
& SSTEP_NOTIMER
)))
8106 qemu_run_timers(&active_timers
[QEMU_TIMER_VIRTUAL
],
8107 qemu_get_clock(vm_clock
));
8108 /* run dma transfers, if any */
8112 /* real time timers */
8113 qemu_run_timers(&active_timers
[QEMU_TIMER_REALTIME
],
8114 qemu_get_clock(rt_clock
));
8116 if (alarm_timer
->flags
& ALARM_FLAG_EXPIRED
) {
8117 alarm_timer
->flags
&= ~(ALARM_FLAG_EXPIRED
);
8118 qemu_rearm_alarm_timer(alarm_timer
);
8121 /* Check bottom-halves last in case any of the earlier events triggered
8127 static int main_loop(void)
8130 #ifdef CONFIG_PROFILER
8136 if (kvm_enabled()) {
8138 cpu_disable_ticks();
8142 cur_cpu
= first_cpu
;
8143 next_cpu
= cur_cpu
->next_cpu
?: first_cpu
;
8150 #ifdef CONFIG_PROFILER
8151 ti
= profile_getclock();
8156 qemu_icount
-= (env
->icount_decr
.u16
.low
+ env
->icount_extra
);
8157 env
->icount_decr
.u16
.low
= 0;
8158 env
->icount_extra
= 0;
8159 count
= qemu_next_deadline();
8160 count
= (count
+ (1 << icount_time_shift
) - 1)
8161 >> icount_time_shift
;
8162 qemu_icount
+= count
;
8163 decr
= (count
> 0xffff) ? 0xffff : count
;
8165 env
->icount_decr
.u16
.low
= decr
;
8166 env
->icount_extra
= count
;
8168 ret
= cpu_exec(env
);
8169 #ifdef CONFIG_PROFILER
8170 qemu_time
+= profile_getclock() - ti
;
8173 /* Fold pending instructions back into the
8174 instruction counter, and clear the interrupt flag. */
8175 qemu_icount
-= (env
->icount_decr
.u16
.low
8176 + env
->icount_extra
);
8177 env
->icount_decr
.u32
= 0;
8178 env
->icount_extra
= 0;
8180 next_cpu
= env
->next_cpu
?: first_cpu
;
8181 if (event_pending
&& likely(ret
!= EXCP_DEBUG
)) {
8182 ret
= EXCP_INTERRUPT
;
8186 if (ret
== EXCP_HLT
) {
8187 /* Give the next CPU a chance to run. */
8191 if (ret
!= EXCP_HALTED
)
8193 /* all CPUs are halted ? */
8199 if (shutdown_requested
) {
8200 ret
= EXCP_INTERRUPT
;
8208 if (reset_requested
) {
8209 reset_requested
= 0;
8210 qemu_system_reset();
8212 kvm_load_registers(env
);
8213 ret
= EXCP_INTERRUPT
;
8215 if (powerdown_requested
) {
8216 powerdown_requested
= 0;
8217 qemu_system_powerdown();
8218 ret
= EXCP_INTERRUPT
;
8220 if (unlikely(ret
== EXCP_DEBUG
)) {
8221 vm_stop(EXCP_DEBUG
);
8223 /* If all cpus are halted then wait until the next IRQ */
8224 /* XXX: use timeout computed from timers */
8225 if (ret
== EXCP_HALTED
) {
8229 /* Advance virtual time to the next event. */
8230 if (use_icount
== 1) {
8231 /* When not using an adaptive execution frequency
8232 we tend to get badly out of sync with real time,
8233 so just delay for a reasonable amount of time. */
8236 delta
= cpu_get_icount() - cpu_get_clock();
8239 /* If virtual time is ahead of real time then just
8241 timeout
= (delta
/ 1000000) + 1;
8243 /* Wait for either IO to occur or the next
8245 add
= qemu_next_deadline();
8246 /* We advance the timer before checking for IO.
8247 Limit the amount we advance so that early IO
8248 activity won't get the guest too far ahead. */
8252 add
= (add
+ (1 << icount_time_shift
) - 1)
8253 >> icount_time_shift
;
8255 timeout
= delta
/ 1000000;
8268 #ifdef CONFIG_PROFILER
8269 ti
= profile_getclock();
8271 main_loop_wait(timeout
);
8272 #ifdef CONFIG_PROFILER
8273 dev_time
+= profile_getclock() - ti
;
8276 cpu_disable_ticks();
8280 static void help(int exitcode
)
8282 printf("QEMU PC emulator version " QEMU_VERSION
" (" KVM_VERSION
")"
8283 ", Copyright (c) 2003-2008 Fabrice Bellard\n"
8284 "usage: %s [options] [disk_image]\n"
8286 "'disk_image' is a raw hard image image for IDE hard disk 0\n"
8288 "Standard options:\n"
8289 "-M machine select emulated machine (-M ? for list)\n"
8290 "-cpu cpu select CPU (-cpu ? for list)\n"
8291 "-fda/-fdb file use 'file' as floppy disk 0/1 image\n"
8292 "-hda/-hdb file use 'file' as IDE hard disk 0/1 image\n"
8293 "-hdc/-hdd file use 'file' as IDE hard disk 2/3 image\n"
8294 "-cdrom file use 'file' as IDE cdrom image (cdrom is ide1 master)\n"
8295 "-drive [file=file][,if=type][,bus=n][,unit=m][,media=d][,index=i]\n"
8296 " [,cyls=c,heads=h,secs=s[,trans=t]][,snapshot=on|off]\n"
8297 " [,cache=on|off][,format=f][,boot=on|off]\n"
8298 " use 'file' as a drive image\n"
8299 "-mtdblock file use 'file' as on-board Flash memory image\n"
8300 "-sd file use 'file' as SecureDigital card image\n"
8301 "-pflash file use 'file' as a parallel flash image\n"
8302 "-boot [a|c|d|n] boot on floppy (a), hard disk (c), CD-ROM (d), or network (n)\n"
8303 "-snapshot write to temporary files instead of disk image files\n"
8305 "-no-frame open SDL window without a frame and window decorations\n"
8306 "-alt-grab use Ctrl-Alt-Shift to grab mouse (instead of Ctrl-Alt)\n"
8307 "-no-quit disable SDL window close capability\n"
8310 "-no-fd-bootchk disable boot signature checking for floppy disks\n"
8312 "-m megs set virtual RAM size to megs MB [default=%d]\n"
8313 "-smp n set the number of CPUs to 'n' [default=1]\n"
8314 "-nographic disable graphical output and redirect serial I/Os to console\n"
8315 "-portrait rotate graphical output 90 deg left (only PXA LCD)\n"
8317 "-k language use keyboard layout (for example \"fr\" for French)\n"
8320 "-audio-help print list of audio drivers and their options\n"
8321 "-soundhw c1,... enable audio support\n"
8322 " and only specified sound cards (comma separated list)\n"
8323 " use -soundhw ? to get the list of supported cards\n"
8324 " use -soundhw all to enable all of them\n"
8326 "-localtime set the real time clock to local time [default=utc]\n"
8327 "-full-screen start in full screen\n"
8329 "-win2k-hack use it when installing Windows 2000 to avoid a disk full bug\n"
8331 "-usb enable the USB driver (will be the default soon)\n"
8332 "-usbdevice name add the host or guest USB device 'name'\n"
8333 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8334 "-g WxH[xDEPTH] Set the initial graphical resolution and depth\n"
8336 "-name string set the name of the guest\n"
8338 "Network options:\n"
8339 "-net nic[,vlan=n][,macaddr=addr][,model=type]\n"
8340 " create a new Network Interface Card and connect it to VLAN 'n'\n"
8342 "-net user[,vlan=n][,hostname=host]\n"
8343 " connect the user mode network stack to VLAN 'n' and send\n"
8344 " hostname 'host' to DHCP clients\n"
8347 "-net tap[,vlan=n],ifname=name\n"
8348 " connect the host TAP network interface to VLAN 'n'\n"
8350 "-net tap[,vlan=n][,fd=h][,ifname=name][,script=file][,downscript=dfile]\n"
8351 " connect the host TAP network interface to VLAN 'n' and use the\n"
8352 " network scripts 'file' (default=%s)\n"
8353 " and 'dfile' (default=%s);\n"
8354 " use '[down]script=no' to disable script execution;\n"
8355 " use 'fd=h' to connect to an already opened TAP interface\n"
8357 "-net socket[,vlan=n][,fd=h][,listen=[host]:port][,connect=host:port]\n"
8358 " connect the vlan 'n' to another VLAN using a socket connection\n"
8359 "-net socket[,vlan=n][,fd=h][,mcast=maddr:port]\n"
8360 " connect the vlan 'n' to multicast maddr and port\n"
8362 "-net vde[,vlan=n][,sock=socketpath][,port=n][,group=groupname][,mode=octalmode]\n"
8363 " connect the vlan 'n' to port 'n' of a vde switch running\n"
8364 " on host and listening for incoming connections on 'socketpath'.\n"
8365 " Use group 'groupname' and mode 'octalmode' to change default\n"
8366 " ownership and permissions for communication port.\n"
8368 "-net none use it alone to have zero network devices; if no -net option\n"
8369 " is provided, the default is '-net nic -net user'\n"
8372 "-tftp dir allow tftp access to files in dir [-net user]\n"
8373 "-bootp file advertise file in BOOTP replies\n"
8375 "-smb dir allow SMB access to files in 'dir' [-net user]\n"
8377 "-redir [tcp|udp]:host-port:[guest-host]:guest-port\n"
8378 " redirect TCP or UDP connections from host to guest [-net user]\n"
8381 "Linux boot specific:\n"
8382 "-kernel bzImage use 'bzImage' as kernel image\n"
8383 "-append cmdline use 'cmdline' as kernel command line\n"
8384 "-initrd file use 'file' as initial ram disk\n"
8386 "Debug/Expert options:\n"
8387 "-monitor dev redirect the monitor to char device 'dev'\n"
8388 "-serial dev redirect the serial port to char device 'dev'\n"
8389 "-parallel dev redirect the parallel port to char device 'dev'\n"
8390 "-pidfile file Write PID to 'file'\n"
8391 "-S freeze CPU at startup (use 'c' to start execution)\n"
8392 "-s wait gdb connection to port\n"
8393 "-p port set gdb connection port [default=%s]\n"
8394 "-d item1,... output log to %s (use -d ? for a list of log items)\n"
8395 "-hdachs c,h,s[,t] force hard disk 0 physical geometry and the optional BIOS\n"
8396 " translation (t=none or lba) (usually qemu can guess them)\n"
8397 "-L path set the directory for the BIOS, VGA BIOS and keymaps\n"
8399 "-kernel-kqemu enable KQEMU full virtualization (default is user mode only)\n"
8400 "-no-kqemu disable KQEMU kernel module usage\n"
8403 #ifndef NO_CPU_EMULATION
8404 "-no-kvm disable KVM hardware virtualization\n"
8406 "-no-kvm-irqchip disable KVM kernel mode PIC/IOAPIC/LAPIC\n"
8407 "-no-kvm-pit disable KVM kernel mode PIT\n"
8410 "-std-vga simulate a standard VGA card with VESA Bochs Extensions\n"
8411 " (default is CL-GD5446 PCI VGA)\n"
8412 "-no-acpi disable ACPI\n"
8414 #ifdef CONFIG_CURSES
8415 "-curses use a curses/ncurses interface instead of SDL\n"
8417 "-no-reboot exit instead of rebooting\n"
8418 "-no-shutdown stop before shutdown\n"
8419 "-loadvm [tag|id] start right away with a saved state (loadvm in monitor)\n"
8420 "-vnc display start a VNC server on display\n"
8422 "-daemonize daemonize QEMU after initializing\n"
8424 "-tdf inject timer interrupts that got lost\n"
8425 "-kvm-shadow-memory megs set the amount of shadow pages to be allocated\n"
8426 "-mem-path set the path to hugetlbfs/tmpfs mounted directory, also enables allocation of guest memory with huge pages\n"
8427 "-option-rom rom load a file, rom, into the option ROM space\n"
8429 "-prom-env variable=value set OpenBIOS nvram variables\n"
8431 "-clock force the use of the given methods for timer alarm.\n"
8432 " To see what timers are available use -clock ?\n"
8433 "-startdate select initial date of the clock\n"
8434 "-icount [N|auto]\n"
8435 " Enable virtual instruction counter with 2^N clock ticks per instruction\n"
8437 "During emulation, the following keys are useful:\n"
8438 "ctrl-alt-f toggle full screen\n"
8439 "ctrl-alt-n switch to virtual console 'n'\n"
8440 "ctrl-alt toggle mouse and keyboard grab\n"
8442 "When using -nographic, press 'ctrl-a h' to get some help.\n"
8447 DEFAULT_NETWORK_SCRIPT
,
8448 DEFAULT_NETWORK_DOWN_SCRIPT
,
8450 DEFAULT_GDBSTUB_PORT
,
8455 #define HAS_ARG 0x0001
8470 QEMU_OPTION_mtdblock
,
8474 QEMU_OPTION_snapshot
,
8476 QEMU_OPTION_no_fd_bootchk
,
8479 QEMU_OPTION_nographic
,
8480 QEMU_OPTION_portrait
,
8482 QEMU_OPTION_audio_help
,
8483 QEMU_OPTION_soundhw
,
8504 QEMU_OPTION_localtime
,
8505 QEMU_OPTION_cirrusvga
,
8508 QEMU_OPTION_std_vga
,
8510 QEMU_OPTION_monitor
,
8512 QEMU_OPTION_parallel
,
8514 QEMU_OPTION_full_screen
,
8515 QEMU_OPTION_no_frame
,
8516 QEMU_OPTION_alt_grab
,
8517 QEMU_OPTION_no_quit
,
8518 QEMU_OPTION_pidfile
,
8519 QEMU_OPTION_no_kqemu
,
8520 QEMU_OPTION_kernel_kqemu
,
8521 QEMU_OPTION_win2k_hack
,
8523 QEMU_OPTION_usbdevice
,
8526 QEMU_OPTION_no_acpi
,
8529 QEMU_OPTION_no_kvm_irqchip
,
8530 QEMU_OPTION_no_kvm_pit
,
8531 QEMU_OPTION_no_reboot
,
8532 QEMU_OPTION_no_shutdown
,
8533 QEMU_OPTION_show_cursor
,
8534 QEMU_OPTION_daemonize
,
8535 QEMU_OPTION_option_rom
,
8536 QEMU_OPTION_semihosting
,
8537 QEMU_OPTION_cpu_vendor
,
8539 QEMU_OPTION_prom_env
,
8540 QEMU_OPTION_old_param
,
8542 QEMU_OPTION_startdate
,
8543 QEMU_OPTION_tb_size
,
8545 QEMU_OPTION_incoming
,
8547 QEMU_OPTION_kvm_shadow_memory
,
8548 QEMU_OPTION_mempath
,
8551 typedef struct QEMUOption
{
8557 const QEMUOption qemu_options
[] = {
8558 { "h", 0, QEMU_OPTION_h
},
8559 { "help", 0, QEMU_OPTION_h
},
8561 { "M", HAS_ARG
, QEMU_OPTION_M
},
8562 { "cpu", HAS_ARG
, QEMU_OPTION_cpu
},
8563 { "fda", HAS_ARG
, QEMU_OPTION_fda
},
8564 { "fdb", HAS_ARG
, QEMU_OPTION_fdb
},
8565 { "hda", HAS_ARG
, QEMU_OPTION_hda
},
8566 { "hdb", HAS_ARG
, QEMU_OPTION_hdb
},
8567 { "hdc", HAS_ARG
, QEMU_OPTION_hdc
},
8568 { "hdd", HAS_ARG
, QEMU_OPTION_hdd
},
8569 { "drive", HAS_ARG
, QEMU_OPTION_drive
},
8570 { "cdrom", HAS_ARG
, QEMU_OPTION_cdrom
},
8571 { "mtdblock", HAS_ARG
, QEMU_OPTION_mtdblock
},
8572 { "sd", HAS_ARG
, QEMU_OPTION_sd
},
8573 { "pflash", HAS_ARG
, QEMU_OPTION_pflash
},
8574 { "boot", HAS_ARG
, QEMU_OPTION_boot
},
8575 { "snapshot", 0, QEMU_OPTION_snapshot
},
8577 { "no-fd-bootchk", 0, QEMU_OPTION_no_fd_bootchk
},
8579 { "m", HAS_ARG
, QEMU_OPTION_m
},
8580 { "nographic", 0, QEMU_OPTION_nographic
},
8581 { "portrait", 0, QEMU_OPTION_portrait
},
8582 { "k", HAS_ARG
, QEMU_OPTION_k
},
8584 { "audio-help", 0, QEMU_OPTION_audio_help
},
8585 { "soundhw", HAS_ARG
, QEMU_OPTION_soundhw
},
8588 { "net", HAS_ARG
, QEMU_OPTION_net
},
8590 { "tftp", HAS_ARG
, QEMU_OPTION_tftp
},
8591 { "bootp", HAS_ARG
, QEMU_OPTION_bootp
},
8593 { "smb", HAS_ARG
, QEMU_OPTION_smb
},
8595 { "redir", HAS_ARG
, QEMU_OPTION_redir
},
8598 { "kernel", HAS_ARG
, QEMU_OPTION_kernel
},
8599 { "append", HAS_ARG
, QEMU_OPTION_append
},
8600 { "initrd", HAS_ARG
, QEMU_OPTION_initrd
},
8602 { "S", 0, QEMU_OPTION_S
},
8603 { "s", 0, QEMU_OPTION_s
},
8604 { "p", HAS_ARG
, QEMU_OPTION_p
},
8605 { "d", HAS_ARG
, QEMU_OPTION_d
},
8606 { "hdachs", HAS_ARG
, QEMU_OPTION_hdachs
},
8607 { "L", HAS_ARG
, QEMU_OPTION_L
},
8608 { "bios", HAS_ARG
, QEMU_OPTION_bios
},
8610 { "no-kqemu", 0, QEMU_OPTION_no_kqemu
},
8611 { "kernel-kqemu", 0, QEMU_OPTION_kernel_kqemu
},
8614 #ifndef NO_CPU_EMULATION
8615 { "no-kvm", 0, QEMU_OPTION_no_kvm
},
8617 { "no-kvm-irqchip", 0, QEMU_OPTION_no_kvm_irqchip
},
8618 { "no-kvm-pit", 0, QEMU_OPTION_no_kvm_pit
},
8620 #if defined(TARGET_PPC) || defined(TARGET_SPARC)
8621 { "g", 1, QEMU_OPTION_g
},
8623 { "localtime", 0, QEMU_OPTION_localtime
},
8624 { "std-vga", 0, QEMU_OPTION_std_vga
},
8625 { "echr", HAS_ARG
, QEMU_OPTION_echr
},
8626 { "monitor", HAS_ARG
, QEMU_OPTION_monitor
},
8627 { "serial", HAS_ARG
, QEMU_OPTION_serial
},
8628 { "parallel", HAS_ARG
, QEMU_OPTION_parallel
},
8629 { "loadvm", HAS_ARG
, QEMU_OPTION_loadvm
},
8630 { "incoming", 1, QEMU_OPTION_incoming
},
8631 { "full-screen", 0, QEMU_OPTION_full_screen
},
8633 { "no-frame", 0, QEMU_OPTION_no_frame
},
8634 { "alt-grab", 0, QEMU_OPTION_alt_grab
},
8635 { "no-quit", 0, QEMU_OPTION_no_quit
},
8637 { "pidfile", HAS_ARG
, QEMU_OPTION_pidfile
},
8638 { "win2k-hack", 0, QEMU_OPTION_win2k_hack
},
8639 { "usbdevice", HAS_ARG
, QEMU_OPTION_usbdevice
},
8640 { "smp", HAS_ARG
, QEMU_OPTION_smp
},
8641 { "vnc", HAS_ARG
, QEMU_OPTION_vnc
},
8642 #ifdef CONFIG_CURSES
8643 { "curses", 0, QEMU_OPTION_curses
},
8646 /* temporary options */
8647 { "usb", 0, QEMU_OPTION_usb
},
8648 { "cirrusvga", 0, QEMU_OPTION_cirrusvga
},
8649 { "vmwarevga", 0, QEMU_OPTION_vmsvga
},
8650 { "no-acpi", 0, QEMU_OPTION_no_acpi
},
8651 { "no-reboot", 0, QEMU_OPTION_no_reboot
},
8652 { "no-shutdown", 0, QEMU_OPTION_no_shutdown
},
8653 { "show-cursor", 0, QEMU_OPTION_show_cursor
},
8654 { "daemonize", 0, QEMU_OPTION_daemonize
},
8655 { "option-rom", HAS_ARG
, QEMU_OPTION_option_rom
},
8656 #if defined(TARGET_ARM) || defined(TARGET_M68K)
8657 { "semihosting", 0, QEMU_OPTION_semihosting
},
8659 { "tdf", 0, QEMU_OPTION_tdf
}, /* enable time drift fix */
8660 { "kvm-shadow-memory", HAS_ARG
, QEMU_OPTION_kvm_shadow_memory
},
8661 { "name", HAS_ARG
, QEMU_OPTION_name
},
8662 #if defined(TARGET_SPARC)
8663 { "prom-env", HAS_ARG
, QEMU_OPTION_prom_env
},
8665 { "cpu-vendor", HAS_ARG
, QEMU_OPTION_cpu_vendor
},
8666 #if defined(TARGET_ARM)
8667 { "old-param", 0, QEMU_OPTION_old_param
},
8669 { "clock", HAS_ARG
, QEMU_OPTION_clock
},
8670 { "startdate", HAS_ARG
, QEMU_OPTION_startdate
},
8671 { "tb-size", HAS_ARG
, QEMU_OPTION_tb_size
},
8672 { "icount", HAS_ARG
, QEMU_OPTION_icount
},
8673 { "mem-path", HAS_ARG
, QEMU_OPTION_mempath
},
8677 /* password input */
8679 int qemu_key_check(BlockDriverState
*bs
, const char *name
)
8684 if (!bdrv_is_encrypted(bs
))
8687 term_printf("%s is encrypted.\n", name
);
8688 for(i
= 0; i
< 3; i
++) {
8689 monitor_readline("Password: ", 1, password
, sizeof(password
));
8690 if (bdrv_set_key(bs
, password
) == 0)
8692 term_printf("invalid password\n");
8697 static void read_passwords(void)
8699 BlockDriverState
*bs
;
8702 for(i
= 0; i
< nb_drives
; i
++) {
8703 bs
= drives_table
[i
].bdrv
;
8704 qemu_key_check(bs
, bdrv_get_device_name(bs
));
8709 struct soundhw soundhw
[] = {
8710 #ifdef HAS_AUDIO_CHOICE
8711 #if defined(TARGET_I386) || defined(TARGET_MIPS)
8717 { .init_isa
= pcspk_audio_init
}
8722 "Creative Sound Blaster 16",
8725 { .init_isa
= SB16_init
}
8728 #ifdef CONFIG_CS4231A
8734 { .init_isa
= cs4231a_init
}
8742 "Yamaha YMF262 (OPL3)",
8744 "Yamaha YM3812 (OPL2)",
8748 { .init_isa
= Adlib_init
}
8755 "Gravis Ultrasound GF1",
8758 { .init_isa
= GUS_init
}
8765 "Intel 82801AA AC97 Audio",
8768 { .init_pci
= ac97_init
}
8774 "ENSONIQ AudioPCI ES1370",
8777 { .init_pci
= es1370_init
}
8781 { NULL
, NULL
, 0, 0, { NULL
} }
8784 static void select_soundhw (const char *optarg
)
8788 if (*optarg
== '?') {
8791 printf ("Valid sound card names (comma separated):\n");
8792 for (c
= soundhw
; c
->name
; ++c
) {
8793 printf ("%-11s %s\n", c
->name
, c
->descr
);
8795 printf ("\n-soundhw all will enable all of the above\n");
8796 exit (*optarg
!= '?');
8804 if (!strcmp (optarg
, "all")) {
8805 for (c
= soundhw
; c
->name
; ++c
) {
8813 e
= strchr (p
, ',');
8814 l
= !e
? strlen (p
) : (size_t) (e
- p
);
8816 for (c
= soundhw
; c
->name
; ++c
) {
8817 if (!strncmp (c
->name
, p
, l
)) {
8826 "Unknown sound card name (too big to show)\n");
8829 fprintf (stderr
, "Unknown sound card name `%.*s'\n",
8834 p
+= l
+ (e
!= NULL
);
8838 goto show_valid_cards
;
8844 static BOOL WINAPI
qemu_ctrl_handler(DWORD type
)
8846 exit(STATUS_CONTROL_C_EXIT
);
8851 #define MAX_NET_CLIENTS 32
8853 static int saved_argc
;
8854 static char **saved_argv
;
8856 void qemu_get_launch_info(int *argc
, char ***argv
, int *opt_daemonize
, const char **opt_incoming
)
8860 *opt_daemonize
= daemonize
;
8861 *opt_incoming
= incoming
;
8865 static int gethugepagesize(void)
8869 char *needle
= "Hugepagesize:";
8871 unsigned long hugepagesize
;
8873 fd
= open("/proc/meminfo", O_RDONLY
);
8879 ret
= read(fd
, buf
, sizeof(buf
));
8885 size
= strstr(buf
, needle
);
8888 size
+= strlen(needle
);
8889 hugepagesize
= strtol(size
, NULL
, 0);
8890 return hugepagesize
;
8893 void *alloc_mem_area(unsigned long memory
, const char *path
)
8899 if (asprintf(&filename
, "%s/kvm.XXXXXX", path
) == -1)
8902 hpagesize
= gethugepagesize() * 1024;
8906 fd
= mkstemp(filename
);
8915 memory
= (memory
+hpagesize
-1) & ~(hpagesize
-1);
8918 * ftruncate is not supported by hugetlbfs in older
8919 * hosts, so don't bother checking for errors.
8920 * If anything goes wrong with it under other filesystems,
8923 ftruncate(fd
, memory
);
8925 area
= mmap(0, memory
, PROT_READ
|PROT_WRITE
, MAP_PRIVATE
, fd
, 0);
8926 if (area
== MAP_FAILED
) {
8935 void *qemu_alloc_physram(unsigned long memory
)
8940 area
= alloc_mem_area(memory
, mem_path
);
8942 area
= qemu_vmalloc(memory
);
8947 int main(int argc
, char **argv
)
8949 #ifdef CONFIG_GDBSTUB
8951 const char *gdbstub_port
;
8953 uint32_t boot_devices_bitmap
= 0;
8955 int snapshot
, linux_boot
, net_boot
;
8956 const char *initrd_filename
;
8957 const char *kernel_filename
, *kernel_cmdline
;
8958 const char *boot_devices
= "";
8959 DisplayState
*ds
= &display_state
;
8960 int cyls
, heads
, secs
, translation
;
8961 const char *net_clients
[MAX_NET_CLIENTS
];
8965 const char *r
, *optarg
;
8966 CharDriverState
*monitor_hd
;
8968 const char *monitor_device
;
8969 const char *serial_devices
[MAX_SERIAL_PORTS
];
8970 int serial_device_index
;
8971 const char *parallel_devices
[MAX_PARALLEL_PORTS
];
8972 int parallel_device_index
;
8973 const char *loadvm
= NULL
;
8974 QEMUMachine
*machine
;
8975 const char *cpu_model
;
8976 const char *usb_devices
[MAX_USB_CMDLINE
];
8977 int usb_devices_index
;
8980 const char *pid_file
= NULL
;
8986 LIST_INIT (&vm_change_state_head
);
8989 struct sigaction act
;
8990 sigfillset(&act
.sa_mask
);
8992 act
.sa_handler
= SIG_IGN
;
8993 sigaction(SIGPIPE
, &act
, NULL
);
8996 SetConsoleCtrlHandler(qemu_ctrl_handler
, TRUE
);
8997 /* Note: cpu_interrupt() is currently not SMP safe, so we force
8998 QEMU to run on a single CPU */
9003 h
= GetCurrentProcess();
9004 if (GetProcessAffinityMask(h
, &mask
, &smask
)) {
9005 for(i
= 0; i
< 32; i
++) {
9006 if (mask
& (1 << i
))
9011 SetProcessAffinityMask(h
, mask
);
9017 register_machines();
9018 machine
= first_machine
;
9020 initrd_filename
= NULL
;
9022 vga_ram_size
= VGA_RAM_SIZE
;
9023 #ifdef CONFIG_GDBSTUB
9025 gdbstub_port
= DEFAULT_GDBSTUB_PORT
;
9030 kernel_filename
= NULL
;
9031 kernel_cmdline
= "";
9032 cyls
= heads
= secs
= 0;
9033 translation
= BIOS_ATA_TRANSLATION_AUTO
;
9034 monitor_device
= "vc";
9036 serial_devices
[0] = "vc:80Cx24C";
9037 for(i
= 1; i
< MAX_SERIAL_PORTS
; i
++)
9038 serial_devices
[i
] = NULL
;
9039 serial_device_index
= 0;
9041 parallel_devices
[0] = "vc:640x480";
9042 for(i
= 1; i
< MAX_PARALLEL_PORTS
; i
++)
9043 parallel_devices
[i
] = NULL
;
9044 parallel_device_index
= 0;
9046 usb_devices_index
= 0;
9063 hda_index
= drive_add(argv
[optind
++], HD_ALIAS
, 0);
9065 const QEMUOption
*popt
;
9068 /* Treat --foo the same as -foo. */
9071 popt
= qemu_options
;
9074 fprintf(stderr
, "%s: invalid option -- '%s'\n",
9078 if (!strcmp(popt
->name
, r
+ 1))
9082 if (popt
->flags
& HAS_ARG
) {
9083 if (optind
>= argc
) {
9084 fprintf(stderr
, "%s: option '%s' requires an argument\n",
9088 optarg
= argv
[optind
++];
9093 switch(popt
->index
) {
9095 machine
= find_machine(optarg
);
9098 printf("Supported machines are:\n");
9099 for(m
= first_machine
; m
!= NULL
; m
= m
->next
) {
9100 printf("%-10s %s%s\n",
9102 m
== first_machine
? " (default)" : "");
9104 exit(*optarg
!= '?');
9107 case QEMU_OPTION_cpu
:
9108 /* hw initialization will check this */
9109 if (*optarg
== '?') {
9110 /* XXX: implement xxx_cpu_list for targets that still miss it */
9111 #if defined(cpu_list)
9112 cpu_list(stdout
, &fprintf
);
9119 case QEMU_OPTION_initrd
:
9120 initrd_filename
= optarg
;
9122 case QEMU_OPTION_hda
:
9124 hda_index
= drive_add(optarg
, HD_ALIAS
, 0);
9126 hda_index
= drive_add(optarg
, HD_ALIAS
9127 ",cyls=%d,heads=%d,secs=%d%s",
9128 0, cyls
, heads
, secs
,
9129 translation
== BIOS_ATA_TRANSLATION_LBA
?
9131 translation
== BIOS_ATA_TRANSLATION_NONE
?
9132 ",trans=none" : "");
9134 case QEMU_OPTION_hdb
:
9135 case QEMU_OPTION_hdc
:
9136 case QEMU_OPTION_hdd
:
9137 drive_add(optarg
, HD_ALIAS
, popt
->index
- QEMU_OPTION_hda
);
9139 case QEMU_OPTION_drive
:
9140 drive_add(NULL
, "%s", optarg
);
9142 case QEMU_OPTION_mtdblock
:
9143 drive_add(optarg
, MTD_ALIAS
);
9145 case QEMU_OPTION_sd
:
9146 drive_add(optarg
, SD_ALIAS
);
9148 case QEMU_OPTION_pflash
:
9149 drive_add(optarg
, PFLASH_ALIAS
);
9151 case QEMU_OPTION_snapshot
:
9154 case QEMU_OPTION_hdachs
:
9158 cyls
= strtol(p
, (char **)&p
, 0);
9159 if (cyls
< 1 || cyls
> 16383)
9164 heads
= strtol(p
, (char **)&p
, 0);
9165 if (heads
< 1 || heads
> 16)
9170 secs
= strtol(p
, (char **)&p
, 0);
9171 if (secs
< 1 || secs
> 63)
9175 if (!strcmp(p
, "none"))
9176 translation
= BIOS_ATA_TRANSLATION_NONE
;
9177 else if (!strcmp(p
, "lba"))
9178 translation
= BIOS_ATA_TRANSLATION_LBA
;
9179 else if (!strcmp(p
, "auto"))
9180 translation
= BIOS_ATA_TRANSLATION_AUTO
;
9183 } else if (*p
!= '\0') {
9185 fprintf(stderr
, "qemu: invalid physical CHS format\n");
9188 if (hda_index
!= -1)
9189 snprintf(drives_opt
[hda_index
].opt
,
9190 sizeof(drives_opt
[hda_index
].opt
),
9191 HD_ALIAS
",cyls=%d,heads=%d,secs=%d%s",
9192 0, cyls
, heads
, secs
,
9193 translation
== BIOS_ATA_TRANSLATION_LBA
?
9195 translation
== BIOS_ATA_TRANSLATION_NONE
?
9196 ",trans=none" : "");
9199 case QEMU_OPTION_nographic
:
9202 #ifdef CONFIG_CURSES
9203 case QEMU_OPTION_curses
:
9207 case QEMU_OPTION_portrait
:
9210 case QEMU_OPTION_kernel
:
9211 kernel_filename
= optarg
;
9213 case QEMU_OPTION_append
:
9214 kernel_cmdline
= optarg
;
9216 case QEMU_OPTION_cdrom
:
9217 drive_add(optarg
, CDROM_ALIAS
);
9219 case QEMU_OPTION_boot
:
9220 boot_devices
= optarg
;
9221 /* We just do some generic consistency checks */
9223 /* Could easily be extended to 64 devices if needed */
9226 boot_devices_bitmap
= 0;
9227 for (p
= boot_devices
; *p
!= '\0'; p
++) {
9228 /* Allowed boot devices are:
9229 * a b : floppy disk drives
9230 * c ... f : IDE disk drives
9231 * g ... m : machine implementation dependant drives
9232 * n ... p : network devices
9233 * It's up to each machine implementation to check
9234 * if the given boot devices match the actual hardware
9235 * implementation and firmware features.
9237 if (*p
< 'a' || *p
> 'q') {
9238 fprintf(stderr
, "Invalid boot device '%c'\n", *p
);
9241 if (boot_devices_bitmap
& (1 << (*p
- 'a'))) {
9243 "Boot device '%c' was given twice\n",*p
);
9246 boot_devices_bitmap
|= 1 << (*p
- 'a');
9250 case QEMU_OPTION_fda
:
9251 case QEMU_OPTION_fdb
:
9252 drive_add(optarg
, FD_ALIAS
, popt
->index
- QEMU_OPTION_fda
);
9255 case QEMU_OPTION_no_fd_bootchk
:
9259 case QEMU_OPTION_net
:
9260 if (nb_net_clients
>= MAX_NET_CLIENTS
) {
9261 fprintf(stderr
, "qemu: too many network clients\n");
9264 net_clients
[nb_net_clients
] = optarg
;
9268 case QEMU_OPTION_tftp
:
9269 tftp_prefix
= optarg
;
9271 case QEMU_OPTION_bootp
:
9272 bootp_filename
= optarg
;
9275 case QEMU_OPTION_smb
:
9276 net_slirp_smb(optarg
);
9279 case QEMU_OPTION_redir
:
9280 net_slirp_redir(optarg
);
9284 case QEMU_OPTION_audio_help
:
9288 case QEMU_OPTION_soundhw
:
9289 select_soundhw (optarg
);
9295 case QEMU_OPTION_m
: {
9299 value
= strtoul(optarg
, &ptr
, 10);
9301 case 0: case 'M': case 'm':
9308 fprintf(stderr
, "qemu: invalid ram size: %s\n", optarg
);
9312 /* On 32-bit hosts, QEMU is limited by virtual address space */
9313 if (value
> (2047 << 20)
9315 && HOST_LONG_BITS
== 32
9318 fprintf(stderr
, "qemu: at most 2047 MB RAM can be simulated\n");
9321 if (value
!= (uint64_t)(ram_addr_t
)value
) {
9322 fprintf(stderr
, "qemu: ram size too large\n");
9333 mask
= cpu_str_to_log_mask(optarg
);
9335 printf("Log items (comma separated):\n");
9336 for(item
= cpu_log_items
; item
->mask
!= 0; item
++) {
9337 printf("%-10s %s\n", item
->name
, item
->help
);
9344 #ifdef CONFIG_GDBSTUB
9349 gdbstub_port
= optarg
;
9355 case QEMU_OPTION_bios
:
9362 keyboard_layout
= optarg
;
9364 case QEMU_OPTION_localtime
:
9367 case QEMU_OPTION_cirrusvga
:
9368 cirrus_vga_enabled
= 1;
9371 case QEMU_OPTION_vmsvga
:
9372 cirrus_vga_enabled
= 0;
9375 case QEMU_OPTION_std_vga
:
9376 cirrus_vga_enabled
= 0;
9384 w
= strtol(p
, (char **)&p
, 10);
9387 fprintf(stderr
, "qemu: invalid resolution or depth\n");
9393 h
= strtol(p
, (char **)&p
, 10);
9398 depth
= strtol(p
, (char **)&p
, 10);
9399 if (depth
!= 8 && depth
!= 15 && depth
!= 16 &&
9400 depth
!= 24 && depth
!= 32)
9402 } else if (*p
== '\0') {
9403 depth
= graphic_depth
;
9410 graphic_depth
= depth
;
9413 case QEMU_OPTION_echr
:
9416 term_escape_char
= strtol(optarg
, &r
, 0);
9418 printf("Bad argument to echr\n");
9421 case QEMU_OPTION_monitor
:
9422 monitor_device
= optarg
;
9424 case QEMU_OPTION_serial
:
9425 if (serial_device_index
>= MAX_SERIAL_PORTS
) {
9426 fprintf(stderr
, "qemu: too many serial ports\n");
9429 serial_devices
[serial_device_index
] = optarg
;
9430 serial_device_index
++;
9432 case QEMU_OPTION_parallel
:
9433 if (parallel_device_index
>= MAX_PARALLEL_PORTS
) {
9434 fprintf(stderr
, "qemu: too many parallel ports\n");
9437 parallel_devices
[parallel_device_index
] = optarg
;
9438 parallel_device_index
++;
9440 case QEMU_OPTION_loadvm
:
9443 case QEMU_OPTION_incoming
:
9446 case QEMU_OPTION_full_screen
:
9450 case QEMU_OPTION_no_frame
:
9453 case QEMU_OPTION_alt_grab
:
9456 case QEMU_OPTION_no_quit
:
9460 case QEMU_OPTION_pidfile
:
9464 case QEMU_OPTION_win2k_hack
:
9465 win2k_install_hack
= 1;
9469 case QEMU_OPTION_no_kqemu
:
9472 case QEMU_OPTION_kernel_kqemu
:
9477 case QEMU_OPTION_no_kvm
:
9480 case QEMU_OPTION_no_kvm_irqchip
: {
9481 extern int kvm_irqchip
, kvm_pit
;
9486 case QEMU_OPTION_no_kvm_pit
: {
9492 case QEMU_OPTION_usb
:
9495 case QEMU_OPTION_usbdevice
:
9497 if (usb_devices_index
>= MAX_USB_CMDLINE
) {
9498 fprintf(stderr
, "Too many USB devices\n");
9501 usb_devices
[usb_devices_index
] = optarg
;
9502 usb_devices_index
++;
9504 case QEMU_OPTION_smp
:
9505 smp_cpus
= atoi(optarg
);
9506 if (smp_cpus
< 1 || smp_cpus
> MAX_CPUS
) {
9507 fprintf(stderr
, "Invalid number of CPUs\n");
9511 case QEMU_OPTION_vnc
:
9512 vnc_display
= optarg
;
9514 case QEMU_OPTION_no_acpi
:
9517 case QEMU_OPTION_no_reboot
:
9520 case QEMU_OPTION_no_shutdown
:
9523 case QEMU_OPTION_show_cursor
:
9526 case QEMU_OPTION_daemonize
:
9529 case QEMU_OPTION_option_rom
:
9530 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9531 fprintf(stderr
, "Too many option ROMs\n");
9534 option_rom
[nb_option_roms
] = optarg
;
9537 case QEMU_OPTION_semihosting
:
9538 semihosting_enabled
= 1;
9540 case QEMU_OPTION_tdf
:
9543 case QEMU_OPTION_kvm_shadow_memory
:
9544 kvm_shadow_memory
= (int64_t)atoi(optarg
) * 1024 * 1024 / 4096;
9546 case QEMU_OPTION_mempath
:
9549 case QEMU_OPTION_name
:
9553 case QEMU_OPTION_prom_env
:
9554 if (nb_prom_envs
>= MAX_PROM_ENVS
) {
9555 fprintf(stderr
, "Too many prom variables\n");
9558 prom_envs
[nb_prom_envs
] = optarg
;
9562 case QEMU_OPTION_cpu_vendor
:
9563 cpu_vendor_string
= optarg
;
9566 case QEMU_OPTION_old_param
:
9570 case QEMU_OPTION_clock
:
9571 configure_alarms(optarg
);
9573 case QEMU_OPTION_startdate
:
9576 time_t rtc_start_date
;
9577 if (!strcmp(optarg
, "now")) {
9578 rtc_date_offset
= -1;
9580 if (sscanf(optarg
, "%d-%d-%dT%d:%d:%d",
9588 } else if (sscanf(optarg
, "%d-%d-%d",
9591 &tm
.tm_mday
) == 3) {
9600 rtc_start_date
= mktimegm(&tm
);
9601 if (rtc_start_date
== -1) {
9603 fprintf(stderr
, "Invalid date format. Valid format are:\n"
9604 "'now' or '2006-06-17T16:01:21' or '2006-06-17'\n");
9607 rtc_date_offset
= time(NULL
) - rtc_start_date
;
9611 case QEMU_OPTION_tb_size
:
9612 tb_size
= strtol(optarg
, NULL
, 0);
9616 case QEMU_OPTION_icount
:
9618 if (strcmp(optarg
, "auto") == 0) {
9619 icount_time_shift
= -1;
9621 icount_time_shift
= strtol(optarg
, NULL
, 0);
9629 if (serial_device_index
== 0)
9630 serial_devices
[0] = "stdio";
9631 if (parallel_device_index
== 0)
9632 parallel_devices
[0] = "null";
9633 if (strncmp(monitor_device
, "vc", 2) == 0)
9634 monitor_device
= "stdio";
9641 if (pipe(fds
) == -1)
9652 len
= read(fds
[0], &status
, 1);
9653 if (len
== -1 && (errno
== EINTR
))
9658 else if (status
== 1) {
9659 fprintf(stderr
, "Could not acquire pidfile\n");
9676 signal(SIGTSTP
, SIG_IGN
);
9677 signal(SIGTTOU
, SIG_IGN
);
9678 signal(SIGTTIN
, SIG_IGN
);
9683 if (kvm_enabled()) {
9684 if (kvm_qemu_init() < 0) {
9685 extern int kvm_allowed
;
9686 fprintf(stderr
, "Could not initialize KVM, will disable KVM support\n");
9687 #ifdef NO_CPU_EMULATION
9688 fprintf(stderr
, "Compiled with --disable-cpu-emulation, exiting.\n");
9696 if (pid_file
&& qemu_create_pidfile(pid_file
) != 0) {
9699 write(fds
[1], &status
, 1);
9701 fprintf(stderr
, "Could not acquire pid file\n");
9709 linux_boot
= (kernel_filename
!= NULL
);
9710 net_boot
= (boot_devices_bitmap
>> ('n' - 'a')) & 0xF;
9712 if (!linux_boot
&& net_boot
== 0 &&
9713 !machine
->nodisk_ok
&& nb_drives_opt
== 0)
9716 if (!linux_boot
&& *kernel_cmdline
!= '\0') {
9717 fprintf(stderr
, "-append only allowed with -kernel option\n");
9721 if (!linux_boot
&& initrd_filename
!= NULL
) {
9722 fprintf(stderr
, "-initrd only allowed with -kernel option\n");
9726 /* boot to floppy or the default cd if no hard disk defined yet */
9727 if (!boot_devices
[0]) {
9728 boot_devices
= "cad";
9730 setvbuf(stdout
, NULL
, _IOLBF
, 0);
9735 if (use_icount
&& icount_time_shift
< 0) {
9737 /* 125MIPS seems a reasonable initial guess at the guest speed.
9738 It will be corrected fairly quickly anyway. */
9739 icount_time_shift
= 3;
9740 init_icount_adjust();
9747 /* init network clients */
9748 if (nb_net_clients
== 0) {
9749 /* if no clients, we use a default config */
9750 net_clients
[0] = "nic";
9751 net_clients
[1] = "user";
9755 for(i
= 0;i
< nb_net_clients
; i
++) {
9756 if (net_client_parse(net_clients
[i
]) < 0)
9759 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
9760 if (vlan
->nb_guest_devs
== 0 && vlan
->nb_host_devs
== 0)
9762 if (vlan
->nb_guest_devs
== 0)
9763 fprintf(stderr
, "Warning: vlan %d with no nics\n", vlan
->id
);
9764 if (vlan
->nb_host_devs
== 0)
9766 "Warning: vlan %d is not connected to host network\n",
9771 /* XXX: this should be moved in the PC machine instantiation code */
9772 if (net_boot
!= 0) {
9774 for (i
= 0; i
< nb_nics
&& i
< 4; i
++) {
9775 const char *model
= nd_table
[i
].model
;
9777 if (net_boot
& (1 << i
)) {
9780 snprintf(buf
, sizeof(buf
), "%s/pxe-%s.bin", bios_dir
, model
);
9781 if (get_image_size(buf
) > 0) {
9782 if (nb_option_roms
>= MAX_OPTION_ROMS
) {
9783 fprintf(stderr
, "Too many option ROMs\n");
9786 option_rom
[nb_option_roms
] = strdup(buf
);
9793 fprintf(stderr
, "No valid PXE rom found for network device\n");
9799 /* init the memory */
9800 phys_ram_size
= machine
->ram_require
& ~RAMSIZE_FIXED
;
9802 if (machine
->ram_require
& RAMSIZE_FIXED
) {
9804 if (ram_size
< phys_ram_size
) {
9805 fprintf(stderr
, "Machine `%s' requires %llu bytes of memory\n",
9806 machine
->name
, (unsigned long long) phys_ram_size
);
9810 phys_ram_size
= ram_size
;
9812 ram_size
= phys_ram_size
;
9815 ram_size
= DEFAULT_RAM_SIZE
* 1024 * 1024;
9817 phys_ram_size
+= ram_size
;
9820 /* Initialize kvm */
9821 #if defined(TARGET_I386) || defined(TARGET_X86_64)
9822 #define KVM_EXTRA_PAGES 3
9824 #define KVM_EXTRA_PAGES 0
9826 if (kvm_enabled()) {
9827 phys_ram_size
+= KVM_EXTRA_PAGES
* TARGET_PAGE_SIZE
;
9828 if (kvm_qemu_create_context() < 0) {
9829 fprintf(stderr
, "Could not create KVM context\n");
9832 #ifdef KVM_CAP_USER_MEMORY
9836 ret
= kvm_qemu_check_extension(KVM_CAP_USER_MEMORY
);
9838 phys_ram_base
= qemu_alloc_physram(phys_ram_size
);
9839 if (!phys_ram_base
) {
9840 fprintf(stderr
, "Could not allocate physical memory\n");
9847 phys_ram_base
= qemu_vmalloc(phys_ram_size
);
9848 if (!phys_ram_base
) {
9849 fprintf(stderr
, "Could not allocate physical memory\n");
9854 /* init the dynamic translator */
9855 cpu_exec_init_all(tb_size
* 1024 * 1024);
9859 /* we always create the cdrom drive, even if no disk is there */
9861 if (nb_drives_opt
< MAX_DRIVES
)
9862 drive_add(NULL
, CDROM_ALIAS
);
9864 /* we always create at least one floppy */
9866 if (nb_drives_opt
< MAX_DRIVES
)
9867 drive_add(NULL
, FD_ALIAS
, 0);
9869 /* we always create one sd slot, even if no card is in it */
9871 if (nb_drives_opt
< MAX_DRIVES
)
9872 drive_add(NULL
, SD_ALIAS
);
9874 /* open the virtual block devices
9875 * note that migration with device
9876 * hot add/remove is broken.
9878 for(i
= 0; i
< nb_drives_opt
; i
++)
9879 if (drive_init(&drives_opt
[i
], snapshot
, machine
) == -1)
9882 register_savevm("timer", 0, 2, timer_save
, timer_load
, NULL
);
9883 register_savevm("ram", 0, 3, ram_save
, ram_load
, NULL
);
9886 memset(&display_state
, 0, sizeof(display_state
));
9889 fprintf(stderr
, "fatal: -nographic can't be used with -curses\n");
9892 /* nearly nothing to do */
9893 dumb_display_init(ds
);
9894 } else if (vnc_display
!= NULL
) {
9895 vnc_display_init(ds
);
9896 if (vnc_display_open(ds
, vnc_display
) < 0)
9899 #if defined(CONFIG_CURSES)
9901 curses_display_init(ds
, full_screen
);
9905 #if defined(CONFIG_SDL)
9906 sdl_display_init(ds
, full_screen
, no_frame
);
9907 #elif defined(CONFIG_COCOA)
9908 cocoa_display_init(ds
, full_screen
);
9910 dumb_display_init(ds
);
9914 /* Maintain compatibility with multiple stdio monitors */
9917 if (!strcmp(monitor_device
,"stdio")) {
9918 for (i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9919 const char *devname
= serial_devices
[i
];
9920 if (devname
&& !strcmp(devname
,"mon:stdio")) {
9921 monitor_device
= NULL
;
9923 } else if (devname
&& !strcmp(devname
,"stdio")) {
9924 monitor_device
= NULL
;
9925 serial_devices
[i
] = "mon:stdio";
9931 if (monitor_device
) {
9932 monitor_hd
= qemu_chr_open(monitor_device
);
9934 fprintf(stderr
, "qemu: could not open monitor device '%s'\n", monitor_device
);
9937 monitor_init(monitor_hd
, !nographic
);
9941 for(i
= 0; i
< MAX_SERIAL_PORTS
; i
++) {
9942 const char *devname
= serial_devices
[i
];
9943 if (devname
&& strcmp(devname
, "none")) {
9944 serial_hds
[i
] = qemu_chr_open(devname
);
9945 if (!serial_hds
[i
]) {
9946 fprintf(stderr
, "qemu: could not open serial device '%s'\n",
9950 if (strstart(devname
, "vc", 0))
9951 qemu_chr_printf(serial_hds
[i
], "serial%d console\r\n", i
);
9955 for(i
= 0; i
< MAX_PARALLEL_PORTS
; i
++) {
9956 const char *devname
= parallel_devices
[i
];
9957 if (devname
&& strcmp(devname
, "none")) {
9958 parallel_hds
[i
] = qemu_chr_open(devname
);
9959 if (!parallel_hds
[i
]) {
9960 fprintf(stderr
, "qemu: could not open parallel device '%s'\n",
9964 if (strstart(devname
, "vc", 0))
9965 qemu_chr_printf(parallel_hds
[i
], "parallel%d console\r\n", i
);
9972 machine
->init(ram_size
, vga_ram_size
, boot_devices
, ds
,
9973 kernel_filename
, kernel_cmdline
, initrd_filename
, cpu_model
);
9975 current_machine
= machine
;
9977 /* init USB devices */
9979 for(i
= 0; i
< usb_devices_index
; i
++) {
9980 if (usb_device_add(usb_devices
[i
]) < 0) {
9981 fprintf(stderr
, "Warning: could not add USB device %s\n",
9987 if (display_state
.dpy_refresh
) {
9988 display_state
.gui_timer
= qemu_new_timer(rt_clock
, gui_update
, &display_state
);
9989 qemu_mod_timer(display_state
.gui_timer
, qemu_get_clock(rt_clock
));
9992 #ifdef CONFIG_GDBSTUB
9994 /* XXX: use standard host:port notation and modify options
9996 if (gdbserver_start(gdbstub_port
) < 0) {
9997 fprintf(stderr
, "qemu: could not open gdbstub device on port '%s'\n",
10007 monitor_start_input();
10015 rc
= migrate_incoming(incoming
);
10017 fprintf(stderr
, "Migration failed rc=%d\n", rc
);
10023 /* XXX: simplify init */
10030 uint8_t status
= 0;
10035 len
= write(fds
[1], &status
, 1);
10036 if (len
== -1 && (errno
== EINTR
))
10043 TFR(fd
= open("/dev/null", O_RDWR
));
10057 #if !defined(_WIN32)
10058 /* close network clients */
10059 for(vlan
= first_vlan
; vlan
!= NULL
; vlan
= vlan
->next
) {
10060 VLANClientState
*vc
;
10062 for(vc
= vlan
->first_client
; vc
!= NULL
; vc
= vc
->next
) {
10063 if (vc
->fd_read
== tap_receive
) {
10065 TAPState
*s
= vc
->opaque
;
10067 if (sscanf(vc
->info_str
, "tap: ifname=%63s ", ifname
) == 1 &&
10069 launch_script(s
->down_script
, ifname
, s
->fd
);
10071 #if defined(CONFIG_VDE)
10072 if (vc
->fd_read
== vde_from_qemu
) {
10073 VDEState
*s
= vc
->opaque
;