Merge remote-tracking branch 'agraf/xen-next' into staging
[qemu.git] / ui / spice-core.c
blobdd9905be363106308c8982053498a14a875776fe
1 /*
2 * Copyright (C) 2010 Red Hat, Inc.
4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License as
6 * published by the Free Software Foundation; either version 2 or
7 * (at your option) version 3 of the License.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, see <http://www.gnu.org/licenses/>.
18 #include <spice.h>
19 #include <spice-experimental.h>
21 #include <netdb.h>
23 #include "qemu-common.h"
24 #include "qemu-spice.h"
25 #include "qemu-timer.h"
26 #include "qemu-queue.h"
27 #include "qemu-x509.h"
28 #include "qemu_socket.h"
29 #include "qint.h"
30 #include "qbool.h"
31 #include "qstring.h"
32 #include "qjson.h"
33 #include "notify.h"
34 #include "migration.h"
35 #include "monitor.h"
36 #include "hw/hw.h"
38 /* core bits */
40 static SpiceServer *spice_server;
41 static Notifier migration_state;
42 static const char *auth = "spice";
43 static char *auth_passwd;
44 static time_t auth_expires = TIME_MAX;
45 int using_spice = 0;
47 struct SpiceTimer {
48 QEMUTimer *timer;
49 QTAILQ_ENTRY(SpiceTimer) next;
51 static QTAILQ_HEAD(, SpiceTimer) timers = QTAILQ_HEAD_INITIALIZER(timers);
53 static SpiceTimer *timer_add(SpiceTimerFunc func, void *opaque)
55 SpiceTimer *timer;
57 timer = qemu_mallocz(sizeof(*timer));
58 timer->timer = qemu_new_timer_ms(rt_clock, func, opaque);
59 QTAILQ_INSERT_TAIL(&timers, timer, next);
60 return timer;
63 static void timer_start(SpiceTimer *timer, uint32_t ms)
65 qemu_mod_timer(timer->timer, qemu_get_clock_ms(rt_clock) + ms);
68 static void timer_cancel(SpiceTimer *timer)
70 qemu_del_timer(timer->timer);
73 static void timer_remove(SpiceTimer *timer)
75 qemu_del_timer(timer->timer);
76 qemu_free_timer(timer->timer);
77 QTAILQ_REMOVE(&timers, timer, next);
78 qemu_free(timer);
81 struct SpiceWatch {
82 int fd;
83 int event_mask;
84 SpiceWatchFunc func;
85 void *opaque;
86 QTAILQ_ENTRY(SpiceWatch) next;
88 static QTAILQ_HEAD(, SpiceWatch) watches = QTAILQ_HEAD_INITIALIZER(watches);
90 static void watch_read(void *opaque)
92 SpiceWatch *watch = opaque;
93 watch->func(watch->fd, SPICE_WATCH_EVENT_READ, watch->opaque);
96 static void watch_write(void *opaque)
98 SpiceWatch *watch = opaque;
99 watch->func(watch->fd, SPICE_WATCH_EVENT_WRITE, watch->opaque);
102 static void watch_update_mask(SpiceWatch *watch, int event_mask)
104 IOHandler *on_read = NULL;
105 IOHandler *on_write = NULL;
107 watch->event_mask = event_mask;
108 if (watch->event_mask & SPICE_WATCH_EVENT_READ) {
109 on_read = watch_read;
111 if (watch->event_mask & SPICE_WATCH_EVENT_WRITE) {
112 on_write = watch_write;
114 qemu_set_fd_handler(watch->fd, on_read, on_write, watch);
117 static SpiceWatch *watch_add(int fd, int event_mask, SpiceWatchFunc func, void *opaque)
119 SpiceWatch *watch;
121 watch = qemu_mallocz(sizeof(*watch));
122 watch->fd = fd;
123 watch->func = func;
124 watch->opaque = opaque;
125 QTAILQ_INSERT_TAIL(&watches, watch, next);
127 watch_update_mask(watch, event_mask);
128 return watch;
131 static void watch_remove(SpiceWatch *watch)
133 watch_update_mask(watch, 0);
134 QTAILQ_REMOVE(&watches, watch, next);
135 qemu_free(watch);
138 #if SPICE_INTERFACE_CORE_MINOR >= 3
140 typedef struct ChannelList ChannelList;
141 struct ChannelList {
142 SpiceChannelEventInfo *info;
143 QTAILQ_ENTRY(ChannelList) link;
145 static QTAILQ_HEAD(, ChannelList) channel_list = QTAILQ_HEAD_INITIALIZER(channel_list);
147 static void channel_list_add(SpiceChannelEventInfo *info)
149 ChannelList *item;
151 item = qemu_mallocz(sizeof(*item));
152 item->info = info;
153 QTAILQ_INSERT_TAIL(&channel_list, item, link);
156 static void channel_list_del(SpiceChannelEventInfo *info)
158 ChannelList *item;
160 QTAILQ_FOREACH(item, &channel_list, link) {
161 if (item->info != info) {
162 continue;
164 QTAILQ_REMOVE(&channel_list, item, link);
165 qemu_free(item);
166 return;
170 static void add_addr_info(QDict *dict, struct sockaddr *addr, int len)
172 char host[NI_MAXHOST], port[NI_MAXSERV];
173 const char *family;
175 getnameinfo(addr, len, host, sizeof(host), port, sizeof(port),
176 NI_NUMERICHOST | NI_NUMERICSERV);
177 family = inet_strfamily(addr->sa_family);
179 qdict_put(dict, "host", qstring_from_str(host));
180 qdict_put(dict, "port", qstring_from_str(port));
181 qdict_put(dict, "family", qstring_from_str(family));
184 static void add_channel_info(QDict *dict, SpiceChannelEventInfo *info)
186 int tls = info->flags & SPICE_CHANNEL_EVENT_FLAG_TLS;
188 qdict_put(dict, "connection-id", qint_from_int(info->connection_id));
189 qdict_put(dict, "channel-type", qint_from_int(info->type));
190 qdict_put(dict, "channel-id", qint_from_int(info->id));
191 qdict_put(dict, "tls", qbool_from_int(tls));
194 static QList *channel_list_get(void)
196 ChannelList *item;
197 QList *list;
198 QDict *dict;
200 list = qlist_new();
201 QTAILQ_FOREACH(item, &channel_list, link) {
202 dict = qdict_new();
203 add_addr_info(dict, &item->info->paddr, item->info->plen);
204 add_channel_info(dict, item->info);
205 qlist_append(list, dict);
207 return list;
210 static void channel_event(int event, SpiceChannelEventInfo *info)
212 static const int qevent[] = {
213 [ SPICE_CHANNEL_EVENT_CONNECTED ] = QEVENT_SPICE_CONNECTED,
214 [ SPICE_CHANNEL_EVENT_INITIALIZED ] = QEVENT_SPICE_INITIALIZED,
215 [ SPICE_CHANNEL_EVENT_DISCONNECTED ] = QEVENT_SPICE_DISCONNECTED,
217 QDict *server, *client;
218 QObject *data;
220 client = qdict_new();
221 add_addr_info(client, &info->paddr, info->plen);
223 server = qdict_new();
224 add_addr_info(server, &info->laddr, info->llen);
226 if (event == SPICE_CHANNEL_EVENT_INITIALIZED) {
227 qdict_put(server, "auth", qstring_from_str(auth));
228 add_channel_info(client, info);
229 channel_list_add(info);
231 if (event == SPICE_CHANNEL_EVENT_DISCONNECTED) {
232 channel_list_del(info);
235 data = qobject_from_jsonf("{ 'client': %p, 'server': %p }",
236 QOBJECT(client), QOBJECT(server));
237 monitor_protocol_event(qevent[event], data);
238 qobject_decref(data);
241 #else /* SPICE_INTERFACE_CORE_MINOR >= 3 */
243 static QList *channel_list_get(void)
245 return NULL;
248 #endif /* SPICE_INTERFACE_CORE_MINOR >= 3 */
250 static SpiceCoreInterface core_interface = {
251 .base.type = SPICE_INTERFACE_CORE,
252 .base.description = "qemu core services",
253 .base.major_version = SPICE_INTERFACE_CORE_MAJOR,
254 .base.minor_version = SPICE_INTERFACE_CORE_MINOR,
256 .timer_add = timer_add,
257 .timer_start = timer_start,
258 .timer_cancel = timer_cancel,
259 .timer_remove = timer_remove,
261 .watch_add = watch_add,
262 .watch_update_mask = watch_update_mask,
263 .watch_remove = watch_remove,
265 #if SPICE_INTERFACE_CORE_MINOR >= 3
266 .channel_event = channel_event,
267 #endif
270 /* config string parsing */
272 static int name2enum(const char *string, const char *table[], int entries)
274 int i;
276 if (string) {
277 for (i = 0; i < entries; i++) {
278 if (!table[i]) {
279 continue;
281 if (strcmp(string, table[i]) != 0) {
282 continue;
284 return i;
287 return -1;
290 static int parse_name(const char *string, const char *optname,
291 const char *table[], int entries)
293 int value = name2enum(string, table, entries);
295 if (value != -1) {
296 return value;
298 fprintf(stderr, "spice: invalid %s: %s\n", optname, string);
299 exit(1);
302 static const char *stream_video_names[] = {
303 [ SPICE_STREAM_VIDEO_OFF ] = "off",
304 [ SPICE_STREAM_VIDEO_ALL ] = "all",
305 [ SPICE_STREAM_VIDEO_FILTER ] = "filter",
307 #define parse_stream_video(_name) \
308 name2enum(_name, stream_video_names, ARRAY_SIZE(stream_video_names))
310 static const char *compression_names[] = {
311 [ SPICE_IMAGE_COMPRESS_OFF ] = "off",
312 [ SPICE_IMAGE_COMPRESS_AUTO_GLZ ] = "auto_glz",
313 [ SPICE_IMAGE_COMPRESS_AUTO_LZ ] = "auto_lz",
314 [ SPICE_IMAGE_COMPRESS_QUIC ] = "quic",
315 [ SPICE_IMAGE_COMPRESS_GLZ ] = "glz",
316 [ SPICE_IMAGE_COMPRESS_LZ ] = "lz",
318 #define parse_compression(_name) \
319 parse_name(_name, "image compression", \
320 compression_names, ARRAY_SIZE(compression_names))
322 static const char *wan_compression_names[] = {
323 [ SPICE_WAN_COMPRESSION_AUTO ] = "auto",
324 [ SPICE_WAN_COMPRESSION_NEVER ] = "never",
325 [ SPICE_WAN_COMPRESSION_ALWAYS ] = "always",
327 #define parse_wan_compression(_name) \
328 parse_name(_name, "wan compression", \
329 wan_compression_names, ARRAY_SIZE(wan_compression_names))
331 /* functions for the rest of qemu */
333 static void info_spice_iter(QObject *obj, void *opaque)
335 QDict *client;
336 Monitor *mon = opaque;
338 client = qobject_to_qdict(obj);
339 monitor_printf(mon, "Channel:\n");
340 monitor_printf(mon, " address: %s:%s%s\n",
341 qdict_get_str(client, "host"),
342 qdict_get_str(client, "port"),
343 qdict_get_bool(client, "tls") ? " [tls]" : "");
344 monitor_printf(mon, " session: %" PRId64 "\n",
345 qdict_get_int(client, "connection-id"));
346 monitor_printf(mon, " channel: %d:%d\n",
347 (int)qdict_get_int(client, "channel-type"),
348 (int)qdict_get_int(client, "channel-id"));
351 void do_info_spice_print(Monitor *mon, const QObject *data)
353 QDict *server;
354 QList *channels;
355 const char *host;
356 int port;
358 server = qobject_to_qdict(data);
359 if (qdict_get_bool(server, "enabled") == 0) {
360 monitor_printf(mon, "Server: disabled\n");
361 return;
364 monitor_printf(mon, "Server:\n");
365 host = qdict_get_str(server, "host");
366 port = qdict_get_try_int(server, "port", -1);
367 if (port != -1) {
368 monitor_printf(mon, " address: %s:%d\n", host, port);
370 port = qdict_get_try_int(server, "tls-port", -1);
371 if (port != -1) {
372 monitor_printf(mon, " address: %s:%d [tls]\n", host, port);
374 monitor_printf(mon, " auth: %s\n", qdict_get_str(server, "auth"));
376 channels = qdict_get_qlist(server, "channels");
377 if (qlist_empty(channels)) {
378 monitor_printf(mon, "Channels: none\n");
379 } else {
380 qlist_iter(channels, info_spice_iter, mon);
384 void do_info_spice(Monitor *mon, QObject **ret_data)
386 QemuOpts *opts = QTAILQ_FIRST(&qemu_spice_opts.head);
387 QDict *server;
388 QList *clist;
389 const char *addr;
390 int port, tls_port;
392 if (!spice_server) {
393 *ret_data = qobject_from_jsonf("{ 'enabled': false }");
394 return;
397 addr = qemu_opt_get(opts, "addr");
398 port = qemu_opt_get_number(opts, "port", 0);
399 tls_port = qemu_opt_get_number(opts, "tls-port", 0);
400 clist = channel_list_get();
402 server = qdict_new();
403 qdict_put(server, "enabled", qbool_from_int(true));
404 qdict_put(server, "auth", qstring_from_str(auth));
405 qdict_put(server, "host", qstring_from_str(addr ? addr : "0.0.0.0"));
406 if (port) {
407 qdict_put(server, "port", qint_from_int(port));
409 if (tls_port) {
410 qdict_put(server, "tls-port", qint_from_int(tls_port));
412 if (clist) {
413 qdict_put(server, "channels", clist);
416 *ret_data = QOBJECT(server);
419 static void migration_state_notifier(Notifier *notifier)
421 int state = get_migration_state();
423 if (state == MIG_STATE_COMPLETED) {
424 #if SPICE_SERVER_VERSION >= 0x000701 /* 0.7.1 */
425 spice_server_migrate_switch(spice_server);
426 #endif
430 int qemu_spice_migrate_info(const char *hostname, int port, int tls_port,
431 const char *subject)
433 return spice_server_migrate_info(spice_server, hostname,
434 port, tls_port, subject);
437 static int add_channel(const char *name, const char *value, void *opaque)
439 int security = 0;
440 int rc;
442 if (strcmp(name, "tls-channel") == 0) {
443 security = SPICE_CHANNEL_SECURITY_SSL;
445 if (strcmp(name, "plaintext-channel") == 0) {
446 security = SPICE_CHANNEL_SECURITY_NONE;
448 if (security == 0) {
449 return 0;
451 if (strcmp(value, "default") == 0) {
452 rc = spice_server_set_channel_security(spice_server, NULL, security);
453 } else {
454 rc = spice_server_set_channel_security(spice_server, value, security);
456 if (rc != 0) {
457 fprintf(stderr, "spice: failed to set channel security for %s\n", value);
458 exit(1);
460 return 0;
463 void qemu_spice_init(void)
465 QemuOpts *opts = QTAILQ_FIRST(&qemu_spice_opts.head);
466 const char *password, *str, *x509_dir, *addr,
467 *x509_key_password = NULL,
468 *x509_dh_file = NULL,
469 *tls_ciphers = NULL;
470 char *x509_key_file = NULL,
471 *x509_cert_file = NULL,
472 *x509_cacert_file = NULL;
473 int port, tls_port, len, addr_flags;
474 spice_image_compression_t compression;
475 spice_wan_compression_t wan_compr;
477 if (!opts) {
478 return;
480 port = qemu_opt_get_number(opts, "port", 0);
481 tls_port = qemu_opt_get_number(opts, "tls-port", 0);
482 if (!port && !tls_port) {
483 return;
485 password = qemu_opt_get(opts, "password");
487 if (tls_port) {
488 x509_dir = qemu_opt_get(opts, "x509-dir");
489 if (NULL == x509_dir) {
490 x509_dir = ".";
492 len = strlen(x509_dir) + 32;
494 str = qemu_opt_get(opts, "x509-key-file");
495 if (str) {
496 x509_key_file = qemu_strdup(str);
497 } else {
498 x509_key_file = qemu_malloc(len);
499 snprintf(x509_key_file, len, "%s/%s", x509_dir, X509_SERVER_KEY_FILE);
502 str = qemu_opt_get(opts, "x509-cert-file");
503 if (str) {
504 x509_cert_file = qemu_strdup(str);
505 } else {
506 x509_cert_file = qemu_malloc(len);
507 snprintf(x509_cert_file, len, "%s/%s", x509_dir, X509_SERVER_CERT_FILE);
510 str = qemu_opt_get(opts, "x509-cacert-file");
511 if (str) {
512 x509_cacert_file = qemu_strdup(str);
513 } else {
514 x509_cacert_file = qemu_malloc(len);
515 snprintf(x509_cacert_file, len, "%s/%s", x509_dir, X509_CA_CERT_FILE);
518 x509_key_password = qemu_opt_get(opts, "x509-key-password");
519 x509_dh_file = qemu_opt_get(opts, "x509-dh-file");
520 tls_ciphers = qemu_opt_get(opts, "tls-ciphers");
523 addr = qemu_opt_get(opts, "addr");
524 addr_flags = 0;
525 if (qemu_opt_get_bool(opts, "ipv4", 0)) {
526 addr_flags |= SPICE_ADDR_FLAG_IPV4_ONLY;
527 } else if (qemu_opt_get_bool(opts, "ipv6", 0)) {
528 addr_flags |= SPICE_ADDR_FLAG_IPV6_ONLY;
531 spice_server = spice_server_new();
532 spice_server_set_addr(spice_server, addr ? addr : "", addr_flags);
533 if (port) {
534 spice_server_set_port(spice_server, port);
536 if (tls_port) {
537 spice_server_set_tls(spice_server, tls_port,
538 x509_cacert_file,
539 x509_cert_file,
540 x509_key_file,
541 x509_key_password,
542 x509_dh_file,
543 tls_ciphers);
545 if (password) {
546 spice_server_set_ticket(spice_server, password, 0, 0, 0);
548 if (qemu_opt_get_bool(opts, "sasl", 0)) {
549 #if SPICE_SERVER_VERSION >= 0x000900 /* 0.9.0 */
550 if (spice_server_set_sasl_appname(spice_server, "qemu") == -1 ||
551 spice_server_set_sasl(spice_server, 1) == -1) {
552 fprintf(stderr, "spice: failed to enable sasl\n");
553 exit(1);
555 #else
556 fprintf(stderr, "spice: sasl is not available (spice >= 0.9 required)\n");
557 exit(1);
558 #endif
560 if (qemu_opt_get_bool(opts, "disable-ticketing", 0)) {
561 auth = "none";
562 spice_server_set_noauth(spice_server);
565 #if SPICE_SERVER_VERSION >= 0x000801
566 if (qemu_opt_get_bool(opts, "disable-copy-paste", 0)) {
567 spice_server_set_agent_copypaste(spice_server, false);
569 #endif
571 compression = SPICE_IMAGE_COMPRESS_AUTO_GLZ;
572 str = qemu_opt_get(opts, "image-compression");
573 if (str) {
574 compression = parse_compression(str);
576 spice_server_set_image_compression(spice_server, compression);
578 wan_compr = SPICE_WAN_COMPRESSION_AUTO;
579 str = qemu_opt_get(opts, "jpeg-wan-compression");
580 if (str) {
581 wan_compr = parse_wan_compression(str);
583 spice_server_set_jpeg_compression(spice_server, wan_compr);
585 wan_compr = SPICE_WAN_COMPRESSION_AUTO;
586 str = qemu_opt_get(opts, "zlib-glz-wan-compression");
587 if (str) {
588 wan_compr = parse_wan_compression(str);
590 spice_server_set_zlib_glz_compression(spice_server, wan_compr);
592 str = qemu_opt_get(opts, "streaming-video");
593 if (str) {
594 int streaming_video = parse_stream_video(str);
595 spice_server_set_streaming_video(spice_server, streaming_video);
598 spice_server_set_agent_mouse
599 (spice_server, qemu_opt_get_bool(opts, "agent-mouse", 1));
600 spice_server_set_playback_compression
601 (spice_server, qemu_opt_get_bool(opts, "playback-compression", 1));
603 qemu_opt_foreach(opts, add_channel, NULL, 0);
605 spice_server_init(spice_server, &core_interface);
606 using_spice = 1;
608 migration_state.notify = migration_state_notifier;
609 add_migration_state_change_notifier(&migration_state);
611 qemu_spice_input_init();
612 qemu_spice_audio_init();
614 qemu_free(x509_key_file);
615 qemu_free(x509_cert_file);
616 qemu_free(x509_cacert_file);
619 int qemu_spice_add_interface(SpiceBaseInstance *sin)
621 if (!spice_server) {
622 if (QTAILQ_FIRST(&qemu_spice_opts.head) != NULL) {
623 fprintf(stderr, "Oops: spice configured but not active\n");
624 exit(1);
627 * Create a spice server instance.
628 * It does *not* listen on the network.
629 * It handles QXL local rendering only.
631 * With a command line like '-vnc :0 -vga qxl' you'll end up here.
633 spice_server = spice_server_new();
634 spice_server_init(spice_server, &core_interface);
636 return spice_server_add_interface(spice_server, sin);
639 static int qemu_spice_set_ticket(bool fail_if_conn, bool disconnect_if_conn)
641 time_t lifetime, now = time(NULL);
642 char *passwd;
644 if (now < auth_expires) {
645 passwd = auth_passwd;
646 lifetime = (auth_expires - now);
647 if (lifetime > INT_MAX) {
648 lifetime = INT_MAX;
650 } else {
651 passwd = NULL;
652 lifetime = 1;
654 return spice_server_set_ticket(spice_server, passwd, lifetime,
655 fail_if_conn, disconnect_if_conn);
658 int qemu_spice_set_passwd(const char *passwd,
659 bool fail_if_conn, bool disconnect_if_conn)
661 free(auth_passwd);
662 auth_passwd = strdup(passwd);
663 return qemu_spice_set_ticket(fail_if_conn, disconnect_if_conn);
666 int qemu_spice_set_pw_expire(time_t expires)
668 auth_expires = expires;
669 return qemu_spice_set_ticket(false, false);
672 static void spice_register_config(void)
674 qemu_add_opts(&qemu_spice_opts);
676 machine_init(spice_register_config);
678 static void spice_initialize(void)
680 qemu_spice_init();
682 device_init(spice_initialize);