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" 2510d4703bSJuan 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; 37d5c3e195SJuan Quintela const char *tls_creds = migrate_tls_creds(); 38e1226365SDaniel P. Berrange QCryptoTLSCreds *ret; 39e1226365SDaniel P. Berrange 40d5c3e195SJuan Quintela creds = object_resolve_path_component(object_get_objects_root(), tls_creds); 41e1226365SDaniel P. Berrange if (!creds) { 42d5c3e195SJuan Quintela error_setg(errp, "No TLS credentials with id '%s'", tls_creds); 43e1226365SDaniel P. Berrange return NULL; 44e1226365SDaniel P. Berrange } 45e1226365SDaniel P. Berrange ret = (QCryptoTLSCreds *)object_dynamic_cast( 46e1226365SDaniel P. Berrange creds, TYPE_QCRYPTO_TLS_CREDS); 47e1226365SDaniel P. Berrange if (!ret) { 48e1226365SDaniel P. Berrange error_setg(errp, "Object with id '%s' is not TLS credentials", 49d5c3e195SJuan Quintela tls_creds); 50e1226365SDaniel P. Berrange return NULL; 51e1226365SDaniel P. Berrange } 525590f65fSPhilippe Mathieu-Daudé if (!qcrypto_tls_creds_check_endpoint(ret, endpoint, errp)) { 53e1226365SDaniel P. Berrange return NULL; 54e1226365SDaniel P. Berrange } 55e1226365SDaniel P. Berrange 56e1226365SDaniel P. Berrange return ret; 57e1226365SDaniel P. Berrange } 58e1226365SDaniel P. Berrange 59e1226365SDaniel P. Berrange 6060e705c5SDaniel P. Berrange static void migration_tls_incoming_handshake(QIOTask *task, 61e1226365SDaniel P. Berrange gpointer opaque) 62e1226365SDaniel P. Berrange { 6360e705c5SDaniel P. Berrange QIOChannel *ioc = QIO_CHANNEL(qio_task_get_source(task)); 6460e705c5SDaniel P. Berrange Error *err = NULL; 65e1226365SDaniel P. Berrange 6660e705c5SDaniel P. Berrange if (qio_task_propagate_error(task, &err)) { 67e1226365SDaniel P. Berrange trace_migration_tls_incoming_handshake_error(error_get_pretty(err)); 6860e705c5SDaniel P. Berrange error_report_err(err); 69e1226365SDaniel P. Berrange } else { 70e1226365SDaniel P. Berrange trace_migration_tls_incoming_handshake_complete(); 7154314711SJuan Quintela migration_channel_process_incoming(ioc); 72e1226365SDaniel P. Berrange } 73e1226365SDaniel P. Berrange object_unref(OBJECT(ioc)); 74e1226365SDaniel P. Berrange } 75e1226365SDaniel P. Berrange 7622724f49SDaniel P. Berrange void migration_tls_channel_process_incoming(MigrationState *s, 77e1226365SDaniel P. Berrange QIOChannel *ioc, 78e1226365SDaniel P. Berrange Error **errp) 79e1226365SDaniel P. Berrange { 80e1226365SDaniel P. Berrange QCryptoTLSCreds *creds; 81e1226365SDaniel P. Berrange QIOChannelTLS *tioc; 82e1226365SDaniel P. Berrange 83e1226365SDaniel P. Berrange creds = migration_tls_get_creds( 84e1226365SDaniel P. Berrange s, QCRYPTO_TLS_CREDS_ENDPOINT_SERVER, errp); 85e1226365SDaniel P. Berrange if (!creds) { 86e1226365SDaniel P. Berrange return; 87e1226365SDaniel P. Berrange } 88e1226365SDaniel P. Berrange 892eb0308bSJuan Quintela tioc = qio_channel_tls_new_server(ioc, creds, migrate_tls_authz(), errp); 90e1226365SDaniel P. Berrange if (!tioc) { 91e1226365SDaniel P. Berrange return; 92e1226365SDaniel P. Berrange } 93e1226365SDaniel P. Berrange 94e1226365SDaniel P. Berrange trace_migration_tls_incoming_handshake_start(); 956f01f136SDaniel P. Berrange qio_channel_set_name(QIO_CHANNEL(tioc), "migration-tls-incoming"); 96e1226365SDaniel P. Berrange qio_channel_tls_handshake(tioc, 97e1226365SDaniel P. Berrange migration_tls_incoming_handshake, 98e1226365SDaniel P. Berrange NULL, 991939ccdaSPeter Xu NULL, 100e1226365SDaniel P. Berrange NULL); 101e1226365SDaniel P. Berrange } 102e1226365SDaniel P. Berrange 103e1226365SDaniel P. Berrange 10460e705c5SDaniel P. Berrange static void migration_tls_outgoing_handshake(QIOTask *task, 105e1226365SDaniel P. Berrange gpointer opaque) 106e1226365SDaniel P. Berrange { 107e1226365SDaniel P. Berrange MigrationState *s = opaque; 10860e705c5SDaniel P. Berrange QIOChannel *ioc = QIO_CHANNEL(qio_task_get_source(task)); 10960e705c5SDaniel P. Berrange Error *err = NULL; 110e1226365SDaniel P. Berrange 11160e705c5SDaniel P. Berrange if (qio_task_propagate_error(task, &err)) { 112e1226365SDaniel P. Berrange trace_migration_tls_outgoing_handshake_error(error_get_pretty(err)); 113e1226365SDaniel P. Berrange } else { 114e1226365SDaniel P. Berrange trace_migration_tls_outgoing_handshake_complete(); 115e1226365SDaniel P. Berrange } 116688a3dcbSDr. David Alan Gilbert migration_channel_connect(s, ioc, NULL, err); 117e1226365SDaniel P. Berrange object_unref(OBJECT(ioc)); 118e1226365SDaniel P. Berrange } 119e1226365SDaniel P. Berrange 120bfb790e7SChuan Zheng QIOChannelTLS *migration_tls_client_create(MigrationState *s, 121e1226365SDaniel P. Berrange QIOChannel *ioc, 122e1226365SDaniel P. Berrange const char *hostname, 123e1226365SDaniel P. Berrange Error **errp) 124e1226365SDaniel P. Berrange { 125e1226365SDaniel P. Berrange QCryptoTLSCreds *creds; 126e1226365SDaniel P. Berrange 127e1226365SDaniel P. Berrange creds = migration_tls_get_creds( 128e1226365SDaniel P. Berrange s, QCRYPTO_TLS_CREDS_ENDPOINT_CLIENT, errp); 129e1226365SDaniel P. Berrange if (!creds) { 130bfb790e7SChuan Zheng return NULL; 131e1226365SDaniel P. Berrange } 132e1226365SDaniel P. Berrange 133*1f2f366cSJuan Quintela const char *tls_hostname = migrate_tls_hostname(); 134*1f2f366cSJuan Quintela if (tls_hostname && *tls_hostname) { 135*1f2f366cSJuan Quintela hostname = tls_hostname; 136e1226365SDaniel P. Berrange } 137e1226365SDaniel P. Berrange 13866997c42SMarkus Armbruster return qio_channel_tls_new_client(ioc, creds, hostname, errp); 139bfb790e7SChuan Zheng } 140bfb790e7SChuan Zheng 141bfb790e7SChuan Zheng void migration_tls_channel_connect(MigrationState *s, 142bfb790e7SChuan Zheng QIOChannel *ioc, 143bfb790e7SChuan Zheng const char *hostname, 144bfb790e7SChuan Zheng Error **errp) 145bfb790e7SChuan Zheng { 146bfb790e7SChuan Zheng QIOChannelTLS *tioc; 147bfb790e7SChuan Zheng 148bfb790e7SChuan Zheng tioc = migration_tls_client_create(s, ioc, hostname, errp); 149e1226365SDaniel P. Berrange if (!tioc) { 150e1226365SDaniel P. Berrange return; 151e1226365SDaniel P. Berrange } 152e1226365SDaniel P. Berrange 153d8053e73SChuan Zheng /* Save hostname into MigrationState for handshake */ 154d8053e73SChuan Zheng s->hostname = g_strdup(hostname); 155e1226365SDaniel P. Berrange trace_migration_tls_outgoing_handshake_start(hostname); 1566f01f136SDaniel P. Berrange qio_channel_set_name(QIO_CHANNEL(tioc), "migration-tls-outgoing"); 157e1226365SDaniel P. Berrange qio_channel_tls_handshake(tioc, 158e1226365SDaniel P. Berrange migration_tls_outgoing_handshake, 159e1226365SDaniel P. Berrange s, 1601939ccdaSPeter Xu NULL, 161e1226365SDaniel P. Berrange NULL); 162e1226365SDaniel P. Berrange } 16385a8578eSPeter Xu 16485a8578eSPeter Xu bool migrate_channel_requires_tls_upgrade(QIOChannel *ioc) 16585a8578eSPeter Xu { 16610d4703bSJuan Quintela if (!migrate_tls()) { 16785a8578eSPeter Xu return false; 16885a8578eSPeter Xu } 16985a8578eSPeter Xu 17085a8578eSPeter Xu return !object_dynamic_cast(OBJECT(ioc), TYPE_QIO_CHANNEL_TLS); 17185a8578eSPeter Xu } 172