]> git.proxmox.com Git - mirror_qemu.git/blame - chardev/char.c
char: make null_chr_write() the default method
[mirror_qemu.git] / chardev / char.c
CommitLineData
6f97dba0
AL
1/*
2 * QEMU System Emulator
3 *
4 * Copyright (c) 2003-2008 Fabrice Bellard
5 *
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:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
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
22 * THE SOFTWARE.
23 */
d38ea87a 24#include "qemu/osdep.h"
6f97dba0 25#include "qemu-common.h"
f348b6d1 26#include "qemu/cutils.h"
83c9089e 27#include "monitor/monitor.h"
9c17d615 28#include "sysemu/sysemu.h"
da31d594 29#include "sysemu/block-backend.h"
d49b6836 30#include "qemu/error-report.h"
1de7afc9 31#include "qemu/timer.h"
dccfcd0e 32#include "sysemu/char.h"
cf3ebac7 33#include "hw/usb.h"
c5a415a0 34#include "qmp-commands.h"
37f9e0a2 35#include "qapi/clone-visitor.h"
cfb429cb 36#include "qapi-visit.h"
e9cf2fe0 37#include "qemu/base64.h"
9894dc0c
DB
38#include "io/channel-socket.h"
39#include "io/channel-file.h"
a8fb5427 40#include "io/channel-tls.h"
33577b47 41#include "sysemu/replay.h"
517b3d40 42#include "qemu/help_option.h"
6f97dba0 43
6f97dba0
AL
44#include <zlib.h>
45
46#ifndef _WIN32
47#include <sys/times.h>
48#include <sys/wait.h>
49#include <termios.h>
6f97dba0 50#include <sys/ioctl.h>
24646c7e 51#include <sys/resource.h>
6f97dba0
AL
52#include <sys/socket.h>
53#include <netinet/in.h>
24646c7e 54#include <net/if.h>
24646c7e 55#include <arpa/inet.h>
6f97dba0
AL
56#include <netdb.h>
57#include <sys/select.h>
71e72a19 58#ifdef CONFIG_BSD
3294ce18
MT
59#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
60#include <dev/ppbus/ppi.h>
61#include <dev/ppbus/ppbconf.h>
c5e97233 62#elif defined(__DragonFly__)
c5e97233
BS
63#include <dev/misc/ppi/ppi.h>
64#include <bus/ppbus/ppbconf.h>
6f97dba0 65#endif
bbe813a2 66#else
6f97dba0 67#ifdef __linux__
6f97dba0
AL
68#include <linux/ppdev.h>
69#include <linux/parport.h>
70#endif
71#ifdef __sun__
6f97dba0
AL
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>
6f97dba0
AL
81#endif
82#endif
83#endif
84
1de7afc9 85#include "qemu/sockets.h"
cbcc6336 86#include "ui/qemu-spice.h"
6f97dba0 87
9bd7854e 88#define READ_BUF_LEN 4096
7b0bfdf5 89#define READ_RETRIES 10
c4095726 90#define TCP_MAX_FDS 16
9bd7854e 91
0ec7b3e7 92typedef struct MuxChardev MuxChardev;
6dfa8298 93
cfb429cb
CM
94/***********************************************************/
95/* Socket address helpers */
cfb429cb 96
0ff0fad2
DB
97static char *SocketAddress_to_str(const char *prefix, SocketAddress *addr,
98 bool is_listen, bool is_telnet)
16cc4ffe 99{
130257dc 100 switch (addr->type) {
16cc4ffe 101 case SOCKET_ADDRESS_KIND_INET:
0ff0fad2 102 return g_strdup_printf("%s%s:%s:%s%s", prefix,
32bafa8f
EB
103 is_telnet ? "telnet" : "tcp",
104 addr->u.inet.data->host,
105 addr->u.inet.data->port,
106 is_listen ? ",server" : "");
16cc4ffe
CM
107 break;
108 case SOCKET_ADDRESS_KIND_UNIX:
0ff0fad2 109 return g_strdup_printf("%sunix:%s%s", prefix,
32bafa8f 110 addr->u.q_unix.data->path,
0ff0fad2 111 is_listen ? ",server" : "");
16cc4ffe
CM
112 break;
113 case SOCKET_ADDRESS_KIND_FD:
32bafa8f 114 return g_strdup_printf("%sfd:%s%s", prefix, addr->u.fd.data->str,
0ff0fad2 115 is_listen ? ",server" : "");
16cc4ffe
CM
116 break;
117 default:
118 abort();
119 }
120}
121
0ff0fad2
DB
122static char *sockaddr_to_str(struct sockaddr_storage *ss, socklen_t ss_len,
123 struct sockaddr_storage *ps, socklen_t ps_len,
124 bool is_listen, bool is_telnet)
16cc4ffe 125{
01ca519f
CM
126 char shost[NI_MAXHOST], sserv[NI_MAXSERV];
127 char phost[NI_MAXHOST], pserv[NI_MAXSERV];
16cc4ffe
CM
128 const char *left = "", *right = "";
129
130 switch (ss->ss_family) {
131#ifndef _WIN32
132 case AF_UNIX:
0ff0fad2
DB
133 return g_strdup_printf("unix:%s%s",
134 ((struct sockaddr_un *)(ss))->sun_path,
135 is_listen ? ",server" : "");
16cc4ffe
CM
136#endif
137 case AF_INET6:
138 left = "[";
139 right = "]";
140 /* fall through */
141 case AF_INET:
01ca519f
CM
142 getnameinfo((struct sockaddr *) ss, ss_len, shost, sizeof(shost),
143 sserv, sizeof(sserv), NI_NUMERICHOST | NI_NUMERICSERV);
144 getnameinfo((struct sockaddr *) ps, ps_len, phost, sizeof(phost),
145 pserv, sizeof(pserv), NI_NUMERICHOST | NI_NUMERICSERV);
0ff0fad2
DB
146 return g_strdup_printf("%s:%s%s%s:%s%s <-> %s%s%s:%s",
147 is_telnet ? "telnet" : "tcp",
148 left, shost, right, sserv,
149 is_listen ? ",server" : "",
150 left, phost, right, pserv);
16cc4ffe
CM
151
152 default:
0ff0fad2 153 return g_strdup_printf("unknown");
16cc4ffe
CM
154 }
155}
156
6f97dba0
AL
157/***********************************************************/
158/* character device */
159
0ec7b3e7 160static QTAILQ_HEAD(ChardevHead, Chardev) chardevs =
72cf2d4f 161 QTAILQ_HEAD_INITIALIZER(chardevs);
2970a6c9 162
0ec7b3e7 163void qemu_chr_be_event(Chardev *s, int event)
6f97dba0 164{
a4afa548
MAL
165 CharBackend *be = s->be;
166
73cdf3f2
AG
167 /* Keep track if the char device is open */
168 switch (event) {
169 case CHR_EVENT_OPENED:
16665b94 170 s->be_open = 1;
73cdf3f2
AG
171 break;
172 case CHR_EVENT_CLOSED:
16665b94 173 s->be_open = 0;
73cdf3f2
AG
174 break;
175 }
176
a4afa548 177 if (!be || !be->chr_event) {
6f97dba0 178 return;
a4afa548
MAL
179 }
180
181 be->chr_event(be->opaque, event);
6f97dba0
AL
182}
183
0ec7b3e7 184void qemu_chr_be_generic_open(Chardev *s)
6f97dba0 185{
bd5c51ee 186 qemu_chr_be_event(s, CHR_EVENT_OPENED);
6f97dba0
AL
187}
188
d0d7708b
DB
189
190/* Not reporting errors from writing to logfile, as logs are
191 * defined to be "best effort" only */
0ec7b3e7 192static void qemu_chr_fe_write_log(Chardev *s,
d0d7708b
DB
193 const uint8_t *buf, size_t len)
194{
195 size_t done = 0;
196 ssize_t ret;
197
198 if (s->logfd < 0) {
199 return;
200 }
201
202 while (done < len) {
53628efb
DB
203 retry:
204 ret = write(s->logfd, buf + done, len - done);
205 if (ret == -1 && errno == EAGAIN) {
206 g_usleep(100);
207 goto retry;
208 }
d0d7708b
DB
209
210 if (ret <= 0) {
211 return;
212 }
213 done += ret;
214 }
215}
216
0ec7b3e7
MAL
217static int qemu_chr_fe_write_buffer(Chardev *s,
218 const uint8_t *buf, int len, int *offset)
33577b47 219{
777357d7 220 ChardevClass *cc = CHARDEV_GET_CLASS(s);
33577b47
PD
221 int res = 0;
222 *offset = 0;
223
224 qemu_mutex_lock(&s->chr_write_lock);
225 while (*offset < len) {
53628efb 226 retry:
777357d7 227 res = cc->chr_write(s, buf + *offset, len - *offset);
53628efb
DB
228 if (res < 0 && errno == EAGAIN) {
229 g_usleep(100);
230 goto retry;
231 }
33577b47
PD
232
233 if (res <= 0) {
234 break;
235 }
236
237 *offset += res;
238 }
239 if (*offset > 0) {
240 qemu_chr_fe_write_log(s, buf, *offset);
241 }
242 qemu_mutex_unlock(&s->chr_write_lock);
243
244 return res;
245}
246
0ec7b3e7 247static bool qemu_chr_replay(Chardev *chr)
5ebd6703
MAL
248{
249 return qemu_chr_has_feature(chr, QEMU_CHAR_FEATURE_REPLAY);
250}
251
5345fdb4 252int qemu_chr_fe_write(CharBackend *be, const uint8_t *buf, int len)
6f97dba0 253{
0ec7b3e7 254 Chardev *s = be->chr;
777357d7 255 ChardevClass *cc;
9005b2a7
PB
256 int ret;
257
fa394ed6
MAL
258 if (!s) {
259 return 0;
260 }
261
5ebd6703 262 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_PLAY) {
33577b47
PD
263 int offset;
264 replay_char_write_event_load(&ret, &offset);
265 assert(offset <= len);
266 qemu_chr_fe_write_buffer(s, buf, offset, &offset);
267 return ret;
268 }
269
777357d7 270 cc = CHARDEV_GET_CLASS(s);
9005b2a7 271 qemu_mutex_lock(&s->chr_write_lock);
777357d7 272 ret = cc->chr_write(s, buf, len);
d0d7708b
DB
273
274 if (ret > 0) {
275 qemu_chr_fe_write_log(s, buf, ret);
276 }
277
9005b2a7 278 qemu_mutex_unlock(&s->chr_write_lock);
33577b47 279
5ebd6703 280 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_RECORD) {
33577b47
PD
281 replay_char_write_event_save(ret, ret < 0 ? 0 : ret);
282 }
283
9005b2a7 284 return ret;
6f97dba0
AL
285}
286
0ec7b3e7 287static int qemu_chr_write_all(Chardev *s, const uint8_t *buf, int len)
cd18720a 288{
33577b47
PD
289 int offset;
290 int res;
cd18720a 291
5ebd6703 292 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_PLAY) {
33577b47
PD
293 replay_char_write_event_load(&res, &offset);
294 assert(offset <= len);
295 qemu_chr_fe_write_buffer(s, buf, offset, &offset);
296 return res;
297 }
cd18720a 298
33577b47 299 res = qemu_chr_fe_write_buffer(s, buf, len, &offset);
cd18720a 300
5ebd6703 301 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_RECORD) {
33577b47 302 replay_char_write_event_save(res, offset);
cd18720a
AL
303 }
304
9005b2a7
PB
305 if (res < 0) {
306 return res;
307 }
cd18720a
AL
308 return offset;
309}
310
5345fdb4 311int qemu_chr_fe_write_all(CharBackend *be, const uint8_t *buf, int len)
7b0bfdf5 312{
0ec7b3e7 313 Chardev *s = be->chr;
5345fdb4 314
fa394ed6
MAL
315 if (!s) {
316 return 0;
317 }
318
5345fdb4
MAL
319 return qemu_chr_write_all(s, buf, len);
320}
321
322int qemu_chr_fe_read_all(CharBackend *be, uint8_t *buf, int len)
323{
0ec7b3e7 324 Chardev *s = be->chr;
7b0bfdf5
NN
325 int offset = 0, counter = 10;
326 int res;
327
777357d7 328 if (!s || !CHARDEV_GET_CLASS(s)->chr_sync_read) {
7b0bfdf5
NN
329 return 0;
330 }
fa394ed6 331
5ebd6703 332 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_PLAY) {
33577b47
PD
333 return replay_char_read_all_load(buf);
334 }
7b0bfdf5
NN
335
336 while (offset < len) {
53628efb 337 retry:
777357d7
MAL
338 res = CHARDEV_GET_CLASS(s)->chr_sync_read(s, buf + offset,
339 len - offset);
53628efb
DB
340 if (res == -1 && errno == EAGAIN) {
341 g_usleep(100);
342 goto retry;
343 }
7b0bfdf5
NN
344
345 if (res == 0) {
346 break;
347 }
348
349 if (res < 0) {
5ebd6703 350 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_RECORD) {
33577b47
PD
351 replay_char_read_all_save_error(res);
352 }
7b0bfdf5
NN
353 return res;
354 }
355
356 offset += res;
357
358 if (!counter--) {
359 break;
360 }
361 }
362
5ebd6703 363 if (qemu_chr_replay(s) && replay_mode == REPLAY_MODE_RECORD) {
33577b47
PD
364 replay_char_read_all_save_buf(buf, offset);
365 }
7b0bfdf5
NN
366 return offset;
367}
368
5345fdb4 369int qemu_chr_fe_ioctl(CharBackend *be, int cmd, void *arg)
6f97dba0 370{
0ec7b3e7 371 Chardev *s = be->chr;
33577b47 372 int res;
fa394ed6 373
777357d7 374 if (!s || !CHARDEV_GET_CLASS(s)->chr_ioctl || qemu_chr_replay(s)) {
33577b47
PD
375 res = -ENOTSUP;
376 } else {
777357d7 377 res = CHARDEV_GET_CLASS(s)->chr_ioctl(s, cmd, arg);
33577b47
PD
378 }
379
380 return res;
6f97dba0
AL
381}
382
0ec7b3e7 383int qemu_chr_be_can_write(Chardev *s)
6f97dba0 384{
a4afa548
MAL
385 CharBackend *be = s->be;
386
387 if (!be || !be->chr_can_read) {
6f97dba0 388 return 0;
a4afa548
MAL
389 }
390
391 return be->chr_can_read(be->opaque);
6f97dba0
AL
392}
393
0ec7b3e7 394void qemu_chr_be_write_impl(Chardev *s, uint8_t *buf, int len)
6f97dba0 395{
a4afa548
MAL
396 CharBackend *be = s->be;
397
398 if (be && be->chr_read) {
399 be->chr_read(be->opaque, buf, len);
ac310734 400 }
6f97dba0
AL
401}
402
0ec7b3e7 403void qemu_chr_be_write(Chardev *s, uint8_t *buf, int len)
33577b47 404{
5ebd6703 405 if (qemu_chr_replay(s)) {
33577b47
PD
406 if (replay_mode == REPLAY_MODE_PLAY) {
407 return;
408 }
409 replay_chr_be_write(s, buf, len);
410 } else {
411 qemu_chr_be_write_impl(s, buf, len);
412 }
413}
414
5345fdb4 415int qemu_chr_fe_get_msgfd(CharBackend *be)
7d174059 416{
0ec7b3e7 417 Chardev *s = be->chr;
c76bf6bb 418 int fd;
5345fdb4 419 int res = (qemu_chr_fe_get_msgfds(be, &fd, 1) == 1) ? fd : -1;
5ebd6703 420 if (s && qemu_chr_replay(s)) {
776a32a0
MAL
421 error_report("Replay: get msgfd is not supported "
422 "for serial devices yet");
33577b47
PD
423 exit(1);
424 }
425 return res;
c76bf6bb
NN
426}
427
5345fdb4 428int qemu_chr_fe_get_msgfds(CharBackend *be, int *fds, int len)
c76bf6bb 429{
0ec7b3e7 430 Chardev *s = be->chr;
5345fdb4 431
fa394ed6
MAL
432 if (!s) {
433 return -1;
434 }
435
777357d7
MAL
436 return CHARDEV_GET_CLASS(s)->get_msgfds ?
437 CHARDEV_GET_CLASS(s)->get_msgfds(s, fds, len) : -1;
7d174059
MM
438}
439
5345fdb4 440int qemu_chr_fe_set_msgfds(CharBackend *be, int *fds, int num)
d39aac7a 441{
0ec7b3e7 442 Chardev *s = be->chr;
5345fdb4 443
fa394ed6
MAL
444 if (!s) {
445 return -1;
446 }
447
777357d7
MAL
448 return CHARDEV_GET_CLASS(s)->set_msgfds ?
449 CHARDEV_GET_CLASS(s)->set_msgfds(s, fds, num) : -1;
d39aac7a
NN
450}
451
0ec7b3e7 452int qemu_chr_add_client(Chardev *s, int fd)
13661089 453{
777357d7
MAL
454 return CHARDEV_GET_CLASS(s)->chr_add_client ?
455 CHARDEV_GET_CLASS(s)->chr_add_client(s, fd) : -1;
13661089
DB
456}
457
5345fdb4 458void qemu_chr_fe_accept_input(CharBackend *be)
6f97dba0 459{
0ec7b3e7 460 Chardev *s = be->chr;
5345fdb4 461
fa394ed6
MAL
462 if (!s) {
463 return;
464 }
465
777357d7
MAL
466 if (CHARDEV_GET_CLASS(s)->chr_accept_input) {
467 CHARDEV_GET_CLASS(s)->chr_accept_input(s);
b68e956a 468 }
98c8ee1d 469 qemu_notify_event();
6f97dba0
AL
470}
471
5345fdb4 472void qemu_chr_fe_printf(CharBackend *be, const char *fmt, ...)
6f97dba0 473{
9bd7854e 474 char buf[READ_BUF_LEN];
6f97dba0
AL
475 va_list ap;
476 va_start(ap, fmt);
477 vsnprintf(buf, sizeof(buf), fmt, ap);
90f998f5
DB
478 /* XXX this blocks entire thread. Rewrite to use
479 * qemu_chr_fe_write and background I/O callbacks */
5345fdb4 480 qemu_chr_fe_write_all(be, (uint8_t *)buf, strlen(buf));
6f97dba0
AL
481 va_end(ap);
482}
483
0ec7b3e7
MAL
484static void remove_fd_in_watch(Chardev *chr);
485static void mux_chr_set_handlers(Chardev *chr, GMainContext *context);
486static void mux_set_focus(Chardev *chr, int focus);
6dfa8298 487
777357d7
MAL
488static void qemu_char_open(Chardev *chr, ChardevBackend *backend,
489 bool *be_opened, Error **errp)
6f97dba0 490{
777357d7
MAL
491 ChardevClass *cc = CHARDEV_GET_CLASS(chr);
492 /* Any ChardevCommon member would work */
493 ChardevCommon *common = backend ? backend->u.null.data : NULL;
494
495 if (common && common->has_logfile) {
496 int flags = O_WRONLY | O_CREAT;
497 if (common->has_logappend &&
498 common->logappend) {
499 flags |= O_APPEND;
500 } else {
501 flags |= O_TRUNC;
502 }
503 chr->logfd = qemu_open(common->logfile, flags, 0666);
504 if (chr->logfd < 0) {
505 error_setg_errno(errp, errno,
506 "Unable to open logfile %s",
507 common->logfile);
508 return;
509 }
510 }
511
512 if (cc->open) {
513 cc->open(chr, backend, be_opened, errp);
514 }
6f97dba0
AL
515}
516
777357d7 517static void char_init(Object *obj)
6f97dba0 518{
777357d7 519 Chardev *chr = CHARDEV(obj);
6f97dba0 520
777357d7
MAL
521 chr->logfd = -1;
522 qemu_mutex_init(&chr->chr_write_lock);
523}
524
eb314a94
MAL
525static int null_chr_write(Chardev *chr, const uint8_t *buf, int len)
526{
527 return len;
528}
529
530static void char_class_init(ObjectClass *oc, void *data)
531{
532 ChardevClass *cc = CHARDEV_CLASS(oc);
533
534 cc->chr_write = null_chr_write;
535}
536
777357d7
MAL
537static void char_finalize(Object *obj)
538{
539 Chardev *chr = CHARDEV(obj);
540
541 if (chr->be) {
542 chr->be->chr = NULL;
543 }
544 g_free(chr->filename);
545 g_free(chr->label);
546 if (chr->logfd != -1) {
547 close(chr->logfd);
d0d7708b 548 }
777357d7
MAL
549 qemu_mutex_destroy(&chr->chr_write_lock);
550}
551
552static const TypeInfo char_type_info = {
553 .name = TYPE_CHARDEV,
554 .parent = TYPE_OBJECT,
555 .instance_size = sizeof(Chardev),
556 .instance_init = char_init,
557 .instance_finalize = char_finalize,
558 .abstract = true,
559 .class_size = sizeof(ChardevClass),
eb314a94 560 .class_init = char_class_init,
777357d7
MAL
561};
562
777357d7
MAL
563static void null_chr_open(Chardev *chr,
564 ChardevBackend *backend,
565 bool *be_opened,
566 Error **errp)
567{
82878dac 568 *be_opened = false;
6f97dba0
AL
569}
570
777357d7
MAL
571static void char_null_class_init(ObjectClass *oc, void *data)
572{
573 ChardevClass *cc = CHARDEV_CLASS(oc);
574
575 cc->open = null_chr_open;
777357d7
MAL
576}
577
578static const TypeInfo char_null_type_info = {
579 .name = TYPE_CHARDEV_NULL,
580 .parent = TYPE_CHARDEV,
581 .instance_size = sizeof(Chardev),
582 .class_init = char_null_class_init,
b68e956a
MAL
583};
584
6f97dba0 585/* MUX driver for serial I/O splitting */
6f97dba0
AL
586#define MAX_MUX 4
587#define MUX_BUFFER_SIZE 32 /* Must be a power of 2. */
588#define MUX_BUFFER_MASK (MUX_BUFFER_SIZE - 1)
0ec7b3e7
MAL
589struct MuxChardev {
590 Chardev parent;
a4afa548 591 CharBackend *backends[MAX_MUX];
ecb672d1 592 CharBackend chr;
799f1f23 593 int focus;
6f97dba0
AL
594 int mux_cnt;
595 int term_got_escape;
596 int max_size;
a80bf99f
AL
597 /* Intermediate input buffer allows to catch escape sequences even if the
598 currently active device is not accepting any input - but only until it
599 is full as well. */
600 unsigned char buffer[MAX_MUX][MUX_BUFFER_SIZE];
601 int prod[MAX_MUX];
602 int cons[MAX_MUX];
2d22959d 603 int timestamps;
9005b2a7 604
0ec7b3e7 605 /* Protected by the Chardev chr_write_lock. */
4ab312f7 606 int linestart;
2d22959d 607 int64_t timestamps_start;
6dfa8298 608};
6f97dba0 609
777357d7
MAL
610#define MUX_CHARDEV(obj) OBJECT_CHECK(MuxChardev, (obj), TYPE_CHARDEV_MUX)
611
9005b2a7 612/* Called with chr_write_lock held. */
0ec7b3e7 613static int mux_chr_write(Chardev *chr, const uint8_t *buf, int len)
6f97dba0 614{
777357d7 615 MuxChardev *d = MUX_CHARDEV(chr);
6f97dba0 616 int ret;
2d22959d 617 if (!d->timestamps) {
5345fdb4 618 ret = qemu_chr_fe_write(&d->chr, buf, len);
6f97dba0
AL
619 } else {
620 int i;
621
622 ret = 0;
4ab312f7
JK
623 for (i = 0; i < len; i++) {
624 if (d->linestart) {
6f97dba0
AL
625 char buf1[64];
626 int64_t ti;
627 int secs;
628
bc72ad67 629 ti = qemu_clock_get_ms(QEMU_CLOCK_REALTIME);
2d22959d
JK
630 if (d->timestamps_start == -1)
631 d->timestamps_start = ti;
632 ti -= d->timestamps_start;
a4bb1db8 633 secs = ti / 1000;
6f97dba0
AL
634 snprintf(buf1, sizeof(buf1),
635 "[%02d:%02d:%02d.%03d] ",
636 secs / 3600,
637 (secs / 60) % 60,
638 secs % 60,
a4bb1db8 639 (int)(ti % 1000));
90f998f5
DB
640 /* XXX this blocks entire thread. Rewrite to use
641 * qemu_chr_fe_write and background I/O callbacks */
5345fdb4
MAL
642 qemu_chr_fe_write_all(&d->chr,
643 (uint8_t *)buf1, strlen(buf1));
4ab312f7
JK
644 d->linestart = 0;
645 }
5345fdb4 646 ret += qemu_chr_fe_write(&d->chr, buf + i, 1);
4ab312f7
JK
647 if (buf[i] == '\n') {
648 d->linestart = 1;
6f97dba0
AL
649 }
650 }
651 }
652 return ret;
653}
654
655static const char * const mux_help[] = {
656 "% h print this help\n\r",
657 "% x exit emulator\n\r",
658 "% s save disk data back to file (if -snapshot)\n\r",
86d10328 659 "% t toggle console timestamps\n\r",
6f97dba0
AL
660 "% b send break (magic sysrq)\n\r",
661 "% c switch between console and monitor\n\r",
662 "% % sends %\n\r",
663 NULL
664};
665
666int term_escape_char = 0x01; /* ctrl-a is used for escape */
0ec7b3e7 667static void mux_print_help(Chardev *chr)
6f97dba0
AL
668{
669 int i, j;
670 char ebuf[15] = "Escape-Char";
671 char cbuf[50] = "\n\r";
672
673 if (term_escape_char > 0 && term_escape_char < 26) {
674 snprintf(cbuf, sizeof(cbuf), "\n\r");
675 snprintf(ebuf, sizeof(ebuf), "C-%c", term_escape_char - 1 + 'a');
676 } else {
677 snprintf(cbuf, sizeof(cbuf),
678 "\n\rEscape-Char set to Ascii: 0x%02x\n\r\n\r",
679 term_escape_char);
680 }
90f998f5
DB
681 /* XXX this blocks entire thread. Rewrite to use
682 * qemu_chr_fe_write and background I/O callbacks */
5345fdb4 683 qemu_chr_write_all(chr, (uint8_t *)cbuf, strlen(cbuf));
6f97dba0
AL
684 for (i = 0; mux_help[i] != NULL; i++) {
685 for (j=0; mux_help[i][j] != '\0'; j++) {
686 if (mux_help[i][j] == '%')
5345fdb4 687 qemu_chr_write_all(chr, (uint8_t *)ebuf, strlen(ebuf));
6f97dba0 688 else
5345fdb4 689 qemu_chr_write_all(chr, (uint8_t *)&mux_help[i][j], 1);
6f97dba0
AL
690 }
691 }
692}
693
0ec7b3e7 694static void mux_chr_send_event(MuxChardev *d, int mux_nr, int event)
2724b180 695{
a4afa548
MAL
696 CharBackend *be = d->backends[mux_nr];
697
698 if (be && be->chr_event) {
699 be->chr_event(be->opaque, event);
700 }
2724b180
AL
701}
702
0ec7b3e7 703static int mux_proc_byte(Chardev *chr, MuxChardev *d, int ch)
6f97dba0
AL
704{
705 if (d->term_got_escape) {
706 d->term_got_escape = 0;
707 if (ch == term_escape_char)
708 goto send_char;
709 switch(ch) {
710 case '?':
711 case 'h':
712 mux_print_help(chr);
713 break;
714 case 'x':
715 {
716 const char *term = "QEMU: Terminated\n\r";
5345fdb4 717 qemu_chr_write_all(chr, (uint8_t *)term, strlen(term));
6f97dba0
AL
718 exit(0);
719 break;
720 }
721 case 's':
da31d594 722 blk_commit_all();
6f97dba0
AL
723 break;
724 case 'b':
a425d23f 725 qemu_chr_be_event(chr, CHR_EVENT_BREAK);
6f97dba0
AL
726 break;
727 case 'c':
6dfa8298 728 assert(d->mux_cnt > 0); /* handler registered with first fe */
6f97dba0 729 /* Switch to the next registered device */
fb5e19d2 730 mux_set_focus(chr, (d->focus + 1) % d->mux_cnt);
6f97dba0 731 break;
2d22959d
JK
732 case 't':
733 d->timestamps = !d->timestamps;
734 d->timestamps_start = -1;
4ab312f7 735 d->linestart = 0;
2d22959d 736 break;
6f97dba0
AL
737 }
738 } else if (ch == term_escape_char) {
739 d->term_got_escape = 1;
740 } else {
741 send_char:
742 return 1;
743 }
744 return 0;
745}
746
0ec7b3e7 747static void mux_chr_accept_input(Chardev *chr)
6f97dba0 748{
777357d7 749 MuxChardev *d = MUX_CHARDEV(chr);
799f1f23 750 int m = d->focus;
a4afa548 751 CharBackend *be = d->backends[m];
6f97dba0 752
a4afa548
MAL
753 while (be && d->prod[m] != d->cons[m] &&
754 be->chr_can_read && be->chr_can_read(be->opaque)) {
755 be->chr_read(be->opaque,
756 &d->buffer[m][d->cons[m]++ & MUX_BUFFER_MASK], 1);
6f97dba0
AL
757 }
758}
759
760static int mux_chr_can_read(void *opaque)
761{
777357d7 762 MuxChardev *d = MUX_CHARDEV(opaque);
799f1f23 763 int m = d->focus;
a4afa548 764 CharBackend *be = d->backends[m];
6f97dba0 765
a4afa548 766 if ((d->prod[m] - d->cons[m]) < MUX_BUFFER_SIZE) {
6f97dba0 767 return 1;
a4afa548
MAL
768 }
769
770 if (be && be->chr_can_read) {
771 return be->chr_can_read(be->opaque);
772 }
773
6f97dba0
AL
774 return 0;
775}
776
777static void mux_chr_read(void *opaque, const uint8_t *buf, int size)
778{
777357d7
MAL
779 Chardev *chr = CHARDEV(opaque);
780 MuxChardev *d = MUX_CHARDEV(opaque);
799f1f23 781 int m = d->focus;
a4afa548 782 CharBackend *be = d->backends[m];
6f97dba0
AL
783 int i;
784
a4afa548 785 mux_chr_accept_input(opaque);
6f97dba0 786
a4afa548 787 for (i = 0; i < size; i++)
6f97dba0 788 if (mux_proc_byte(chr, d, buf[i])) {
a80bf99f 789 if (d->prod[m] == d->cons[m] &&
a4afa548
MAL
790 be && be->chr_can_read &&
791 be->chr_can_read(be->opaque))
792 be->chr_read(be->opaque, &buf[i], 1);
6f97dba0 793 else
a80bf99f 794 d->buffer[m][d->prod[m]++ & MUX_BUFFER_MASK] = buf[i];
6f97dba0
AL
795 }
796}
797
fffbd9cf
PB
798static bool muxes_realized;
799
6f97dba0
AL
800static void mux_chr_event(void *opaque, int event)
801{
777357d7 802 MuxChardev *d = MUX_CHARDEV(opaque);
6f97dba0
AL
803 int i;
804
fffbd9cf
PB
805 if (!muxes_realized) {
806 return;
807 }
808
6f97dba0
AL
809 /* Send the event to all registered listeners */
810 for (i = 0; i < d->mux_cnt; i++)
2724b180 811 mux_chr_send_event(d, i, event);
6f97dba0
AL
812}
813
7b7ab18d
MR
814/**
815 * Called after processing of default and command-line-specified
816 * chardevs to deliver CHR_EVENT_OPENED events to any FEs attached
817 * to a mux chardev. This is done here to ensure that
818 * output/prompts/banners are only displayed for the FE that has
819 * focus when initial command-line processing/machine init is
820 * completed.
821 *
822 * After this point, any new FE attached to any new or existing
823 * mux will receive CHR_EVENT_OPENED notifications for the BE
824 * immediately.
825 */
826static void muxes_realize_done(Notifier *notifier, void *unused)
827{
0ec7b3e7 828 Chardev *chr;
7b7ab18d
MR
829
830 QTAILQ_FOREACH(chr, &chardevs, next) {
777357d7
MAL
831 if (CHARDEV_IS_MUX(chr)) {
832 MuxChardev *d = MUX_CHARDEV(chr);
7b7ab18d
MR
833 int i;
834
835 /* send OPENED to all already-attached FEs */
836 for (i = 0; i < d->mux_cnt; i++) {
837 mux_chr_send_event(d, i, CHR_EVENT_OPENED);
838 }
839 /* mark mux as OPENED so any new FEs will immediately receive
840 * OPENED event
841 */
842 qemu_chr_be_generic_open(chr);
843 }
844 }
845 muxes_realized = true;
846}
847
848static Notifier muxes_realize_notify = {
849 .notify = muxes_realize_done,
850};
851
0ec7b3e7 852static GSource *mux_chr_add_watch(Chardev *s, GIOCondition cond)
3f0838ab 853{
777357d7 854 MuxChardev *d = MUX_CHARDEV(s);
0ec7b3e7 855 Chardev *chr = qemu_chr_fe_get_driver(&d->chr);
777357d7 856 ChardevClass *cc = CHARDEV_GET_CLASS(chr);
5345fdb4 857
777357d7 858 if (!cc->chr_add_watch) {
b68e956a
MAL
859 return NULL;
860 }
861
777357d7 862 return cc->chr_add_watch(chr, cond);
3f0838ab
KB
863}
864
980d0414 865static void char_mux_finalize(Object *obj)
1371a369 866{
980d0414 867 MuxChardev *d = MUX_CHARDEV(obj);
a4afa548 868 int i;
1371a369 869
a4afa548
MAL
870 for (i = 0; i < d->mux_cnt; i++) {
871 CharBackend *be = d->backends[i];
872 if (be) {
873 be->chr = NULL;
874 }
875 }
c39860e6 876 qemu_chr_fe_deinit(&d->chr);
1371a369
MAL
877}
878
0ec7b3e7 879static void mux_chr_set_handlers(Chardev *chr, GMainContext *context)
6dfa8298 880{
777357d7 881 MuxChardev *d = MUX_CHARDEV(chr);
6dfa8298
MAL
882
883 /* Fix up the real driver with mux routines */
ecb672d1
MAL
884 qemu_chr_fe_set_handlers(&d->chr,
885 mux_chr_can_read,
886 mux_chr_read,
887 mux_chr_event,
888 chr,
39ab61c6 889 context, true);
6dfa8298
MAL
890}
891
0ec7b3e7 892static void mux_set_focus(Chardev *chr, int focus)
6dfa8298 893{
777357d7 894 MuxChardev *d = MUX_CHARDEV(chr);
fb5e19d2 895
6dfa8298
MAL
896 assert(focus >= 0);
897 assert(focus < d->mux_cnt);
898
899 if (d->focus != -1) {
900 mux_chr_send_event(d, d->focus, CHR_EVENT_MUX_OUT);
901 }
902
903 d->focus = focus;
fb5e19d2 904 chr->be = d->backends[focus];
6dfa8298
MAL
905 mux_chr_send_event(d, d->focus, CHR_EVENT_MUX_IN);
906}
907
777357d7
MAL
908static void qemu_chr_open_mux(Chardev *chr,
909 ChardevBackend *backend,
910 bool *be_opened,
911 Error **errp)
6f97dba0 912{
32bafa8f 913 ChardevMux *mux = backend->u.mux.data;
777357d7
MAL
914 Chardev *drv;
915 MuxChardev *d = MUX_CHARDEV(chr);
6f97dba0 916
3c0e5a4a
PB
917 drv = qemu_chr_find(mux->chardev);
918 if (drv == NULL) {
919 error_setg(errp, "mux: base chardev %s not found", mux->chardev);
777357d7 920 return;
3c0e5a4a
PB
921 }
922
799f1f23 923 d->focus = -1;
7b7ab18d
MR
924 /* only default to opened state if we've realized the initial
925 * set of muxes
926 */
82878dac 927 *be_opened = muxes_realized;
777357d7 928 qemu_chr_fe_init(&d->chr, drv, errp);
6f97dba0
AL
929}
930
0ec7b3e7 931Chardev *qemu_chr_fe_get_driver(CharBackend *be)
94a40fc5
MAL
932{
933 return be->chr;
934}
935
0ec7b3e7 936bool qemu_chr_fe_init(CharBackend *b, Chardev *s, Error **errp)
94a40fc5
MAL
937{
938 int tag = 0;
939
777357d7
MAL
940 if (CHARDEV_IS_MUX(s)) {
941 MuxChardev *d = MUX_CHARDEV(s);
3aef23d7
MAL
942
943 if (d->mux_cnt >= MAX_MUX) {
944 goto unavailable;
94a40fc5 945 }
3aef23d7
MAL
946
947 d->backends[d->mux_cnt] = b;
948 tag = d->mux_cnt++;
949 } else if (s->be) {
950 goto unavailable;
a4afa548
MAL
951 } else {
952 s->be = b;
94a40fc5
MAL
953 }
954
830896af 955 b->fe_open = false;
94a40fc5
MAL
956 b->tag = tag;
957 b->chr = s;
94a40fc5 958 return true;
3aef23d7
MAL
959
960unavailable:
961 error_setg(errp, QERR_DEVICE_IN_USE, s->label);
962 return false;
94a40fc5
MAL
963}
964
0ec7b3e7 965static bool qemu_chr_is_busy(Chardev *s)
a4afa548 966{
777357d7
MAL
967 if (CHARDEV_IS_MUX(s)) {
968 MuxChardev *d = MUX_CHARDEV(s);
a4afa548
MAL
969 return d->mux_cnt >= 0;
970 } else {
971 return s->be != NULL;
972 }
973}
974
c39860e6
MAL
975void qemu_chr_fe_deinit(CharBackend *b)
976{
977 assert(b);
978
979 if (b->chr) {
39ab61c6 980 qemu_chr_fe_set_handlers(b, NULL, NULL, NULL, NULL, NULL, true);
fb5e19d2
MAL
981 if (b->chr->be == b) {
982 b->chr->be = NULL;
983 }
777357d7
MAL
984 if (CHARDEV_IS_MUX(b->chr)) {
985 MuxChardev *d = MUX_CHARDEV(b->chr);
a4afa548
MAL
986 d->backends[b->tag] = NULL;
987 }
c39860e6
MAL
988 b->chr = NULL;
989 }
990}
991
94a40fc5
MAL
992void qemu_chr_fe_set_handlers(CharBackend *b,
993 IOCanReadHandler *fd_can_read,
994 IOReadHandler *fd_read,
995 IOEventHandler *fd_event,
996 void *opaque,
39ab61c6
MAL
997 GMainContext *context,
998 bool set_open)
94a40fc5 999{
0ec7b3e7 1000 Chardev *s;
777357d7 1001 ChardevClass *cc;
386f07d1
MAL
1002 int fe_open;
1003
1004 s = b->chr;
1005 if (!s) {
94a40fc5
MAL
1006 return;
1007 }
1008
777357d7 1009 cc = CHARDEV_GET_CLASS(s);
386f07d1
MAL
1010 if (!opaque && !fd_can_read && !fd_read && !fd_event) {
1011 fe_open = 0;
1012 remove_fd_in_watch(s);
1013 } else {
1014 fe_open = 1;
1015 }
a4afa548
MAL
1016 b->chr_can_read = fd_can_read;
1017 b->chr_read = fd_read;
1018 b->chr_event = fd_event;
1019 b->opaque = opaque;
777357d7
MAL
1020 if (cc->chr_update_read_handler) {
1021 cc->chr_update_read_handler(s, context);
386f07d1
MAL
1022 }
1023
39ab61c6 1024 if (set_open) {
386f07d1
MAL
1025 qemu_chr_fe_set_open(b, fe_open);
1026 }
94a40fc5 1027
386f07d1
MAL
1028 if (fe_open) {
1029 qemu_chr_fe_take_focus(b);
1030 /* We're connecting to an already opened device, so let's make sure we
1031 also get the open event */
1032 if (s->be_open) {
1033 qemu_chr_be_generic_open(s);
1034 }
1035 }
1036
777357d7 1037 if (CHARDEV_IS_MUX(s)) {
386f07d1 1038 mux_chr_set_handlers(s, context);
94a40fc5
MAL
1039 }
1040}
1041
1042void qemu_chr_fe_take_focus(CharBackend *b)
1043{
fa394ed6
MAL
1044 if (!b->chr) {
1045 return;
1046 }
1047
777357d7 1048 if (CHARDEV_IS_MUX(b->chr)) {
fb5e19d2 1049 mux_set_focus(b->chr, b->tag);
94a40fc5
MAL
1050 }
1051}
6f97dba0 1052
96c63847
AL
1053typedef struct IOWatchPoll
1054{
d185c094
PB
1055 GSource parent;
1056
9894dc0c 1057 QIOChannel *ioc;
96c63847 1058 GSource *src;
96c63847
AL
1059
1060 IOCanReadHandler *fd_can_read;
1e885b25 1061 GSourceFunc fd_read;
96c63847 1062 void *opaque;
e92aa36a 1063 GMainContext *context;
96c63847
AL
1064} IOWatchPoll;
1065
96c63847
AL
1066static IOWatchPoll *io_watch_poll_from_source(GSource *source)
1067{
d185c094 1068 return container_of(source, IOWatchPoll, parent);
96c63847
AL
1069}
1070
e92aa36a
ZC
1071static gboolean io_watch_poll_prepare(GSource *source,
1072 gint *timeout_)
96c63847
AL
1073{
1074 IOWatchPoll *iwp = io_watch_poll_from_source(source);
d185c094 1075 bool now_active = iwp->fd_can_read(iwp->opaque) > 0;
1e885b25 1076 bool was_active = iwp->src != NULL;
d185c094 1077 if (was_active == now_active) {
96c63847
AL
1078 return FALSE;
1079 }
1080
d185c094 1081 if (now_active) {
9894dc0c
DB
1082 iwp->src = qio_channel_create_watch(
1083 iwp->ioc, G_IO_IN | G_IO_ERR | G_IO_HUP | G_IO_NVAL);
1e885b25 1084 g_source_set_callback(iwp->src, iwp->fd_read, iwp->opaque, NULL);
e92aa36a 1085 g_source_attach(iwp->src, iwp->context);
d185c094 1086 } else {
1e885b25
PB
1087 g_source_destroy(iwp->src);
1088 g_source_unref(iwp->src);
1089 iwp->src = NULL;
d185c094
PB
1090 }
1091 return FALSE;
96c63847
AL
1092}
1093
1094static gboolean io_watch_poll_check(GSource *source)
1095{
d185c094 1096 return FALSE;
96c63847
AL
1097}
1098
1099static gboolean io_watch_poll_dispatch(GSource *source, GSourceFunc callback,
1100 gpointer user_data)
1101{
d185c094 1102 abort();
96c63847
AL
1103}
1104
1105static void io_watch_poll_finalize(GSource *source)
1106{
2b316774
PB
1107 /* Due to a glib bug, removing the last reference to a source
1108 * inside a finalize callback causes recursive locking (and a
1109 * deadlock). This is not a problem inside other callbacks,
1110 * including dispatch callbacks, so we call io_remove_watch_poll
1111 * to remove this source. At this point, iwp->src must
1112 * be NULL, or we would leak it.
1113 *
1114 * This would be solved much more elegantly by child sources,
1115 * but we support older glib versions that do not have them.
1116 */
96c63847 1117 IOWatchPoll *iwp = io_watch_poll_from_source(source);
2b316774 1118 assert(iwp->src == NULL);
96c63847
AL
1119}
1120
1121static GSourceFuncs io_watch_poll_funcs = {
1122 .prepare = io_watch_poll_prepare,
1123 .check = io_watch_poll_check,
1124 .dispatch = io_watch_poll_dispatch,
1125 .finalize = io_watch_poll_finalize,
1126};
1127
1128/* Can only be used for read */
0ec7b3e7 1129static guint io_add_watch_poll(Chardev *chr,
e93a68e1 1130 QIOChannel *ioc,
96c63847 1131 IOCanReadHandler *fd_can_read,
9894dc0c 1132 QIOChannelFunc fd_read,
e92aa36a
ZC
1133 gpointer user_data,
1134 GMainContext *context)
96c63847
AL
1135{
1136 IOWatchPoll *iwp;
0ca5aa4f 1137 int tag;
e93a68e1 1138 char *name;
96c63847 1139
e92aa36a
ZC
1140 iwp = (IOWatchPoll *) g_source_new(&io_watch_poll_funcs,
1141 sizeof(IOWatchPoll));
96c63847
AL
1142 iwp->fd_can_read = fd_can_read;
1143 iwp->opaque = user_data;
9894dc0c 1144 iwp->ioc = ioc;
1e885b25
PB
1145 iwp->fd_read = (GSourceFunc) fd_read;
1146 iwp->src = NULL;
e92aa36a 1147 iwp->context = context;
96c63847 1148
e93a68e1
DB
1149 name = g_strdup_printf("chardev-iowatch-%s", chr->label);
1150 g_source_set_name((GSource *)iwp, name);
1151 g_free(name);
1152
e92aa36a 1153 tag = g_source_attach(&iwp->parent, context);
0ca5aa4f
PB
1154 g_source_unref(&iwp->parent);
1155 return tag;
96c63847
AL
1156}
1157
2b316774
PB
1158static void io_remove_watch_poll(guint tag)
1159{
1160 GSource *source;
1161 IOWatchPoll *iwp;
1162
1163 g_return_if_fail (tag > 0);
1164
1165 source = g_main_context_find_source_by_id(NULL, tag);
1166 g_return_if_fail (source != NULL);
1167
1168 iwp = io_watch_poll_from_source(source);
1169 if (iwp->src) {
1170 g_source_destroy(iwp->src);
1171 g_source_unref(iwp->src);
1172 iwp->src = NULL;
1173 }
1174 g_source_destroy(&iwp->parent);
1175}
1176
0ec7b3e7 1177static void remove_fd_in_watch(Chardev *chr)
26da70c7
AS
1178{
1179 if (chr->fd_in_tag) {
1180 io_remove_watch_poll(chr->fd_in_tag);
1181 chr->fd_in_tag = 0;
1182 }
1183}
1184
96c63847 1185
9894dc0c
DB
1186static int io_channel_send_full(QIOChannel *ioc,
1187 const void *buf, size_t len,
1188 int *fds, size_t nfds)
76a9644b 1189{
9894dc0c 1190 size_t offset = 0;
76a9644b 1191
9894dc0c
DB
1192 while (offset < len) {
1193 ssize_t ret = 0;
1194 struct iovec iov = { .iov_base = (char *)buf + offset,
1195 .iov_len = len - offset };
1196
1197 ret = qio_channel_writev_full(
1198 ioc, &iov, 1,
1199 fds, nfds, NULL);
1200 if (ret == QIO_CHANNEL_ERR_BLOCK) {
9894dc0c
DB
1201 if (offset) {
1202 return offset;
1203 }
76a9644b 1204
e046fb44
DB
1205 errno = EAGAIN;
1206 return -1;
1207 } else if (ret < 0) {
9894dc0c
DB
1208 errno = EINVAL;
1209 return -1;
1210 }
76a9644b 1211
9894dc0c
DB
1212 offset += ret;
1213 }
76a9644b 1214
9894dc0c 1215 return offset;
76a9644b
AL
1216}
1217
9894dc0c 1218
0ff0fad2 1219#ifndef _WIN32
9894dc0c 1220static int io_channel_send(QIOChannel *ioc, const void *buf, size_t len)
96c63847 1221{
9894dc0c 1222 return io_channel_send_full(ioc, buf, len, NULL, 0);
96c63847 1223}
96c63847 1224
0ec7b3e7
MAL
1225typedef struct FDChardev {
1226 Chardev parent;
1227 Chardev *chr;
9894dc0c 1228 QIOChannel *ioc_in, *ioc_out;
6f97dba0 1229 int max_size;
0ec7b3e7 1230} FDChardev;
6f97dba0 1231
777357d7
MAL
1232#define TYPE_CHARDEV_FD "chardev-fd"
1233#define FD_CHARDEV(obj) OBJECT_CHECK(FDChardev, (obj), TYPE_CHARDEV_FD)
1234
9005b2a7 1235/* Called with chr_write_lock held. */
0ec7b3e7 1236static int fd_chr_write(Chardev *chr, const uint8_t *buf, int len)
6f97dba0 1237{
777357d7 1238 FDChardev *s = FD_CHARDEV(chr);
41ac54b2 1239
9894dc0c 1240 return io_channel_send(s->ioc_out, buf, len);
6f97dba0
AL
1241}
1242
9894dc0c 1243static gboolean fd_chr_read(QIOChannel *chan, GIOCondition cond, void *opaque)
6f97dba0 1244{
777357d7
MAL
1245 Chardev *chr = CHARDEV(opaque);
1246 FDChardev *s = FD_CHARDEV(opaque);
a29753f8 1247 int len;
9bd7854e 1248 uint8_t buf[READ_BUF_LEN];
9894dc0c 1249 ssize_t ret;
6f97dba0
AL
1250
1251 len = sizeof(buf);
a29753f8 1252 if (len > s->max_size) {
6f97dba0 1253 len = s->max_size;
a29753f8
AL
1254 }
1255 if (len == 0) {
cdbf6e16 1256 return TRUE;
a29753f8
AL
1257 }
1258
9894dc0c
DB
1259 ret = qio_channel_read(
1260 chan, (gchar *)buf, len, NULL);
1261 if (ret == 0) {
26da70c7 1262 remove_fd_in_watch(chr);
a425d23f 1263 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
a29753f8 1264 return FALSE;
6f97dba0 1265 }
9894dc0c
DB
1266 if (ret > 0) {
1267 qemu_chr_be_write(chr, buf, ret);
6f97dba0 1268 }
a29753f8
AL
1269
1270 return TRUE;
1271}
1272
1273static int fd_chr_read_poll(void *opaque)
1274{
777357d7
MAL
1275 Chardev *chr = CHARDEV(opaque);
1276 FDChardev *s = FD_CHARDEV(opaque);
a29753f8
AL
1277
1278 s->max_size = qemu_chr_be_can_write(chr);
1279 return s->max_size;
6f97dba0
AL
1280}
1281
0ec7b3e7 1282static GSource *fd_chr_add_watch(Chardev *chr, GIOCondition cond)
23673ca7 1283{
777357d7 1284 FDChardev *s = FD_CHARDEV(chr);
9894dc0c 1285 return qio_channel_create_watch(s->ioc_out, cond);
23673ca7
AL
1286}
1287
0ec7b3e7 1288static void fd_chr_update_read_handler(Chardev *chr,
a4afa548 1289 GMainContext *context)
6f97dba0 1290{
777357d7 1291 FDChardev *s = FD_CHARDEV(chr);
6f97dba0 1292
26da70c7 1293 remove_fd_in_watch(chr);
9894dc0c 1294 if (s->ioc_in) {
e93a68e1 1295 chr->fd_in_tag = io_add_watch_poll(chr, s->ioc_in,
9894dc0c 1296 fd_chr_read_poll,
e92aa36a
ZC
1297 fd_chr_read, chr,
1298 context);
6f97dba0
AL
1299 }
1300}
1301
7f2fe073 1302static void char_fd_finalize(Object *obj)
6f97dba0 1303{
7f2fe073
MAL
1304 Chardev *chr = CHARDEV(obj);
1305 FDChardev *s = FD_CHARDEV(obj);
6f97dba0 1306
26da70c7 1307 remove_fd_in_watch(chr);
9894dc0c
DB
1308 if (s->ioc_in) {
1309 object_unref(OBJECT(s->ioc_in));
a29753f8 1310 }
9894dc0c
DB
1311 if (s->ioc_out) {
1312 object_unref(OBJECT(s->ioc_out));
6f97dba0
AL
1313 }
1314
a425d23f 1315 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
6f97dba0
AL
1316}
1317
1318/* open a character device to a unix fd */
777357d7
MAL
1319static void qemu_chr_open_fd(Chardev *chr,
1320 int fd_in, int fd_out)
6f97dba0 1321{
777357d7 1322 FDChardev *s = FD_CHARDEV(chr);
e93a68e1 1323 char *name;
6f97dba0 1324
9894dc0c 1325 s->ioc_in = QIO_CHANNEL(qio_channel_file_new_fd(fd_in));
e93a68e1
DB
1326 name = g_strdup_printf("chardev-file-in-%s", chr->label);
1327 qio_channel_set_name(QIO_CHANNEL(s->ioc_in), name);
1328 g_free(name);
9894dc0c 1329 s->ioc_out = QIO_CHANNEL(qio_channel_file_new_fd(fd_out));
e93a68e1
DB
1330 name = g_strdup_printf("chardev-file-out-%s", chr->label);
1331 qio_channel_set_name(QIO_CHANNEL(s->ioc_out), name);
1332 g_free(name);
4ff12bdb 1333 qemu_set_nonblock(fd_out);
a29753f8 1334 s->chr = chr;
777357d7 1335}
6f97dba0 1336
777357d7
MAL
1337static void char_fd_class_init(ObjectClass *oc, void *data)
1338{
1339 ChardevClass *cc = CHARDEV_CLASS(oc);
1340
1341 cc->chr_add_watch = fd_chr_add_watch;
1342 cc->chr_write = fd_chr_write;
1343 cc->chr_update_read_handler = fd_chr_update_read_handler;
6f97dba0
AL
1344}
1345
777357d7
MAL
1346static const TypeInfo char_fd_type_info = {
1347 .name = TYPE_CHARDEV_FD,
1348 .parent = TYPE_CHARDEV,
1349 .instance_size = sizeof(FDChardev),
7f2fe073 1350 .instance_finalize = char_fd_finalize,
777357d7
MAL
1351 .class_init = char_fd_class_init,
1352 .abstract = true,
1353};
1354
1355static void qemu_chr_open_pipe(Chardev *chr,
1356 ChardevBackend *backend,
1357 bool *be_opened,
1358 Error **errp)
6f97dba0 1359{
32bafa8f 1360 ChardevHostdev *opts = backend->u.pipe.data;
6f97dba0 1361 int fd_in, fd_out;
0ff0fad2
DB
1362 char *filename_in;
1363 char *filename_out;
548cbb36 1364 const char *filename = opts->device;
0ff0fad2
DB
1365
1366 filename_in = g_strdup_printf("%s.in", filename);
1367 filename_out = g_strdup_printf("%s.out", filename);
40ff6d7e
KW
1368 TFR(fd_in = qemu_open(filename_in, O_RDWR | O_BINARY));
1369 TFR(fd_out = qemu_open(filename_out, O_RDWR | O_BINARY));
0ff0fad2
DB
1370 g_free(filename_in);
1371 g_free(filename_out);
6f97dba0
AL
1372 if (fd_in < 0 || fd_out < 0) {
1373 if (fd_in >= 0)
1374 close(fd_in);
1375 if (fd_out >= 0)
1376 close(fd_out);
b181e047 1377 TFR(fd_in = fd_out = qemu_open(filename, O_RDWR | O_BINARY));
a89dd6c3 1378 if (fd_in < 0) {
20cbe7a2 1379 error_setg_file_open(errp, errno, filename);
777357d7 1380 return;
a89dd6c3 1381 }
6f97dba0 1382 }
777357d7 1383 qemu_chr_open_fd(chr, fd_in, fd_out);
6f97dba0
AL
1384}
1385
6f97dba0
AL
1386/* init terminal so that we can grab keys */
1387static struct termios oldtty;
1388static int old_fd0_flags;
c88930a6 1389static bool stdio_in_use;
bb002513 1390static bool stdio_allow_signal;
e76d4420
GH
1391static bool stdio_echo_state;
1392
0ec7b3e7 1393static void qemu_chr_set_echo_stdio(Chardev *chr, bool echo);
6f97dba0
AL
1394
1395static void term_exit(void)
1396{
1397 tcsetattr (0, TCSANOW, &oldtty);
1398 fcntl(0, F_SETFL, old_fd0_flags);
1399}
1400
e76d4420
GH
1401static void term_stdio_handler(int sig)
1402{
1403 /* restore echo after resume from suspend. */
1404 qemu_chr_set_echo_stdio(NULL, stdio_echo_state);
1405}
1406
0ec7b3e7 1407static void qemu_chr_set_echo_stdio(Chardev *chr, bool echo)
6f97dba0
AL
1408{
1409 struct termios tty;
1410
e76d4420 1411 stdio_echo_state = echo;
0369364b 1412 tty = oldtty;
bb002513
PB
1413 if (!echo) {
1414 tty.c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP
6f97dba0 1415 |INLCR|IGNCR|ICRNL|IXON);
bb002513
PB
1416 tty.c_oflag |= OPOST;
1417 tty.c_lflag &= ~(ECHO|ECHONL|ICANON|IEXTEN);
1418 tty.c_cflag &= ~(CSIZE|PARENB);
1419 tty.c_cflag |= CS8;
1420 tty.c_cc[VMIN] = 1;
1421 tty.c_cc[VTIME] = 0;
1422 }
bb002513 1423 if (!stdio_allow_signal)
6f97dba0 1424 tty.c_lflag &= ~ISIG;
6f97dba0
AL
1425
1426 tcsetattr (0, TCSANOW, &tty);
6f97dba0
AL
1427}
1428
4d833ada 1429static void char_stdio_finalize(Object *obj)
6f97dba0
AL
1430{
1431 term_exit();
6f97dba0
AL
1432}
1433
777357d7
MAL
1434static void qemu_chr_open_stdio(Chardev *chr,
1435 ChardevBackend *backend,
1436 bool *be_opened,
1437 Error **errp)
6f97dba0 1438{
32bafa8f 1439 ChardevStdio *opts = backend->u.stdio.data;
e76d4420 1440 struct sigaction act;
6f97dba0 1441
ab51b1d5 1442 if (is_daemonized()) {
8c84b25d 1443 error_setg(errp, "cannot use stdio with -daemonize");
777357d7 1444 return;
ab51b1d5 1445 }
c88930a6
LL
1446
1447 if (stdio_in_use) {
8c84b25d 1448 error_setg(errp, "cannot use stdio by multiple character devices");
777357d7 1449 return;
c88930a6
LL
1450 }
1451
1452 stdio_in_use = true;
ed7a1540 1453 old_fd0_flags = fcntl(0, F_GETFL);
c88930a6 1454 tcgetattr(0, &oldtty);
4ff12bdb 1455 qemu_set_nonblock(0);
ed7a1540 1456 atexit(term_exit);
0369364b 1457
e76d4420
GH
1458 memset(&act, 0, sizeof(act));
1459 act.sa_handler = term_stdio_handler;
1460 sigaction(SIGCONT, &act, NULL);
1461
777357d7
MAL
1462 qemu_chr_open_fd(chr, 0, 1);
1463
7c358031
GH
1464 if (opts->has_signal) {
1465 stdio_allow_signal = opts->signal;
1466 }
5345fdb4 1467 qemu_chr_set_echo_stdio(chr, false);
6f97dba0
AL
1468}
1469
6f97dba0 1470#if defined(__linux__) || defined(__sun__) || defined(__FreeBSD__) \
a167ba50
AJ
1471 || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__DragonFly__) \
1472 || defined(__GLIBC__)
6f97dba0 1473
d809ab95
PB
1474#define HAVE_CHARDEV_SERIAL 1
1475#define HAVE_CHARDEV_PTY 1
e551498e 1476
6f97dba0 1477typedef struct {
0ec7b3e7 1478 Chardev parent;
9894dc0c 1479 QIOChannel *ioc;
6f97dba0 1480 int read_bytes;
9005b2a7 1481
0ec7b3e7 1482 /* Protected by the Chardev chr_write_lock. */
9005b2a7 1483 int connected;
8aa33caf 1484 guint timer_tag;
7b3621f4 1485 guint open_tag;
0ec7b3e7 1486} PtyChardev;
6f97dba0 1487
777357d7
MAL
1488#define PTY_CHARDEV(obj) OBJECT_CHECK(PtyChardev, (obj), TYPE_CHARDEV_PTY)
1489
0ec7b3e7
MAL
1490static void pty_chr_update_read_handler_locked(Chardev *chr);
1491static void pty_chr_state(Chardev *chr, int connected);
6f97dba0 1492
8aa33caf
AL
1493static gboolean pty_chr_timer(gpointer opaque)
1494{
777357d7
MAL
1495 struct Chardev *chr = CHARDEV(opaque);
1496 PtyChardev *s = PTY_CHARDEV(opaque);
8aa33caf 1497
9005b2a7 1498 qemu_mutex_lock(&chr->chr_write_lock);
79f20075 1499 s->timer_tag = 0;
7b3621f4 1500 s->open_tag = 0;
b0d768c3
GH
1501 if (!s->connected) {
1502 /* Next poll ... */
9005b2a7 1503 pty_chr_update_read_handler_locked(chr);
b0d768c3 1504 }
9005b2a7 1505 qemu_mutex_unlock(&chr->chr_write_lock);
8aa33caf
AL
1506 return FALSE;
1507}
1508
9005b2a7 1509/* Called with chr_write_lock held. */
0ec7b3e7 1510static void pty_chr_rearm_timer(Chardev *chr, int ms)
8aa33caf 1511{
777357d7 1512 PtyChardev *s = PTY_CHARDEV(chr);
e93a68e1 1513 char *name;
8aa33caf
AL
1514
1515 if (s->timer_tag) {
1516 g_source_remove(s->timer_tag);
1517 s->timer_tag = 0;
1518 }
1519
1520 if (ms == 1000) {
e93a68e1 1521 name = g_strdup_printf("pty-timer-secs-%s", chr->label);
8aa33caf
AL
1522 s->timer_tag = g_timeout_add_seconds(1, pty_chr_timer, chr);
1523 } else {
e93a68e1 1524 name = g_strdup_printf("pty-timer-ms-%s", chr->label);
8aa33caf
AL
1525 s->timer_tag = g_timeout_add(ms, pty_chr_timer, chr);
1526 }
e93a68e1
DB
1527 g_source_set_name_by_id(s->timer_tag, name);
1528 g_free(name);
8aa33caf
AL
1529}
1530
9005b2a7 1531/* Called with chr_write_lock held. */
0ec7b3e7 1532static void pty_chr_update_read_handler_locked(Chardev *chr)
1bb7fe72 1533{
777357d7 1534 PtyChardev *s = PTY_CHARDEV(chr);
1bb7fe72 1535 GPollFD pfd;
c1f24489 1536 int rc;
9894dc0c 1537 QIOChannelFile *fioc = QIO_CHANNEL_FILE(s->ioc);
1bb7fe72 1538
9894dc0c 1539 pfd.fd = fioc->fd;
1bb7fe72
PB
1540 pfd.events = G_IO_OUT;
1541 pfd.revents = 0;
c1f24489
PB
1542 do {
1543 rc = g_poll(&pfd, 1, 0);
1544 } while (rc == -1 && errno == EINTR);
1545 assert(rc >= 0);
1546
1bb7fe72
PB
1547 if (pfd.revents & G_IO_HUP) {
1548 pty_chr_state(chr, 0);
1549 } else {
1550 pty_chr_state(chr, 1);
1551 }
1552}
1553
0ec7b3e7 1554static void pty_chr_update_read_handler(Chardev *chr,
a4afa548 1555 GMainContext *context)
9005b2a7
PB
1556{
1557 qemu_mutex_lock(&chr->chr_write_lock);
1558 pty_chr_update_read_handler_locked(chr);
1559 qemu_mutex_unlock(&chr->chr_write_lock);
1560}
1561
1562/* Called with chr_write_lock held. */
777357d7 1563static int char_pty_chr_write(Chardev *chr, const uint8_t *buf, int len)
6f97dba0 1564{
777357d7 1565 PtyChardev *s = PTY_CHARDEV(chr);
6f97dba0
AL
1566
1567 if (!s->connected) {
1568 /* guest sends data, check for (re-)connect */
9005b2a7 1569 pty_chr_update_read_handler_locked(chr);
cf7330c7
ST
1570 if (!s->connected) {
1571 return 0;
1572 }
6f97dba0 1573 }
9894dc0c 1574 return io_channel_send(s->ioc, buf, len);
6f97dba0
AL
1575}
1576
0ec7b3e7 1577static GSource *pty_chr_add_watch(Chardev *chr, GIOCondition cond)
e6a87ed8 1578{
777357d7 1579 PtyChardev *s = PTY_CHARDEV(chr);
62c339c5
PB
1580 if (!s->connected) {
1581 return NULL;
1582 }
9894dc0c 1583 return qio_channel_create_watch(s->ioc, cond);
e6a87ed8
AL
1584}
1585
6f97dba0
AL
1586static int pty_chr_read_poll(void *opaque)
1587{
777357d7
MAL
1588 Chardev *chr = CHARDEV(opaque);
1589 PtyChardev *s = PTY_CHARDEV(opaque);
6f97dba0 1590
909cda12 1591 s->read_bytes = qemu_chr_be_can_write(chr);
6f97dba0
AL
1592 return s->read_bytes;
1593}
1594
9894dc0c 1595static gboolean pty_chr_read(QIOChannel *chan, GIOCondition cond, void *opaque)
6f97dba0 1596{
777357d7
MAL
1597 Chardev *chr = CHARDEV(opaque);
1598 PtyChardev *s = PTY_CHARDEV(opaque);
9894dc0c 1599 gsize len;
9bd7854e 1600 uint8_t buf[READ_BUF_LEN];
9894dc0c 1601 ssize_t ret;
6f97dba0
AL
1602
1603 len = sizeof(buf);
1604 if (len > s->read_bytes)
1605 len = s->read_bytes;
cdbf6e16
PB
1606 if (len == 0) {
1607 return TRUE;
1608 }
9894dc0c
DB
1609 ret = qio_channel_read(s->ioc, (char *)buf, len, NULL);
1610 if (ret <= 0) {
6f97dba0 1611 pty_chr_state(chr, 0);
093d3a20
AL
1612 return FALSE;
1613 } else {
6f97dba0 1614 pty_chr_state(chr, 1);
9894dc0c 1615 qemu_chr_be_write(chr, buf, ret);
6f97dba0 1616 }
093d3a20 1617 return TRUE;
6f97dba0
AL
1618}
1619
7b3621f4
PB
1620static gboolean qemu_chr_be_generic_open_func(gpointer opaque)
1621{
777357d7
MAL
1622 Chardev *chr = CHARDEV(opaque);
1623 PtyChardev *s = PTY_CHARDEV(opaque);
7b3621f4
PB
1624
1625 s->open_tag = 0;
1626 qemu_chr_be_generic_open(chr);
1627 return FALSE;
1628}
1629
9005b2a7 1630/* Called with chr_write_lock held. */
0ec7b3e7 1631static void pty_chr_state(Chardev *chr, int connected)
6f97dba0 1632{
777357d7 1633 PtyChardev *s = PTY_CHARDEV(chr);
6f97dba0
AL
1634
1635 if (!connected) {
7b3621f4
PB
1636 if (s->open_tag) {
1637 g_source_remove(s->open_tag);
1638 s->open_tag = 0;
1639 }
26da70c7 1640 remove_fd_in_watch(chr);
6f97dba0 1641 s->connected = 0;
6f97dba0
AL
1642 /* (re-)connect poll interval for idle guests: once per second.
1643 * We check more frequently in case the guests sends data to
1644 * the virtual device linked to our pty. */
8aa33caf 1645 pty_chr_rearm_timer(chr, 1000);
6f97dba0 1646 } else {
85a67692
PB
1647 if (s->timer_tag) {
1648 g_source_remove(s->timer_tag);
1649 s->timer_tag = 0;
1650 }
1651 if (!s->connected) {
7b3621f4 1652 g_assert(s->open_tag == 0);
85a67692 1653 s->connected = 1;
7b3621f4 1654 s->open_tag = g_idle_add(qemu_chr_be_generic_open_func, chr);
ac1b84dd
GH
1655 }
1656 if (!chr->fd_in_tag) {
e93a68e1 1657 chr->fd_in_tag = io_add_watch_poll(chr, s->ioc,
9894dc0c 1658 pty_chr_read_poll,
e92aa36a
ZC
1659 pty_chr_read,
1660 chr, NULL);
85a67692 1661 }
6f97dba0
AL
1662 }
1663}
1664
fa943b5e 1665static void char_pty_finalize(Object *obj)
6f97dba0 1666{
fa943b5e
MAL
1667 Chardev *chr = CHARDEV(obj);
1668 PtyChardev *s = PTY_CHARDEV(obj);
6f97dba0 1669
7b3621f4
PB
1670 qemu_mutex_lock(&chr->chr_write_lock);
1671 pty_chr_state(chr, 0);
9894dc0c 1672 object_unref(OBJECT(s->ioc));
8aa33caf
AL
1673 if (s->timer_tag) {
1674 g_source_remove(s->timer_tag);
910b6368 1675 s->timer_tag = 0;
8aa33caf 1676 }
7b3621f4 1677 qemu_mutex_unlock(&chr->chr_write_lock);
a425d23f 1678 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
6f97dba0
AL
1679}
1680
777357d7
MAL
1681static void char_pty_open(Chardev *chr,
1682 ChardevBackend *backend,
1683 bool *be_opened,
1684 Error **errp)
6f97dba0 1685{
0ec7b3e7 1686 PtyChardev *s;
e68c5958 1687 int master_fd, slave_fd;
6f97dba0 1688 char pty_name[PATH_MAX];
e93a68e1 1689 char *name;
6f97dba0 1690
4efeabbb
MT
1691 master_fd = qemu_openpty_raw(&slave_fd, pty_name);
1692 if (master_fd < 0) {
c2e75a43 1693 error_setg_errno(errp, errno, "Failed to create PTY");
777357d7 1694 return;
6f97dba0
AL
1695 }
1696
837a183f 1697 close(slave_fd);
fac6688a 1698 qemu_set_nonblock(master_fd);
6f97dba0 1699
4efeabbb 1700 chr->filename = g_strdup_printf("pty:%s", pty_name);
776a32a0 1701 error_report("char device redirected to %s (label %s)",
777357d7 1702 pty_name, chr->label);
6f97dba0 1703
777357d7 1704 s = PTY_CHARDEV(chr);
9894dc0c 1705 s->ioc = QIO_CHANNEL(qio_channel_file_new_fd(master_fd));
e93a68e1
DB
1706 name = g_strdup_printf("chardev-pty-%s", chr->label);
1707 qio_channel_set_name(QIO_CHANNEL(s->ioc), name);
1708 g_free(name);
8aa33caf 1709 s->timer_tag = 0;
41ac54b2 1710 *be_opened = false;
6f97dba0
AL
1711}
1712
777357d7
MAL
1713static void char_pty_class_init(ObjectClass *oc, void *data)
1714{
1715 ChardevClass *cc = CHARDEV_CLASS(oc);
1716
1717 cc->open = char_pty_open;
1718 cc->chr_write = char_pty_chr_write;
1719 cc->chr_update_read_handler = pty_chr_update_read_handler;
1720 cc->chr_add_watch = pty_chr_add_watch;
777357d7
MAL
1721}
1722
1723static const TypeInfo char_pty_type_info = {
1724 .name = TYPE_CHARDEV_PTY,
1725 .parent = TYPE_CHARDEV,
1726 .instance_size = sizeof(PtyChardev),
fa943b5e 1727 .instance_finalize = char_pty_finalize,
777357d7 1728 .class_init = char_pty_class_init,
b68e956a
MAL
1729};
1730
6f97dba0
AL
1731static void tty_serial_init(int fd, int speed,
1732 int parity, int data_bits, int stop_bits)
1733{
1734 struct termios tty;
1735 speed_t spd;
1736
1737#if 0
1738 printf("tty_serial_init: speed=%d parity=%c data=%d stop=%d\n",
1739 speed, parity, data_bits, stop_bits);
1740#endif
1741 tcgetattr (fd, &tty);
1742
45eea13b
SW
1743#define check_speed(val) if (speed <= val) { spd = B##val; break; }
1744 speed = speed * 10 / 11;
1745 do {
1746 check_speed(50);
1747 check_speed(75);
1748 check_speed(110);
1749 check_speed(134);
1750 check_speed(150);
1751 check_speed(200);
1752 check_speed(300);
1753 check_speed(600);
1754 check_speed(1200);
1755 check_speed(1800);
1756 check_speed(2400);
1757 check_speed(4800);
1758 check_speed(9600);
1759 check_speed(19200);
1760 check_speed(38400);
1761 /* Non-Posix values follow. They may be unsupported on some systems. */
1762 check_speed(57600);
1763 check_speed(115200);
1764#ifdef B230400
1765 check_speed(230400);
1766#endif
1767#ifdef B460800
1768 check_speed(460800);
1769#endif
1770#ifdef B500000
1771 check_speed(500000);
1772#endif
1773#ifdef B576000
1774 check_speed(576000);
1775#endif
1776#ifdef B921600
1777 check_speed(921600);
1778#endif
1779#ifdef B1000000
1780 check_speed(1000000);
1781#endif
1782#ifdef B1152000
1783 check_speed(1152000);
1784#endif
1785#ifdef B1500000
1786 check_speed(1500000);
1787#endif
1788#ifdef B2000000
1789 check_speed(2000000);
1790#endif
1791#ifdef B2500000
1792 check_speed(2500000);
1793#endif
1794#ifdef B3000000
1795 check_speed(3000000);
1796#endif
1797#ifdef B3500000
1798 check_speed(3500000);
1799#endif
1800#ifdef B4000000
1801 check_speed(4000000);
1802#endif
6f97dba0 1803 spd = B115200;
45eea13b 1804 } while (0);
6f97dba0
AL
1805
1806 cfsetispeed(&tty, spd);
1807 cfsetospeed(&tty, spd);
1808
1809 tty.c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP
1810 |INLCR|IGNCR|ICRNL|IXON);
1811 tty.c_oflag |= OPOST;
1812 tty.c_lflag &= ~(ECHO|ECHONL|ICANON|IEXTEN|ISIG);
1813 tty.c_cflag &= ~(CSIZE|PARENB|PARODD|CRTSCTS|CSTOPB);
1814 switch(data_bits) {
1815 default:
1816 case 8:
1817 tty.c_cflag |= CS8;
1818 break;
1819 case 7:
1820 tty.c_cflag |= CS7;
1821 break;
1822 case 6:
1823 tty.c_cflag |= CS6;
1824 break;
1825 case 5:
1826 tty.c_cflag |= CS5;
1827 break;
1828 }
1829 switch(parity) {
1830 default:
1831 case 'N':
1832 break;
1833 case 'E':
1834 tty.c_cflag |= PARENB;
1835 break;
1836 case 'O':
1837 tty.c_cflag |= PARENB | PARODD;
1838 break;
1839 }
1840 if (stop_bits == 2)
1841 tty.c_cflag |= CSTOPB;
1842
1843 tcsetattr (fd, TCSANOW, &tty);
1844}
1845
0ec7b3e7 1846static int tty_serial_ioctl(Chardev *chr, int cmd, void *arg)
6f97dba0 1847{
777357d7 1848 FDChardev *s = FD_CHARDEV(chr);
9894dc0c 1849 QIOChannelFile *fioc = QIO_CHANNEL_FILE(s->ioc_in);
6f97dba0
AL
1850
1851 switch(cmd) {
1852 case CHR_IOCTL_SERIAL_SET_PARAMS:
1853 {
1854 QEMUSerialSetParams *ssp = arg;
9894dc0c 1855 tty_serial_init(fioc->fd,
a29753f8 1856 ssp->speed, ssp->parity,
6f97dba0
AL
1857 ssp->data_bits, ssp->stop_bits);
1858 }
1859 break;
1860 case CHR_IOCTL_SERIAL_SET_BREAK:
1861 {
1862 int enable = *(int *)arg;
a29753f8 1863 if (enable) {
9894dc0c 1864 tcsendbreak(fioc->fd, 1);
a29753f8 1865 }
6f97dba0
AL
1866 }
1867 break;
1868 case CHR_IOCTL_SERIAL_GET_TIOCM:
1869 {
1870 int sarg = 0;
1871 int *targ = (int *)arg;
9894dc0c 1872 ioctl(fioc->fd, TIOCMGET, &sarg);
6f97dba0 1873 *targ = 0;
b4abdfa4 1874 if (sarg & TIOCM_CTS)
6f97dba0 1875 *targ |= CHR_TIOCM_CTS;
b4abdfa4 1876 if (sarg & TIOCM_CAR)
6f97dba0 1877 *targ |= CHR_TIOCM_CAR;
b4abdfa4 1878 if (sarg & TIOCM_DSR)
6f97dba0 1879 *targ |= CHR_TIOCM_DSR;
b4abdfa4 1880 if (sarg & TIOCM_RI)
6f97dba0 1881 *targ |= CHR_TIOCM_RI;
b4abdfa4 1882 if (sarg & TIOCM_DTR)
6f97dba0 1883 *targ |= CHR_TIOCM_DTR;
b4abdfa4 1884 if (sarg & TIOCM_RTS)
6f97dba0
AL
1885 *targ |= CHR_TIOCM_RTS;
1886 }
1887 break;
1888 case CHR_IOCTL_SERIAL_SET_TIOCM:
1889 {
1890 int sarg = *(int *)arg;
1891 int targ = 0;
9894dc0c 1892 ioctl(fioc->fd, TIOCMGET, &targ);
b4abdfa4
AJ
1893 targ &= ~(CHR_TIOCM_CTS | CHR_TIOCM_CAR | CHR_TIOCM_DSR
1894 | CHR_TIOCM_RI | CHR_TIOCM_DTR | CHR_TIOCM_RTS);
1895 if (sarg & CHR_TIOCM_CTS)
1896 targ |= TIOCM_CTS;
1897 if (sarg & CHR_TIOCM_CAR)
1898 targ |= TIOCM_CAR;
1899 if (sarg & CHR_TIOCM_DSR)
1900 targ |= TIOCM_DSR;
1901 if (sarg & CHR_TIOCM_RI)
1902 targ |= TIOCM_RI;
1903 if (sarg & CHR_TIOCM_DTR)
6f97dba0 1904 targ |= TIOCM_DTR;
b4abdfa4 1905 if (sarg & CHR_TIOCM_RTS)
6f97dba0 1906 targ |= TIOCM_RTS;
9894dc0c 1907 ioctl(fioc->fd, TIOCMSET, &targ);
6f97dba0
AL
1908 }
1909 break;
1910 default:
1911 return -ENOTSUP;
1912 }
1913 return 0;
1914}
6f97dba0
AL
1915#endif /* __linux__ || __sun__ */
1916
1917#if defined(__linux__)
e551498e
GH
1918
1919#define HAVE_CHARDEV_PARPORT 1
1920
6f97dba0 1921typedef struct {
0ec7b3e7 1922 Chardev parent;
6f97dba0
AL
1923 int fd;
1924 int mode;
0ec7b3e7 1925} ParallelChardev;
6f97dba0 1926
777357d7
MAL
1927#define PARALLEL_CHARDEV(obj) \
1928 OBJECT_CHECK(ParallelChardev, (obj), TYPE_CHARDEV_PARALLEL)
1929
0ec7b3e7 1930static int pp_hw_mode(ParallelChardev *s, uint16_t mode)
6f97dba0
AL
1931{
1932 if (s->mode != mode) {
1933 int m = mode;
1934 if (ioctl(s->fd, PPSETMODE, &m) < 0)
1935 return 0;
1936 s->mode = mode;
1937 }
1938 return 1;
1939}
1940
0ec7b3e7 1941static int pp_ioctl(Chardev *chr, int cmd, void *arg)
6f97dba0 1942{
777357d7 1943 ParallelChardev *drv = PARALLEL_CHARDEV(chr);
6f97dba0
AL
1944 int fd = drv->fd;
1945 uint8_t b;
1946
1947 switch(cmd) {
1948 case CHR_IOCTL_PP_READ_DATA:
1949 if (ioctl(fd, PPRDATA, &b) < 0)
1950 return -ENOTSUP;
1951 *(uint8_t *)arg = b;
1952 break;
1953 case CHR_IOCTL_PP_WRITE_DATA:
1954 b = *(uint8_t *)arg;
1955 if (ioctl(fd, PPWDATA, &b) < 0)
1956 return -ENOTSUP;
1957 break;
1958 case CHR_IOCTL_PP_READ_CONTROL:
1959 if (ioctl(fd, PPRCONTROL, &b) < 0)
1960 return -ENOTSUP;
1961 /* Linux gives only the lowest bits, and no way to know data
1962 direction! For better compatibility set the fixed upper
1963 bits. */
1964 *(uint8_t *)arg = b | 0xc0;
1965 break;
1966 case CHR_IOCTL_PP_WRITE_CONTROL:
1967 b = *(uint8_t *)arg;
1968 if (ioctl(fd, PPWCONTROL, &b) < 0)
1969 return -ENOTSUP;
1970 break;
1971 case CHR_IOCTL_PP_READ_STATUS:
1972 if (ioctl(fd, PPRSTATUS, &b) < 0)
1973 return -ENOTSUP;
1974 *(uint8_t *)arg = b;
1975 break;
1976 case CHR_IOCTL_PP_DATA_DIR:
1977 if (ioctl(fd, PPDATADIR, (int *)arg) < 0)
1978 return -ENOTSUP;
1979 break;
1980 case CHR_IOCTL_PP_EPP_READ_ADDR:
1981 if (pp_hw_mode(drv, IEEE1284_MODE_EPP|IEEE1284_ADDR)) {
1982 struct ParallelIOArg *parg = arg;
1983 int n = read(fd, parg->buffer, parg->count);
1984 if (n != parg->count) {
1985 return -EIO;
1986 }
1987 }
1988 break;
1989 case CHR_IOCTL_PP_EPP_READ:
1990 if (pp_hw_mode(drv, IEEE1284_MODE_EPP)) {
1991 struct ParallelIOArg *parg = arg;
1992 int n = read(fd, parg->buffer, parg->count);
1993 if (n != parg->count) {
1994 return -EIO;
1995 }
1996 }
1997 break;
1998 case CHR_IOCTL_PP_EPP_WRITE_ADDR:
1999 if (pp_hw_mode(drv, IEEE1284_MODE_EPP|IEEE1284_ADDR)) {
2000 struct ParallelIOArg *parg = arg;
2001 int n = write(fd, parg->buffer, parg->count);
2002 if (n != parg->count) {
2003 return -EIO;
2004 }
2005 }
2006 break;
2007 case CHR_IOCTL_PP_EPP_WRITE:
2008 if (pp_hw_mode(drv, IEEE1284_MODE_EPP)) {
2009 struct ParallelIOArg *parg = arg;
2010 int n = write(fd, parg->buffer, parg->count);
2011 if (n != parg->count) {
2012 return -EIO;
2013 }
2014 }
2015 break;
2016 default:
2017 return -ENOTSUP;
2018 }
2019 return 0;
2020}
2021
777357d7
MAL
2022static void qemu_chr_open_pp_fd(Chardev *chr,
2023 int fd,
2024 bool *be_opened,
2025 Error **errp)
6f97dba0 2026{
777357d7 2027 ParallelChardev *drv = PARALLEL_CHARDEV(chr);
6f97dba0
AL
2028
2029 if (ioctl(fd, PPCLAIM) < 0) {
38bfb1a6 2030 error_setg_errno(errp, errno, "not a parallel port");
6f97dba0 2031 close(fd);
777357d7 2032 return;
d0d7708b 2033 }
27ef9cb0 2034
27ef9cb0
PB
2035 drv->fd = fd;
2036 drv->mode = IEEE1284_MODE_COMPAT;
6f97dba0
AL
2037}
2038#endif /* __linux__ */
2039
a167ba50 2040#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
e551498e
GH
2041
2042#define HAVE_CHARDEV_PARPORT 1
2043
41ac54b2 2044typedef struct {
0ec7b3e7 2045 Chardev parent;
41ac54b2 2046 int fd;
0ec7b3e7 2047} ParallelChardev;
41ac54b2 2048
777357d7
MAL
2049#define PARALLEL_CHARDEV(obj) \
2050 OBJECT_CHECK(ParallelChardev, (obj), TYPE_CHARDEV_PARALLEL)
2051
0ec7b3e7 2052static int pp_ioctl(Chardev *chr, int cmd, void *arg)
6972f935 2053{
777357d7 2054 ParallelChardev *drv = PARALLEL_CHARDEV(chr);
6972f935
BS
2055 uint8_t b;
2056
41ac54b2 2057 switch (cmd) {
6972f935 2058 case CHR_IOCTL_PP_READ_DATA:
41ac54b2 2059 if (ioctl(drv->fd, PPIGDATA, &b) < 0) {
6972f935 2060 return -ENOTSUP;
41ac54b2 2061 }
6972f935
BS
2062 *(uint8_t *)arg = b;
2063 break;
2064 case CHR_IOCTL_PP_WRITE_DATA:
2065 b = *(uint8_t *)arg;
41ac54b2 2066 if (ioctl(drv->fd, PPISDATA, &b) < 0) {
6972f935 2067 return -ENOTSUP;
41ac54b2 2068 }
6972f935
BS
2069 break;
2070 case CHR_IOCTL_PP_READ_CONTROL:
41ac54b2 2071 if (ioctl(drv->fd, PPIGCTRL, &b) < 0) {
6972f935 2072 return -ENOTSUP;
41ac54b2 2073 }
6972f935
BS
2074 *(uint8_t *)arg = b;
2075 break;
2076 case CHR_IOCTL_PP_WRITE_CONTROL:
2077 b = *(uint8_t *)arg;
41ac54b2 2078 if (ioctl(drv->fd, PPISCTRL, &b) < 0) {
6972f935 2079 return -ENOTSUP;
41ac54b2 2080 }
6972f935
BS
2081 break;
2082 case CHR_IOCTL_PP_READ_STATUS:
41ac54b2 2083 if (ioctl(drv->fd, PPIGSTATUS, &b) < 0) {
6972f935 2084 return -ENOTSUP;
41ac54b2 2085 }
6972f935
BS
2086 *(uint8_t *)arg = b;
2087 break;
2088 default:
2089 return -ENOTSUP;
2090 }
2091 return 0;
2092}
2093
777357d7
MAL
2094static void qemu_chr_open_pp_fd(Chardev *chr,
2095 int fd,
2096 bool *be_opened,
2097 Error **errp)
6972f935 2098{
777357d7 2099 ParallelChardev *drv = PARALLEL_CHARDEV(chr);
41ac54b2 2100 drv->fd = fd;
82878dac 2101 *be_opened = false;
6972f935
BS
2102}
2103#endif
2104
6f97dba0
AL
2105#else /* _WIN32 */
2106
d809ab95
PB
2107#define HAVE_CHARDEV_SERIAL 1
2108
6f97dba0 2109typedef struct {
0ec7b3e7 2110 Chardev parent;
6f97dba0
AL
2111 int max_size;
2112 HANDLE hcom, hrecv, hsend;
9005b2a7 2113 OVERLAPPED orecv;
6f97dba0
AL
2114 BOOL fpipe;
2115 DWORD len;
9005b2a7 2116
0ec7b3e7 2117 /* Protected by the Chardev chr_write_lock. */
9005b2a7 2118 OVERLAPPED osend;
c266d94e
MAL
2119 /* FIXME: file/console do not finalize */
2120 bool skip_free;
0ec7b3e7 2121} WinChardev;
6f97dba0 2122
777357d7
MAL
2123#define TYPE_CHARDEV_WIN "chardev-win"
2124#define WIN_CHARDEV(obj) OBJECT_CHECK(WinChardev, (obj), TYPE_CHARDEV_WIN)
2125
db418a0a 2126typedef struct {
0ec7b3e7 2127 Chardev parent;
db418a0a
FC
2128 HANDLE hStdIn;
2129 HANDLE hInputReadyEvent;
2130 HANDLE hInputDoneEvent;
2131 HANDLE hInputThread;
2132 uint8_t win_stdio_buf;
0ec7b3e7 2133} WinStdioChardev;
db418a0a 2134
777357d7
MAL
2135#define TYPE_CHARDEV_WIN_STDIO "chardev-win-stdio"
2136#define WIN_STDIO_CHARDEV(obj) \
2137 OBJECT_CHECK(WinStdioChardev, (obj), TYPE_CHARDEV_WIN_STDIO)
2138
6f97dba0
AL
2139#define NSENDBUF 2048
2140#define NRECVBUF 2048
2141#define MAXCONNECT 1
2142#define NTIMEOUT 5000
2143
2144static int win_chr_poll(void *opaque);
2145static int win_chr_pipe_poll(void *opaque);
2146
53a5736f 2147static void char_win_finalize(Object *obj)
6f97dba0 2148{
53a5736f 2149 Chardev *chr = CHARDEV(obj);
777357d7 2150 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0 2151
c266d94e
MAL
2152 if (s->skip_free) {
2153 return;
2154 }
2155
6f97dba0
AL
2156 if (s->hsend) {
2157 CloseHandle(s->hsend);
6f97dba0
AL
2158 }
2159 if (s->hrecv) {
2160 CloseHandle(s->hrecv);
6f97dba0
AL
2161 }
2162 if (s->hcom) {
2163 CloseHandle(s->hcom);
6f97dba0
AL
2164 }
2165 if (s->fpipe)
2166 qemu_del_polling_cb(win_chr_pipe_poll, chr);
2167 else
2168 qemu_del_polling_cb(win_chr_poll, chr);
793cbfb5 2169
a425d23f 2170 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
6f97dba0
AL
2171}
2172
0ec7b3e7 2173static int win_chr_init(Chardev *chr, const char *filename, Error **errp)
6f97dba0 2174{
777357d7 2175 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0
AL
2176 COMMCONFIG comcfg;
2177 COMMTIMEOUTS cto = { 0, 0, 0, 0, 0};
2178 COMSTAT comstat;
2179 DWORD size;
2180 DWORD err;
2181
2182 s->hsend = CreateEvent(NULL, TRUE, FALSE, NULL);
2183 if (!s->hsend) {
6511d396 2184 error_setg(errp, "Failed CreateEvent");
6f97dba0
AL
2185 goto fail;
2186 }
2187 s->hrecv = CreateEvent(NULL, TRUE, FALSE, NULL);
2188 if (!s->hrecv) {
6511d396 2189 error_setg(errp, "Failed CreateEvent");
6f97dba0
AL
2190 goto fail;
2191 }
2192
2193 s->hcom = CreateFile(filename, GENERIC_READ|GENERIC_WRITE, 0, NULL,
2194 OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0);
2195 if (s->hcom == INVALID_HANDLE_VALUE) {
6511d396 2196 error_setg(errp, "Failed CreateFile (%lu)", GetLastError());
6f97dba0
AL
2197 s->hcom = NULL;
2198 goto fail;
2199 }
2200
2201 if (!SetupComm(s->hcom, NRECVBUF, NSENDBUF)) {
6511d396 2202 error_setg(errp, "Failed SetupComm");
6f97dba0
AL
2203 goto fail;
2204 }
2205
2206 ZeroMemory(&comcfg, sizeof(COMMCONFIG));
2207 size = sizeof(COMMCONFIG);
2208 GetDefaultCommConfig(filename, &comcfg, &size);
2209 comcfg.dcb.DCBlength = sizeof(DCB);
2210 CommConfigDialog(filename, NULL, &comcfg);
2211
2212 if (!SetCommState(s->hcom, &comcfg.dcb)) {
6511d396 2213 error_setg(errp, "Failed SetCommState");
6f97dba0
AL
2214 goto fail;
2215 }
2216
2217 if (!SetCommMask(s->hcom, EV_ERR)) {
6511d396 2218 error_setg(errp, "Failed SetCommMask");
6f97dba0
AL
2219 goto fail;
2220 }
2221
2222 cto.ReadIntervalTimeout = MAXDWORD;
2223 if (!SetCommTimeouts(s->hcom, &cto)) {
6511d396 2224 error_setg(errp, "Failed SetCommTimeouts");
6f97dba0
AL
2225 goto fail;
2226 }
2227
2228 if (!ClearCommError(s->hcom, &err, &comstat)) {
6511d396 2229 error_setg(errp, "Failed ClearCommError");
6f97dba0
AL
2230 goto fail;
2231 }
2232 qemu_add_polling_cb(win_chr_poll, chr);
2233 return 0;
2234
2235 fail:
6f97dba0
AL
2236 return -1;
2237}
2238
9005b2a7 2239/* Called with chr_write_lock held. */
0ec7b3e7 2240static int win_chr_write(Chardev *chr, const uint8_t *buf, int len1)
6f97dba0 2241{
777357d7 2242 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0
AL
2243 DWORD len, ret, size, err;
2244
2245 len = len1;
2246 ZeroMemory(&s->osend, sizeof(s->osend));
2247 s->osend.hEvent = s->hsend;
2248 while (len > 0) {
2249 if (s->hsend)
2250 ret = WriteFile(s->hcom, buf, len, &size, &s->osend);
2251 else
2252 ret = WriteFile(s->hcom, buf, len, &size, NULL);
2253 if (!ret) {
2254 err = GetLastError();
2255 if (err == ERROR_IO_PENDING) {
2256 ret = GetOverlappedResult(s->hcom, &s->osend, &size, TRUE);
2257 if (ret) {
2258 buf += size;
2259 len -= size;
2260 } else {
2261 break;
2262 }
2263 } else {
2264 break;
2265 }
2266 } else {
2267 buf += size;
2268 len -= size;
2269 }
2270 }
2271 return len1 - len;
2272}
2273
0ec7b3e7 2274static int win_chr_read_poll(Chardev *chr)
6f97dba0 2275{
777357d7 2276 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0 2277
909cda12 2278 s->max_size = qemu_chr_be_can_write(chr);
6f97dba0
AL
2279 return s->max_size;
2280}
2281
0ec7b3e7 2282static void win_chr_readfile(Chardev *chr)
6f97dba0 2283{
777357d7
MAL
2284 WinChardev *s = WIN_CHARDEV(chr);
2285
6f97dba0 2286 int ret, err;
9bd7854e 2287 uint8_t buf[READ_BUF_LEN];
6f97dba0
AL
2288 DWORD size;
2289
2290 ZeroMemory(&s->orecv, sizeof(s->orecv));
2291 s->orecv.hEvent = s->hrecv;
2292 ret = ReadFile(s->hcom, buf, s->len, &size, &s->orecv);
2293 if (!ret) {
2294 err = GetLastError();
2295 if (err == ERROR_IO_PENDING) {
2296 ret = GetOverlappedResult(s->hcom, &s->orecv, &size, TRUE);
2297 }
2298 }
2299
2300 if (size > 0) {
fa5efccb 2301 qemu_chr_be_write(chr, buf, size);
6f97dba0
AL
2302 }
2303}
2304
0ec7b3e7 2305static void win_chr_read(Chardev *chr)
6f97dba0 2306{
777357d7 2307 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0
AL
2308
2309 if (s->len > s->max_size)
2310 s->len = s->max_size;
2311 if (s->len == 0)
2312 return;
2313
2314 win_chr_readfile(chr);
2315}
2316
2317static int win_chr_poll(void *opaque)
2318{
777357d7
MAL
2319 Chardev *chr = CHARDEV(opaque);
2320 WinChardev *s = WIN_CHARDEV(opaque);
6f97dba0
AL
2321 COMSTAT status;
2322 DWORD comerr;
2323
2324 ClearCommError(s->hcom, &comerr, &status);
2325 if (status.cbInQue > 0) {
2326 s->len = status.cbInQue;
2327 win_chr_read_poll(chr);
2328 win_chr_read(chr);
2329 return 1;
2330 }
2331 return 0;
2332}
2333
6f97dba0
AL
2334static int win_chr_pipe_poll(void *opaque)
2335{
777357d7
MAL
2336 Chardev *chr = CHARDEV(opaque);
2337 WinChardev *s = WIN_CHARDEV(opaque);
6f97dba0
AL
2338 DWORD size;
2339
2340 PeekNamedPipe(s->hcom, NULL, 0, NULL, &size, NULL);
2341 if (size > 0) {
2342 s->len = size;
2343 win_chr_read_poll(chr);
2344 win_chr_read(chr);
2345 return 1;
2346 }
2347 return 0;
2348}
2349
0ec7b3e7 2350static int win_chr_pipe_init(Chardev *chr, const char *filename,
20cbe7a2 2351 Error **errp)
6f97dba0 2352{
777357d7 2353 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0
AL
2354 OVERLAPPED ov;
2355 int ret;
2356 DWORD size;
0ff0fad2 2357 char *openname;
6f97dba0
AL
2358
2359 s->fpipe = TRUE;
2360
2361 s->hsend = CreateEvent(NULL, TRUE, FALSE, NULL);
2362 if (!s->hsend) {
20cbe7a2 2363 error_setg(errp, "Failed CreateEvent");
6f97dba0
AL
2364 goto fail;
2365 }
2366 s->hrecv = CreateEvent(NULL, TRUE, FALSE, NULL);
2367 if (!s->hrecv) {
20cbe7a2 2368 error_setg(errp, "Failed CreateEvent");
6f97dba0
AL
2369 goto fail;
2370 }
2371
0ff0fad2 2372 openname = g_strdup_printf("\\\\.\\pipe\\%s", filename);
6f97dba0
AL
2373 s->hcom = CreateNamedPipe(openname, PIPE_ACCESS_DUPLEX | FILE_FLAG_OVERLAPPED,
2374 PIPE_TYPE_BYTE | PIPE_READMODE_BYTE |
2375 PIPE_WAIT,
2376 MAXCONNECT, NSENDBUF, NRECVBUF, NTIMEOUT, NULL);
0ff0fad2 2377 g_free(openname);
6f97dba0 2378 if (s->hcom == INVALID_HANDLE_VALUE) {
20cbe7a2 2379 error_setg(errp, "Failed CreateNamedPipe (%lu)", GetLastError());
6f97dba0
AL
2380 s->hcom = NULL;
2381 goto fail;
2382 }
2383
2384 ZeroMemory(&ov, sizeof(ov));
2385 ov.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
2386 ret = ConnectNamedPipe(s->hcom, &ov);
2387 if (ret) {
20cbe7a2 2388 error_setg(errp, "Failed ConnectNamedPipe");
6f97dba0
AL
2389 goto fail;
2390 }
2391
2392 ret = GetOverlappedResult(s->hcom, &ov, &size, TRUE);
2393 if (!ret) {
20cbe7a2 2394 error_setg(errp, "Failed GetOverlappedResult");
6f97dba0
AL
2395 if (ov.hEvent) {
2396 CloseHandle(ov.hEvent);
2397 ov.hEvent = NULL;
2398 }
2399 goto fail;
2400 }
2401
2402 if (ov.hEvent) {
2403 CloseHandle(ov.hEvent);
2404 ov.hEvent = NULL;
2405 }
2406 qemu_add_polling_cb(win_chr_pipe_poll, chr);
2407 return 0;
2408
2409 fail:
6f97dba0
AL
2410 return -1;
2411}
2412
2413
777357d7
MAL
2414static void qemu_chr_open_pipe(Chardev *chr,
2415 ChardevBackend *backend,
2416 bool *be_opened,
2417 Error **errp)
6f97dba0 2418{
32bafa8f 2419 ChardevHostdev *opts = backend->u.pipe.data;
548cbb36 2420 const char *filename = opts->device;
6f97dba0 2421
20cbe7a2 2422 if (win_chr_pipe_init(chr, filename, errp) < 0) {
777357d7 2423 return;
6f97dba0 2424 }
6f97dba0
AL
2425}
2426
777357d7 2427static void qemu_chr_open_win_file(Chardev *chr, HANDLE fd_out)
6f97dba0 2428{
777357d7 2429 WinChardev *s = WIN_CHARDEV(chr);
6f97dba0 2430
c266d94e 2431 s->skip_free = true;
6f97dba0 2432 s->hcom = fd_out;
6f97dba0
AL
2433}
2434
777357d7 2435static void char_win_class_init(ObjectClass *oc, void *data)
6f97dba0 2436{
777357d7
MAL
2437 ChardevClass *cc = CHARDEV_CLASS(oc);
2438
2439 cc->chr_write = win_chr_write;
6f97dba0
AL
2440}
2441
777357d7
MAL
2442static const TypeInfo char_win_type_info = {
2443 .name = TYPE_CHARDEV_WIN,
2444 .parent = TYPE_CHARDEV,
0ec7b3e7 2445 .instance_size = sizeof(WinChardev),
53a5736f 2446 .instance_finalize = char_win_finalize,
777357d7
MAL
2447 .class_init = char_win_class_init,
2448 .abstract = true,
2449};
2450
2451static void qemu_chr_open_win_con(Chardev *chr,
2452 ChardevBackend *backend,
2453 bool *be_opened,
2454 Error **errp)
2455{
2456 qemu_chr_open_win_file(chr, GetStdHandle(STD_OUTPUT_HANDLE));
2457}
2458
777357d7
MAL
2459static void char_console_class_init(ObjectClass *oc, void *data)
2460{
2461 ChardevClass *cc = CHARDEV_CLASS(oc);
2462
2463 cc->open = qemu_chr_open_win_con;
777357d7
MAL
2464}
2465
2466static const TypeInfo char_console_type_info = {
2467 .name = TYPE_CHARDEV_CONSOLE,
2468 .parent = TYPE_CHARDEV_WIN,
2469 .class_init = char_console_class_init,
b68e956a
MAL
2470};
2471
0ec7b3e7 2472static int win_stdio_write(Chardev *chr, const uint8_t *buf, int len)
db418a0a
FC
2473{
2474 HANDLE hStdOut = GetStdHandle(STD_OUTPUT_HANDLE);
2475 DWORD dwSize;
2476 int len1;
2477
2478 len1 = len;
2479
2480 while (len1 > 0) {
2481 if (!WriteFile(hStdOut, buf, len1, &dwSize, NULL)) {
2482 break;
2483 }
2484 buf += dwSize;
2485 len1 -= dwSize;
2486 }
2487
2488 return len - len1;
2489}
2490
2491static void win_stdio_wait_func(void *opaque)
2492{
777357d7
MAL
2493 Chardev *chr = CHARDEV(opaque);
2494 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(opaque);
db418a0a
FC
2495 INPUT_RECORD buf[4];
2496 int ret;
2497 DWORD dwSize;
2498 int i;
2499
dff7424d 2500 ret = ReadConsoleInput(stdio->hStdIn, buf, ARRAY_SIZE(buf), &dwSize);
db418a0a
FC
2501
2502 if (!ret) {
2503 /* Avoid error storm */
2504 qemu_del_wait_object(stdio->hStdIn, NULL, NULL);
2505 return;
2506 }
2507
2508 for (i = 0; i < dwSize; i++) {
2509 KEY_EVENT_RECORD *kev = &buf[i].Event.KeyEvent;
2510
2511 if (buf[i].EventType == KEY_EVENT && kev->bKeyDown) {
2512 int j;
2513 if (kev->uChar.AsciiChar != 0) {
2514 for (j = 0; j < kev->wRepeatCount; j++) {
2515 if (qemu_chr_be_can_write(chr)) {
2516 uint8_t c = kev->uChar.AsciiChar;
2517 qemu_chr_be_write(chr, &c, 1);
2518 }
2519 }
2520 }
2521 }
2522 }
2523}
2524
2525static DWORD WINAPI win_stdio_thread(LPVOID param)
2526{
777357d7 2527 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(param);
db418a0a
FC
2528 int ret;
2529 DWORD dwSize;
2530
2531 while (1) {
2532
2533 /* Wait for one byte */
2534 ret = ReadFile(stdio->hStdIn, &stdio->win_stdio_buf, 1, &dwSize, NULL);
2535
2536 /* Exit in case of error, continue if nothing read */
2537 if (!ret) {
2538 break;
2539 }
2540 if (!dwSize) {
2541 continue;
2542 }
2543
2544 /* Some terminal emulator returns \r\n for Enter, just pass \n */
2545 if (stdio->win_stdio_buf == '\r') {
2546 continue;
2547 }
2548
2549 /* Signal the main thread and wait until the byte was eaten */
2550 if (!SetEvent(stdio->hInputReadyEvent)) {
2551 break;
2552 }
2553 if (WaitForSingleObject(stdio->hInputDoneEvent, INFINITE)
2554 != WAIT_OBJECT_0) {
2555 break;
2556 }
2557 }
2558
2559 qemu_del_wait_object(stdio->hInputReadyEvent, NULL, NULL);
2560 return 0;
2561}
2562
2563static void win_stdio_thread_wait_func(void *opaque)
2564{
777357d7
MAL
2565 Chardev *chr = CHARDEV(opaque);
2566 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(opaque);
db418a0a
FC
2567
2568 if (qemu_chr_be_can_write(chr)) {
2569 qemu_chr_be_write(chr, &stdio->win_stdio_buf, 1);
2570 }
2571
2572 SetEvent(stdio->hInputDoneEvent);
2573}
2574
0ec7b3e7 2575static void qemu_chr_set_echo_win_stdio(Chardev *chr, bool echo)
db418a0a 2576{
777357d7 2577 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(chr);
db418a0a
FC
2578 DWORD dwMode = 0;
2579
2580 GetConsoleMode(stdio->hStdIn, &dwMode);
2581
2582 if (echo) {
2583 SetConsoleMode(stdio->hStdIn, dwMode | ENABLE_ECHO_INPUT);
2584 } else {
2585 SetConsoleMode(stdio->hStdIn, dwMode & ~ENABLE_ECHO_INPUT);
2586 }
2587}
2588
1566b0c4 2589static void char_win_stdio_finalize(Object *obj)
db418a0a 2590{
1566b0c4 2591 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(obj);
db418a0a
FC
2592
2593 if (stdio->hInputReadyEvent != INVALID_HANDLE_VALUE) {
2594 CloseHandle(stdio->hInputReadyEvent);
2595 }
2596 if (stdio->hInputDoneEvent != INVALID_HANDLE_VALUE) {
2597 CloseHandle(stdio->hInputDoneEvent);
2598 }
2599 if (stdio->hInputThread != INVALID_HANDLE_VALUE) {
2600 TerminateThread(stdio->hInputThread, 0);
2601 }
db418a0a
FC
2602}
2603
777357d7
MAL
2604static const TypeInfo char_win_stdio_type_info = {
2605 .name = TYPE_CHARDEV_WIN_STDIO,
2606 .parent = TYPE_CHARDEV,
2607 .instance_size = sizeof(WinStdioChardev),
1566b0c4 2608 .instance_finalize = char_win_stdio_finalize,
777357d7
MAL
2609 .abstract = true,
2610};
2611
2612static void qemu_chr_open_stdio(Chardev *chr,
2613 ChardevBackend *backend,
2614 bool *be_opened,
2615 Error **errp)
db418a0a 2616{
777357d7 2617 WinStdioChardev *stdio = WIN_STDIO_CHARDEV(chr);
db418a0a
FC
2618 DWORD dwMode;
2619 int is_console = 0;
db418a0a
FC
2620
2621 stdio->hStdIn = GetStdHandle(STD_INPUT_HANDLE);
2622 if (stdio->hStdIn == INVALID_HANDLE_VALUE) {
8c84b25d 2623 error_setg(errp, "cannot open stdio: invalid handle");
777357d7 2624 return;
db418a0a
FC
2625 }
2626
2627 is_console = GetConsoleMode(stdio->hStdIn, &dwMode) != 0;
2628
ed7a1540
AL
2629 if (is_console) {
2630 if (qemu_add_wait_object(stdio->hStdIn,
2631 win_stdio_wait_func, chr)) {
8c84b25d
PB
2632 error_setg(errp, "qemu_add_wait_object: failed");
2633 goto err1;
ed7a1540
AL
2634 }
2635 } else {
2636 DWORD dwId;
2637
2638 stdio->hInputReadyEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
2639 stdio->hInputDoneEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
8c84b25d 2640 if (stdio->hInputReadyEvent == INVALID_HANDLE_VALUE
ed7a1540 2641 || stdio->hInputDoneEvent == INVALID_HANDLE_VALUE) {
8c84b25d
PB
2642 error_setg(errp, "cannot create event");
2643 goto err2;
ed7a1540
AL
2644 }
2645 if (qemu_add_wait_object(stdio->hInputReadyEvent,
2646 win_stdio_thread_wait_func, chr)) {
8c84b25d
PB
2647 error_setg(errp, "qemu_add_wait_object: failed");
2648 goto err2;
2649 }
2650 stdio->hInputThread = CreateThread(NULL, 0, win_stdio_thread,
2651 chr, 0, &dwId);
2652
2653 if (stdio->hInputThread == INVALID_HANDLE_VALUE) {
2654 error_setg(errp, "cannot create stdio thread");
2655 goto err3;
db418a0a
FC
2656 }
2657 }
2658
2659 dwMode |= ENABLE_LINE_INPUT;
2660
ed7a1540 2661 if (is_console) {
db418a0a
FC
2662 /* set the terminal in raw mode */
2663 /* ENABLE_QUICK_EDIT_MODE | ENABLE_EXTENDED_FLAGS */
2664 dwMode |= ENABLE_PROCESSED_INPUT;
2665 }
2666
2667 SetConsoleMode(stdio->hStdIn, dwMode);
2668
5345fdb4 2669 qemu_chr_set_echo_win_stdio(chr, false);
db418a0a 2670
777357d7 2671 return;
8c84b25d
PB
2672
2673err3:
2674 qemu_del_wait_object(stdio->hInputReadyEvent, NULL, NULL);
2675err2:
2676 CloseHandle(stdio->hInputReadyEvent);
2677 CloseHandle(stdio->hInputDoneEvent);
2678err1:
2679 qemu_del_wait_object(stdio->hStdIn, NULL, NULL);
db418a0a 2680}
6f97dba0
AL
2681#endif /* !_WIN32 */
2682
2683/***********************************************************/
2684/* UDP Net console */
2685
2686typedef struct {
0ec7b3e7 2687 Chardev parent;
9894dc0c 2688 QIOChannel *ioc;
9bd7854e 2689 uint8_t buf[READ_BUF_LEN];
6f97dba0
AL
2690 int bufcnt;
2691 int bufptr;
2692 int max_size;
1876ed04 2693} UdpChardev;
6f97dba0 2694
777357d7
MAL
2695#define UDP_CHARDEV(obj) OBJECT_CHECK(UdpChardev, (obj), TYPE_CHARDEV_UDP)
2696
9005b2a7 2697/* Called with chr_write_lock held. */
0ec7b3e7 2698static int udp_chr_write(Chardev *chr, const uint8_t *buf, int len)
6f97dba0 2699{
777357d7 2700 UdpChardev *s = UDP_CHARDEV(chr);
76a9644b 2701
9894dc0c
DB
2702 return qio_channel_write(
2703 s->ioc, (const char *)buf, len, NULL);
6f97dba0
AL
2704}
2705
2706static int udp_chr_read_poll(void *opaque)
2707{
777357d7
MAL
2708 Chardev *chr = CHARDEV(opaque);
2709 UdpChardev *s = UDP_CHARDEV(opaque);
6f97dba0 2710
909cda12 2711 s->max_size = qemu_chr_be_can_write(chr);
6f97dba0
AL
2712
2713 /* If there were any stray characters in the queue process them
2714 * first
2715 */
2716 while (s->max_size > 0 && s->bufptr < s->bufcnt) {
fa5efccb 2717 qemu_chr_be_write(chr, &s->buf[s->bufptr], 1);
6f97dba0 2718 s->bufptr++;
909cda12 2719 s->max_size = qemu_chr_be_can_write(chr);
6f97dba0
AL
2720 }
2721 return s->max_size;
2722}
2723
9894dc0c 2724static gboolean udp_chr_read(QIOChannel *chan, GIOCondition cond, void *opaque)
6f97dba0 2725{
777357d7
MAL
2726 Chardev *chr = CHARDEV(opaque);
2727 UdpChardev *s = UDP_CHARDEV(opaque);
9894dc0c 2728 ssize_t ret;
6f97dba0 2729
cdbf6e16
PB
2730 if (s->max_size == 0) {
2731 return TRUE;
2732 }
9894dc0c
DB
2733 ret = qio_channel_read(
2734 s->ioc, (char *)s->buf, sizeof(s->buf), NULL);
2735 if (ret <= 0) {
26da70c7 2736 remove_fd_in_watch(chr);
76a9644b
AL
2737 return FALSE;
2738 }
9894dc0c 2739 s->bufcnt = ret;
6f97dba0
AL
2740
2741 s->bufptr = 0;
2742 while (s->max_size > 0 && s->bufptr < s->bufcnt) {
fa5efccb 2743 qemu_chr_be_write(chr, &s->buf[s->bufptr], 1);
6f97dba0 2744 s->bufptr++;
909cda12 2745 s->max_size = qemu_chr_be_can_write(chr);
6f97dba0 2746 }
76a9644b
AL
2747
2748 return TRUE;
6f97dba0
AL
2749}
2750
0ec7b3e7 2751static void udp_chr_update_read_handler(Chardev *chr,
a4afa548 2752 GMainContext *context)
6f97dba0 2753{
777357d7 2754 UdpChardev *s = UDP_CHARDEV(chr);
6f97dba0 2755
26da70c7 2756 remove_fd_in_watch(chr);
9894dc0c 2757 if (s->ioc) {
e93a68e1 2758 chr->fd_in_tag = io_add_watch_poll(chr, s->ioc,
9894dc0c 2759 udp_chr_read_poll,
e92aa36a
ZC
2760 udp_chr_read, chr,
2761 context);
6f97dba0
AL
2762 }
2763}
2764
819aad23 2765static void char_udp_finalize(Object *obj)
819f56b7 2766{
819aad23
MAL
2767 Chardev *chr = CHARDEV(obj);
2768 UdpChardev *s = UDP_CHARDEV(obj);
26da70c7
AS
2769
2770 remove_fd_in_watch(chr);
9894dc0c
DB
2771 if (s->ioc) {
2772 object_unref(OBJECT(s->ioc));
819f56b7 2773 }
a425d23f 2774 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
819f56b7
AL
2775}
2776
6f97dba0
AL
2777/***********************************************************/
2778/* TCP Net console */
2779
2780typedef struct {
0ec7b3e7 2781 Chardev parent;
a8fb5427
DB
2782 QIOChannel *ioc; /* Client I/O channel */
2783 QIOChannelSocket *sioc; /* Client master channel */
9894dc0c 2784 QIOChannelSocket *listen_ioc;
7ba9addc 2785 guint listen_tag;
a8fb5427 2786 QCryptoTLSCreds *tls_creds;
6f97dba0
AL
2787 int connected;
2788 int max_size;
2789 int do_telnetopt;
2790 int do_nodelay;
2791 int is_unix;
c76bf6bb 2792 int *read_msgfds;
9894dc0c 2793 size_t read_msgfds_num;
d39aac7a 2794 int *write_msgfds;
9894dc0c 2795 size_t write_msgfds_num;
cfb429cb
CM
2796
2797 SocketAddress *addr;
2798 bool is_listen;
2799 bool is_telnet;
5dd1f02b
CM
2800
2801 guint reconnect_timer;
2802 int64_t reconnect_time;
5008e5b7 2803 bool connect_err_reported;
1876ed04 2804} SocketChardev;
6f97dba0 2805
777357d7
MAL
2806#define SOCKET_CHARDEV(obj) \
2807 OBJECT_CHECK(SocketChardev, (obj), TYPE_CHARDEV_SOCKET)
2808
5dd1f02b
CM
2809static gboolean socket_reconnect_timeout(gpointer opaque);
2810
0ec7b3e7 2811static void qemu_chr_socket_restart_timer(Chardev *chr)
5dd1f02b 2812{
777357d7 2813 SocketChardev *s = SOCKET_CHARDEV(chr);
e93a68e1 2814 char *name;
41ac54b2 2815
5dd1f02b
CM
2816 assert(s->connected == 0);
2817 s->reconnect_timer = g_timeout_add_seconds(s->reconnect_time,
2818 socket_reconnect_timeout, chr);
e93a68e1
DB
2819 name = g_strdup_printf("chardev-socket-reconnect-%s", chr->label);
2820 g_source_set_name_by_id(s->reconnect_timer, name);
2821 g_free(name);
5dd1f02b
CM
2822}
2823
0ec7b3e7 2824static void check_report_connect_error(Chardev *chr,
5008e5b7
CM
2825 Error *err)
2826{
777357d7 2827 SocketChardev *s = SOCKET_CHARDEV(chr);
5008e5b7
CM
2828
2829 if (!s->connect_err_reported) {
2830 error_report("Unable to connect character device %s: %s",
2831 chr->label, error_get_pretty(err));
2832 s->connect_err_reported = true;
2833 }
2834 qemu_chr_socket_restart_timer(chr);
2835}
2836
9894dc0c
DB
2837static gboolean tcp_chr_accept(QIOChannel *chan,
2838 GIOCondition cond,
2839 void *opaque);
d39aac7a 2840
9005b2a7 2841/* Called with chr_write_lock held. */
0ec7b3e7 2842static int tcp_chr_write(Chardev *chr, const uint8_t *buf, int len)
6f97dba0 2843{
777357d7 2844 SocketChardev *s = SOCKET_CHARDEV(chr);
41ac54b2 2845
6f97dba0 2846 if (s->connected) {
9894dc0c
DB
2847 int ret = io_channel_send_full(s->ioc, buf, len,
2848 s->write_msgfds,
2849 s->write_msgfds_num);
2850
2851 /* free the written msgfds, no matter what */
2852 if (s->write_msgfds_num) {
2853 g_free(s->write_msgfds);
2854 s->write_msgfds = 0;
2855 s->write_msgfds_num = 0;
d39aac7a 2856 }
9894dc0c
DB
2857
2858 return ret;
455aa1e0 2859 } else {
6db0fdce 2860 /* XXX: indicate an error ? */
455aa1e0 2861 return len;
6f97dba0
AL
2862 }
2863}
2864
2865static int tcp_chr_read_poll(void *opaque)
2866{
777357d7
MAL
2867 Chardev *chr = CHARDEV(opaque);
2868 SocketChardev *s = SOCKET_CHARDEV(opaque);
6f97dba0
AL
2869 if (!s->connected)
2870 return 0;
909cda12 2871 s->max_size = qemu_chr_be_can_write(chr);
6f97dba0
AL
2872 return s->max_size;
2873}
2874
2875#define IAC 255
2876#define IAC_BREAK 243
0ec7b3e7 2877static void tcp_chr_process_IAC_bytes(Chardev *chr,
1876ed04 2878 SocketChardev *s,
6f97dba0
AL
2879 uint8_t *buf, int *size)
2880{
2881 /* Handle any telnet client's basic IAC options to satisfy char by
2882 * char mode with no echo. All IAC options will be removed from
2883 * the buf and the do_telnetopt variable will be used to track the
2884 * state of the width of the IAC information.
2885 *
2886 * IAC commands come in sets of 3 bytes with the exception of the
2887 * "IAC BREAK" command and the double IAC.
2888 */
2889
2890 int i;
2891 int j = 0;
2892
2893 for (i = 0; i < *size; i++) {
2894 if (s->do_telnetopt > 1) {
2895 if ((unsigned char)buf[i] == IAC && s->do_telnetopt == 2) {
2896 /* Double IAC means send an IAC */
2897 if (j != i)
2898 buf[j] = buf[i];
2899 j++;
2900 s->do_telnetopt = 1;
2901 } else {
2902 if ((unsigned char)buf[i] == IAC_BREAK && s->do_telnetopt == 2) {
2903 /* Handle IAC break commands by sending a serial break */
a425d23f 2904 qemu_chr_be_event(chr, CHR_EVENT_BREAK);
6f97dba0
AL
2905 s->do_telnetopt++;
2906 }
2907 s->do_telnetopt++;
2908 }
2909 if (s->do_telnetopt >= 4) {
2910 s->do_telnetopt = 1;
2911 }
2912 } else {
2913 if ((unsigned char)buf[i] == IAC) {
2914 s->do_telnetopt = 2;
2915 } else {
2916 if (j != i)
2917 buf[j] = buf[i];
2918 j++;
2919 }
2920 }
2921 }
2922 *size = j;
2923}
2924
0ec7b3e7 2925static int tcp_get_msgfds(Chardev *chr, int *fds, int num)
7d174059 2926{
777357d7 2927 SocketChardev *s = SOCKET_CHARDEV(chr);
41ac54b2 2928
c76bf6bb
NN
2929 int to_copy = (s->read_msgfds_num < num) ? s->read_msgfds_num : num;
2930
c4095726
MT
2931 assert(num <= TCP_MAX_FDS);
2932
c76bf6bb 2933 if (to_copy) {
d2fc39b4
SH
2934 int i;
2935
c76bf6bb
NN
2936 memcpy(fds, s->read_msgfds, to_copy * sizeof(int));
2937
d2fc39b4
SH
2938 /* Close unused fds */
2939 for (i = to_copy; i < s->read_msgfds_num; i++) {
2940 close(s->read_msgfds[i]);
2941 }
2942
c76bf6bb
NN
2943 g_free(s->read_msgfds);
2944 s->read_msgfds = 0;
2945 s->read_msgfds_num = 0;
2946 }
2947
2948 return to_copy;
7d174059
MM
2949}
2950
0ec7b3e7 2951static int tcp_set_msgfds(Chardev *chr, int *fds, int num)
d39aac7a 2952{
777357d7 2953 SocketChardev *s = SOCKET_CHARDEV(chr);
d39aac7a
NN
2954
2955 /* clear old pending fd array */
ef1e1e07 2956 g_free(s->write_msgfds);
869a58af 2957 s->write_msgfds = NULL;
5b498459 2958 s->write_msgfds_num = 0;
d39aac7a 2959
5c7eaabf
MAL
2960 if (!s->connected ||
2961 !qio_channel_has_feature(s->ioc,
2962 QIO_CHANNEL_FEATURE_FD_PASS)) {
2963 return -1;
2964 }
2965
d39aac7a 2966 if (num) {
2d528d45 2967 s->write_msgfds = g_new(int, num);
d39aac7a
NN
2968 memcpy(s->write_msgfds, fds, num * sizeof(int));
2969 }
2970
2971 s->write_msgfds_num = num;
2972
2973 return 0;
2974}
2975
0ec7b3e7 2976static ssize_t tcp_chr_recv(Chardev *chr, char *buf, size_t len)
7d174059 2977{
777357d7 2978 SocketChardev *s = SOCKET_CHARDEV(chr);
9894dc0c
DB
2979 struct iovec iov = { .iov_base = buf, .iov_len = len };
2980 int ret;
2981 size_t i;
2982 int *msgfds = NULL;
2983 size_t msgfds_num = 0;
2984
2985 if (qio_channel_has_feature(s->ioc, QIO_CHANNEL_FEATURE_FD_PASS)) {
2986 ret = qio_channel_readv_full(s->ioc, &iov, 1,
2987 &msgfds, &msgfds_num,
2988 NULL);
2989 } else {
2990 ret = qio_channel_readv_full(s->ioc, &iov, 1,
2991 NULL, NULL,
2992 NULL);
2993 }
7d174059 2994
b6572b4f
MAL
2995 if (ret == QIO_CHANNEL_ERR_BLOCK) {
2996 errno = EAGAIN;
2997 ret = -1;
2998 } else if (ret == -1) {
2999 errno = EIO;
3000 }
3001
9894dc0c 3002 if (msgfds_num) {
c76bf6bb
NN
3003 /* close and clean read_msgfds */
3004 for (i = 0; i < s->read_msgfds_num; i++) {
3005 close(s->read_msgfds[i]);
3006 }
9b938c72 3007
c76bf6bb
NN
3008 if (s->read_msgfds_num) {
3009 g_free(s->read_msgfds);
3010 }
3011
9894dc0c
DB
3012 s->read_msgfds = msgfds;
3013 s->read_msgfds_num = msgfds_num;
7d174059 3014 }
7d174059 3015
9894dc0c
DB
3016 for (i = 0; i < s->read_msgfds_num; i++) {
3017 int fd = s->read_msgfds[i];
3018 if (fd < 0) {
3019 continue;
3020 }
9977c894 3021
9894dc0c
DB
3022 /* O_NONBLOCK is preserved across SCM_RIGHTS so reset it */
3023 qemu_set_block(fd);
7d174059 3024
9894dc0c
DB
3025#ifndef MSG_CMSG_CLOEXEC
3026 qemu_set_cloexec(fd);
06138651 3027#endif
06138651 3028 }
9977c894 3029
7d174059 3030 return ret;
9977c894 3031}
9977c894 3032
0ec7b3e7 3033static GSource *tcp_chr_add_watch(Chardev *chr, GIOCondition cond)
d3cc5bc4 3034{
777357d7 3035 SocketChardev *s = SOCKET_CHARDEV(chr);
9894dc0c 3036 return qio_channel_create_watch(s->ioc, cond);
d3cc5bc4
AS
3037}
3038
0ec7b3e7 3039static void tcp_chr_free_connection(Chardev *chr)
7b0bfdf5 3040{
777357d7 3041 SocketChardev *s = SOCKET_CHARDEV(chr);
5b498459 3042 int i;
7b0bfdf5 3043
342f7a9d
MAL
3044 if (!s->connected) {
3045 return;
3046 }
3047
5b498459
MAL
3048 if (s->read_msgfds_num) {
3049 for (i = 0; i < s->read_msgfds_num; i++) {
3050 close(s->read_msgfds[i]);
3051 }
3052 g_free(s->read_msgfds);
3053 s->read_msgfds = NULL;
3054 s->read_msgfds_num = 0;
7b0bfdf5 3055 }
5b498459 3056
6167ebbd 3057 tcp_set_msgfds(chr, NULL, 0);
7b0bfdf5 3058 remove_fd_in_watch(chr);
a8fb5427
DB
3059 object_unref(OBJECT(s->sioc));
3060 s->sioc = NULL;
9894dc0c
DB
3061 object_unref(OBJECT(s->ioc));
3062 s->ioc = NULL;
0ff0fad2 3063 g_free(chr->filename);
5b498459
MAL
3064 chr->filename = NULL;
3065 s->connected = 0;
3066}
3067
0ec7b3e7 3068static void tcp_chr_disconnect(Chardev *chr)
5b498459 3069{
777357d7 3070 SocketChardev *s = SOCKET_CHARDEV(chr);
5b498459
MAL
3071
3072 if (!s->connected) {
3073 return;
3074 }
3075
3076 tcp_chr_free_connection(chr);
3077
3078 if (s->listen_ioc) {
3079 s->listen_tag = qio_channel_add_watch(
3080 QIO_CHANNEL(s->listen_ioc), G_IO_IN, tcp_chr_accept, chr, NULL);
3081 }
0ff0fad2
DB
3082 chr->filename = SocketAddress_to_str("disconnected:", s->addr,
3083 s->is_listen, s->is_telnet);
7b0bfdf5 3084 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
5dd1f02b
CM
3085 if (s->reconnect_time) {
3086 qemu_chr_socket_restart_timer(chr);
3087 }
7b0bfdf5
NN
3088}
3089
9894dc0c 3090static gboolean tcp_chr_read(QIOChannel *chan, GIOCondition cond, void *opaque)
6f97dba0 3091{
777357d7
MAL
3092 Chardev *chr = CHARDEV(opaque);
3093 SocketChardev *s = SOCKET_CHARDEV(opaque);
9bd7854e 3094 uint8_t buf[READ_BUF_LEN];
6f97dba0
AL
3095 int len, size;
3096
2ea5a7af 3097 if (!s->connected || s->max_size <= 0) {
cdbf6e16 3098 return TRUE;
2ea5a7af 3099 }
6f97dba0
AL
3100 len = sizeof(buf);
3101 if (len > s->max_size)
3102 len = s->max_size;
9977c894 3103 size = tcp_chr_recv(chr, (void *)buf, len);
9894dc0c 3104 if (size == 0 || size == -1) {
6f97dba0 3105 /* connection closed */
7b0bfdf5 3106 tcp_chr_disconnect(chr);
6f97dba0
AL
3107 } else if (size > 0) {
3108 if (s->do_telnetopt)
3109 tcp_chr_process_IAC_bytes(chr, s, buf, &size);
3110 if (size > 0)
fa5efccb 3111 qemu_chr_be_write(chr, buf, size);
6f97dba0 3112 }
2ea5a7af
AL
3113
3114 return TRUE;
6f97dba0
AL
3115}
3116
0ec7b3e7 3117static int tcp_chr_sync_read(Chardev *chr, const uint8_t *buf, int len)
7b0bfdf5 3118{
777357d7 3119 SocketChardev *s = SOCKET_CHARDEV(chr);
7b0bfdf5
NN
3120 int size;
3121
3122 if (!s->connected) {
3123 return 0;
3124 }
3125
3126 size = tcp_chr_recv(chr, (void *) buf, len);
3127 if (size == 0) {
3128 /* connection closed */
3129 tcp_chr_disconnect(chr);
3130 }
3131
3132 return size;
3133}
3134
6f97dba0
AL
3135static void tcp_chr_connect(void *opaque)
3136{
777357d7
MAL
3137 Chardev *chr = CHARDEV(opaque);
3138 SocketChardev *s = SOCKET_CHARDEV(opaque);
16cc4ffe 3139
0ff0fad2 3140 g_free(chr->filename);
a8fb5427
DB
3141 chr->filename = sockaddr_to_str(
3142 &s->sioc->localAddr, s->sioc->localAddrLen,
3143 &s->sioc->remoteAddr, s->sioc->remoteAddrLen,
3144 s->is_listen, s->is_telnet);
6f97dba0
AL
3145
3146 s->connected = 1;
9894dc0c 3147 if (s->ioc) {
e93a68e1 3148 chr->fd_in_tag = io_add_watch_poll(chr, s->ioc,
9894dc0c 3149 tcp_chr_read_poll,
e92aa36a
ZC
3150 tcp_chr_read,
3151 chr, NULL);
bbdd2ad0 3152 }
fee204fd 3153 qemu_chr_be_generic_open(chr);
6f97dba0
AL
3154}
3155
0ec7b3e7 3156static void tcp_chr_update_read_handler(Chardev *chr,
a4afa548 3157 GMainContext *context)
ac1b84dd 3158{
777357d7 3159 SocketChardev *s = SOCKET_CHARDEV(chr);
ac1b84dd 3160
1e94f23d
DB
3161 if (!s->connected) {
3162 return;
3163 }
3164
ac1b84dd 3165 remove_fd_in_watch(chr);
9894dc0c 3166 if (s->ioc) {
e93a68e1 3167 chr->fd_in_tag = io_add_watch_poll(chr, s->ioc,
9894dc0c 3168 tcp_chr_read_poll,
e92aa36a
ZC
3169 tcp_chr_read, chr,
3170 context);
ac1b84dd
GH
3171 }
3172}
3173
f2001a7e 3174typedef struct {
0ec7b3e7 3175 Chardev *chr;
f2001a7e
DB
3176 char buf[12];
3177 size_t buflen;
279b066e 3178} TCPChardevTelnetInit;
f2001a7e
DB
3179
3180static gboolean tcp_chr_telnet_init_io(QIOChannel *ioc,
3181 GIOCondition cond G_GNUC_UNUSED,
3182 gpointer user_data)
6f97dba0 3183{
279b066e 3184 TCPChardevTelnetInit *init = user_data;
f2001a7e
DB
3185 ssize_t ret;
3186
3187 ret = qio_channel_write(ioc, init->buf, init->buflen, NULL);
3188 if (ret < 0) {
3189 if (ret == QIO_CHANNEL_ERR_BLOCK) {
3190 ret = 0;
3191 } else {
3192 tcp_chr_disconnect(init->chr);
3193 return FALSE;
3194 }
3195 }
3196 init->buflen -= ret;
3197
3198 if (init->buflen == 0) {
3199 tcp_chr_connect(init->chr);
3200 return FALSE;
3201 }
3202
3203 memmove(init->buf, init->buf + ret, init->buflen);
3204
3205 return TRUE;
3206}
3207
0ec7b3e7 3208static void tcp_chr_telnet_init(Chardev *chr)
f2001a7e 3209{
777357d7 3210 SocketChardev *s = SOCKET_CHARDEV(chr);
279b066e 3211 TCPChardevTelnetInit *init = g_new0(TCPChardevTelnetInit, 1);
f2001a7e
DB
3212 size_t n = 0;
3213
3214 init->chr = chr;
3215 init->buflen = 12;
3216
3217#define IACSET(x, a, b, c) \
3218 do { \
3219 x[n++] = a; \
3220 x[n++] = b; \
3221 x[n++] = c; \
3222 } while (0)
3223
3224 /* Prep the telnet negotion to put telnet in binary,
3225 * no echo, single char mode */
3226 IACSET(init->buf, 0xff, 0xfb, 0x01); /* IAC WILL ECHO */
3227 IACSET(init->buf, 0xff, 0xfb, 0x03); /* IAC WILL Suppress go ahead */
3228 IACSET(init->buf, 0xff, 0xfb, 0x00); /* IAC WILL Binary */
3229 IACSET(init->buf, 0xff, 0xfd, 0x00); /* IAC DO Binary */
3230
3231#undef IACSET
3232
3233 qio_channel_add_watch(
3234 s->ioc, G_IO_OUT,
3235 tcp_chr_telnet_init_io,
3236 init, NULL);
6f97dba0
AL
3237}
3238
a8fb5427 3239
60e705c5 3240static void tcp_chr_tls_handshake(QIOTask *task,
a8fb5427
DB
3241 gpointer user_data)
3242{
0ec7b3e7 3243 Chardev *chr = user_data;
1876ed04 3244 SocketChardev *s = user_data;
a8fb5427 3245
60e705c5 3246 if (qio_task_propagate_error(task, NULL)) {
a8fb5427
DB
3247 tcp_chr_disconnect(chr);
3248 } else {
3249 if (s->do_telnetopt) {
3250 tcp_chr_telnet_init(chr);
3251 } else {
3252 tcp_chr_connect(chr);
3253 }
3254 }
3255}
3256
3257
0ec7b3e7 3258static void tcp_chr_tls_init(Chardev *chr)
a8fb5427 3259{
777357d7 3260 SocketChardev *s = SOCKET_CHARDEV(chr);
a8fb5427
DB
3261 QIOChannelTLS *tioc;
3262 Error *err = NULL;
e93a68e1 3263 gchar *name;
a8fb5427
DB
3264
3265 if (s->is_listen) {
3266 tioc = qio_channel_tls_new_server(
3267 s->ioc, s->tls_creds,
3268 NULL, /* XXX Use an ACL */
3269 &err);
3270 } else {
3271 tioc = qio_channel_tls_new_client(
3272 s->ioc, s->tls_creds,
32bafa8f 3273 s->addr->u.inet.data->host,
a8fb5427
DB
3274 &err);
3275 }
3276 if (tioc == NULL) {
3277 error_free(err);
3278 tcp_chr_disconnect(chr);
660a2d83 3279 return;
a8fb5427 3280 }
e93a68e1
DB
3281 name = g_strdup_printf("chardev-tls-%s-%s",
3282 s->is_listen ? "server" : "client",
3283 chr->label);
3284 qio_channel_set_name(QIO_CHANNEL(tioc), name);
3285 g_free(name);
a8fb5427
DB
3286 object_unref(OBJECT(s->ioc));
3287 s->ioc = QIO_CHANNEL(tioc);
3288
3289 qio_channel_tls_handshake(tioc,
3290 tcp_chr_tls_handshake,
3291 chr,
3292 NULL);
3293}
3294
3295
0ec7b3e7 3296static void tcp_chr_set_client_ioc_name(Chardev *chr,
e93a68e1
DB
3297 QIOChannelSocket *sioc)
3298{
777357d7 3299 SocketChardev *s = SOCKET_CHARDEV(chr);
e93a68e1
DB
3300 char *name;
3301 name = g_strdup_printf("chardev-tcp-%s-%s",
3302 s->is_listen ? "server" : "client",
3303 chr->label);
3304 qio_channel_set_name(QIO_CHANNEL(sioc), name);
3305 g_free(name);
3306
3307}
3308
0ec7b3e7 3309static int tcp_chr_new_client(Chardev *chr, QIOChannelSocket *sioc)
13661089 3310{
777357d7 3311 SocketChardev *s = SOCKET_CHARDEV(chr);
41ac54b2 3312
9894dc0c 3313 if (s->ioc != NULL) {
13661089 3314 return -1;
9894dc0c 3315 }
13661089 3316
9894dc0c
DB
3317 s->ioc = QIO_CHANNEL(sioc);
3318 object_ref(OBJECT(sioc));
a8fb5427
DB
3319 s->sioc = sioc;
3320 object_ref(OBJECT(sioc));
9894dc0c 3321
64c800f8
DB
3322 qio_channel_set_blocking(s->ioc, false, NULL);
3323
9894dc0c
DB
3324 if (s->do_nodelay) {
3325 qio_channel_set_delay(s->ioc, false);
3326 }
910b6368
PB
3327 if (s->listen_tag) {
3328 g_source_remove(s->listen_tag);
3329 s->listen_tag = 0;
3330 }
f2001a7e 3331
a8fb5427
DB
3332 if (s->tls_creds) {
3333 tcp_chr_tls_init(chr);
f2001a7e 3334 } else {
a8fb5427
DB
3335 if (s->do_telnetopt) {
3336 tcp_chr_telnet_init(chr);
3337 } else {
3338 tcp_chr_connect(chr);
3339 }
f2001a7e 3340 }
13661089
DB
3341
3342 return 0;
3343}
3344
9894dc0c 3345
0ec7b3e7 3346static int tcp_chr_add_client(Chardev *chr, int fd)
9894dc0c
DB
3347{
3348 int ret;
3349 QIOChannelSocket *sioc;
3350
3351 sioc = qio_channel_socket_new_fd(fd, NULL);
3352 if (!sioc) {
3353 return -1;
3354 }
e93a68e1 3355 tcp_chr_set_client_ioc_name(chr, sioc);
9894dc0c
DB
3356 ret = tcp_chr_new_client(chr, sioc);
3357 object_unref(OBJECT(sioc));
3358 return ret;
3359}
3360
3361static gboolean tcp_chr_accept(QIOChannel *channel,
3362 GIOCondition cond,
3363 void *opaque)
6f97dba0 3364{
777357d7 3365 Chardev *chr = CHARDEV(opaque);
9894dc0c 3366 QIOChannelSocket *sioc;
6f97dba0 3367
9894dc0c
DB
3368 sioc = qio_channel_socket_accept(QIO_CHANNEL_SOCKET(channel),
3369 NULL);
3370 if (!sioc) {
3371 return TRUE;
6f97dba0 3372 }
9894dc0c 3373
9894dc0c
DB
3374 tcp_chr_new_client(chr, sioc);
3375
3376 object_unref(OBJECT(sioc));
2ea5a7af
AL
3377
3378 return TRUE;
6f97dba0
AL
3379}
3380
0ec7b3e7 3381static int tcp_chr_wait_connected(Chardev *chr, Error **errp)
d7a04fd7 3382{
777357d7 3383 SocketChardev *s = SOCKET_CHARDEV(chr);
d7a04fd7
MAL
3384 QIOChannelSocket *sioc;
3385
1dc8a669
MAL
3386 /* It can't wait on s->connected, since it is set asynchronously
3387 * in TLS and telnet cases, only wait for an accepted socket */
3388 while (!s->ioc) {
d7a04fd7 3389 if (s->is_listen) {
776a32a0
MAL
3390 error_report("QEMU waiting for connection on: %s",
3391 chr->filename);
d7a04fd7
MAL
3392 qio_channel_set_blocking(QIO_CHANNEL(s->listen_ioc), true, NULL);
3393 tcp_chr_accept(QIO_CHANNEL(s->listen_ioc), G_IO_IN, chr);
3394 qio_channel_set_blocking(QIO_CHANNEL(s->listen_ioc), false, NULL);
3395 } else {
3396 sioc = qio_channel_socket_new();
e93a68e1 3397 tcp_chr_set_client_ioc_name(chr, sioc);
d7a04fd7
MAL
3398 if (qio_channel_socket_connect_sync(sioc, s->addr, errp) < 0) {
3399 object_unref(OBJECT(sioc));
3400 return -1;
3401 }
3402 tcp_chr_new_client(chr, sioc);
3403 object_unref(OBJECT(sioc));
3404 }
3405 }
3406
3407 return 0;
3408}
3409
0ec7b3e7 3410static int qemu_chr_wait_connected(Chardev *chr, Error **errp)
6b6723c3 3411{
777357d7
MAL
3412 ChardevClass *cc = CHARDEV_GET_CLASS(chr);
3413
3414 if (cc->chr_wait_connected) {
3415 return cc->chr_wait_connected(chr, errp);
6b6723c3
MAL
3416 }
3417
3418 return 0;
3419}
3420
5345fdb4
MAL
3421int qemu_chr_fe_wait_connected(CharBackend *be, Error **errp)
3422{
fa394ed6
MAL
3423 if (!be->chr) {
3424 error_setg(errp, "missing associated backend");
3425 return -1;
3426 }
3427
5345fdb4
MAL
3428 return qemu_chr_wait_connected(be->chr, errp);
3429}
3430
2c3a5dcb 3431static void char_socket_finalize(Object *obj)
6f97dba0 3432{
2c3a5dcb
MAL
3433 Chardev *chr = CHARDEV(obj);
3434 SocketChardev *s = SOCKET_CHARDEV(obj);
5b498459
MAL
3435
3436 tcp_chr_free_connection(chr);
cfb429cb 3437
5dd1f02b
CM
3438 if (s->reconnect_timer) {
3439 g_source_remove(s->reconnect_timer);
3440 s->reconnect_timer = 0;
3441 }
cfb429cb 3442 qapi_free_SocketAddress(s->addr);
9894dc0c
DB
3443 if (s->listen_tag) {
3444 g_source_remove(s->listen_tag);
3445 s->listen_tag = 0;
3446 }
3447 if (s->listen_ioc) {
3448 object_unref(OBJECT(s->listen_ioc));
819f56b7 3449 }
a8fb5427
DB
3450 if (s->tls_creds) {
3451 object_unref(OBJECT(s->tls_creds));
3452 }
41ac54b2 3453
a425d23f 3454 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
6f97dba0
AL
3455}
3456
43ded1a0 3457
60e705c5 3458static void qemu_chr_socket_connected(QIOTask *task, void *opaque)
5dd1f02b 3459{
60e705c5 3460 QIOChannelSocket *sioc = QIO_CHANNEL_SOCKET(qio_task_get_source(task));
777357d7
MAL
3461 Chardev *chr = CHARDEV(opaque);
3462 SocketChardev *s = SOCKET_CHARDEV(chr);
60e705c5 3463 Error *err = NULL;
5dd1f02b 3464
60e705c5 3465 if (qio_task_propagate_error(task, &err)) {
5008e5b7 3466 check_report_connect_error(chr, err);
60e705c5
DB
3467 error_free(err);
3468 goto cleanup;
5dd1f02b
CM
3469 }
3470
5008e5b7 3471 s->connect_err_reported = false;
f50dfe45 3472 tcp_chr_new_client(chr, sioc);
60e705c5
DB
3473
3474 cleanup:
f50dfe45 3475 object_unref(OBJECT(sioc));
5dd1f02b
CM
3476}
3477
f6bd5d6e 3478
51767e7c 3479/*********************************************************/
3949e594 3480/* Ring buffer chardev */
51767e7c
LL
3481
3482typedef struct {
0ec7b3e7 3483 Chardev parent;
51767e7c
LL
3484 size_t size;
3485 size_t prod;
3486 size_t cons;
3487 uint8_t *cbuf;
0ec7b3e7 3488} RingBufChardev;
51767e7c 3489
777357d7
MAL
3490#define RINGBUF_CHARDEV(obj) \
3491 OBJECT_CHECK(RingBufChardev, (obj), TYPE_CHARDEV_RINGBUF)
3492
0ec7b3e7 3493static size_t ringbuf_count(const Chardev *chr)
51767e7c 3494{
777357d7 3495 const RingBufChardev *d = RINGBUF_CHARDEV(chr);
51767e7c 3496
5c230105 3497 return d->prod - d->cons;
51767e7c
LL
3498}
3499
9005b2a7 3500/* Called with chr_write_lock held. */
0ec7b3e7 3501static int ringbuf_chr_write(Chardev *chr, const uint8_t *buf, int len)
51767e7c 3502{
777357d7 3503 RingBufChardev *d = RINGBUF_CHARDEV(chr);
51767e7c
LL
3504 int i;
3505
3506 if (!buf || (len < 0)) {
3507 return -1;
3508 }
3509
3510 for (i = 0; i < len; i++ ) {
5c230105
MA
3511 d->cbuf[d->prod++ & (d->size - 1)] = buf[i];
3512 if (d->prod - d->cons > d->size) {
51767e7c
LL
3513 d->cons = d->prod - d->size;
3514 }
3515 }
3516
5c936a83 3517 return len;
51767e7c
LL
3518}
3519
0ec7b3e7 3520static int ringbuf_chr_read(Chardev *chr, uint8_t *buf, int len)
51767e7c 3521{
777357d7 3522 RingBufChardev *d = RINGBUF_CHARDEV(chr);
51767e7c
LL
3523 int i;
3524
9005b2a7 3525 qemu_mutex_lock(&chr->chr_write_lock);
5c230105
MA
3526 for (i = 0; i < len && d->cons != d->prod; i++) {
3527 buf[i] = d->cbuf[d->cons++ & (d->size - 1)];
51767e7c 3528 }
9005b2a7 3529 qemu_mutex_unlock(&chr->chr_write_lock);
51767e7c
LL
3530
3531 return i;
3532}
3533
9fa2f7a4 3534static void char_ringbuf_finalize(Object *obj)
51767e7c 3535{
9fa2f7a4 3536 RingBufChardev *d = RINGBUF_CHARDEV(obj);
51767e7c
LL
3537
3538 g_free(d->cbuf);
51767e7c
LL
3539}
3540
777357d7
MAL
3541static void qemu_chr_open_ringbuf(Chardev *chr,
3542 ChardevBackend *backend,
3543 bool *be_opened,
3544 Error **errp)
51767e7c 3545{
32bafa8f 3546 ChardevRingbuf *opts = backend->u.ringbuf.data;
777357d7 3547 RingBufChardev *d = RINGBUF_CHARDEV(chr);
51767e7c 3548
1da48c65 3549 d->size = opts->has_size ? opts->size : 65536;
51767e7c
LL
3550
3551 /* The size must be power of 2 */
3552 if (d->size & (d->size - 1)) {
4f57378f 3553 error_setg(errp, "size of ringbuf chardev must be power of two");
777357d7 3554 return;
51767e7c
LL
3555 }
3556
3557 d->prod = 0;
3558 d->cons = 0;
3559 d->cbuf = g_malloc0(d->size);
1f590cf9
LL
3560}
3561
3949e594 3562void qmp_ringbuf_write(const char *device, const char *data,
82e59a67 3563 bool has_format, enum DataFormat format,
1f590cf9
LL
3564 Error **errp)
3565{
0ec7b3e7 3566 Chardev *chr;
c4f331b6 3567 const uint8_t *write_data;
1f590cf9 3568 int ret;
3d1bba20 3569 gsize write_count;
1f590cf9
LL
3570
3571 chr = qemu_chr_find(device);
3572 if (!chr) {
1a69278e 3573 error_setg(errp, "Device '%s' not found", device);
1f590cf9
LL
3574 return;
3575 }
3576
777357d7 3577 if (!CHARDEV_IS_RINGBUF(chr)) {
3949e594 3578 error_setg(errp,"%s is not a ringbuf device", device);
1f590cf9
LL
3579 return;
3580 }
3581
1f590cf9 3582 if (has_format && (format == DATA_FORMAT_BASE64)) {
e9cf2fe0
DB
3583 write_data = qbase64_decode(data, -1,
3584 &write_count,
3585 errp);
3586 if (!write_data) {
3587 return;
3588 }
1f590cf9
LL
3589 } else {
3590 write_data = (uint8_t *)data;
82e59a67 3591 write_count = strlen(data);
1f590cf9
LL
3592 }
3593
3949e594 3594 ret = ringbuf_chr_write(chr, write_data, write_count);
1f590cf9 3595
13289fb5
MA
3596 if (write_data != (uint8_t *)data) {
3597 g_free((void *)write_data);
3598 }
3599
1f590cf9
LL
3600 if (ret < 0) {
3601 error_setg(errp, "Failed to write to device %s", device);
3602 return;
3603 }
3604}
3605
3949e594 3606char *qmp_ringbuf_read(const char *device, int64_t size,
3ab651fc
MA
3607 bool has_format, enum DataFormat format,
3608 Error **errp)
49b6d722 3609{
0ec7b3e7 3610 Chardev *chr;
c4f331b6 3611 uint8_t *read_data;
49b6d722 3612 size_t count;
3ab651fc 3613 char *data;
49b6d722
LL
3614
3615 chr = qemu_chr_find(device);
3616 if (!chr) {
1a69278e 3617 error_setg(errp, "Device '%s' not found", device);
49b6d722
LL
3618 return NULL;
3619 }
3620
777357d7 3621 if (!CHARDEV_IS_RINGBUF(chr)) {
3949e594 3622 error_setg(errp,"%s is not a ringbuf device", device);
49b6d722
LL
3623 return NULL;
3624 }
3625
3626 if (size <= 0) {
3627 error_setg(errp, "size must be greater than zero");
3628 return NULL;
3629 }
3630
3949e594 3631 count = ringbuf_count(chr);
49b6d722 3632 size = size > count ? count : size;
44f3bcd2 3633 read_data = g_malloc(size + 1);
49b6d722 3634
3949e594 3635 ringbuf_chr_read(chr, read_data, size);
49b6d722
LL
3636
3637 if (has_format && (format == DATA_FORMAT_BASE64)) {
3ab651fc 3638 data = g_base64_encode(read_data, size);
13289fb5 3639 g_free(read_data);
49b6d722 3640 } else {
3949e594
MA
3641 /*
3642 * FIXME should read only complete, valid UTF-8 characters up
3643 * to @size bytes. Invalid sequences should be replaced by a
3644 * suitable replacement character. Except when (and only
3645 * when) ring buffer lost characters since last read, initial
3646 * continuation characters should be dropped.
3647 */
44f3bcd2 3648 read_data[size] = 0;
3ab651fc 3649 data = (char *)read_data;
49b6d722
LL
3650 }
3651
3ab651fc 3652 return data;
49b6d722
LL
3653}
3654
33521634 3655QemuOpts *qemu_chr_parse_compat(const char *label, const char *filename)
191bc01b 3656{
6ea314d9 3657 char host[65], port[33], width[8], height[8];
aeb2c47a 3658 int pos;
7d31544f 3659 const char *p;
191bc01b 3660 QemuOpts *opts;
8be7e7e4 3661 Error *local_err = NULL;
191bc01b 3662
8be7e7e4 3663 opts = qemu_opts_create(qemu_find_opts("chardev"), label, 1, &local_err);
84d18f06 3664 if (local_err) {
33394884 3665 error_report_err(local_err);
191bc01b 3666 return NULL;
8be7e7e4 3667 }
191bc01b 3668
7591c5c1
GH
3669 if (strstart(filename, "mon:", &p)) {
3670 filename = p;
f43e47db 3671 qemu_opt_set(opts, "mux", "on", &error_abort);
02c4bdf1
PB
3672 if (strcmp(filename, "stdio") == 0) {
3673 /* Monitor is muxed to stdio: do not exit on Ctrl+C by default
3674 * but pass it to the guest. Handle this only for compat syntax,
3675 * for -chardev syntax we have special option for this.
3676 * This is what -nographic did, redirecting+muxing serial+monitor
3677 * to stdio causing Ctrl+C to be passed to guest. */
f43e47db 3678 qemu_opt_set(opts, "signal", "off", &error_abort);
02c4bdf1 3679 }
7591c5c1
GH
3680 }
3681
f0457e8d
GH
3682 if (strcmp(filename, "null") == 0 ||
3683 strcmp(filename, "pty") == 0 ||
3684 strcmp(filename, "msmouse") == 0 ||
dc1c21e6 3685 strcmp(filename, "braille") == 0 ||
5692399f 3686 strcmp(filename, "testdev") == 0 ||
f0457e8d 3687 strcmp(filename, "stdio") == 0) {
f43e47db 3688 qemu_opt_set(opts, "backend", filename, &error_abort);
191bc01b
GH
3689 return opts;
3690 }
6ea314d9 3691 if (strstart(filename, "vc", &p)) {
f43e47db 3692 qemu_opt_set(opts, "backend", "vc", &error_abort);
6ea314d9 3693 if (*p == ':') {
49aa4058 3694 if (sscanf(p+1, "%7[0-9]x%7[0-9]", width, height) == 2) {
6ea314d9 3695 /* pixels */
f43e47db
MA
3696 qemu_opt_set(opts, "width", width, &error_abort);
3697 qemu_opt_set(opts, "height", height, &error_abort);
49aa4058 3698 } else if (sscanf(p+1, "%7[0-9]Cx%7[0-9]C", width, height) == 2) {
6ea314d9 3699 /* chars */
f43e47db
MA
3700 qemu_opt_set(opts, "cols", width, &error_abort);
3701 qemu_opt_set(opts, "rows", height, &error_abort);
6ea314d9
GH
3702 } else {
3703 goto fail;
3704 }
3705 }
3706 return opts;
3707 }
d6c983cd 3708 if (strcmp(filename, "con:") == 0) {
f43e47db 3709 qemu_opt_set(opts, "backend", "console", &error_abort);
d6c983cd
GH
3710 return opts;
3711 }
48b76496 3712 if (strstart(filename, "COM", NULL)) {
f43e47db
MA
3713 qemu_opt_set(opts, "backend", "serial", &error_abort);
3714 qemu_opt_set(opts, "path", filename, &error_abort);
48b76496
GH
3715 return opts;
3716 }
7d31544f 3717 if (strstart(filename, "file:", &p)) {
f43e47db
MA
3718 qemu_opt_set(opts, "backend", "file", &error_abort);
3719 qemu_opt_set(opts, "path", p, &error_abort);
7d31544f
GH
3720 return opts;
3721 }
3722 if (strstart(filename, "pipe:", &p)) {
f43e47db
MA
3723 qemu_opt_set(opts, "backend", "pipe", &error_abort);
3724 qemu_opt_set(opts, "path", p, &error_abort);
7d31544f
GH
3725 return opts;
3726 }
aeb2c47a
GH
3727 if (strstart(filename, "tcp:", &p) ||
3728 strstart(filename, "telnet:", &p)) {
3729 if (sscanf(p, "%64[^:]:%32[^,]%n", host, port, &pos) < 2) {
3730 host[0] = 0;
3731 if (sscanf(p, ":%32[^,]%n", port, &pos) < 1)
3732 goto fail;
3733 }
f43e47db
MA
3734 qemu_opt_set(opts, "backend", "socket", &error_abort);
3735 qemu_opt_set(opts, "host", host, &error_abort);
3736 qemu_opt_set(opts, "port", port, &error_abort);
aeb2c47a 3737 if (p[pos] == ',') {
dc523cd3
MA
3738 qemu_opts_do_parse(opts, p+pos+1, NULL, &local_err);
3739 if (local_err) {
3740 error_report_err(local_err);
aeb2c47a 3741 goto fail;
dc523cd3 3742 }
aeb2c47a
GH
3743 }
3744 if (strstart(filename, "telnet:", &p))
f43e47db 3745 qemu_opt_set(opts, "telnet", "on", &error_abort);
aeb2c47a
GH
3746 return opts;
3747 }
7e1b35b4 3748 if (strstart(filename, "udp:", &p)) {
f43e47db 3749 qemu_opt_set(opts, "backend", "udp", &error_abort);
7e1b35b4
GH
3750 if (sscanf(p, "%64[^:]:%32[^@,]%n", host, port, &pos) < 2) {
3751 host[0] = 0;
39324ca4 3752 if (sscanf(p, ":%32[^@,]%n", port, &pos) < 1) {
7e1b35b4
GH
3753 goto fail;
3754 }
3755 }
f43e47db
MA
3756 qemu_opt_set(opts, "host", host, &error_abort);
3757 qemu_opt_set(opts, "port", port, &error_abort);
7e1b35b4
GH
3758 if (p[pos] == '@') {
3759 p += pos + 1;
3760 if (sscanf(p, "%64[^:]:%32[^,]%n", host, port, &pos) < 2) {
3761 host[0] = 0;
3762 if (sscanf(p, ":%32[^,]%n", port, &pos) < 1) {
7e1b35b4
GH
3763 goto fail;
3764 }
3765 }
f43e47db
MA
3766 qemu_opt_set(opts, "localaddr", host, &error_abort);
3767 qemu_opt_set(opts, "localport", port, &error_abort);
7e1b35b4
GH
3768 }
3769 return opts;
3770 }
aeb2c47a 3771 if (strstart(filename, "unix:", &p)) {
f43e47db 3772 qemu_opt_set(opts, "backend", "socket", &error_abort);
dc523cd3
MA
3773 qemu_opts_do_parse(opts, p, "path", &local_err);
3774 if (local_err) {
3775 error_report_err(local_err);
aeb2c47a 3776 goto fail;
dc523cd3 3777 }
aeb2c47a
GH
3778 return opts;
3779 }
48b76496
GH
3780 if (strstart(filename, "/dev/parport", NULL) ||
3781 strstart(filename, "/dev/ppi", NULL)) {
f43e47db
MA
3782 qemu_opt_set(opts, "backend", "parport", &error_abort);
3783 qemu_opt_set(opts, "path", filename, &error_abort);
48b76496
GH
3784 return opts;
3785 }
3786 if (strstart(filename, "/dev/", NULL)) {
f43e47db
MA
3787 qemu_opt_set(opts, "backend", "tty", &error_abort);
3788 qemu_opt_set(opts, "path", filename, &error_abort);
48b76496
GH
3789 return opts;
3790 }
191bc01b 3791
aeb2c47a 3792fail:
191bc01b
GH
3793 qemu_opts_del(opts);
3794 return NULL;
3795}
3796
21a933ea 3797void qemu_chr_parse_common(QemuOpts *opts, ChardevCommon *backend)
d0d7708b
DB
3798{
3799 const char *logfile = qemu_opt_get(opts, "logfile");
3800
3801 backend->has_logfile = logfile != NULL;
3802 backend->logfile = logfile ? g_strdup(logfile) : NULL;
3803
3804 backend->has_logappend = true;
3805 backend->logappend = qemu_opt_get_bool(opts, "logappend", false);
3806}
3807
3808
846e2e49
GH
3809static void qemu_chr_parse_file_out(QemuOpts *opts, ChardevBackend *backend,
3810 Error **errp)
3811{
3812 const char *path = qemu_opt_get(opts, "path");
f194a1ae 3813 ChardevFile *file;
846e2e49 3814
0b663b7d 3815 backend->type = CHARDEV_BACKEND_KIND_FILE;
846e2e49
GH
3816 if (path == NULL) {
3817 error_setg(errp, "chardev: file: no filename given");
3818 return;
3819 }
32bafa8f 3820 file = backend->u.file.data = g_new0(ChardevFile, 1);
f194a1ae
EB
3821 qemu_chr_parse_common(opts, qapi_ChardevFile_base(file));
3822 file->out = g_strdup(path);
31e38a22 3823
f194a1ae
EB
3824 file->has_append = true;
3825 file->append = qemu_opt_get_bool(opts, "append", false);
846e2e49
GH
3826}
3827
7c358031
GH
3828static void qemu_chr_parse_stdio(QemuOpts *opts, ChardevBackend *backend,
3829 Error **errp)
3830{
f194a1ae
EB
3831 ChardevStdio *stdio;
3832
0b663b7d 3833 backend->type = CHARDEV_BACKEND_KIND_STDIO;
32bafa8f 3834 stdio = backend->u.stdio.data = g_new0(ChardevStdio, 1);
f194a1ae
EB
3835 qemu_chr_parse_common(opts, qapi_ChardevStdio_base(stdio));
3836 stdio->has_signal = true;
3837 stdio->signal = qemu_opt_get_bool(opts, "signal", true);
7c358031
GH
3838}
3839
777357d7
MAL
3840static void char_stdio_class_init(ObjectClass *oc, void *data)
3841{
3842 ChardevClass *cc = CHARDEV_CLASS(oc);
3843
88cace9f 3844 cc->parse = qemu_chr_parse_stdio;
777357d7 3845 cc->open = qemu_chr_open_stdio;
b68e956a 3846#ifdef _WIN32
777357d7
MAL
3847 cc->chr_write = win_stdio_write;
3848 cc->chr_set_echo = qemu_chr_set_echo_win_stdio;
b68e956a 3849#else
777357d7 3850 cc->chr_set_echo = qemu_chr_set_echo_stdio;
b68e956a 3851#endif
777357d7
MAL
3852}
3853
3854static const TypeInfo char_stdio_type_info = {
3855 .name = TYPE_CHARDEV_STDIO,
3856#ifdef _WIN32
3857 .parent = TYPE_CHARDEV_WIN_STDIO,
3858#else
3859 .parent = TYPE_CHARDEV_FD,
4d833ada 3860 .instance_finalize = char_stdio_finalize,
777357d7
MAL
3861#endif
3862 .class_init = char_stdio_class_init,
b68e956a
MAL
3863};
3864
6511d396 3865#ifdef HAVE_CHARDEV_SERIAL
0f1cb51d
GH
3866static void qemu_chr_parse_serial(QemuOpts *opts, ChardevBackend *backend,
3867 Error **errp)
3868{
3869 const char *device = qemu_opt_get(opts, "path");
f194a1ae 3870 ChardevHostdev *serial;
0f1cb51d 3871
0b663b7d 3872 backend->type = CHARDEV_BACKEND_KIND_SERIAL;
0f1cb51d
GH
3873 if (device == NULL) {
3874 error_setg(errp, "chardev: serial/tty: no device path given");
3875 return;
3876 }
32bafa8f 3877 serial = backend->u.serial.data = g_new0(ChardevHostdev, 1);
f194a1ae
EB
3878 qemu_chr_parse_common(opts, qapi_ChardevHostdev_base(serial));
3879 serial->device = g_strdup(device);
0f1cb51d 3880}
6511d396 3881#endif
0f1cb51d 3882
38bfb1a6 3883#ifdef HAVE_CHARDEV_PARPORT
dc375097
GH
3884static void qemu_chr_parse_parallel(QemuOpts *opts, ChardevBackend *backend,
3885 Error **errp)
3886{
3887 const char *device = qemu_opt_get(opts, "path");
f194a1ae 3888 ChardevHostdev *parallel;
dc375097 3889
0b663b7d 3890 backend->type = CHARDEV_BACKEND_KIND_PARALLEL;
dc375097
GH
3891 if (device == NULL) {
3892 error_setg(errp, "chardev: parallel: no device path given");
3893 return;
3894 }
32bafa8f 3895 parallel = backend->u.parallel.data = g_new0(ChardevHostdev, 1);
f194a1ae
EB
3896 qemu_chr_parse_common(opts, qapi_ChardevHostdev_base(parallel));
3897 parallel->device = g_strdup(device);
dc375097 3898}
38bfb1a6 3899#endif
dc375097 3900
548cbb36
GH
3901static void qemu_chr_parse_pipe(QemuOpts *opts, ChardevBackend *backend,
3902 Error **errp)
3903{
3904 const char *device = qemu_opt_get(opts, "path");
f194a1ae 3905 ChardevHostdev *dev;
548cbb36 3906
0b663b7d 3907 backend->type = CHARDEV_BACKEND_KIND_PIPE;
548cbb36
GH
3908 if (device == NULL) {
3909 error_setg(errp, "chardev: pipe: no device path given");
3910 return;
3911 }
32bafa8f 3912 dev = backend->u.pipe.data = g_new0(ChardevHostdev, 1);
f194a1ae
EB
3913 qemu_chr_parse_common(opts, qapi_ChardevHostdev_base(dev));
3914 dev->device = g_strdup(device);
548cbb36
GH
3915}
3916
777357d7
MAL
3917static void char_pipe_class_init(ObjectClass *oc, void *data)
3918{
3919 ChardevClass *cc = CHARDEV_CLASS(oc);
3920
88cace9f 3921 cc->parse = qemu_chr_parse_pipe;
777357d7
MAL
3922 cc->open = qemu_chr_open_pipe;
3923}
3924
3925static const TypeInfo char_pipe_type_info = {
3926 .name = TYPE_CHARDEV_PIPE,
b68e956a 3927#ifdef _WIN32
777357d7 3928 .parent = TYPE_CHARDEV_WIN,
b68e956a 3929#else
777357d7 3930 .parent = TYPE_CHARDEV_FD,
b68e956a 3931#endif
777357d7 3932 .class_init = char_pipe_class_init,
b68e956a
MAL
3933};
3934
4f57378f
MA
3935static void qemu_chr_parse_ringbuf(QemuOpts *opts, ChardevBackend *backend,
3936 Error **errp)
1da48c65
GH
3937{
3938 int val;
f194a1ae 3939 ChardevRingbuf *ringbuf;
1da48c65 3940
0b663b7d 3941 backend->type = CHARDEV_BACKEND_KIND_RINGBUF;
32bafa8f 3942 ringbuf = backend->u.ringbuf.data = g_new0(ChardevRingbuf, 1);
f194a1ae 3943 qemu_chr_parse_common(opts, qapi_ChardevRingbuf_base(ringbuf));
1da48c65 3944
0f953051 3945 val = qemu_opt_get_size(opts, "size", 0);
1da48c65 3946 if (val != 0) {
f194a1ae
EB
3947 ringbuf->has_size = true;
3948 ringbuf->size = val;
1da48c65
GH
3949 }
3950}
3951
777357d7
MAL
3952static void char_ringbuf_class_init(ObjectClass *oc, void *data)
3953{
3954 ChardevClass *cc = CHARDEV_CLASS(oc);
3955
88cace9f 3956 cc->parse = qemu_chr_parse_ringbuf;
777357d7
MAL
3957 cc->open = qemu_chr_open_ringbuf;
3958 cc->chr_write = ringbuf_chr_write;
777357d7
MAL
3959}
3960
3961static const TypeInfo char_ringbuf_type_info = {
3962 .name = TYPE_CHARDEV_RINGBUF,
3963 .parent = TYPE_CHARDEV,
3964 .class_init = char_ringbuf_class_init,
3965 .instance_size = sizeof(RingBufChardev),
9fa2f7a4 3966 .instance_finalize = char_ringbuf_finalize,
b68e956a
MAL
3967};
3968
3969/* Bug-compatibility: */
777357d7
MAL
3970static const TypeInfo char_memory_type_info = {
3971 .name = TYPE_CHARDEV_MEMORY,
3972 .parent = TYPE_CHARDEV_RINGBUF,
b68e956a
MAL
3973};
3974
bb6fb7c0
GH
3975static void qemu_chr_parse_mux(QemuOpts *opts, ChardevBackend *backend,
3976 Error **errp)
3977{
3978 const char *chardev = qemu_opt_get(opts, "chardev");
f194a1ae 3979 ChardevMux *mux;
bb6fb7c0 3980
0b663b7d 3981 backend->type = CHARDEV_BACKEND_KIND_MUX;
bb6fb7c0
GH
3982 if (chardev == NULL) {
3983 error_setg(errp, "chardev: mux: no chardev given");
3984 return;
3985 }
32bafa8f 3986 mux = backend->u.mux.data = g_new0(ChardevMux, 1);
f194a1ae
EB
3987 qemu_chr_parse_common(opts, qapi_ChardevMux_base(mux));
3988 mux->chardev = g_strdup(chardev);
bb6fb7c0
GH
3989}
3990
777357d7
MAL
3991static void char_mux_class_init(ObjectClass *oc, void *data)
3992{
3993 ChardevClass *cc = CHARDEV_CLASS(oc);
3994
88cace9f 3995 cc->parse = qemu_chr_parse_mux;
777357d7 3996 cc->open = qemu_chr_open_mux;
777357d7
MAL
3997 cc->chr_write = mux_chr_write;
3998 cc->chr_accept_input = mux_chr_accept_input;
3999 cc->chr_add_watch = mux_chr_add_watch;
4000}
4001
4002static const TypeInfo char_mux_type_info = {
4003 .name = TYPE_CHARDEV_MUX,
4004 .parent = TYPE_CHARDEV,
4005 .class_init = char_mux_class_init,
4006 .instance_size = sizeof(MuxChardev),
980d0414 4007 .instance_finalize = char_mux_finalize,
b68e956a
MAL
4008};
4009
dafd325d
PM
4010static void qemu_chr_parse_socket(QemuOpts *opts, ChardevBackend *backend,
4011 Error **errp)
4012{
4013 bool is_listen = qemu_opt_get_bool(opts, "server", false);
4014 bool is_waitconnect = is_listen && qemu_opt_get_bool(opts, "wait", true);
4015 bool is_telnet = qemu_opt_get_bool(opts, "telnet", false);
4016 bool do_nodelay = !qemu_opt_get_bool(opts, "delay", true);
5dd1f02b 4017 int64_t reconnect = qemu_opt_get_number(opts, "reconnect", 0);
dafd325d
PM
4018 const char *path = qemu_opt_get(opts, "path");
4019 const char *host = qemu_opt_get(opts, "host");
4020 const char *port = qemu_opt_get(opts, "port");
a8fb5427 4021 const char *tls_creds = qemu_opt_get(opts, "tls-creds");
dafd325d 4022 SocketAddress *addr;
f194a1ae 4023 ChardevSocket *sock;
dafd325d 4024
0b663b7d 4025 backend->type = CHARDEV_BACKEND_KIND_SOCKET;
dafd325d
PM
4026 if (!path) {
4027 if (!host) {
4028 error_setg(errp, "chardev: socket: no host given");
4029 return;
4030 }
4031 if (!port) {
4032 error_setg(errp, "chardev: socket: no port given");
4033 return;
4034 }
a8fb5427
DB
4035 } else {
4036 if (tls_creds) {
4037 error_setg(errp, "TLS can only be used over TCP socket");
4038 return;
4039 }
dafd325d
PM
4040 }
4041
32bafa8f 4042 sock = backend->u.socket.data = g_new0(ChardevSocket, 1);
f194a1ae 4043 qemu_chr_parse_common(opts, qapi_ChardevSocket_base(sock));
dafd325d 4044
f194a1ae
EB
4045 sock->has_nodelay = true;
4046 sock->nodelay = do_nodelay;
4047 sock->has_server = true;
4048 sock->server = is_listen;
4049 sock->has_telnet = true;
4050 sock->telnet = is_telnet;
4051 sock->has_wait = true;
4052 sock->wait = is_waitconnect;
4053 sock->has_reconnect = true;
4054 sock->reconnect = reconnect;
4055 sock->tls_creds = g_strdup(tls_creds);
dafd325d
PM
4056
4057 addr = g_new0(SocketAddress, 1);
4058 if (path) {
0399293e 4059 UnixSocketAddress *q_unix;
130257dc 4060 addr->type = SOCKET_ADDRESS_KIND_UNIX;
32bafa8f 4061 q_unix = addr->u.q_unix.data = g_new0(UnixSocketAddress, 1);
0399293e 4062 q_unix->path = g_strdup(path);
dafd325d 4063 } else {
130257dc 4064 addr->type = SOCKET_ADDRESS_KIND_INET;
32bafa8f
EB
4065 addr->u.inet.data = g_new(InetSocketAddress, 1);
4066 *addr->u.inet.data = (InetSocketAddress) {
0399293e
EB
4067 .host = g_strdup(host),
4068 .port = g_strdup(port),
4069 .has_to = qemu_opt_get(opts, "to"),
4070 .to = qemu_opt_get_number(opts, "to", 0),
4071 .has_ipv4 = qemu_opt_get(opts, "ipv4"),
4072 .ipv4 = qemu_opt_get_bool(opts, "ipv4", 0),
4073 .has_ipv6 = qemu_opt_get(opts, "ipv6"),
4074 .ipv6 = qemu_opt_get_bool(opts, "ipv6", 0),
4075 };
dafd325d 4076 }
f194a1ae 4077 sock->addr = addr;
dafd325d
PM
4078}
4079
90a14bfe
PM
4080static void qemu_chr_parse_udp(QemuOpts *opts, ChardevBackend *backend,
4081 Error **errp)
4082{
4083 const char *host = qemu_opt_get(opts, "host");
4084 const char *port = qemu_opt_get(opts, "port");
4085 const char *localaddr = qemu_opt_get(opts, "localaddr");
4086 const char *localport = qemu_opt_get(opts, "localport");
4087 bool has_local = false;
4088 SocketAddress *addr;
f194a1ae 4089 ChardevUdp *udp;
90a14bfe 4090
0b663b7d 4091 backend->type = CHARDEV_BACKEND_KIND_UDP;
90a14bfe
PM
4092 if (host == NULL || strlen(host) == 0) {
4093 host = "localhost";
4094 }
4095 if (port == NULL || strlen(port) == 0) {
4096 error_setg(errp, "chardev: udp: remote port not specified");
4097 return;
4098 }
4099 if (localport == NULL || strlen(localport) == 0) {
4100 localport = "0";
4101 } else {
4102 has_local = true;
4103 }
4104 if (localaddr == NULL || strlen(localaddr) == 0) {
4105 localaddr = "";
4106 } else {
4107 has_local = true;
4108 }
4109
32bafa8f 4110 udp = backend->u.udp.data = g_new0(ChardevUdp, 1);
f194a1ae 4111 qemu_chr_parse_common(opts, qapi_ChardevUdp_base(udp));
90a14bfe
PM
4112
4113 addr = g_new0(SocketAddress, 1);
130257dc 4114 addr->type = SOCKET_ADDRESS_KIND_INET;
32bafa8f
EB
4115 addr->u.inet.data = g_new(InetSocketAddress, 1);
4116 *addr->u.inet.data = (InetSocketAddress) {
0399293e
EB
4117 .host = g_strdup(host),
4118 .port = g_strdup(port),
4119 .has_ipv4 = qemu_opt_get(opts, "ipv4"),
4120 .ipv4 = qemu_opt_get_bool(opts, "ipv4", 0),
4121 .has_ipv6 = qemu_opt_get(opts, "ipv6"),
4122 .ipv6 = qemu_opt_get_bool(opts, "ipv6", 0),
4123 };
f194a1ae 4124 udp->remote = addr;
90a14bfe
PM
4125
4126 if (has_local) {
f194a1ae 4127 udp->has_local = true;
90a14bfe 4128 addr = g_new0(SocketAddress, 1);
130257dc 4129 addr->type = SOCKET_ADDRESS_KIND_INET;
32bafa8f
EB
4130 addr->u.inet.data = g_new(InetSocketAddress, 1);
4131 *addr->u.inet.data = (InetSocketAddress) {
0399293e
EB
4132 .host = g_strdup(localaddr),
4133 .port = g_strdup(localport),
4134 };
f194a1ae 4135 udp->local = addr;
90a14bfe
PM
4136 }
4137}
4138
88cace9f
MAL
4139static const ChardevClass *char_get_class(const char *driver, Error **errp)
4140{
4141 ObjectClass *oc;
4142 const ChardevClass *cc;
4143 char *typename = g_strdup_printf("chardev-%s", driver);
4144
4145 oc = object_class_by_name(typename);
4146 g_free(typename);
4147
4148 if (!object_class_dynamic_cast(oc, TYPE_CHARDEV)) {
4149 error_setg(errp, "'%s' is not a valid char driver name", driver);
4150 return NULL;
4151 }
d654f34e 4152
88cace9f
MAL
4153 if (object_class_is_abstract(oc)) {
4154 error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "driver",
4155 "abstract device type");
4156 return NULL;
4157 }
4158
4159 cc = CHARDEV_CLASS(oc);
4160 if (cc->internal) {
4161 error_setg(errp, "'%s' is not a valid char driver name", driver);
4162 return NULL;
4163 }
4164
4165 return cc;
4166}
4167
0b663b7d
MAL
4168static Chardev *qemu_chardev_add(const char *id, const char *typename,
4169 ChardevBackend *backend, Error **errp)
4170{
4171 Chardev *chr;
4172
4173 chr = qemu_chr_find(id);
4174 if (chr) {
4175 error_setg(errp, "Chardev '%s' already exists", id);
4176 return NULL;
4177 }
4178
4179 chr = qemu_chardev_new(id, typename, backend, errp);
4180 if (!chr) {
4181 return NULL;
4182 }
4183
4184 QTAILQ_INSERT_TAIL(&chardevs, chr, next);
4185 return chr;
4186}
4187
88cace9f
MAL
4188static const struct ChardevAlias {
4189 const char *typename;
4190 const char *alias;
4191} chardev_alias_table[] = {
4192#ifdef HAVE_CHARDEV_PARPORT
4193 { "parallel", "parport" },
4194#endif
4195#ifdef HAVE_CHARDEV_SERIAL
4196 { "serial", "tty" },
4197#endif
4198};
4199
4200typedef struct ChadevClassFE {
4201 void (*fn)(const char *name, void *opaque);
4202 void *opaque;
4203} ChadevClassFE;
4204
4205static void
4206chardev_class_foreach(ObjectClass *klass, void *opaque)
2c5f4882 4207{
88cace9f
MAL
4208 ChadevClassFE *fe = opaque;
4209
4210 assert(g_str_has_prefix(object_class_get_name(klass), "chardev-"));
4211 if (CHARDEV_CLASS(klass)->internal) {
4212 return;
4213 }
4214
4215 fe->fn(object_class_get_name(klass) + 8, fe->opaque);
4216}
4217
4218static void
4219chardev_name_foreach(void (*fn)(const char *name, void *opaque), void *opaque)
4220{
4221 ChadevClassFE fe = { .fn = fn, .opaque = opaque };
4222 int i;
4223
4224 object_class_foreach(chardev_class_foreach, TYPE_CHARDEV, false, &fe);
4225
4226 for (i = 0; i < ARRAY_SIZE(chardev_alias_table); i++) {
4227 fn(chardev_alias_table[i].alias, opaque);
4228 }
4229}
4230
4231static void
4232help_string_append(const char *name, void *opaque)
4233{
4234 GString *str = opaque;
4235
4236 g_string_append_printf(str, "\n%s", name);
2c5f4882
GH
4237}
4238
0ec7b3e7
MAL
4239Chardev *qemu_chr_new_from_opts(QemuOpts *opts,
4240 Error **errp)
191bc01b 4241{
0aff637e 4242 Error *local_err = NULL;
88cace9f 4243 const ChardevClass *cc;
0ec7b3e7 4244 Chardev *chr;
a1698bf1 4245 int i;
0b663b7d 4246 ChardevBackend *backend = NULL;
0b812f31 4247 const char *name = qemu_opt_get(opts, "backend");
a61ae7f8
PM
4248 const char *id = qemu_opts_id(opts);
4249 char *bid = NULL;
191bc01b 4250
0b812f31 4251 if (name == NULL) {
312fd5f2 4252 error_setg(errp, "chardev: \"%s\" missing backend",
bd2d80b2 4253 qemu_opts_id(opts));
0b663b7d 4254 return NULL;
1bbd185f 4255 }
517b3d40 4256
0b812f31 4257 if (is_help_option(name)) {
776a32a0 4258 GString *str = g_string_new("");
88cace9f
MAL
4259
4260 chardev_name_foreach(help_string_append, str);
776a32a0
MAL
4261
4262 error_report("Available chardev backend types: %s", str->str);
4263 g_string_free(str, true);
0b812f31 4264 exit(0);
517b3d40
LM
4265 }
4266
4267 if (id == NULL) {
4268 error_setg(errp, "chardev: no id specified");
0b663b7d 4269 return NULL;
517b3d40
LM
4270 }
4271
88cace9f
MAL
4272 for (i = 0; i < ARRAY_SIZE(chardev_alias_table); i++) {
4273 if (g_strcmp0(chardev_alias_table[i].alias, name) == 0) {
4274 name = chardev_alias_table[i].typename;
191bc01b 4275 break;
d654f34e 4276 }
191bc01b 4277 }
88cace9f
MAL
4278
4279 cc = char_get_class(name, errp);
4280 if (cc == NULL) {
0b663b7d 4281 return NULL;
191bc01b
GH
4282 }
4283
a61ae7f8 4284 backend = g_new0(ChardevBackend, 1);
0b663b7d 4285 backend->type = CHARDEV_BACKEND_KIND_NULL;
edb2fb3c 4286
a61ae7f8
PM
4287 if (qemu_opt_get_bool(opts, "mux", 0)) {
4288 bid = g_strdup_printf("%s-base", id);
4289 }
2c5f4882 4290
a61ae7f8 4291 chr = NULL;
88cace9f
MAL
4292 if (cc->parse) {
4293 cc->parse(opts, backend, &local_err);
a61ae7f8
PM
4294 if (local_err) {
4295 error_propagate(errp, local_err);
0b663b7d 4296 goto out;
2c5f4882 4297 }
d0d7708b 4298 } else {
88cace9f
MAL
4299 ChardevCommon *ccom = g_new0(ChardevCommon, 1);
4300 qemu_chr_parse_common(opts, ccom);
4301 backend->u.null.data = ccom; /* Any ChardevCommon member would work */
2c5f4882 4302 }
d0d7708b 4303
0b663b7d
MAL
4304 chr = qemu_chardev_add(bid ? bid : id,
4305 object_class_get_name(OBJECT_CLASS(cc)),
4306 backend, errp);
4307 if (chr == NULL) {
4308 goto out;
191bc01b
GH
4309 }
4310
a61ae7f8 4311 if (bid) {
0b663b7d 4312 Chardev *mux;
a61ae7f8 4313 qapi_free_ChardevBackend(backend);
a61ae7f8 4314 backend = g_new0(ChardevBackend, 1);
130257dc 4315 backend->type = CHARDEV_BACKEND_KIND_MUX;
0b663b7d 4316 backend->u.mux.data = g_new0(ChardevMux, 1);
32bafa8f 4317 backend->u.mux.data->chardev = g_strdup(bid);
0b663b7d
MAL
4318 mux = qemu_chardev_add(id, TYPE_CHARDEV_MUX, backend, errp);
4319 if (mux == NULL) {
a61ae7f8
PM
4320 qemu_chr_delete(chr);
4321 chr = NULL;
0b663b7d 4322 goto out;
a61ae7f8 4323 }
0b663b7d 4324 chr = mux;
bd5c51ee 4325 }
7591c5c1 4326
0b663b7d 4327out:
a61ae7f8 4328 qapi_free_ChardevBackend(backend);
a61ae7f8 4329 g_free(bid);
191bc01b
GH
4330 return chr;
4331}
4332
0ec7b3e7 4333Chardev *qemu_chr_new_noreplay(const char *label, const char *filename)
6f97dba0
AL
4334{
4335 const char *p;
0ec7b3e7 4336 Chardev *chr;
191bc01b 4337 QemuOpts *opts;
bd2d80b2 4338 Error *err = NULL;
191bc01b 4339
c845f401
GH
4340 if (strstart(filename, "chardev:", &p)) {
4341 return qemu_chr_find(p);
4342 }
4343
191bc01b 4344 opts = qemu_chr_parse_compat(label, filename);
7e1b35b4
GH
4345 if (!opts)
4346 return NULL;
6f97dba0 4347
b4948be9 4348 chr = qemu_chr_new_from_opts(opts, &err);
84d18f06 4349 if (err) {
565f65d2 4350 error_report_err(err);
bd2d80b2 4351 }
7e1b35b4
GH
4352 if (chr && qemu_opt_get_bool(opts, "mux", 0)) {
4353 monitor_init(chr, MONITOR_USE_READLINE);
6f97dba0 4354 }
0a73336d 4355 qemu_opts_del(opts);
6f97dba0
AL
4356 return chr;
4357}
4358
0ec7b3e7 4359Chardev *qemu_chr_new(const char *label, const char *filename)
33577b47 4360{
0ec7b3e7 4361 Chardev *chr;
b4948be9 4362 chr = qemu_chr_new_noreplay(label, filename);
33577b47 4363 if (chr) {
5ebd6703
MAL
4364 if (replay_mode != REPLAY_MODE_NONE) {
4365 qemu_chr_set_feature(chr, QEMU_CHAR_FEATURE_REPLAY);
4366 }
777357d7 4367 if (qemu_chr_replay(chr) && CHARDEV_GET_CLASS(chr)->chr_ioctl) {
776a32a0
MAL
4368 error_report("Replay: ioctl is not supported "
4369 "for serial devices yet");
33577b47
PD
4370 }
4371 replay_register_char_driver(chr);
4372 }
4373 return chr;
4374}
4375
5345fdb4 4376void qemu_chr_fe_set_echo(CharBackend *be, bool echo)
c48855e1 4377{
0ec7b3e7 4378 Chardev *chr = be->chr;
5345fdb4 4379
777357d7
MAL
4380 if (chr && CHARDEV_GET_CLASS(chr)->chr_set_echo) {
4381 CHARDEV_GET_CLASS(chr)->chr_set_echo(chr, echo);
c48855e1
PB
4382 }
4383}
4384
5345fdb4 4385void qemu_chr_fe_set_open(CharBackend *be, int fe_open)
7c32c4fe 4386{
0ec7b3e7 4387 Chardev *chr = be->chr;
5345fdb4 4388
fa394ed6
MAL
4389 if (!chr) {
4390 return;
4391 }
4392
830896af 4393 if (be->fe_open == fe_open) {
c0c4bd2c
HG
4394 return;
4395 }
830896af 4396 be->fe_open = fe_open;
777357d7
MAL
4397 if (CHARDEV_GET_CLASS(chr)->chr_set_fe_open) {
4398 CHARDEV_GET_CLASS(chr)->chr_set_fe_open(chr, fe_open);
7c32c4fe
HG
4399 }
4400}
4401
5345fdb4 4402guint qemu_chr_fe_add_watch(CharBackend *be, GIOCondition cond,
6f1de6b7 4403 GIOFunc func, void *user_data)
23673ca7 4404{
0ec7b3e7 4405 Chardev *s = be->chr;
23673ca7
AL
4406 GSource *src;
4407 guint tag;
4408
777357d7 4409 if (!s || CHARDEV_GET_CLASS(s)->chr_add_watch == NULL) {
6f1de6b7 4410 return 0;
23673ca7
AL
4411 }
4412
777357d7 4413 src = CHARDEV_GET_CLASS(s)->chr_add_watch(s, cond);
62c339c5 4414 if (!src) {
6f1de6b7 4415 return 0;
62c339c5
PB
4416 }
4417
23673ca7
AL
4418 g_source_set_callback(src, (GSourceFunc)func, user_data, NULL);
4419 tag = g_source_attach(src, NULL);
4420 g_source_unref(src);
4421
4422 return tag;
4423}
4424
5345fdb4 4425void qemu_chr_fe_disconnect(CharBackend *be)
7d9d17f7 4426{
0ec7b3e7 4427 Chardev *chr = be->chr;
5345fdb4 4428
777357d7
MAL
4429 if (chr && CHARDEV_GET_CLASS(chr)->chr_disconnect) {
4430 CHARDEV_GET_CLASS(chr)->chr_disconnect(chr);
7d9d17f7
TM
4431 }
4432}
4433
0ec7b3e7 4434void qemu_chr_delete(Chardev *chr)
1ad78ea5
MAL
4435{
4436 QTAILQ_REMOVE(&chardevs, chr, next);
8cddc469 4437 object_unref(OBJECT(chr));
1ad78ea5
MAL
4438}
4439
c5a415a0 4440ChardevInfoList *qmp_query_chardev(Error **errp)
6f97dba0 4441{
c5a415a0 4442 ChardevInfoList *chr_list = NULL;
0ec7b3e7 4443 Chardev *chr;
6f97dba0 4444
72cf2d4f 4445 QTAILQ_FOREACH(chr, &chardevs, next) {
c5a415a0
LC
4446 ChardevInfoList *info = g_malloc0(sizeof(*info));
4447 info->value = g_malloc0(sizeof(*info->value));
4448 info->value->label = g_strdup(chr->label);
4449 info->value->filename = g_strdup(chr->filename);
830896af 4450 info->value->frontend_open = chr->be && chr->be->fe_open;
c5a415a0
LC
4451
4452 info->next = chr_list;
4453 chr_list = info;
6f97dba0 4454 }
588b3832 4455
c5a415a0 4456 return chr_list;
6f97dba0 4457}
c845f401 4458
88cace9f
MAL
4459static void
4460qmp_prepend_backend(const char *name, void *opaque)
0b812f31 4461{
88cace9f 4462 ChardevBackendInfoList **list = opaque;
0b812f31 4463 ChardevBackendInfoList *info = g_malloc0(sizeof(*info));
88cace9f 4464
0b812f31
MAL
4465 info->value = g_malloc0(sizeof(*info->value));
4466 info->value->name = g_strdup(name);
88cace9f
MAL
4467 info->next = *list;
4468 *list = info;
0b812f31
MAL
4469}
4470
77d1c3c6
MK
4471ChardevBackendInfoList *qmp_query_chardev_backends(Error **errp)
4472{
4473 ChardevBackendInfoList *backend_list = NULL;
a1698bf1 4474
88cace9f 4475 chardev_name_foreach(qmp_prepend_backend, &backend_list);
77d1c3c6
MK
4476
4477 return backend_list;
4478}
4479
0ec7b3e7 4480Chardev *qemu_chr_find(const char *name)
c845f401 4481{
0ec7b3e7 4482 Chardev *chr;
c845f401 4483
72cf2d4f 4484 QTAILQ_FOREACH(chr, &chardevs, next) {
c845f401
GH
4485 if (strcmp(chr->label, name) != 0)
4486 continue;
4487 return chr;
4488 }
4489 return NULL;
4490}
0beb4942 4491
4d454574
PB
4492QemuOptsList qemu_chardev_opts = {
4493 .name = "chardev",
4494 .implied_opt_name = "backend",
4495 .head = QTAILQ_HEAD_INITIALIZER(qemu_chardev_opts.head),
4496 .desc = {
4497 {
4498 .name = "backend",
4499 .type = QEMU_OPT_STRING,
4500 },{
4501 .name = "path",
4502 .type = QEMU_OPT_STRING,
4503 },{
4504 .name = "host",
4505 .type = QEMU_OPT_STRING,
4506 },{
4507 .name = "port",
4508 .type = QEMU_OPT_STRING,
4509 },{
4510 .name = "localaddr",
4511 .type = QEMU_OPT_STRING,
4512 },{
4513 .name = "localport",
4514 .type = QEMU_OPT_STRING,
4515 },{
4516 .name = "to",
4517 .type = QEMU_OPT_NUMBER,
4518 },{
4519 .name = "ipv4",
4520 .type = QEMU_OPT_BOOL,
4521 },{
4522 .name = "ipv6",
4523 .type = QEMU_OPT_BOOL,
4524 },{
4525 .name = "wait",
4526 .type = QEMU_OPT_BOOL,
4527 },{
4528 .name = "server",
4529 .type = QEMU_OPT_BOOL,
4530 },{
4531 .name = "delay",
4532 .type = QEMU_OPT_BOOL,
5dd1f02b
CM
4533 },{
4534 .name = "reconnect",
4535 .type = QEMU_OPT_NUMBER,
4d454574
PB
4536 },{
4537 .name = "telnet",
4538 .type = QEMU_OPT_BOOL,
a8fb5427
DB
4539 },{
4540 .name = "tls-creds",
4541 .type = QEMU_OPT_STRING,
4d454574
PB
4542 },{
4543 .name = "width",
4544 .type = QEMU_OPT_NUMBER,
4545 },{
4546 .name = "height",
4547 .type = QEMU_OPT_NUMBER,
4548 },{
4549 .name = "cols",
4550 .type = QEMU_OPT_NUMBER,
4551 },{
4552 .name = "rows",
4553 .type = QEMU_OPT_NUMBER,
4554 },{
4555 .name = "mux",
4556 .type = QEMU_OPT_BOOL,
4557 },{
4558 .name = "signal",
4559 .type = QEMU_OPT_BOOL,
4560 },{
4561 .name = "name",
4562 .type = QEMU_OPT_STRING,
4563 },{
4564 .name = "debug",
4565 .type = QEMU_OPT_NUMBER,
51767e7c 4566 },{
3949e594 4567 .name = "size",
de1cc36e 4568 .type = QEMU_OPT_SIZE,
bb6fb7c0
GH
4569 },{
4570 .name = "chardev",
4571 .type = QEMU_OPT_STRING,
31e38a22
OK
4572 },{
4573 .name = "append",
4574 .type = QEMU_OPT_BOOL,
d0d7708b
DB
4575 },{
4576 .name = "logfile",
4577 .type = QEMU_OPT_STRING,
4578 },{
4579 .name = "logappend",
4580 .type = QEMU_OPT_BOOL,
4d454574
PB
4581 },
4582 { /* end of list */ }
4583 },
4584};
f1a1a356 4585
ffbdbe59
GH
4586#ifdef _WIN32
4587
777357d7
MAL
4588static void qmp_chardev_open_file(Chardev *chr,
4589 ChardevBackend *backend,
4590 bool *be_opened,
4591 Error **errp)
ffbdbe59 4592{
32bafa8f 4593 ChardevFile *file = backend->u.file.data;
ffbdbe59 4594 HANDLE out;
c025f689
SW
4595 DWORD accessmode;
4596 DWORD flags;
ffbdbe59 4597
e859eda5 4598 if (file->has_in) {
ffbdbe59 4599 error_setg(errp, "input file not supported");
777357d7 4600 return;
ffbdbe59
GH
4601 }
4602
c025f689
SW
4603 if (file->has_append && file->append) {
4604 /* Append to file if it already exists. */
4605 accessmode = FILE_GENERIC_WRITE & ~FILE_WRITE_DATA;
4606 flags = OPEN_ALWAYS;
4607 } else {
4608 /* Truncate file if it already exists. */
4609 accessmode = GENERIC_WRITE;
4610 flags = CREATE_ALWAYS;
4611 }
4612
4613 out = CreateFile(file->out, accessmode, FILE_SHARE_READ, NULL, flags,
4614 FILE_ATTRIBUTE_NORMAL, NULL);
ffbdbe59
GH
4615 if (out == INVALID_HANDLE_VALUE) {
4616 error_setg(errp, "open %s failed", file->out);
777357d7 4617 return;
ffbdbe59 4618 }
777357d7
MAL
4619
4620 qemu_chr_open_win_file(chr, out);
ffbdbe59
GH
4621}
4622
777357d7
MAL
4623static void qmp_chardev_open_serial(Chardev *chr,
4624 ChardevBackend *backend,
4625 bool *be_opened,
4626 Error **errp)
d59044ef 4627{
32bafa8f 4628 ChardevHostdev *serial = backend->u.serial.data;
acbfbe4a 4629
777357d7 4630 win_chr_init(chr, serial->device, errp);
d36b2b90
MA
4631}
4632
ffbdbe59
GH
4633#else /* WIN32 */
4634
4635static int qmp_chardev_open_file_source(char *src, int flags,
4636 Error **errp)
4637{
4638 int fd = -1;
4639
4640 TFR(fd = qemu_open(src, flags, 0666));
4641 if (fd == -1) {
20c39760 4642 error_setg_file_open(errp, errno, src);
ffbdbe59
GH
4643 }
4644 return fd;
4645}
4646
777357d7
MAL
4647static void qmp_chardev_open_file(Chardev *chr,
4648 ChardevBackend *backend,
4649 bool *be_opened,
4650 Error **errp)
ffbdbe59 4651{
32bafa8f 4652 ChardevFile *file = backend->u.file.data;
5f758366 4653 int flags, in = -1, out;
ffbdbe59 4654
31e38a22
OK
4655 flags = O_WRONLY | O_CREAT | O_BINARY;
4656 if (file->has_append && file->append) {
4657 flags |= O_APPEND;
4658 } else {
4659 flags |= O_TRUNC;
4660 }
4661
ffbdbe59 4662 out = qmp_chardev_open_file_source(file->out, flags, errp);
5f758366 4663 if (out < 0) {
777357d7 4664 return;
ffbdbe59
GH
4665 }
4666
e859eda5 4667 if (file->has_in) {
ffbdbe59
GH
4668 flags = O_RDONLY;
4669 in = qmp_chardev_open_file_source(file->in, flags, errp);
5f758366 4670 if (in < 0) {
ffbdbe59 4671 qemu_close(out);
777357d7 4672 return;
ffbdbe59
GH
4673 }
4674 }
4675
777357d7 4676 qemu_chr_open_fd(chr, in, out);
ffbdbe59
GH
4677}
4678
d809ab95 4679#ifdef HAVE_CHARDEV_SERIAL
777357d7
MAL
4680static void qmp_chardev_open_serial(Chardev *chr,
4681 ChardevBackend *backend,
4682 bool *be_opened,
4683 Error **errp)
d59044ef 4684{
32bafa8f 4685 ChardevHostdev *serial = backend->u.serial.data;
d36b2b90
MA
4686 int fd;
4687
4688 fd = qmp_chardev_open_file_source(serial->device, O_RDWR, errp);
5f758366 4689 if (fd < 0) {
777357d7 4690 return;
39099991 4691 }
f9e8cacc 4692 qemu_set_nonblock(fd);
acbfbe4a 4693 tty_serial_init(fd, 115200, 'N', 8, 1);
b68e956a 4694
777357d7 4695 qemu_chr_open_fd(chr, fd, fd);
d36b2b90 4696}
6511d396 4697#endif
d36b2b90 4698
d809ab95 4699#ifdef HAVE_CHARDEV_PARPORT
777357d7
MAL
4700static void qmp_chardev_open_parallel(Chardev *chr,
4701 ChardevBackend *backend,
4702 bool *be_opened,
4703 Error **errp)
d36b2b90 4704{
32bafa8f 4705 ChardevHostdev *parallel = backend->u.parallel.data;
d36b2b90
MA
4706 int fd;
4707
4708 fd = qmp_chardev_open_file_source(parallel->device, O_RDWR, errp);
5f758366 4709 if (fd < 0) {
777357d7 4710 return;
d59044ef 4711 }
777357d7 4712 qemu_chr_open_pp_fd(chr, fd, be_opened, errp);
d59044ef 4713}
b68e956a 4714
777357d7
MAL
4715static void char_parallel_class_init(ObjectClass *oc, void *data)
4716{
4717 ChardevClass *cc = CHARDEV_CLASS(oc);
4718
88cace9f 4719 cc->parse = qemu_chr_parse_parallel;
777357d7 4720 cc->open = qmp_chardev_open_parallel;
b68e956a 4721#if defined(__linux__)
777357d7 4722 cc->chr_ioctl = pp_ioctl;
b68e956a 4723#elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
777357d7 4724 cc->chr_ioctl = pp_ioctl;
b68e956a 4725#endif
777357d7
MAL
4726}
4727
c9305728
MAL
4728static void char_parallel_finalize(Object *obj)
4729{
4730#if defined(__linux__)
4731 Chardev *chr = CHARDEV(obj);
4732 ParallelChardev *drv = PARALLEL_CHARDEV(chr);
4733 int fd = drv->fd;
4734
4735 pp_hw_mode(drv, IEEE1284_MODE_COMPAT);
4736 ioctl(fd, PPRELEASE);
4737 close(fd);
4738 qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
4739#elif defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
4740 /* FIXME: close fd? */
4741#endif
4742}
4743
777357d7
MAL
4744static const TypeInfo char_parallel_type_info = {
4745 .name = TYPE_CHARDEV_PARALLEL,
4746 .parent = TYPE_CHARDEV,
4747 .instance_size = sizeof(ParallelChardev),
c9305728 4748 .instance_finalize = char_parallel_finalize,
777357d7 4749 .class_init = char_parallel_class_init,
b68e956a 4750};
d809ab95 4751#endif
d59044ef 4752
ffbdbe59
GH
4753#endif /* WIN32 */
4754
777357d7
MAL
4755static void char_file_class_init(ObjectClass *oc, void *data)
4756{
4757 ChardevClass *cc = CHARDEV_CLASS(oc);
4758
88cace9f 4759 cc->parse = qemu_chr_parse_file_out;
777357d7 4760 cc->open = qmp_chardev_open_file;
777357d7
MAL
4761}
4762
4763static const TypeInfo char_file_type_info = {
4764 .name = TYPE_CHARDEV_FILE,
4765#ifdef _WIN32
4766 .parent = TYPE_CHARDEV_WIN,
b68e956a 4767#else
777357d7 4768 .parent = TYPE_CHARDEV_FD,
b68e956a 4769#endif
777357d7 4770 .class_init = char_file_class_init,
b68e956a
MAL
4771};
4772
4773#ifdef HAVE_CHARDEV_SERIAL
777357d7 4774
777357d7
MAL
4775static void char_serial_class_init(ObjectClass *oc, void *data)
4776{
4777 ChardevClass *cc = CHARDEV_CLASS(oc);
4778
88cace9f 4779 cc->parse = qemu_chr_parse_serial;
777357d7
MAL
4780 cc->open = qmp_chardev_open_serial;
4781#ifndef _WIN32
4782 cc->chr_ioctl = tty_serial_ioctl;
777357d7
MAL
4783#endif
4784}
4785
4786static const TypeInfo char_serial_type_info = {
4787 .name = TYPE_CHARDEV_SERIAL,
b68e956a 4788#ifdef _WIN32
777357d7 4789 .parent = TYPE_CHARDEV_WIN,
b68e956a 4790#else
777357d7 4791 .parent = TYPE_CHARDEV_FD,
b68e956a 4792#endif
777357d7 4793 .class_init = char_serial_class_init,
b68e956a
MAL
4794};
4795#endif
4796
5dd1f02b
CM
4797static gboolean socket_reconnect_timeout(gpointer opaque)
4798{
777357d7
MAL
4799 Chardev *chr = CHARDEV(opaque);
4800 SocketChardev *s = SOCKET_CHARDEV(opaque);
317856ca 4801 QIOChannelSocket *sioc;
5dd1f02b
CM
4802
4803 s->reconnect_timer = 0;
4804
4805 if (chr->be_open) {
4806 return false;
4807 }
4808
317856ca 4809 sioc = qio_channel_socket_new();
e93a68e1 4810 tcp_chr_set_client_ioc_name(chr, sioc);
317856ca
DB
4811 qio_channel_socket_connect_async(sioc, s->addr,
4812 qemu_chr_socket_connected,
4813 chr, NULL);
5dd1f02b
CM
4814
4815 return false;
4816}
4817
777357d7
MAL
4818static void qmp_chardev_open_socket(Chardev *chr,
4819 ChardevBackend *backend,
4820 bool *be_opened,
4821 Error **errp)
f6bd5d6e 4822{
777357d7 4823 SocketChardev *s = SOCKET_CHARDEV(chr);
32bafa8f 4824 ChardevSocket *sock = backend->u.socket.data;
f6bd5d6e
GH
4825 SocketAddress *addr = sock->addr;
4826 bool do_nodelay = sock->has_nodelay ? sock->nodelay : false;
4827 bool is_listen = sock->has_server ? sock->server : true;
4828 bool is_telnet = sock->has_telnet ? sock->telnet : false;
4829 bool is_waitconnect = sock->has_wait ? sock->wait : false;
5dd1f02b 4830 int64_t reconnect = sock->has_reconnect ? sock->reconnect : 0;
317856ca 4831 QIOChannelSocket *sioc = NULL;
43ded1a0 4832
130257dc 4833 s->is_unix = addr->type == SOCKET_ADDRESS_KIND_UNIX;
cfb429cb
CM
4834 s->is_listen = is_listen;
4835 s->is_telnet = is_telnet;
43ded1a0 4836 s->do_nodelay = do_nodelay;
a8fb5427
DB
4837 if (sock->tls_creds) {
4838 Object *creds;
4839 creds = object_resolve_path_component(
4840 object_get_objects_root(), sock->tls_creds);
4841 if (!creds) {
4842 error_setg(errp, "No TLS credentials with id '%s'",
4843 sock->tls_creds);
4844 goto error;
4845 }
4846 s->tls_creds = (QCryptoTLSCreds *)
4847 object_dynamic_cast(creds,
4848 TYPE_QCRYPTO_TLS_CREDS);
4849 if (!s->tls_creds) {
4850 error_setg(errp, "Object with id '%s' is not TLS credentials",
4851 sock->tls_creds);
4852 goto error;
4853 }
4854 object_ref(OBJECT(s->tls_creds));
4855 if (is_listen) {
4856 if (s->tls_creds->endpoint != QCRYPTO_TLS_CREDS_ENDPOINT_SERVER) {
4857 error_setg(errp, "%s",
4858 "Expected TLS credentials for server endpoint");
4859 goto error;
4860 }
4861 } else {
4862 if (s->tls_creds->endpoint != QCRYPTO_TLS_CREDS_ENDPOINT_CLIENT) {
4863 error_setg(errp, "%s",
4864 "Expected TLS credentials for client endpoint");
4865 goto error;
4866 }
4867 }
4868 }
4869
37f9e0a2 4870 s->addr = QAPI_CLONE(SocketAddress, sock->addr);
43ded1a0 4871
0a73336d
DB
4872 qemu_chr_set_feature(chr, QEMU_CHAR_FEATURE_RECONNECTABLE);
4873 if (s->is_unix) {
4874 qemu_chr_set_feature(chr, QEMU_CHAR_FEATURE_FD_PASS);
4875 }
4876
43ded1a0 4877 /* be isn't opened until we get a connection */
82878dac 4878 *be_opened = false;
43ded1a0 4879
0ff0fad2
DB
4880 chr->filename = SocketAddress_to_str("disconnected:",
4881 addr, is_listen, is_telnet);
f6bd5d6e
GH
4882
4883 if (is_listen) {
43ded1a0
CM
4884 if (is_telnet) {
4885 s->do_telnetopt = 1;
4886 }
5dd1f02b
CM
4887 } else if (reconnect > 0) {
4888 s->reconnect_time = reconnect;
f6bd5d6e 4889 }
43ded1a0 4890
5008e5b7 4891 if (s->reconnect_time) {
d7a04fd7 4892 sioc = qio_channel_socket_new();
e93a68e1 4893 tcp_chr_set_client_ioc_name(chr, sioc);
317856ca
DB
4894 qio_channel_socket_connect_async(sioc, s->addr,
4895 qemu_chr_socket_connected,
4896 chr, NULL);
08b758b4 4897 } else {
d7a04fd7 4898 if (s->is_listen) {
e93a68e1 4899 char *name;
d7a04fd7 4900 sioc = qio_channel_socket_new();
e93a68e1
DB
4901
4902 name = g_strdup_printf("chardev-tcp-listener-%s", chr->label);
4903 qio_channel_set_name(QIO_CHANNEL(sioc), name);
4904 g_free(name);
4905
d7a04fd7
MAL
4906 if (qio_channel_socket_listen_sync(sioc, s->addr, errp) < 0) {
4907 goto error;
4908 }
4909 s->listen_ioc = sioc;
4910 if (is_waitconnect &&
4911 qemu_chr_wait_connected(chr, errp) < 0) {
2c3a5dcb 4912 return;
d7a04fd7
MAL
4913 }
4914 if (!s->ioc) {
4915 s->listen_tag = qio_channel_add_watch(
4916 QIO_CHANNEL(s->listen_ioc), G_IO_IN,
4917 tcp_chr_accept, chr, NULL);
4918 }
4919 } else if (qemu_chr_wait_connected(chr, errp) < 0) {
08b758b4
DB
4920 goto error;
4921 }
43ded1a0
CM
4922 }
4923
777357d7 4924 return;
a8fb5427 4925
777357d7 4926error:
08b758b4
DB
4927 if (sioc) {
4928 object_unref(OBJECT(sioc));
4929 }
f6bd5d6e
GH
4930}
4931
777357d7
MAL
4932static void char_socket_class_init(ObjectClass *oc, void *data)
4933{
4934 ChardevClass *cc = CHARDEV_CLASS(oc);
4935
88cace9f 4936 cc->parse = qemu_chr_parse_socket;
777357d7
MAL
4937 cc->open = qmp_chardev_open_socket;
4938 cc->chr_wait_connected = tcp_chr_wait_connected;
4939 cc->chr_write = tcp_chr_write;
4940 cc->chr_sync_read = tcp_chr_sync_read;
4941 cc->chr_disconnect = tcp_chr_disconnect;
4942 cc->get_msgfds = tcp_get_msgfds;
4943 cc->set_msgfds = tcp_set_msgfds;
4944 cc->chr_add_client = tcp_chr_add_client;
4945 cc->chr_add_watch = tcp_chr_add_watch;
4946 cc->chr_update_read_handler = tcp_chr_update_read_handler;
777357d7
MAL
4947}
4948
4949static const TypeInfo char_socket_type_info = {
4950 .name = TYPE_CHARDEV_SOCKET,
4951 .parent = TYPE_CHARDEV,
4952 .instance_size = sizeof(SocketChardev),
2c3a5dcb 4953 .instance_finalize = char_socket_finalize,
777357d7
MAL
4954 .class_init = char_socket_class_init,
4955};
4956
4957static void qmp_chardev_open_udp(Chardev *chr,
4958 ChardevBackend *backend,
4959 bool *be_opened,
4960 Error **errp)
3ecc059d 4961{
32bafa8f 4962 ChardevUdp *udp = backend->u.udp.data;
9894dc0c 4963 QIOChannelSocket *sioc = qio_channel_socket_new();
e93a68e1 4964 char *name;
777357d7 4965 UdpChardev *s = UDP_CHARDEV(chr);
3ecc059d 4966
9894dc0c 4967 if (qio_channel_socket_dgram_sync(sioc,
150dcd1a 4968 udp->local, udp->remote,
9894dc0c
DB
4969 errp) < 0) {
4970 object_unref(OBJECT(sioc));
777357d7 4971 return;
acbfbe4a 4972 }
e93a68e1
DB
4973
4974 name = g_strdup_printf("chardev-udp-%s", chr->label);
4975 qio_channel_set_name(QIO_CHANNEL(sioc), name);
4976 g_free(name);
4977
acbfbe4a 4978 s->ioc = QIO_CHANNEL(sioc);
acbfbe4a
MAL
4979 /* be isn't opened until we get a connection */
4980 *be_opened = false;
3ecc059d
GH
4981}
4982
777357d7
MAL
4983static void char_udp_class_init(ObjectClass *oc, void *data)
4984{
4985 ChardevClass *cc = CHARDEV_CLASS(oc);
4986
88cace9f 4987 cc->parse = qemu_chr_parse_udp;
777357d7
MAL
4988 cc->open = qmp_chardev_open_udp;
4989 cc->chr_write = udp_chr_write;
4990 cc->chr_update_read_handler = udp_chr_update_read_handler;
777357d7
MAL
4991}
4992
4993static const TypeInfo char_udp_type_info = {
4994 .name = TYPE_CHARDEV_UDP,
4995 .parent = TYPE_CHARDEV,
4996 .instance_size = sizeof(UdpChardev),
819aad23 4997 .instance_finalize = char_udp_finalize,
777357d7 4998 .class_init = char_udp_class_init,
b68e956a 4999};
0a73336d 5000
0ec7b3e7 5001bool qemu_chr_has_feature(Chardev *chr,
279b066e 5002 ChardevFeature feature)
0a73336d
DB
5003{
5004 return test_bit(feature, chr->features);
5005}
5006
0ec7b3e7 5007void qemu_chr_set_feature(Chardev *chr,
279b066e 5008 ChardevFeature feature)
0a73336d
DB
5009{
5010 return set_bit(feature, chr->features);
5011}
5012
777357d7
MAL
5013Chardev *qemu_chardev_new(const char *id, const char *typename,
5014 ChardevBackend *backend, Error **errp)
f1a1a356 5015{
0ec7b3e7 5016 Chardev *chr = NULL;
eaeba653 5017 Error *local_err = NULL;
82878dac 5018 bool be_opened = true;
f1a1a356 5019
777357d7 5020 assert(g_str_has_prefix(typename, "chardev-"));
f1a1a356 5021
777357d7
MAL
5022 chr = CHARDEV(object_new(typename));
5023 chr->label = g_strdup(id);
4ca17281 5024
777357d7 5025 qemu_char_open(chr, backend, &be_opened, &local_err);
a1698bf1
MAL
5026 if (local_err) {
5027 error_propagate(errp, local_err);
777357d7
MAL
5028 object_unref(OBJECT(chr));
5029 return NULL;
eaeba653
PB
5030 }
5031
eaeba653 5032 if (!chr->filename) {
777357d7 5033 chr->filename = g_strdup(typename + 8);
f1a1a356 5034 }
82878dac 5035 if (be_opened) {
eaeba653
PB
5036 qemu_chr_be_event(chr, CHR_EVENT_OPENED);
5037 }
777357d7
MAL
5038
5039 return chr;
5040}
5041
5042ChardevReturn *qmp_chardev_add(const char *id, ChardevBackend *backend,
5043 Error **errp)
5044{
5045 const ChardevClass *cc;
5046 ChardevReturn *ret;
5047 Chardev *chr;
5048
777357d7
MAL
5049 cc = char_get_class(ChardevBackendKind_lookup[backend->type], errp);
5050 if (!cc) {
5051 return NULL;
5052 }
5053
0b663b7d 5054 chr = qemu_chardev_add(id, object_class_get_name(OBJECT_CLASS(cc)),
777357d7
MAL
5055 backend, errp);
5056 if (!chr) {
5057 return NULL;
5058 }
5059
5060 ret = g_new0(ChardevReturn, 1);
5061 if (CHARDEV_IS_PTY(chr)) {
5062 ret->pty = g_strdup(chr->filename + 4);
5063 ret->has_pty = true;
5064 }
5065
eaeba653 5066 return ret;
f1a1a356
GH
5067}
5068
5069void qmp_chardev_remove(const char *id, Error **errp)
5070{
0ec7b3e7 5071 Chardev *chr;
f1a1a356
GH
5072
5073 chr = qemu_chr_find(id);
8108fd3e 5074 if (chr == NULL) {
f1a1a356
GH
5075 error_setg(errp, "Chardev '%s' not found", id);
5076 return;
5077 }
a4afa548 5078 if (qemu_chr_is_busy(chr)) {
f1a1a356
GH
5079 error_setg(errp, "Chardev '%s' is busy", id);
5080 return;
5081 }
5ebd6703 5082 if (qemu_chr_replay(chr)) {
33577b47
PD
5083 error_setg(errp,
5084 "Chardev '%s' cannot be unplugged in record/replay mode", id);
5085 return;
5086 }
f1a1a356
GH
5087 qemu_chr_delete(chr);
5088}
d654f34e 5089
aa5cb7f5 5090void qemu_chr_cleanup(void)
c1111a24 5091{
0ec7b3e7 5092 Chardev *chr, *tmp;
c1111a24
MAL
5093
5094 QTAILQ_FOREACH_SAFE(chr, &chardevs, next, tmp) {
5095 qemu_chr_delete(chr);
5096 }
5097}
5098
d654f34e
AL
5099static void register_types(void)
5100{
88cace9f
MAL
5101 type_register_static(&char_type_info);
5102#ifndef _WIN32
5103 type_register_static(&char_fd_type_info);
5104#else
5105 type_register_static(&char_win_type_info);
5106 type_register_static(&char_win_stdio_type_info);
5107#endif
5108 type_register_static(&char_null_type_info);
5109 type_register_static(&char_socket_type_info);
5110 type_register_static(&char_udp_type_info);
5111 type_register_static(&char_ringbuf_type_info);
5112 type_register_static(&char_file_type_info);
5113 type_register_static(&char_stdio_type_info);
b68e956a 5114#ifdef HAVE_CHARDEV_SERIAL
88cace9f 5115 type_register_static(&char_serial_type_info);
6511d396 5116#endif
38bfb1a6 5117#ifdef HAVE_CHARDEV_PARPORT
88cace9f 5118 type_register_static(&char_parallel_type_info);
38bfb1a6 5119#endif
c2e75a43 5120#ifdef HAVE_CHARDEV_PTY
88cace9f 5121 type_register_static(&char_pty_type_info);
c2e75a43 5122#endif
122e5ed4 5123#ifdef _WIN32
88cace9f 5124 type_register_static(&char_console_type_info);
122e5ed4 5125#endif
88cace9f
MAL
5126 type_register_static(&char_pipe_type_info);
5127 type_register_static(&char_mux_type_info);
5128 type_register_static(&char_memory_type_info);
0b812f31 5129
7b7ab18d
MR
5130 /* this must be done after machine init, since we register FEs with muxes
5131 * as part of realize functions like serial_isa_realizefn when -nographic
5132 * is specified
5133 */
5134 qemu_add_machine_init_done_notifier(&muxes_realize_notify);
d654f34e
AL
5135}
5136
5137type_init(register_types);