src/modules/m_callerid.cpp

   1 /*
   2  * InspIRCd -- Internet Relay Chat Daemon
   3  *
   4  *   Copyright (C) 2009 Daniel De Graaf <danieldg@inspircd.org>
   5  *   Copyright (C) 2008-2009 Robin Burchell <robin+git@viroteck.net>
   6  *   Copyright (C) 2008 Thomas Stagner <aquanight@inspircd.org>
   7  *   Copyright (C) 2008 Craig Edwards <craigedwards@brainbox.cc>
   8  *
   9  * This file is part of InspIRCd.  InspIRCd is free software: you can
  10  * redistribute it and/or modify it under the terms of the GNU General Public
  11  * License as published by the Free Software Foundation, version 2.
  12  *
  13  * This program is distributed in the hope that it will be useful, but WITHOUT
  14  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  15  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
  16  * details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22
  23 #include "inspircd.h"
  24
  25 /* $ModDesc: Implementation of callerid, usermode +g, /accept */
  26
  27 class callerid_data
  28 {
  29  public:
  30         time_t lastnotify;
  31
  32         /** Users I accept messages from
  33          */
  34         std::set<User*> accepting;
  35
  36         /** Users who list me as accepted
  37          */
  38         std::list<callerid_data *> wholistsme;
  39
  40         callerid_data() : lastnotify(0) { }
  41         callerid_data(const std::string& str)
  42         {
  43                 irc::commasepstream s(str);
  44                 std::string tok;
  45                 if (s.GetToken(tok))
  46                 {
  47                         lastnotify = ConvToInt(tok);
  48                 }
  49                 while (s.GetToken(tok))
  50                 {
  51                         if (tok.empty())
  52                         {
  53                                 continue;
  54                         }
  55
  56                         User *u = ServerInstance->FindNick(tok);
  57                         if ((u) && (u->registered == REG_ALL) && (!u->quitting) && (!IS_SERVER(u)))
  58                                 accepting.insert(u);
  59                 }
  60         }
  61
  62         std::string ToString(SerializeFormat format) const
  63         {
  64                 std::ostringstream oss;
  65                 oss << lastnotify;
  66                 for (std::set<User*>::const_iterator i = accepting.begin(); i != accepting.end(); ++i)
  67                 {
  68                         User* u = *i;
  69                         // Encode UIDs.
  70                         oss << "," << (format == FORMAT_USER ? u->nick : u->uuid);
  71                 }
  72                 return oss.str();
  73         }
  74 };
  75
  76 struct CallerIDExtInfo : public ExtensionItem
  77 {
  78         CallerIDExtInfo(Module* parent)
  79                 : ExtensionItem("callerid_data", parent)
  80         {
  81         }
  82
  83         std::string serialize(SerializeFormat format, const Extensible* container, void* item) const
  84         {
  85                 callerid_data* dat = static_cast<callerid_data*>(item);
  86                 return dat->ToString(format);
  87         }
  88
  89         void unserialize(SerializeFormat format, Extensible* container, const std::string& value)
  90         {
  91                 callerid_data* dat = new callerid_data(value);
  92                 set_raw(container, dat);
  93         }
  94
  95         callerid_data* get(User* user, bool create)
  96         {
  97                 callerid_data* dat = static_cast<callerid_data*>(get_raw(user));
  98                 if (create && !dat)
  99                 {
 100                         dat = new callerid_data;
 101                         set_raw(user, dat);
 102                 }
 103                 return dat;
 104         }
 105
 106         void free(void* item)
 107         {
 108                 callerid_data* dat = static_cast<callerid_data*>(item);
 109
 110                 // We need to walk the list of users on our accept list, and remove ourselves from their wholistsme.
 111                 for (std::set<User *>::iterator it = dat->accepting.begin(); it != dat->accepting.end(); it++)
 112                 {
 113                         callerid_data *targ = this->get(*it, false);
 114
 115                         if (!targ)
 116                                 continue; // shouldn't happen, but oh well.
 117
 118                         std::list<callerid_data*>::iterator it2 = std::find(targ->wholistsme.begin(), targ->wholistsme.end(), dat);
 119                         if (it2 != targ->wholistsme.end())
 120                                 targ->wholistsme.erase(it2);
 121                 }
 122         }
 123 };
 124
 125 class User_g : public SimpleUserModeHandler
 126 {
 127 public:
 128         User_g(Module* Creator) : SimpleUserModeHandler(Creator, "callerid", 'g') { }
 129 };
 130
 131 class CommandAccept : public Command
 132 {
 133 public:
 134         CallerIDExtInfo extInfo;
 135         unsigned int maxaccepts;
 136         CommandAccept(Module* Creator) : Command(Creator, "ACCEPT", 1),
 137                 extInfo(Creator)
 138         {
 139                 syntax = "{[+|-]<nicks>}|*}";
 140                 TRANSLATE2(TR_CUSTOM, TR_END);
 141         }
 142
 143         virtual void EncodeParameter(std::string& parameter, int index)
 144         {
 145                 if (index != 0)
 146                         return;
 147                 std::string out;
 148                 irc::commasepstream nicks(parameter);
 149                 std::string tok;
 150                 while (nicks.GetToken(tok))
 151                 {
 152                         if (tok == "*")
 153                         {
 154                                 continue; // Drop list requests, since remote servers ignore them anyway.
 155                         }
 156                         if (!out.empty())
 157                                 out.append(",");
 158                         bool dash = false;
 159                         if (tok[0] == '-')
 160                         {
 161                                 dash = true;
 162                                 tok.erase(0, 1); // Remove the dash.
 163                         }
 164                         User* u = ServerInstance->FindNick(tok);
 165                         if ((!u) || (u->registered != REG_ALL) || (u->quitting) || (IS_SERVER(u)))
 166                                 continue;
 167
 168                         if (dash)
 169                                 out.append("-");
 170                         out.append(u->uuid);
 171                 }
 172                 parameter = out;
 173         }
 174
 175         /** Will take any number of nicks (up to MaxTargets), which can be seperated by commas.
 176          * - in front of any nick removes, and an * lists. This effectively means you can do:
 177          * /accept nick1,nick2,nick3,*
 178          * to add 3 nicks and then show your list
 179          */
 180         CmdResult Handle(const std::vector<std::string> &parameters, User* user)
 181         {
 182                 if (ServerInstance->Parser->LoopCall(user, this, parameters, 0))
 183                         return CMD_SUCCESS;
 184                 /* Even if callerid mode is not set, we let them manage their ACCEPT list so that if they go +g they can
 185                  * have a list already setup. */
 186
 187                 std::string tok = parameters[0];
 188
 189                 if (tok == "*")
 190                 {
 191                         if (IS_LOCAL(user))
 192                                 ListAccept(user);
 193                         return CMD_SUCCESS;
 194                 }
 195                 else if (tok[0] == '-')
 196                 {
 197                         User* whotoremove = ServerInstance->FindNick(tok.substr(1));
 198                         if (whotoremove)
 199                                 return (RemoveAccept(user, whotoremove) ? CMD_SUCCESS : CMD_FAILURE);
 200                         else
 201                                 return CMD_FAILURE;
 202                 }
 203                 else
 204                 {
 205                         User* whotoadd = ServerInstance->FindNick(tok[0] == '+' ? tok.substr(1) : tok);
 206                         if ((whotoadd) && (whotoadd->registered == REG_ALL) && (!whotoadd->quitting) && (!IS_SERVER(whotoadd)))
 207                                 return (AddAccept(user, whotoadd) ? CMD_SUCCESS : CMD_FAILURE);
 208                         else
 209                         {
 210                                 user->WriteNumeric(401, "%s %s :No such nick/channel", user->nick.c_str(), tok.c_str());
 211                                 return CMD_FAILURE;
 212                         }
 213                 }
 214         }
 215
 216         RouteDescriptor GetRouting(User* user, const std::vector<std::string>& parameters)
 217         {
 218                 return ROUTE_BROADCAST;
 219         }
 220
 221         void ListAccept(User* user)
 222         {
 223                 callerid_data* dat = extInfo.get(user, false);
 224                 if (dat)
 225                 {
 226                         for (std::set<User*>::iterator i = dat->accepting.begin(); i != dat->accepting.end(); ++i)
 227                                 user->WriteNumeric(281, "%s %s", user->nick.c_str(), (*i)->nick.c_str());
 228                 }
 229                 user->WriteNumeric(282, "%s :End of ACCEPT list", user->nick.c_str());
 230         }
 231
 232         bool AddAccept(User* user, User* whotoadd)
 233         {
 234                 // Add this user to my accept list first, so look me up..
 235                 callerid_data* dat = extInfo.get(user, true);
 236                 if (dat->accepting.size() >= maxaccepts)
 237                 {
 238                         user->WriteNumeric(456, "%s :Accept list is full (limit is %d)", user->nick.c_str(), maxaccepts);
 239                         return false;
 240                 }
 241                 if (!dat->accepting.insert(whotoadd).second)
 242                 {
 243                         user->WriteNumeric(457, "%s %s :is already on your accept list", user->nick.c_str(), whotoadd->nick.c_str());
 244                         return false;
 245                 }
 246
 247                 // Now, look them up, and add me to their list
 248                 callerid_data *targ = extInfo.get(whotoadd, true);
 249                 targ->wholistsme.push_back(dat);
 250
 251                 user->WriteServ("NOTICE %s :%s is now on your accept list", user->nick.c_str(), whotoadd->nick.c_str());
 252                 return true;
 253         }
 254
 255         bool RemoveAccept(User* user, User* whotoremove)
 256         {
 257                 // Remove them from my list, so look up my list..
 258                 callerid_data* dat = extInfo.get(user, false);
 259                 if (!dat)
 260                 {
 261                         user->WriteNumeric(458, "%s %s :is not on your accept list", user->nick.c_str(), whotoremove->nick.c_str());
 262                         return false;
 263                 }
 264                 std::set<User*>::iterator i = dat->accepting.find(whotoremove);
 265                 if (i == dat->accepting.end())
 266                 {
 267                         user->WriteNumeric(458, "%s %s :is not on your accept list", user->nick.c_str(), whotoremove->nick.c_str());
 268                         return false;
 269                 }
 270
 271                 dat->accepting.erase(i);
 272
 273                 // Look up their list to remove me.
 274                 callerid_data *dat2 = extInfo.get(whotoremove, false);
 275                 if (!dat2)
 276                 {
 277                         // How the fuck is this possible.
 278                         return false;
 279                 }
 280
 281                 std::list<callerid_data*>::iterator it = std::find(dat2->wholistsme.begin(), dat2->wholistsme.end(), dat);
 282                 if (it != dat2->wholistsme.end())
 283                         // Found me!
 284                         dat2->wholistsme.erase(it);
 285
 286                 user->WriteServ("NOTICE %s :%s is no longer on your accept list", user->nick.c_str(), whotoremove->nick.c_str());
 287                 return true;
 288         }
 289 };
 290
 291 class ModuleCallerID : public Module
 292 {
 293 private:
 294         CommandAccept cmd;
 295         User_g myumode;
 296
 297         // Configuration variables:
 298         bool operoverride; // Operators can override callerid.
 299         bool tracknick; // Allow ACCEPT entries to update with nick changes.
 300         unsigned int notify_cooldown; // Seconds between notifications.
 301
 302         /** Removes a user from all accept lists
 303          * @param who The user to remove from accepts
 304          */
 305         void RemoveFromAllAccepts(User* who)
 306         {
 307                 // First, find the list of people who have me on accept
 308                 callerid_data *userdata = cmd.extInfo.get(who, false);
 309                 if (!userdata)
 310                         return;
 311
 312                 // Iterate over the list of people who accept me, and remove all entries
 313                 for (std::list<callerid_data *>::iterator it = userdata->wholistsme.begin(); it != userdata->wholistsme.end(); it++)
 314                 {
 315                         callerid_data *dat = *(it);
 316
 317                         // Find me on their callerid list
 318                         std::set<User *>::iterator it2 = dat->accepting.find(who);
 319
 320                         if (it2 != dat->accepting.end())
 321                                 dat->accepting.erase(it2);
 322                 }
 323
 324                 userdata->wholistsme.clear();
 325         }
 326
 327 public:
 328         ModuleCallerID() : cmd(this), myumode(this)
 329         {
 330         }
 331
 332         void init()
 333         {
 334                 OnRehash(NULL);
 335
 336                 ServerInstance->Modules->AddService(myumode);
 337                 ServerInstance->Modules->AddService(cmd);
 338                 ServerInstance->Modules->AddService(cmd.extInfo);
 339
 340                 Implementation eventlist[] = { I_OnRehash, I_OnUserPostNick, I_OnUserQuit, I_On005Numeric, I_OnUserPreNotice, I_OnUserPreMessage };
 341                 ServerInstance->Modules->Attach(eventlist, this, sizeof(eventlist)/sizeof(Implementation));
 342         }
 343
 344         virtual ~ModuleCallerID()
 345         {
 346         }
 347
 348         virtual Version GetVersion()
 349         {
 350                 return Version("Implementation of callerid, usermode +g, /accept", VF_COMMON | VF_VENDOR);
 351         }
 352
 353         virtual void On005Numeric(std::string& output)
 354         {
 355                 output += " CALLERID=g";
 356         }
 357
 358         ModResult PreText(User* user, User* dest, std::string& text)
 359         {
 360                 if (!dest->IsModeSet('g'))
 361                         return MOD_RES_PASSTHRU;
 362
 363                 if (operoverride && IS_OPER(user))
 364                         return MOD_RES_PASSTHRU;
 365
 366                 callerid_data* dat = cmd.extInfo.get(dest, true);
 367                 std::set<User*>::iterator i = dat->accepting.find(user);
 368
 369                 if (i == dat->accepting.end())
 370                 {
 371                         time_t now = ServerInstance->Time();
 372                         /* +g and *not* accepted */
 373                         user->WriteNumeric(716, "%s %s :is in +g mode (server-side ignore).", user->nick.c_str(), dest->nick.c_str());
 374                         if (now > (dat->lastnotify + (time_t)notify_cooldown))
 375                         {
 376                                 user->WriteNumeric(717, "%s %s :has been informed that you messaged them.", user->nick.c_str(), dest->nick.c_str());
 377                                 dest->SendText(":%s 718 %s %s %s@%s :is messaging you, and you have umode +g. Use /ACCEPT +%s to allow.",
 378                                         ServerInstance->Config->ServerName.c_str(), dest->nick.c_str(), user->nick.c_str(), user->ident.c_str(), user->dhost.c_str(), user->nick.c_str());
 379                                 dat->lastnotify = now;
 380                         }
 381                         return MOD_RES_DENY;
 382                 }
 383                 return MOD_RES_PASSTHRU;
 384         }
 385
 386         virtual ModResult OnUserPreMessage(User* user, void* dest, int target_type, std::string& text, char status, CUList &exempt_list)
 387         {
 388                 if (IS_LOCAL(user) && target_type == TYPE_USER)
 389                         return PreText(user, (User*)dest, text);
 390
 391                 return MOD_RES_PASSTHRU;
 392         }
 393
 394         virtual ModResult OnUserPreNotice(User* user, void* dest, int target_type, std::string& text, char status, CUList &exempt_list)
 395         {
 396                 if (IS_LOCAL(user) && target_type == TYPE_USER)
 397                         return PreText(user, (User*)dest, text);
 398
 399                 return MOD_RES_PASSTHRU;
 400         }
 401
 402         void OnUserPostNick(User* user, const std::string& oldnick)
 403         {
 404                 if (!tracknick)
 405                         RemoveFromAllAccepts(user);
 406         }
 407
 408         void OnUserQuit(User* user, const std::string& message, const std::string& oper_message)
 409         {
 410                 RemoveFromAllAccepts(user);
 411         }
 412
 413         virtual void OnRehash(User* user)
 414         {
 415                 ConfigTag* tag = ServerInstance->Config->ConfValue("callerid");
 416                 cmd.maxaccepts = tag->getInt("maxaccepts", 16);
 417                 operoverride = tag->getBool("operoverride");
 418                 tracknick = tag->getBool("tracknick");
 419                 notify_cooldown = tag->getInt("cooldown", 60);
 420         }
 421 };
 422
 423 MODULE_INIT(ModuleCallerID)
 424
 425