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