xref: /qemu/migration/tls.c (revision 10d4703be5d884bbbb6ecafe0e8bb270ad6ea937)
1e1226365SDaniel P. Berrange /*
2e1226365SDaniel P. Berrange  * QEMU migration TLS support
3e1226365SDaniel P. Berrange  *
4e1226365SDaniel P. Berrange  * Copyright (c) 2015 Red Hat, Inc.
5e1226365SDaniel P. Berrange  *
6e1226365SDaniel P. Berrange  * This library is free software; you can redistribute it and/or
7e1226365SDaniel P. Berrange  * modify it under the terms of the GNU Lesser General Public
8e1226365SDaniel P. Berrange  * License as published by the Free Software Foundation; either
9ef19b50dSChetan Pant  * version 2.1 of the License, or (at your option) any later version.
10e1226365SDaniel P. Berrange  *
11e1226365SDaniel P. Berrange  * This library is distributed in the hope that it will be useful,
12e1226365SDaniel P. Berrange  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13e1226365SDaniel P. Berrange  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14e1226365SDaniel P. Berrange  * Lesser General Public License for more details.
15e1226365SDaniel P. Berrange  *
16e1226365SDaniel P. Berrange  * You should have received a copy of the GNU Lesser General Public
17e1226365SDaniel P. Berrange  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
18e1226365SDaniel P. Berrange  *
19e1226365SDaniel P. Berrange  */
20e1226365SDaniel P. Berrange 
21e1226365SDaniel P. Berrange #include "qemu/osdep.h"
22dd4339c5SJuan Quintela #include "channel.h"
236666c96aSJuan Quintela #include "migration.h"
2441d64227SJuan Quintela #include "tls.h"
25*10d4703bSJuan Quintela #include "options.h"
26e1226365SDaniel P. Berrange #include "crypto/tlscreds.h"
27e1226365SDaniel P. Berrange #include "qemu/error-report.h"
28e1226365SDaniel P. Berrange #include "qapi/error.h"
29e1226365SDaniel P. Berrange #include "trace.h"
30e1226365SDaniel P. Berrange 
31e1226365SDaniel P. Berrange static QCryptoTLSCreds *
32e1226365SDaniel P. Berrange migration_tls_get_creds(MigrationState *s,
33e1226365SDaniel P. Berrange                         QCryptoTLSCredsEndpoint endpoint,
34e1226365SDaniel P. Berrange                         Error **errp)
35e1226365SDaniel P. Berrange {
36e1226365SDaniel P. Berrange     Object *creds;
37e1226365SDaniel P. Berrange     QCryptoTLSCreds *ret;
38e1226365SDaniel P. Berrange 
39e1226365SDaniel P. Berrange     creds = object_resolve_path_component(
40e1226365SDaniel P. Berrange         object_get_objects_root(), s->parameters.tls_creds);
41e1226365SDaniel P. Berrange     if (!creds) {
42e1226365SDaniel P. Berrange         error_setg(errp, "No TLS credentials with id '%s'",
43e1226365SDaniel P. Berrange                    s->parameters.tls_creds);
44e1226365SDaniel P. Berrange         return NULL;
45e1226365SDaniel P. Berrange     }
46e1226365SDaniel P. Berrange     ret = (QCryptoTLSCreds *)object_dynamic_cast(
47e1226365SDaniel P. Berrange         creds, TYPE_QCRYPTO_TLS_CREDS);
48e1226365SDaniel P. Berrange     if (!ret) {
49e1226365SDaniel P. Berrange         error_setg(errp, "Object with id '%s' is not TLS credentials",
50e1226365SDaniel P. Berrange                    s->parameters.tls_creds);
51e1226365SDaniel P. Berrange         return NULL;
52e1226365SDaniel P. Berrange     }
535590f65fSPhilippe Mathieu-Daudé     if (!qcrypto_tls_creds_check_endpoint(ret, endpoint, errp)) {
54e1226365SDaniel P. Berrange         return NULL;
55e1226365SDaniel P. Berrange     }
56e1226365SDaniel P. Berrange 
57e1226365SDaniel P. Berrange     return ret;
58e1226365SDaniel P. Berrange }
59e1226365SDaniel P. Berrange 
60e1226365SDaniel P. Berrange 
6160e705c5SDaniel P. Berrange static void migration_tls_incoming_handshake(QIOTask *task,
62e1226365SDaniel P. Berrange                                              gpointer opaque)
63e1226365SDaniel P. Berrange {
6460e705c5SDaniel P. Berrange     QIOChannel *ioc = QIO_CHANNEL(qio_task_get_source(task));
6560e705c5SDaniel P. Berrange     Error *err = NULL;
66e1226365SDaniel P. Berrange 
6760e705c5SDaniel P. Berrange     if (qio_task_propagate_error(task, &err)) {
68e1226365SDaniel P. Berrange         trace_migration_tls_incoming_handshake_error(error_get_pretty(err));
6960e705c5SDaniel P. Berrange         error_report_err(err);
70e1226365SDaniel P. Berrange     } else {
71e1226365SDaniel P. Berrange         trace_migration_tls_incoming_handshake_complete();
7254314711SJuan Quintela         migration_channel_process_incoming(ioc);
73e1226365SDaniel P. Berrange     }
74e1226365SDaniel P. Berrange     object_unref(OBJECT(ioc));
75e1226365SDaniel P. Berrange }
76e1226365SDaniel P. Berrange 
7722724f49SDaniel P. Berrange void migration_tls_channel_process_incoming(MigrationState *s,
78e1226365SDaniel P. Berrange                                             QIOChannel *ioc,
79e1226365SDaniel P. Berrange                                             Error **errp)
80e1226365SDaniel P. Berrange {
81e1226365SDaniel P. Berrange     QCryptoTLSCreds *creds;
82e1226365SDaniel P. Berrange     QIOChannelTLS *tioc;
83e1226365SDaniel P. Berrange 
84e1226365SDaniel P. Berrange     creds = migration_tls_get_creds(
85e1226365SDaniel P. Berrange         s, QCRYPTO_TLS_CREDS_ENDPOINT_SERVER, errp);
86e1226365SDaniel P. Berrange     if (!creds) {
87e1226365SDaniel P. Berrange         return;
88e1226365SDaniel P. Berrange     }
89e1226365SDaniel P. Berrange 
90e1226365SDaniel P. Berrange     tioc = qio_channel_tls_new_server(
91e1226365SDaniel P. Berrange         ioc, creds,
92d2f1d29bSDaniel P. Berrange         s->parameters.tls_authz,
93e1226365SDaniel P. Berrange         errp);
94e1226365SDaniel P. Berrange     if (!tioc) {
95e1226365SDaniel P. Berrange         return;
96e1226365SDaniel P. Berrange     }
97e1226365SDaniel P. Berrange 
98e1226365SDaniel P. Berrange     trace_migration_tls_incoming_handshake_start();
996f01f136SDaniel P. Berrange     qio_channel_set_name(QIO_CHANNEL(tioc), "migration-tls-incoming");
100e1226365SDaniel P. Berrange     qio_channel_tls_handshake(tioc,
101e1226365SDaniel P. Berrange                               migration_tls_incoming_handshake,
102e1226365SDaniel P. Berrange                               NULL,
1031939ccdaSPeter Xu                               NULL,
104e1226365SDaniel P. Berrange                               NULL);
105e1226365SDaniel P. Berrange }
106e1226365SDaniel P. Berrange 
107e1226365SDaniel P. Berrange 
10860e705c5SDaniel P. Berrange static void migration_tls_outgoing_handshake(QIOTask *task,
109e1226365SDaniel P. Berrange                                              gpointer opaque)
110e1226365SDaniel P. Berrange {
111e1226365SDaniel P. Berrange     MigrationState *s = opaque;
11260e705c5SDaniel P. Berrange     QIOChannel *ioc = QIO_CHANNEL(qio_task_get_source(task));
11360e705c5SDaniel P. Berrange     Error *err = NULL;
114e1226365SDaniel P. Berrange 
11560e705c5SDaniel P. Berrange     if (qio_task_propagate_error(task, &err)) {
116e1226365SDaniel P. Berrange         trace_migration_tls_outgoing_handshake_error(error_get_pretty(err));
117e1226365SDaniel P. Berrange     } else {
118e1226365SDaniel P. Berrange         trace_migration_tls_outgoing_handshake_complete();
119e1226365SDaniel P. Berrange     }
120688a3dcbSDr. David Alan Gilbert     migration_channel_connect(s, ioc, NULL, err);
121e1226365SDaniel P. Berrange     object_unref(OBJECT(ioc));
122e1226365SDaniel P. Berrange }
123e1226365SDaniel P. Berrange 
124bfb790e7SChuan Zheng QIOChannelTLS *migration_tls_client_create(MigrationState *s,
125e1226365SDaniel P. Berrange                                            QIOChannel *ioc,
126e1226365SDaniel P. Berrange                                            const char *hostname,
127e1226365SDaniel P. Berrange                                            Error **errp)
128e1226365SDaniel P. Berrange {
129e1226365SDaniel P. Berrange     QCryptoTLSCreds *creds;
130e1226365SDaniel P. Berrange 
131e1226365SDaniel P. Berrange     creds = migration_tls_get_creds(
132e1226365SDaniel P. Berrange         s, QCRYPTO_TLS_CREDS_ENDPOINT_CLIENT, errp);
133e1226365SDaniel P. Berrange     if (!creds) {
134bfb790e7SChuan Zheng         return NULL;
135e1226365SDaniel P. Berrange     }
136e1226365SDaniel P. Berrange 
1374af245dcSDaniel P. Berrange     if (s->parameters.tls_hostname && *s->parameters.tls_hostname) {
138e1226365SDaniel P. Berrange         hostname = s->parameters.tls_hostname;
139e1226365SDaniel P. Berrange     }
140e1226365SDaniel P. Berrange 
14166997c42SMarkus Armbruster     return qio_channel_tls_new_client(ioc, creds, hostname, errp);
142bfb790e7SChuan Zheng }
143bfb790e7SChuan Zheng 
144bfb790e7SChuan Zheng void migration_tls_channel_connect(MigrationState *s,
145bfb790e7SChuan Zheng                                    QIOChannel *ioc,
146bfb790e7SChuan Zheng                                    const char *hostname,
147bfb790e7SChuan Zheng                                    Error **errp)
148bfb790e7SChuan Zheng {
149bfb790e7SChuan Zheng     QIOChannelTLS *tioc;
150bfb790e7SChuan Zheng 
151bfb790e7SChuan Zheng     tioc = migration_tls_client_create(s, ioc, hostname, errp);
152e1226365SDaniel P. Berrange     if (!tioc) {
153e1226365SDaniel P. Berrange         return;
154e1226365SDaniel P. Berrange     }
155e1226365SDaniel P. Berrange 
156d8053e73SChuan Zheng     /* Save hostname into MigrationState for handshake */
157d8053e73SChuan Zheng     s->hostname = g_strdup(hostname);
158e1226365SDaniel P. Berrange     trace_migration_tls_outgoing_handshake_start(hostname);
1596f01f136SDaniel P. Berrange     qio_channel_set_name(QIO_CHANNEL(tioc), "migration-tls-outgoing");
160e1226365SDaniel P. Berrange     qio_channel_tls_handshake(tioc,
161e1226365SDaniel P. Berrange                               migration_tls_outgoing_handshake,
162e1226365SDaniel P. Berrange                               s,
1631939ccdaSPeter Xu                               NULL,
164e1226365SDaniel P. Berrange                               NULL);
165e1226365SDaniel P. Berrange }
16685a8578eSPeter Xu 
16785a8578eSPeter Xu bool migrate_channel_requires_tls_upgrade(QIOChannel *ioc)
16885a8578eSPeter Xu {
169*10d4703bSJuan Quintela     if (!migrate_tls()) {
17085a8578eSPeter Xu         return false;
17185a8578eSPeter Xu     }
17285a8578eSPeter Xu 
17385a8578eSPeter Xu     return !object_dynamic_cast(OBJECT(ioc), TYPE_QIO_CHANNEL_TLS);
17485a8578eSPeter Xu }
175