2 * InspIRCd -- Internet Relay Chat Daemon
4 * Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
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/>.
21 #include "modules/ssl.h"
22 #include "modules/webirc.h"
23 #include "modules/whois.h"
24 #include "modules/who.h"
29 RPL_WHOISCERTFP = 276,
35 class SSLCertExt : public ExtensionItem
38 SSLCertExt(Module* parent)
39 : ExtensionItem("ssl_cert", ExtensionItem::EXT_USER, parent)
43 ssl_cert* get(const Extensible* item) const
45 return static_cast<ssl_cert*>(get_raw(item));
48 void set(Extensible* item, ssl_cert* value)
50 value->refcount_inc();
51 ssl_cert* old = static_cast<ssl_cert*>(set_raw(item, value));
52 if (old && old->refcount_dec())
56 void unset(Extensible* container)
58 free(container, unset_raw(container));
61 std::string ToNetwork(const Extensible* container, void* item) const CXX11_OVERRIDE
63 return static_cast<ssl_cert*>(item)->GetMetaLine();
66 void FromNetwork(Extensible* container, const std::string& value) CXX11_OVERRIDE
68 ssl_cert* cert = new ssl_cert;
71 std::stringstream s(value);
75 cert->invalid = (v.find('v') != std::string::npos);
76 cert->trusted = (v.find('T') != std::string::npos);
77 cert->revoked = (v.find('R') != std::string::npos);
78 cert->unknownsigner = (v.find('s') != std::string::npos);
79 if (v.find('E') != std::string::npos)
81 getline(s,cert->error,'\n');
85 getline(s,cert->fingerprint,' ');
86 getline(s,cert->dn,' ');
87 getline(s,cert->issuer,'\n');
91 void free(Extensible* container, void* item) CXX11_OVERRIDE
93 ssl_cert* old = static_cast<ssl_cert*>(item);
94 if (old && old->refcount_dec())
99 class UserCertificateAPIImpl : public UserCertificateAPIBase
102 LocalIntExt nosslext;
105 UserCertificateAPIImpl(Module* mod)
106 : UserCertificateAPIBase(mod)
107 , nosslext("no_ssl_cert", ExtensionItem::EXT_USER, mod)
112 ssl_cert* GetCertificate(User* user) CXX11_OVERRIDE
114 ssl_cert* cert = sslext.get(user);
118 LocalUser* luser = IS_LOCAL(user);
119 if (!luser || nosslext.get(luser))
122 cert = SSLClientCert::GetCertificate(&luser->eh);
126 SetCertificate(user, cert);
130 void SetCertificate(User* user, ssl_cert* cert) CXX11_OVERRIDE
132 ServerInstance->Logs->Log(MODNAME, LOG_DEBUG, "Setting SSL certificate for %s: %s",
133 user->GetFullHost().c_str(), cert->GetMetaLine().c_str());
134 sslext.set(user, cert);
138 class CommandSSLInfo : public Command
141 UserCertificateAPIImpl sslapi;
143 CommandSSLInfo(Module* Creator)
144 : Command(Creator, "SSLINFO", 1)
147 this->syntax = "<nick>";
150 CmdResult Handle(User* user, const Params& parameters) CXX11_OVERRIDE
152 User* target = ServerInstance->FindNickOnly(parameters[0]);
154 if ((!target) || (target->registered != REG_ALL))
156 user->WriteNumeric(Numerics::NoSuchNick(parameters[0]));
159 bool operonlyfp = ServerInstance->Config->ConfValue("sslinfo")->getBool("operonly");
160 if (operonlyfp && !user->IsOper() && target != user)
162 user->WriteNotice("*** You cannot view SSL certificate information for other users");
165 ssl_cert* cert = sslapi.GetCertificate(target);
168 user->WriteNotice("*** No SSL certificate for this user");
170 else if (cert->GetError().length())
172 user->WriteNotice("*** No SSL certificate information for this user (" + cert->GetError() + ").");
176 user->WriteNotice("*** Distinguished Name: " + cert->GetDN());
177 user->WriteNotice("*** Issuer: " + cert->GetIssuer());
178 user->WriteNotice("*** Key Fingerprint: " + cert->GetFingerprint());
186 , public WebIRC::EventListener
187 , public Whois::EventListener
188 , public Who::EventListener
193 bool MatchFP(ssl_cert* const cert, const std::string& fp) const
195 return irc::spacesepstream(fp).Contains(cert->GetFingerprint());
200 : WebIRC::EventListener(this)
201 , Whois::EventListener(this)
202 , Who::EventListener(this)
207 Version GetVersion() CXX11_OVERRIDE
209 return Version("SSL Certificate Utilities", VF_VENDOR);
212 void OnWhois(Whois::Context& whois) CXX11_OVERRIDE
214 ssl_cert* cert = cmd.sslapi.GetCertificate(whois.GetTarget());
217 whois.SendLine(RPL_WHOISSECURE, "is using a secure connection");
218 bool operonlyfp = ServerInstance->Config->ConfValue("sslinfo")->getBool("operonly");
219 if ((!operonlyfp || whois.IsSelfWhois() || whois.GetSource()->IsOper()) && !cert->fingerprint.empty())
220 whois.SendLine(RPL_WHOISCERTFP, InspIRCd::Format("has client certificate fingerprint %s", cert->fingerprint.c_str()));
224 ModResult OnWhoLine(const Who::Request& request, LocalUser* source, User* user, Membership* memb, Numeric::Numeric& numeric) CXX11_OVERRIDE
227 if (!request.GetFieldIndex('f', flag_index))
228 return MOD_RES_PASSTHRU;
230 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
232 numeric.GetParams()[flag_index].push_back('s');
234 return MOD_RES_PASSTHRU;
237 ModResult OnPreCommand(std::string& command, CommandBase::Params& parameters, LocalUser* user, bool validated) CXX11_OVERRIDE
239 if ((command == "OPER") && (validated))
241 ServerConfig::OperIndex::const_iterator i = ServerInstance->Config->oper_blocks.find(parameters[0]);
242 if (i != ServerInstance->Config->oper_blocks.end())
244 OperInfo* ifo = i->second;
245 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
247 if (ifo->oper_block->getBool("sslonly") && !cert)
249 user->WriteNumeric(ERR_NOOPERHOST, "This oper login requires an SSL connection.");
250 user->CommandFloodPenalty += 10000;
254 std::string fingerprint;
255 if (ifo->oper_block->readString("fingerprint", fingerprint) && (!cert || !MatchFP(cert, fingerprint)))
257 user->WriteNumeric(ERR_NOOPERHOST, "This oper login requires a matching SSL certificate fingerprint.");
258 user->CommandFloodPenalty += 10000;
264 // Let core handle it for extra stuff
265 return MOD_RES_PASSTHRU;
268 void OnPostConnect(User* user) CXX11_OVERRIDE
270 LocalUser* const localuser = IS_LOCAL(user);
274 const SSLIOHook* const ssliohook = SSLIOHook::IsSSL(&localuser->eh);
275 if (!ssliohook || cmd.sslapi.nosslext.get(localuser))
278 ssl_cert* const cert = ssliohook->GetCertificate();
281 std::string text = "*** You are connected to ";
282 if (!ssliohook->GetServerName(text))
283 text.append(ServerInstance->Config->ServerName);
284 text.append(" using SSL cipher '");
285 ssliohook->GetCiphersuite(text);
286 text.push_back('\'');
287 if ((cert) && (!cert->GetFingerprint().empty()))
288 text.append(" and your SSL certificate fingerprint is ").append(cert->GetFingerprint());
289 user->WriteNotice(text);
294 // find an auto-oper block for this user
295 for (ServerConfig::OperIndex::const_iterator i = ServerInstance->Config->oper_blocks.begin(); i != ServerInstance->Config->oper_blocks.end(); ++i)
297 OperInfo* ifo = i->second;
298 std::string fp = ifo->oper_block->getString("fingerprint");
299 if (MatchFP(cert, fp) && ifo->oper_block->getBool("autologin"))
304 ModResult OnSetConnectClass(LocalUser* user, ConnectClass* myclass) CXX11_OVERRIDE
306 ssl_cert* cert = cmd.sslapi.GetCertificate(user);
308 if (myclass->config->getString("requiressl") == "trusted")
310 ok = (cert && cert->IsCAVerified());
311 ServerInstance->Logs->Log("CONNECTCLASS", LOG_DEBUG, "Class requires a trusted SSL cert. Client %s one.", (ok ? "has" : "does not have"));
313 else if (myclass->config->getBool("requiressl"))
316 ServerInstance->Logs->Log("CONNECTCLASS", LOG_DEBUG, "Class requires SSL. Client %s using SSL.", (ok ? "is" : "is not"));
321 return MOD_RES_PASSTHRU;
324 void OnWebIRCAuth(LocalUser* user, const WebIRC::FlagMap* flags) CXX11_OVERRIDE
326 // We are only interested in connection flags. If none have been
327 // given then we have nothing to do.
331 // We only care about the tls connection flag if the connection
332 // between the gateway and the server is secure.
333 if (!cmd.sslapi.GetCertificate(user))
336 WebIRC::FlagMap::const_iterator iter = flags->find("secure");
337 if (iter == flags->end())
339 // If this is not set then the connection between the client and
340 // the gateway is not secure.
341 cmd.sslapi.nosslext.set(user, 1);
342 cmd.sslapi.sslext.unset(user);
346 // Create a fake ssl_cert for the user.
347 ssl_cert* cert = new ssl_cert;
348 cert->error = "WebIRC users can not specify valid certs yet";
349 cert->invalid = true;
350 cert->revoked = true;
351 cert->trusted = false;
352 cert->unknownsigner = true;
353 cmd.sslapi.SetCertificate(user, cert);
357 MODULE_INIT(ModuleSSLInfo)