src/modules/m_password_hash.cpp

   1 /*
   2  * InspIRCd -- Internet Relay Chat Daemon
   3  *
   4  *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
   5  *   Copyright (C) 2008 Thomas Stagner <aquanight@inspircd.org>
   6  *
   7  * This file is part of InspIRCd.  InspIRCd is free software: you can
   8  * redistribute it and/or modify it under the terms of the GNU General Public
   9  * License as published by the Free Software Foundation, version 2.
  10  *
  11  * This program is distributed in the hope that it will be useful, but WITHOUT
  12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  13  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
  14  * details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20
  21 /* $ModDesc: Allows for hashed oper passwords */
  22
  23 #include "inspircd.h"
  24 #include "hash.h"
  25
  26 /* Handle /MKPASSWD
  27  */
  28 class CommandMkpasswd : public Command
  29 {
  30  public:
  31         CommandMkpasswd(Module* Creator) : Command(Creator, "MKPASSWD", 2)
  32         {
  33                 syntax = "<hashtype> <any-text>";
  34                 Penalty = 5;
  35         }
  36
  37         void MakeHash(User* user, const std::string& algo, const std::string& stuff)
  38         {
  39                 if (algo.substr(0,5) == "hmac-")
  40                 {
  41                         std::string type = algo.substr(5);
  42                         HashProvider* hp = ServerInstance->Modules->FindDataService<HashProvider>("hash/" + type);
  43                         if (!hp)
  44                         {
  45                                 user->WriteServ("NOTICE %s :Unknown hash type", user->nick.c_str());
  46                                 return;
  47                         }
  48                         std::string salt = ServerInstance->GenRandomStr(6, false);
  49                         std::string target = hp->hmac(salt, stuff);
  50                         std::string str = BinToBase64(salt) + "$" + BinToBase64(target, NULL, 0);
  51
  52                         user->WriteServ("NOTICE %s :%s hashed password for %s is %s",
  53                                 user->nick.c_str(), algo.c_str(), stuff.c_str(), str.c_str());
  54                         return;
  55                 }
  56                 HashProvider* hp = ServerInstance->Modules->FindDataService<HashProvider>("hash/" + algo);
  57                 if (hp)
  58                 {
  59                         /* Now attempt to generate a hash */
  60                         user->WriteServ("NOTICE %s :%s hashed password for %s is %s",
  61                                 user->nick.c_str(), algo.c_str(), stuff.c_str(), hp->hexsum(stuff).c_str());
  62                 }
  63                 else
  64                 {
  65                         user->WriteServ("NOTICE %s :Unknown hash type", user->nick.c_str());
  66                 }
  67         }
  68
  69         CmdResult Handle (const std::vector<std::string>& parameters, User *user)
  70         {
  71                 MakeHash(user, parameters[0], parameters[1]);
  72
  73                 return CMD_SUCCESS;
  74         }
  75 };
  76
  77 class ModuleOperHash : public Module
  78 {
  79         CommandMkpasswd cmd;
  80  public:
  81
  82         ModuleOperHash() : cmd(this)
  83         {
  84                 /* Read the config file first */
  85                 OnRehash(NULL);
  86
  87                 ServerInstance->AddCommand(&cmd);
  88                 Implementation eventlist[] = { I_OnPassCompare };
  89                 ServerInstance->Modules->Attach(eventlist, this, 1);
  90         }
  91
  92         virtual ModResult OnPassCompare(Extensible* ex, const std::string &data, const std::string &input, const std::string &hashtype)
  93         {
  94                 if (hashtype.substr(0,5) == "hmac-")
  95                 {
  96                         std::string type = hashtype.substr(5);
  97                         HashProvider* hp = ServerInstance->Modules->FindDataService<HashProvider>("hash/" + type);
  98                         if (!hp)
  99                                 return MOD_RES_PASSTHRU;
 100                         // this is a valid hash, from here on we either accept or deny
 101                         std::string::size_type sep = data.find('$');
 102                         if (sep == std::string::npos)
 103                                 return MOD_RES_DENY;
 104                         std::string salt = Base64ToBin(data.substr(0, sep));
 105                         std::string target = Base64ToBin(data.substr(sep + 1));
 106
 107                         if (target == hp->hmac(salt, input))
 108                                 return MOD_RES_ALLOW;
 109                         else
 110                                 return MOD_RES_DENY;
 111                 }
 112
 113                 HashProvider* hp = ServerInstance->Modules->FindDataService<HashProvider>("hash/" + hashtype);
 114
 115                 /* Is this a valid hash name? */
 116                 if (hp)
 117                 {
 118                         /* Compare the hash in the config to the generated hash */
 119                         if (data == hp->hexsum(input))
 120                                 return MOD_RES_ALLOW;
 121                         else
 122                                 /* No match, and must be hashed, forbid */
 123                                 return MOD_RES_DENY;
 124                 }
 125
 126                 /* Not a hash, fall through to strcmp in core */
 127                 return MOD_RES_PASSTHRU;
 128         }
 129
 130         virtual Version GetVersion()
 131         {
 132                 return Version("Allows for hashed oper passwords",VF_VENDOR);
 133         }
 134 };
 135
 136 MODULE_INIT(ModuleOperHash)