-/* +------------------------------------+\r * | Inspire Internet Relay Chat Daemon |\r * +------------------------------------+\r *\r * InspIRCd: (C) 2002-2007 InspIRCd Development Team\r * See: http://www.inspircd.org/wiki/index.php/Credits\r *\r * This program is free but copyrighted software; see\r * the file COPYING for details.\r *\r * ---------------------------------------------------\r */\r\r#include "inspircd.h"\r#include "users.h"\r#include "channels.h"\r#include "modules.h"\r#include "m_hash.h"\r\r/* $ModDesc: Provides masking of user hostnames */\r/* $ModDep: m_hash.h */\r\r/* Used to vary the output a little more depending on the cloak keys */\rstatic const char* xtab[] = {"F92E45D871BCA630", "A1B9D80C72E653F4", "1ABC078934DEF562", "ABCDEF5678901234"};\r\r/** Handles user mode +x\r */\rclass CloakUser : public ModeHandler\r{\r \r std::string prefix;\r unsigned int key1;\r unsigned int key2;\r unsigned int key3;\r unsigned int key4;\r Module* Sender;\r Module* HashProvider;\r\r /** This function takes a domain name string and returns just the last two domain parts,\r * or the last domain part if only two are available. Failing that it just returns what it was given.\r *\r * For example, if it is passed "svn.inspircd.org" it will return ".inspircd.org".\r * If it is passed "brainbox.winbot.co.uk" it will return ".co.uk",\r * and if it is passed "localhost.localdomain" it will return ".localdomain".\r * \r * This is used to ensure a significant part of the host is always cloaked (see Bug #216)\r */\r std::string LastTwoDomainParts(const std::string &host)\r {\r int dots = 0;\r std::string::size_type splitdot = host.length();\r\r for (std::string::size_type x = host.length() - 1; x; --x)\r {\r if (host[x] == '.')\r {\r splitdot = x;\r dots++;\r }\r if (dots >= 3)\r break;\r }\r\r if (splitdot == host.length())\r return host;\r else\r return host.substr(splitdot);\r }\r \r public:\r CloakUser(InspIRCd* Instance, Module* Source, Module* Hash) : ModeHandler(Instance, 'x', 0, 0, false, MODETYPE_USER, false), Sender(Source), HashProvider(Hash)\r {\r }\r\r ModeAction OnModeChange(userrec* source, userrec* dest, chanrec* channel, std::string ¶meter, bool adding)\r {\r if (source != dest)\r return MODEACTION_DENY;\r\r /* For remote clients, we dont take any action, we just allow it.\r * The local server where they are will set their cloak instead.\r */\r if (!IS_LOCAL(dest))\r return MODEACTION_ALLOW;\r\r if (adding)\r {\r if(!dest->IsModeSet('x'))\r {\r /* The mode is being turned on - so attempt to\r * allocate the user a cloaked host using a non-reversible\r * algorithm (its simple, but its non-reversible so the\r * simplicity doesnt really matter). This algorithm\r * will not work if the user has only one level of domain\r * naming in their hostname (e.g. if they are on a lan or\r * are connecting via localhost) -- this doesnt matter much.\r */\r\r char* n1 = strchr(dest->host,'.');\r char* n2 = strchr(dest->host,':');\r \r if (n1 || n2)\r {\r /* InspIRCd users have two hostnames; A displayed\r * hostname which can be modified by modules (e.g.\r * to create vhosts, implement chghost, etc) and a\r * 'real' hostname which you shouldnt write to.\r */\r\r unsigned int iv[] = { key1, key2, key3, key4 };\r std::string a = LastTwoDomainParts(dest->host);\r std::string b;\r\r /** Reset the Hash module, and send it our IV and hex table */\r HashResetRequest(Sender, HashProvider).Send();\r HashKeyRequest(Sender, HashProvider, iv).Send();\r HashHexRequest(Sender, HashProvider, xtab[(*dest->host) % 4]);\r\r /* Generate a cloak using specialized Hash */\r std::string hostcloak = prefix + "-" + std::string(HashSumRequest(Sender, HashProvider, dest->host).Send()).substr(0,8) + a;\r\r /* Fix by brain - if the cloaked host is > the max length of a host (64 bytes\r * according to the DNS RFC) then tough titty, they get cloaked as an IP. \r * Their ISP shouldnt go to town on subdomains, or they shouldnt have a kiddie\r * vhost.\r */\r#ifdef IPV6\r in6_addr testaddr;\r in_addr testaddr2;\r if ((dest->GetProtocolFamily() == AF_INET6) && (inet_pton(AF_INET6,dest->host,&testaddr) < 1) && (hostcloak.length() <= 64))\r /* Invalid ipv6 address, and ipv6 user (resolved host) */\r b = hostcloak;\r else if ((dest->GetProtocolFamily() == AF_INET) && (inet_aton(dest->host,&testaddr2) < 1) && (hostcloak.length() <= 64))\r /* Invalid ipv4 address, and ipv4 user (resolved host) */\r b = hostcloak;\r else\r /* Valid ipv6 or ipv4 address (not resolved) ipv4 or ipv6 user */\r b = ((!strchr(dest->host,':')) ? Cloak4(dest->host) : Cloak6(dest->host));\r#else\r in_addr testaddr;\r if ((inet_aton(dest->host,&testaddr) < 1) && (hostcloak.length() <= 64))\r /* Invalid ipv4 address, and ipv4 user (resolved host) */\r b = hostcloak;\r else\r /* Valid ipv4 address (not resolved) ipv4 user */\r b = Cloak4(dest->host);\r#endif\r\r dest->ChangeDisplayedHost(b.c_str());\r }\r \r dest->SetMode('x',true);\r return MODEACTION_ALLOW;\r }\r }\r else\r {\r if (dest->IsModeSet('x'))\r {\r /* User is removing the mode, so just restore their real host\r * and make it match the displayed one.\r */\r dest->ChangeDisplayedHost(dest->host);\r dest->SetMode('x',false);\r return MODEACTION_ALLOW;\r }\r }\r\r return MODEACTION_DENY;\r }\r\r std::string Cloak4(const char* ip)\r {\r unsigned int iv[] = { key1, key2, key3, key4 };\r irc::sepstream seps(ip, '.');\r std::string ra[4];;\r std::string octet[4];\r int i[4];\r\r for (int j = 0; j < 4; j++)\r {\r octet[j] = seps.GetToken();\r i[j] = atoi(octet[j].c_str());\r }\r\r octet[3] = octet[0] + "." + octet[1] + "." + octet[2] + "." + octet[3];\r octet[2] = octet[0] + "." + octet[1] + "." + octet[2];\r octet[1] = octet[0] + "." + octet[1];\r\r /* Reset the Hash module and send it our IV */\r HashResetRequest(Sender, HashProvider).Send();\r HashKeyRequest(Sender, HashProvider, iv).Send();\r\r /* Send the Hash module a different hex table for each octet group's Hash sum */\r for (int k = 0; k < 4; k++)\r {\r HashHexRequest(Sender, HashProvider, xtab[(iv[k]+i[k]) % 4]).Send();\r ra[k] = std::string(HashSumRequest(Sender, HashProvider, octet[k]).Send()).substr(0,6);\r }\r /* Stick them all together */\r return std::string().append(ra[0]).append(".").append(ra[1]).append(".").append(ra[2]).append(".").append(ra[3]);\r }\r\r std::string Cloak6(const char* ip)\r {\r /* Theyre using 4in6 (YUCK). Translate as ipv4 cloak */\r if (!strncmp(ip, "0::ffff:", 8))\r return Cloak4(ip + 8);\r\r /* If we get here, yes it really is an ipv6 ip */\r unsigned int iv[] = { key1, key2, key3, key4 };\r std::vector<std::string> hashies;\r std::string item;\r int rounds = 0;\r\r /* Reset the Hash module and send it our IV */\r HashResetRequest(Sender, HashProvider).Send();\r HashKeyRequest(Sender, HashProvider, iv).Send();\r\r for (const char* input = ip; *input; input++)\r {\r item += *input;\r if (item.length() > 7)\r {\r /* Send the Hash module a different hex table for each octet group's Hash sum */\r HashHexRequest(Sender, HashProvider, xtab[(key1+rounds) % 4]).Send();\r hashies.push_back(std::string(HashSumRequest(Sender, HashProvider, item).Send()).substr(0,8));\r item.clear();\r }\r rounds++;\r }\r if (!item.empty())\r {\r /* Send the Hash module a different hex table for each octet group's Hash sum */\r HashHexRequest(Sender, HashProvider, xtab[(key1+rounds) % 4]).Send();\r hashies.push_back(std::string(HashSumRequest(Sender, HashProvider, item).Send()).substr(0,8));\r item.clear();\r }\r /* Stick them all together */\r return irc::stringjoiner(":", hashies, 0, hashies.size() - 1).GetJoined();\r }\r \r void DoRehash()\r {\r ConfigReader Conf(ServerInstance);\r key1 = key2 = key3 = key4 = 0;\r key1 = Conf.ReadInteger("cloak","key1",0,true);\r key2 = Conf.ReadInteger("cloak","key2",0,true);\r key3 = Conf.ReadInteger("cloak","key3",0,true);\r key4 = Conf.ReadInteger("cloak","key4",0,true);\r prefix = Conf.ReadValue("cloak","prefix",0);\r\r if (prefix.empty())\r prefix = ServerInstance->Config->Network;\r\r if (!key1 && !key2 && !key3 && !key4)\r throw ModuleException("You have not defined cloak keys for m_cloaking!!! THIS IS INSECURE AND SHOULD BE CHECKED!");\r }\r};\r\r\rclass ModuleCloaking : public Module\r{\r private:\r \r CloakUser* cu;\r Module* HashModule;\r\r public:\r ModuleCloaking(InspIRCd* Me)\r : Module(Me)\r {\r ServerInstance->UseInterface("HashRequest");\r\r /* Attempt to locate the md5 service provider, bail if we can't find it */\r HashModule = ServerInstance->FindModule("m_md5.so");\r if (!HashModule)\r throw ModuleException("Can't find m_md5.so. Please load m_md5.so before m_cloaking.so.");\r\r /* Create new mode handler object */\r cu = new CloakUser(ServerInstance, this, HashModule);\r\r /* Register it with the core */ \r if (!ServerInstance->AddMode(cu, 'x'))\r throw ModuleException("Could not add new modes!");\r\r OnRehash(NULL,"");\r }\r \r virtual ~ModuleCloaking()\r {\r ServerInstance->Modes->DelMode(cu);\r DELETE(cu);\r ServerInstance->DoneWithInterface("HashRequest");\r }\r \r virtual Version GetVersion()\r {\r // returns the version number of the module to be\r // listed in /MODULES\r return Version(1,1,0,2,VF_COMMON|VF_VENDOR,API_VERSION);\r }\r\r virtual void OnRehash(userrec* user, const std::string ¶meter)\r {\r cu->DoRehash();\r }\r\r void Implements(char* List)\r {\r List[I_OnRehash] = 1;\r }\r};\r\rMODULE_INIT(ModuleCloaking)\r
\ No newline at end of file
+/*
+ * InspIRCd -- Internet Relay Chat Daemon
+ *
+ * Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
+ * Copyright (C) 2006-2008 Robin Burchell <robin+git@viroteck.net>
+ * Copyright (C) 2008 Pippijn van Steenhoven <pip88nl@gmail.com>
+ * Copyright (C) 2003-2008 Craig Edwards <craigedwards@brainbox.cc>
+ * Copyright (C) 2007 John Brooks <john.brooks@dereferenced.net>
+ * Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
+ * Copyright (C) 2006 Oliver Lupton <oliverlupton@gmail.com>
+ *
+ * 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 "hash.h"
+
+/* $ModDesc: Provides masking of user hostnames */
+
+enum CloakMode
+{
+ /** 1.2-compatible host-based cloak */
+ MODE_COMPAT_HOST,
+ /** 1.2-compatible IP-only cloak */
+ MODE_COMPAT_IPONLY,
+ /** 2.0 cloak of "half" of the hostname plus the full IP hash */
+ MODE_HALF_CLOAK,
+ /** 2.0 cloak of IP hash, split at 2 common CIDR range points */
+ MODE_OPAQUE
+};
+
+// lowercase-only encoding similar to base64, used for hash output
+static const char base32[] = "0123456789abcdefghijklmnopqrstuv";
+
+/** Handles user mode +x
+ */
+class CloakUser : public ModeHandler
+{
+ public:
+ LocalStringExt ext;
+
+ std::string debounce_uid;
+ time_t debounce_ts;
+ int debounce_count;
+
+ CloakUser(Module* source)
+ : ModeHandler(source, "cloak", 'x', PARAM_NONE, MODETYPE_USER),
+ ext("cloaked_host", source), debounce_ts(0), debounce_count(0)
+ {
+ }
+
+ ModeAction OnModeChange(User* source, User* dest, Channel* channel, std::string ¶meter, bool adding)
+ {
+ LocalUser* user = IS_LOCAL(dest);
+
+ /* For remote clients, we don't take any action, we just allow it.
+ * The local server where they are will set their cloak instead.
+ * This is fine, as we will receive it later.
+ */
+ if (!user)
+ {
+ dest->SetMode('x',adding);
+ return MODEACTION_ALLOW;
+ }
+
+ if (user->uuid == debounce_uid && debounce_ts == ServerInstance->Time())
+ {
+ // prevent spamming using /mode user +x-x+x-x+x-x
+ if (++debounce_count > 2)
+ return MODEACTION_DENY;
+ }
+ else
+ {
+ debounce_uid = user->uuid;
+ debounce_count = 1;
+ debounce_ts = ServerInstance->Time();
+ }
+
+ if (adding == user->IsModeSet('x'))
+ return MODEACTION_DENY;
+
+ /* don't allow this user to spam modechanges */
+ if (source == dest)
+ user->CommandFloodPenalty += 5000;
+
+ if (adding)
+ {
+ std::string* cloak = ext.get(user);
+
+ if (!cloak)
+ {
+ /* Force creation of missing cloak */
+ creator->OnUserConnect(user);
+ cloak = ext.get(user);
+ }
+ if (cloak)
+ {
+ user->ChangeDisplayedHost(cloak->c_str());
+ user->SetMode('x',true);
+ return MODEACTION_ALLOW;
+ }
+ else
+ return MODEACTION_DENY;
+ }
+ else
+ {
+ /* User is removing the mode, so restore their real host
+ * and make it match the displayed one.
+ */
+ user->SetMode('x',false);
+ user->ChangeDisplayedHost(user->host.c_str());
+ return MODEACTION_ALLOW;
+ }
+ }
+
+};
+
+class CommandCloak : public Command
+{
+ public:
+ CommandCloak(Module* Creator) : Command(Creator, "CLOAK", 1)
+ {
+ flags_needed = 'o';
+ syntax = "<host>";
+ }
+
+ CmdResult Handle(const std::vector<std::string> ¶meters, User *user);
+};
+
+class ModuleCloaking : public Module
+{
+ public:
+ CloakUser cu;
+ CloakMode mode;
+ CommandCloak ck;
+ std::string prefix;
+ std::string suffix;
+ std::string key;
+ unsigned int compatkey[4];
+ const char* xtab[4];
+ dynamic_reference<HashProvider> Hash;
+
+ ModuleCloaking() : cu(this), mode(MODE_OPAQUE), ck(this), Hash(this, "hash/md5")
+ {
+ }
+
+ void init()
+ {
+ OnRehash(NULL);
+
+ ServerInstance->Modules->AddService(cu);
+ ServerInstance->Modules->AddService(ck);
+ ServerInstance->Modules->AddService(cu.ext);
+
+ Implementation eventlist[] = { I_OnRehash, I_OnCheckBan, I_OnUserConnect, I_OnChangeHost };
+ ServerInstance->Modules->Attach(eventlist, this, sizeof(eventlist)/sizeof(Implementation));
+ }
+
+ /** This function takes a domain name string and returns just the last two domain parts,
+ * or the last domain part if only two are available. Failing that it just returns what it was given.
+ *
+ * For example, if it is passed "svn.inspircd.org" it will return ".inspircd.org".
+ * If it is passed "brainbox.winbot.co.uk" it will return ".co.uk",
+ * and if it is passed "localhost.localdomain" it will return ".localdomain".
+ *
+ * This is used to ensure a significant part of the host is always cloaked (see Bug #216)
+ */
+ std::string LastTwoDomainParts(const std::string &host)
+ {
+ int dots = 0;
+ std::string::size_type splitdot = host.length();
+
+ for (std::string::size_type x = host.length() - 1; x; --x)
+ {
+ if (host[x] == '.')
+ {
+ splitdot = x;
+ dots++;
+ }
+ if (dots >= 3)
+ break;
+ }
+
+ if (splitdot == host.length())
+ return "";
+ else
+ return host.substr(splitdot);
+ }
+
+ /**
+ * 2.0-style cloaking function
+ * @param item The item to cloak (part of an IP or hostname)
+ * @param id A unique ID for this type of item (to make it unique if the item matches)
+ * @param len The length of the output. Maximum for MD5 is 16 characters.
+ */
+ std::string SegmentCloak(const std::string& item, char id, int len)
+ {
+ std::string input;
+ input.reserve(key.length() + 3 + item.length());
+ input.append(1, id);
+ input.append(key);
+ input.append(1, '\0'); // null does not terminate a C++ string
+ input.append(item);
+
+ std::string rv = Hash->sum(input).substr(0,len);
+ for(int i=0; i < len; i++)
+ {
+ // this discards 3 bits per byte. We have an
+ // overabundance of bits in the hash output, doesn't
+ // matter which ones we are discarding.
+ rv[i] = base32[rv[i] & 0x1F];
+ }
+ return rv;
+ }
+
+ std::string CompatCloak4(const char* ip)
+ {
+ irc::sepstream seps(ip, '.');
+ std::string octet[4];
+ int i[4];
+
+ for (int j = 0; j < 4; j++)
+ {
+ seps.GetToken(octet[j]);
+ i[j] = atoi(octet[j].c_str());
+ }
+
+ octet[3] = octet[0] + "." + octet[1] + "." + octet[2] + "." + octet[3];
+ octet[2] = octet[0] + "." + octet[1] + "." + octet[2];
+ octet[1] = octet[0] + "." + octet[1];
+
+ /* Reset the Hash module and send it our IV */
+
+ std::string rv;
+
+ /* Send the Hash module a different hex table for each octet group's Hash sum */
+ for (int k = 0; k < 4; k++)
+ {
+ rv.append(Hash->sumIV(compatkey, xtab[(compatkey[k]+i[k]) % 4], octet[k]).substr(0,6));
+ if (k < 3)
+ rv.append(".");
+ }
+ /* Stick them all together */
+ return rv;
+ }
+
+ std::string CompatCloak6(const char* ip)
+ {
+ std::vector<std::string> hashies;
+ std::string item;
+ int rounds = 0;
+
+ /* Reset the Hash module and send it our IV */
+
+ for (const char* input = ip; *input; input++)
+ {
+ item += *input;
+ if (item.length() > 7)
+ {
+ hashies.push_back(Hash->sumIV(compatkey, xtab[(compatkey[0]+rounds) % 4], item).substr(0,8));
+ item.clear();
+ }
+ rounds++;
+ }
+ if (!item.empty())
+ {
+ hashies.push_back(Hash->sumIV(compatkey, xtab[(compatkey[0]+rounds) % 4], item).substr(0,8));
+ }
+ /* Stick them all together */
+ return irc::stringjoiner(":", hashies, 0, hashies.size() - 1).GetJoined();
+ }
+
+ std::string SegmentIP(const irc::sockets::sockaddrs& ip, bool full)
+ {
+ std::string bindata;
+ int hop1, hop2, hop3;
+ int len1, len2;
+ std::string rv;
+ if (ip.sa.sa_family == AF_INET6)
+ {
+ bindata = std::string((const char*)ip.in6.sin6_addr.s6_addr, 16);
+ hop1 = 8;
+ hop2 = 6;
+ hop3 = 4;
+ len1 = 6;
+ len2 = 4;
+ // pfx s1.s2.s3. (xxxx.xxxx or s4) sfx
+ // 6 4 4 9/6
+ rv.reserve(prefix.length() + 26 + suffix.length());
+ }
+ else
+ {
+ bindata = std::string((const char*)&ip.in4.sin_addr, 4);
+ hop1 = 3;
+ hop2 = 0;
+ hop3 = 2;
+ len1 = len2 = 3;
+ // pfx s1.s2. (xxx.xxx or s3) sfx
+ rv.reserve(prefix.length() + 15 + suffix.length());
+ }
+
+ rv.append(prefix);
+ rv.append(SegmentCloak(bindata, 10, len1));
+ rv.append(1, '.');
+ bindata.erase(hop1);
+ rv.append(SegmentCloak(bindata, 11, len2));
+ if (hop2)
+ {
+ rv.append(1, '.');
+ bindata.erase(hop2);
+ rv.append(SegmentCloak(bindata, 12, len2));
+ }
+
+ if (full)
+ {
+ rv.append(1, '.');
+ bindata.erase(hop3);
+ rv.append(SegmentCloak(bindata, 13, 6));
+ rv.append(suffix);
+ }
+ else
+ {
+ char buf[50];
+ if (ip.sa.sa_family == AF_INET6)
+ {
+ snprintf(buf, 50, ".%02x%02x.%02x%02x%s",
+ ip.in6.sin6_addr.s6_addr[2], ip.in6.sin6_addr.s6_addr[3],
+ ip.in6.sin6_addr.s6_addr[0], ip.in6.sin6_addr.s6_addr[1], suffix.c_str());
+ }
+ else
+ {
+ const unsigned char* ip4 = (const unsigned char*)&ip.in4.sin_addr;
+ snprintf(buf, 50, ".%d.%d%s", ip4[1], ip4[0], suffix.c_str());
+ }
+ rv.append(buf);
+ }
+ return rv;
+ }
+
+ ModResult OnCheckBan(User* user, Channel* chan, const std::string& mask)
+ {
+ LocalUser* lu = IS_LOCAL(user);
+ if (!lu)
+ return MOD_RES_PASSTHRU;
+
+ OnUserConnect(lu);
+ std::string* cloak = cu.ext.get(user);
+ /* Check if they have a cloaked host, but are not using it */
+ if (cloak && *cloak != user->dhost)
+ {
+ char cmask[MAXBUF];
+ snprintf(cmask, MAXBUF, "%s!%s@%s", user->nick.c_str(), user->ident.c_str(), cloak->c_str());
+ if (InspIRCd::Match(cmask,mask))
+ return MOD_RES_DENY;
+ }
+ return MOD_RES_PASSTHRU;
+ }
+
+ void Prioritize()
+ {
+ /* Needs to be after m_banexception etc. */
+ ServerInstance->Modules->SetPriority(this, I_OnCheckBan, PRIORITY_LAST);
+ }
+
+ // this unsets umode +x on every host change. If we are actually doing a +x
+ // mode change, we will call SetMode back to true AFTER the host change is done.
+ void OnChangeHost(User* u, const std::string& host)
+ {
+ if(u->IsModeSet('x'))
+ {
+ u->SetMode('x', false);
+ u->WriteServ("MODE %s -x", u->nick.c_str());
+ }
+ }
+
+ ~ModuleCloaking()
+ {
+ }
+
+ Version GetVersion()
+ {
+ std::string testcloak = "broken";
+ if (Hash)
+ {
+ switch (mode)
+ {
+ case MODE_COMPAT_HOST:
+ testcloak = prefix + "-" + Hash->sumIV(compatkey, xtab[0], "*").substr(0,10);
+ break;
+ case MODE_COMPAT_IPONLY:
+ testcloak = Hash->sumIV(compatkey, xtab[0], "*").substr(0,10);
+ break;
+ case MODE_HALF_CLOAK:
+ testcloak = prefix + SegmentCloak("*", 3, 8) + suffix;
+ break;
+ case MODE_OPAQUE:
+ testcloak = prefix + SegmentCloak("*", 4, 8) + suffix;
+ }
+ }
+ return Version("Provides masking of user hostnames", VF_COMMON|VF_VENDOR, testcloak);
+ }
+
+ void OnRehash(User* user)
+ {
+ ConfigTag* tag = ServerInstance->Config->ConfValue("cloak");
+ prefix = tag->getString("prefix");
+ suffix = tag->getString("suffix", ".IP");
+
+ std::string modestr = tag->getString("mode");
+ if (modestr == "compat-host")
+ mode = MODE_COMPAT_HOST;
+ else if (modestr == "compat-ip")
+ mode = MODE_COMPAT_IPONLY;
+ else if (modestr == "half")
+ mode = MODE_HALF_CLOAK;
+ else if (modestr == "full")
+ mode = MODE_OPAQUE;
+ else
+ throw ModuleException("Bad value for <cloak:mode>; must be one of compat-host, compat-ip, half, full");
+
+ if (mode == MODE_COMPAT_HOST || mode == MODE_COMPAT_IPONLY)
+ {
+ bool lowercase = tag->getBool("lowercase");
+
+ /* These are *not* using the need_positive parameter of ReadInteger -
+ * that will limit the valid values to only the positive values in a
+ * signed int. Instead, accept any value that fits into an int and
+ * cast it to an unsigned int. That will, a bit oddly, give us the full
+ * spectrum of an unsigned integer. - Special
+ *
+ * We must limit the keys or else we get different results on
+ * amd64/x86 boxes. - psychon */
+ const unsigned int limit = 0x80000000;
+ compatkey[0] = (unsigned int) tag->getInt("key1");
+ compatkey[1] = (unsigned int) tag->getInt("key2");
+ compatkey[2] = (unsigned int) tag->getInt("key3");
+ compatkey[3] = (unsigned int) tag->getInt("key4");
+
+ if (!lowercase)
+ {
+ xtab[0] = "F92E45D871BCA630";
+ xtab[1] = "A1B9D80C72E653F4";
+ xtab[2] = "1ABC078934DEF562";
+ xtab[3] = "ABCDEF5678901234";
+ }
+ else
+ {
+ xtab[0] = "f92e45d871bca630";
+ xtab[1] = "a1b9d80c72e653f4";
+ xtab[2] = "1abc078934def562";
+ xtab[3] = "abcdef5678901234";
+ }
+
+ if (prefix.empty())
+ prefix = ServerInstance->Config->Network;
+
+ if (!compatkey[0] || !compatkey[1] || !compatkey[2] || !compatkey[3] ||
+ compatkey[0] >= limit || compatkey[1] >= limit || compatkey[2] >= limit || compatkey[3] >= limit)
+ {
+ std::string detail;
+ if (!compatkey[0] || compatkey[0] >= limit)
+ detail = "<cloak:key1> is not valid, it may be set to a too high/low value, or it may not exist.";
+ else if (!compatkey[1] || compatkey[1] >= limit)
+ detail = "<cloak:key2> is not valid, it may be set to a too high/low value, or it may not exist.";
+ else if (!compatkey[2] || compatkey[2] >= limit)
+ detail = "<cloak:key3> is not valid, it may be set to a too high/low value, or it may not exist.";
+ else if (!compatkey[3] || compatkey[3] >= limit)
+ detail = "<cloak:key4> is not valid, it may be set to a too high/low value, or it may not exist.";
+
+ throw ModuleException("You have not defined cloak keys for m_cloaking!!! THIS IS INSECURE AND SHOULD BE CHECKED! - " + detail);
+ }
+ }
+ else
+ {
+ key = tag->getString("key");
+ if (key.empty() || key == "secret")
+ throw ModuleException("You have not defined cloak keys for m_cloaking. Define <cloak:key> as a network-wide secret.");
+ }
+ }
+
+ std::string GenCloak(const irc::sockets::sockaddrs& ip, const std::string& ipstr, const std::string& host)
+ {
+ std::string chost;
+
+ switch (mode)
+ {
+ case MODE_COMPAT_HOST:
+ {
+ if (ipstr != host)
+ {
+ std::string tail = LastTwoDomainParts(host);
+
+ // xtab is not used here due to a bug in 1.2 cloaking
+ chost = prefix + "-" + Hash->sumIV(compatkey, "0123456789abcdef", host).substr(0,8) + tail;
+
+ /* Fix by brain - if the cloaked host is > the max length of a host (64 bytes
+ * according to the DNS RFC) then they get cloaked as an IP.
+ */
+ if (chost.length() <= 64)
+ break;
+ }
+ // fall through to IP cloak
+ }
+ case MODE_COMPAT_IPONLY:
+ if (ip.sa.sa_family == AF_INET6)
+ chost = CompatCloak6(ipstr.c_str());
+ else
+ chost = CompatCloak4(ipstr.c_str());
+ break;
+ case MODE_HALF_CLOAK:
+ {
+ if (ipstr != host)
+ chost = prefix + SegmentCloak(host, 1, 6) + LastTwoDomainParts(host);
+ if (chost.empty() || chost.length() > 50)
+ chost = SegmentIP(ip, false);
+ break;
+ }
+ case MODE_OPAQUE:
+ default:
+ chost = SegmentIP(ip, true);
+ }
+ return chost;
+ }
+
+ void OnUserConnect(LocalUser* dest)
+ {
+ std::string* cloak = cu.ext.get(dest);
+ if (cloak)
+ return;
+
+ cu.ext.set(dest, GenCloak(dest->client_sa, dest->GetIPString(), dest->host));
+ }
+};
+
+CmdResult CommandCloak::Handle(const std::vector<std::string> ¶meters, User *user)
+{
+ ModuleCloaking* mod = (ModuleCloaking*)(Module*)creator;
+ irc::sockets::sockaddrs sa;
+ std::string cloak;
+
+ if (irc::sockets::aptosa(parameters[0], 0, sa))
+ cloak = mod->GenCloak(sa, parameters[0], parameters[0]);
+ else
+ cloak = mod->GenCloak(sa, "", parameters[0]);
+
+ user->WriteServ("NOTICE %s :*** Cloak for %s is %s", user->nick.c_str(), parameters[0].c_str(), cloak.c_str());
+
+ return CMD_SUCCESS;
+}
+
+MODULE_INIT(ModuleCloaking)