1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd: (C) 2002-2007 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 #include "inspircd_config.h"
15 #include "configreader.h"
23 /* $ModDesc: Provides masking of user hostnames */
24 /* $ModDep: m_hash.h */
26 /* Used to vary the output a little more depending on the cloak keys */
27 static const char* xtab[] = {"F92E45D871BCA630", "A1B9D80C72E653F4", "1ABC078934DEF562", "ABCDEF5678901234"};
29 /** Handles user mode +x
31 class CloakUser : public ModeHandler
43 CloakUser(InspIRCd* Instance, Module* Source, Module* Hash) : ModeHandler(Instance, 'x', 0, 0, false, MODETYPE_USER, false), Sender(Source), HashProvider(Hash)
47 ModeAction OnModeChange(userrec* source, userrec* dest, chanrec* channel, std::string ¶meter, bool adding)
49 /* Only opers can change other users modes */
50 if ((source != dest) && (!*source->oper))
51 return MODEACTION_DENY;
53 /* For remote clients, we dont take any action, we just allow it.
54 * The local server where they are will set their cloak instead.
57 return MODEACTION_ALLOW;
61 if(!dest->IsModeSet('x'))
63 /* The mode is being turned on - so attempt to
64 * allocate the user a cloaked host using a non-reversible
65 * algorithm (its simple, but its non-reversible so the
66 * simplicity doesnt really matter). This algorithm
67 * will not work if the user has only one level of domain
68 * naming in their hostname (e.g. if they are on a lan or
69 * are connecting via localhost) -- this doesnt matter much.
72 char* n1 = strchr(dest->host,'.');
73 char* n2 = strchr(dest->host,':');
77 /* InspIRCd users have two hostnames; A displayed
78 * hostname which can be modified by modules (e.g.
79 * to create vhosts, implement chghost, etc) and a
80 * 'real' hostname which you shouldnt write to.
83 unsigned int iv[] = { key1, key2, key3, key4 };
84 std::string a = (n1 ? n1 : n2);
88 /** Reset the Hash module, and send it our IV and hex table */
89 HashResetRequest(Sender, HashProvider).Send();
90 HashKeyRequest(Sender, HashProvider, iv).Send();
91 HashHexRequest(Sender, HashProvider, xtab[(*dest->host) % 4]);
93 /* Generate a cloak using specialized Hash */
94 std::string hostcloak = prefix + "-" + std::string(HashSumRequest(Sender, HashProvider, dest->host).Send()).substr(0,8) + a;
96 /* Fix by brain - if the cloaked host is > the max length of a host (64 bytes
97 * according to the DNS RFC) then tough titty, they get cloaked as an IP.
98 * Their ISP shouldnt go to town on subdomains, or they shouldnt have a kiddie
103 if ((dest->GetProtocolFamily() == AF_INET6) && (insp_pton(AF_INET6,dest->host,&testaddr) < 1) && (hostcloak.length() <= 64))
104 /* Invalid ipv6 address, and ipv6 user (resolved host) */
106 else if ((dest->GetProtocolFamily() == AF_INET6) && (inet_aton(dest->host,&testaddr) < 1) && (hostcloak.length() <= 64))
107 /* Invalid ipv4 address, and ipv4 user (resolved host) */
110 /* Valid ipv6 or ipv4 address (not resolved) ipv4 or ipv6 user */
111 b = ((b.find(':') == std::string::npos) ? Cloak4(dest->host) : Cloak6(dest->host));
113 if ((inet_aton(dest->host,&testaddr) < 1) && (hostcloak.length() <= 64))
114 /* Invalid ipv4 address, and ipv4 user (resolved host) */
117 /* Valid ipv4 address (not resolved) ipv4 user */
118 b = Cloak4(dest->host);
121 dest->ChangeDisplayedHost(b.c_str());
124 dest->SetMode('x',true);
125 return MODEACTION_ALLOW;
130 if (dest->IsModeSet('x'))
132 /* User is removing the mode, so just restore their real host
133 * and make it match the displayed one.
135 dest->ChangeDisplayedHost(dest->host);
136 dest->SetMode('x',false);
137 return MODEACTION_ALLOW;
141 return MODEACTION_DENY;
144 std::string Cloak4(const char* ip)
146 unsigned int iv[] = { key1, key2, key3, key4 };
147 irc::sepstream seps(ip, '.');
149 std::string octet[4];
152 for (int j = 0; j < 4; j++)
154 octet[j] = seps.GetToken();
155 i[j] = atoi(octet[j].c_str());
158 octet[3] = octet[0] + "." + octet[1] + "." + octet[2] + "." + octet[3];
159 octet[2] = octet[0] + "." + octet[1] + "." + octet[2];
160 octet[1] = octet[0] + "." + octet[1];
162 /* Reset the Hash module and send it our IV */
163 HashResetRequest(Sender, HashProvider).Send();
164 HashKeyRequest(Sender, HashProvider, iv).Send();
166 /* Send the Hash module a different hex table for each octet group's Hash sum */
167 for (int k = 0; k < 4; k++)
169 HashHexRequest(Sender, HashProvider, xtab[(iv[k]+i[k]) % 4]).Send();
170 ra[k] = std::string(HashSumRequest(Sender, HashProvider, octet[k]).Send()).substr(0,6);
172 /* Stick them all together */
173 return std::string().append(ra[0]).append(".").append(ra[1]).append(".").append(ra[2]).append(".").append(ra[3]);
176 std::string Cloak6(const char* ip)
178 unsigned int iv[] = { key1, key2, key3, key4 };
179 std::vector<std::string> hashies;
180 std::string item = "";
183 /* Reset the Hash module and send it our IV */
184 HashResetRequest(Sender, HashProvider).Send();
185 HashKeyRequest(Sender, HashProvider, iv).Send();
187 for (const char* input = ip; *input; input++)
190 if (item.length() > 5)
192 /* Send the Hash module a different hex table for each octet group's Hash sum */
193 HashHexRequest(Sender, HashProvider, xtab[(key1+rounds) % 4]).Send();
194 hashies.push_back(std::string(HashSumRequest(Sender, HashProvider, item).Send()).substr(0,10));
201 /* Send the Hash module a different hex table for each octet group's Hash sum */
202 HashHexRequest(Sender, HashProvider, xtab[(key1+rounds) % 4]).Send();
203 hashies.push_back(std::string(HashSumRequest(Sender, HashProvider, item).Send()).substr(0,10));
206 /* Stick them all together */
207 return irc::stringjoiner(":", hashies, 0, hashies.size() - 1).GetJoined();
212 ConfigReader Conf(ServerInstance);
213 key1 = key2 = key3 = key4 = 0;
214 key1 = Conf.ReadInteger("cloak","key1",0,true);
215 key2 = Conf.ReadInteger("cloak","key2",0,true);
216 key3 = Conf.ReadInteger("cloak","key3",0,true);
217 key4 = Conf.ReadInteger("cloak","key4",0,true);
218 prefix = Conf.ReadValue("cloak","prefix",0);
221 prefix = ServerInstance->Config->Network;
223 if (!key1 && !key2 && !key3 && !key4)
224 throw ModuleException("You have not defined cloak keys for m_cloaking!!! THIS IS INSECURE AND SHOULD BE CHECKED!");
229 class ModuleCloaking : public Module
237 ModuleCloaking(InspIRCd* Me)
240 ServerInstance->UseInterface("HashRequest");
242 /* Attempt to locate the md5 service provider, bail if we can't find it */
243 HashModule = ServerInstance->FindModule("m_md5.so");
245 throw ModuleException("Can't find m_md5.so. Please load m_md5.so before m_cloaking.so.");
247 /* Create new mode handler object */
248 cu = new CloakUser(ServerInstance, this, HashModule);
250 /* Register it with the core */
251 if (!ServerInstance->AddMode(cu, 'x'))
252 throw ModuleException("Could not add new modes!");
257 virtual ~ModuleCloaking()
259 ServerInstance->Modes->DelMode(cu);
261 ServerInstance->DoneWithInterface("HashRequest");
264 virtual Version GetVersion()
266 // returns the version number of the module to be
267 // listed in /MODULES
268 return Version(1,1,0,2,VF_COMMON|VF_VENDOR,API_VERSION);
271 virtual void OnRehash(userrec* user, const std::string ¶meter)
276 void Implements(char* List)
278 List[I_OnRehash] = 1;
282 // stuff down here is the module-factory stuff. For basic modules you can ignore this.
284 class ModuleCloakingFactory : public ModuleFactory
287 ModuleCloakingFactory()
291 ~ModuleCloakingFactory()
295 virtual Module * CreateModule(InspIRCd* Me)
297 return new ModuleCloaking(Me);
303 extern "C" void * init_module( void )
305 return new ModuleCloakingFactory;