1 /***************************************************************************
2 * Copyright (C) 2005-2020 by the Quassel Project *
3 * devel@quassel-irc.org *
5 * This program is free software; you can redistribute it and/or modify *
6 * it under the terms of the GNU General Public License as published by *
7 * the Free Software Foundation; either version 2 of the License, or *
8 * (at your option) version 3. *
10 * This program is distributed in the hope that it will be useful, *
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
13 * GNU General Public License for more details. *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program; if not, write to the *
17 * Free Software Foundation, Inc., *
18 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. *
19 ***************************************************************************/
21 #include "sslserver.h"
29 SslServer::SslServer(QObject* parent)
32 // Keep track if the SSL warning has been mentioned at least once before
33 static bool sslWarningShown = false;
35 if (Quassel::isOptionSet("ssl-cert")) {
36 _sslCertPath = Quassel::optionValue("ssl-cert");
39 _sslCertPath = Quassel::configDirPath() + "quasselCert.pem";
42 if (Quassel::isOptionSet("ssl-key")) {
43 _sslKeyPath = Quassel::optionValue("ssl-key");
46 _sslKeyPath = _sslCertPath;
49 // Initialize the certificates for first-time usage
51 if (!sslWarningShown) {
52 qWarning() << "SslServer: Unable to set certificate file\n"
53 << " Quassel Core will still work, but cannot provide SSL for client connections.\n"
54 << " Please see https://quassel-irc.org/faq/cert to learn how to enable SSL support.";
55 sslWarningShown = true;
60 void SslServer::incomingConnection(qintptr socketDescriptor)
62 auto* socket = new QSslSocket(this);
63 if (socket->setSocketDescriptor(socketDescriptor)) {
65 socket->setLocalCertificate(_cert);
66 socket->setPrivateKey(_key);
67 socket->addCaCertificates(_ca);
69 addPendingConnection(socket);
76 bool SslServer::loadCerts()
78 // Load the certificates specified in the path. If needed, other prep work can be done here.
79 return setCertificate(_sslCertPath, _sslKeyPath);
82 bool SslServer::reloadCerts()
88 // Reloading certificates currently only occur in response to a request. Always print an
89 // error if something goes wrong, in order to simplify checking if it's working.
91 qWarning() << "SslServer: Unable to reload certificate file, reverting\n"
92 << " Quassel Core will use the previous key to provide SSL for client connections.\n"
93 << " Please see https://quassel-irc.org/faq/cert to learn how to enable SSL support.";
96 qWarning() << "SslServer: Unable to reload certificate file\n"
97 << " Quassel Core will still work, but cannot provide SSL for client connections.\n"
98 << " Please see https://quassel-irc.org/faq/cert to learn how to enable SSL support.";
104 bool SslServer::setCertificate(const QString& path, const QString& keyPath)
106 // Don't reset _isCertValid here, in case an older but valid certificate is still loaded.
107 // Use temporary variables in order to avoid overwriting the existing certificates until
108 // everything is confirmed good.
109 QSslCertificate untestedCert;
110 QList<QSslCertificate> untestedCA;
116 QFile certFile(path);
117 if (!certFile.exists()) {
118 qWarning() << "SslServer: Certificate file" << qPrintable(path) << "does not exist";
122 if (!certFile.open(QIODevice::ReadOnly)) {
123 qWarning() << "SslServer: Failed to open certificate file" << qPrintable(path) << "error:" << certFile.error();
127 QList<QSslCertificate> certList = QSslCertificate::fromDevice(&certFile);
129 if (certList.isEmpty()) {
130 qWarning() << "SslServer: Certificate file doesn't contain a certificate";
134 untestedCert = certList[0];
135 certList.removeFirst(); // remove server cert
137 // store CA and intermediates certs
138 untestedCA = certList;
140 if (!certFile.reset()) {
141 qWarning() << "SslServer: IO error reading certificate file";
145 // load key from keyPath if it differs from path, otherwise load key from path
146 if (path != keyPath) {
147 QFile keyFile(keyPath);
148 if (!keyFile.exists()) {
149 qWarning() << "SslServer: Key file" << qPrintable(keyPath) << "does not exist";
153 if (!keyFile.open(QIODevice::ReadOnly)) {
154 qWarning() << "SslServer: Failed to open key file" << qPrintable(keyPath) << "error:" << keyFile.error();
158 untestedKey = loadKey(&keyFile);
162 untestedKey = loadKey(&certFile);
167 if (untestedCert.isNull()) {
168 qWarning() << "SslServer:" << qPrintable(path) << "contains no certificate data";
172 // We allow the core to offer SSL anyway, so no "return false" here. Client will warn about the cert being invalid.
173 const QDateTime now = QDateTime::currentDateTime();
174 if (now < untestedCert.effectiveDate()) {
175 qWarning() << "SslServer: Certificate won't be valid before" << untestedCert.effectiveDate().toString();
177 else if (now > untestedCert.expiryDate()) {
178 qWarning() << "SslServer: Certificate expired on" << untestedCert.expiryDate().toString();
180 else if (untestedCert.isBlacklisted()) {
181 qWarning() << "SslServer: Certificate blacklisted";
184 if (untestedKey.isNull()) {
185 qWarning() << "SslServer:" << qPrintable(keyPath) << "contains no key data";
189 _certificateExpires = untestedCert.expiryDate();
190 if (_metricsServer) {
191 _metricsServer->setCertificateExpires(_certificateExpires);
196 // All keys are valid, update the externally visible copy used for new connections.
197 _cert = untestedCert;
204 QSslKey SslServer::loadKey(QFile* keyFile)
207 key = QSslKey(keyFile, QSsl::Rsa);
209 if (!keyFile->reset()) {
210 qWarning() << "SslServer: IO error reading key file";
213 key = QSslKey(keyFile, QSsl::Ec);
218 void SslServer::setMetricsServer(MetricsServer* metricsServer) {
219 _metricsServer = metricsServer;
220 if (_metricsServer) {
221 _metricsServer->setCertificateExpires(_certificateExpires);