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 "sysemu/sysemu.h"
27 #include "qemu/timer.h"
28 #include "sysemu/char.h"
30 #include "qmp-commands.h"
31 #include "qapi/qmp-input-visitor.h"
32 #include "qapi/qmp-output-visitor.h"
33 #include "qapi-visit.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(__FreeBSD__) || defined(__FreeBSD_kernel__)
59 #include <dev/ppbus/ppi.h>
60 #include <dev/ppbus/ppbconf.h>
61 #elif defined(__DragonFly__)
62 #include <dev/misc/ppi/ppi.h>
63 #include <bus/ppbus/ppbconf.h>
67 #include <linux/ppdev.h>
68 #include <linux/parport.h>
72 #include <sys/ethernet.h>
73 #include <sys/sockio.h>
74 #include <netinet/arp.h>
75 #include <netinet/in.h>
76 #include <netinet/in_systm.h>
77 #include <netinet/ip.h>
78 #include <netinet/ip_icmp.h> // must come after ip.h
79 #include <netinet/udp.h>
80 #include <netinet/tcp.h>
85 #include "qemu/sockets.h"
86 #include "ui/qemu-spice.h"
88 #define READ_BUF_LEN 4096
89 #define READ_RETRIES 10
90 #define CHR_MAX_FILENAME_SIZE 256
92 /***********************************************************/
93 /* Socket address helpers */
94 static void qapi_copy_SocketAddress(SocketAddress
**p_dest
,
97 QmpOutputVisitor
*qov
;
104 qov
= qmp_output_visitor_new();
105 ov
= qmp_output_get_visitor(qov
);
106 visit_type_SocketAddress(ov
, &src
, NULL
, &error_abort
);
107 obj
= qmp_output_get_qobject(qov
);
108 qmp_output_visitor_cleanup(qov
);
113 qiv
= qmp_input_visitor_new(obj
);
114 iv
= qmp_input_get_visitor(qiv
);
115 visit_type_SocketAddress(iv
, p_dest
, NULL
, &error_abort
);
116 qmp_input_visitor_cleanup(qiv
);
120 static int SocketAddress_to_str(char *dest
, int max_len
,
121 const char *prefix
, SocketAddress
*addr
,
122 bool is_listen
, bool is_telnet
)
124 switch (addr
->kind
) {
125 case SOCKET_ADDRESS_KIND_INET
:
126 return snprintf(dest
, max_len
, "%s%s:%s:%s%s", prefix
,
127 is_telnet
? "telnet" : "tcp", addr
->inet
->host
,
128 addr
->inet
->port
, is_listen
? ",server" : "");
130 case SOCKET_ADDRESS_KIND_UNIX
:
131 return snprintf(dest
, max_len
, "%sunix:%s%s", prefix
,
132 addr
->q_unix
->path
, is_listen
? ",server" : "");
134 case SOCKET_ADDRESS_KIND_FD
:
135 return snprintf(dest
, max_len
, "%sfd:%s%s", prefix
, addr
->fd
->str
,
136 is_listen
? ",server" : "");
143 static int sockaddr_to_str(char *dest
, int max_len
,
144 struct sockaddr_storage
*ss
, socklen_t ss_len
,
145 bool is_listen
, bool is_telnet
)
147 char host
[NI_MAXHOST
], serv
[NI_MAXSERV
];
148 const char *left
= "", *right
= "";
150 switch (ss
->ss_family
) {
153 return snprintf(dest
, max_len
, "unix:%s%s",
154 ((struct sockaddr_un
*)(ss
))->sun_path
,
155 is_listen
? ",server" : "");
162 getnameinfo((struct sockaddr
*) ss
, ss_len
, host
, sizeof(host
),
163 serv
, sizeof(serv
), NI_NUMERICHOST
| NI_NUMERICSERV
);
164 return snprintf(dest
, max_len
, "%s:%s%s%s:%s%s",
165 is_telnet
? "telnet" : "tcp",
166 left
, host
, right
, serv
,
167 is_listen
? ",server" : "");
170 return snprintf(dest
, max_len
, "unknown");
174 /***********************************************************/
175 /* character device */
177 static QTAILQ_HEAD(CharDriverStateHead
, CharDriverState
) chardevs
=
178 QTAILQ_HEAD_INITIALIZER(chardevs
);
180 CharDriverState
*qemu_chr_alloc(void)
182 CharDriverState
*chr
= g_malloc0(sizeof(CharDriverState
));
183 qemu_mutex_init(&chr
->chr_write_lock
);
187 void qemu_chr_be_event(CharDriverState
*s
, int event
)
189 /* Keep track if the char device is open */
191 case CHR_EVENT_OPENED
:
194 case CHR_EVENT_CLOSED
:
201 s
->chr_event(s
->handler_opaque
, event
);
204 void qemu_chr_be_generic_open(CharDriverState
*s
)
206 qemu_chr_be_event(s
, CHR_EVENT_OPENED
);
209 int qemu_chr_fe_write(CharDriverState
*s
, const uint8_t *buf
, int len
)
213 qemu_mutex_lock(&s
->chr_write_lock
);
214 ret
= s
->chr_write(s
, buf
, len
);
215 qemu_mutex_unlock(&s
->chr_write_lock
);
219 int qemu_chr_fe_write_all(CharDriverState
*s
, const uint8_t *buf
, int len
)
224 qemu_mutex_lock(&s
->chr_write_lock
);
225 while (offset
< len
) {
227 res
= s
->chr_write(s
, buf
+ offset
, len
- offset
);
228 if (res
== -1 && errno
== EAGAIN
) {
231 } while (res
== -1 && errno
== EAGAIN
);
239 qemu_mutex_unlock(&s
->chr_write_lock
);
247 int qemu_chr_fe_read_all(CharDriverState
*s
, uint8_t *buf
, int len
)
249 int offset
= 0, counter
= 10;
252 if (!s
->chr_sync_read
) {
256 while (offset
< len
) {
258 res
= s
->chr_sync_read(s
, buf
+ offset
, len
- offset
);
259 if (res
== -1 && errno
== EAGAIN
) {
262 } while (res
== -1 && errno
== EAGAIN
);
282 int qemu_chr_fe_ioctl(CharDriverState
*s
, int cmd
, void *arg
)
286 return s
->chr_ioctl(s
, cmd
, arg
);
289 int qemu_chr_be_can_write(CharDriverState
*s
)
291 if (!s
->chr_can_read
)
293 return s
->chr_can_read(s
->handler_opaque
);
296 void qemu_chr_be_write(CharDriverState
*s
, uint8_t *buf
, int len
)
299 s
->chr_read(s
->handler_opaque
, buf
, len
);
303 int qemu_chr_fe_get_msgfd(CharDriverState
*s
)
306 return (qemu_chr_fe_get_msgfds(s
, &fd
, 1) == 1) ? fd
: -1;
309 int qemu_chr_fe_get_msgfds(CharDriverState
*s
, int *fds
, int len
)
311 return s
->get_msgfds
? s
->get_msgfds(s
, fds
, len
) : -1;
314 int qemu_chr_fe_set_msgfds(CharDriverState
*s
, int *fds
, int num
)
316 return s
->set_msgfds
? s
->set_msgfds(s
, fds
, num
) : -1;
319 int qemu_chr_add_client(CharDriverState
*s
, int fd
)
321 return s
->chr_add_client
? s
->chr_add_client(s
, fd
) : -1;
324 void qemu_chr_accept_input(CharDriverState
*s
)
326 if (s
->chr_accept_input
)
327 s
->chr_accept_input(s
);
331 void qemu_chr_fe_printf(CharDriverState
*s
, const char *fmt
, ...)
333 char buf
[READ_BUF_LEN
];
336 vsnprintf(buf
, sizeof(buf
), fmt
, ap
);
337 qemu_chr_fe_write(s
, (uint8_t *)buf
, strlen(buf
));
341 static void remove_fd_in_watch(CharDriverState
*chr
);
343 void qemu_chr_add_handlers(CharDriverState
*s
,
344 IOCanReadHandler
*fd_can_read
,
345 IOReadHandler
*fd_read
,
346 IOEventHandler
*fd_event
,
351 if (!opaque
&& !fd_can_read
&& !fd_read
&& !fd_event
) {
353 remove_fd_in_watch(s
);
357 s
->chr_can_read
= fd_can_read
;
358 s
->chr_read
= fd_read
;
359 s
->chr_event
= fd_event
;
360 s
->handler_opaque
= opaque
;
361 if (fe_open
&& s
->chr_update_read_handler
)
362 s
->chr_update_read_handler(s
);
364 if (!s
->explicit_fe_open
) {
365 qemu_chr_fe_set_open(s
, fe_open
);
368 /* We're connecting to an already opened device, so let's make sure we
369 also get the open event */
370 if (fe_open
&& s
->be_open
) {
371 qemu_chr_be_generic_open(s
);
375 static int null_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
380 static CharDriverState
*qemu_chr_open_null(void)
382 CharDriverState
*chr
;
384 chr
= qemu_chr_alloc();
385 chr
->chr_write
= null_chr_write
;
386 chr
->explicit_be_open
= true;
390 /* MUX driver for serial I/O splitting */
392 #define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
393 #define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
395 IOCanReadHandler
*chr_can_read
[MAX_MUX
];
396 IOReadHandler
*chr_read
[MAX_MUX
];
397 IOEventHandler
*chr_event
[MAX_MUX
];
398 void *ext_opaque
[MAX_MUX
];
399 CharDriverState
*drv
;
404 /* Intermediate input buffer allows to catch escape sequences even if the
405 currently active device is not accepting any input - but only until it
407 unsigned char buffer
[MAX_MUX
][MUX_BUFFER_SIZE
];
412 /* Protected by the CharDriverState chr_write_lock. */
414 int64_t timestamps_start
;
418 /* Called with chr_write_lock held. */
419 static int mux_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
421 MuxDriver
*d
= chr
->opaque
;
423 if (!d
->timestamps
) {
424 ret
= qemu_chr_fe_write(d
->drv
, buf
, len
);
429 for (i
= 0; i
< len
; i
++) {
435 ti
= qemu_clock_get_ms(QEMU_CLOCK_REALTIME
);
436 if (d
->timestamps_start
== -1)
437 d
->timestamps_start
= ti
;
438 ti
-= d
->timestamps_start
;
440 snprintf(buf1
, sizeof(buf1
),
441 "[%02d:%02d:%02d.%03d] ",
446 qemu_chr_fe_write(d
->drv
, (uint8_t *)buf1
, strlen(buf1
));
449 ret
+= qemu_chr_fe_write(d
->drv
, buf
+i
, 1);
450 if (buf
[i
] == '\n') {
458 static const char * const mux_help
[] = {
459 "% h print this help\n\r",
460 "% x exit emulator\n\r",
461 "% s save disk data back to file (if -snapshot)\n\r",
462 "% t toggle console timestamps\n\r"
463 "% b send break (magic sysrq)\n\r",
464 "% c switch between console and monitor\n\r",
469 int term_escape_char
= 0x01; /* ctrl-a is used for escape */
470 static void mux_print_help(CharDriverState
*chr
)
473 char ebuf
[15] = "Escape-Char";
474 char cbuf
[50] = "\n\r";
476 if (term_escape_char
> 0 && term_escape_char
< 26) {
477 snprintf(cbuf
, sizeof(cbuf
), "\n\r");
478 snprintf(ebuf
, sizeof(ebuf
), "C-%c", term_escape_char
- 1 + 'a');
480 snprintf(cbuf
, sizeof(cbuf
),
481 "\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
484 qemu_chr_fe_write(chr
, (uint8_t *)cbuf
, strlen(cbuf
));
485 for (i
= 0; mux_help
[i
] != NULL
; i
++) {
486 for (j
=0; mux_help
[i
][j
] != '\0'; j
++) {
487 if (mux_help
[i
][j
] == '%')
488 qemu_chr_fe_write(chr
, (uint8_t *)ebuf
, strlen(ebuf
));
490 qemu_chr_fe_write(chr
, (uint8_t *)&mux_help
[i
][j
], 1);
495 static void mux_chr_send_event(MuxDriver
*d
, int mux_nr
, int event
)
497 if (d
->chr_event
[mux_nr
])
498 d
->chr_event
[mux_nr
](d
->ext_opaque
[mux_nr
], event
);
501 static int mux_proc_byte(CharDriverState
*chr
, MuxDriver
*d
, int ch
)
503 if (d
->term_got_escape
) {
504 d
->term_got_escape
= 0;
505 if (ch
== term_escape_char
)
514 const char *term
= "QEMU: Terminated\n\r";
515 qemu_chr_fe_write(chr
, (uint8_t *)term
, strlen(term
));
523 qemu_chr_be_event(chr
, CHR_EVENT_BREAK
);
526 /* Switch to the next registered device */
527 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_OUT
);
529 if (d
->focus
>= d
->mux_cnt
)
531 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_IN
);
534 d
->timestamps
= !d
->timestamps
;
535 d
->timestamps_start
= -1;
539 } else if (ch
== term_escape_char
) {
540 d
->term_got_escape
= 1;
548 static void mux_chr_accept_input(CharDriverState
*chr
)
550 MuxDriver
*d
= chr
->opaque
;
553 while (d
->prod
[m
] != d
->cons
[m
] &&
554 d
->chr_can_read
[m
] &&
555 d
->chr_can_read
[m
](d
->ext_opaque
[m
])) {
556 d
->chr_read
[m
](d
->ext_opaque
[m
],
557 &d
->buffer
[m
][d
->cons
[m
]++ & MUX_BUFFER_MASK
], 1);
561 static int mux_chr_can_read(void *opaque
)
563 CharDriverState
*chr
= opaque
;
564 MuxDriver
*d
= chr
->opaque
;
567 if ((d
->prod
[m
] - d
->cons
[m
]) < MUX_BUFFER_SIZE
)
569 if (d
->chr_can_read
[m
])
570 return d
->chr_can_read
[m
](d
->ext_opaque
[m
]);
574 static void mux_chr_read(void *opaque
, const uint8_t *buf
, int size
)
576 CharDriverState
*chr
= opaque
;
577 MuxDriver
*d
= chr
->opaque
;
581 mux_chr_accept_input (opaque
);
583 for(i
= 0; i
< size
; i
++)
584 if (mux_proc_byte(chr
, d
, buf
[i
])) {
585 if (d
->prod
[m
] == d
->cons
[m
] &&
586 d
->chr_can_read
[m
] &&
587 d
->chr_can_read
[m
](d
->ext_opaque
[m
]))
588 d
->chr_read
[m
](d
->ext_opaque
[m
], &buf
[i
], 1);
590 d
->buffer
[m
][d
->prod
[m
]++ & MUX_BUFFER_MASK
] = buf
[i
];
594 static void mux_chr_event(void *opaque
, int event
)
596 CharDriverState
*chr
= opaque
;
597 MuxDriver
*d
= chr
->opaque
;
600 /* Send the event to all registered listeners */
601 for (i
= 0; i
< d
->mux_cnt
; i
++)
602 mux_chr_send_event(d
, i
, event
);
605 static void mux_chr_update_read_handler(CharDriverState
*chr
)
607 MuxDriver
*d
= chr
->opaque
;
609 if (d
->mux_cnt
>= MAX_MUX
) {
610 fprintf(stderr
, "Cannot add I/O handlers, MUX array is full\n");
613 d
->ext_opaque
[d
->mux_cnt
] = chr
->handler_opaque
;
614 d
->chr_can_read
[d
->mux_cnt
] = chr
->chr_can_read
;
615 d
->chr_read
[d
->mux_cnt
] = chr
->chr_read
;
616 d
->chr_event
[d
->mux_cnt
] = chr
->chr_event
;
617 /* Fix up the real driver with mux routines */
618 if (d
->mux_cnt
== 0) {
619 qemu_chr_add_handlers(d
->drv
, mux_chr_can_read
, mux_chr_read
,
622 if (d
->focus
!= -1) {
623 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_OUT
);
625 d
->focus
= d
->mux_cnt
;
627 mux_chr_send_event(d
, d
->focus
, CHR_EVENT_MUX_IN
);
630 static bool muxes_realized
;
633 * Called after processing of default and command-line-specified
634 * chardevs to deliver CHR_EVENT_OPENED events to any FEs attached
635 * to a mux chardev. This is done here to ensure that
636 * output/prompts/banners are only displayed for the FE that has
637 * focus when initial command-line processing/machine init is
640 * After this point, any new FE attached to any new or existing
641 * mux will receive CHR_EVENT_OPENED notifications for the BE
644 static void muxes_realize_done(Notifier
*notifier
, void *unused
)
646 CharDriverState
*chr
;
648 QTAILQ_FOREACH(chr
, &chardevs
, next
) {
650 MuxDriver
*d
= chr
->opaque
;
653 /* send OPENED to all already-attached FEs */
654 for (i
= 0; i
< d
->mux_cnt
; i
++) {
655 mux_chr_send_event(d
, i
, CHR_EVENT_OPENED
);
657 /* mark mux as OPENED so any new FEs will immediately receive
660 qemu_chr_be_generic_open(chr
);
663 muxes_realized
= true;
666 static Notifier muxes_realize_notify
= {
667 .notify
= muxes_realize_done
,
670 static GSource
*mux_chr_add_watch(CharDriverState
*s
, GIOCondition cond
)
672 MuxDriver
*d
= s
->opaque
;
673 return d
->drv
->chr_add_watch(d
->drv
, cond
);
676 static CharDriverState
*qemu_chr_open_mux(CharDriverState
*drv
)
678 CharDriverState
*chr
;
681 chr
= qemu_chr_alloc();
682 d
= g_malloc0(sizeof(MuxDriver
));
687 chr
->chr_write
= mux_chr_write
;
688 chr
->chr_update_read_handler
= mux_chr_update_read_handler
;
689 chr
->chr_accept_input
= mux_chr_accept_input
;
690 /* Frontend guest-open / -close notification is not support with muxes */
691 chr
->chr_set_fe_open
= NULL
;
692 if (drv
->chr_add_watch
) {
693 chr
->chr_add_watch
= mux_chr_add_watch
;
695 /* only default to opened state if we've realized the initial
698 chr
->explicit_be_open
= muxes_realized
? 0 : 1;
706 int send_all(int fd
, const void *buf
, int len1
)
712 ret
= send(fd
, buf
, len
, 0);
714 errno
= WSAGetLastError();
715 if (errno
!= WSAEWOULDBLOCK
) {
718 } else if (ret
== 0) {
730 int send_all(int fd
, const void *_buf
, int len1
)
733 const uint8_t *buf
= _buf
;
737 ret
= write(fd
, buf
, len
);
739 if (errno
!= EINTR
&& errno
!= EAGAIN
)
741 } else if (ret
== 0) {
751 int recv_all(int fd
, void *_buf
, int len1
, bool single_read
)
757 while ((len
> 0) && (ret
= read(fd
, buf
, len
)) != 0) {
759 if (errno
!= EINTR
&& errno
!= EAGAIN
) {
776 typedef struct IOWatchPoll
783 IOCanReadHandler
*fd_can_read
;
788 static IOWatchPoll
*io_watch_poll_from_source(GSource
*source
)
790 return container_of(source
, IOWatchPoll
, parent
);
793 static gboolean
io_watch_poll_prepare(GSource
*source
, gint
*timeout_
)
795 IOWatchPoll
*iwp
= io_watch_poll_from_source(source
);
796 bool now_active
= iwp
->fd_can_read(iwp
->opaque
) > 0;
797 bool was_active
= iwp
->src
!= NULL
;
798 if (was_active
== now_active
) {
803 iwp
->src
= g_io_create_watch(iwp
->channel
, G_IO_IN
| G_IO_ERR
| G_IO_HUP
);
804 g_source_set_callback(iwp
->src
, iwp
->fd_read
, iwp
->opaque
, NULL
);
805 g_source_attach(iwp
->src
, NULL
);
807 g_source_destroy(iwp
->src
);
808 g_source_unref(iwp
->src
);
814 static gboolean
io_watch_poll_check(GSource
*source
)
819 static gboolean
io_watch_poll_dispatch(GSource
*source
, GSourceFunc callback
,
825 static void io_watch_poll_finalize(GSource
*source
)
827 /* Due to a glib bug, removing the last reference to a source
828 * inside a finalize callback causes recursive locking (and a
829 * deadlock). This is not a problem inside other callbacks,
830 * including dispatch callbacks, so we call io_remove_watch_poll
831 * to remove this source. At this point, iwp->src must
832 * be NULL, or we would leak it.
834 * This would be solved much more elegantly by child sources,
835 * but we support older glib versions that do not have them.
837 IOWatchPoll
*iwp
= io_watch_poll_from_source(source
);
838 assert(iwp
->src
== NULL
);
841 static GSourceFuncs io_watch_poll_funcs
= {
842 .prepare
= io_watch_poll_prepare
,
843 .check
= io_watch_poll_check
,
844 .dispatch
= io_watch_poll_dispatch
,
845 .finalize
= io_watch_poll_finalize
,
848 /* Can only be used for read */
849 static guint
io_add_watch_poll(GIOChannel
*channel
,
850 IOCanReadHandler
*fd_can_read
,
857 iwp
= (IOWatchPoll
*) g_source_new(&io_watch_poll_funcs
, sizeof(IOWatchPoll
));
858 iwp
->fd_can_read
= fd_can_read
;
859 iwp
->opaque
= user_data
;
860 iwp
->channel
= channel
;
861 iwp
->fd_read
= (GSourceFunc
) fd_read
;
864 tag
= g_source_attach(&iwp
->parent
, NULL
);
865 g_source_unref(&iwp
->parent
);
869 static void io_remove_watch_poll(guint tag
)
874 g_return_if_fail (tag
> 0);
876 source
= g_main_context_find_source_by_id(NULL
, tag
);
877 g_return_if_fail (source
!= NULL
);
879 iwp
= io_watch_poll_from_source(source
);
881 g_source_destroy(iwp
->src
);
882 g_source_unref(iwp
->src
);
885 g_source_destroy(&iwp
->parent
);
888 static void remove_fd_in_watch(CharDriverState
*chr
)
890 if (chr
->fd_in_tag
) {
891 io_remove_watch_poll(chr
->fd_in_tag
);
897 static GIOChannel
*io_channel_from_fd(int fd
)
905 chan
= g_io_channel_unix_new(fd
);
907 g_io_channel_set_encoding(chan
, NULL
, NULL
);
908 g_io_channel_set_buffered(chan
, FALSE
);
914 static GIOChannel
*io_channel_from_socket(int fd
)
923 chan
= g_io_channel_win32_new_socket(fd
);
925 chan
= g_io_channel_unix_new(fd
);
928 g_io_channel_set_encoding(chan
, NULL
, NULL
);
929 g_io_channel_set_buffered(chan
, FALSE
);
934 static int io_channel_send(GIOChannel
*fd
, const void *buf
, size_t len
)
937 GIOStatus status
= G_IO_STATUS_NORMAL
;
939 while (offset
< len
&& status
== G_IO_STATUS_NORMAL
) {
940 gsize bytes_written
= 0;
942 status
= g_io_channel_write_chars(fd
, buf
+ offset
, len
- offset
,
943 &bytes_written
, NULL
);
944 offset
+= bytes_written
;
951 case G_IO_STATUS_NORMAL
:
954 case G_IO_STATUS_AGAIN
:
966 typedef struct FDCharDriver
{
967 CharDriverState
*chr
;
968 GIOChannel
*fd_in
, *fd_out
;
970 QTAILQ_ENTRY(FDCharDriver
) node
;
973 /* Called with chr_write_lock held. */
974 static int fd_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
976 FDCharDriver
*s
= chr
->opaque
;
978 return io_channel_send(s
->fd_out
, buf
, len
);
981 static gboolean
fd_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
983 CharDriverState
*chr
= opaque
;
984 FDCharDriver
*s
= chr
->opaque
;
986 uint8_t buf
[READ_BUF_LEN
];
991 if (len
> s
->max_size
) {
998 status
= g_io_channel_read_chars(chan
, (gchar
*)buf
,
999 len
, &bytes_read
, NULL
);
1000 if (status
== G_IO_STATUS_EOF
) {
1001 remove_fd_in_watch(chr
);
1002 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1005 if (status
== G_IO_STATUS_NORMAL
) {
1006 qemu_chr_be_write(chr
, buf
, bytes_read
);
1012 static int fd_chr_read_poll(void *opaque
)
1014 CharDriverState
*chr
= opaque
;
1015 FDCharDriver
*s
= chr
->opaque
;
1017 s
->max_size
= qemu_chr_be_can_write(chr
);
1021 static GSource
*fd_chr_add_watch(CharDriverState
*chr
, GIOCondition cond
)
1023 FDCharDriver
*s
= chr
->opaque
;
1024 return g_io_create_watch(s
->fd_out
, cond
);
1027 static void fd_chr_update_read_handler(CharDriverState
*chr
)
1029 FDCharDriver
*s
= chr
->opaque
;
1031 remove_fd_in_watch(chr
);
1033 chr
->fd_in_tag
= io_add_watch_poll(s
->fd_in
, fd_chr_read_poll
,
1038 static void fd_chr_close(struct CharDriverState
*chr
)
1040 FDCharDriver
*s
= chr
->opaque
;
1042 remove_fd_in_watch(chr
);
1044 g_io_channel_unref(s
->fd_in
);
1047 g_io_channel_unref(s
->fd_out
);
1051 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1054 /* open a character device to a unix fd */
1055 static CharDriverState
*qemu_chr_open_fd(int fd_in
, int fd_out
)
1057 CharDriverState
*chr
;
1060 chr
= qemu_chr_alloc();
1061 s
= g_malloc0(sizeof(FDCharDriver
));
1062 s
->fd_in
= io_channel_from_fd(fd_in
);
1063 s
->fd_out
= io_channel_from_fd(fd_out
);
1064 qemu_set_nonblock(fd_out
);
1067 chr
->chr_add_watch
= fd_chr_add_watch
;
1068 chr
->chr_write
= fd_chr_write
;
1069 chr
->chr_update_read_handler
= fd_chr_update_read_handler
;
1070 chr
->chr_close
= fd_chr_close
;
1075 static CharDriverState
*qemu_chr_open_pipe(ChardevHostdev
*opts
)
1078 char filename_in
[CHR_MAX_FILENAME_SIZE
];
1079 char filename_out
[CHR_MAX_FILENAME_SIZE
];
1080 const char *filename
= opts
->device
;
1082 if (filename
== NULL
) {
1083 fprintf(stderr
, "chardev: pipe: no filename given\n");
1087 snprintf(filename_in
, CHR_MAX_FILENAME_SIZE
, "%s.in", filename
);
1088 snprintf(filename_out
, CHR_MAX_FILENAME_SIZE
, "%s.out", filename
);
1089 TFR(fd_in
= qemu_open(filename_in
, O_RDWR
| O_BINARY
));
1090 TFR(fd_out
= qemu_open(filename_out
, O_RDWR
| O_BINARY
));
1091 if (fd_in
< 0 || fd_out
< 0) {
1096 TFR(fd_in
= fd_out
= qemu_open(filename
, O_RDWR
| O_BINARY
));
1101 return qemu_chr_open_fd(fd_in
, fd_out
);
1104 /* init terminal so that we can grab keys */
1105 static struct termios oldtty
;
1106 static int old_fd0_flags
;
1107 static bool stdio_in_use
;
1108 static bool stdio_allow_signal
;
1110 static void term_exit(void)
1112 tcsetattr (0, TCSANOW
, &oldtty
);
1113 fcntl(0, F_SETFL
, old_fd0_flags
);
1116 static void qemu_chr_set_echo_stdio(CharDriverState
*chr
, bool echo
)
1122 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
1123 |INLCR
|IGNCR
|ICRNL
|IXON
);
1124 tty
.c_oflag
|= OPOST
;
1125 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
1126 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
1129 tty
.c_cc
[VTIME
] = 0;
1131 if (!stdio_allow_signal
)
1132 tty
.c_lflag
&= ~ISIG
;
1134 tcsetattr (0, TCSANOW
, &tty
);
1137 static void qemu_chr_close_stdio(struct CharDriverState
*chr
)
1143 static CharDriverState
*qemu_chr_open_stdio(ChardevStdio
*opts
)
1145 CharDriverState
*chr
;
1147 if (is_daemonized()) {
1148 error_report("cannot use stdio with -daemonize");
1153 error_report("cannot use stdio by multiple character devices");
1157 stdio_in_use
= true;
1158 old_fd0_flags
= fcntl(0, F_GETFL
);
1159 tcgetattr(0, &oldtty
);
1160 qemu_set_nonblock(0);
1163 chr
= qemu_chr_open_fd(0, 1);
1164 chr
->chr_close
= qemu_chr_close_stdio
;
1165 chr
->chr_set_echo
= qemu_chr_set_echo_stdio
;
1166 if (opts
->has_signal
) {
1167 stdio_allow_signal
= opts
->signal
;
1169 qemu_chr_fe_set_echo(chr
, false);
1174 #if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
1175 || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__) \
1176 || defined(__GLIBC__)
1178 #define HAVE_CHARDEV_TTY 1
1184 /* Protected by the CharDriverState chr_write_lock. */
1190 static void pty_chr_update_read_handler_locked(CharDriverState
*chr
);
1191 static void pty_chr_state(CharDriverState
*chr
, int connected
);
1193 static gboolean
pty_chr_timer(gpointer opaque
)
1195 struct CharDriverState
*chr
= opaque
;
1196 PtyCharDriver
*s
= chr
->opaque
;
1198 qemu_mutex_lock(&chr
->chr_write_lock
);
1201 if (!s
->connected
) {
1203 pty_chr_update_read_handler_locked(chr
);
1205 qemu_mutex_unlock(&chr
->chr_write_lock
);
1209 /* Called with chr_write_lock held. */
1210 static void pty_chr_rearm_timer(CharDriverState
*chr
, int ms
)
1212 PtyCharDriver
*s
= chr
->opaque
;
1215 g_source_remove(s
->timer_tag
);
1220 s
->timer_tag
= g_timeout_add_seconds(1, pty_chr_timer
, chr
);
1222 s
->timer_tag
= g_timeout_add(ms
, pty_chr_timer
, chr
);
1226 /* Called with chr_write_lock held. */
1227 static void pty_chr_update_read_handler_locked(CharDriverState
*chr
)
1229 PtyCharDriver
*s
= chr
->opaque
;
1232 pfd
.fd
= g_io_channel_unix_get_fd(s
->fd
);
1233 pfd
.events
= G_IO_OUT
;
1236 if (pfd
.revents
& G_IO_HUP
) {
1237 pty_chr_state(chr
, 0);
1239 pty_chr_state(chr
, 1);
1243 static void pty_chr_update_read_handler(CharDriverState
*chr
)
1245 qemu_mutex_lock(&chr
->chr_write_lock
);
1246 pty_chr_update_read_handler_locked(chr
);
1247 qemu_mutex_unlock(&chr
->chr_write_lock
);
1250 /* Called with chr_write_lock held. */
1251 static int pty_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
1253 PtyCharDriver
*s
= chr
->opaque
;
1255 if (!s
->connected
) {
1256 /* guest sends data, check for (re-)connect */
1257 pty_chr_update_read_handler_locked(chr
);
1258 if (!s
->connected
) {
1262 return io_channel_send(s
->fd
, buf
, len
);
1265 static GSource
*pty_chr_add_watch(CharDriverState
*chr
, GIOCondition cond
)
1267 PtyCharDriver
*s
= chr
->opaque
;
1268 if (!s
->connected
) {
1271 return g_io_create_watch(s
->fd
, cond
);
1274 static int pty_chr_read_poll(void *opaque
)
1276 CharDriverState
*chr
= opaque
;
1277 PtyCharDriver
*s
= chr
->opaque
;
1279 s
->read_bytes
= qemu_chr_be_can_write(chr
);
1280 return s
->read_bytes
;
1283 static gboolean
pty_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
1285 CharDriverState
*chr
= opaque
;
1286 PtyCharDriver
*s
= chr
->opaque
;
1288 uint8_t buf
[READ_BUF_LEN
];
1292 if (len
> s
->read_bytes
)
1293 len
= s
->read_bytes
;
1297 status
= g_io_channel_read_chars(s
->fd
, (gchar
*)buf
, len
, &size
, NULL
);
1298 if (status
!= G_IO_STATUS_NORMAL
) {
1299 pty_chr_state(chr
, 0);
1302 pty_chr_state(chr
, 1);
1303 qemu_chr_be_write(chr
, buf
, size
);
1308 static gboolean
qemu_chr_be_generic_open_func(gpointer opaque
)
1310 CharDriverState
*chr
= opaque
;
1311 PtyCharDriver
*s
= chr
->opaque
;
1314 qemu_chr_be_generic_open(chr
);
1318 /* Called with chr_write_lock held. */
1319 static void pty_chr_state(CharDriverState
*chr
, int connected
)
1321 PtyCharDriver
*s
= chr
->opaque
;
1325 g_source_remove(s
->open_tag
);
1328 remove_fd_in_watch(chr
);
1330 /* (re-)connect poll interval for idle guests: once per second.
1331 * We check more frequently in case the guests sends data to
1332 * the virtual device linked to our pty. */
1333 pty_chr_rearm_timer(chr
, 1000);
1336 g_source_remove(s
->timer_tag
);
1339 if (!s
->connected
) {
1340 g_assert(s
->open_tag
== 0);
1342 s
->open_tag
= g_idle_add(qemu_chr_be_generic_open_func
, chr
);
1344 if (!chr
->fd_in_tag
) {
1345 chr
->fd_in_tag
= io_add_watch_poll(s
->fd
, pty_chr_read_poll
,
1351 static void pty_chr_close(struct CharDriverState
*chr
)
1353 PtyCharDriver
*s
= chr
->opaque
;
1356 qemu_mutex_lock(&chr
->chr_write_lock
);
1357 pty_chr_state(chr
, 0);
1358 fd
= g_io_channel_unix_get_fd(s
->fd
);
1359 g_io_channel_unref(s
->fd
);
1362 g_source_remove(s
->timer_tag
);
1365 qemu_mutex_unlock(&chr
->chr_write_lock
);
1367 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1370 static CharDriverState
*qemu_chr_open_pty(const char *id
,
1373 CharDriverState
*chr
;
1375 int master_fd
, slave_fd
;
1376 char pty_name
[PATH_MAX
];
1378 master_fd
= qemu_openpty_raw(&slave_fd
, pty_name
);
1379 if (master_fd
< 0) {
1385 chr
= qemu_chr_alloc();
1387 chr
->filename
= g_strdup_printf("pty:%s", pty_name
);
1388 ret
->pty
= g_strdup(pty_name
);
1389 ret
->has_pty
= true;
1391 fprintf(stderr
, "char device redirected to %s (label %s)\n",
1394 s
= g_malloc0(sizeof(PtyCharDriver
));
1396 chr
->chr_write
= pty_chr_write
;
1397 chr
->chr_update_read_handler
= pty_chr_update_read_handler
;
1398 chr
->chr_close
= pty_chr_close
;
1399 chr
->chr_add_watch
= pty_chr_add_watch
;
1400 chr
->explicit_be_open
= true;
1402 s
->fd
= io_channel_from_fd(master_fd
);
1408 static void tty_serial_init(int fd
, int speed
,
1409 int parity
, int data_bits
, int stop_bits
)
1415 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
1416 speed
, parity
, data_bits
, stop_bits
);
1418 tcgetattr (fd
, &tty
);
1420 #define check_speed(val) if (speed <= val) { spd = B##val; break; }
1421 speed
= speed
* 10 / 11;
1438 /* Non-Posix values follow. They may be unsupported on some systems. */
1440 check_speed(115200);
1442 check_speed(230400);
1445 check_speed(460800);
1448 check_speed(500000);
1451 check_speed(576000);
1454 check_speed(921600);
1457 check_speed(1000000);
1460 check_speed(1152000);
1463 check_speed(1500000);
1466 check_speed(2000000);
1469 check_speed(2500000);
1472 check_speed(3000000);
1475 check_speed(3500000);
1478 check_speed(4000000);
1483 cfsetispeed(&tty
, spd
);
1484 cfsetospeed(&tty
, spd
);
1486 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
1487 |INLCR
|IGNCR
|ICRNL
|IXON
);
1488 tty
.c_oflag
|= OPOST
;
1489 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
|ISIG
);
1490 tty
.c_cflag
&= ~(CSIZE
|PARENB
|PARODD
|CRTSCTS
|CSTOPB
);
1511 tty
.c_cflag
|= PARENB
;
1514 tty
.c_cflag
|= PARENB
| PARODD
;
1518 tty
.c_cflag
|= CSTOPB
;
1520 tcsetattr (fd
, TCSANOW
, &tty
);
1523 static int tty_serial_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1525 FDCharDriver
*s
= chr
->opaque
;
1528 case CHR_IOCTL_SERIAL_SET_PARAMS
:
1530 QEMUSerialSetParams
*ssp
= arg
;
1531 tty_serial_init(g_io_channel_unix_get_fd(s
->fd_in
),
1532 ssp
->speed
, ssp
->parity
,
1533 ssp
->data_bits
, ssp
->stop_bits
);
1536 case CHR_IOCTL_SERIAL_SET_BREAK
:
1538 int enable
= *(int *)arg
;
1540 tcsendbreak(g_io_channel_unix_get_fd(s
->fd_in
), 1);
1544 case CHR_IOCTL_SERIAL_GET_TIOCM
:
1547 int *targ
= (int *)arg
;
1548 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMGET
, &sarg
);
1550 if (sarg
& TIOCM_CTS
)
1551 *targ
|= CHR_TIOCM_CTS
;
1552 if (sarg
& TIOCM_CAR
)
1553 *targ
|= CHR_TIOCM_CAR
;
1554 if (sarg
& TIOCM_DSR
)
1555 *targ
|= CHR_TIOCM_DSR
;
1556 if (sarg
& TIOCM_RI
)
1557 *targ
|= CHR_TIOCM_RI
;
1558 if (sarg
& TIOCM_DTR
)
1559 *targ
|= CHR_TIOCM_DTR
;
1560 if (sarg
& TIOCM_RTS
)
1561 *targ
|= CHR_TIOCM_RTS
;
1564 case CHR_IOCTL_SERIAL_SET_TIOCM
:
1566 int sarg
= *(int *)arg
;
1568 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMGET
, &targ
);
1569 targ
&= ~(CHR_TIOCM_CTS
| CHR_TIOCM_CAR
| CHR_TIOCM_DSR
1570 | CHR_TIOCM_RI
| CHR_TIOCM_DTR
| CHR_TIOCM_RTS
);
1571 if (sarg
& CHR_TIOCM_CTS
)
1573 if (sarg
& CHR_TIOCM_CAR
)
1575 if (sarg
& CHR_TIOCM_DSR
)
1577 if (sarg
& CHR_TIOCM_RI
)
1579 if (sarg
& CHR_TIOCM_DTR
)
1581 if (sarg
& CHR_TIOCM_RTS
)
1583 ioctl(g_io_channel_unix_get_fd(s
->fd_in
), TIOCMSET
, &targ
);
1592 static void qemu_chr_close_tty(CharDriverState
*chr
)
1594 FDCharDriver
*s
= chr
->opaque
;
1598 fd
= g_io_channel_unix_get_fd(s
->fd_in
);
1608 static CharDriverState
*qemu_chr_open_tty_fd(int fd
)
1610 CharDriverState
*chr
;
1612 tty_serial_init(fd
, 115200, 'N', 8, 1);
1613 chr
= qemu_chr_open_fd(fd
, fd
);
1614 chr
->chr_ioctl
= tty_serial_ioctl
;
1615 chr
->chr_close
= qemu_chr_close_tty
;
1618 #endif /* __linux__ || __sun__ */
1620 #if defined(__linux__)
1622 #define HAVE_CHARDEV_PARPORT 1
1627 } ParallelCharDriver
;
1629 static int pp_hw_mode(ParallelCharDriver
*s
, uint16_t mode
)
1631 if (s
->mode
!= mode
) {
1633 if (ioctl(s
->fd
, PPSETMODE
, &m
) < 0)
1640 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1642 ParallelCharDriver
*drv
= chr
->opaque
;
1647 case CHR_IOCTL_PP_READ_DATA
:
1648 if (ioctl(fd
, PPRDATA
, &b
) < 0)
1650 *(uint8_t *)arg
= b
;
1652 case CHR_IOCTL_PP_WRITE_DATA
:
1653 b
= *(uint8_t *)arg
;
1654 if (ioctl(fd
, PPWDATA
, &b
) < 0)
1657 case CHR_IOCTL_PP_READ_CONTROL
:
1658 if (ioctl(fd
, PPRCONTROL
, &b
) < 0)
1660 /* Linux gives only the lowest bits, and no way to know data
1661 direction! For better compatibility set the fixed upper
1663 *(uint8_t *)arg
= b
| 0xc0;
1665 case CHR_IOCTL_PP_WRITE_CONTROL
:
1666 b
= *(uint8_t *)arg
;
1667 if (ioctl(fd
, PPWCONTROL
, &b
) < 0)
1670 case CHR_IOCTL_PP_READ_STATUS
:
1671 if (ioctl(fd
, PPRSTATUS
, &b
) < 0)
1673 *(uint8_t *)arg
= b
;
1675 case CHR_IOCTL_PP_DATA_DIR
:
1676 if (ioctl(fd
, PPDATADIR
, (int *)arg
) < 0)
1679 case CHR_IOCTL_PP_EPP_READ_ADDR
:
1680 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
1681 struct ParallelIOArg
*parg
= arg
;
1682 int n
= read(fd
, parg
->buffer
, parg
->count
);
1683 if (n
!= parg
->count
) {
1688 case CHR_IOCTL_PP_EPP_READ
:
1689 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
1690 struct ParallelIOArg
*parg
= arg
;
1691 int n
= read(fd
, parg
->buffer
, parg
->count
);
1692 if (n
!= parg
->count
) {
1697 case CHR_IOCTL_PP_EPP_WRITE_ADDR
:
1698 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
|IEEE1284_ADDR
)) {
1699 struct ParallelIOArg
*parg
= arg
;
1700 int n
= write(fd
, parg
->buffer
, parg
->count
);
1701 if (n
!= parg
->count
) {
1706 case CHR_IOCTL_PP_EPP_WRITE
:
1707 if (pp_hw_mode(drv
, IEEE1284_MODE_EPP
)) {
1708 struct ParallelIOArg
*parg
= arg
;
1709 int n
= write(fd
, parg
->buffer
, parg
->count
);
1710 if (n
!= parg
->count
) {
1721 static void pp_close(CharDriverState
*chr
)
1723 ParallelCharDriver
*drv
= chr
->opaque
;
1726 pp_hw_mode(drv
, IEEE1284_MODE_COMPAT
);
1727 ioctl(fd
, PPRELEASE
);
1730 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1733 static CharDriverState
*qemu_chr_open_pp_fd(int fd
)
1735 CharDriverState
*chr
;
1736 ParallelCharDriver
*drv
;
1738 if (ioctl(fd
, PPCLAIM
) < 0) {
1743 drv
= g_malloc0(sizeof(ParallelCharDriver
));
1745 drv
->mode
= IEEE1284_MODE_COMPAT
;
1747 chr
= qemu_chr_alloc();
1748 chr
->chr_write
= null_chr_write
;
1749 chr
->chr_ioctl
= pp_ioctl
;
1750 chr
->chr_close
= pp_close
;
1755 #endif /* __linux__ */
1757 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
1759 #define HAVE_CHARDEV_PARPORT 1
1761 static int pp_ioctl(CharDriverState
*chr
, int cmd
, void *arg
)
1763 int fd
= (int)(intptr_t)chr
->opaque
;
1767 case CHR_IOCTL_PP_READ_DATA
:
1768 if (ioctl(fd
, PPIGDATA
, &b
) < 0)
1770 *(uint8_t *)arg
= b
;
1772 case CHR_IOCTL_PP_WRITE_DATA
:
1773 b
= *(uint8_t *)arg
;
1774 if (ioctl(fd
, PPISDATA
, &b
) < 0)
1777 case CHR_IOCTL_PP_READ_CONTROL
:
1778 if (ioctl(fd
, PPIGCTRL
, &b
) < 0)
1780 *(uint8_t *)arg
= b
;
1782 case CHR_IOCTL_PP_WRITE_CONTROL
:
1783 b
= *(uint8_t *)arg
;
1784 if (ioctl(fd
, PPISCTRL
, &b
) < 0)
1787 case CHR_IOCTL_PP_READ_STATUS
:
1788 if (ioctl(fd
, PPIGSTATUS
, &b
) < 0)
1790 *(uint8_t *)arg
= b
;
1798 static CharDriverState
*qemu_chr_open_pp_fd(int fd
)
1800 CharDriverState
*chr
;
1802 chr
= qemu_chr_alloc();
1803 chr
->opaque
= (void *)(intptr_t)fd
;
1804 chr
->chr_write
= null_chr_write
;
1805 chr
->chr_ioctl
= pp_ioctl
;
1806 chr
->explicit_be_open
= true;
1815 HANDLE hcom
, hrecv
, hsend
;
1820 /* Protected by the CharDriverState chr_write_lock. */
1826 HANDLE hInputReadyEvent
;
1827 HANDLE hInputDoneEvent
;
1828 HANDLE hInputThread
;
1829 uint8_t win_stdio_buf
;
1830 } WinStdioCharState
;
1832 #define NSENDBUF 2048
1833 #define NRECVBUF 2048
1834 #define MAXCONNECT 1
1835 #define NTIMEOUT 5000
1837 static int win_chr_poll(void *opaque
);
1838 static int win_chr_pipe_poll(void *opaque
);
1840 static void win_chr_close(CharDriverState
*chr
)
1842 WinCharState
*s
= chr
->opaque
;
1845 CloseHandle(s
->hsend
);
1849 CloseHandle(s
->hrecv
);
1853 CloseHandle(s
->hcom
);
1857 qemu_del_polling_cb(win_chr_pipe_poll
, chr
);
1859 qemu_del_polling_cb(win_chr_poll
, chr
);
1861 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
1864 static int win_chr_init(CharDriverState
*chr
, const char *filename
)
1866 WinCharState
*s
= chr
->opaque
;
1868 COMMTIMEOUTS cto
= { 0, 0, 0, 0, 0};
1873 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1875 fprintf(stderr
, "Failed CreateEvent\n");
1878 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
1880 fprintf(stderr
, "Failed CreateEvent\n");
1884 s
->hcom
= CreateFile(filename
, GENERIC_READ
|GENERIC_WRITE
, 0, NULL
,
1885 OPEN_EXISTING
, FILE_FLAG_OVERLAPPED
, 0);
1886 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
1887 fprintf(stderr
, "Failed CreateFile (%lu)\n", GetLastError());
1892 if (!SetupComm(s
->hcom
, NRECVBUF
, NSENDBUF
)) {
1893 fprintf(stderr
, "Failed SetupComm\n");
1897 ZeroMemory(&comcfg
, sizeof(COMMCONFIG
));
1898 size
= sizeof(COMMCONFIG
);
1899 GetDefaultCommConfig(filename
, &comcfg
, &size
);
1900 comcfg
.dcb
.DCBlength
= sizeof(DCB
);
1901 CommConfigDialog(filename
, NULL
, &comcfg
);
1903 if (!SetCommState(s
->hcom
, &comcfg
.dcb
)) {
1904 fprintf(stderr
, "Failed SetCommState\n");
1908 if (!SetCommMask(s
->hcom
, EV_ERR
)) {
1909 fprintf(stderr
, "Failed SetCommMask\n");
1913 cto
.ReadIntervalTimeout
= MAXDWORD
;
1914 if (!SetCommTimeouts(s
->hcom
, &cto
)) {
1915 fprintf(stderr
, "Failed SetCommTimeouts\n");
1919 if (!ClearCommError(s
->hcom
, &err
, &comstat
)) {
1920 fprintf(stderr
, "Failed ClearCommError\n");
1923 qemu_add_polling_cb(win_chr_poll
, chr
);
1931 /* Called with chr_write_lock held. */
1932 static int win_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len1
)
1934 WinCharState
*s
= chr
->opaque
;
1935 DWORD len
, ret
, size
, err
;
1938 ZeroMemory(&s
->osend
, sizeof(s
->osend
));
1939 s
->osend
.hEvent
= s
->hsend
;
1942 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, &s
->osend
);
1944 ret
= WriteFile(s
->hcom
, buf
, len
, &size
, NULL
);
1946 err
= GetLastError();
1947 if (err
== ERROR_IO_PENDING
) {
1948 ret
= GetOverlappedResult(s
->hcom
, &s
->osend
, &size
, TRUE
);
1966 static int win_chr_read_poll(CharDriverState
*chr
)
1968 WinCharState
*s
= chr
->opaque
;
1970 s
->max_size
= qemu_chr_be_can_write(chr
);
1974 static void win_chr_readfile(CharDriverState
*chr
)
1976 WinCharState
*s
= chr
->opaque
;
1978 uint8_t buf
[READ_BUF_LEN
];
1981 ZeroMemory(&s
->orecv
, sizeof(s
->orecv
));
1982 s
->orecv
.hEvent
= s
->hrecv
;
1983 ret
= ReadFile(s
->hcom
, buf
, s
->len
, &size
, &s
->orecv
);
1985 err
= GetLastError();
1986 if (err
== ERROR_IO_PENDING
) {
1987 ret
= GetOverlappedResult(s
->hcom
, &s
->orecv
, &size
, TRUE
);
1992 qemu_chr_be_write(chr
, buf
, size
);
1996 static void win_chr_read(CharDriverState
*chr
)
1998 WinCharState
*s
= chr
->opaque
;
2000 if (s
->len
> s
->max_size
)
2001 s
->len
= s
->max_size
;
2005 win_chr_readfile(chr
);
2008 static int win_chr_poll(void *opaque
)
2010 CharDriverState
*chr
= opaque
;
2011 WinCharState
*s
= chr
->opaque
;
2015 ClearCommError(s
->hcom
, &comerr
, &status
);
2016 if (status
.cbInQue
> 0) {
2017 s
->len
= status
.cbInQue
;
2018 win_chr_read_poll(chr
);
2025 static CharDriverState
*qemu_chr_open_win_path(const char *filename
)
2027 CharDriverState
*chr
;
2030 chr
= qemu_chr_alloc();
2031 s
= g_malloc0(sizeof(WinCharState
));
2033 chr
->chr_write
= win_chr_write
;
2034 chr
->chr_close
= win_chr_close
;
2036 if (win_chr_init(chr
, filename
) < 0) {
2044 static int win_chr_pipe_poll(void *opaque
)
2046 CharDriverState
*chr
= opaque
;
2047 WinCharState
*s
= chr
->opaque
;
2050 PeekNamedPipe(s
->hcom
, NULL
, 0, NULL
, &size
, NULL
);
2053 win_chr_read_poll(chr
);
2060 static int win_chr_pipe_init(CharDriverState
*chr
, const char *filename
)
2062 WinCharState
*s
= chr
->opaque
;
2066 char openname
[CHR_MAX_FILENAME_SIZE
];
2070 s
->hsend
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2072 fprintf(stderr
, "Failed CreateEvent\n");
2075 s
->hrecv
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2077 fprintf(stderr
, "Failed CreateEvent\n");
2081 snprintf(openname
, sizeof(openname
), "\\\\.\\pipe\\%s", filename
);
2082 s
->hcom
= CreateNamedPipe(openname
, PIPE_ACCESS_DUPLEX
| FILE_FLAG_OVERLAPPED
,
2083 PIPE_TYPE_BYTE
| PIPE_READMODE_BYTE
|
2085 MAXCONNECT
, NSENDBUF
, NRECVBUF
, NTIMEOUT
, NULL
);
2086 if (s
->hcom
== INVALID_HANDLE_VALUE
) {
2087 fprintf(stderr
, "Failed CreateNamedPipe (%lu)\n", GetLastError());
2092 ZeroMemory(&ov
, sizeof(ov
));
2093 ov
.hEvent
= CreateEvent(NULL
, TRUE
, FALSE
, NULL
);
2094 ret
= ConnectNamedPipe(s
->hcom
, &ov
);
2096 fprintf(stderr
, "Failed ConnectNamedPipe\n");
2100 ret
= GetOverlappedResult(s
->hcom
, &ov
, &size
, TRUE
);
2102 fprintf(stderr
, "Failed GetOverlappedResult\n");
2104 CloseHandle(ov
.hEvent
);
2111 CloseHandle(ov
.hEvent
);
2114 qemu_add_polling_cb(win_chr_pipe_poll
, chr
);
2123 static CharDriverState
*qemu_chr_open_pipe(ChardevHostdev
*opts
)
2125 const char *filename
= opts
->device
;
2126 CharDriverState
*chr
;
2129 chr
= qemu_chr_alloc();
2130 s
= g_malloc0(sizeof(WinCharState
));
2132 chr
->chr_write
= win_chr_write
;
2133 chr
->chr_close
= win_chr_close
;
2135 if (win_chr_pipe_init(chr
, filename
) < 0) {
2143 static CharDriverState
*qemu_chr_open_win_file(HANDLE fd_out
)
2145 CharDriverState
*chr
;
2148 chr
= qemu_chr_alloc();
2149 s
= g_malloc0(sizeof(WinCharState
));
2152 chr
->chr_write
= win_chr_write
;
2156 static CharDriverState
*qemu_chr_open_win_con(void)
2158 return qemu_chr_open_win_file(GetStdHandle(STD_OUTPUT_HANDLE
));
2161 static int win_stdio_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2163 HANDLE hStdOut
= GetStdHandle(STD_OUTPUT_HANDLE
);
2170 if (!WriteFile(hStdOut
, buf
, len1
, &dwSize
, NULL
)) {
2180 static void win_stdio_wait_func(void *opaque
)
2182 CharDriverState
*chr
= opaque
;
2183 WinStdioCharState
*stdio
= chr
->opaque
;
2184 INPUT_RECORD buf
[4];
2189 ret
= ReadConsoleInput(stdio
->hStdIn
, buf
, ARRAY_SIZE(buf
), &dwSize
);
2192 /* Avoid error storm */
2193 qemu_del_wait_object(stdio
->hStdIn
, NULL
, NULL
);
2197 for (i
= 0; i
< dwSize
; i
++) {
2198 KEY_EVENT_RECORD
*kev
= &buf
[i
].Event
.KeyEvent
;
2200 if (buf
[i
].EventType
== KEY_EVENT
&& kev
->bKeyDown
) {
2202 if (kev
->uChar
.AsciiChar
!= 0) {
2203 for (j
= 0; j
< kev
->wRepeatCount
; j
++) {
2204 if (qemu_chr_be_can_write(chr
)) {
2205 uint8_t c
= kev
->uChar
.AsciiChar
;
2206 qemu_chr_be_write(chr
, &c
, 1);
2214 static DWORD WINAPI
win_stdio_thread(LPVOID param
)
2216 CharDriverState
*chr
= param
;
2217 WinStdioCharState
*stdio
= chr
->opaque
;
2223 /* Wait for one byte */
2224 ret
= ReadFile(stdio
->hStdIn
, &stdio
->win_stdio_buf
, 1, &dwSize
, NULL
);
2226 /* Exit in case of error, continue if nothing read */
2234 /* Some terminal emulator returns \r\n for Enter, just pass \n */
2235 if (stdio
->win_stdio_buf
== '\r') {
2239 /* Signal the main thread and wait until the byte was eaten */
2240 if (!SetEvent(stdio
->hInputReadyEvent
)) {
2243 if (WaitForSingleObject(stdio
->hInputDoneEvent
, INFINITE
)
2249 qemu_del_wait_object(stdio
->hInputReadyEvent
, NULL
, NULL
);
2253 static void win_stdio_thread_wait_func(void *opaque
)
2255 CharDriverState
*chr
= opaque
;
2256 WinStdioCharState
*stdio
= chr
->opaque
;
2258 if (qemu_chr_be_can_write(chr
)) {
2259 qemu_chr_be_write(chr
, &stdio
->win_stdio_buf
, 1);
2262 SetEvent(stdio
->hInputDoneEvent
);
2265 static void qemu_chr_set_echo_win_stdio(CharDriverState
*chr
, bool echo
)
2267 WinStdioCharState
*stdio
= chr
->opaque
;
2270 GetConsoleMode(stdio
->hStdIn
, &dwMode
);
2273 SetConsoleMode(stdio
->hStdIn
, dwMode
| ENABLE_ECHO_INPUT
);
2275 SetConsoleMode(stdio
->hStdIn
, dwMode
& ~ENABLE_ECHO_INPUT
);
2279 static void win_stdio_close(CharDriverState
*chr
)
2281 WinStdioCharState
*stdio
= chr
->opaque
;
2283 if (stdio
->hInputReadyEvent
!= INVALID_HANDLE_VALUE
) {
2284 CloseHandle(stdio
->hInputReadyEvent
);
2286 if (stdio
->hInputDoneEvent
!= INVALID_HANDLE_VALUE
) {
2287 CloseHandle(stdio
->hInputDoneEvent
);
2289 if (stdio
->hInputThread
!= INVALID_HANDLE_VALUE
) {
2290 TerminateThread(stdio
->hInputThread
, 0);
2293 g_free(chr
->opaque
);
2297 static CharDriverState
*qemu_chr_open_stdio(ChardevStdio
*opts
)
2299 CharDriverState
*chr
;
2300 WinStdioCharState
*stdio
;
2304 chr
= qemu_chr_alloc();
2305 stdio
= g_malloc0(sizeof(WinStdioCharState
));
2307 stdio
->hStdIn
= GetStdHandle(STD_INPUT_HANDLE
);
2308 if (stdio
->hStdIn
== INVALID_HANDLE_VALUE
) {
2309 fprintf(stderr
, "cannot open stdio: invalid handle\n");
2313 is_console
= GetConsoleMode(stdio
->hStdIn
, &dwMode
) != 0;
2315 chr
->opaque
= stdio
;
2316 chr
->chr_write
= win_stdio_write
;
2317 chr
->chr_close
= win_stdio_close
;
2320 if (qemu_add_wait_object(stdio
->hStdIn
,
2321 win_stdio_wait_func
, chr
)) {
2322 fprintf(stderr
, "qemu_add_wait_object: failed\n");
2327 stdio
->hInputReadyEvent
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2328 stdio
->hInputDoneEvent
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2329 stdio
->hInputThread
= CreateThread(NULL
, 0, win_stdio_thread
,
2332 if (stdio
->hInputThread
== INVALID_HANDLE_VALUE
2333 || stdio
->hInputReadyEvent
== INVALID_HANDLE_VALUE
2334 || stdio
->hInputDoneEvent
== INVALID_HANDLE_VALUE
) {
2335 fprintf(stderr
, "cannot create stdio thread or event\n");
2338 if (qemu_add_wait_object(stdio
->hInputReadyEvent
,
2339 win_stdio_thread_wait_func
, chr
)) {
2340 fprintf(stderr
, "qemu_add_wait_object: failed\n");
2344 dwMode
|= ENABLE_LINE_INPUT
;
2347 /* set the terminal in raw mode */
2348 /* ENABLE_QUICK_EDIT_MODE | ENABLE_EXTENDED_FLAGS */
2349 dwMode
|= ENABLE_PROCESSED_INPUT
;
2352 SetConsoleMode(stdio
->hStdIn
, dwMode
);
2354 chr
->chr_set_echo
= qemu_chr_set_echo_win_stdio
;
2355 qemu_chr_fe_set_echo(chr
, false);
2359 #endif /* !_WIN32 */
2362 /***********************************************************/
2363 /* UDP Net console */
2368 uint8_t buf
[READ_BUF_LEN
];
2374 /* Called with chr_write_lock held. */
2375 static int udp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2377 NetCharDriver
*s
= chr
->opaque
;
2378 gsize bytes_written
;
2381 status
= g_io_channel_write_chars(s
->chan
, (const gchar
*)buf
, len
, &bytes_written
, NULL
);
2382 if (status
== G_IO_STATUS_EOF
) {
2384 } else if (status
!= G_IO_STATUS_NORMAL
) {
2388 return bytes_written
;
2391 static int udp_chr_read_poll(void *opaque
)
2393 CharDriverState
*chr
= opaque
;
2394 NetCharDriver
*s
= chr
->opaque
;
2396 s
->max_size
= qemu_chr_be_can_write(chr
);
2398 /* If there were any stray characters in the queue process them
2401 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
2402 qemu_chr_be_write(chr
, &s
->buf
[s
->bufptr
], 1);
2404 s
->max_size
= qemu_chr_be_can_write(chr
);
2409 static gboolean
udp_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
2411 CharDriverState
*chr
= opaque
;
2412 NetCharDriver
*s
= chr
->opaque
;
2413 gsize bytes_read
= 0;
2416 if (s
->max_size
== 0) {
2419 status
= g_io_channel_read_chars(s
->chan
, (gchar
*)s
->buf
, sizeof(s
->buf
),
2421 s
->bufcnt
= bytes_read
;
2422 s
->bufptr
= s
->bufcnt
;
2423 if (status
!= G_IO_STATUS_NORMAL
) {
2424 remove_fd_in_watch(chr
);
2429 while (s
->max_size
> 0 && s
->bufptr
< s
->bufcnt
) {
2430 qemu_chr_be_write(chr
, &s
->buf
[s
->bufptr
], 1);
2432 s
->max_size
= qemu_chr_be_can_write(chr
);
2438 static void udp_chr_update_read_handler(CharDriverState
*chr
)
2440 NetCharDriver
*s
= chr
->opaque
;
2442 remove_fd_in_watch(chr
);
2444 chr
->fd_in_tag
= io_add_watch_poll(s
->chan
, udp_chr_read_poll
,
2449 static void udp_chr_close(CharDriverState
*chr
)
2451 NetCharDriver
*s
= chr
->opaque
;
2453 remove_fd_in_watch(chr
);
2455 g_io_channel_unref(s
->chan
);
2459 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2462 static CharDriverState
*qemu_chr_open_udp_fd(int fd
)
2464 CharDriverState
*chr
= NULL
;
2465 NetCharDriver
*s
= NULL
;
2467 chr
= qemu_chr_alloc();
2468 s
= g_malloc0(sizeof(NetCharDriver
));
2471 s
->chan
= io_channel_from_socket(s
->fd
);
2475 chr
->chr_write
= udp_chr_write
;
2476 chr
->chr_update_read_handler
= udp_chr_update_read_handler
;
2477 chr
->chr_close
= udp_chr_close
;
2478 /* be isn't opened until we get a connection */
2479 chr
->explicit_be_open
= true;
2483 /***********************************************************/
2484 /* TCP Net console */
2488 GIOChannel
*chan
, *listen_chan
;
2497 int read_msgfds_num
;
2499 int write_msgfds_num
;
2501 SocketAddress
*addr
;
2506 static gboolean
tcp_chr_accept(GIOChannel
*chan
, GIOCondition cond
, void *opaque
);
2509 static int unix_send_msgfds(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2511 TCPCharDriver
*s
= chr
->opaque
;
2516 size_t fd_size
= s
->write_msgfds_num
* sizeof(int);
2517 char control
[CMSG_SPACE(fd_size
)];
2518 struct cmsghdr
*cmsg
;
2520 memset(&msgh
, 0, sizeof(msgh
));
2521 memset(control
, 0, sizeof(control
));
2523 /* set the payload */
2524 iov
.iov_base
= (uint8_t *) buf
;
2527 msgh
.msg_iov
= &iov
;
2528 msgh
.msg_iovlen
= 1;
2530 msgh
.msg_control
= control
;
2531 msgh
.msg_controllen
= sizeof(control
);
2533 cmsg
= CMSG_FIRSTHDR(&msgh
);
2535 cmsg
->cmsg_len
= CMSG_LEN(fd_size
);
2536 cmsg
->cmsg_level
= SOL_SOCKET
;
2537 cmsg
->cmsg_type
= SCM_RIGHTS
;
2538 memcpy(CMSG_DATA(cmsg
), s
->write_msgfds
, fd_size
);
2541 r
= sendmsg(s
->fd
, &msgh
, 0);
2542 } while (r
< 0 && errno
== EINTR
);
2544 /* free the written msgfds, no matter what */
2545 if (s
->write_msgfds_num
) {
2546 g_free(s
->write_msgfds
);
2547 s
->write_msgfds
= 0;
2548 s
->write_msgfds_num
= 0;
2555 /* Called with chr_write_lock held. */
2556 static int tcp_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2558 TCPCharDriver
*s
= chr
->opaque
;
2561 if (s
->is_unix
&& s
->write_msgfds_num
) {
2562 return unix_send_msgfds(chr
, buf
, len
);
2566 return io_channel_send(s
->chan
, buf
, len
);
2569 /* XXX: indicate an error ? */
2574 static int tcp_chr_read_poll(void *opaque
)
2576 CharDriverState
*chr
= opaque
;
2577 TCPCharDriver
*s
= chr
->opaque
;
2580 s
->max_size
= qemu_chr_be_can_write(chr
);
2585 #define IAC_BREAK 243
2586 static void tcp_chr_process_IAC_bytes(CharDriverState
*chr
,
2588 uint8_t *buf
, int *size
)
2590 /* Handle any telnet client's basic IAC options to satisfy char by
2591 * char mode with no echo. All IAC options will be removed from
2592 * the buf and the do_telnetopt variable will be used to track the
2593 * state of the width of the IAC information.
2595 * IAC commands come in sets of 3 bytes with the exception of the
2596 * "IAC BREAK" command and the double IAC.
2602 for (i
= 0; i
< *size
; i
++) {
2603 if (s
->do_telnetopt
> 1) {
2604 if ((unsigned char)buf
[i
] == IAC
&& s
->do_telnetopt
== 2) {
2605 /* Double IAC means send an IAC */
2609 s
->do_telnetopt
= 1;
2611 if ((unsigned char)buf
[i
] == IAC_BREAK
&& s
->do_telnetopt
== 2) {
2612 /* Handle IAC break commands by sending a serial break */
2613 qemu_chr_be_event(chr
, CHR_EVENT_BREAK
);
2618 if (s
->do_telnetopt
>= 4) {
2619 s
->do_telnetopt
= 1;
2622 if ((unsigned char)buf
[i
] == IAC
) {
2623 s
->do_telnetopt
= 2;
2634 static int tcp_get_msgfds(CharDriverState
*chr
, int *fds
, int num
)
2636 TCPCharDriver
*s
= chr
->opaque
;
2637 int to_copy
= (s
->read_msgfds_num
< num
) ? s
->read_msgfds_num
: num
;
2642 memcpy(fds
, s
->read_msgfds
, to_copy
* sizeof(int));
2644 /* Close unused fds */
2645 for (i
= to_copy
; i
< s
->read_msgfds_num
; i
++) {
2646 close(s
->read_msgfds
[i
]);
2649 g_free(s
->read_msgfds
);
2651 s
->read_msgfds_num
= 0;
2657 static int tcp_set_msgfds(CharDriverState
*chr
, int *fds
, int num
)
2659 TCPCharDriver
*s
= chr
->opaque
;
2661 /* clear old pending fd array */
2662 if (s
->write_msgfds
) {
2663 g_free(s
->write_msgfds
);
2667 s
->write_msgfds
= g_malloc(num
* sizeof(int));
2668 memcpy(s
->write_msgfds
, fds
, num
* sizeof(int));
2671 s
->write_msgfds_num
= num
;
2677 static void unix_process_msgfd(CharDriverState
*chr
, struct msghdr
*msg
)
2679 TCPCharDriver
*s
= chr
->opaque
;
2680 struct cmsghdr
*cmsg
;
2682 for (cmsg
= CMSG_FIRSTHDR(msg
); cmsg
; cmsg
= CMSG_NXTHDR(msg
, cmsg
)) {
2685 if (cmsg
->cmsg_len
< CMSG_LEN(sizeof(int)) ||
2686 cmsg
->cmsg_level
!= SOL_SOCKET
||
2687 cmsg
->cmsg_type
!= SCM_RIGHTS
) {
2691 fd_size
= cmsg
->cmsg_len
- CMSG_LEN(0);
2697 /* close and clean read_msgfds */
2698 for (i
= 0; i
< s
->read_msgfds_num
; i
++) {
2699 close(s
->read_msgfds
[i
]);
2702 if (s
->read_msgfds_num
) {
2703 g_free(s
->read_msgfds
);
2706 s
->read_msgfds_num
= fd_size
/ sizeof(int);
2707 s
->read_msgfds
= g_malloc(fd_size
);
2708 memcpy(s
->read_msgfds
, CMSG_DATA(cmsg
), fd_size
);
2710 for (i
= 0; i
< s
->read_msgfds_num
; i
++) {
2711 int fd
= s
->read_msgfds
[i
];
2716 /* O_NONBLOCK is preserved across SCM_RIGHTS so reset it */
2719 #ifndef MSG_CMSG_CLOEXEC
2720 qemu_set_cloexec(fd
);
2726 static ssize_t
tcp_chr_recv(CharDriverState
*chr
, char *buf
, size_t len
)
2728 TCPCharDriver
*s
= chr
->opaque
;
2729 struct msghdr msg
= { NULL
, };
2730 struct iovec iov
[1];
2732 struct cmsghdr cmsg
;
2733 char control
[CMSG_SPACE(sizeof(int))];
2738 iov
[0].iov_base
= buf
;
2739 iov
[0].iov_len
= len
;
2743 msg
.msg_control
= &msg_control
;
2744 msg
.msg_controllen
= sizeof(msg_control
);
2746 #ifdef MSG_CMSG_CLOEXEC
2747 flags
|= MSG_CMSG_CLOEXEC
;
2749 ret
= recvmsg(s
->fd
, &msg
, flags
);
2750 if (ret
> 0 && s
->is_unix
) {
2751 unix_process_msgfd(chr
, &msg
);
2757 static ssize_t
tcp_chr_recv(CharDriverState
*chr
, char *buf
, size_t len
)
2759 TCPCharDriver
*s
= chr
->opaque
;
2760 return qemu_recv(s
->fd
, buf
, len
, 0);
2764 static GSource
*tcp_chr_add_watch(CharDriverState
*chr
, GIOCondition cond
)
2766 TCPCharDriver
*s
= chr
->opaque
;
2767 return g_io_create_watch(s
->chan
, cond
);
2770 static void tcp_chr_disconnect(CharDriverState
*chr
)
2772 TCPCharDriver
*s
= chr
->opaque
;
2775 if (s
->listen_chan
) {
2776 s
->listen_tag
= g_io_add_watch(s
->listen_chan
, G_IO_IN
,
2777 tcp_chr_accept
, chr
);
2779 remove_fd_in_watch(chr
);
2780 g_io_channel_unref(s
->chan
);
2784 SocketAddress_to_str(chr
->filename
, CHR_MAX_FILENAME_SIZE
,
2785 "disconnected:", s
->addr
, s
->is_listen
, s
->is_telnet
);
2786 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2789 static gboolean
tcp_chr_read(GIOChannel
*chan
, GIOCondition cond
, void *opaque
)
2791 CharDriverState
*chr
= opaque
;
2792 TCPCharDriver
*s
= chr
->opaque
;
2793 uint8_t buf
[READ_BUF_LEN
];
2796 if (cond
& G_IO_HUP
) {
2797 /* connection closed */
2798 tcp_chr_disconnect(chr
);
2802 if (!s
->connected
|| s
->max_size
<= 0) {
2806 if (len
> s
->max_size
)
2808 size
= tcp_chr_recv(chr
, (void *)buf
, len
);
2810 /* connection closed */
2811 tcp_chr_disconnect(chr
);
2812 } else if (size
> 0) {
2813 if (s
->do_telnetopt
)
2814 tcp_chr_process_IAC_bytes(chr
, s
, buf
, &size
);
2816 qemu_chr_be_write(chr
, buf
, size
);
2822 static int tcp_chr_sync_read(CharDriverState
*chr
, const uint8_t *buf
, int len
)
2824 TCPCharDriver
*s
= chr
->opaque
;
2827 if (!s
->connected
) {
2831 size
= tcp_chr_recv(chr
, (void *) buf
, len
);
2833 /* connection closed */
2834 tcp_chr_disconnect(chr
);
2841 CharDriverState
*qemu_chr_open_eventfd(int eventfd
)
2843 CharDriverState
*chr
= qemu_chr_open_fd(eventfd
, eventfd
);
2846 chr
->avail_connections
= 1;
2853 static void tcp_chr_connect(void *opaque
)
2855 CharDriverState
*chr
= opaque
;
2856 TCPCharDriver
*s
= chr
->opaque
;
2857 struct sockaddr_storage ss
;
2858 socklen_t ss_len
= sizeof(ss
);
2860 memset(&ss
, 0, ss_len
);
2861 if (getsockname(s
->fd
, (struct sockaddr
*) &ss
, &ss_len
) != 0) {
2862 snprintf(chr
->filename
, CHR_MAX_FILENAME_SIZE
,
2863 "Error in getsockname: %s\n", strerror(errno
));
2865 sockaddr_to_str(chr
->filename
, CHR_MAX_FILENAME_SIZE
, &ss
, ss_len
,
2866 s
->is_listen
, s
->is_telnet
);
2871 chr
->fd_in_tag
= io_add_watch_poll(s
->chan
, tcp_chr_read_poll
,
2874 qemu_chr_be_generic_open(chr
);
2877 static void tcp_chr_update_read_handler(CharDriverState
*chr
)
2879 TCPCharDriver
*s
= chr
->opaque
;
2881 remove_fd_in_watch(chr
);
2883 chr
->fd_in_tag
= io_add_watch_poll(s
->chan
, tcp_chr_read_poll
,
2888 #define IACSET(x,a,b,c) x[0] = a; x[1] = b; x[2] = c;
2889 static void tcp_chr_telnet_init(int fd
)
2892 /* Send the telnet negotion to put telnet in binary, no echo, single char mode */
2893 IACSET(buf
, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
2894 send(fd
, (char *)buf
, 3, 0);
2895 IACSET(buf
, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
2896 send(fd
, (char *)buf
, 3, 0);
2897 IACSET(buf
, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
2898 send(fd
, (char *)buf
, 3, 0);
2899 IACSET(buf
, 0xff, 0xfd, 0x00); /* IAC DO Binary */
2900 send(fd
, (char *)buf
, 3, 0);
2903 static int tcp_chr_add_client(CharDriverState
*chr
, int fd
)
2905 TCPCharDriver
*s
= chr
->opaque
;
2909 qemu_set_nonblock(fd
);
2911 socket_set_nodelay(fd
);
2913 s
->chan
= io_channel_from_socket(fd
);
2914 if (s
->listen_tag
) {
2915 g_source_remove(s
->listen_tag
);
2918 tcp_chr_connect(chr
);
2923 static gboolean
tcp_chr_accept(GIOChannel
*channel
, GIOCondition cond
, void *opaque
)
2925 CharDriverState
*chr
= opaque
;
2926 TCPCharDriver
*s
= chr
->opaque
;
2927 struct sockaddr_in saddr
;
2929 struct sockaddr_un uaddr
;
2931 struct sockaddr
*addr
;
2938 len
= sizeof(uaddr
);
2939 addr
= (struct sockaddr
*)&uaddr
;
2943 len
= sizeof(saddr
);
2944 addr
= (struct sockaddr
*)&saddr
;
2946 fd
= qemu_accept(s
->listen_fd
, addr
, &len
);
2947 if (fd
< 0 && errno
!= EINTR
) {
2950 } else if (fd
>= 0) {
2951 if (s
->do_telnetopt
)
2952 tcp_chr_telnet_init(fd
);
2956 if (tcp_chr_add_client(chr
, fd
) < 0)
2962 static void tcp_chr_close(CharDriverState
*chr
)
2964 TCPCharDriver
*s
= chr
->opaque
;
2967 qapi_free_SocketAddress(s
->addr
);
2969 remove_fd_in_watch(chr
);
2971 g_io_channel_unref(s
->chan
);
2975 if (s
->listen_fd
>= 0) {
2976 if (s
->listen_tag
) {
2977 g_source_remove(s
->listen_tag
);
2980 if (s
->listen_chan
) {
2981 g_io_channel_unref(s
->listen_chan
);
2983 closesocket(s
->listen_fd
);
2985 if (s
->read_msgfds_num
) {
2986 for (i
= 0; i
< s
->read_msgfds_num
; i
++) {
2987 close(s
->read_msgfds
[i
]);
2989 g_free(s
->read_msgfds
);
2991 if (s
->write_msgfds_num
) {
2992 g_free(s
->write_msgfds
);
2995 qemu_chr_be_event(chr
, CHR_EVENT_CLOSED
);
2998 static void qemu_chr_finish_socket_connection(CharDriverState
*chr
, int fd
)
3000 TCPCharDriver
*s
= chr
->opaque
;
3004 s
->listen_chan
= io_channel_from_socket(s
->listen_fd
);
3005 s
->listen_tag
= g_io_add_watch(s
->listen_chan
, G_IO_IN
,
3006 tcp_chr_accept
, chr
);
3010 socket_set_nodelay(fd
);
3011 s
->chan
= io_channel_from_socket(s
->fd
);
3012 tcp_chr_connect(chr
);
3016 static bool qemu_chr_open_socket_fd(CharDriverState
*chr
, Error
**errp
)
3018 TCPCharDriver
*s
= chr
->opaque
;
3022 fd
= socket_listen(s
->addr
, errp
);
3024 fd
= socket_connect(s
->addr
, errp
, NULL
, NULL
);
3030 qemu_chr_finish_socket_connection(chr
, fd
);
3034 /*********************************************************/
3035 /* Ring buffer chardev */
3042 } RingBufCharDriver
;
3044 static size_t ringbuf_count(const CharDriverState
*chr
)
3046 const RingBufCharDriver
*d
= chr
->opaque
;
3048 return d
->prod
- d
->cons
;
3051 /* Called with chr_write_lock held. */
3052 static int ringbuf_chr_write(CharDriverState
*chr
, const uint8_t *buf
, int len
)
3054 RingBufCharDriver
*d
= chr
->opaque
;
3057 if (!buf
|| (len
< 0)) {
3061 for (i
= 0; i
< len
; i
++ ) {
3062 d
->cbuf
[d
->prod
++ & (d
->size
- 1)] = buf
[i
];
3063 if (d
->prod
- d
->cons
> d
->size
) {
3064 d
->cons
= d
->prod
- d
->size
;
3071 static int ringbuf_chr_read(CharDriverState
*chr
, uint8_t *buf
, int len
)
3073 RingBufCharDriver
*d
= chr
->opaque
;
3076 qemu_mutex_lock(&chr
->chr_write_lock
);
3077 for (i
= 0; i
< len
&& d
->cons
!= d
->prod
; i
++) {
3078 buf
[i
] = d
->cbuf
[d
->cons
++ & (d
->size
- 1)];
3080 qemu_mutex_unlock(&chr
->chr_write_lock
);
3085 static void ringbuf_chr_close(struct CharDriverState
*chr
)
3087 RingBufCharDriver
*d
= chr
->opaque
;
3094 static CharDriverState
*qemu_chr_open_ringbuf(ChardevRingbuf
*opts
,
3097 CharDriverState
*chr
;
3098 RingBufCharDriver
*d
;
3100 chr
= qemu_chr_alloc();
3101 d
= g_malloc(sizeof(*d
));
3103 d
->size
= opts
->has_size
? opts
->size
: 65536;
3105 /* The size must be power of 2 */
3106 if (d
->size
& (d
->size
- 1)) {
3107 error_setg(errp
, "size of ringbuf chardev must be power of two");
3113 d
->cbuf
= g_malloc0(d
->size
);
3116 chr
->chr_write
= ringbuf_chr_write
;
3117 chr
->chr_close
= ringbuf_chr_close
;
3127 bool chr_is_ringbuf(const CharDriverState
*chr
)
3129 return chr
->chr_write
== ringbuf_chr_write
;
3132 void qmp_ringbuf_write(const char *device
, const char *data
,
3133 bool has_format
, enum DataFormat format
,
3136 CharDriverState
*chr
;
3137 const uint8_t *write_data
;
3141 chr
= qemu_chr_find(device
);
3143 error_setg(errp
, "Device '%s' not found", device
);
3147 if (!chr_is_ringbuf(chr
)) {
3148 error_setg(errp
,"%s is not a ringbuf device", device
);
3152 if (has_format
&& (format
== DATA_FORMAT_BASE64
)) {
3153 write_data
= g_base64_decode(data
, &write_count
);
3155 write_data
= (uint8_t *)data
;
3156 write_count
= strlen(data
);
3159 ret
= ringbuf_chr_write(chr
, write_data
, write_count
);
3161 if (write_data
!= (uint8_t *)data
) {
3162 g_free((void *)write_data
);
3166 error_setg(errp
, "Failed to write to device %s", device
);
3171 char *qmp_ringbuf_read(const char *device
, int64_t size
,
3172 bool has_format
, enum DataFormat format
,
3175 CharDriverState
*chr
;
3180 chr
= qemu_chr_find(device
);
3182 error_setg(errp
, "Device '%s' not found", device
);
3186 if (!chr_is_ringbuf(chr
)) {
3187 error_setg(errp
,"%s is not a ringbuf device", device
);
3192 error_setg(errp
, "size must be greater than zero");
3196 count
= ringbuf_count(chr
);
3197 size
= size
> count
? count
: size
;
3198 read_data
= g_malloc(size
+ 1);
3200 ringbuf_chr_read(chr
, read_data
, size
);
3202 if (has_format
&& (format
== DATA_FORMAT_BASE64
)) {
3203 data
= g_base64_encode(read_data
, size
);
3207 * FIXME should read only complete, valid UTF-8 characters up
3208 * to @size bytes. Invalid sequences should be replaced by a
3209 * suitable replacement character. Except when (and only
3210 * when) ring buffer lost characters since last read, initial
3211 * continuation characters should be dropped.
3213 read_data
[size
] = 0;
3214 data
= (char *)read_data
;
3220 QemuOpts
*qemu_chr_parse_compat(const char *label
, const char *filename
)
3222 char host
[65], port
[33], width
[8], height
[8];
3226 Error
*local_err
= NULL
;
3228 opts
= qemu_opts_create(qemu_find_opts("chardev"), label
, 1, &local_err
);
3230 qerror_report_err(local_err
);
3231 error_free(local_err
);
3235 if (strstart(filename
, "mon:", &p
)) {
3237 qemu_opt_set(opts
, "mux", "on");
3238 if (strcmp(filename
, "stdio") == 0) {
3239 /* Monitor is muxed to stdio: do not exit on Ctrl+C by default
3240 * but pass it to the guest. Handle this only for compat syntax,
3241 * for -chardev syntax we have special option for this.
3242 * This is what -nographic did, redirecting+muxing serial+monitor
3243 * to stdio causing Ctrl+C to be passed to guest. */
3244 qemu_opt_set(opts
, "signal", "off");
3248 if (strcmp(filename
, "null") == 0 ||
3249 strcmp(filename
, "pty") == 0 ||
3250 strcmp(filename
, "msmouse") == 0 ||
3251 strcmp(filename
, "braille") == 0 ||
3252 strcmp(filename
, "testdev") == 0 ||
3253 strcmp(filename
, "stdio") == 0) {
3254 qemu_opt_set(opts
, "backend", filename
);
3257 if (strstart(filename
, "vc", &p
)) {
3258 qemu_opt_set(opts
, "backend", "vc");
3260 if (sscanf(p
+1, "%7[0-9]x%7[0-9]", width
, height
) == 2) {
3262 qemu_opt_set(opts
, "width", width
);
3263 qemu_opt_set(opts
, "height", height
);
3264 } else if (sscanf(p
+1, "%7[0-9]Cx%7[0-9]C", width
, height
) == 2) {
3266 qemu_opt_set(opts
, "cols", width
);
3267 qemu_opt_set(opts
, "rows", height
);
3274 if (strcmp(filename
, "con:") == 0) {
3275 qemu_opt_set(opts
, "backend", "console");
3278 if (strstart(filename
, "COM", NULL
)) {
3279 qemu_opt_set(opts
, "backend", "serial");
3280 qemu_opt_set(opts
, "path", filename
);
3283 if (strstart(filename
, "file:", &p
)) {
3284 qemu_opt_set(opts
, "backend", "file");
3285 qemu_opt_set(opts
, "path", p
);
3288 if (strstart(filename
, "pipe:", &p
)) {
3289 qemu_opt_set(opts
, "backend", "pipe");
3290 qemu_opt_set(opts
, "path", p
);
3293 if (strstart(filename
, "tcp:", &p
) ||
3294 strstart(filename
, "telnet:", &p
)) {
3295 if (sscanf(p
, "%64[^:]:%32[^,]%n", host
, port
, &pos
) < 2) {
3297 if (sscanf(p
, ":%32[^,]%n", port
, &pos
) < 1)
3300 qemu_opt_set(opts
, "backend", "socket");
3301 qemu_opt_set(opts
, "host", host
);
3302 qemu_opt_set(opts
, "port", port
);
3303 if (p
[pos
] == ',') {
3304 if (qemu_opts_do_parse(opts
, p
+pos
+1, NULL
) != 0)
3307 if (strstart(filename
, "telnet:", &p
))
3308 qemu_opt_set(opts
, "telnet", "on");
3311 if (strstart(filename
, "udp:", &p
)) {
3312 qemu_opt_set(opts
, "backend", "udp");
3313 if (sscanf(p
, "%64[^:]:%32[^@,]%n", host
, port
, &pos
) < 2) {
3315 if (sscanf(p
, ":%32[^@,]%n", port
, &pos
) < 1) {
3319 qemu_opt_set(opts
, "host", host
);
3320 qemu_opt_set(opts
, "port", port
);
3321 if (p
[pos
] == '@') {
3323 if (sscanf(p
, "%64[^:]:%32[^,]%n", host
, port
, &pos
) < 2) {
3325 if (sscanf(p
, ":%32[^,]%n", port
, &pos
) < 1) {
3329 qemu_opt_set(opts
, "localaddr", host
);
3330 qemu_opt_set(opts
, "localport", port
);
3334 if (strstart(filename
, "unix:", &p
)) {
3335 qemu_opt_set(opts
, "backend", "socket");
3336 if (qemu_opts_do_parse(opts
, p
, "path") != 0)
3340 if (strstart(filename
, "/dev/parport", NULL
) ||
3341 strstart(filename
, "/dev/ppi", NULL
)) {
3342 qemu_opt_set(opts
, "backend", "parport");
3343 qemu_opt_set(opts
, "path", filename
);
3346 if (strstart(filename
, "/dev/", NULL
)) {
3347 qemu_opt_set(opts
, "backend", "tty");
3348 qemu_opt_set(opts
, "path", filename
);
3353 qemu_opts_del(opts
);
3357 static void qemu_chr_parse_file_out(QemuOpts
*opts
, ChardevBackend
*backend
,
3360 const char *path
= qemu_opt_get(opts
, "path");
3363 error_setg(errp
, "chardev: file: no filename given");
3366 backend
->file
= g_new0(ChardevFile
, 1);
3367 backend
->file
->out
= g_strdup(path
);
3370 static void qemu_chr_parse_stdio(QemuOpts
*opts
, ChardevBackend
*backend
,
3373 backend
->stdio
= g_new0(ChardevStdio
, 1);
3374 backend
->stdio
->has_signal
= true;
3375 backend
->stdio
->signal
= qemu_opt_get_bool(opts
, "signal", true);
3378 static void qemu_chr_parse_serial(QemuOpts
*opts
, ChardevBackend
*backend
,
3381 const char *device
= qemu_opt_get(opts
, "path");
3383 if (device
== NULL
) {
3384 error_setg(errp
, "chardev: serial/tty: no device path given");
3387 backend
->serial
= g_new0(ChardevHostdev
, 1);
3388 backend
->serial
->device
= g_strdup(device
);
3391 static void qemu_chr_parse_parallel(QemuOpts
*opts
, ChardevBackend
*backend
,
3394 const char *device
= qemu_opt_get(opts
, "path");
3396 if (device
== NULL
) {
3397 error_setg(errp
, "chardev: parallel: no device path given");
3400 backend
->parallel
= g_new0(ChardevHostdev
, 1);
3401 backend
->parallel
->device
= g_strdup(device
);
3404 static void qemu_chr_parse_pipe(QemuOpts
*opts
, ChardevBackend
*backend
,
3407 const char *device
= qemu_opt_get(opts
, "path");
3409 if (device
== NULL
) {
3410 error_setg(errp
, "chardev: pipe: no device path given");
3413 backend
->pipe
= g_new0(ChardevHostdev
, 1);
3414 backend
->pipe
->device
= g_strdup(device
);
3417 static void qemu_chr_parse_ringbuf(QemuOpts
*opts
, ChardevBackend
*backend
,
3422 backend
->ringbuf
= g_new0(ChardevRingbuf
, 1);
3424 val
= qemu_opt_get_size(opts
, "size", 0);
3426 backend
->ringbuf
->has_size
= true;
3427 backend
->ringbuf
->size
= val
;
3431 static void qemu_chr_parse_mux(QemuOpts
*opts
, ChardevBackend
*backend
,
3434 const char *chardev
= qemu_opt_get(opts
, "chardev");
3436 if (chardev
== NULL
) {
3437 error_setg(errp
, "chardev: mux: no chardev given");
3440 backend
->mux
= g_new0(ChardevMux
, 1);
3441 backend
->mux
->chardev
= g_strdup(chardev
);
3444 static void qemu_chr_parse_socket(QemuOpts
*opts
, ChardevBackend
*backend
,
3447 bool is_listen
= qemu_opt_get_bool(opts
, "server", false);
3448 bool is_waitconnect
= is_listen
&& qemu_opt_get_bool(opts
, "wait", true);
3449 bool is_telnet
= qemu_opt_get_bool(opts
, "telnet", false);
3450 bool do_nodelay
= !qemu_opt_get_bool(opts
, "delay", true);
3451 const char *path
= qemu_opt_get(opts
, "path");
3452 const char *host
= qemu_opt_get(opts
, "host");
3453 const char *port
= qemu_opt_get(opts
, "port");
3454 SocketAddress
*addr
;
3458 error_setg(errp
, "chardev: socket: no host given");
3462 error_setg(errp
, "chardev: socket: no port given");
3467 backend
->socket
= g_new0(ChardevSocket
, 1);
3469 backend
->socket
->has_nodelay
= true;
3470 backend
->socket
->nodelay
= do_nodelay
;
3471 backend
->socket
->has_server
= true;
3472 backend
->socket
->server
= is_listen
;
3473 backend
->socket
->has_telnet
= true;
3474 backend
->socket
->telnet
= is_telnet
;
3475 backend
->socket
->has_wait
= true;
3476 backend
->socket
->wait
= is_waitconnect
;
3478 addr
= g_new0(SocketAddress
, 1);
3480 addr
->kind
= SOCKET_ADDRESS_KIND_UNIX
;
3481 addr
->q_unix
= g_new0(UnixSocketAddress
, 1);
3482 addr
->q_unix
->path
= g_strdup(path
);
3484 addr
->kind
= SOCKET_ADDRESS_KIND_INET
;
3485 addr
->inet
= g_new0(InetSocketAddress
, 1);
3486 addr
->inet
->host
= g_strdup(host
);
3487 addr
->inet
->port
= g_strdup(port
);
3488 addr
->inet
->has_to
= qemu_opt_get(opts
, "to");
3489 addr
->inet
->to
= qemu_opt_get_number(opts
, "to", 0);
3490 addr
->inet
->has_ipv4
= qemu_opt_get(opts
, "ipv4");
3491 addr
->inet
->ipv4
= qemu_opt_get_bool(opts
, "ipv4", 0);
3492 addr
->inet
->has_ipv6
= qemu_opt_get(opts
, "ipv6");
3493 addr
->inet
->ipv6
= qemu_opt_get_bool(opts
, "ipv6", 0);
3495 backend
->socket
->addr
= addr
;
3498 static void qemu_chr_parse_udp(QemuOpts
*opts
, ChardevBackend
*backend
,
3501 const char *host
= qemu_opt_get(opts
, "host");
3502 const char *port
= qemu_opt_get(opts
, "port");
3503 const char *localaddr
= qemu_opt_get(opts
, "localaddr");
3504 const char *localport
= qemu_opt_get(opts
, "localport");
3505 bool has_local
= false;
3506 SocketAddress
*addr
;
3508 if (host
== NULL
|| strlen(host
) == 0) {
3511 if (port
== NULL
|| strlen(port
) == 0) {
3512 error_setg(errp
, "chardev: udp: remote port not specified");
3515 if (localport
== NULL
|| strlen(localport
) == 0) {
3520 if (localaddr
== NULL
|| strlen(localaddr
) == 0) {
3526 backend
->udp
= g_new0(ChardevUdp
, 1);
3528 addr
= g_new0(SocketAddress
, 1);
3529 addr
->kind
= SOCKET_ADDRESS_KIND_INET
;
3530 addr
->inet
= g_new0(InetSocketAddress
, 1);
3531 addr
->inet
->host
= g_strdup(host
);
3532 addr
->inet
->port
= g_strdup(port
);
3533 addr
->inet
->has_ipv4
= qemu_opt_get(opts
, "ipv4");
3534 addr
->inet
->ipv4
= qemu_opt_get_bool(opts
, "ipv4", 0);
3535 addr
->inet
->has_ipv6
= qemu_opt_get(opts
, "ipv6");
3536 addr
->inet
->ipv6
= qemu_opt_get_bool(opts
, "ipv6", 0);
3537 backend
->udp
->remote
= addr
;
3540 backend
->udp
->has_local
= true;
3541 addr
= g_new0(SocketAddress
, 1);
3542 addr
->kind
= SOCKET_ADDRESS_KIND_INET
;
3543 addr
->inet
= g_new0(InetSocketAddress
, 1);
3544 addr
->inet
->host
= g_strdup(localaddr
);
3545 addr
->inet
->port
= g_strdup(localport
);
3546 backend
->udp
->local
= addr
;
3550 typedef struct CharDriver
{
3552 ChardevBackendKind kind
;
3553 void (*parse
)(QemuOpts
*opts
, ChardevBackend
*backend
, Error
**errp
);
3556 static GSList
*backends
;
3558 void register_char_driver(const char *name
, ChardevBackendKind kind
,
3559 void (*parse
)(QemuOpts
*opts
, ChardevBackend
*backend
, Error
**errp
))
3563 s
= g_malloc0(sizeof(*s
));
3564 s
->name
= g_strdup(name
);
3568 backends
= g_slist_append(backends
, s
);
3571 CharDriverState
*qemu_chr_new_from_opts(QemuOpts
*opts
,
3572 void (*init
)(struct CharDriverState
*s
),
3575 Error
*local_err
= NULL
;
3577 CharDriverState
*chr
;
3579 ChardevReturn
*ret
= NULL
;
3580 ChardevBackend
*backend
;
3581 const char *id
= qemu_opts_id(opts
);
3585 error_setg(errp
, "chardev: no id specified");
3589 if (qemu_opt_get(opts
, "backend") == NULL
) {
3590 error_setg(errp
, "chardev: \"%s\" missing backend",
3591 qemu_opts_id(opts
));
3594 for (i
= backends
; i
; i
= i
->next
) {
3597 if (strcmp(cd
->name
, qemu_opt_get(opts
, "backend")) == 0) {
3602 error_setg(errp
, "chardev: backend \"%s\" not found",
3603 qemu_opt_get(opts
, "backend"));
3607 backend
= g_new0(ChardevBackend
, 1);
3609 if (qemu_opt_get_bool(opts
, "mux", 0)) {
3610 bid
= g_strdup_printf("%s-base", id
);
3614 backend
->kind
= cd
->kind
;
3616 cd
->parse(opts
, backend
, &local_err
);
3618 error_propagate(errp
, local_err
);
3622 ret
= qmp_chardev_add(bid
? bid
: id
, backend
, errp
);
3628 qapi_free_ChardevBackend(backend
);
3629 qapi_free_ChardevReturn(ret
);
3630 backend
= g_new0(ChardevBackend
, 1);
3631 backend
->mux
= g_new0(ChardevMux
, 1);
3632 backend
->kind
= CHARDEV_BACKEND_KIND_MUX
;
3633 backend
->mux
->chardev
= g_strdup(bid
);
3634 ret
= qmp_chardev_add(id
, backend
, errp
);
3636 chr
= qemu_chr_find(bid
);
3637 qemu_chr_delete(chr
);
3643 chr
= qemu_chr_find(id
);
3647 qapi_free_ChardevBackend(backend
);
3648 qapi_free_ChardevReturn(ret
);
3653 qemu_opts_del(opts
);
3657 CharDriverState
*qemu_chr_new(const char *label
, const char *filename
, void (*init
)(struct CharDriverState
*s
))
3660 CharDriverState
*chr
;
3664 if (strstart(filename
, "chardev:", &p
)) {
3665 return qemu_chr_find(p
);
3668 opts
= qemu_chr_parse_compat(label
, filename
);
3672 chr
= qemu_chr_new_from_opts(opts
, init
, &err
);
3674 error_report("%s", error_get_pretty(err
));
3677 if (chr
&& qemu_opt_get_bool(opts
, "mux", 0)) {
3678 qemu_chr_fe_claim_no_fail(chr
);
3679 monitor_init(chr
, MONITOR_USE_READLINE
);
3684 void qemu_chr_fe_set_echo(struct CharDriverState
*chr
, bool echo
)
3686 if (chr
->chr_set_echo
) {
3687 chr
->chr_set_echo(chr
, echo
);
3691 void qemu_chr_fe_set_open(struct CharDriverState
*chr
, int fe_open
)
3693 if (chr
->fe_open
== fe_open
) {
3696 chr
->fe_open
= fe_open
;
3697 if (chr
->chr_set_fe_open
) {
3698 chr
->chr_set_fe_open(chr
, fe_open
);
3702 void qemu_chr_fe_event(struct CharDriverState
*chr
, int event
)
3704 if (chr
->chr_fe_event
) {
3705 chr
->chr_fe_event(chr
, event
);
3709 int qemu_chr_fe_add_watch(CharDriverState
*s
, GIOCondition cond
,
3710 GIOFunc func
, void *user_data
)
3715 if (s
->chr_add_watch
== NULL
) {
3719 src
= s
->chr_add_watch(s
, cond
);
3724 g_source_set_callback(src
, (GSourceFunc
)func
, user_data
, NULL
);
3725 tag
= g_source_attach(src
, NULL
);
3726 g_source_unref(src
);
3731 int qemu_chr_fe_claim(CharDriverState
*s
)
3733 if (s
->avail_connections
< 1) {
3736 s
->avail_connections
--;
3740 void qemu_chr_fe_claim_no_fail(CharDriverState
*s
)
3742 if (qemu_chr_fe_claim(s
) != 0) {
3743 fprintf(stderr
, "%s: error chardev \"%s\" already used\n",
3744 __func__
, s
->label
);
3749 void qemu_chr_fe_release(CharDriverState
*s
)
3751 s
->avail_connections
++;
3754 void qemu_chr_delete(CharDriverState
*chr
)
3756 QTAILQ_REMOVE(&chardevs
, chr
, next
);
3757 if (chr
->chr_close
) {
3758 chr
->chr_close(chr
);
3760 g_free(chr
->filename
);
3763 qemu_opts_del(chr
->opts
);
3768 ChardevInfoList
*qmp_query_chardev(Error
**errp
)
3770 ChardevInfoList
*chr_list
= NULL
;
3771 CharDriverState
*chr
;
3773 QTAILQ_FOREACH(chr
, &chardevs
, next
) {
3774 ChardevInfoList
*info
= g_malloc0(sizeof(*info
));
3775 info
->value
= g_malloc0(sizeof(*info
->value
));
3776 info
->value
->label
= g_strdup(chr
->label
);
3777 info
->value
->filename
= g_strdup(chr
->filename
);
3778 info
->value
->frontend_open
= chr
->fe_open
;
3780 info
->next
= chr_list
;
3787 ChardevBackendInfoList
*qmp_query_chardev_backends(Error
**errp
)
3789 ChardevBackendInfoList
*backend_list
= NULL
;
3790 CharDriver
*c
= NULL
;
3793 for (i
= backends
; i
; i
= i
->next
) {
3794 ChardevBackendInfoList
*info
= g_malloc0(sizeof(*info
));
3796 info
->value
= g_malloc0(sizeof(*info
->value
));
3797 info
->value
->name
= g_strdup(c
->name
);
3799 info
->next
= backend_list
;
3800 backend_list
= info
;
3803 return backend_list
;
3806 CharDriverState
*qemu_chr_find(const char *name
)
3808 CharDriverState
*chr
;
3810 QTAILQ_FOREACH(chr
, &chardevs
, next
) {
3811 if (strcmp(chr
->label
, name
) != 0)
3818 /* Get a character (serial) device interface. */
3819 CharDriverState
*qemu_char_get_next_serial(void)
3821 static int next_serial
;
3822 CharDriverState
*chr
;
3824 /* FIXME: This function needs to go away: use chardev properties! */
3826 while (next_serial
< MAX_SERIAL_PORTS
&& serial_hds
[next_serial
]) {
3827 chr
= serial_hds
[next_serial
++];
3828 qemu_chr_fe_claim_no_fail(chr
);
3834 QemuOptsList qemu_chardev_opts
= {
3836 .implied_opt_name
= "backend",
3837 .head
= QTAILQ_HEAD_INITIALIZER(qemu_chardev_opts
.head
),
3841 .type
= QEMU_OPT_STRING
,
3844 .type
= QEMU_OPT_STRING
,
3847 .type
= QEMU_OPT_STRING
,
3850 .type
= QEMU_OPT_STRING
,
3852 .name
= "localaddr",
3853 .type
= QEMU_OPT_STRING
,
3855 .name
= "localport",
3856 .type
= QEMU_OPT_STRING
,
3859 .type
= QEMU_OPT_NUMBER
,
3862 .type
= QEMU_OPT_BOOL
,
3865 .type
= QEMU_OPT_BOOL
,
3868 .type
= QEMU_OPT_BOOL
,
3871 .type
= QEMU_OPT_BOOL
,
3874 .type
= QEMU_OPT_BOOL
,
3877 .type
= QEMU_OPT_BOOL
,
3880 .type
= QEMU_OPT_NUMBER
,
3883 .type
= QEMU_OPT_NUMBER
,
3886 .type
= QEMU_OPT_NUMBER
,
3889 .type
= QEMU_OPT_NUMBER
,
3892 .type
= QEMU_OPT_BOOL
,
3895 .type
= QEMU_OPT_BOOL
,
3898 .type
= QEMU_OPT_STRING
,
3901 .type
= QEMU_OPT_NUMBER
,
3904 .type
= QEMU_OPT_SIZE
,
3907 .type
= QEMU_OPT_STRING
,
3909 { /* end of list */ }
3915 static CharDriverState
*qmp_chardev_open_file(ChardevFile
*file
, Error
**errp
)
3920 error_setg(errp
, "input file not supported");
3924 out
= CreateFile(file
->out
, GENERIC_WRITE
, FILE_SHARE_READ
, NULL
,
3925 OPEN_ALWAYS
, FILE_ATTRIBUTE_NORMAL
, NULL
);
3926 if (out
== INVALID_HANDLE_VALUE
) {
3927 error_setg(errp
, "open %s failed", file
->out
);
3930 return qemu_chr_open_win_file(out
);
3933 static CharDriverState
*qmp_chardev_open_serial(ChardevHostdev
*serial
,
3936 return qemu_chr_open_win_path(serial
->device
);
3939 static CharDriverState
*qmp_chardev_open_parallel(ChardevHostdev
*parallel
,
3942 error_setg(errp
, "character device backend type 'parallel' not supported");
3948 static int qmp_chardev_open_file_source(char *src
, int flags
,
3953 TFR(fd
= qemu_open(src
, flags
, 0666));
3955 error_setg_file_open(errp
, errno
, src
);
3960 static CharDriverState
*qmp_chardev_open_file(ChardevFile
*file
, Error
**errp
)
3962 int flags
, in
= -1, out
;
3964 flags
= O_WRONLY
| O_TRUNC
| O_CREAT
| O_BINARY
;
3965 out
= qmp_chardev_open_file_source(file
->out
, flags
, errp
);
3972 in
= qmp_chardev_open_file_source(file
->in
, flags
, errp
);
3979 return qemu_chr_open_fd(in
, out
);
3982 static CharDriverState
*qmp_chardev_open_serial(ChardevHostdev
*serial
,
3985 #ifdef HAVE_CHARDEV_TTY
3988 fd
= qmp_chardev_open_file_source(serial
->device
, O_RDWR
, errp
);
3992 qemu_set_nonblock(fd
);
3993 return qemu_chr_open_tty_fd(fd
);
3995 error_setg(errp
, "character device backend type 'serial' not supported");
4000 static CharDriverState
*qmp_chardev_open_parallel(ChardevHostdev
*parallel
,
4003 #ifdef HAVE_CHARDEV_PARPORT
4006 fd
= qmp_chardev_open_file_source(parallel
->device
, O_RDWR
, errp
);
4010 return qemu_chr_open_pp_fd(fd
);
4012 error_setg(errp
, "character device backend type 'parallel' not supported");
4019 static CharDriverState
*qmp_chardev_open_socket(ChardevSocket
*sock
,
4022 CharDriverState
*chr
;
4024 SocketAddress
*addr
= sock
->addr
;
4025 bool do_nodelay
= sock
->has_nodelay
? sock
->nodelay
: false;
4026 bool is_listen
= sock
->has_server
? sock
->server
: true;
4027 bool is_telnet
= sock
->has_telnet
? sock
->telnet
: false;
4028 bool is_waitconnect
= sock
->has_wait
? sock
->wait
: false;
4030 chr
= qemu_chr_alloc();
4031 s
= g_malloc0(sizeof(TCPCharDriver
));
4035 s
->is_unix
= addr
->kind
== SOCKET_ADDRESS_KIND_UNIX
;
4036 s
->is_listen
= is_listen
;
4037 s
->is_telnet
= is_telnet
;
4038 s
->do_nodelay
= do_nodelay
;
4039 qapi_copy_SocketAddress(&s
->addr
, sock
->addr
);
4042 chr
->chr_write
= tcp_chr_write
;
4043 chr
->chr_sync_read
= tcp_chr_sync_read
;
4044 chr
->chr_close
= tcp_chr_close
;
4045 chr
->get_msgfds
= tcp_get_msgfds
;
4046 chr
->set_msgfds
= tcp_set_msgfds
;
4047 chr
->chr_add_client
= tcp_chr_add_client
;
4048 chr
->chr_add_watch
= tcp_chr_add_watch
;
4049 chr
->chr_update_read_handler
= tcp_chr_update_read_handler
;
4050 /* be isn't opened until we get a connection */
4051 chr
->explicit_be_open
= true;
4053 chr
->filename
= g_malloc(CHR_MAX_FILENAME_SIZE
);
4054 SocketAddress_to_str(chr
->filename
, CHR_MAX_FILENAME_SIZE
, "disconnected:",
4055 addr
, is_listen
, is_telnet
);
4059 s
->do_telnetopt
= 1;
4063 if (!qemu_chr_open_socket_fd(chr
, errp
)) {
4065 g_free(chr
->filename
);
4070 if (is_listen
&& is_waitconnect
) {
4071 fprintf(stderr
, "QEMU waiting for connection on: %s\n",
4073 tcp_chr_accept(s
->listen_chan
, G_IO_IN
, chr
);
4074 qemu_set_nonblock(s
->listen_fd
);
4080 static CharDriverState
*qmp_chardev_open_udp(ChardevUdp
*udp
,
4085 fd
= socket_dgram(udp
->remote
, udp
->local
, errp
);
4089 return qemu_chr_open_udp_fd(fd
);
4092 ChardevReturn
*qmp_chardev_add(const char *id
, ChardevBackend
*backend
,
4095 ChardevReturn
*ret
= g_new0(ChardevReturn
, 1);
4096 CharDriverState
*base
, *chr
= NULL
;
4098 chr
= qemu_chr_find(id
);
4100 error_setg(errp
, "Chardev '%s' already exists", id
);
4105 switch (backend
->kind
) {
4106 case CHARDEV_BACKEND_KIND_FILE
:
4107 chr
= qmp_chardev_open_file(backend
->file
, errp
);
4109 case CHARDEV_BACKEND_KIND_SERIAL
:
4110 chr
= qmp_chardev_open_serial(backend
->serial
, errp
);
4112 case CHARDEV_BACKEND_KIND_PARALLEL
:
4113 chr
= qmp_chardev_open_parallel(backend
->parallel
, errp
);
4115 case CHARDEV_BACKEND_KIND_PIPE
:
4116 chr
= qemu_chr_open_pipe(backend
->pipe
);
4118 case CHARDEV_BACKEND_KIND_SOCKET
:
4119 chr
= qmp_chardev_open_socket(backend
->socket
, errp
);
4121 case CHARDEV_BACKEND_KIND_UDP
:
4122 chr
= qmp_chardev_open_udp(backend
->udp
, errp
);
4124 #ifdef HAVE_CHARDEV_TTY
4125 case CHARDEV_BACKEND_KIND_PTY
:
4126 chr
= qemu_chr_open_pty(id
, ret
);
4129 case CHARDEV_BACKEND_KIND_NULL
:
4130 chr
= qemu_chr_open_null();
4132 case CHARDEV_BACKEND_KIND_MUX
:
4133 base
= qemu_chr_find(backend
->mux
->chardev
);
4135 error_setg(errp
, "mux: base chardev %s not found",
4136 backend
->mux
->chardev
);
4139 chr
= qemu_chr_open_mux(base
);
4141 case CHARDEV_BACKEND_KIND_MSMOUSE
:
4142 chr
= qemu_chr_open_msmouse();
4144 #ifdef CONFIG_BRLAPI
4145 case CHARDEV_BACKEND_KIND_BRAILLE
:
4146 chr
= chr_baum_init();
4149 case CHARDEV_BACKEND_KIND_TESTDEV
:
4150 chr
= chr_testdev_init();
4152 case CHARDEV_BACKEND_KIND_STDIO
:
4153 chr
= qemu_chr_open_stdio(backend
->stdio
);
4156 case CHARDEV_BACKEND_KIND_CONSOLE
:
4157 chr
= qemu_chr_open_win_con();
4161 case CHARDEV_BACKEND_KIND_SPICEVMC
:
4162 chr
= qemu_chr_open_spice_vmc(backend
->spicevmc
->type
);
4164 case CHARDEV_BACKEND_KIND_SPICEPORT
:
4165 chr
= qemu_chr_open_spice_port(backend
->spiceport
->fqdn
);
4168 case CHARDEV_BACKEND_KIND_VC
:
4169 chr
= vc_init(backend
->vc
);
4171 case CHARDEV_BACKEND_KIND_RINGBUF
:
4172 case CHARDEV_BACKEND_KIND_MEMORY
:
4173 chr
= qemu_chr_open_ringbuf(backend
->ringbuf
, errp
);
4176 error_setg(errp
, "unknown chardev backend (%d)", backend
->kind
);
4181 * Character backend open hasn't been fully converted to the Error
4182 * API. Some opens fail without setting an error. Set a generic
4184 * TODO full conversion to Error API
4186 if (chr
== NULL
&& errp
&& !*errp
) {
4187 error_setg(errp
, "Failed to create chardev");
4190 chr
->label
= g_strdup(id
);
4191 chr
->avail_connections
=
4192 (backend
->kind
== CHARDEV_BACKEND_KIND_MUX
) ? MAX_MUX
: 1;
4193 if (!chr
->filename
) {
4194 chr
->filename
= g_strdup(ChardevBackendKind_lookup
[backend
->kind
]);
4196 if (!chr
->explicit_be_open
) {
4197 qemu_chr_be_event(chr
, CHR_EVENT_OPENED
);
4199 QTAILQ_INSERT_TAIL(&chardevs
, chr
, next
);
4207 void qmp_chardev_remove(const char *id
, Error
**errp
)
4209 CharDriverState
*chr
;
4211 chr
= qemu_chr_find(id
);
4213 error_setg(errp
, "Chardev '%s' not found", id
);
4216 if (chr
->chr_can_read
|| chr
->chr_read
||
4217 chr
->chr_event
|| chr
->handler_opaque
) {
4218 error_setg(errp
, "Chardev '%s' is busy", id
);
4221 qemu_chr_delete(chr
);
4224 static void register_types(void)
4226 register_char_driver("null", CHARDEV_BACKEND_KIND_NULL
, NULL
);
4227 register_char_driver("socket", CHARDEV_BACKEND_KIND_SOCKET
,
4228 qemu_chr_parse_socket
);
4229 register_char_driver("udp", CHARDEV_BACKEND_KIND_UDP
, qemu_chr_parse_udp
);
4230 register_char_driver("ringbuf", CHARDEV_BACKEND_KIND_RINGBUF
,
4231 qemu_chr_parse_ringbuf
);
4232 register_char_driver("file", CHARDEV_BACKEND_KIND_FILE
,
4233 qemu_chr_parse_file_out
);
4234 register_char_driver("stdio", CHARDEV_BACKEND_KIND_STDIO
,
4235 qemu_chr_parse_stdio
);
4236 register_char_driver("serial", CHARDEV_BACKEND_KIND_SERIAL
,
4237 qemu_chr_parse_serial
);
4238 register_char_driver("tty", CHARDEV_BACKEND_KIND_SERIAL
,
4239 qemu_chr_parse_serial
);
4240 register_char_driver("parallel", CHARDEV_BACKEND_KIND_PARALLEL
,
4241 qemu_chr_parse_parallel
);
4242 register_char_driver("parport", CHARDEV_BACKEND_KIND_PARALLEL
,
4243 qemu_chr_parse_parallel
);
4244 register_char_driver("pty", CHARDEV_BACKEND_KIND_PTY
, NULL
);
4245 register_char_driver("console", CHARDEV_BACKEND_KIND_CONSOLE
, NULL
);
4246 register_char_driver("pipe", CHARDEV_BACKEND_KIND_PIPE
,
4247 qemu_chr_parse_pipe
);
4248 register_char_driver("mux", CHARDEV_BACKEND_KIND_MUX
, qemu_chr_parse_mux
);
4249 /* Bug-compatibility: */
4250 register_char_driver("memory", CHARDEV_BACKEND_KIND_MEMORY
,
4251 qemu_chr_parse_ringbuf
);
4252 /* this must be done after machine init, since we register FEs with muxes
4253 * as part of realize functions like serial_isa_realizefn when -nographic
4256 qemu_add_machine_init_done_notifier(&muxes_realize_notify
);
4259 type_init(register_types
);