1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd: (C) 2002-2010 InspIRCd Development Team
6 * See: http://wiki.inspircd.org/Credits
8 * This program is free but copyrighted software; see
9 * the file COPYING for details.
11 * ---------------------------------------------------
17 /* $ModDesc: Provides SSL metadata, including /WHOIS information and /SSLINFO command */
19 class SSLCertExt : public ExtensionItem {
21 SSLCertExt(Module* parent) : ExtensionItem("ssl_cert", parent) {}
22 ssl_cert* get(const Extensible* item) const
24 return static_cast<ssl_cert*>(get_raw(item));
26 void set(Extensible* item, ssl_cert* value)
28 value->refcount_inc();
29 ssl_cert* old = static_cast<ssl_cert*>(set_raw(item, value));
30 if (old && old->refcount_dec())
34 std::string serialize(SerializeFormat format, const Extensible* container, void* item) const
36 return static_cast<ssl_cert*>(item)->GetMetaLine();
39 void unserialize(SerializeFormat format, Extensible* container, const std::string& value)
41 ssl_cert* cert = new ssl_cert;
44 std::stringstream s(value);
48 cert->invalid = (v.find('v') != std::string::npos);
49 cert->trusted = (v.find('T') != std::string::npos);
50 cert->revoked = (v.find('R') != std::string::npos);
51 cert->unknownsigner = (v.find('s') != std::string::npos);
52 if (v.find('E') != std::string::npos)
54 getline(s,cert->error,'\n');
58 getline(s,cert->fingerprint,' ');
59 getline(s,cert->dn,' ');
60 getline(s,cert->issuer,'\n');
66 ssl_cert* old = static_cast<ssl_cert*>(item);
67 if (old && old->refcount_dec())
74 class CommandSSLInfo : public Command
79 CommandSSLInfo(Module* Creator) : Command(Creator, "SSLINFO", 1), CertExt(Creator)
81 this->syntax = "<nick>";
84 CmdResult Handle (const std::vector<std::string> ¶meters, User *user)
86 User* target = ServerInstance->FindNick(parameters[0]);
90 ssl_cert* cert = CertExt.get(target);
93 if (cert->GetError().length())
95 user->WriteServ("NOTICE %s :*** No SSL certificate information for this user (%s).", user->nick.c_str(), cert->GetError().c_str());
99 user->WriteServ("NOTICE %s :*** Distinguised Name: %s", user->nick.c_str(), cert->GetDN().c_str());
100 user->WriteServ("NOTICE %s :*** Issuer: %s", user->nick.c_str(), cert->GetIssuer().c_str());
101 user->WriteServ("NOTICE %s :*** Key Fingerprint: %s", user->nick.c_str(), cert->GetFingerprint().c_str());
107 user->WriteServ("NOTICE %s :*** No SSL certificate information for this user.", user->nick.c_str());
112 user->WriteNumeric(ERR_NOSUCHNICK, "%s %s :No such nickname", user->nick.c_str(), parameters[0].c_str());
118 class ModuleSSLInfo : public Module
126 ServerInstance->AddCommand(&cmd);
128 ServerInstance->Extensions.Register(&cmd.CertExt);
130 Implementation eventlist[] = { I_OnWhois, I_OnPreCommand, I_OnSetConnectClass };
131 ServerInstance->Modules->Attach(eventlist, this, 3);
136 return Version("SSL Certificate Utilities", VF_VENDOR);
139 void OnWhois(User* source, User* dest)
141 if (cmd.CertExt.get(dest))
143 ServerInstance->SendWhoisLine(source, dest, 320, "%s %s :is using a secure connection", source->nick.c_str(), dest->nick.c_str());
147 bool OneOfMatches(const char* host, const char* ip, const char* hostlist)
149 std::stringstream hl(hostlist);
153 if (InspIRCd::Match(host, xhost, ascii_case_insensitive_map) || InspIRCd::MatchCIDR(ip, xhost, ascii_case_insensitive_map))
161 ModResult OnPreCommand(std::string &command, std::vector<std::string> ¶meters, LocalUser *user, bool validated, const std::string &original_line)
163 irc::string pcmd = command.c_str();
165 if ((pcmd == "OPER") && (validated))
167 OperIndex::iterator i = ServerInstance->Config->oper_blocks.find(parameters[0]);
168 if (i != ServerInstance->Config->oper_blocks.end())
170 OperInfo* ifo = i->second;
171 ssl_cert* cert = cmd.CertExt.get(user);
173 if (ifo->oper_block->getBool("sslonly") && !cert)
175 user->WriteNumeric(491, "%s :This oper login requires an SSL connection.", user->nick.c_str());
176 user->CommandFloodPenalty += 10000;
180 std::string fingerprint;
181 if (ifo->oper_block->readString("fingerprint", fingerprint) && (!cert || cert->GetFingerprint() != fingerprint))
183 user->WriteNumeric(491, "%s :This oper login requires a matching SSL fingerprint.",user->nick.c_str());
184 user->CommandFloodPenalty += 10000;
190 // Let core handle it for extra stuff
191 return MOD_RES_PASSTHRU;
194 ModResult OnSetConnectClass(LocalUser* user, ConnectClass* myclass)
196 if (myclass->config->getBool("requiressl") && !cmd.CertExt.get(user))
198 return MOD_RES_PASSTHRU;
201 void OnRequest(Request& request)
203 if (strcmp("GET_USER_CERT", request.id) == 0)
205 UserCertificateRequest& req = static_cast<UserCertificateRequest&>(request);
206 req.cert = cmd.CertExt.get(req.user);
208 else if (strcmp("SET_CERT", request.id) == 0)
210 SSLCertSubmission& req = static_cast<SSLCertSubmission&>(request);
211 cmd.CertExt.set(req.item, req.cert);
216 MODULE_INIT(ModuleSSLInfo)