spice-qemu-char.c

   1 #include "config-host.h"
   2 #include "trace.h"
   3 #include "ui/qemu-spice.h"
   4 #include "char/char.h"
   5 #include <spice.h>
   6 #include <spice-experimental.h>
   7 #include <spice/protocol.h>
   8
   9 #include "qemu/osdep.h"
  10
  11 #define dprintf(_scd, _level, _fmt, ...)                                \
  12     do {                                                                \
  13         static unsigned __dprintf_counter = 0;                          \
  14         if (_scd->debug >= _level) {                                    \
  15             fprintf(stderr, "scd: %3d: " _fmt, ++__dprintf_counter, ## __VA_ARGS__);\
  16         }                                                               \
  17     } while (0)
  18
  19 typedef struct SpiceCharDriver {
  20     CharDriverState*      chr;
  21     SpiceCharDeviceInstance     sin;
  22     char                  *subtype;
  23     bool                  active;
  24     uint8_t               *buffer;
  25     uint8_t               *datapos;
  26     ssize_t               bufsize, datalen;
  27     uint32_t              debug;
  28     QLIST_ENTRY(SpiceCharDriver) next;
  29 } SpiceCharDriver;
  30
  31 static QLIST_HEAD(, SpiceCharDriver) spice_chars =
  32     QLIST_HEAD_INITIALIZER(spice_chars);
  33
  34 static int vmc_write(SpiceCharDeviceInstance *sin, const uint8_t *buf, int len)
  35 {
  36     SpiceCharDriver *scd = container_of(sin, SpiceCharDriver, sin);
  37     ssize_t out = 0;
  38     ssize_t last_out;
  39     uint8_t* p = (uint8_t*)buf;
  40
  41     while (len > 0) {
  42         last_out = MIN(len, qemu_chr_be_can_write(scd->chr));
  43         if (last_out <= 0) {
  44             break;
  45         }
  46         qemu_chr_be_write(scd->chr, p, last_out);
  47         out += last_out;
  48         len -= last_out;
  49         p += last_out;
  50     }
  51
  52     dprintf(scd, 3, "%s: %zu/%zd\n", __func__, out, len + out);
  53     trace_spice_vmc_write(out, len + out);
  54     return out;
  55 }
  56
  57 static int vmc_read(SpiceCharDeviceInstance *sin, uint8_t *buf, int len)
  58 {
  59     SpiceCharDriver *scd = container_of(sin, SpiceCharDriver, sin);
  60     int bytes = MIN(len, scd->datalen);
  61
  62     dprintf(scd, 2, "%s: %p %d/%d/%zd\n", __func__, scd->datapos, len, bytes, scd->datalen);
  63     if (bytes > 0) {
  64         memcpy(buf, scd->datapos, bytes);
  65         scd->datapos += bytes;
  66         scd->datalen -= bytes;
  67         assert(scd->datalen >= 0);
  68         if (scd->datalen == 0) {
  69             scd->datapos = 0;
  70         }
  71     }
  72     trace_spice_vmc_read(bytes, len);
  73     return bytes;
  74 }
  75
  76 #if SPICE_SERVER_VERSION >= 0x000c02
  77 static void vmc_event(SpiceCharDeviceInstance *sin, uint8_t event)
  78 {
  79     SpiceCharDriver *scd = container_of(sin, SpiceCharDriver, sin);
  80     int chr_event;
  81
  82     switch (event) {
  83     case SPICE_PORT_EVENT_BREAK:
  84         chr_event = CHR_EVENT_BREAK;
  85         break;
  86     default:
  87         dprintf(scd, 2, "%s: unknown %d\n", __func__, event);
  88         return;
  89     }
  90
  91     dprintf(scd, 2, "%s: %d\n", __func__, event);
  92     trace_spice_vmc_event(chr_event);
  93     qemu_chr_be_event(scd->chr, chr_event);
  94 }
  95 #endif
  96
  97 static void vmc_state(SpiceCharDeviceInstance *sin, int connected)
  98 {
  99     SpiceCharDriver *scd = container_of(sin, SpiceCharDriver, sin);
 100
 101 #if SPICE_SERVER_VERSION < 0x000901
 102     /*
 103      * spice-server calls the state callback for the agent channel when the
 104      * spice client connects / disconnects. Given that not the client but
 105      * the server is doing the parsing of the messages this is wrong as the
 106      * server is still listening. Worse, this causes the parser in the server
 107      * to go out of sync, so we ignore state calls for subtype vdagent
 108      * spicevmc chardevs. For the full story see:
 109      * http://lists.freedesktop.org/archives/spice-devel/2011-July/004837.html
 110      */
 111     if (strcmp(sin->subtype, "vdagent") == 0) {
 112         return;
 113     }
 114 #endif
 115
 116     if ((scd->chr->opened && connected) ||
 117         (!scd->chr->opened && !connected)) {
 118         return;
 119     }
 120
 121     qemu_chr_be_event(scd->chr,
 122                       connected ? CHR_EVENT_OPENED : CHR_EVENT_CLOSED);
 123 }
 124
 125 static SpiceCharDeviceInterface vmc_interface = {
 126     .base.type          = SPICE_INTERFACE_CHAR_DEVICE,
 127     .base.description   = "spice virtual channel char device",
 128     .base.major_version = SPICE_INTERFACE_CHAR_DEVICE_MAJOR,
 129     .base.minor_version = SPICE_INTERFACE_CHAR_DEVICE_MINOR,
 130     .state              = vmc_state,
 131     .write              = vmc_write,
 132     .read               = vmc_read,
 133 #if SPICE_SERVER_VERSION >= 0x000c02
 134     .event              = vmc_event,
 135 #endif
 136 };
 137
 138
 139 static void vmc_register_interface(SpiceCharDriver *scd)
 140 {
 141     if (scd->active) {
 142         return;
 143     }
 144     dprintf(scd, 1, "%s\n", __func__);
 145     scd->sin.base.sif = &vmc_interface.base;
 146     qemu_spice_add_interface(&scd->sin.base);
 147     scd->active = true;
 148     trace_spice_vmc_register_interface(scd);
 149 }
 150
 151 static void vmc_unregister_interface(SpiceCharDriver *scd)
 152 {
 153     if (!scd->active) {
 154         return;
 155     }
 156     dprintf(scd, 1, "%s\n", __func__);
 157     spice_server_remove_interface(&scd->sin.base);
 158     scd->active = false;
 159     trace_spice_vmc_unregister_interface(scd);
 160 }
 161
 162
 163 static int spice_chr_write(CharDriverState *chr, const uint8_t *buf, int len)
 164 {
 165     SpiceCharDriver *s = chr->opaque;
 166
 167     dprintf(s, 2, "%s: %d\n", __func__, len);
 168     vmc_register_interface(s);
 169     assert(s->datalen == 0);
 170     if (s->bufsize < len) {
 171         s->bufsize = len;
 172         s->buffer = g_realloc(s->buffer, s->bufsize);
 173     }
 174     memcpy(s->buffer, buf, len);
 175     s->datapos = s->buffer;
 176     s->datalen = len;
 177     spice_server_char_device_wakeup(&s->sin);
 178     return len;
 179 }
 180
 181 static void spice_chr_close(struct CharDriverState *chr)
 182 {
 183     SpiceCharDriver *s = chr->opaque;
 184
 185     printf("%s\n", __func__);
 186     vmc_unregister_interface(s);
 187     QLIST_REMOVE(s, next);
 188
 189     g_free((char *)s->sin.subtype);
 190 #if SPICE_SERVER_VERSION >= 0x000c02
 191     g_free((char *)s->sin.portname);
 192 #endif
 193     g_free(s);
 194 }
 195
 196 static void spice_chr_guest_open(struct CharDriverState *chr)
 197 {
 198     SpiceCharDriver *s = chr->opaque;
 199     vmc_register_interface(s);
 200 }
 201
 202 static void spice_chr_guest_close(struct CharDriverState *chr)
 203 {
 204     SpiceCharDriver *s = chr->opaque;
 205     vmc_unregister_interface(s);
 206 }
 207
 208 static void print_allowed_subtypes(void)
 209 {
 210     const char** psubtype;
 211     int i;
 212
 213     fprintf(stderr, "allowed names: ");
 214     for(i=0, psubtype = spice_server_char_device_recognized_subtypes();
 215         *psubtype != NULL; ++psubtype, ++i) {
 216         if (i == 0) {
 217             fprintf(stderr, "%s", *psubtype);
 218         } else {
 219             fprintf(stderr, ", %s", *psubtype);
 220         }
 221     }
 222     fprintf(stderr, "\n");
 223 }
 224
 225 static CharDriverState *chr_open(const char *subtype)
 226 {
 227     CharDriverState *chr;
 228     SpiceCharDriver *s;
 229
 230     chr = g_malloc0(sizeof(CharDriverState));
 231     s = g_malloc0(sizeof(SpiceCharDriver));
 232     s->chr = chr;
 233     s->active = false;
 234     s->sin.subtype = g_strdup(subtype);
 235     chr->opaque = s;
 236     chr->chr_write = spice_chr_write;
 237     chr->chr_close = spice_chr_close;
 238     chr->chr_guest_open = spice_chr_guest_open;
 239     chr->chr_guest_close = spice_chr_guest_close;
 240
 241     QLIST_INSERT_HEAD(&spice_chars, s, next);
 242
 243     return chr;
 244 }
 245
 246 CharDriverState *qemu_chr_open_spice_vmc(const char *type)
 247 {
 248     CharDriverState *chr;
 249     const char **psubtype = spice_server_char_device_recognized_subtypes();
 250
 251     if (type == NULL) {
 252         fprintf(stderr, "spice-qemu-char: missing name parameter\n");
 253         print_allowed_subtypes();
 254         return NULL;
 255     }
 256     for (; *psubtype != NULL; ++psubtype) {
 257         if (strcmp(type, *psubtype) == 0) {
 258             break;
 259         }
 260     }
 261     if (*psubtype == NULL) {
 262         fprintf(stderr, "spice-qemu-char: unsupported type: %s\n", type);
 263         print_allowed_subtypes();
 264         return NULL;
 265     }
 266
 267     chr = chr_open(type);
 268
 269 #if SPICE_SERVER_VERSION < 0x000901
 270     /* See comment in vmc_state() */
 271     if (strcmp(type, "vdagent") == 0) {
 272         qemu_chr_generic_open(chr);
 273     }
 274 #endif
 275
 276     return chr;
 277 }
 278
 279 #if SPICE_SERVER_VERSION >= 0x000c02
 280 CharDriverState *qemu_chr_open_spice_port(const char *name)
 281 {
 282     CharDriverState *chr;
 283     SpiceCharDriver *s;
 284
 285     if (name == NULL) {
 286         fprintf(stderr, "spice-qemu-char: missing name parameter\n");
 287         return NULL;
 288     }
 289
 290     chr = chr_open("port");
 291     s = chr->opaque;
 292     s->sin.portname = g_strdup(name);
 293
 294     return chr;
 295 }
 296
 297 void qemu_spice_register_ports(void)
 298 {
 299     SpiceCharDriver *s;
 300
 301     QLIST_FOREACH(s, &spice_chars, next) {
 302         if (s->sin.portname == NULL) {
 303             continue;
 304         }
 305         vmc_register_interface(s);
 306     }
 307 }
 308 #endif
 309
 310 static void qemu_chr_parse_spice_vmc(QemuOpts *opts, ChardevBackend *backend,
 311                                      Error **errp)
 312 {
 313     const char *name = qemu_opt_get(opts, "name");
 314
 315     if (name == NULL) {
 316         error_setg(errp, "chardev: spice channel: no name given");
 317         return;
 318     }
 319     backend->spicevmc = g_new0(ChardevSpiceChannel, 1);
 320     backend->spicevmc->type = g_strdup(name);
 321 }
 322
 323 static void qemu_chr_parse_spice_port(QemuOpts *opts, ChardevBackend *backend,
 324                                       Error **errp)
 325 {
 326     const char *name = qemu_opt_get(opts, "name");
 327
 328     if (name == NULL) {
 329         error_setg(errp, "chardev: spice port: no name given");
 330         return;
 331     }
 332     backend->spiceport = g_new0(ChardevSpicePort, 1);
 333     backend->spiceport->fqdn = g_strdup(name);
 334 }
 335
 336 static void register_types(void)
 337 {
 338     register_char_driver_qapi("spicevmc", CHARDEV_BACKEND_KIND_SPICEVMC,
 339                               qemu_chr_parse_spice_vmc);
 340     register_char_driver_qapi("spiceport", CHARDEV_BACKEND_KIND_SPICEPORT,
 341                               qemu_chr_parse_spice_port);
 342 }
 343
 344 type_init(register_types);