2 * InspIRCd -- Internet Relay Chat Daemon
4 * Copyright (C) 2019 linuxdaemon <linuxdaemon.irc@gmail.com>
5 * Copyright (C) 2013, 2017-2019 Sadie Powell <sadie@witchery.services>
6 * Copyright (C) 2013 Christopher 'm4z' Holm <them4z@gmail.com>
7 * Copyright (C) 2012-2016 Attila Molnar <attilamolnar@hush.com>
8 * Copyright (C) 2012 Robby <robby@chatbelgie.be>
9 * Copyright (C) 2010 Adam <Adam@anope.org>
10 * Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
11 * Copyright (C) 2008 Robin Burchell <robin+git@viroteck.net>
12 * Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
13 * Copyright (C) 2006-2007, 2009-2010 Craig Edwards <brain@inspircd.org>
15 * This file is part of InspIRCd. InspIRCd is free software: you can
16 * redistribute it and/or modify it under the terms of the GNU General Public
17 * License as published by the Free Software Foundation, version 2.
19 * This program is distributed in the hope that it will be useful, but WITHOUT
20 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
21 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
24 * You should have received a copy of the GNU General Public License
25 * along with this program. If not, see <http://www.gnu.org/licenses/>.
30 #include "modules/ssl.h"
31 #include "modules/webirc.h"
32 #include "modules/whois.h"
33 #include "modules/who.h"
38 RPL_WHOISCERTFP = 276,
44 class SSLCertExt : public ExtensionItem
47 SSLCertExt(Module* parent)
48 : ExtensionItem("ssl_cert", ExtensionItem::EXT_USER, parent)
52 ssl_cert* get(const Extensible* item) const
54 return static_cast<ssl_cert*>(get_raw(item));
57 void set(Extensible* item, ssl_cert* value)
59 value->refcount_inc();
60 ssl_cert* old = static_cast<ssl_cert*>(set_raw(item, value));
61 if (old && old->refcount_dec())
65 void unset(Extensible* container)
67 free(container, unset_raw(container));
70 std::string ToNetwork(const Extensible* container, void* item) const CXX11_OVERRIDE
72 return static_cast<ssl_cert*>(item)->GetMetaLine();
75 void FromNetwork(Extensible* container, const std::string& value) CXX11_OVERRIDE
77 ssl_cert* cert = new ssl_cert;
80 std::stringstream s(value);
84 cert->invalid = (v.find('v') != std::string::npos);
85 cert->trusted = (v.find('T') != std::string::npos);
86 cert->revoked = (v.find('R') != std::string::npos);
87 cert->unknownsigner = (v.find('s') != std::string::npos);
88 if (v.find('E') != std::string::npos)
90 getline(s,cert->error,'\n');
94 getline(s,cert->fingerprint,' ');
95 getline(s,cert->dn,' ');
96 getline(s,cert->issuer,'\n');
100 void free(Extensible* container, void* item) CXX11_OVERRIDE
102 ssl_cert* old = static_cast<ssl_cert*>(item);
103 if (old && old->refcount_dec())
108 class UserCertificateAPIImpl : public UserCertificateAPIBase
111 LocalIntExt nosslext;
114 UserCertificateAPIImpl(Module* mod)
115 : UserCertificateAPIBase(mod)
116 , nosslext("no_ssl_cert", ExtensionItem::EXT_USER, mod)
121 ssl_cert* GetCertificate(User* user) CXX11_OVERRIDE
123 ssl_cert* cert = sslext.get(user);
127 LocalUser* luser = IS_LOCAL(user);
128 if (!luser || nosslext.get(luser))
131 cert = SSLClientCert::GetCertificate(&luser->eh);
135 SetCertificate(user, cert);
139 void SetCertificate(User* user, ssl_cert* cert) CXX11_OVERRIDE
141 ServerInstance->Logs->Log(MODNAME, LOG_DEBUG, "Setting TLS (SSL) client certificate for %s: %s",
142 user->GetFullHost().c_str(), cert->GetMetaLine().c_str());
143 sslext.set(user, cert);
147 class CommandSSLInfo : public Command
150 UserCertificateAPIImpl sslapi;
152 CommandSSLInfo(Module* Creator)
153 : Command(Creator, "SSLINFO", 1)
159 CmdResult Handle(User* user, const Params& parameters) CXX11_OVERRIDE
161 User* target = ServerInstance->FindNickOnly(parameters[0]);
163 if ((!target) || (target->registered != REG_ALL))
165 user->WriteNumeric(Numerics::NoSuchNick(parameters[0]));
169 bool operonlyfp = ServerInstance->Config->ConfValue("sslinfo")->getBool("operonly");
170 if (operonlyfp && !user->IsOper() && target != user)
172 user->WriteNotice("*** You cannot view TLS (SSL) client certificate information for other users");
176 ssl_cert* cert = sslapi.GetCertificate(target);
179 user->WriteNotice(InspIRCd::Format("*** %s is not connected using TLS (SSL).", target->nick.c_str()));
181 else if (cert->GetError().length())
183 user->WriteNotice(InspIRCd::Format("*** %s is connected using TLS (SSL) but has not specified a valid client certificate (%s).",
184 target->nick.c_str(), cert->GetError().c_str()));
188 user->WriteNotice("*** Distinguished Name: " + cert->GetDN());
189 user->WriteNotice("*** Issuer: " + cert->GetIssuer());
190 user->WriteNotice("*** Key Fingerprint: " + cert->GetFingerprint());
199 , public WebIRC::EventListener
200 , public Whois::EventListener
201 , public Who::EventListener
206 bool MatchFP(ssl_cert* const cert, const std::string& fp) const
208 return irc::spacesepstream(fp).Contains(cert->GetFingerprint());
213 : WebIRC::EventListener(this)
214 , Whois::EventListener(this)
215 , Who::EventListener(this)
220 Version GetVersion() CXX11_OVERRIDE
222 return Version("Adds user facing TLS (SSL) information, various TLS (SSL) configuration options, and the /SSLINFO command to look up TLS (SSL) certificate information for other users.", VF_VENDOR);
225 void OnWhois(Whois::Context& whois) CXX11_OVERRIDE
227 ssl_cert* cert = cmd.sslapi.GetCertificate(whois.GetTarget());
230 whois.SendLine(RPL_WHOISSECURE, "is using a secure connection");
231 bool operonlyfp = ServerInstance->Config->ConfValue("sslinfo")->getBool("operonly");
232 if ((!operonlyfp || whois.IsSelfWhois() || whois.GetSource()->IsOper()) && !cert->fingerprint.empty())
233 whois.SendLine(RPL_WHOISCERTFP, InspIRCd::Format("has TLS (SSL) client certificate fingerprint %s", cert->fingerprint.c_str()));
237 ModResult OnWhoLine(const Who::Request& request, LocalUser* source, User* user, Membership* memb, Numeric::Numeric& numeric) CXX11_OVERRIDE
240 if (!request.GetFieldIndex('f', flag_index))
241 return MOD_RES_PASSTHRU;
243 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
245 numeric.GetParams()[flag_index].push_back('s');
247 return MOD_RES_PASSTHRU;
250 ModResult OnPreCommand(std::string& command, CommandBase::Params& parameters, LocalUser* user, bool validated) CXX11_OVERRIDE
252 if ((command == "OPER") && (validated))
254 ServerConfig::OperIndex::const_iterator i = ServerInstance->Config->oper_blocks.find(parameters[0]);
255 if (i != ServerInstance->Config->oper_blocks.end())
257 OperInfo* ifo = i->second;
258 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
260 if (ifo->oper_block->getBool("sslonly") && !cert)
262 user->WriteNumeric(ERR_NOOPERHOST, "Invalid oper credentials");
263 user->CommandFloodPenalty += 10000;
264 ServerInstance->SNO->WriteGlobalSno('o', "WARNING! Failed oper attempt by %s using login '%s': a secure connection is required.", user->GetFullRealHost().c_str(), parameters[0].c_str());
268 std::string fingerprint;
269 if (ifo->oper_block->readString("fingerprint", fingerprint) && (!cert || !MatchFP(cert, fingerprint)))
271 user->WriteNumeric(ERR_NOOPERHOST, "Invalid oper credentials");
272 user->CommandFloodPenalty += 10000;
273 ServerInstance->SNO->WriteGlobalSno('o', "WARNING! Failed oper attempt by %s using login '%s': their TLS (SSL) client certificate fingerprint does not match.", user->GetFullRealHost().c_str(), parameters[0].c_str());
279 // Let core handle it for extra stuff
280 return MOD_RES_PASSTHRU;
283 void OnPostConnect(User* user) CXX11_OVERRIDE
285 LocalUser* const localuser = IS_LOCAL(user);
289 const SSLIOHook* const ssliohook = SSLIOHook::IsSSL(&localuser->eh);
290 if (!ssliohook || cmd.sslapi.nosslext.get(localuser))
293 ssl_cert* const cert = ssliohook->GetCertificate();
295 std::string text = "*** You are connected to ";
296 if (!ssliohook->GetServerName(text))
297 text.append(ServerInstance->Config->ServerName);
298 text.append(" using TLS (SSL) cipher '");
299 ssliohook->GetCiphersuite(text);
300 text.push_back('\'');
301 if (cert && !cert->GetFingerprint().empty())
302 text.append(" and your TLS (SSL) client certificate fingerprint is ").append(cert->GetFingerprint());
303 user->WriteNotice(text);
308 // Find an auto-oper block for this user
309 for (ServerConfig::OperIndex::const_iterator i = ServerInstance->Config->oper_blocks.begin(); i != ServerInstance->Config->oper_blocks.end(); ++i)
311 OperInfo* ifo = i->second;
312 std::string fp = ifo->oper_block->getString("fingerprint");
313 if (MatchFP(cert, fp) && ifo->oper_block->getBool("autologin"))
318 ModResult OnSetConnectClass(LocalUser* user, ConnectClass* myclass) CXX11_OVERRIDE
320 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
322 const std::string requiressl = myclass->config->getString("requiressl");
323 if (stdalgo::string::equalsci(requiressl, "trusted"))
325 ok = (cert && cert->IsCAVerified());
326 ServerInstance->Logs->Log("CONNECTCLASS", LOG_DEBUG, "Class requires a trusted TLS (SSL) client certificate. Client %s one.", (ok ? "has" : "does not have"));
328 else if (myclass->config->getBool("requiressl"))
331 ServerInstance->Logs->Log("CONNECTCLASS", LOG_DEBUG, "Class requires a secure connection. Client %s on a secure connection.", (ok ? "is" : "is not"));
337 return MOD_RES_PASSTHRU;
340 void OnWebIRCAuth(LocalUser* user, const WebIRC::FlagMap* flags) CXX11_OVERRIDE
342 // We are only interested in connection flags. If none have been
343 // given then we have nothing to do.
347 // We only care about the tls connection flag if the connection
348 // between the gateway and the server is secure.
349 if (!cmd.sslapi.GetCertificate(user))
352 WebIRC::FlagMap::const_iterator iter = flags->find("secure");
353 if (iter == flags->end())
355 // If this is not set then the connection between the client and
356 // the gateway is not secure.
357 cmd.sslapi.nosslext.set(user, 1);
358 cmd.sslapi.sslext.unset(user);
362 // Create a fake ssl_cert for the user.
363 ssl_cert* cert = new ssl_cert;
364 cert->error = "WebIRC users can not specify valid certs yet";
365 cert->invalid = true;
366 cert->revoked = true;
367 cert->trusted = false;
368 cert->unknownsigner = true;
369 cmd.sslapi.SetCertificate(user, cert);
373 MODULE_INIT(ModuleSSLInfo)