src/cmd_kline.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
   6  *                     E-mail:
   7  *              <brain@chatspike.net>
   8  *              <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *          the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 #include "configreader.h"
  18 #include "users.h"
  19 #include "modules.h"
  20 #include "xline.h"
  21 #include "commands/cmd_kline.h"
  22
  23 void cmd_kline::Handle (const char** parameters, int pcnt, userrec *user)
  24 {
  25         if (pcnt >= 3)
  26         {
  27                 if (ServerInstance->HostMatchesEveryone(parameters[0],user))
  28                         return;
  29
  30                 if (!strchr(parameters[0],'@'))
  31                 {
  32                         user->WriteServ("NOTICE %s :*** K-Line must contain a username, e.g. *@%s",user->nick,parameters[0]);
  33                         return;
  34                 }
  35
  36                 ServerInstance->XLines->add_kline(ServerInstance->Duration(parameters[1]),user->nick,parameters[2],parameters[0]);
  37                 FOREACH_MOD(I_OnAddKLine,OnAddKLine(ServerInstance->Duration(parameters[1]), user, parameters[2], parameters[0]));
  38
  39                 if (!ServerInstance->Duration(parameters[1]))
  40                 {
  41                         ServerInstance->SNO->WriteToSnoMask('x',"%s added permanent K-line for %s.",user->nick,parameters[0]);
  42                 }
  43                 else
  44                 {
  45                         ServerInstance->SNO->WriteToSnoMask('x',"%s added timed K-line for %s, expires in %d seconds.",user->nick,parameters[0],ServerInstance->Duration(parameters[1]));
  46                 }
  47
  48                 ServerInstance->XLines->apply_lines(APPLY_KLINES);
  49         }
  50         else
  51         {
  52                 if (ServerInstance->XLines->del_kline(parameters[0]))
  53                 {
  54                         FOREACH_MOD(I_OnDelKLine,OnDelKLine(user, parameters[0]));
  55                         ServerInstance->SNO->WriteToSnoMask('x',"%s Removed K-line on %s.",user->nick,parameters[0]);
  56                 }
  57                 else
  58                 {
  59                         user->WriteServ("NOTICE %s :*** K-Line %s not found in list, try /stats k.",user->nick,parameters[0]);
  60                 }
  61         }
  62 }
  63