src/modules/m_sqlauth.cpp

   1 /*
   2  * InspIRCd -- Internet Relay Chat Daemon
   3  *
   4  *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
   5  *
   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.
   9  *
  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
  13  * details.
  14  *
  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/>.
  17  */
  18
  19
  20 #include "inspircd.h"
  21 #include "modules/sql.h"
  22 #include "modules/hash.h"
  23
  24 enum AuthState {
  25         AUTH_STATE_NONE = 0,
  26         AUTH_STATE_BUSY = 1,
  27         AUTH_STATE_FAIL = 2
  28 };
  29
  30 class AuthQuery : public SQLQuery
  31 {
  32  public:
  33         const std::string uid;
  34         LocalIntExt& pendingExt;
  35         bool verbose;
  36         AuthQuery(Module* me, const std::string& u, LocalIntExt& e, bool v)
  37                 : SQLQuery(me), uid(u), pendingExt(e), verbose(v)
  38         {
  39         }
  40
  41         void OnResult(SQLResult& res) CXX11_OVERRIDE
  42         {
  43                 User* user = ServerInstance->FindNick(uid);
  44                 if (!user)
  45                         return;
  46                 if (res.Rows())
  47                 {
  48                         pendingExt.set(user, AUTH_STATE_NONE);
  49                 }
  50                 else
  51                 {
  52                         if (verbose)
  53                                 ServerInstance->SNO->WriteGlobalSno('a', "Forbidden connection from %s (SQL query returned no matches)", user->GetFullRealHost().c_str());
  54                         pendingExt.set(user, AUTH_STATE_FAIL);
  55                 }
  56         }
  57
  58         void OnError(SQLerror& error) CXX11_OVERRIDE
  59         {
  60                 User* user = ServerInstance->FindNick(uid);
  61                 if (!user)
  62                         return;
  63                 pendingExt.set(user, AUTH_STATE_FAIL);
  64                 if (verbose)
  65                         ServerInstance->SNO->WriteGlobalSno('a', "Forbidden connection from %s (SQL query failed: %s)", user->GetFullRealHost().c_str(), error.Str());
  66         }
  67 };
  68
  69 class ModuleSQLAuth : public Module
  70 {
  71         LocalIntExt pendingExt;
  72         dynamic_reference<SQLProvider> SQL;
  73
  74         std::string freeformquery;
  75         std::string killreason;
  76         std::string allowpattern;
  77         bool verbose;
  78
  79  public:
  80         ModuleSQLAuth() : pendingExt("sqlauth-wait", this), SQL(this, "SQL")
  81         {
  82         }
  83
  84         void init() CXX11_OVERRIDE
  85         {
  86                 ServerInstance->Modules->AddService(pendingExt);
  87                 OnRehash(NULL);
  88         }
  89
  90         void OnRehash(User* user) CXX11_OVERRIDE
  91         {
  92                 ConfigTag* conf = ServerInstance->Config->ConfValue("sqlauth");
  93                 std::string dbid = conf->getString("dbid");
  94                 if (dbid.empty())
  95                         SQL.SetProvider("SQL");
  96                 else
  97                         SQL.SetProvider("SQL/" + dbid);
  98                 freeformquery = conf->getString("query");
  99                 killreason = conf->getString("killreason");
 100                 allowpattern = conf->getString("allowpattern");
 101                 verbose = conf->getBool("verbose");
 102         }
 103
 104         ModResult OnUserRegister(LocalUser* user) CXX11_OVERRIDE
 105         {
 106                 // Note this is their initial (unresolved) connect block
 107                 ConfigTag* tag = user->MyClass->config;
 108                 if (!tag->getBool("usesqlauth", true))
 109                         return MOD_RES_PASSTHRU;
 110
 111                 if (!allowpattern.empty() && InspIRCd::Match(user->nick,allowpattern))
 112                         return MOD_RES_PASSTHRU;
 113
 114                 if (pendingExt.get(user))
 115                         return MOD_RES_PASSTHRU;
 116
 117                 if (!SQL)
 118                 {
 119                         ServerInstance->SNO->WriteGlobalSno('a', "Forbiding connection from %s (SQL database not present)", user->GetFullRealHost().c_str());
 120                         ServerInstance->Users->QuitUser(user, killreason);
 121                         return MOD_RES_PASSTHRU;
 122                 }
 123
 124                 pendingExt.set(user, AUTH_STATE_BUSY);
 125
 126                 ParamM userinfo;
 127                 SQL->PopulateUserInfo(user, userinfo);
 128                 userinfo["pass"] = user->password;
 129
 130                 HashProvider* md5 = ServerInstance->Modules->FindDataService<HashProvider>("hash/md5");
 131                 if (md5)
 132                         userinfo["md5pass"] = md5->hexsum(user->password);
 133
 134                 HashProvider* sha256 = ServerInstance->Modules->FindDataService<HashProvider>("hash/sha256");
 135                 if (sha256)
 136                         userinfo["sha256pass"] = sha256->hexsum(user->password);
 137
 138                 SQL->submit(new AuthQuery(this, user->uuid, pendingExt, verbose), freeformquery, userinfo);
 139
 140                 return MOD_RES_PASSTHRU;
 141         }
 142
 143         ModResult OnCheckReady(LocalUser* user) CXX11_OVERRIDE
 144         {
 145                 switch (pendingExt.get(user))
 146                 {
 147                         case AUTH_STATE_NONE:
 148                                 return MOD_RES_PASSTHRU;
 149                         case AUTH_STATE_BUSY:
 150                                 return MOD_RES_DENY;
 151                         case AUTH_STATE_FAIL:
 152                                 ServerInstance->Users->QuitUser(user, killreason);
 153                                 return MOD_RES_DENY;
 154                 }
 155                 return MOD_RES_PASSTHRU;
 156         }
 157
 158         Version GetVersion() CXX11_OVERRIDE
 159         {
 160                 return Version("Allow/Deny connections based upon an arbitrary SQL table", VF_VENDOR);
 161         }
 162 };
 163
 164 MODULE_INIT(ModuleSQLAuth)