2 * InspIRCd -- Internet Relay Chat Daemon
4 * Copyright (C) 2016 Attila Molnar <attilamolnar@hush.com>
6 * This file is part of InspIRCd. InspIRCd is free software: you can
7 * redistribute it and/or modify it under the terms of the GNU General Public
8 * License as published by the Free Software Foundation, version 2.
10 * This program is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
12 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 /// $LinkerFlags: -lmbedtls
21 /// $PackageInfo: require_system("darwin") mbedtls
22 /// $PackageInfo: require_system("debian" "9.0") libmbedtls-dev
23 /// $PackageInfo: require_system("ubuntu" "16.04") libmbedtls-dev
27 #include "modules/ssl.h"
29 #include <mbedtls/ctr_drbg.h>
30 #include <mbedtls/dhm.h>
31 #include <mbedtls/ecp.h>
32 #include <mbedtls/entropy.h>
33 #include <mbedtls/error.h>
34 #include <mbedtls/md.h>
35 #include <mbedtls/pk.h>
36 #include <mbedtls/ssl.h>
37 #include <mbedtls/ssl_ciphersuites.h>
38 #include <mbedtls/version.h>
39 #include <mbedtls/x509.h>
40 #include <mbedtls/x509_crt.h>
41 #include <mbedtls/x509_crl.h>
43 #ifdef INSPIRCD_MBEDTLS_LIBRARY_DEBUG
44 #include <mbedtls/debug.h>
49 class Exception : public ModuleException
52 Exception(const std::string& reason)
53 : ModuleException(reason) { }
56 std::string ErrorToString(int errcode)
59 mbedtls_strerror(errcode, buf, sizeof(buf));
63 void ThrowOnError(int errcode, const char* msg)
67 std::string reason = msg;
68 reason.append(" :").append(ErrorToString(errcode));
69 throw Exception(reason);
73 template <typename T, void (*init)(T*), void (*deinit)(T*)>
89 T* get() { return &obj; }
90 const T* get() const { return &obj; }
93 typedef RAIIObj<mbedtls_entropy_context, mbedtls_entropy_init, mbedtls_entropy_free> Entropy;
95 class CTRDRBG : private RAIIObj<mbedtls_ctr_drbg_context, mbedtls_ctr_drbg_init, mbedtls_ctr_drbg_free>
98 bool Seed(Entropy& entropy)
100 return (mbedtls_ctr_drbg_seed(get(), mbedtls_entropy_func, entropy.get(), NULL, 0) == 0);
103 void SetupConf(mbedtls_ssl_config* conf)
105 mbedtls_ssl_conf_rng(conf, mbedtls_ctr_drbg_random, get());
109 class DHParams : public RAIIObj<mbedtls_dhm_context, mbedtls_dhm_init, mbedtls_dhm_free>
112 void set(const std::string& dhstr)
114 // Last parameter is buffer size, must include the terminating null
115 int ret = mbedtls_dhm_parse_dhm(get(), reinterpret_cast<const unsigned char*>(dhstr.c_str()), dhstr.size()+1);
116 ThrowOnError(ret, "Unable to import DH params");
120 class X509Key : public RAIIObj<mbedtls_pk_context, mbedtls_pk_init, mbedtls_pk_free>
124 X509Key(const std::string& keystr)
126 int ret = mbedtls_pk_parse_key(get(), reinterpret_cast<const unsigned char*>(keystr.c_str()), keystr.size()+1, NULL, 0);
127 ThrowOnError(ret, "Unable to import private key");
133 std::vector<int> list;
136 Ciphersuites(const std::string& str)
138 // mbedTLS uses the ciphersuite format "TLS-ECDHE-RSA-WITH-AES-128-GCM-SHA256" internally.
139 // This is a bit verbose, so we make life a bit simpler for admins by not requiring them to supply the static parts.
140 irc::sepstream ss(str, ':');
141 for (std::string token; ss.GetToken(token); )
143 // Prepend "TLS-" if not there
144 if (token.compare(0, 4, "TLS-", 4))
145 token.insert(0, "TLS-");
147 const int id = mbedtls_ssl_get_ciphersuite_id(token.c_str());
149 throw Exception("Unknown ciphersuite " + token);
155 const int* get() const { return &list.front(); }
156 bool empty() const { return (list.size() <= 1); }
161 std::vector<mbedtls_ecp_group_id> list;
164 Curves(const std::string& str)
166 irc::sepstream ss(str, ':');
167 for (std::string token; ss.GetToken(token); )
169 const mbedtls_ecp_curve_info* curve = mbedtls_ecp_curve_info_from_name(token.c_str());
171 throw Exception("Unknown curve " + token);
172 list.push_back(curve->grp_id);
174 list.push_back(MBEDTLS_ECP_DP_NONE);
177 const mbedtls_ecp_group_id* get() const { return &list.front(); }
178 bool empty() const { return (list.size() <= 1); }
181 class X509CertList : public RAIIObj<mbedtls_x509_crt, mbedtls_x509_crt_init, mbedtls_x509_crt_free>
184 /** Import or create empty */
185 X509CertList(const std::string& certstr, bool allowempty = false)
187 if ((allowempty) && (certstr.empty()))
189 int ret = mbedtls_x509_crt_parse(get(), reinterpret_cast<const unsigned char*>(certstr.c_str()), certstr.size()+1);
190 ThrowOnError(ret, "Unable to load certificates");
193 bool empty() const { return (get()->raw.p != NULL); }
196 class X509CRL : public RAIIObj<mbedtls_x509_crl, mbedtls_x509_crl_init, mbedtls_x509_crl_free>
199 X509CRL(const std::string& crlstr)
203 int ret = mbedtls_x509_crl_parse(get(), reinterpret_cast<const unsigned char*>(crlstr.c_str()), crlstr.size()+1);
204 ThrowOnError(ret, "Unable to load CRL");
208 class X509Credentials
214 /** Certificate list, presented to the peer
219 X509Credentials(const std::string& certstr, const std::string& keystr)
223 // Verify that one of the certs match the private key
225 for (mbedtls_x509_crt* cert = certs.get(); cert; cert = cert->next)
227 if (mbedtls_pk_check_pair(&cert->pk, key.get()) == 0)
234 throw Exception("Public/private key pair does not match");
237 mbedtls_pk_context* getkey() { return key.get(); }
238 mbedtls_x509_crt* getcerts() { return certs.get(); }
243 mbedtls_ssl_config conf;
245 #ifdef INSPIRCD_MBEDTLS_LIBRARY_DEBUG
246 static void DebugLogFunc(void* userptr, int level, const char* file, int line, const char* msg)
248 // Remove trailing \n
249 size_t len = strlen(msg);
250 if ((len > 0) && (msg[len-1] == '\n'))
252 ServerInstance->Logs->Log(MODNAME, LOG_DEBUG, "%s:%d %.*s", file, line, len, msg);
257 Context(CTRDRBG& ctrdrbg, unsigned int endpoint)
259 mbedtls_ssl_config_init(&conf);
260 #ifdef INSPIRCD_MBEDTLS_LIBRARY_DEBUG
261 mbedtls_debug_set_threshold(INT_MAX);
262 mbedtls_ssl_conf_dbg(&conf, DebugLogFunc, NULL);
265 // TODO: check ret of mbedtls_ssl_config_defaults
266 mbedtls_ssl_config_defaults(&conf, endpoint, MBEDTLS_SSL_TRANSPORT_STREAM, MBEDTLS_SSL_PRESET_DEFAULT);
267 ctrdrbg.SetupConf(&conf);
272 mbedtls_ssl_config_free(&conf);
275 void SetMinDHBits(unsigned int mindh)
277 mbedtls_ssl_conf_dhm_min_bitlen(&conf, mindh);
280 void SetDHParams(DHParams& dh)
282 mbedtls_ssl_conf_dh_param_ctx(&conf, dh.get());
285 void SetX509CertAndKey(X509Credentials& x509cred)
287 mbedtls_ssl_conf_own_cert(&conf, x509cred.getcerts(), x509cred.getkey());
290 void SetCiphersuites(const Ciphersuites& ciphersuites)
292 mbedtls_ssl_conf_ciphersuites(&conf, ciphersuites.get());
295 void SetCurves(const Curves& curves)
297 mbedtls_ssl_conf_curves(&conf, curves.get());
300 void SetVersion(int minver, int maxver)
302 // SSL v3 support cannot be enabled
304 mbedtls_ssl_conf_min_version(&conf, MBEDTLS_SSL_MAJOR_VERSION_3, minver);
306 mbedtls_ssl_conf_max_version(&conf, MBEDTLS_SSL_MAJOR_VERSION_3, maxver);
309 void SetCA(X509CertList& certs, X509CRL& crl)
311 mbedtls_ssl_conf_ca_chain(&conf, certs.get(), crl.get());
314 void SetOptionalVerifyCert()
316 mbedtls_ssl_conf_authmode(&conf, MBEDTLS_SSL_VERIFY_OPTIONAL);
319 const mbedtls_ssl_config* GetConf() const { return &conf; }
324 const mbedtls_md_info_t* md;
326 /** Buffer where cert hashes are written temporarily
328 mutable std::vector<unsigned char> buf;
331 Hash(std::string hashstr)
333 std::transform(hashstr.begin(), hashstr.end(), hashstr.begin(), ::toupper);
334 md = mbedtls_md_info_from_string(hashstr.c_str());
336 throw Exception("Unknown hash: " + hashstr);
338 buf.resize(mbedtls_md_get_size(md));
341 std::string hash(const unsigned char* input, size_t length) const
343 mbedtls_md(md, input, length, &buf.front());
344 return BinToHex(&buf.front(), buf.size());
350 /** Name of this profile
352 const std::string name;
354 X509Credentials x509cred;
356 /** Ciphersuites to use
358 Ciphersuites ciphersuites;
360 /** Curves accepted for use in ECDHE and in the peer's end-entity certificate
369 X509CertList cacerts;
373 /** Hashing algorithm to use when generating certificate fingerprints
377 /** Rough max size of records to send
379 const unsigned int outrecsize;
384 const std::string name;
388 const std::string certstr;
389 const std::string keystr;
390 const std::string dhstr;
392 const std::string ciphersuitestr;
393 const std::string curvestr;
394 const unsigned int mindh;
395 const std::string hashstr;
402 const unsigned int outrecsize;
403 const bool requestclientcert;
405 Config(const std::string& profilename, ConfigTag* tag, CTRDRBG& ctr_drbg)
408 , certstr(ReadFile(tag->getString("certfile", "cert.pem")))
409 , keystr(ReadFile(tag->getString("keyfile", "key.pem")))
410 , dhstr(ReadFile(tag->getString("dhfile", "dhparams.pem")))
411 , ciphersuitestr(tag->getString("ciphersuites"))
412 , curvestr(tag->getString("curves"))
413 , mindh(tag->getUInt("mindhbits", 2048))
414 , hashstr(tag->getString("hash", "sha256"))
415 , castr(tag->getString("cafile"))
416 , minver(tag->getUInt("minver", 0))
417 , maxver(tag->getUInt("maxver", 0))
418 , outrecsize(tag->getUInt("outrecsize", 2048, 512, 16384))
419 , requestclientcert(tag->getBool("requestclientcert", true))
423 castr = ReadFile(castr);
424 crlstr = tag->getString("crlfile");
426 crlstr = ReadFile(crlstr);
431 Profile(Config& config)
433 , x509cred(config.certstr, config.keystr)
434 , ciphersuites(config.ciphersuitestr)
435 , curves(config.curvestr)
436 , serverctx(config.ctrdrbg, MBEDTLS_SSL_IS_SERVER)
437 , clientctx(config.ctrdrbg, MBEDTLS_SSL_IS_CLIENT)
438 , cacerts(config.castr, true)
440 , hash(config.hashstr)
441 , outrecsize(config.outrecsize)
443 serverctx.SetX509CertAndKey(x509cred);
444 clientctx.SetX509CertAndKey(x509cred);
445 clientctx.SetMinDHBits(config.mindh);
447 if (!ciphersuites.empty())
449 serverctx.SetCiphersuites(ciphersuites);
450 clientctx.SetCiphersuites(ciphersuites);
455 serverctx.SetCurves(curves);
456 clientctx.SetCurves(curves);
459 serverctx.SetVersion(config.minver, config.maxver);
460 clientctx.SetVersion(config.minver, config.maxver);
462 if (!config.dhstr.empty())
464 dhparams.set(config.dhstr);
465 serverctx.SetDHParams(dhparams);
468 clientctx.SetOptionalVerifyCert();
469 clientctx.SetCA(cacerts, crl);
470 // The default for servers is to not request a client certificate from the peer
471 if (config.requestclientcert)
473 serverctx.SetOptionalVerifyCert();
474 serverctx.SetCA(cacerts, crl);
478 static std::string ReadFile(const std::string& filename)
480 FileReader reader(filename);
481 std::string ret = reader.GetString();
483 throw Exception("Cannot read file " + filename);
487 /** Set up the given session with the settings in this profile
489 void SetupClientSession(mbedtls_ssl_context* sess)
491 mbedtls_ssl_setup(sess, clientctx.GetConf());
494 void SetupServerSession(mbedtls_ssl_context* sess)
496 mbedtls_ssl_setup(sess, serverctx.GetConf());
499 const std::string& GetName() const { return name; }
500 X509Credentials& GetX509Credentials() { return x509cred; }
501 unsigned int GetOutgoingRecordSize() const { return outrecsize; }
502 const Hash& GetHash() const { return hash; }
506 class mbedTLSIOHook : public SSLIOHook
515 mbedtls_ssl_context sess;
520 if (status == ISSL_NONE)
523 mbedtls_ssl_close_notify(&sess);
524 mbedtls_ssl_free(&sess);
529 // Returns 1 if handshake succeeded, 0 if it is still in progress, -1 if it failed
530 int Handshake(StreamSocket* sock)
532 int ret = mbedtls_ssl_handshake(&sess);
535 // Change the seesion state
536 this->status = ISSL_HANDSHAKEN;
540 // Finish writing, if any left
541 SocketEngine::ChangeEventMask(sock, FD_WANT_POLL_READ | FD_WANT_NO_WRITE | FD_ADD_TRIAL_WRITE);
546 this->status = ISSL_HANDSHAKING;
547 if (ret == MBEDTLS_ERR_SSL_WANT_READ)
549 SocketEngine::ChangeEventMask(sock, FD_WANT_POLL_READ | FD_WANT_NO_WRITE);
552 else if (ret == MBEDTLS_ERR_SSL_WANT_WRITE)
554 SocketEngine::ChangeEventMask(sock, FD_WANT_NO_READ | FD_WANT_SINGLE_WRITE);
558 sock->SetError("Handshake Failed - " + mbedTLS::ErrorToString(ret));
563 // Returns 1 if application I/O should proceed, 0 if it must wait for the underlying protocol to progress, -1 on fatal error
564 int PrepareIO(StreamSocket* sock)
566 if (status == ISSL_HANDSHAKEN)
568 else if (status == ISSL_HANDSHAKING)
570 // The handshake isn't finished, try to finish it
571 return Handshake(sock);
575 sock->SetError("No SSL session");
579 void VerifyCertificate()
581 this->certificate = new ssl_cert;
582 const mbedtls_x509_crt* const cert = mbedtls_ssl_get_peer_cert(&sess);
585 certificate->error = "No client certificate sent";
589 // If there is a certificate we can always generate a fingerprint
590 certificate->fingerprint = GetProfile().GetHash().hash(cert->raw.p, cert->raw.len);
592 // At this point mbedTLS verified the cert already, we just need to check the results
593 const uint32_t flags = mbedtls_ssl_get_verify_result(&sess);
594 if (flags == 0xFFFFFFFF)
596 certificate->error = "Internal error during verification";
602 // Verification succeeded
603 certificate->trusted = true;
607 // Verification failed
608 certificate->trusted = false;
609 if ((flags & MBEDTLS_X509_BADCERT_EXPIRED) || (flags & MBEDTLS_X509_BADCERT_FUTURE))
610 certificate->error = "Not activated, or expired certificate";
613 certificate->unknownsigner = (flags & MBEDTLS_X509_BADCERT_NOT_TRUSTED);
614 certificate->revoked = (flags & MBEDTLS_X509_BADCERT_REVOKED);
615 certificate->invalid = ((flags & MBEDTLS_X509_BADCERT_BAD_KEY) || (flags & MBEDTLS_X509_BADCERT_BAD_MD) || (flags & MBEDTLS_X509_BADCERT_BAD_PK));
617 GetDNString(&cert->subject, certificate->dn);
618 GetDNString(&cert->issuer, certificate->issuer);
621 static void GetDNString(const mbedtls_x509_name* x509name, std::string& out)
624 const int ret = mbedtls_x509_dn_gets(buf, sizeof(buf), x509name);
628 out.assign(buf, ret);
631 static int Pull(void* userptr, unsigned char* buffer, size_t size)
633 StreamSocket* const sock = reinterpret_cast<StreamSocket*>(userptr);
634 if (sock->GetEventMask() & FD_READ_WILL_BLOCK)
635 return MBEDTLS_ERR_SSL_WANT_READ;
637 const int ret = SocketEngine::Recv(sock, reinterpret_cast<char*>(buffer), size, 0);
640 SocketEngine::ChangeEventMask(sock, FD_READ_WILL_BLOCK);
641 if ((ret == -1) && (SocketEngine::IgnoreError()))
642 return MBEDTLS_ERR_SSL_WANT_READ;
647 static int Push(void* userptr, const unsigned char* buffer, size_t size)
649 StreamSocket* const sock = reinterpret_cast<StreamSocket*>(userptr);
650 if (sock->GetEventMask() & FD_WRITE_WILL_BLOCK)
651 return MBEDTLS_ERR_SSL_WANT_WRITE;
653 const int ret = SocketEngine::Send(sock, buffer, size, 0);
656 SocketEngine::ChangeEventMask(sock, FD_WRITE_WILL_BLOCK);
657 if ((ret == -1) && (SocketEngine::IgnoreError()))
658 return MBEDTLS_ERR_SSL_WANT_WRITE;
664 mbedTLSIOHook(IOHookProvider* hookprov, StreamSocket* sock, bool isserver)
665 : SSLIOHook(hookprov)
668 mbedtls_ssl_init(&sess);
670 GetProfile().SetupServerSession(&sess);
672 GetProfile().SetupClientSession(&sess);
674 mbedtls_ssl_set_bio(&sess, reinterpret_cast<void*>(sock), Push, Pull, NULL);
676 sock->AddIOHook(this);
680 void OnStreamSocketClose(StreamSocket* sock) CXX11_OVERRIDE
685 int OnStreamSocketRead(StreamSocket* sock, std::string& recvq) CXX11_OVERRIDE
687 // Finish handshake if needed
688 int prepret = PrepareIO(sock);
692 // If we resumed the handshake then this->status will be ISSL_HANDSHAKEN.
693 char* const readbuf = ServerInstance->GetReadBuffer();
694 const size_t readbufsize = ServerInstance->Config->NetBufferSize;
695 int ret = mbedtls_ssl_read(&sess, reinterpret_cast<unsigned char*>(readbuf), readbufsize);
698 recvq.append(readbuf, ret);
700 // Schedule a read if there is still data in the mbedTLS buffer
701 if (mbedtls_ssl_get_bytes_avail(&sess) > 0)
702 SocketEngine::ChangeEventMask(sock, FD_ADD_TRIAL_READ);
705 else if (ret == MBEDTLS_ERR_SSL_WANT_READ)
707 SocketEngine::ChangeEventMask(sock, FD_WANT_POLL_READ);
710 else if (ret == MBEDTLS_ERR_SSL_WANT_WRITE)
712 SocketEngine::ChangeEventMask(sock, FD_WANT_NO_READ | FD_WANT_SINGLE_WRITE);
717 sock->SetError("Connection closed");
721 else // error or MBEDTLS_ERR_SSL_CLIENT_RECONNECT which we treat as an error
723 sock->SetError(mbedTLS::ErrorToString(ret));
729 int OnStreamSocketWrite(StreamSocket* sock, StreamSocket::SendQueue& sendq) CXX11_OVERRIDE
731 // Finish handshake if needed
732 int prepret = PrepareIO(sock);
736 // Session is ready for transferring application data
737 while (!sendq.empty())
739 FlattenSendQueue(sendq, GetProfile().GetOutgoingRecordSize());
740 const StreamSocket::SendQueue::Element& buffer = sendq.front();
741 int ret = mbedtls_ssl_write(&sess, reinterpret_cast<const unsigned char*>(buffer.data()), buffer.length());
742 if (ret == (int)buffer.length())
744 // Wrote entire record, continue sending
749 sendq.erase_front(ret);
750 SocketEngine::ChangeEventMask(sock, FD_WANT_SINGLE_WRITE);
755 sock->SetError("Connection closed");
759 else if (ret == MBEDTLS_ERR_SSL_WANT_WRITE)
761 SocketEngine::ChangeEventMask(sock, FD_WANT_SINGLE_WRITE);
764 else if (ret == MBEDTLS_ERR_SSL_WANT_READ)
766 SocketEngine::ChangeEventMask(sock, FD_WANT_POLL_READ);
771 sock->SetError(mbedTLS::ErrorToString(ret));
777 SocketEngine::ChangeEventMask(sock, FD_WANT_NO_WRITE);
781 void GetCiphersuite(std::string& out) const CXX11_OVERRIDE
783 if (!IsHandshakeDone())
785 out.append(mbedtls_ssl_get_version(&sess)).push_back('-');
787 // All mbedTLS ciphersuite names currently begin with "TLS-" which provides no useful information so skip it, but be prepared if it changes
788 const char* const ciphersuitestr = mbedtls_ssl_get_ciphersuite(&sess);
789 const char prefix[] = "TLS-";
790 unsigned int skip = sizeof(prefix)-1;
791 if (strncmp(ciphersuitestr, prefix, sizeof(prefix)-1))
793 out.append(ciphersuitestr + skip);
796 bool GetServerName(std::string& out) const CXX11_OVERRIDE
798 // TODO: Implement SNI support.
802 mbedTLS::Profile& GetProfile();
803 bool IsHandshakeDone() const { return (status == ISSL_HANDSHAKEN); }
806 class mbedTLSIOHookProvider : public IOHookProvider
808 mbedTLS::Profile profile;
811 mbedTLSIOHookProvider(Module* mod, mbedTLS::Profile::Config& config)
812 : IOHookProvider(mod, "ssl/" + config.name, IOHookProvider::IOH_SSL)
815 ServerInstance->Modules->AddService(*this);
818 ~mbedTLSIOHookProvider()
820 ServerInstance->Modules->DelService(*this);
823 void OnAccept(StreamSocket* sock, irc::sockets::sockaddrs* client, irc::sockets::sockaddrs* server) CXX11_OVERRIDE
825 new mbedTLSIOHook(this, sock, true);
828 void OnConnect(StreamSocket* sock) CXX11_OVERRIDE
830 new mbedTLSIOHook(this, sock, false);
833 mbedTLS::Profile& GetProfile() { return profile; }
836 mbedTLS::Profile& mbedTLSIOHook::GetProfile()
838 IOHookProvider* hookprov = prov;
839 return static_cast<mbedTLSIOHookProvider*>(hookprov)->GetProfile();
842 class ModuleSSLmbedTLS : public Module
844 typedef std::vector<reference<mbedTLSIOHookProvider> > ProfileList;
846 mbedTLS::Entropy entropy;
847 mbedTLS::CTRDRBG ctr_drbg;
848 ProfileList profiles;
852 // First, store all profiles in a new, temporary container. If no problems occur, swap the two
853 // containers; this way if something goes wrong we can go back and continue using the current profiles,
854 // avoiding unpleasant situations where no new SSL connections are possible.
855 ProfileList newprofiles;
857 ConfigTagList tags = ServerInstance->Config->ConfTags("sslprofile");
858 if (tags.first == tags.second)
860 // No <sslprofile> tags found, create a profile named "mbedtls" from settings in the <mbedtls> block
861 const std::string defname = "mbedtls";
862 ConfigTag* tag = ServerInstance->Config->ConfValue(defname);
863 ServerInstance->Logs->Log(MODNAME, LOG_DEFAULT, "No <sslprofile> tags found; using settings from the <mbedtls> tag");
867 mbedTLS::Profile::Config profileconfig(defname, tag, ctr_drbg);
868 newprofiles.push_back(new mbedTLSIOHookProvider(this, profileconfig));
870 catch (CoreException& ex)
872 throw ModuleException("Error while initializing the default SSL profile - " + ex.GetReason());
876 for (ConfigIter i = tags.first; i != tags.second; ++i)
878 ConfigTag* tag = i->second;
879 if (tag->getString("provider") != "mbedtls")
882 std::string name = tag->getString("name");
885 ServerInstance->Logs->Log(MODNAME, LOG_DEFAULT, "Ignoring <sslprofile> tag without name at " + tag->getTagLocation());
889 reference<mbedTLSIOHookProvider> prov;
892 mbedTLS::Profile::Config profileconfig(name, tag, ctr_drbg);
893 prov = new mbedTLSIOHookProvider(this, profileconfig);
895 catch (CoreException& ex)
897 throw ModuleException("Error while initializing SSL profile \"" + name + "\" at " + tag->getTagLocation() + " - " + ex.GetReason());
900 newprofiles.push_back(prov);
903 // New profiles are ok, begin using them
904 // Old profiles are deleted when their refcount drops to zero
905 for (ProfileList::iterator i = profiles.begin(); i != profiles.end(); ++i)
907 mbedTLSIOHookProvider& prov = **i;
908 ServerInstance->Modules.DelService(prov);
911 profiles.swap(newprofiles);
915 void init() CXX11_OVERRIDE
917 char verbuf[16]; // Should be at least 9 bytes in size
918 mbedtls_version_get_string(verbuf);
919 ServerInstance->Logs->Log(MODNAME, LOG_DEFAULT, "mbedTLS lib version %s module was compiled for " MBEDTLS_VERSION_STRING, verbuf);
921 if (!ctr_drbg.Seed(entropy))
922 throw ModuleException("CTR DRBG seed failed");
926 void OnModuleRehash(User* user, const std::string ¶m) CXX11_OVERRIDE
935 catch (ModuleException& ex)
937 ServerInstance->Logs->Log(MODNAME, LOG_DEFAULT, ex.GetReason() + " Not applying settings.");
941 void OnCleanup(ExtensionItem::ExtensibleType type, Extensible* item) CXX11_OVERRIDE
943 if (type != ExtensionItem::EXT_USER)
946 LocalUser* user = IS_LOCAL(static_cast<User*>(item));
947 if ((user) && (user->eh.GetModHook(this)))
949 // User is using SSL, they're a local user, and they're using our IOHook.
950 // Potentially there could be multiple SSL modules loaded at once on different ports.
951 ServerInstance->Users.QuitUser(user, "SSL module unloading");
955 ModResult OnCheckReady(LocalUser* user) CXX11_OVERRIDE
957 const mbedTLSIOHook* const iohook = static_cast<mbedTLSIOHook*>(user->eh.GetModHook(this));
958 if ((iohook) && (!iohook->IsHandshakeDone()))
960 return MOD_RES_PASSTHRU;
963 Version GetVersion() CXX11_OVERRIDE
965 return Version("Provides SSL support via mbedTLS (PolarSSL)", VF_VENDOR);
969 MODULE_INIT(ModuleSSLmbedTLS)