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