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
24 #include "qemu-common.h"
25 #include "monitor/monitor.h"
26 #include "ui/console.h"
27 #include "sysemu/sysemu.h"
28 #include "qemu/timer.h"
29 #include "char/char.h"
32 #include "hw/msmouse.h"
33 #include "qmp-commands.h"
43 #include <sys/times.h>
47 #include <sys/ioctl.h>
48 #include <sys/resource.h>
49 #include <sys/socket.h>
50 #include <netinet/in.h>
52 #include <arpa/inet.h>
55 #include <sys/select.h>
58 #if defined(__GLIBC__)
60 #elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
65 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
66 #include <dev/ppbus/ppi.h>
67 #include <dev/ppbus/ppbconf.h>
68 #elif defined(__DragonFly__)
69 #include <dev/misc/ppi/ppi.h>
70 #include <bus/ppbus/ppbconf.h>
76 #include <linux/ppdev.h>
77 #include <linux/parport.h>
81 #include <sys/ethernet.h>
82 #include <sys/sockio.h>
83 #include <netinet/arp.h>
84 #include <netinet/in.h>
85 #include <netinet/in_systm.h>
86 #include <netinet/ip.h>
87 #include <netinet/ip_icmp.h> // must come after ip.h
88 #include <netinet/udp.h>
89 #include <netinet/tcp.h>
97 #include "qemu/sockets.h"
98 #include "ui/qemu-spice.h"
100 #define READ_BUF_LEN 4096
102 /***********************************************************/
103 /* character device */
105 static QTAILQ_HEAD(CharDriverStateHead
, CharDriverState
) chardevs
=
106 QTAILQ_HEAD_INITIALIZER(chardevs
);
108 void qemu_chr_be_event(CharDriverState
*s
, int event
)
110 /* Keep track if the char device is open */
112 case CHR_EVENT_OPENED
:
115 case CHR_EVENT_CLOSED
:
122 s
->chr_event(s
->handler_opaque
, event
);
125 static void qemu_chr_fire_open_event(void *opaque
)
127 CharDriverState
*s
= opaque
;
128 qemu_chr_be_event(s
, CHR_EVENT_OPENED
);
129 qemu_free_timer(s
->open_timer
);
130 s
->open_timer
= NULL
;
133 void qemu_chr_generic_open(CharDriverState
*s
)
135 if (s
->open_timer
== NULL
) {
136 s
->open_timer
= qemu_new_timer_ms(rt_clock
,
137 qemu_chr_fire_open_event
, s
);
138 qemu_mod_timer(s
->open_timer
, qemu_get_clock_ms(rt_clock
) - 1);
142 int qemu_chr_fe_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
144 return s
->chr_write(s
, buf
, len
);
147 int qemu_chr_fe_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
151 return s
->chr_ioctl(s
, cmd
, arg
);
154 int qemu_chr_be_can_write(CharDriverState
*s
)
156 if (!s
->chr_can_read
)
158 return s
->chr_can_read(s
->handler_opaque
);
161 void qemu_chr_be_write(CharDriverState
*s
, uint8_t *buf
, int len
)
164 s
->chr_read(s
->handler_opaque
, buf
, len
);
168 int qemu_chr_fe_get_msgfd(CharDriverState
*s
)
170 return s
->get_msgfd
? s
->get_msgfd(s
) : -1;
173 int qemu_chr_add_client(CharDriverState
*s
, int fd
)
175 return s
->chr_add_client
? s
->chr_add_client(s
, fd
) : -1;
178 void qemu_chr_accept_input(CharDriverState
*s
)
180 if (s
->chr_accept_input
)
181 s
->chr_accept_input(s
);
185 void qemu_chr_fe_printf(CharDriverState
*s
, const char *fmt
, ...)
187 char buf
[READ_BUF_LEN
];
190 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
191 qemu_chr_fe_write(s
, (uint8_t *)buf
, strlen(buf
));
195 void qemu_chr_add_handlers(CharDriverState
*s
,
196 IOCanReadHandler
*fd_can_read
,
197 IOReadHandler
*fd_read
,
198 IOEventHandler
*fd_event
,
201 if (!opaque
&& !fd_can_read
&& !fd_read
&& !fd_event
) {
202 /* chr driver being released. */
203 ++s
->avail_connections
;
205 s
->chr_can_read
= fd_can_read
;
206 s
->chr_read
= fd_read
;
207 s
->chr_event
= fd_event
;
208 s
->handler_opaque
= opaque
;
209 if (s
->chr_update_read_handler
)
210 s
->chr_update_read_handler(s
);
212 /* We're connecting to an already opened device, so let's make sure we
213 also get the open event */
215 qemu_chr_generic_open(s
);
219 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
224 static CharDriverState
*qemu_chr_open_null(QemuOpts
*opts
)
226 CharDriverState
*chr
;
228 chr
= g_malloc0(sizeof(CharDriverState
));
229 chr
->chr_write
= null_chr_write
;
233 /* MUX driver for serial I/O splitting */
235 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
236 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
238 IOCanReadHandler
*chr_can_read
[MAX_MUX
];
239 IOReadHandler
*chr_read
[MAX_MUX
];
240 IOEventHandler
*chr_event
[MAX_MUX
];
241 void *ext_opaque
[MAX_MUX
];
242 CharDriverState
*drv
;
247 /* Intermediate input buffer allows to catch escape sequences even if the
248 currently active device is not accepting any input - but only until it
250 unsigned char buffer
[MAX_MUX
][MUX_BUFFER_SIZE
];
255 int64_t timestamps_start
;
259 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
261 MuxDriver
*d
= chr
->opaque
;
263 if (!d
->timestamps
) {
264 ret
= d
->drv
->chr_write(d
->drv
, buf
, len
);
269 for (i
= 0; i
< len
; i
++) {
275 ti
= qemu_get_clock_ms(rt_clock
);
276 if (d
->timestamps_start
== -1)
277 d
->timestamps_start
= ti
;
278 ti
-= d
->timestamps_start
;
280 snprintf(buf1
, sizeof(buf1
),
281 "[%02d:%02d:%02d.%03d] ",
286 d
->drv
->chr_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
289 ret
+= d
->drv
->chr_write(d
->drv
, buf
+i
, 1);
290 if (buf
[i
] == '\n') {
298 static const char * const mux_help
[] = {
299 "% h print this help\n\r",
300 "% x exit emulator\n\r",
301 "% s save disk data back to file (if -snapshot)\n\r",
302 "% t toggle console timestamps\n\r"
303 "% b send break (magic sysrq)\n\r",
304 "% c switch between console and monitor\n\r",
309 int term_escape_char
= 0x01; /* ctrl-a is used for escape */
310 static void mux_print_help(CharDriverState
*chr
)
313 char ebuf
[15] = "Escape-Char";
314 char cbuf
[50] = "\n\r";
316 if (term_escape_char
> 0 && term_escape_char
< 26) {
317 snprintf(cbuf
, sizeof(cbuf
), "\n\r");
318 snprintf(ebuf
, sizeof(ebuf
), "C-%c", term_escape_char
- 1 + 'a');
320 snprintf(cbuf
, sizeof(cbuf
),
321 "\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
324 chr
->chr_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
325 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
326 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
327 if (mux_help
[i
][j
] == '%')
328 chr
->chr_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
330 chr
->chr_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
335 static void mux_chr_send_event(MuxDriver
*d
, int mux_nr
, int event
)
337 if (d
->chr_event
[mux_nr
])
338 d
->chr_event
[mux_nr
](d
->ext_opaque
[mux_nr
], event
);
341 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
343 if (d
->term_got_escape
) {
344 d
->term_got_escape
= 0;
345 if (ch
== term_escape_char
)
354 const char *term
= "QEMU: Terminated\n\r";
355 chr
->chr_write(chr
,(uint8_t *)term
,strlen(term
));
363 qemu_chr_be_event(chr
, CHR_EVENT_BREAK
);
366 /* Switch to the next registered device */
367 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_OUT
);
369 if (d
->focus
>= d
->mux_cnt
)
371 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_IN
);
374 d
->timestamps
= !d
->timestamps
;
375 d
->timestamps_start
= -1;
379 } else if (ch
== term_escape_char
) {
380 d
->term_got_escape
= 1;
388 static void mux_chr_accept_input(CharDriverState
*chr
)
390 MuxDriver
*d
= chr
->opaque
;
393 while (d
->prod
[m
] != d
->cons
[m
] &&
394 d
->chr_can_read
[m
] &&
395 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
396 d
->chr_read
[m
](d
->ext_opaque
[m
],
397 &d
->buffer
[m
][d
->cons
[m
]++ & MUX_BUFFER_MASK
], 1);
401 static int mux_chr_can_read(void *opaque
)
403 CharDriverState
*chr
= opaque
;
404 MuxDriver
*d
= chr
->opaque
;
407 if ((d
->prod
[m
] - d
->cons
[m
]) < MUX_BUFFER_SIZE
)
409 if (d
->chr_can_read
[m
])
410 return d
->chr_can_read
[m
](d
->ext_opaque
[m
]);
414 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
416 CharDriverState
*chr
= opaque
;
417 MuxDriver
*d
= chr
->opaque
;
421 mux_chr_accept_input (opaque
);
423 for(i
= 0; i
< size
; i
++)
424 if (mux_proc_byte(chr
, d
, buf
[i
])) {
425 if (d
->prod
[m
] == d
->cons
[m
] &&
426 d
->chr_can_read
[m
] &&
427 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
428 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
430 d
->buffer
[m
][d
->prod
[m
]++ & MUX_BUFFER_MASK
] = buf
[i
];
434 static void mux_chr_event(void *opaque
, int event
)
436 CharDriverState
*chr
= opaque
;
437 MuxDriver
*d
= chr
->opaque
;
440 /* Send the event to all registered listeners */
441 for (i
= 0; i
< d
->mux_cnt
; i
++)
442 mux_chr_send_event(d
, i
, event
);
445 static void mux_chr_update_read_handler(CharDriverState
*chr
)
447 MuxDriver
*d
= chr
->opaque
;
449 if (d
->mux_cnt
>= MAX_MUX
) {
450 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
453 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
454 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
455 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
456 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
457 /* Fix up the real driver with mux routines */
458 if (d
->mux_cnt
== 0) {
459 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
462 if (d
->focus
!= -1) {
463 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_OUT
);
465 d
->focus
= d
->mux_cnt
;
467 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_IN
);
470 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
472 CharDriverState
*chr
;
475 chr
= g_malloc0(sizeof(CharDriverState
));
476 d
= g_malloc0(sizeof(MuxDriver
));
481 chr
->chr_write
= mux_chr_write
;
482 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
483 chr
->chr_accept_input
= mux_chr_accept_input
;
484 /* Frontend guest-open / -close notification is not support with muxes */
485 chr
->chr_guest_open
= NULL
;
486 chr
->chr_guest_close
= NULL
;
488 /* Muxes are always open on creation */
489 qemu_chr_generic_open(chr
);
496 int send_all(int fd
, const void *buf
, int len1
)
502 ret
= send(fd
, buf
, len
, 0);
504 errno
= WSAGetLastError();
505 if (errno
!= WSAEWOULDBLOCK
) {
508 } else if (ret
== 0) {
520 int send_all(int fd
, const void *_buf
, int len1
)
523 const uint8_t *buf
= _buf
;
527 ret
= write(fd
, buf
, len
);
529 if (errno
!= EINTR
&& errno
!= EAGAIN
)
531 } else if (ret
== 0) {
544 typedef struct IOWatchPoll
549 IOCanReadHandler
*fd_can_read
;
552 QTAILQ_ENTRY(IOWatchPoll
) node
;
555 static QTAILQ_HEAD(, IOWatchPoll
) io_watch_poll_list
=
556 QTAILQ_HEAD_INITIALIZER(io_watch_poll_list
);
558 static IOWatchPoll
*io_watch_poll_from_source(GSource
*source
)
562 QTAILQ_FOREACH(i
, &io_watch_poll_list
, node
) {
563 if (i
->src
== source
) {
571 static gboolean
io_watch_poll_prepare(GSource
*source
, gint
*timeout_
)
573 IOWatchPoll
*iwp
= io_watch_poll_from_source(source
);
575 iwp
->max_size
= iwp
->fd_can_read(iwp
->opaque
);
576 if (iwp
->max_size
== 0) {
580 return g_io_watch_funcs
.prepare(source
, timeout_
);
583 static gboolean
io_watch_poll_check(GSource
*source
)
585 IOWatchPoll
*iwp
= io_watch_poll_from_source(source
);
587 if (iwp
->max_size
== 0) {
591 return g_io_watch_funcs
.check(source
);
594 static gboolean
io_watch_poll_dispatch(GSource
*source
, GSourceFunc callback
,
597 return g_io_watch_funcs
.dispatch(source
, callback
, user_data
);
600 static void io_watch_poll_finalize(GSource
*source
)
602 IOWatchPoll
*iwp
= io_watch_poll_from_source(source
);
603 QTAILQ_REMOVE(&io_watch_poll_list
, iwp
, node
);
604 g_io_watch_funcs
.finalize(source
);
607 static GSourceFuncs io_watch_poll_funcs
= {
608 .prepare
= io_watch_poll_prepare
,
609 .check
= io_watch_poll_check
,
610 .dispatch
= io_watch_poll_dispatch
,
611 .finalize
= io_watch_poll_finalize
,
614 /* Can only be used for read */
615 static guint
io_add_watch_poll(GIOChannel
*channel
,
616 IOCanReadHandler
*fd_can_read
,
624 src
= g_io_create_watch(channel
, G_IO_IN
| G_IO_ERR
| G_IO_HUP
);
625 g_source_set_funcs(src
, &io_watch_poll_funcs
);
626 g_source_set_callback(src
, (GSourceFunc
)fd_read
, user_data
, NULL
);
627 tag
= g_source_attach(src
, NULL
);
630 iwp
= g_malloc0(sizeof(*iwp
));
633 iwp
->fd_can_read
= fd_can_read
;
634 iwp
->opaque
= user_data
;
636 QTAILQ_INSERT_HEAD(&io_watch_poll_list
, iwp
, node
);
641 static GIOChannel
*io_channel_from_fd(int fd
)
649 chan
= g_io_channel_unix_new(fd
);
651 g_io_channel_set_encoding(chan
, NULL
, NULL
);
652 g_io_channel_set_buffered(chan
, FALSE
);
657 static int io_channel_send_all(GIOChannel
*fd
, const void *_buf
, int len1
)
662 const uint8_t *buf
= _buf
;
666 status
= g_io_channel_write_chars(fd
, (const gchar
*)buf
, len
,
667 &bytes_written
, NULL
);
668 if (status
!= G_IO_STATUS_NORMAL
) {
669 if (status
!= G_IO_STATUS_AGAIN
) {
672 } else if (status
== G_IO_STATUS_EOF
) {
675 buf
+= bytes_written
;
676 len
-= bytes_written
;
682 typedef struct FDCharDriver
{
683 CharDriverState
*chr
;
684 GIOChannel
*fd_in
, *fd_out
;
687 QTAILQ_ENTRY(FDCharDriver
) node
;
690 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
692 FDCharDriver
*s
= chr
->opaque
;
694 return io_channel_send_all(s
->fd_out
, buf
, len
);
697 static gboolean
fd_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
699 CharDriverState
*chr
= opaque
;
700 FDCharDriver
*s
= chr
->opaque
;
702 uint8_t buf
[READ_BUF_LEN
];
707 if (len
> s
->max_size
) {
714 status
= g_io_channel_read_chars(chan
, (gchar
*)buf
,
715 len
, &bytes_read
, NULL
);
716 if (status
== G_IO_STATUS_EOF
) {
717 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
720 if (status
== G_IO_STATUS_NORMAL
) {
721 qemu_chr_be_write(chr
, buf
, bytes_read
);
727 static int fd_chr_read_poll(void *opaque
)
729 CharDriverState
*chr
= opaque
;
730 FDCharDriver
*s
= chr
->opaque
;
732 s
->max_size
= qemu_chr_be_can_write(chr
);
736 static void fd_chr_update_read_handler(CharDriverState
*chr
)
738 FDCharDriver
*s
= chr
->opaque
;
741 g_source_remove(s
->fd_in_tag
);
745 s
->fd_in_tag
= io_add_watch_poll(s
->fd_in
, fd_chr_read_poll
, fd_chr_read
, chr
);
749 static void fd_chr_close(struct CharDriverState
*chr
)
751 FDCharDriver
*s
= chr
->opaque
;
754 g_source_remove(s
->fd_in_tag
);
759 g_io_channel_unref(s
->fd_in
);
762 g_io_channel_unref(s
->fd_out
);
766 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
769 /* open a character device to a unix fd */
770 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
772 CharDriverState
*chr
;
775 chr
= g_malloc0(sizeof(CharDriverState
));
776 s
= g_malloc0(sizeof(FDCharDriver
));
777 s
->fd_in
= io_channel_from_fd(fd_in
);
778 s
->fd_out
= io_channel_from_fd(fd_out
);
781 chr
->chr_write
= fd_chr_write
;
782 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
783 chr
->chr_close
= fd_chr_close
;
785 qemu_chr_generic_open(chr
);
790 static CharDriverState
*qemu_chr_open_file_out(QemuOpts
*opts
)
794 TFR(fd_out
= qemu_open(qemu_opt_get(opts
, "path"),
795 O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
, 0666));
799 return qemu_chr_open_fd(-1, fd_out
);
802 static CharDriverState
*qemu_chr_open_pipe(QemuOpts
*opts
)
805 char filename_in
[256], filename_out
[256];
806 const char *filename
= qemu_opt_get(opts
, "path");
808 if (filename
== NULL
) {
809 fprintf(stderr
, "chardev: pipe: no filename given\n");
813 snprintf(filename_in
, 256, "%s.in", filename
);
814 snprintf(filename_out
, 256, "%s.out", filename
);
815 TFR(fd_in
= qemu_open(filename_in
, O_RDWR
| O_BINARY
));
816 TFR(fd_out
= qemu_open(filename_out
, O_RDWR
| O_BINARY
));
817 if (fd_in
< 0 || fd_out
< 0) {
822 TFR(fd_in
= fd_out
= qemu_open(filename
, O_RDWR
| O_BINARY
));
827 return qemu_chr_open_fd(fd_in
, fd_out
);
830 /* init terminal so that we can grab keys */
831 static struct termios oldtty
;
832 static int old_fd0_flags
;
833 static bool stdio_allow_signal
;
835 static void term_exit(void)
837 tcsetattr (0, TCSANOW
, &oldtty
);
838 fcntl(0, F_SETFL
, old_fd0_flags
);
841 static void qemu_chr_set_echo_stdio(CharDriverState
*chr
, bool echo
)
847 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
848 |INLCR
|IGNCR
|ICRNL
|IXON
);
849 tty
.c_oflag
|= OPOST
;
850 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
851 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
856 /* if graphical mode, we allow Ctrl-C handling */
857 if (!stdio_allow_signal
)
858 tty
.c_lflag
&= ~ISIG
;
860 tcsetattr (0, TCSANOW
, &tty
);
863 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
869 static CharDriverState
*qemu_chr_open_stdio(QemuOpts
*opts
)
871 CharDriverState
*chr
;
873 if (is_daemonized()) {
874 error_report("cannot use stdio with -daemonize");
877 old_fd0_flags
= fcntl(0, F_GETFL
);
878 tcgetattr (0, &oldtty
);
879 fcntl(0, F_SETFL
, O_NONBLOCK
);
882 chr
= qemu_chr_open_fd(0, 1);
883 chr
->chr_close
= qemu_chr_close_stdio
;
884 chr
->chr_set_echo
= qemu_chr_set_echo_stdio
;
885 stdio_allow_signal
= qemu_opt_get_bool(opts
, "signal",
886 display_type
!= DT_NOGRAPHIC
);
887 qemu_chr_fe_set_echo(chr
, false);
893 /* Once Solaris has openpty(), this is going to be removed. */
894 static int openpty(int *amaster
, int *aslave
, char *name
,
895 struct termios
*termp
, struct winsize
*winp
)
898 int mfd
= -1, sfd
= -1;
900 *amaster
= *aslave
= -1;
902 mfd
= open("/dev/ptmx", O_RDWR
| O_NOCTTY
);
906 if (grantpt(mfd
) == -1 || unlockpt(mfd
) == -1)
909 if ((slave
= ptsname(mfd
)) == NULL
)
912 if ((sfd
= open(slave
, O_RDONLY
| O_NOCTTY
)) == -1)
915 if (ioctl(sfd
, I_PUSH
, "ptem") == -1 ||
916 (termp
!= NULL
&& tcgetattr(sfd
, termp
) < 0))
924 ioctl(sfd
, TIOCSWINSZ
, winp
);
935 static void cfmakeraw (struct termios
*termios_p
)
937 termios_p
->c_iflag
&=
938 ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
|INLCR
|IGNCR
|ICRNL
|IXON
);
939 termios_p
->c_oflag
&= ~OPOST
;
940 termios_p
->c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|ISIG
|IEXTEN
);
941 termios_p
->c_cflag
&= ~(CSIZE
|PARENB
);
942 termios_p
->c_cflag
|= CS8
;
944 termios_p
->c_cc
[VMIN
] = 0;
945 termios_p
->c_cc
[VTIME
] = 0;
949 #if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
950 || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__) \
951 || defined(__GLIBC__)
953 #define HAVE_CHARDEV_TTY 1
964 static void pty_chr_update_read_handler(CharDriverState
*chr
);
965 static void pty_chr_state(CharDriverState
*chr
, int connected
);
967 static int pty_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
969 PtyCharDriver
*s
= chr
->opaque
;
972 /* guest sends data, check for (re-)connect */
973 pty_chr_update_read_handler(chr
);
976 return io_channel_send_all(s
->fd
, buf
, len
);
979 static int pty_chr_read_poll(void *opaque
)
981 CharDriverState
*chr
= opaque
;
982 PtyCharDriver
*s
= chr
->opaque
;
984 s
->read_bytes
= qemu_chr_be_can_write(chr
);
985 return s
->read_bytes
;
988 static gboolean
pty_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
990 CharDriverState
*chr
= opaque
;
991 PtyCharDriver
*s
= chr
->opaque
;
993 uint8_t buf
[READ_BUF_LEN
];
997 if (len
> s
->read_bytes
)
1001 status
= g_io_channel_read_chars(s
->fd
, (gchar
*)buf
, len
, &size
, NULL
);
1002 if (status
!= G_IO_STATUS_NORMAL
) {
1003 pty_chr_state(chr
, 0);
1006 pty_chr_state(chr
, 1);
1007 qemu_chr_be_write(chr
, buf
, size
);
1012 static void pty_chr_update_read_handler(CharDriverState
*chr
)
1014 PtyCharDriver
*s
= chr
->opaque
;
1017 g_source_remove(s
->fd_tag
);
1020 s
->fd_tag
= io_add_watch_poll(s
->fd
, pty_chr_read_poll
, pty_chr_read
, chr
);
1023 * Short timeout here: just need wait long enougth that qemu makes
1024 * it through the poll loop once. When reconnected we want a
1025 * short timeout so we notice it almost instantly. Otherwise
1026 * read() gives us -EIO instantly, making pty_chr_state() reset the
1027 * timeout to the normal (much longer) poll interval before the
1030 qemu_mod_timer(s
->timer
, qemu_get_clock_ms(rt_clock
) + 10);
1033 static void pty_chr_state(CharDriverState
*chr
, int connected
)
1035 PtyCharDriver
*s
= chr
->opaque
;
1038 g_source_remove(s
->fd_tag
);
1042 /* (re-)connect poll interval for idle guests: once per second.
1043 * We check more frequently in case the guests sends data to
1044 * the virtual device linked to our pty. */
1045 qemu_mod_timer(s
->timer
, qemu_get_clock_ms(rt_clock
) + 1000);
1048 qemu_chr_generic_open(chr
);
1053 static void pty_chr_timer(void *opaque
)
1055 struct CharDriverState
*chr
= opaque
;
1056 PtyCharDriver
*s
= chr
->opaque
;
1061 /* If we arrive here without polling being cleared due
1062 * read returning -EIO, then we are (re-)connected */
1063 pty_chr_state(chr
, 1);
1068 pty_chr_update_read_handler(chr
);
1071 static void pty_chr_close(struct CharDriverState
*chr
)
1073 PtyCharDriver
*s
= chr
->opaque
;
1077 g_source_remove(s
->fd_tag
);
1079 fd
= g_io_channel_unix_get_fd(s
->fd
);
1080 g_io_channel_unref(s
->fd
);
1082 qemu_del_timer(s
->timer
);
1083 qemu_free_timer(s
->timer
);
1085 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1088 static CharDriverState
*qemu_chr_open_pty(QemuOpts
*opts
)
1090 CharDriverState
*chr
;
1094 int master_fd
, slave_fd
, len
;
1095 #if defined(__OpenBSD__) || defined(__DragonFly__)
1096 char pty_name
[PATH_MAX
];
1097 #define q_ptsname(x) pty_name
1099 char *pty_name
= NULL
;
1100 #define q_ptsname(x) ptsname(x)
1103 if (openpty(&master_fd
, &slave_fd
, pty_name
, NULL
, NULL
) < 0) {
1107 /* Set raw attributes on the pty. */
1108 tcgetattr(slave_fd
, &tty
);
1110 tcsetattr(slave_fd
, TCSAFLUSH
, &tty
);
1113 chr
= g_malloc0(sizeof(CharDriverState
));
1115 len
= strlen(q_ptsname(master_fd
)) + 5;
1116 chr
->filename
= g_malloc(len
);
1117 snprintf(chr
->filename
, len
, "pty:%s", q_ptsname(master_fd
));
1118 qemu_opt_set(opts
, "path", q_ptsname(master_fd
));
1120 label
= qemu_opts_id(opts
);
1121 fprintf(stderr
, "char device redirected to %s%s%s%s\n",
1122 q_ptsname(master_fd
),
1123 label
? " (label " : "",
1127 s
= g_malloc0(sizeof(PtyCharDriver
));
1129 chr
->chr_write
= pty_chr_write
;
1130 chr
->chr_update_read_handler
= pty_chr_update_read_handler
;
1131 chr
->chr_close
= pty_chr_close
;
1133 s
->fd
= io_channel_from_fd(master_fd
);
1134 s
->timer
= qemu_new_timer_ms(rt_clock
, pty_chr_timer
, chr
);
1139 static void tty_serial_init(int fd
, int speed
,
1140 int parity
, int data_bits
, int stop_bits
)
1146 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
1147 speed
, parity
, data_bits
, stop_bits
);
1149 tcgetattr (fd
, &tty
);
1151 #define check_speed(val) if (speed <= val) { spd = B##val; break; }
1152 speed
= speed
* 10 / 11;
1169 /* Non-Posix values follow. They may be unsupported on some systems. */
1171 check_speed(115200);
1173 check_speed(230400);
1176 check_speed(460800);
1179 check_speed(500000);
1182 check_speed(576000);
1185 check_speed(921600);
1188 check_speed(1000000);
1191 check_speed(1152000);
1194 check_speed(1500000);
1197 check_speed(2000000);
1200 check_speed(2500000);
1203 check_speed(3000000);
1206 check_speed(3500000);
1209 check_speed(4000000);
1214 cfsetispeed(&tty
, spd
);
1215 cfsetospeed(&tty
, spd
);
1217 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
1218 |INLCR
|IGNCR
|ICRNL
|IXON
);
1219 tty
.c_oflag
|= OPOST
;
1220 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
1221 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
1242 tty
.c_cflag
|= PARENB
;
1245 tty
.c_cflag
|= PARENB
| PARODD
;
1249 tty
.c_cflag
|= CSTOPB
;
1251 tcsetattr (fd
, TCSANOW
, &tty
);
1254 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1256 FDCharDriver
*s
= chr
->opaque
;
1259 case CHR_IOCTL_SERIAL_SET_PARAMS
:
1261 QEMUSerialSetParams
*ssp
= arg
;
1262 tty_serial_init(g_io_channel_unix_get_fd(s
->fd_in
),
1263 ssp
->speed
, ssp
->parity
,
1264 ssp
->data_bits
, ssp
->stop_bits
);
1267 case CHR_IOCTL_SERIAL_SET_BREAK
:
1269 int enable
= *(int *)arg
;
1271 tcsendbreak(g_io_channel_unix_get_fd(s
->fd_in
), 1);
1275 case CHR_IOCTL_SERIAL_GET_TIOCM
:
1278 int *targ
= (int *)arg
;
1279 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMGET
, &sarg
);
1281 if (sarg
& TIOCM_CTS
)
1282 *targ
|= CHR_TIOCM_CTS
;
1283 if (sarg
& TIOCM_CAR
)
1284 *targ
|= CHR_TIOCM_CAR
;
1285 if (sarg
& TIOCM_DSR
)
1286 *targ
|= CHR_TIOCM_DSR
;
1287 if (sarg
& TIOCM_RI
)
1288 *targ
|= CHR_TIOCM_RI
;
1289 if (sarg
& TIOCM_DTR
)
1290 *targ
|= CHR_TIOCM_DTR
;
1291 if (sarg
& TIOCM_RTS
)
1292 *targ
|= CHR_TIOCM_RTS
;
1295 case CHR_IOCTL_SERIAL_SET_TIOCM
:
1297 int sarg
= *(int *)arg
;
1299 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMGET
, &targ
);
1300 targ
&= ~(CHR_TIOCM_CTS
| CHR_TIOCM_CAR
| CHR_TIOCM_DSR
1301 | CHR_TIOCM_RI
| CHR_TIOCM_DTR
| CHR_TIOCM_RTS
);
1302 if (sarg
& CHR_TIOCM_CTS
)
1304 if (sarg
& CHR_TIOCM_CAR
)
1306 if (sarg
& CHR_TIOCM_DSR
)
1308 if (sarg
& CHR_TIOCM_RI
)
1310 if (sarg
& CHR_TIOCM_DTR
)
1312 if (sarg
& CHR_TIOCM_RTS
)
1314 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMSET
, &targ
);
1323 static void qemu_chr_close_tty(CharDriverState
*chr
)
1325 FDCharDriver
*s
= chr
->opaque
;
1329 fd
= g_io_channel_unix_get_fd(s
->fd_in
);
1339 static CharDriverState
*qemu_chr_open_tty_fd(int fd
)
1341 CharDriverState
*chr
;
1343 tty_serial_init(fd
, 115200, 'N', 8, 1);
1344 chr
= qemu_chr_open_fd(fd
, fd
);
1345 chr
->chr_ioctl
= tty_serial_ioctl
;
1346 chr
->chr_close
= qemu_chr_close_tty
;
1350 static CharDriverState
*qemu_chr_open_tty(QemuOpts
*opts
)
1352 const char *filename
= qemu_opt_get(opts
, "path");
1355 TFR(fd
= qemu_open(filename
, O_RDWR
| O_NONBLOCK
));
1359 return qemu_chr_open_tty_fd(fd
);
1361 #endif /* __linux__ || __sun__ */
1363 #if defined(__linux__)
1365 #define HAVE_CHARDEV_PARPORT 1
1370 } ParallelCharDriver
;
1372 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
1374 if (s
->mode
!= mode
) {
1376 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
1383 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1385 ParallelCharDriver
*drv
= chr
->opaque
;
1390 case CHR_IOCTL_PP_READ_DATA
:
1391 if (ioctl(fd
, PPRDATA
, &b
) < 0)
1393 *(uint8_t *)arg
= b
;
1395 case CHR_IOCTL_PP_WRITE_DATA
:
1396 b
= *(uint8_t *)arg
;
1397 if (ioctl(fd
, PPWDATA
, &b
) < 0)
1400 case CHR_IOCTL_PP_READ_CONTROL
:
1401 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
1403 /* Linux gives only the lowest bits, and no way to know data
1404 direction! For better compatibility set the fixed upper
1406 *(uint8_t *)arg
= b
| 0xc0;
1408 case CHR_IOCTL_PP_WRITE_CONTROL
:
1409 b
= *(uint8_t *)arg
;
1410 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
1413 case CHR_IOCTL_PP_READ_STATUS
:
1414 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
1416 *(uint8_t *)arg
= b
;
1418 case CHR_IOCTL_PP_DATA_DIR
:
1419 if (ioctl(fd
, PPDATADIR
, (int *)arg
) < 0)
1422 case CHR_IOCTL_PP_EPP_READ_ADDR
:
1423 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
1424 struct ParallelIOArg
*parg
= arg
;
1425 int n
= read(fd
, parg
->buffer
, parg
->count
);
1426 if (n
!= parg
->count
) {
1431 case CHR_IOCTL_PP_EPP_READ
:
1432 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
1433 struct ParallelIOArg
*parg
= arg
;
1434 int n
= read(fd
, parg
->buffer
, parg
->count
);
1435 if (n
!= parg
->count
) {
1440 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
1441 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
1442 struct ParallelIOArg
*parg
= arg
;
1443 int n
= write(fd
, parg
->buffer
, parg
->count
);
1444 if (n
!= parg
->count
) {
1449 case CHR_IOCTL_PP_EPP_WRITE
:
1450 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
1451 struct ParallelIOArg
*parg
= arg
;
1452 int n
= write(fd
, parg
->buffer
, parg
->count
);
1453 if (n
!= parg
->count
) {
1464 static void pp_close(CharDriverState
*chr
)
1466 ParallelCharDriver
*drv
= chr
->opaque
;
1469 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
1470 ioctl(fd
, PPRELEASE
);
1473 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1476 static CharDriverState
*qemu_chr_open_pp_fd(int fd
)
1478 CharDriverState
*chr
;
1479 ParallelCharDriver
*drv
;
1481 if (ioctl(fd
, PPCLAIM
) < 0) {
1486 drv
= g_malloc0(sizeof(ParallelCharDriver
));
1488 drv
->mode
= IEEE1284_MODE_COMPAT
;
1490 chr
= g_malloc0(sizeof(CharDriverState
));
1491 chr
->chr_write
= null_chr_write
;
1492 chr
->chr_ioctl
= pp_ioctl
;
1493 chr
->chr_close
= pp_close
;
1496 qemu_chr_generic_open(chr
);
1500 #endif /* __linux__ */
1502 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
1504 #define HAVE_CHARDEV_PARPORT 1
1506 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1508 int fd
= (int)(intptr_t)chr
->opaque
;
1512 case CHR_IOCTL_PP_READ_DATA
:
1513 if (ioctl(fd
, PPIGDATA
, &b
) < 0)
1515 *(uint8_t *)arg
= b
;
1517 case CHR_IOCTL_PP_WRITE_DATA
:
1518 b
= *(uint8_t *)arg
;
1519 if (ioctl(fd
, PPISDATA
, &b
) < 0)
1522 case CHR_IOCTL_PP_READ_CONTROL
:
1523 if (ioctl(fd
, PPIGCTRL
, &b
) < 0)
1525 *(uint8_t *)arg
= b
;
1527 case CHR_IOCTL_PP_WRITE_CONTROL
:
1528 b
= *(uint8_t *)arg
;
1529 if (ioctl(fd
, PPISCTRL
, &b
) < 0)
1532 case CHR_IOCTL_PP_READ_STATUS
:
1533 if (ioctl(fd
, PPIGSTATUS
, &b
) < 0)
1535 *(uint8_t *)arg
= b
;
1543 static CharDriverState
*qemu_chr_open_pp_fd(int fd
)
1545 CharDriverState
*chr
;
1547 chr
= g_malloc0(sizeof(CharDriverState
));
1548 chr
->opaque
= (void *)(intptr_t)fd
;
1549 chr
->chr_write
= null_chr_write
;
1550 chr
->chr_ioctl
= pp_ioctl
;
1559 HANDLE hcom
, hrecv
, hsend
;
1560 OVERLAPPED orecv
, osend
;
1567 HANDLE hInputReadyEvent
;
1568 HANDLE hInputDoneEvent
;
1569 HANDLE hInputThread
;
1570 uint8_t win_stdio_buf
;
1571 } WinStdioCharState
;
1573 #define NSENDBUF 2048
1574 #define NRECVBUF 2048
1575 #define MAXCONNECT 1
1576 #define NTIMEOUT 5000
1578 static int win_chr_poll(void *opaque
);
1579 static int win_chr_pipe_poll(void *opaque
);
1581 static void win_chr_close(CharDriverState
*chr
)
1583 WinCharState
*s
= chr
->opaque
;
1586 CloseHandle(s
->hsend
);
1590 CloseHandle(s
->hrecv
);
1594 CloseHandle(s
->hcom
);
1598 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
1600 qemu_del_polling_cb(win_chr_poll
, chr
);
1602 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1605 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
1607 WinCharState
*s
= chr
->opaque
;
1609 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
1614 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1616 fprintf(stderr
, "Failed CreateEvent\n");
1619 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1621 fprintf(stderr
, "Failed CreateEvent\n");
1625 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
1626 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
1627 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
1628 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
1633 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
1634 fprintf(stderr
, "Failed SetupComm\n");
1638 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
1639 size
= sizeof(COMMCONFIG
);
1640 GetDefaultCommConfig(filename
, &comcfg
, &size
);
1641 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
1642 CommConfigDialog(filename
, NULL
, &comcfg
);
1644 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
1645 fprintf(stderr
, "Failed SetCommState\n");
1649 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
1650 fprintf(stderr
, "Failed SetCommMask\n");
1654 cto
.ReadIntervalTimeout
= MAXDWORD
;
1655 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
1656 fprintf(stderr
, "Failed SetCommTimeouts\n");
1660 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
1661 fprintf(stderr
, "Failed ClearCommError\n");
1664 qemu_add_polling_cb(win_chr_poll
, chr
);
1672 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
1674 WinCharState
*s
= chr
->opaque
;
1675 DWORD len
, ret
, size
, err
;
1678 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
1679 s
->osend
.hEvent
= s
->hsend
;
1682 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
1684 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
1686 err
= GetLastError();
1687 if (err
== ERROR_IO_PENDING
) {
1688 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
1706 static int win_chr_read_poll(CharDriverState
*chr
)
1708 WinCharState
*s
= chr
->opaque
;
1710 s
->max_size
= qemu_chr_be_can_write(chr
);
1714 static void win_chr_readfile(CharDriverState
*chr
)
1716 WinCharState
*s
= chr
->opaque
;
1718 uint8_t buf
[READ_BUF_LEN
];
1721 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
1722 s
->orecv
.hEvent
= s
->hrecv
;
1723 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
1725 err
= GetLastError();
1726 if (err
== ERROR_IO_PENDING
) {
1727 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
1732 qemu_chr_be_write(chr
, buf
, size
);
1736 static void win_chr_read(CharDriverState
*chr
)
1738 WinCharState
*s
= chr
->opaque
;
1740 if (s
->len
> s
->max_size
)
1741 s
->len
= s
->max_size
;
1745 win_chr_readfile(chr
);
1748 static int win_chr_poll(void *opaque
)
1750 CharDriverState
*chr
= opaque
;
1751 WinCharState
*s
= chr
->opaque
;
1755 ClearCommError(s
->hcom
, &comerr
, &status
);
1756 if (status
.cbInQue
> 0) {
1757 s
->len
= status
.cbInQue
;
1758 win_chr_read_poll(chr
);
1765 static CharDriverState
*qemu_chr_open_win_path(const char *filename
)
1767 CharDriverState
*chr
;
1770 chr
= g_malloc0(sizeof(CharDriverState
));
1771 s
= g_malloc0(sizeof(WinCharState
));
1773 chr
->chr_write
= win_chr_write
;
1774 chr
->chr_close
= win_chr_close
;
1776 if (win_chr_init(chr
, filename
) < 0) {
1781 qemu_chr_generic_open(chr
);
1785 static CharDriverState
*qemu_chr_open_win(QemuOpts
*opts
)
1787 return qemu_chr_open_win_path(qemu_opt_get(opts
, "path"));
1790 static int win_chr_pipe_poll(void *opaque
)
1792 CharDriverState
*chr
= opaque
;
1793 WinCharState
*s
= chr
->opaque
;
1796 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
1799 win_chr_read_poll(chr
);
1806 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
1808 WinCharState
*s
= chr
->opaque
;
1816 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1818 fprintf(stderr
, "Failed CreateEvent\n");
1821 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1823 fprintf(stderr
, "Failed CreateEvent\n");
1827 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
1828 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
1829 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
1831 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
1832 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
1833 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
1838 ZeroMemory(&ov
, sizeof(ov
));
1839 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1840 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
1842 fprintf(stderr
, "Failed ConnectNamedPipe\n");
1846 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
1848 fprintf(stderr
, "Failed GetOverlappedResult\n");
1850 CloseHandle(ov
.hEvent
);
1857 CloseHandle(ov
.hEvent
);
1860 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
1869 static CharDriverState
*qemu_chr_open_win_pipe(QemuOpts
*opts
)
1871 const char *filename
= qemu_opt_get(opts
, "path");
1872 CharDriverState
*chr
;
1875 chr
= g_malloc0(sizeof(CharDriverState
));
1876 s
= g_malloc0(sizeof(WinCharState
));
1878 chr
->chr_write
= win_chr_write
;
1879 chr
->chr_close
= win_chr_close
;
1881 if (win_chr_pipe_init(chr
, filename
) < 0) {
1886 qemu_chr_generic_open(chr
);
1890 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
1892 CharDriverState
*chr
;
1895 chr
= g_malloc0(sizeof(CharDriverState
));
1896 s
= g_malloc0(sizeof(WinCharState
));
1899 chr
->chr_write
= win_chr_write
;
1900 qemu_chr_generic_open(chr
);
1904 static CharDriverState
*qemu_chr_open_win_con(QemuOpts
*opts
)
1906 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
1909 static CharDriverState
*qemu_chr_open_win_file_out(QemuOpts
*opts
)
1911 const char *file_out
= qemu_opt_get(opts
, "path");
1914 fd_out
= CreateFile(file_out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
1915 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
1916 if (fd_out
== INVALID_HANDLE_VALUE
) {
1920 return qemu_chr_open_win_file(fd_out
);
1923 static int win_stdio_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1925 HANDLE hStdOut
= GetStdHandle(STD_OUTPUT_HANDLE
);
1932 if (!WriteFile(hStdOut
, buf
, len1
, &dwSize
, NULL
)) {
1942 static void win_stdio_wait_func(void *opaque
)
1944 CharDriverState
*chr
= opaque
;
1945 WinStdioCharState
*stdio
= chr
->opaque
;
1946 INPUT_RECORD buf
[4];
1951 ret
= ReadConsoleInput(stdio
->hStdIn
, buf
, sizeof(buf
) / sizeof(*buf
),
1955 /* Avoid error storm */
1956 qemu_del_wait_object(stdio
->hStdIn
, NULL
, NULL
);
1960 for (i
= 0; i
< dwSize
; i
++) {
1961 KEY_EVENT_RECORD
*kev
= &buf
[i
].Event
.KeyEvent
;
1963 if (buf
[i
].EventType
== KEY_EVENT
&& kev
->bKeyDown
) {
1965 if (kev
->uChar
.AsciiChar
!= 0) {
1966 for (j
= 0; j
< kev
->wRepeatCount
; j
++) {
1967 if (qemu_chr_be_can_write(chr
)) {
1968 uint8_t c
= kev
->uChar
.AsciiChar
;
1969 qemu_chr_be_write(chr
, &c
, 1);
1977 static DWORD WINAPI
win_stdio_thread(LPVOID param
)
1979 CharDriverState
*chr
= param
;
1980 WinStdioCharState
*stdio
= chr
->opaque
;
1986 /* Wait for one byte */
1987 ret
= ReadFile(stdio
->hStdIn
, &stdio
->win_stdio_buf
, 1, &dwSize
, NULL
);
1989 /* Exit in case of error, continue if nothing read */
1997 /* Some terminal emulator returns \r\n for Enter, just pass \n */
1998 if (stdio
->win_stdio_buf
== '\r') {
2002 /* Signal the main thread and wait until the byte was eaten */
2003 if (!SetEvent(stdio
->hInputReadyEvent
)) {
2006 if (WaitForSingleObject(stdio
->hInputDoneEvent
, INFINITE
)
2012 qemu_del_wait_object(stdio
->hInputReadyEvent
, NULL
, NULL
);
2016 static void win_stdio_thread_wait_func(void *opaque
)
2018 CharDriverState
*chr
= opaque
;
2019 WinStdioCharState
*stdio
= chr
->opaque
;
2021 if (qemu_chr_be_can_write(chr
)) {
2022 qemu_chr_be_write(chr
, &stdio
->win_stdio_buf
, 1);
2025 SetEvent(stdio
->hInputDoneEvent
);
2028 static void qemu_chr_set_echo_win_stdio(CharDriverState
*chr
, bool echo
)
2030 WinStdioCharState
*stdio
= chr
->opaque
;
2033 GetConsoleMode(stdio
->hStdIn
, &dwMode
);
2036 SetConsoleMode(stdio
->hStdIn
, dwMode
| ENABLE_ECHO_INPUT
);
2038 SetConsoleMode(stdio
->hStdIn
, dwMode
& ~ENABLE_ECHO_INPUT
);
2042 static void win_stdio_close(CharDriverState
*chr
)
2044 WinStdioCharState
*stdio
= chr
->opaque
;
2046 if (stdio
->hInputReadyEvent
!= INVALID_HANDLE_VALUE
) {
2047 CloseHandle(stdio
->hInputReadyEvent
);
2049 if (stdio
->hInputDoneEvent
!= INVALID_HANDLE_VALUE
) {
2050 CloseHandle(stdio
->hInputDoneEvent
);
2052 if (stdio
->hInputThread
!= INVALID_HANDLE_VALUE
) {
2053 TerminateThread(stdio
->hInputThread
, 0);
2056 g_free(chr
->opaque
);
2060 static CharDriverState
*qemu_chr_open_win_stdio(QemuOpts
*opts
)
2062 CharDriverState
*chr
;
2063 WinStdioCharState
*stdio
;
2067 chr
= g_malloc0(sizeof(CharDriverState
));
2068 stdio
= g_malloc0(sizeof(WinStdioCharState
));
2070 stdio
->hStdIn
= GetStdHandle(STD_INPUT_HANDLE
);
2071 if (stdio
->hStdIn
== INVALID_HANDLE_VALUE
) {
2072 fprintf(stderr
, "cannot open stdio: invalid handle\n");
2076 is_console
= GetConsoleMode(stdio
->hStdIn
, &dwMode
) != 0;
2078 chr
->opaque
= stdio
;
2079 chr
->chr_write
= win_stdio_write
;
2080 chr
->chr_close
= win_stdio_close
;
2083 if (qemu_add_wait_object(stdio
->hStdIn
,
2084 win_stdio_wait_func
, chr
)) {
2085 fprintf(stderr
, "qemu_add_wait_object: failed\n");
2090 stdio
->hInputReadyEvent
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2091 stdio
->hInputDoneEvent
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2092 stdio
->hInputThread
= CreateThread(NULL
, 0, win_stdio_thread
,
2095 if (stdio
->hInputThread
== INVALID_HANDLE_VALUE
2096 || stdio
->hInputReadyEvent
== INVALID_HANDLE_VALUE
2097 || stdio
->hInputDoneEvent
== INVALID_HANDLE_VALUE
) {
2098 fprintf(stderr
, "cannot create stdio thread or event\n");
2101 if (qemu_add_wait_object(stdio
->hInputReadyEvent
,
2102 win_stdio_thread_wait_func
, chr
)) {
2103 fprintf(stderr
, "qemu_add_wait_object: failed\n");
2107 dwMode
|= ENABLE_LINE_INPUT
;
2110 /* set the terminal in raw mode */
2111 /* ENABLE_QUICK_EDIT_MODE | ENABLE_EXTENDED_FLAGS */
2112 dwMode
|= ENABLE_PROCESSED_INPUT
;
2115 SetConsoleMode(stdio
->hStdIn
, dwMode
);
2117 chr
->chr_set_echo
= qemu_chr_set_echo_win_stdio
;
2118 qemu_chr_fe_set_echo(chr
, false);
2122 #endif /* !_WIN32 */
2124 /***********************************************************/
2125 /* UDP Net console */
2129 uint8_t buf
[READ_BUF_LEN
];
2135 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2137 NetCharDriver
*s
= chr
->opaque
;
2139 return send(s
->fd
, (const void *)buf
, len
, 0);
2142 static int udp_chr_read_poll(void *opaque
)
2144 CharDriverState
*chr
= opaque
;
2145 NetCharDriver
*s
= chr
->opaque
;
2147 s
->max_size
= qemu_chr_be_can_write(chr
);
2149 /* If there were any stray characters in the queue process them
2152 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
2153 qemu_chr_be_write(chr
, &s
->buf
[s
->bufptr
], 1);
2155 s
->max_size
= qemu_chr_be_can_write(chr
);
2160 static void udp_chr_read(void *opaque
)
2162 CharDriverState
*chr
= opaque
;
2163 NetCharDriver
*s
= chr
->opaque
;
2165 if (s
->max_size
== 0)
2167 s
->bufcnt
= qemu_recv(s
->fd
, s
->buf
, sizeof(s
->buf
), 0);
2168 s
->bufptr
= s
->bufcnt
;
2173 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
2174 qemu_chr_be_write(chr
, &s
->buf
[s
->bufptr
], 1);
2176 s
->max_size
= qemu_chr_be_can_write(chr
);
2180 static void udp_chr_update_read_handler(CharDriverState
*chr
)
2182 NetCharDriver
*s
= chr
->opaque
;
2185 qemu_set_fd_handler2(s
->fd
, udp_chr_read_poll
,
2186 udp_chr_read
, NULL
, chr
);
2190 static void udp_chr_close(CharDriverState
*chr
)
2192 NetCharDriver
*s
= chr
->opaque
;
2194 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2198 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2201 static CharDriverState
*qemu_chr_open_udp(QemuOpts
*opts
)
2203 CharDriverState
*chr
= NULL
;
2204 NetCharDriver
*s
= NULL
;
2205 Error
*local_err
= NULL
;
2208 chr
= g_malloc0(sizeof(CharDriverState
));
2209 s
= g_malloc0(sizeof(NetCharDriver
));
2211 fd
= inet_dgram_opts(opts
, &local_err
);
2220 chr
->chr_write
= udp_chr_write
;
2221 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
2222 chr
->chr_close
= udp_chr_close
;
2227 qerror_report_err(local_err
);
2228 error_free(local_err
);
2238 /***********************************************************/
2239 /* TCP Net console */
2251 static void tcp_chr_accept(void *opaque
);
2253 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2255 TCPCharDriver
*s
= chr
->opaque
;
2257 return send_all(s
->fd
, buf
, len
);
2259 /* XXX: indicate an error ? */
2264 static int tcp_chr_read_poll(void *opaque
)
2266 CharDriverState
*chr
= opaque
;
2267 TCPCharDriver
*s
= chr
->opaque
;
2270 s
->max_size
= qemu_chr_be_can_write(chr
);
2275 #define IAC_BREAK 243
2276 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
2278 uint8_t *buf
, int *size
)
2280 /* Handle any telnet client's basic IAC options to satisfy char by
2281 * char mode with no echo. All IAC options will be removed from
2282 * the buf and the do_telnetopt variable will be used to track the
2283 * state of the width of the IAC information.
2285 * IAC commands come in sets of 3 bytes with the exception of the
2286 * "IAC BREAK" command and the double IAC.
2292 for (i
= 0; i
< *size
; i
++) {
2293 if (s
->do_telnetopt
> 1) {
2294 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
2295 /* Double IAC means send an IAC */
2299 s
->do_telnetopt
= 1;
2301 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
2302 /* Handle IAC break commands by sending a serial break */
2303 qemu_chr_be_event(chr
, CHR_EVENT_BREAK
);
2308 if (s
->do_telnetopt
>= 4) {
2309 s
->do_telnetopt
= 1;
2312 if ((unsigned char)buf
[i
] == IAC
) {
2313 s
->do_telnetopt
= 2;
2324 static int tcp_get_msgfd(CharDriverState
*chr
)
2326 TCPCharDriver
*s
= chr
->opaque
;
2333 static void unix_process_msgfd(CharDriverState
*chr
, struct msghdr
*msg
)
2335 TCPCharDriver
*s
= chr
->opaque
;
2336 struct cmsghdr
*cmsg
;
2338 for (cmsg
= CMSG_FIRSTHDR(msg
); cmsg
; cmsg
= CMSG_NXTHDR(msg
, cmsg
)) {
2341 if (cmsg
->cmsg_len
!= CMSG_LEN(sizeof(int)) ||
2342 cmsg
->cmsg_level
!= SOL_SOCKET
||
2343 cmsg
->cmsg_type
!= SCM_RIGHTS
)
2346 fd
= *((int *)CMSG_DATA(cmsg
));
2350 #ifndef MSG_CMSG_CLOEXEC
2351 qemu_set_cloexec(fd
);
2359 static ssize_t
tcp_chr_recv(CharDriverState
*chr
, char *buf
, size_t len
)
2361 TCPCharDriver
*s
= chr
->opaque
;
2362 struct msghdr msg
= { NULL
, };
2363 struct iovec iov
[1];
2365 struct cmsghdr cmsg
;
2366 char control
[CMSG_SPACE(sizeof(int))];
2371 iov
[0].iov_base
= buf
;
2372 iov
[0].iov_len
= len
;
2376 msg
.msg_control
= &msg_control
;
2377 msg
.msg_controllen
= sizeof(msg_control
);
2379 #ifdef MSG_CMSG_CLOEXEC
2380 flags
|= MSG_CMSG_CLOEXEC
;
2382 ret
= recvmsg(s
->fd
, &msg
, flags
);
2383 if (ret
> 0 && s
->is_unix
) {
2384 unix_process_msgfd(chr
, &msg
);
2390 static ssize_t
tcp_chr_recv(CharDriverState
*chr
, char *buf
, size_t len
)
2392 TCPCharDriver
*s
= chr
->opaque
;
2393 return qemu_recv(s
->fd
, buf
, len
, 0);
2397 static void tcp_chr_read(void *opaque
)
2399 CharDriverState
*chr
= opaque
;
2400 TCPCharDriver
*s
= chr
->opaque
;
2401 uint8_t buf
[READ_BUF_LEN
];
2404 if (!s
->connected
|| s
->max_size
<= 0)
2407 if (len
> s
->max_size
)
2409 size
= tcp_chr_recv(chr
, (void *)buf
, len
);
2411 /* connection closed */
2413 if (s
->listen_fd
>= 0) {
2414 qemu_set_fd_handler2(s
->listen_fd
, NULL
, tcp_chr_accept
, NULL
, chr
);
2416 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2419 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2420 } else if (size
> 0) {
2421 if (s
->do_telnetopt
)
2422 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
2424 qemu_chr_be_write(chr
, buf
, size
);
2429 CharDriverState
*qemu_chr_open_eventfd(int eventfd
)
2431 return qemu_chr_open_fd(eventfd
, eventfd
);
2435 static void tcp_chr_connect(void *opaque
)
2437 CharDriverState
*chr
= opaque
;
2438 TCPCharDriver
*s
= chr
->opaque
;
2442 qemu_set_fd_handler2(s
->fd
, tcp_chr_read_poll
,
2443 tcp_chr_read
, NULL
, chr
);
2445 qemu_chr_generic_open(chr
);
2448 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
2449 static void tcp_chr_telnet_init(int fd
)
2452 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
2453 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
2454 send(fd
, (char *)buf
, 3, 0);
2455 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
2456 send(fd
, (char *)buf
, 3, 0);
2457 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
2458 send(fd
, (char *)buf
, 3, 0);
2459 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
2460 send(fd
, (char *)buf
, 3, 0);
2463 static int tcp_chr_add_client(CharDriverState
*chr
, int fd
)
2465 TCPCharDriver
*s
= chr
->opaque
;
2469 socket_set_nonblock(fd
);
2471 socket_set_nodelay(fd
);
2473 qemu_set_fd_handler2(s
->listen_fd
, NULL
, NULL
, NULL
, NULL
);
2474 tcp_chr_connect(chr
);
2479 static void tcp_chr_accept(void *opaque
)
2481 CharDriverState
*chr
= opaque
;
2482 TCPCharDriver
*s
= chr
->opaque
;
2483 struct sockaddr_in saddr
;
2485 struct sockaddr_un uaddr
;
2487 struct sockaddr
*addr
;
2494 len
= sizeof(uaddr
);
2495 addr
= (struct sockaddr
*)&uaddr
;
2499 len
= sizeof(saddr
);
2500 addr
= (struct sockaddr
*)&saddr
;
2502 fd
= qemu_accept(s
->listen_fd
, addr
, &len
);
2503 if (fd
< 0 && errno
!= EINTR
) {
2505 } else if (fd
>= 0) {
2506 if (s
->do_telnetopt
)
2507 tcp_chr_telnet_init(fd
);
2511 if (tcp_chr_add_client(chr
, fd
) < 0)
2515 static void tcp_chr_close(CharDriverState
*chr
)
2517 TCPCharDriver
*s
= chr
->opaque
;
2519 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
2522 if (s
->listen_fd
>= 0) {
2523 qemu_set_fd_handler2(s
->listen_fd
, NULL
, NULL
, NULL
, NULL
);
2524 closesocket(s
->listen_fd
);
2527 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2530 static CharDriverState
*qemu_chr_open_socket_fd(int fd
, bool do_nodelay
,
2531 bool is_listen
, bool is_telnet
,
2532 bool is_waitconnect
,
2535 CharDriverState
*chr
= NULL
;
2536 TCPCharDriver
*s
= NULL
;
2537 char host
[NI_MAXHOST
], serv
[NI_MAXSERV
];
2538 const char *left
= "", *right
= "";
2539 struct sockaddr_storage ss
;
2540 socklen_t ss_len
= sizeof(ss
);
2542 memset(&ss
, 0, ss_len
);
2543 if (getsockname(fd
, (struct sockaddr
*) &ss
, &ss_len
) != 0) {
2544 error_setg(errp
, "getsockname: %s", strerror(errno
));
2548 chr
= g_malloc0(sizeof(CharDriverState
));
2549 s
= g_malloc0(sizeof(TCPCharDriver
));
2556 chr
->filename
= g_malloc(256);
2557 switch (ss
.ss_family
) {
2561 snprintf(chr
->filename
, 256, "unix:%s%s",
2562 ((struct sockaddr_un
*)(&ss
))->sun_path
,
2563 is_listen
? ",server" : "");
2571 s
->do_nodelay
= do_nodelay
;
2572 getnameinfo((struct sockaddr
*) &ss
, ss_len
, host
, sizeof(host
),
2573 serv
, sizeof(serv
), NI_NUMERICHOST
| NI_NUMERICSERV
);
2574 snprintf(chr
->filename
, 256, "%s:%s:%s%s%s%s",
2575 is_telnet
? "telnet" : "tcp",
2576 left
, host
, right
, serv
,
2577 is_listen
? ",server" : "");
2582 chr
->chr_write
= tcp_chr_write
;
2583 chr
->chr_close
= tcp_chr_close
;
2584 chr
->get_msgfd
= tcp_get_msgfd
;
2585 chr
->chr_add_client
= tcp_chr_add_client
;
2589 qemu_set_fd_handler2(s
->listen_fd
, NULL
, tcp_chr_accept
, NULL
, chr
);
2591 s
->do_telnetopt
= 1;
2596 socket_set_nodelay(fd
);
2597 tcp_chr_connect(chr
);
2600 if (is_listen
&& is_waitconnect
) {
2601 printf("QEMU waiting for connection on: %s\n",
2603 tcp_chr_accept(chr
);
2604 socket_set_nonblock(s
->listen_fd
);
2609 static CharDriverState
*qemu_chr_open_socket(QemuOpts
*opts
)
2611 CharDriverState
*chr
= NULL
;
2612 Error
*local_err
= NULL
;
2620 is_listen
= qemu_opt_get_bool(opts
, "server", 0);
2621 is_waitconnect
= qemu_opt_get_bool(opts
, "wait", 1);
2622 is_telnet
= qemu_opt_get_bool(opts
, "telnet", 0);
2623 do_nodelay
= !qemu_opt_get_bool(opts
, "delay", 1);
2624 is_unix
= qemu_opt_get(opts
, "path") != NULL
;
2630 fd
= unix_listen_opts(opts
, &local_err
);
2632 fd
= unix_connect_opts(opts
, &local_err
, NULL
, NULL
);
2636 fd
= inet_listen_opts(opts
, 0, &local_err
);
2638 fd
= inet_connect_opts(opts
, &local_err
, NULL
, NULL
);
2645 if (!is_waitconnect
)
2646 socket_set_nonblock(fd
);
2648 chr
= qemu_chr_open_socket_fd(fd
, do_nodelay
, is_listen
, is_telnet
,
2649 is_waitconnect
, &local_err
);
2650 if (error_is_set(&local_err
)) {
2658 qerror_report_err(local_err
);
2659 error_free(local_err
);
2665 g_free(chr
->opaque
);
2671 /***********************************************************/
2672 /* Memory chardev */
2675 size_t outbuf_capacity
;
2679 static int mem_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2681 MemoryDriver
*d
= chr
->opaque
;
2683 /* TODO: the QString implementation has the same code, we should
2684 * introduce a generic way to do this in cutils.c */
2685 if (d
->outbuf_capacity
< d
->outbuf_size
+ len
) {
2687 d
->outbuf_capacity
+= len
;
2688 d
->outbuf_capacity
*= 2;
2689 d
->outbuf
= g_realloc(d
->outbuf
, d
->outbuf_capacity
);
2692 memcpy(d
->outbuf
+ d
->outbuf_size
, buf
, len
);
2693 d
->outbuf_size
+= len
;
2698 void qemu_chr_init_mem(CharDriverState
*chr
)
2702 d
= g_malloc(sizeof(*d
));
2704 d
->outbuf_capacity
= 4096;
2705 d
->outbuf
= g_malloc0(d
->outbuf_capacity
);
2707 memset(chr
, 0, sizeof(*chr
));
2709 chr
->chr_write
= mem_chr_write
;
2712 QString
*qemu_chr_mem_to_qs(CharDriverState
*chr
)
2714 MemoryDriver
*d
= chr
->opaque
;
2715 return qstring_from_substr((char *) d
->outbuf
, 0, d
->outbuf_size
- 1);
2718 /* NOTE: this driver can not be closed with qemu_chr_delete()! */
2719 void qemu_chr_close_mem(CharDriverState
*chr
)
2721 MemoryDriver
*d
= chr
->opaque
;
2724 g_free(chr
->opaque
);
2726 chr
->chr_write
= NULL
;
2729 size_t qemu_chr_mem_osize(const CharDriverState
*chr
)
2731 const MemoryDriver
*d
= chr
->opaque
;
2732 return d
->outbuf_size
;
2735 /*********************************************************/
2736 /* Ring buffer chardev */
2743 } RingBufCharDriver
;
2745 static size_t ringbuf_count(const CharDriverState
*chr
)
2747 const RingBufCharDriver
*d
= chr
->opaque
;
2749 return d
->prod
- d
->cons
;
2752 static int ringbuf_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2754 RingBufCharDriver
*d
= chr
->opaque
;
2757 if (!buf
|| (len
< 0)) {
2761 for (i
= 0; i
< len
; i
++ ) {
2762 d
->cbuf
[d
->prod
++ & (d
->size
- 1)] = buf
[i
];
2763 if (d
->prod
- d
->cons
> d
->size
) {
2764 d
->cons
= d
->prod
- d
->size
;
2771 static int ringbuf_chr_read(CharDriverState
*chr
, uint8_t *buf
, int len
)
2773 RingBufCharDriver
*d
= chr
->opaque
;
2776 for (i
= 0; i
< len
&& d
->cons
!= d
->prod
; i
++) {
2777 buf
[i
] = d
->cbuf
[d
->cons
++ & (d
->size
- 1)];
2783 static void ringbuf_chr_close(struct CharDriverState
*chr
)
2785 RingBufCharDriver
*d
= chr
->opaque
;
2792 static CharDriverState
*qemu_chr_open_ringbuf(QemuOpts
*opts
)
2794 CharDriverState
*chr
;
2795 RingBufCharDriver
*d
;
2797 chr
= g_malloc0(sizeof(CharDriverState
));
2798 d
= g_malloc(sizeof(*d
));
2800 d
->size
= qemu_opt_get_size(opts
, "size", 0);
2805 /* The size must be power of 2 */
2806 if (d
->size
& (d
->size
- 1)) {
2807 error_report("size of ringbuf device must be power of two");
2813 d
->cbuf
= g_malloc0(d
->size
);
2816 chr
->chr_write
= ringbuf_chr_write
;
2817 chr
->chr_close
= ringbuf_chr_close
;
2827 static bool chr_is_ringbuf(const CharDriverState
*chr
)
2829 return chr
->chr_write
== ringbuf_chr_write
;
2832 void qmp_ringbuf_write(const char *device
, const char *data
,
2833 bool has_format
, enum DataFormat format
,
2836 CharDriverState
*chr
;
2837 const uint8_t *write_data
;
2841 chr
= qemu_chr_find(device
);
2843 error_setg(errp
, "Device '%s' not found", device
);
2847 if (!chr_is_ringbuf(chr
)) {
2848 error_setg(errp
,"%s is not a ringbuf device", device
);
2852 if (has_format
&& (format
== DATA_FORMAT_BASE64
)) {
2853 write_data
= g_base64_decode(data
, &write_count
);
2855 write_data
= (uint8_t *)data
;
2856 write_count
= strlen(data
);
2859 ret
= ringbuf_chr_write(chr
, write_data
, write_count
);
2861 if (write_data
!= (uint8_t *)data
) {
2862 g_free((void *)write_data
);
2866 error_setg(errp
, "Failed to write to device %s", device
);
2871 char *qmp_ringbuf_read(const char *device
, int64_t size
,
2872 bool has_format
, enum DataFormat format
,
2875 CharDriverState
*chr
;
2880 chr
= qemu_chr_find(device
);
2882 error_setg(errp
, "Device '%s' not found", device
);
2886 if (!chr_is_ringbuf(chr
)) {
2887 error_setg(errp
,"%s is not a ringbuf device", device
);
2892 error_setg(errp
, "size must be greater than zero");
2896 count
= ringbuf_count(chr
);
2897 size
= size
> count
? count
: size
;
2898 read_data
= g_malloc(size
+ 1);
2900 ringbuf_chr_read(chr
, read_data
, size
);
2902 if (has_format
&& (format
== DATA_FORMAT_BASE64
)) {
2903 data
= g_base64_encode(read_data
, size
);
2907 * FIXME should read only complete, valid UTF-8 characters up
2908 * to @size bytes. Invalid sequences should be replaced by a
2909 * suitable replacement character. Except when (and only
2910 * when) ring buffer lost characters since last read, initial
2911 * continuation characters should be dropped.
2913 read_data
[size
] = 0;
2914 data
= (char *)read_data
;
2920 QemuOpts
*qemu_chr_parse_compat(const char *label
, const char *filename
)
2922 char host
[65], port
[33], width
[8], height
[8];
2926 Error
*local_err
= NULL
;
2928 opts
= qemu_opts_create(qemu_find_opts("chardev"), label
, 1, &local_err
);
2929 if (error_is_set(&local_err
)) {
2930 qerror_report_err(local_err
);
2931 error_free(local_err
);
2935 if (strstart(filename
, "mon:", &p
)) {
2937 qemu_opt_set(opts
, "mux", "on");
2940 if (strcmp(filename
, "null") == 0 ||
2941 strcmp(filename
, "pty") == 0 ||
2942 strcmp(filename
, "msmouse") == 0 ||
2943 strcmp(filename
, "braille") == 0 ||
2944 strcmp(filename
, "stdio") == 0) {
2945 qemu_opt_set(opts
, "backend", filename
);
2948 if (strstart(filename
, "vc", &p
)) {
2949 qemu_opt_set(opts
, "backend", "vc");
2951 if (sscanf(p
+1, "%8[0-9]x%8[0-9]", width
, height
) == 2) {
2953 qemu_opt_set(opts
, "width", width
);
2954 qemu_opt_set(opts
, "height", height
);
2955 } else if (sscanf(p
+1, "%8[0-9]Cx%8[0-9]C", width
, height
) == 2) {
2957 qemu_opt_set(opts
, "cols", width
);
2958 qemu_opt_set(opts
, "rows", height
);
2965 if (strcmp(filename
, "con:") == 0) {
2966 qemu_opt_set(opts
, "backend", "console");
2969 if (strstart(filename
, "COM", NULL
)) {
2970 qemu_opt_set(opts
, "backend", "serial");
2971 qemu_opt_set(opts
, "path", filename
);
2974 if (strstart(filename
, "file:", &p
)) {
2975 qemu_opt_set(opts
, "backend", "file");
2976 qemu_opt_set(opts
, "path", p
);
2979 if (strstart(filename
, "pipe:", &p
)) {
2980 qemu_opt_set(opts
, "backend", "pipe");
2981 qemu_opt_set(opts
, "path", p
);
2984 if (strstart(filename
, "tcp:", &p
) ||
2985 strstart(filename
, "telnet:", &p
)) {
2986 if (sscanf(p
, "%64[^:]:%32[^,]%n", host
, port
, &pos
) < 2) {
2988 if (sscanf(p
, ":%32[^,]%n", port
, &pos
) < 1)
2991 qemu_opt_set(opts
, "backend", "socket");
2992 qemu_opt_set(opts
, "host", host
);
2993 qemu_opt_set(opts
, "port", port
);
2994 if (p
[pos
] == ',') {
2995 if (qemu_opts_do_parse(opts
, p
+pos
+1, NULL
) != 0)
2998 if (strstart(filename
, "telnet:", &p
))
2999 qemu_opt_set(opts
, "telnet", "on");
3002 if (strstart(filename
, "udp:", &p
)) {
3003 qemu_opt_set(opts
, "backend", "udp");
3004 if (sscanf(p
, "%64[^:]:%32[^@,]%n", host
, port
, &pos
) < 2) {
3006 if (sscanf(p
, ":%32[^@,]%n", port
, &pos
) < 1) {
3010 qemu_opt_set(opts
, "host", host
);
3011 qemu_opt_set(opts
, "port", port
);
3012 if (p
[pos
] == '@') {
3014 if (sscanf(p
, "%64[^:]:%32[^,]%n", host
, port
, &pos
) < 2) {
3016 if (sscanf(p
, ":%32[^,]%n", port
, &pos
) < 1) {
3020 qemu_opt_set(opts
, "localaddr", host
);
3021 qemu_opt_set(opts
, "localport", port
);
3025 if (strstart(filename
, "unix:", &p
)) {
3026 qemu_opt_set(opts
, "backend", "socket");
3027 if (qemu_opts_do_parse(opts
, p
, "path") != 0)
3031 if (strstart(filename
, "/dev/parport", NULL
) ||
3032 strstart(filename
, "/dev/ppi", NULL
)) {
3033 qemu_opt_set(opts
, "backend", "parport");
3034 qemu_opt_set(opts
, "path", filename
);
3037 if (strstart(filename
, "/dev/", NULL
)) {
3038 qemu_opt_set(opts
, "backend", "tty");
3039 qemu_opt_set(opts
, "path", filename
);
3044 qemu_opts_del(opts
);
3048 #ifdef HAVE_CHARDEV_PARPORT
3050 static CharDriverState
*qemu_chr_open_pp(QemuOpts
*opts
)
3052 const char *filename
= qemu_opt_get(opts
, "path");
3055 fd
= qemu_open(filename
, O_RDWR
);
3059 return qemu_chr_open_pp_fd(fd
);
3064 static const struct {
3066 CharDriverState
*(*open
)(QemuOpts
*opts
);
3067 } backend_table
[] = {
3068 { .name
= "null", .open
= qemu_chr_open_null
},
3069 { .name
= "socket", .open
= qemu_chr_open_socket
},
3070 { .name
= "udp", .open
= qemu_chr_open_udp
},
3071 { .name
= "msmouse", .open
= qemu_chr_open_msmouse
},
3072 { .name
= "vc", .open
= vc_init
},
3073 { .name
= "memory", .open
= qemu_chr_open_ringbuf
},
3075 { .name
= "file", .open
= qemu_chr_open_win_file_out
},
3076 { .name
= "pipe", .open
= qemu_chr_open_win_pipe
},
3077 { .name
= "console", .open
= qemu_chr_open_win_con
},
3078 { .name
= "serial", .open
= qemu_chr_open_win
},
3079 { .name
= "stdio", .open
= qemu_chr_open_win_stdio
},
3081 { .name
= "file", .open
= qemu_chr_open_file_out
},
3082 { .name
= "pipe", .open
= qemu_chr_open_pipe
},
3083 { .name
= "stdio", .open
= qemu_chr_open_stdio
},
3085 #ifdef CONFIG_BRLAPI
3086 { .name
= "braille", .open
= chr_baum_init
},
3088 #ifdef HAVE_CHARDEV_TTY
3089 { .name
= "tty", .open
= qemu_chr_open_tty
},
3090 { .name
= "serial", .open
= qemu_chr_open_tty
},
3091 { .name
= "pty", .open
= qemu_chr_open_pty
},
3093 #ifdef HAVE_CHARDEV_PARPORT
3094 { .name
= "parallel", .open
= qemu_chr_open_pp
},
3095 { .name
= "parport", .open
= qemu_chr_open_pp
},
3098 { .name
= "spicevmc", .open
= qemu_chr_open_spice
},
3099 #if SPICE_SERVER_VERSION >= 0x000c02
3100 { .name
= "spiceport", .open
= qemu_chr_open_spice_port
},
3105 CharDriverState
*qemu_chr_new_from_opts(QemuOpts
*opts
,
3106 void (*init
)(struct CharDriverState
*s
),
3109 CharDriverState
*chr
;
3112 if (qemu_opts_id(opts
) == NULL
) {
3113 error_setg(errp
, "chardev: no id specified");
3117 if (qemu_opt_get(opts
, "backend") == NULL
) {
3118 error_setg(errp
, "chardev: \"%s\" missing backend",
3119 qemu_opts_id(opts
));
3122 for (i
= 0; i
< ARRAY_SIZE(backend_table
); i
++) {
3123 if (strcmp(backend_table
[i
].name
, qemu_opt_get(opts
, "backend")) == 0)
3126 if (i
== ARRAY_SIZE(backend_table
)) {
3127 error_setg(errp
, "chardev: backend \"%s\" not found",
3128 qemu_opt_get(opts
, "backend"));
3132 chr
= backend_table
[i
].open(opts
);
3134 error_setg(errp
, "chardev: opening backend \"%s\" failed",
3135 qemu_opt_get(opts
, "backend"));
3140 chr
->filename
= g_strdup(qemu_opt_get(opts
, "backend"));
3142 QTAILQ_INSERT_TAIL(&chardevs
, chr
, next
);
3144 if (qemu_opt_get_bool(opts
, "mux", 0)) {
3145 CharDriverState
*base
= chr
;
3146 int len
= strlen(qemu_opts_id(opts
)) + 6;
3147 base
->label
= g_malloc(len
);
3148 snprintf(base
->label
, len
, "%s-base", qemu_opts_id(opts
));
3149 chr
= qemu_chr_open_mux(base
);
3150 chr
->filename
= base
->filename
;
3151 chr
->avail_connections
= MAX_MUX
;
3152 QTAILQ_INSERT_TAIL(&chardevs
, chr
, next
);
3154 chr
->avail_connections
= 1;
3156 chr
->label
= g_strdup(qemu_opts_id(opts
));
3161 qemu_opts_del(opts
);
3165 CharDriverState
*qemu_chr_new(const char *label
, const char *filename
, void (*init
)(struct CharDriverState
*s
))
3168 CharDriverState
*chr
;
3172 if (strstart(filename
, "chardev:", &p
)) {
3173 return qemu_chr_find(p
);
3176 opts
= qemu_chr_parse_compat(label
, filename
);
3180 chr
= qemu_chr_new_from_opts(opts
, init
, &err
);
3181 if (error_is_set(&err
)) {
3182 fprintf(stderr
, "%s\n", error_get_pretty(err
));
3185 if (chr
&& qemu_opt_get_bool(opts
, "mux", 0)) {
3186 monitor_init(chr
, MONITOR_USE_READLINE
);
3191 void qemu_chr_fe_set_echo(struct CharDriverState
*chr
, bool echo
)
3193 if (chr
->chr_set_echo
) {
3194 chr
->chr_set_echo(chr
, echo
);
3198 void qemu_chr_fe_open(struct CharDriverState
*chr
)
3200 if (chr
->chr_guest_open
) {
3201 chr
->chr_guest_open(chr
);
3205 void qemu_chr_fe_close(struct CharDriverState
*chr
)
3207 if (chr
->chr_guest_close
) {
3208 chr
->chr_guest_close(chr
);
3212 void qemu_chr_delete(CharDriverState
*chr
)
3214 QTAILQ_REMOVE(&chardevs
, chr
, next
);
3215 if (chr
->chr_close
) {
3216 chr
->chr_close(chr
);
3218 g_free(chr
->filename
);
3221 qemu_opts_del(chr
->opts
);
3226 ChardevInfoList
*qmp_query_chardev(Error
**errp
)
3228 ChardevInfoList
*chr_list
= NULL
;
3229 CharDriverState
*chr
;
3231 QTAILQ_FOREACH(chr
, &chardevs
, next
) {
3232 ChardevInfoList
*info
= g_malloc0(sizeof(*info
));
3233 info
->value
= g_malloc0(sizeof(*info
->value
));
3234 info
->value
->label
= g_strdup(chr
->label
);
3235 info
->value
->filename
= g_strdup(chr
->filename
);
3237 info
->next
= chr_list
;
3244 CharDriverState
*qemu_chr_find(const char *name
)
3246 CharDriverState
*chr
;
3248 QTAILQ_FOREACH(chr
, &chardevs
, next
) {
3249 if (strcmp(chr
->label
, name
) != 0)
3256 /* Get a character (serial) device interface. */
3257 CharDriverState
*qemu_char_get_next_serial(void)
3259 static int next_serial
;
3261 /* FIXME: This function needs to go away: use chardev properties! */
3262 return serial_hds
[next_serial
++];
3265 QemuOptsList qemu_chardev_opts
= {
3267 .implied_opt_name
= "backend",
3268 .head
= QTAILQ_HEAD_INITIALIZER(qemu_chardev_opts
.head
),
3272 .type
= QEMU_OPT_STRING
,
3275 .type
= QEMU_OPT_STRING
,
3278 .type
= QEMU_OPT_STRING
,
3281 .type
= QEMU_OPT_STRING
,
3283 .name
= "localaddr",
3284 .type
= QEMU_OPT_STRING
,
3286 .name
= "localport",
3287 .type
= QEMU_OPT_STRING
,
3290 .type
= QEMU_OPT_NUMBER
,
3293 .type
= QEMU_OPT_BOOL
,
3296 .type
= QEMU_OPT_BOOL
,
3299 .type
= QEMU_OPT_BOOL
,
3302 .type
= QEMU_OPT_BOOL
,
3305 .type
= QEMU_OPT_BOOL
,
3308 .type
= QEMU_OPT_BOOL
,
3311 .type
= QEMU_OPT_NUMBER
,
3314 .type
= QEMU_OPT_NUMBER
,
3317 .type
= QEMU_OPT_NUMBER
,
3320 .type
= QEMU_OPT_NUMBER
,
3323 .type
= QEMU_OPT_BOOL
,
3326 .type
= QEMU_OPT_BOOL
,
3329 .type
= QEMU_OPT_STRING
,
3332 .type
= QEMU_OPT_NUMBER
,
3335 .type
= QEMU_OPT_SIZE
,
3337 { /* end of list */ }
3343 static CharDriverState
*qmp_chardev_open_file(ChardevFile
*file
, Error
**errp
)
3348 error_setg(errp
, "input file not supported");
3352 out
= CreateFile(file
->out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3353 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3354 if (out
== INVALID_HANDLE_VALUE
) {
3355 error_setg(errp
, "open %s failed", file
->out
);
3358 return qemu_chr_open_win_file(out
);
3361 static CharDriverState
*qmp_chardev_open_serial(ChardevHostdev
*serial
,
3364 return qemu_chr_open_win_path(serial
->device
);
3367 static CharDriverState
*qmp_chardev_open_parallel(ChardevHostdev
*parallel
,
3370 error_setg(errp
, "character device backend type 'parallel' not supported");
3376 static int qmp_chardev_open_file_source(char *src
, int flags
,
3381 TFR(fd
= qemu_open(src
, flags
, 0666));
3383 error_setg(errp
, "open %s: %s", src
, strerror(errno
));
3388 static CharDriverState
*qmp_chardev_open_file(ChardevFile
*file
, Error
**errp
)
3390 int flags
, in
= -1, out
= -1;
3392 flags
= O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
;
3393 out
= qmp_chardev_open_file_source(file
->out
, flags
, errp
);
3394 if (error_is_set(errp
)) {
3400 in
= qmp_chardev_open_file_source(file
->in
, flags
, errp
);
3401 if (error_is_set(errp
)) {
3407 return qemu_chr_open_fd(in
, out
);
3410 static CharDriverState
*qmp_chardev_open_serial(ChardevHostdev
*serial
,
3413 #ifdef HAVE_CHARDEV_TTY
3416 fd
= qmp_chardev_open_file_source(serial
->device
, O_RDWR
, errp
);
3417 if (error_is_set(errp
)) {
3420 socket_set_nonblock(fd
);
3421 return qemu_chr_open_tty_fd(fd
);
3423 error_setg(errp
, "character device backend type 'serial' not supported");
3428 static CharDriverState
*qmp_chardev_open_parallel(ChardevHostdev
*parallel
,
3431 #ifdef HAVE_CHARDEV_PARPORT
3434 fd
= qmp_chardev_open_file_source(parallel
->device
, O_RDWR
, errp
);
3435 if (error_is_set(errp
)) {
3438 return qemu_chr_open_pp_fd(fd
);
3440 error_setg(errp
, "character device backend type 'parallel' not supported");
3447 static CharDriverState
*qmp_chardev_open_socket(ChardevSocket
*sock
,
3450 SocketAddress
*addr
= sock
->addr
;
3451 bool do_nodelay
= sock
->has_nodelay
? sock
->nodelay
: false;
3452 bool is_listen
= sock
->has_server
? sock
->server
: true;
3453 bool is_telnet
= sock
->has_telnet
? sock
->telnet
: false;
3454 bool is_waitconnect
= sock
->has_wait
? sock
->wait
: false;
3458 fd
= socket_listen(addr
, errp
);
3460 fd
= socket_connect(addr
, errp
, NULL
, NULL
);
3462 if (error_is_set(errp
)) {
3465 return qemu_chr_open_socket_fd(fd
, do_nodelay
, is_listen
,
3466 is_telnet
, is_waitconnect
, errp
);
3469 ChardevReturn
*qmp_chardev_add(const char *id
, ChardevBackend
*backend
,
3472 ChardevReturn
*ret
= g_new0(ChardevReturn
, 1);
3473 CharDriverState
*chr
= NULL
;
3475 chr
= qemu_chr_find(id
);
3477 error_setg(errp
, "Chardev '%s' already exists", id
);
3482 switch (backend
->kind
) {
3483 case CHARDEV_BACKEND_KIND_FILE
:
3484 chr
= qmp_chardev_open_file(backend
->file
, errp
);
3486 case CHARDEV_BACKEND_KIND_SERIAL
:
3487 chr
= qmp_chardev_open_serial(backend
->serial
, errp
);
3489 case CHARDEV_BACKEND_KIND_PARALLEL
:
3490 chr
= qmp_chardev_open_parallel(backend
->parallel
, errp
);
3492 case CHARDEV_BACKEND_KIND_SOCKET
:
3493 chr
= qmp_chardev_open_socket(backend
->socket
, errp
);
3495 #ifdef HAVE_CHARDEV_TTY
3496 case CHARDEV_BACKEND_KIND_PTY
:
3498 /* qemu_chr_open_pty sets "path" in opts */
3500 opts
= qemu_opts_create_nofail(qemu_find_opts("chardev"));
3501 chr
= qemu_chr_open_pty(opts
);
3502 ret
->pty
= g_strdup(qemu_opt_get(opts
, "path"));
3503 ret
->has_pty
= true;
3504 qemu_opts_del(opts
);
3508 case CHARDEV_BACKEND_KIND_NULL
:
3509 chr
= qemu_chr_open_null(NULL
);
3512 error_setg(errp
, "unknown chardev backend (%d)", backend
->kind
);
3516 if (chr
== NULL
&& !error_is_set(errp
)) {
3517 error_setg(errp
, "Failed to create chardev");
3520 chr
->label
= g_strdup(id
);
3521 chr
->avail_connections
= 1;
3522 QTAILQ_INSERT_TAIL(&chardevs
, chr
, next
);
3530 void qmp_chardev_remove(const char *id
, Error
**errp
)
3532 CharDriverState
*chr
;
3534 chr
= qemu_chr_find(id
);
3536 error_setg(errp
, "Chardev '%s' not found", id
);
3539 if (chr
->chr_can_read
|| chr
->chr_read
||
3540 chr
->chr_event
|| chr
->handler_opaque
) {
3541 error_setg(errp
, "Chardev '%s' is busy", id
);
3544 qemu_chr_delete(chr
);