modules/operserv/rakill.C

/*
 * Copyright © 2006 Robin Burchell <surreal.w00t@gmail.com>
 * Rights to this code are as defined in doc/pod/license.pod.
 *
 * Regexp-based AKILL implementation.
 *
 * $Id: rakill.C,v 1.5 2007-08-28 17:08:11 pippijn Exp $
 */

/*
 * @makill regex!here.+ [akill reason]
 *  Matches `nick!user@host realname here' for each client against a given regex, and places akills.
 *  CHECK REGEX USING @RMATCH FIRST!
 */

#include <boost/foreach.hpp>

#include "atheme.h"
#include <ermyth/module.h>
#include <ermyth/database.h>
#include <account/myuser.h>

static char const rcsid[] = "$Id: rakill.C,v 1.5 2007-08-28 17:08:11 pippijn Exp $";

REGISTER_MODULE ("operserv/rakill", false, "The Ermyth Team <http://ermyth.schmorp.de>");

E cmdvec os_cmdtree;
E helpvec os_helptree;

static void os_cmd_rakill (sourceinfo_t *si, int parc, char *parv[]);

command_t const os_rakill = { "RAKILL", N_("Sets a group of AKILLs against users matching a specific regex pattern."), PRIV_MASS_AKILL, 1, os_cmd_rakill };

bool
_modinit (module *m)
{
  os_cmdtree << os_rakill;
  help_addentry (os_helptree, "RAKILL", "help/operserv/rakill", NULL);

  return true;
}

void
_moddeinit (void)
{
  os_cmdtree >> os_rakill;
  help_delentry (os_helptree, "RAKILL");
}

static void
os_cmd_rakill (sourceinfo_t *si, int parc, char *parv[])
{
  regex_t *regex;
  char usermask[512];
  unsigned int matches = 0;
  user_t *u;
  char *args = parv[0];
  char *pattern;
  char *reason;
  user_t *source;
  int flags = 0;

  /* make sure they could have done RMATCH */
  if (!has_priv (si, PRIV_USER_AUSPEX))
    {
      command_fail (si, fault::noprivs, _("You do not have %s privilege."), PRIV_USER_AUSPEX);
      return;
    }

  if (args == NULL)
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "RAKILL");
      command_fail (si, fault::needmoreparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
      return;
    }

  pattern = regex_extract (args, &args, &flags);
  if (pattern == NULL)
    {
      command_fail (si, fault::badparams, STR_INVALID_PARAMS, "RAKILL");
      command_fail (si, fault::badparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
      return;
    }

  reason = args;
  while (*reason == ' ')
    reason++;
  if (*reason == '\0')
    {
      command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "RAKILL");
      command_fail (si, fault::needmoreparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
      return;
    }

  regex = regex_create (pattern, flags);
  if (regex == NULL)
    {
      command_fail (si, fault::badparams, _("The provided regex \2%s\2 is invalid."), pattern);
      return;
    }

  source = si->su;
  /* try to find them on IRC, otherwise use operserv */
  if (source == NULL)
    source = si->smu != NULL && !si->smu->logins.empty ()
     ? si->smu->logins.back ()
     : si->service->me;
  sprintf (usermask, "%s!%s@%s %s", source->nick, source->user, source->host, source->gecos);
  if (regex_match (regex, (char *) usermask))
    {
      regex_destroy (regex);
      command_fail (si, fault::noprivs, _("The provided regex matches you, refusing RAKILL."));
      snoop ("RAKILL:REFUSED: \2%s\2 by \2%s\2 (%s) (matches self)", pattern, get_oper_name (si), reason);
      wallops ("\2%s\2 attempted to do RAKILL on \2%s\2 matching self", get_oper_name (si), pattern);
      logcommand (si, CMDLOG_ADMIN, "RAKILL %s %s (refused, matches self)", pattern, reason);
      return;
    }

  snoop ("RAKILL: \2%s\2 by \2%s\2 (%s)", pattern, get_oper_name (si), reason);

  foreach (user_pair &up, userlist)
    {
      u = up.second;
      sprintf (usermask, "%s!%s@%s %s", u->nick, u->user, u->host, u->gecos);
      
      if (regex_match (regex, (char *) usermask))
        {
          /* match */
          command_success_nodata (si, _("\2Match:\2  %s!%s@%s %s - akilling"), u->nick, u->user, u->host, u->gecos);
          phandler->kline_sts ("*", "*", u->host, 604800, reason);
          matches++;
        }
    }
  
  regex_destroy (regex);
  command_success_nodata (si, _("\2%d\2 matches for %s akilled."), matches, pattern);
  logcommand (si, CMDLOG_ADMIN, "RAKILL %s %s (%d matches)", pattern, reason, matches);
}
Revision:	1.6
Committed:	Thu Aug 30 19:56:24 2007 UTC (19 years, 1 month ago) by pippijn
Content type:	text/plain
Branch:	MAIN
Changes since 1.5:	+11 -11 lines
Log Message:	- put faultcodes into their own namespace - removed old files - limited header garbage in atheme.h - macros to inline bools for connection_t::is_* - put some connection_t functions into the connection_t class
#	User	Rev	Content
1	pippijn	1.1	/*
2	pippijn	1.5	* Copyright © 2006 Robin Burchell <surreal.w00t@gmail.com>
3	pippijn	1.2	* Rights to this code are as defined in doc/pod/license.pod.
4	pippijn	1.1	*
5			* Regexp-based AKILL implementation.
6			*
7	pippijn	1.6	* $Id: rakill.C,v 1.5 2007-08-28 17:08:11 pippijn Exp $
8	pippijn	1.1	*/
9
10			/*
11			* @makill regex!here.+ [akill reason]
12			* Matches `nick!user@host realname here' for each client against a given regex, and places akills.
13			* CHECK REGEX USING @RMATCH FIRST!
14			*/
15	pippijn	1.5
16			#include <boost/foreach.hpp>
17
18	pippijn	1.1	#include "atheme.h"
19	pippijn	1.5	#include <ermyth/module.h>
20			#include <ermyth/database.h>
21	pippijn	1.1	#include <account/myuser.h>
22
23	pippijn	1.6	static char const rcsid[] = "$Id: rakill.C,v 1.5 2007-08-28 17:08:11 pippijn Exp $";
24	pippijn	1.1
25	pippijn	1.5	REGISTER_MODULE ("operserv/rakill", false, "The Ermyth Team <http://ermyth.schmorp.de>");
26	pippijn	1.1
27	pippijn	1.5	E cmdvec os_cmdtree;
28			E helpvec os_helptree;
29	pippijn	1.1
30			static void os_cmd_rakill (sourceinfo_t si, int parc, char parv[]);
31
32	pippijn	1.5	command_t const os_rakill = { "RAKILL", N_("Sets a group of AKILLs against users matching a specific regex pattern."), PRIV_MASS_AKILL, 1, os_cmd_rakill };
33	pippijn	1.1
34	pippijn	1.5	bool
35			_modinit (module *m)
36	pippijn	1.1	{
37			os_cmdtree << os_rakill;
38	pippijn	1.4	help_addentry (os_helptree, "RAKILL", "help/operserv/rakill", NULL);
39	pippijn	1.5
40			return true;
41	pippijn	1.1	}
42
43			void
44			_moddeinit (void)
45			{
46			os_cmdtree >> os_rakill;
47			help_delentry (os_helptree, "RAKILL");
48			}
49
50			static void
51			os_cmd_rakill (sourceinfo_t si, int parc, char parv[])
52			{
53			regex_t *regex;
54			char usermask[512];
55			unsigned int matches = 0;
56			user_t *u;
57			char *args = parv[0];
58			char *pattern;
59			char *reason;
60			user_t *source;
61			int flags = 0;
62
63			/* make sure they could have done RMATCH */
64			if (!has_priv (si, PRIV_USER_AUSPEX))
65			{
66	pippijn	1.6	command_fail (si, fault::noprivs, _("You do not have %s privilege."), PRIV_USER_AUSPEX);
67	pippijn	1.1	return;
68			}
69
70			if (args == NULL)
71			{
72	pippijn	1.6	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "RAKILL");
73			command_fail (si, fault::needmoreparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
74	pippijn	1.1	return;
75			}
76
77			pattern = regex_extract (args, &args, &flags);
78			if (pattern == NULL)
79			{
80	pippijn	1.6	command_fail (si, fault::badparams, STR_INVALID_PARAMS, "RAKILL");
81			command_fail (si, fault::badparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
82	pippijn	1.1	return;
83			}
84
85			reason = args;
86			while (*reason == ' ')
87			reason++;
88			if (*reason == '\0')
89			{
90	pippijn	1.6	command_fail (si, fault::needmoreparams, STR_INSUFFICIENT_PARAMS, "RAKILL");
91			command_fail (si, fault::needmoreparams, _("Syntax: RAKILL /<regex>/[i] <reason>"));
92	pippijn	1.1	return;
93			}
94
95			regex = regex_create (pattern, flags);
96			if (regex == NULL)
97			{
98	pippijn	1.6	command_fail (si, fault::badparams, _("The provided regex \2%s\2 is invalid."), pattern);
99	pippijn	1.1	return;
100			}
101
102			source = si->su;
103			/* try to find them on IRC, otherwise use operserv */
104			if (source == NULL)
105			source = si->smu != NULL && !si->smu->logins.empty ()
106			? si->smu->logins.back ()
107			: si->service->me;
108			sprintf (usermask, "%s!%s@%s %s", source->nick, source->user, source->host, source->gecos);
109			if (regex_match (regex, (char *) usermask))
110			{
111			regex_destroy (regex);
112	pippijn	1.6	command_fail (si, fault::noprivs, _("The provided regex matches you, refusing RAKILL."));
113	pippijn	1.1	snoop ("RAKILL:REFUSED: \2%s\2 by \2%s\2 (%s) (matches self)", pattern, get_oper_name (si), reason);
114			wallops ("\2%s\2 attempted to do RAKILL on \2%s\2 matching self", get_oper_name (si), pattern);
115			logcommand (si, CMDLOG_ADMIN, "RAKILL %s %s (refused, matches self)", pattern, reason);
116			return;
117			}
118
119			snoop ("RAKILL: \2%s\2 by \2%s\2 (%s)", pattern, get_oper_name (si), reason);
120
121	pippijn	1.5	foreach (user_pair &up, userlist)
122			{
123			u = up.second;
124			sprintf (usermask, "%s!%s@%s %s", u->nick, u->user, u->host, u->gecos);
125
126			if (regex_match (regex, (char *) usermask))
127			{
128			/* match */
129			command_success_nodata (si, _("\2Match:\2 %s!%s@%s %s - akilling"), u->nick, u->user, u->host, u->gecos);
130			phandler->kline_sts ("", "", u->host, 604800, reason);
131			matches++;
132			}
133			}
134
135	pippijn	1.1	regex_destroy (regex);
136			command_success_nodata (si, _("\2%d\2 matches for %s akilled."), matches, pattern);
137			logcommand (si, CMDLOG_ADMIN, "RAKILL %s %s (%d matches)", pattern, reason, matches);
138			}