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