2 * InspIRCd -- Internet Relay Chat Daemon
4 * Copyright (C) 2011 Pierre Carrier <pierre@spotify.com>
5 * Copyright (C) 2009-2010 Robin Burchell <robin+git@viroteck.net>
6 * Copyright (C) 2009 Daniel De Graaf <danieldg@inspircd.org>
7 * Copyright (C) 2008 Pippijn van Steenhoven <pip88nl@gmail.com>
8 * Copyright (C) 2008 Craig Edwards <craigedwards@brainbox.cc>
9 * Copyright (C) 2008 Dennis Friis <peavey@inspircd.org>
10 * Copyright (C) 2007 Carsten Valdemar Munk <carsten.munk+inspircd@gmail.com>
12 * This file is part of InspIRCd. InspIRCd is free software: you can
13 * redistribute it and/or modify it under the terms of the GNU General Public
14 * License as published by the Free Software Foundation, version 2.
16 * This program is distributed in the hope that it will be useful, but WITHOUT
17 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
18 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
21 * You should have received a copy of the GNU General Public License
22 * along with this program. If not, see <http://www.gnu.org/licenses/>.
34 # pragma comment(lib, "ldap.lib")
35 # pragma comment(lib, "lber.lib")
38 /* $LinkerFlags: -lldap */
44 RAIILDAPString(char *Str)
59 operator std::string()
65 struct RAIILDAPMessage
81 operator LDAPMessage*()
86 LDAPMessage **operator &()
94 class ModuleLDAPAuth : public Module
96 LocalIntExt ldapAuthed;
97 LocalStringExt ldapVhost;
99 std::string attribute;
100 std::string ldapserver;
101 std::string allowpattern;
102 std::string killreason;
103 std::string username;
104 std::string password;
106 std::vector<std::string> whitelistedcidrs;
107 std::vector<std::pair<std::string, std::string> > requiredattributes;
115 : ldapAuthed("ldapauth", this)
116 , ldapVhost("ldapauth_vhost", this)
121 void init() CXX11_OVERRIDE
123 ServerInstance->Modules->AddService(ldapAuthed);
124 ServerInstance->Modules->AddService(ldapVhost);
125 Implementation eventlist[] = { I_OnCheckReady, I_OnRehash,I_OnUserRegister, I_OnUserConnect };
126 ServerInstance->Modules->Attach(eventlist, this, sizeof(eventlist)/sizeof(Implementation));
133 ldap_unbind_ext(conn, NULL, NULL);
136 void OnRehash(User* user) CXX11_OVERRIDE
138 ConfigTag* tag = ServerInstance->Config->ConfValue("ldapauth");
139 whitelistedcidrs.clear();
140 requiredattributes.clear();
142 base = tag->getString("baserdn");
143 attribute = tag->getString("attribute");
144 ldapserver = tag->getString("server");
145 allowpattern = tag->getString("allowpattern");
146 killreason = tag->getString("killreason");
147 std::string scope = tag->getString("searchscope");
148 username = tag->getString("binddn");
149 password = tag->getString("bindauth");
150 vhost = tag->getString("host");
151 verbose = tag->getBool("verbose"); /* Set to true if failed connects should be reported to operators */
152 useusername = tag->getBool("userfield");
154 ConfigTagList whitelisttags = ServerInstance->Config->ConfTags("ldapwhitelist");
156 for (ConfigIter i = whitelisttags.first; i != whitelisttags.second; ++i)
158 std::string cidr = i->second->getString("cidr");
160 whitelistedcidrs.push_back(cidr);
164 ConfigTagList attributetags = ServerInstance->Config->ConfTags("ldaprequire");
166 for (ConfigIter i = attributetags.first; i != attributetags.second; ++i)
168 const std::string attr = i->second->getString("attribute");
169 const std::string val = i->second->getString("value");
171 if (!attr.empty() && !val.empty())
172 requiredattributes.push_back(make_pair(attr, val));
176 searchscope = LDAP_SCOPE_BASE;
177 else if (scope == "onelevel")
178 searchscope = LDAP_SCOPE_ONELEVEL;
179 else searchscope = LDAP_SCOPE_SUBTREE;
187 ldap_unbind_ext(conn, NULL, NULL);
188 int res, v = LDAP_VERSION3;
189 res = ldap_initialize(&conn, ldapserver.c_str());
190 if (res != LDAP_SUCCESS)
193 ServerInstance->SNO->WriteToSnoMask('c', "LDAP connection failed: %s", ldap_err2string(res));
198 res = ldap_set_option(conn, LDAP_OPT_PROTOCOL_VERSION, (void *)&v);
199 if (res != LDAP_SUCCESS)
202 ServerInstance->SNO->WriteToSnoMask('c', "LDAP set protocol to v3 failed: %s", ldap_err2string(res));
203 ldap_unbind_ext(conn, NULL, NULL);
210 std::string SafeReplace(const std::string &text, std::map<std::string,
211 std::string> &replacements)
214 result.reserve(text.length());
216 for (unsigned int i = 0; i < text.length(); ++i) {
219 // find the first nonalpha
221 unsigned int start = i;
223 while (i < text.length() - 1 && isalpha(text[i + 1]))
226 std::string key = text.substr(start, (i - start) + 1);
227 result.append(replacements[key]);
236 void OnUserConnect(LocalUser *user) CXX11_OVERRIDE
238 std::string* cc = ldapVhost.get(user);
241 user->ChangeDisplayedHost(cc->c_str());
242 ldapVhost.unset(user);
246 ModResult OnUserRegister(LocalUser* user) CXX11_OVERRIDE
248 if ((!allowpattern.empty()) && (InspIRCd::Match(user->nick,allowpattern)))
250 ldapAuthed.set(user,1);
251 return MOD_RES_PASSTHRU;
254 for (std::vector<std::string>::iterator i = whitelistedcidrs.begin(); i != whitelistedcidrs.end(); i++)
256 if (InspIRCd::MatchCIDR(user->GetIPString(), *i, ascii_case_insensitive_map))
258 ldapAuthed.set(user,1);
259 return MOD_RES_PASSTHRU;
263 if (!CheckCredentials(user))
265 ServerInstance->Users->QuitUser(user, killreason);
268 return MOD_RES_PASSTHRU;
271 bool CheckCredentials(LocalUser* user)
277 if (user->password.empty())
280 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (No password provided)", user->GetFullRealHost().c_str());
285 // bind anonymously if no bind DN and authentication are given in the config
287 cred.bv_val = const_cast<char*>(password.c_str());
288 cred.bv_len = password.length();
290 if ((res = ldap_sasl_bind_s(conn, username.c_str(), LDAP_SASL_SIMPLE, &cred, NULL, NULL, NULL)) != LDAP_SUCCESS)
292 if (res == LDAP_SERVER_DOWN)
294 // Attempt to reconnect if the connection dropped
296 ServerInstance->SNO->WriteToSnoMask('a', "LDAP server has gone away - reconnecting...");
298 res = ldap_sasl_bind_s(conn, username.c_str(), LDAP_SASL_SIMPLE, &cred, NULL, NULL, NULL);
301 if (res != LDAP_SUCCESS)
304 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (LDAP bind failed: %s)", user->GetFullRealHost().c_str(), ldap_err2string(res));
305 ldap_unbind_ext(conn, NULL, NULL);
312 std::string what = (attribute + "=" + (useusername ? user->ident : user->nick));
313 if ((res = ldap_search_ext_s(conn, base.c_str(), searchscope, what.c_str(), NULL, 0, NULL, NULL, NULL, 0, &msg)) != LDAP_SUCCESS)
315 // Do a second search, based on password, if it contains a :
316 // That is, PASS <user>:<password> will work.
317 size_t pos = user->password.find(":");
318 if (pos != std::string::npos)
320 // manpage says we must deallocate regardless of success or failure
321 // since we're about to do another query (and reset msg), first
325 std::string cutpassword = user->password.substr(0, pos);
326 res = ldap_search_ext_s(conn, base.c_str(), searchscope, cutpassword.c_str(), NULL, 0, NULL, NULL, NULL, 0, &msg);
328 if (res == LDAP_SUCCESS)
330 // Trim the user: prefix, leaving just 'pass' for later password check
331 user->password = user->password.substr(pos + 1);
335 // It may have found based on user:pass check above.
336 if (res != LDAP_SUCCESS)
339 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (LDAP search failed: %s)", user->GetFullRealHost().c_str(), ldap_err2string(res));
343 if (ldap_count_entries(conn, msg) > 1)
346 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (LDAP search returned more than one result: %s)", user->GetFullRealHost().c_str(), ldap_err2string(res));
351 if ((entry = ldap_first_entry(conn, msg)) == NULL)
354 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (LDAP search returned no results: %s)", user->GetFullRealHost().c_str(), ldap_err2string(res));
357 cred.bv_val = (char*)user->password.data();
358 cred.bv_len = user->password.length();
359 RAIILDAPString DN(ldap_get_dn(conn, entry));
360 if ((res = ldap_sasl_bind_s(conn, DN, LDAP_SASL_SIMPLE, &cred, NULL, NULL, NULL)) != LDAP_SUCCESS)
363 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (%s)", user->GetFullRealHost().c_str(), ldap_err2string(res));
367 if (!requiredattributes.empty())
371 for (std::vector<std::pair<std::string, std::string> >::const_iterator it = requiredattributes.begin(); it != requiredattributes.end(); ++it)
373 const std::string &attr = it->first;
374 const std::string &val = it->second;
376 struct berval attr_value;
377 attr_value.bv_val = const_cast<char*>(val.c_str());
378 attr_value.bv_len = val.length();
380 ServerInstance->Logs->Log("m_ldapauth", LOG_DEBUG, "LDAP compare: %s=%s", attr.c_str(), val.c_str());
382 authed = (ldap_compare_ext_s(conn, DN, attr.c_str(), &attr_value, NULL, NULL) == LDAP_COMPARE_TRUE);
391 ServerInstance->SNO->WriteToSnoMask('c', "Forbidden connection from %s (Lacks required LDAP attributes)", user->GetFullRealHost().c_str());
398 irc::commasepstream stream(DN);
400 // mashed map of key:value parts of the DN
401 std::map<std::string, std::string> dnParts;
404 while (stream.GetToken(dnPart))
406 std::string::size_type pos = dnPart.find('=');
407 if (pos == std::string::npos) // malformed
410 std::string key = dnPart.substr(0, pos);
411 std::string value = dnPart.substr(pos + 1, dnPart.length() - pos + 1); // +1s to skip the = itself
412 dnParts[key] = value;
415 // change host according to config key
416 ldapVhost.set(user, SafeReplace(vhost, dnParts));
419 ldapAuthed.set(user,1);
423 ModResult OnCheckReady(LocalUser* user) CXX11_OVERRIDE
425 return ldapAuthed.get(user) ? MOD_RES_PASSTHRU : MOD_RES_DENY;
428 Version GetVersion() CXX11_OVERRIDE
430 return Version("Allow/Deny connections based upon answer from LDAP server", VF_VENDOR);
434 MODULE_INIT(ModuleLDAPAuth)