]> git.netwichtig.de Git - user/henk/code/inspircd.git/blobdiff - src/modules/m_sasl.cpp
Include connection security with the SASL host information.
[user/henk/code/inspircd.git] / src / modules / m_sasl.cpp
index 1777fbc152160d6d58fcab1f85fcaeb812aa2ce2..0ef93ec5ae66476923dfe7eaded192dba54711df 100644 (file)
-/*       +------------------------------------+
- *       | Inspire Internet Relay Chat Daemon |
- *       +------------------------------------+
+/*
+ * InspIRCd -- Internet Relay Chat Daemon
  *
- *  InspIRCd: (C) 2002-2009 InspIRCd Development Team
- * See: http://wiki.inspircd.org/Credits
+ *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
+ *   Copyright (C) 2008 Craig Edwards <craigedwards@brainbox.cc>
  *
- * This program is free but copyrighted software; see
- *         the file COPYING for details.
+ * This file is part of InspIRCd.  InspIRCd is free software: you can
+ * redistribute it and/or modify it under the terms of the GNU General Public
+ * License as published by the Free Software Foundation, version 2.
  *
- * ---------------------------------------------------
+ * This program is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
+
 #include "inspircd.h"
 #include "m_cap.h"
 #include "account.h"
+#include "sasl.h"
+#include "ssl.h"
 
 /* $ModDesc: Provides support for IRC Authentication Layer (aka: atheme SASL) via AUTHENTICATE. */
 
 enum SaslState { SASL_INIT, SASL_COMM, SASL_DONE };
 enum SaslResult { SASL_OK, SASL_FAIL, SASL_ABORT };
 
+static std::string sasl_target = "*";
+
+static void SendSASL(const parameterlist& params)
+{
+       if (!ServerInstance->PI->SendEncapsulatedData(params))
+       {
+               SASLFallback(NULL, params);
+       }
+}
+
 /**
  * Tracks SASL authentication state like charybdis does. --nenolod
  */
-class SaslAuthenticator : public classbase
+class SaslAuthenticator
 {
  private:
-       InspIRCd *ServerInstance;
-       Module *Creator;
        std::string agent;
        User *user;
        SaslState state;
        SaslResult result;
        bool state_announced;
 
- public:
-       SaslAuthenticator(User *user_, std::string method, InspIRCd *instance, Module *ctor)
-               : ServerInstance(instance), Creator(ctor), user(user_), state(SASL_INIT), state_announced(false)
+       /* taken from m_services_account */
+       static bool ReadCGIIRCExt(const char* extname, User* user, std::string& out)
        {
-               this->user->Extend("sasl_authenticator", this);
+               ExtensionItem* wiext = ServerInstance->Extensions.GetItem(extname);
+               if (!wiext)
+                       return false;
 
-               std::deque<std::string> params;
+               if (wiext->creator->ModuleSourceFile != "m_cgiirc.so")
+                       return false;
+
+               StringExtItem* stringext = static_cast<StringExtItem*>(wiext);
+               std::string* addr = stringext->get(user);
+               if (!addr)
+                       return false;
+
+               out = *addr;
+               return true;
+       }
+
+
+       void SendHostIP()
+       {
+               std::string host, ip;
+
+               if (!ReadCGIIRCExt("cgiirc_webirc_hostname", user, host))
+               {
+                       host = user->host;
+               }
+               if (!ReadCGIIRCExt("cgiirc_webirc_ip", user, ip))
+               {
+                       ip = user->GetIPString();
+               }
+               else
+               {
+                       /* IP addresses starting with a : on irc are a Bad Thing (tm) */
+                       if (ip.c_str()[0] == ':')
+                               ip.insert(ip.begin(),1,'0');
+               }
+
+               parameterlist params;
+               params.push_back(sasl_target);
+               params.push_back("SASL");
+               params.push_back(user->uuid);
                params.push_back("*");
+               params.push_back("H");
+               params.push_back(host);
+               params.push_back(ip);
+
+               LocalUser* lu = IS_LOCAL(user);
+               if (lu)
+               {
+                       // NOTE: SaslAuthenticator instances are only created for local
+                       // users so this parameter will always be appended.
+                       SocketCertificateRequest req(&lu->eh, ServerInstance->Modules->Find("m_sasl.so"));
+                       params.push_back(req.cert ? "S" : "P");
+               }
+
+               SendSASL(params);
+       }
+
+ public:
+       SaslAuthenticator(User* user_, const std::string& method)
+               : user(user_), state(SASL_INIT), state_announced(false)
+       {
+               SendHostIP();
+
+               parameterlist params;
+               params.push_back(sasl_target);
                params.push_back("SASL");
                params.push_back(user->uuid);
                params.push_back("*");
                params.push_back("S");
                params.push_back(method);
 
-               ServerInstance->PI->SendEncapsulatedData(params);
+               if (method == "EXTERNAL" && IS_LOCAL(user_))
+               {
+                       SocketCertificateRequest req(&((LocalUser*)user_)->eh, ServerInstance->Modules->Find("m_sasl.so"));
+                       std::string fp = req.GetFingerprint();
+
+                       if (fp.size())
+                               params.push_back(fp);
+               }
+
+               SendSASL(params);
        }
 
-       SaslResult GetSaslResult(std::string &result_)
+       SaslResult GetSaslResult(const std::string &result_)
        {
                if (result_ == "F")
                        return SASL_FAIL;
@@ -63,26 +149,32 @@ class SaslAuthenticator : public classbase
        }
 
        /* checks for and deals with a state change. */
-       SaslState ProcessInboundMessage(std::deque<std::string> &msg)
+       SaslState ProcessInboundMessage(const std::vector<std::string> &msg)
        {
                switch (this->state)
                {
                 case SASL_INIT:
-                       this->agent = msg[2];
-                       this->user->Write("AUTHENTICATE %s", msg[5].c_str());
+                       this->agent = msg[0];
                        this->state = SASL_COMM;
-                       break;
+                       /* fall through */
                 case SASL_COMM:
-                       if (msg[2] != this->agent)
+                       if (msg[0] != this->agent)
                                return this->state;
 
-                       if (msg[4] != "D")
-                               this->user->Write("AUTHENTICATE %s", msg[5].c_str());
-                       else
+                       if (msg.size() < 4)
+                               return this->state;
+
+                       if (msg[2] == "C")
+                               this->user->Write("AUTHENTICATE %s", msg[3].c_str());
+                       else if (msg[2] == "D")
                        {
                                this->state = SASL_DONE;
-                               this->result = this->GetSaslResult(msg[5]);
+                               this->result = this->GetSaslResult(msg[3]);
                        }
+                       else if (msg[2] == "M")
+                               this->user->WriteNumeric(908, "%s %s :are available SASL mechanisms", this->user->nick.c_str(), msg[3].c_str());
+                       else
+                               ServerInstance->Logs->Log("m_sasl", DEFAULT, "Services sent an unknown SASL message \"%s\" \"%s\"", msg[2].c_str(), msg[3].c_str());
 
                        break;
                 case SASL_DONE:
@@ -106,8 +198,8 @@ class SaslAuthenticator : public classbase
                if (this->state != SASL_COMM)
                        return true;
 
-               std::deque<std::string> params;
-               params.push_back("*");
+               parameterlist params;
+               params.push_back(sasl_target);
                params.push_back("SASL");
                params.push_back(this->user->uuid);
                params.push_back(this->agent);
@@ -115,9 +207,9 @@ class SaslAuthenticator : public classbase
 
                params.insert(params.end(), parameters.begin(), parameters.end());
 
-               ServerInstance->PI->SendEncapsulatedData(params);
+               SendSASL(params);
 
-               if (parameters[0][0] == '*')
+               if (parameters[0].c_str()[0] == '*')
                {
                        this->Abort();
                        return false;
@@ -148,21 +240,18 @@ class SaslAuthenticator : public classbase
 
                this->state_announced = true;
        }
-
-       ~SaslAuthenticator()
-       {
-               this->user->Shrink("sasl_authenticator");
-               this->AnnounceState();
-       }
 };
 
 class CommandAuthenticate : public Command
 {
-       Module* Creator;
  public:
-       CommandAuthenticate (InspIRCd* Instance, Module* creator) : Command(Instance,"AUTHENTICATE", 0, 1, true), Creator(creator)
+       SimpleExtItem<SaslAuthenticator>& authExt;
+       GenericCap& cap;
+       CommandAuthenticate(Module* Creator, SimpleExtItem<SaslAuthenticator>& ext, GenericCap& Cap)
+               : Command(Creator, "AUTHENTICATE", 1), authExt(ext), cap(Cap)
        {
-               this->source = "m_sasl.so";
+               works_before_reg = true;
+               allow_empty_last_param = false;
        }
 
        CmdResult Handle (const std::vector<std::string>& parameters, User *user)
@@ -170,118 +259,110 @@ class CommandAuthenticate : public Command
                /* Only allow AUTHENTICATE on unregistered clients */
                if (user->registered != REG_ALL)
                {
-                       if (!user->GetExt("sasl"))
+                       if (!cap.ext.get(user))
+                               return CMD_FAILURE;
+
+                       if (parameters[0].find(' ') != std::string::npos || parameters[0][0] == ':')
                                return CMD_FAILURE;
 
-                       SaslAuthenticator *sasl;
-                       if (!(user->GetExt("sasl_authenticator", sasl)))
-                               sasl = new SaslAuthenticator(user, parameters[0], ServerInstance, Creator);
+                       SaslAuthenticator *sasl = authExt.get(user);
+                       if (!sasl)
+                               authExt.set(user, new SaslAuthenticator(user, parameters[0]));
                        else if (sasl->SendClientMessage(parameters) == false)  // IAL abort extension --nenolod
-                               delete sasl;
+                       {
+                               sasl->AnnounceState();
+                               authExt.unset(user);
+                       }
                }
                return CMD_FAILURE;
        }
 };
 
-
-class ModuleSASL : public Module
+class CommandSASL : public Command
 {
-       CommandAuthenticate* sasl;
  public:
-
-       ModuleSASL(InspIRCd* Me)
-               : Module(Me)
+       SimpleExtItem<SaslAuthenticator>& authExt;
+       CommandSASL(Module* Creator, SimpleExtItem<SaslAuthenticator>& ext) : Command(Creator, "SASL", 2), authExt(ext)
        {
-               Implementation eventlist[] = { I_OnEvent, I_OnUserRegister, I_OnPostConnect, I_OnUserDisconnect, I_OnCleanup };
-               ServerInstance->Modules->Attach(eventlist, this, 5);
-
-               sasl = new CommandAuthenticate(ServerInstance, this);
-               ServerInstance->AddCommand(sasl);
-
-               if (!ServerInstance->Modules->Find("m_services_account.so") || !ServerInstance->Modules->Find("m_cap.so"))
-                       ServerInstance->Logs->Log("m_sasl", DEFAULT, "WARNING: m_services_account.so and m_cap.so are not loaded! m_sasl.so will NOT function correctly until these two modules are loaded!");
+               this->flags_needed = FLAG_SERVERONLY; // should not be called by users
        }
 
-       virtual int OnUserRegister(User *user)
+       CmdResult Handle(const std::vector<std::string>& parameters, User *user)
        {
-               SaslAuthenticator *sasl_;
-               if (user->GetExt("sasl_authenticator", sasl_))
+               User* target = ServerInstance->FindNick(parameters[1]);
+               if ((!target) || (IS_SERVER(target)))
                {
-                       sasl_->Abort();
-                       delete sasl_;
-                       user->Shrink("sasl_authenticator");
+                       ServerInstance->Logs->Log("m_sasl", DEBUG,"User not found in sasl ENCAP event: %s", parameters[1].c_str());
+                       return CMD_FAILURE;
                }
 
-               return 0;
+               SaslAuthenticator *sasl = authExt.get(target);
+               if (!sasl)
+                       return CMD_FAILURE;
+
+               SaslState state = sasl->ProcessInboundMessage(parameters);
+               if (state == SASL_DONE)
+               {
+                       sasl->AnnounceState();
+                       authExt.unset(target);
+               }
+               return CMD_SUCCESS;
        }
 
-       virtual void OnCleanup(int target_type, void *item)
+       RouteDescriptor GetRouting(User* user, const std::vector<std::string>& parameters)
        {
-               if (target_type == TYPE_USER)
-                       OnUserDisconnect((User*)item);
+               return ROUTE_BROADCAST;
        }
+};
 
-       virtual void OnUserDisconnect(User *user)
+class ModuleSASL : public Module
+{
+       SimpleExtItem<SaslAuthenticator> authExt;
+       GenericCap cap;
+       CommandAuthenticate auth;
+       CommandSASL sasl;
+ public:
+       ModuleSASL()
+               : authExt("sasl_auth", this), cap(this, "sasl"), auth(this, authExt, cap), sasl(this, authExt)
        {
-               SaslAuthenticator *sasl_;
-               if (user->GetExt("sasl_authenticator", sasl_))
-               {
-                       delete sasl_;
-                       user->Shrink("sasl_authenticator");
-               }
        }
 
-       virtual void OnPostConnect(User* user)
+       void init()
        {
-               if (!IS_LOCAL(user))
-                       return;
-
-               std::string* str = NULL;
+               OnRehash(NULL);
+               Implementation eventlist[] = { I_OnEvent, I_OnUserConnect, I_OnRehash };
+               ServerInstance->Modules->Attach(eventlist, this, sizeof(eventlist)/sizeof(Implementation));
 
-               if (user->GetExt("accountname", str))
-                       ServerInstance->PI->SendMetaData(user, TYPE_USER, "accountname", *str);
+               ServiceProvider* providelist[] = { &auth, &sasl, &authExt };
+               ServerInstance->Modules->AddServices(providelist, 3);
 
-               return;
+               if (!ServerInstance->Modules->Find("m_services_account.so") || !ServerInstance->Modules->Find("m_cap.so"))
+                       ServerInstance->Logs->Log("m_sasl", DEFAULT, "WARNING: m_services_account.so and m_cap.so are not loaded! m_sasl.so will NOT function correctly until these two modules are loaded!");
        }
 
-       virtual ~ModuleSASL()
+       void OnRehash(User*)
        {
+               sasl_target = ServerInstance->Config->ConfValue("sasl")->getString("target", "*");
        }
 
-       virtual Version GetVersion()
+       void OnUserConnect(LocalUser *user)
        {
-               return Version("$Id$",VF_VENDOR,API_VERSION);
+               SaslAuthenticator *sasl_ = authExt.get(user);
+               if (sasl_)
+               {
+                       sasl_->Abort();
+                       authExt.unset(user);
+               }
        }
 
-       virtual void OnEvent(Event *ev)
+       Version GetVersion()
        {
-               GenericCapHandler(ev, "sasl", "sasl");
-
-               if (ev->GetEventID() == "encap_received")
-               {
-                       std::deque<std::string>* parameters = (std::deque<std::string>*)ev->GetData();
-
-                       if ((*parameters)[1] != "SASL")
-                               return;
-
-                       User* target = ServerInstance->FindNick((*parameters)[3]);
-                       if (!target)
-                       {
-                               ServerInstance->Logs->Log("m_sasl", DEBUG,"User not found in sasl ENCAP event: %s", (*parameters)[3].c_str());
-                               return;
-                       }
-
-                       SaslAuthenticator *sasl_;
-                       if (!target->GetExt("sasl_authenticator", sasl_))
-                               return;
+               return Version("Provides support for IRC Authentication Layer (aka: SASL) via AUTHENTICATE.", VF_VENDOR);
+       }
 
-                       SaslState state = sasl_->ProcessInboundMessage(*parameters);
-                       if (state == SASL_DONE)
-                       {
-                               delete sasl_;
-                               target->Shrink("sasl");
-                       }
-               }
+       void OnEvent(Event &ev)
+       {
+               cap.HandleEvent(ev);
        }
 };