src/modules/m_svshold.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2008 InspIRCd Development Team
   6  * See: http://www.inspircd.org/wiki/index.php/Credits
   7  *
   8  * This program is free but copyrighted software; see
   9  *            the file COPYING for details.
  10  *
  11  * ---------------------------------------------------
  12  */
  13
  14 #include "inspircd.h"
  15
  16 /* $ModDesc: Implements SVSHOLD. Like Q:Lines, but can only be added/removed by Services. */
  17
  18 /** Holds a SVSHold item
  19  */
  20 class SVSHold : public classbase
  21 {
  22 public:
  23         std::string nickname;
  24         std::string set_by;
  25         time_t set_on;
  26         long length;
  27         std::string reason;
  28
  29         SVSHold()
  30         {
  31         }
  32
  33         SVSHold(const std::string &nn, const std::string &sb, const time_t so, const long ln, const std::string &rs) : nickname(nn), set_by(sb), set_on(so), length(ln), reason(rs)
  34         {
  35         }
  36 };
  37
  38
  39 bool SVSHoldComp(const SVSHold* ban1, const SVSHold* ban2);
  40
  41 typedef std::vector<SVSHold*> SVSHoldlist;
  42 typedef std::map<irc::string, SVSHold*> SVSHoldMap;
  43
  44 /* SVSHolds is declared here, as our type is right above. Don't try move it. */
  45 SVSHoldlist SVSHolds;
  46 SVSHoldMap HoldMap;
  47
  48 /** Handle /SVSHold
  49  */
  50 class CommandSvshold : public Command
  51 {
  52  public:
  53         CommandSvshold(InspIRCd* Me) : Command(Me, "SVSHOLD", 'o', 1)
  54         {
  55                 this->source = "m_svshold.so";
  56                 this->syntax = "<nickname> [<duration> :<reason>]";
  57                 TRANSLATE4(TR_NICK, TR_TEXT, TR_TEXT, TR_END);
  58         }
  59
  60         CmdResult Handle(const char** parameters, int pcnt, User *user)
  61         {
  62                 /* syntax: svshold nickname time :reason goes here */
  63                 /* 'time' is a human-readable timestring, like 2d3h2s. */
  64
  65                 if (!ServerInstance->ULine(user->server))
  66                 {
  67                         /* don't allow SVSHOLD from non-ulined clients */
  68                         return CMD_FAILURE;
  69                 }
  70
  71                 if (pcnt == 1)
  72                 {
  73                         SVSHoldMap::iterator n = HoldMap.find(parameters[0]);
  74                         if (n != HoldMap.end())
  75                         {
  76                                 /* form: svshold nickname removes a hold. */
  77                                 for (SVSHoldlist::iterator iter = SVSHolds.begin(); iter != SVSHolds.end(); iter++)
  78                                 {
  79                                         if (parameters[0] == assign((*iter)->nickname))
  80                                         {
  81                                                 unsigned long remaining = 0;
  82                                                 if ((*iter)->length)
  83                                                 {
  84                                                         remaining = ((*iter)->set_on + (*iter)->length) - ServerInstance->Time();
  85                                                         user->WriteServ( "386 %s %s :Removed SVSHOLD with %lu seconds left before expiry (%s)", user->nick, (*iter)->nickname.c_str(), remaining, (*iter)->reason.c_str());
  86                                                 }
  87                                                 else
  88                                                 {
  89                                                         user->WriteServ( "386 %s %s :Removed permanent SVSHOLD (%s)", user->nick, (*iter)->nickname.c_str(), (*iter)->reason.c_str());
  90                                                 }
  91                                                 SVSHolds.erase(iter);
  92                                                 break;
  93                                         }
  94                                 }
  95
  96                                 HoldMap.erase(n);
  97                                 delete n->second;
  98                         }
  99                 }
 100                 else if (pcnt >= 2)
 101                 {
 102                         /* full form to add a SVSHold */
 103                         if (ServerInstance->IsNick(parameters[0]))
 104                         {
 105                                 // parameters[0] = w00t
 106                                 // parameters[1] = 1h3m2s
 107                                 // parameters[2] = Registered nickname
 108
 109                                 /* Already exists? */
 110                                 if (HoldMap.find(parameters[0]) != HoldMap.end())
 111                                 {
 112                                         user->WriteServ( "385 %s %s :SVSHOLD already exists", user->nick, parameters[0]);
 113                                         return CMD_FAILURE;
 114                                 }
 115
 116                                 long length = ServerInstance->Duration(parameters[1]);
 117                                 std::string reason = (pcnt > 2) ? parameters[2] : "No reason supplied";
 118
 119                                 SVSHold* S = new SVSHold(parameters[0], user->nick, ServerInstance->Time(), length, reason);
 120                                 SVSHolds.push_back(S);
 121                                 HoldMap[parameters[0]] = S;
 122
 123                                 std::sort(SVSHolds.begin(), SVSHolds.end(), SVSHoldComp);
 124
 125                                 if(length > 0)
 126                                 {
 127                                         user->WriteServ( "385 %s %s :Added %lu second SVSHOLD (%s)", user->nick, parameters[0], length, reason.c_str());
 128                                         ServerInstance->WriteOpers("*** %s added %lu second SVSHOLD on %s (%s)", user->nick, length, parameters[0], reason.c_str());
 129                                 }
 130                                 else
 131                                 {
 132                                         user->WriteServ( "385 %s %s :Added permanent SVSHOLD on %s (%s)", user->nick, parameters[0], parameters[0], reason.c_str());
 133                                         ServerInstance->WriteOpers("*** %s added permanent SVSHOLD on %s (%s)", user->nick, parameters[0], reason.c_str());
 134                                 }
 135                         }
 136                         else
 137                         {
 138                                 /* as this is primarily a Services command, do not provide an error */
 139                                 return CMD_FAILURE;
 140                         }
 141                 }
 142
 143                 return CMD_SUCCESS;
 144         }
 145 };
 146
 147 bool SVSHoldComp(const SVSHold* ban1, const SVSHold* ban2)
 148 {
 149         return ((ban1->set_on + ban1->length) < (ban2->set_on + ban2->length));
 150 }
 151
 152 class ModuleSVSHold : public Module
 153 {
 154         CommandSvshold *mycommand;
 155
 156
 157  public:
 158         ModuleSVSHold(InspIRCd* Me) : Module(Me)
 159         {
 160                 mycommand = new CommandSvshold(Me);
 161                 ServerInstance->AddCommand(mycommand);
 162                 Implementation eventlist[] = { I_OnUserPreNick, I_OnSyncOtherMetaData, I_OnDecodeMetaData, I_OnStats };
 163                 ServerInstance->Modules->Attach(eventlist, this, 4);
 164         }
 165
 166
 167         virtual int OnStats(char symbol, User* user, string_list &results)
 168         {
 169                 ExpireBans();
 170
 171                 if(symbol == 'S')
 172                 {
 173                         for(SVSHoldlist::iterator iter = SVSHolds.begin(); iter != SVSHolds.end(); iter++)
 174                         {
 175                                 unsigned long remaining = ((*iter)->set_on + (*iter)->length) - ServerInstance->Time();
 176                                 results.push_back(std::string(ServerInstance->Config->ServerName)+" 210 "+user->nick+" "+(*iter)->nickname.c_str()+" "+(*iter)->set_by+" "+ConvToStr((*iter)->set_on)+" "+ConvToStr((*iter)->length)+" "+ConvToStr(remaining)+" :"+(*iter)->reason);
 177                         }
 178                 }
 179
 180                 return 0;
 181         }
 182
 183         virtual int OnUserPreNick(User *user, const std::string &newnick)
 184         {
 185                 ExpireBans();
 186
 187                 /* check SVSHolds in here, and apply as necessary. */
 188                 SVSHoldMap::iterator n = HoldMap.find(assign(newnick));
 189                 if (n != HoldMap.end())
 190                 {
 191                         user->WriteServ( "432 %s %s :Reserved nickname: %s", user->nick, newnick.c_str(), n->second->reason.c_str());
 192                         return 1;
 193                 }
 194                 return 0;
 195         }
 196
 197         virtual void OnSyncOtherMetaData(Module* proto, void* opaque, bool displayable)
 198         {
 199                 for(SVSHoldMap::iterator iter = HoldMap.begin(); iter != HoldMap.end(); iter++)
 200                 {
 201                         proto->ProtoSendMetaData(opaque, TYPE_OTHER, NULL, "SVSHold", EncodeSVSHold(iter->second));
 202                 }
 203         }
 204
 205         virtual void OnDecodeMetaData(int target_type, void* target, const std::string &extname, const std::string &extdata)
 206         {
 207                 if((target_type == TYPE_OTHER) && (extname == "SVSHold"))
 208                 {
 209                         SVSHold* S = DecodeSVSHold(extdata); /* NOTE: Allocates a new SVSHold* */
 210                         if (HoldMap.find(assign(S->nickname)) == HoldMap.end())
 211                         {
 212                                 SVSHolds.push_back(S);
 213                                 HoldMap[assign(S->nickname)] = S;
 214                                 std::sort(SVSHolds.begin(), SVSHolds.end(), SVSHoldComp);
 215                         }
 216                         else
 217                         {
 218                                 delete S;
 219                         }
 220                 }
 221         }
 222
 223         virtual ~ModuleSVSHold()
 224         {
 225         }
 226
 227         virtual Version GetVersion()
 228         {
 229                 return Version(1, 1, 0, 1, VF_COMMON | VF_VENDOR, API_VERSION);
 230         }
 231
 232         std::string EncodeSVSHold(const SVSHold* ban)
 233         {
 234                 std::ostringstream stream;
 235                 stream << ban->nickname << " " << ban->set_by << " " << ban->set_on << " " << ban->length << " :" << ban->reason;
 236                 return stream.str();
 237         }
 238
 239         SVSHold* DecodeSVSHold(const std::string &data)
 240         {
 241                 SVSHold* res = new SVSHold();
 242                 int set_on;
 243                 irc::tokenstream tokens(data);
 244                 tokens.GetToken(res->nickname);
 245                 tokens.GetToken(res->set_by);
 246                 tokens.GetToken(set_on);
 247                 res->set_on = set_on;
 248                 tokens.GetToken(res->length);
 249                 tokens.GetToken(res->reason);
 250                 return res;
 251         }
 252
 253         void ExpireBans()
 254         {
 255                 SVSHoldlist::iterator iter,safeiter;
 256                 for (iter = SVSHolds.begin(); iter != SVSHolds.end(); iter++)
 257                 {
 258                         /* 0 == permanent, don't mess with them! -- w00t */
 259                         if ((*iter)->length != 0)
 260                         {
 261                                 if ((*iter)->set_on + (*iter)->length <= ServerInstance->Time())
 262                                 {
 263                                         ServerInstance->Log(DEBUG, "m_svshold.so: hold on %s expired, removing...", (*iter)->nickname.c_str());
 264                                         ServerInstance->WriteOpers("*** %li second SVSHOLD on %s (%s) set %u seconds ago expired", (*iter)->length, (*iter)->nickname.c_str(), (*iter)->reason.c_str(), ServerInstance->Time() - (*iter)->set_on);
 265                                         HoldMap.erase(assign((*iter)->nickname));
 266                                         delete *iter;
 267                                         safeiter = iter;
 268                                         --iter;
 269                                         SVSHolds.erase(safeiter);
 270                                 }
 271                         }
 272                 }
 273         }
 274 };
 275
 276 MODULE_INIT(ModuleSVSHold)