1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd: (C) 2002-2008 InspIRCd Development Team
6 * See: http://www.inspircd.org/wiki/index.php/Credits
8 * This program is free but copyrighted software; see
9 * the file COPYING for details.
11 * ---------------------------------------------------
14 /* $ModDesc: Allows for hashed oper passwords */
15 /* $ModDep: m_hash.h */
20 typedef std::map<irc::string, Module*> hashymodules;
24 class CommandMkpasswd : public Command
27 hashymodules &hashers;
28 std::deque<std::string> &names;
30 CommandMkpasswd (InspIRCd* Instance, Module* S, hashymodules &h, std::deque<std::string> &n)
31 : Command(Instance,"MKPASSWD", "o", 2), Sender(S), hashers(h), names(n)
33 this->source = "m_password_hash.so";
34 syntax = "<hashtype> <any-text>";
37 void MakeHash(User* user, const char* algo, const char* stuff)
39 /* Lets see if they gave us an algorithm which has been implemented */
40 hashymodules::iterator x = hashers.find(algo);
41 if (x != hashers.end())
43 /* Yup, reset it first (Always ALWAYS do this) */
44 HashResetRequest(Sender, x->second).Send();
45 /* Now attempt to generate a hash */
46 user->WriteServ("NOTICE %s :%s hashed password for %s is %s",user->nick.c_str(), algo, stuff, HashSumRequest(Sender, x->second, stuff).Send() );
48 else if (names.empty())
50 /* same idea as bug #569 */
51 user->WriteServ("NOTICE %s :No hash provider modules are loaded", user->nick.c_str());
55 /* I dont do flying, bob. */
56 user->WriteServ("NOTICE %s :Unknown hash type, valid hash types are: %s", user->nick.c_str(), irc::stringjoiner(", ", names, 0, names.size() - 1).GetJoined().c_str() );
60 CmdResult Handle (const std::vector<std::string>& parameters, User *user)
62 MakeHash(user, parameters[0].c_str(), parameters[1].c_str());
63 /* NOTE: Don't propagate this across the network!
64 * We dont want plaintext passes going all over the place...
65 * To make sure it goes nowhere, return CMD_FAILURE!
71 class ModuleOperHash : public Module
74 CommandMkpasswd* mycommand;
75 hashymodules hashers; /* List of modules which implement HashRequest */
76 std::deque<std::string> names; /* Module names which implement HashRequest */
78 bool diduseiface; /* If we've called UseInterface yet. */
81 ModuleOperHash(InspIRCd* Me)
86 /* Read the config file first */
90 /* Find all modules which implement the interface 'HashRequest' */
91 modulelist* ml = ServerInstance->Modules->FindInterface("HashRequest");
93 /* Did we find any modules? */
96 /* Yes, enumerate them all to find out the hashing algorithm name */
97 for (modulelist::iterator m = ml->begin(); m != ml->end(); m++)
99 /* Make a request to it for its name, its implementing
100 * HashRequest so we know its safe to do this
102 std::string name = HashNameRequest(this, *m).Send();
103 /* Build a map of them */
104 hashers[name.c_str()] = *m;
105 names.push_back(name);
107 /* UseInterface doesn't do anything if there are no providers, so we'll have to call it later if a module gets loaded later on. */
108 ServerInstance->Modules->UseInterface("HashRequest");
112 mycommand = new CommandMkpasswd(ServerInstance, this, hashers, names);
113 ServerInstance->AddCommand(mycommand);
114 Implementation eventlist[] = { I_OnPassCompare, I_OnLoadModule };
115 ServerInstance->Modules->Attach(eventlist, this, 2);
118 virtual ~ModuleOperHash()
120 if (diduseiface) ServerInstance->Modules->DoneWithInterface("HashRequest");
124 virtual void OnLoadModule(Module* mod, const std::string& name)
126 if (ServerInstance->Modules->ModuleHasInterface(mod, "HashRequest"))
128 ServerInstance->Logs->Log("m_password-hash",DEBUG, "Post-load registering hasher: %s", name.c_str());
129 std::string sname = HashNameRequest(this, mod).Send();
130 hashers[sname.c_str()] = mod;
131 names.push_back(sname);
134 ServerInstance->Modules->UseInterface("HashRequest");
140 virtual int OnPassCompare(Extensible* ex, const std::string &data, const std::string &input, const std::string &hashtype)
142 /* First, lets see what hash theyre using on this oper */
143 hashymodules::iterator x = hashers.find(hashtype.c_str());
145 /* Is this a valid hash name? (case insensitive) */
146 if (x != hashers.end())
148 /* Reset the hashing module */
149 HashResetRequest(this, x->second).Send();
150 /* Compare the hash in the config to the generated hash */
151 if (!strcasecmp(data.c_str(), HashSumRequest(this, x->second, input.c_str()).Send()))
153 /* No match, and must be hashed, forbid */
157 /* Not a hash, fall through to strcmp in core */
161 virtual Version GetVersion()
163 return Version("$Id$",VF_VENDOR,API_VERSION);
167 MODULE_INIT(ModuleOperHash)