modules/core/m_kill.c

/*
 *  ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
 *  m_kill.c: Kills a user.
 *
 *  Copyright (C) 2002 by the past and present ircd coders, and others.
 *
 *  This program 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; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  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, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 *  USA
 *
 *  $Id$
 */

#include "stdinc.h"
#include "list.h"
#include "client.h"
#include "hash.h"       /* for find_client() */
#include "ircd.h"
#include "numeric.h"
#include "log.h"
#include "s_serv.h"
#include "conf.h"
#include "send.h"
#include "whowas.h"
#include "irc_string.h"
#include "sprintf_irc.h"
#include "parse.h"
#include "modules.h"


static char buf[IRCD_BUFSIZE];

static void relay_kill(struct Client *, struct Client *, struct Client *,
                       const char *, const char *);

/* mo_kill()
 *  parv[0] = sender prefix
 *  parv[1] = kill victim
 *  parv[2] = kill path
 */
static void
mo_kill(struct Client *client_p, struct Client *source_p,
        int parc, char *parv[])
{
  struct Client *target_p;
  const char *inpath = client_p->name;
  char *user;
  char *reason;
  char def_reason[] = "No reason";

  user   = parv[1];
  reason = parv[2]; /* Either defined or NULL (parc >= 2!!) */

  if (*user == '\0')
  {
    sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
               me.name, source_p->name, "KILL");
    return;
  }

  if (IsDigit(*user))   /* opers shouldn't be trying uids anyway ;-) */
    return;

  if (!HasOFlag(source_p, OPER_FLAG_GLOBAL_KILL|OPER_FLAG_K))
  {
    sendto_one(source_p, form_str(ERR_NOPRIVILEGES),
               me.name, source_p->name);
    return;
  }

  if (!EmptyString(reason))
  {
    if (strlen(reason) > (size_t)KILLLEN)
      reason[KILLLEN] = '\0';
  }
  else
    reason = def_reason;

  if ((target_p = hash_find_client(user)) == NULL)
  {
    /*
     * If the user has recently changed nick, automatically
     * rewrite the KILL for this new nickname--this keeps
     * servers in synch when nick change and kill collide
     */
    if ((target_p = get_history(user, 
                                (time_t)ConfigFileEntry.kill_chase_time_limit))
                                == NULL)
    {
      sendto_one(source_p, form_str(ERR_NOSUCHNICK),
                 me.name, source_p->name, user);
      return;
    }

    sendto_one(source_p, ":%s NOTICE %s :KILL changed from %s to %s",
               me.name, source_p->name, user, target_p->name);
  }

  if (IsServer(target_p) || IsMe(target_p))
  {
    sendto_one(source_p, form_str(ERR_CANTKILLSERVER),
               me.name, source_p->name);
    return;
  }

  if (!MyConnect(target_p) && !HasOFlag(source_p, OPER_FLAG_GLOBAL_KILL))
  {
    sendto_one(source_p, ":%s NOTICE %s :Nick %s isnt on your server",
               me.name, source_p->name, target_p->name);
    return;
  }

  if (MyConnect(target_p))
    sendto_one(target_p, ":%s!%s@%s KILL %s :%s", 
               source_p->name, source_p->username, source_p->host,
               target_p->name, reason);

  /*
   * Do not change the format of this message. There's no point in changing messages
   * that have been around for ever, for no reason..
   */
  sendto_realops_flags(UMODE_ALL, L_ALL,
                       "Received KILL message for %s. From %s Path: %s (%s)", 
                       target_p->name, source_p->name, me.name, reason);

  ilog(LOG_TYPE_KILL, "KILL From %s For %s Path %s (%s)",
       source_p->name, target_p->name, me.name, reason);

  /*
   * And pass on the message to other servers. Note, that if KILL
   * was changed, the message has to be sent to all links, also
   * back.
   * Suicide kills are NOT passed on --SRB
   */
  if (!MyConnect(target_p))
  {
    relay_kill(client_p, source_p, target_p, inpath, reason);
      /*
       * Set FLAGS_KILLED. This prevents exit_one_client from sending
       * the unnecessary QUIT for this. (This flag should never be
       * set in any other place)
       */
    AddFlag(target_p, FLAGS_KILLED);
  }

  snprintf(buf, sizeof(buf), "Killed (%s (%s))", source_p->name, reason);
  exit_client(target_p, source_p, buf);
}

/* ms_kill()
 *  parv[0] = sender prefix
 *  parv[1] = kill victim
 *  parv[2] = kill path and reason
 */
static void
ms_kill(struct Client *client_p, struct Client *source_p,
        int parc, char *parv[])
{
  struct Client *target_p;
  char *user;
  char *reason;
  const char *path;
  char def_reason[] = "No reason";

  if (EmptyString(parv[1]))
  {
    sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
               me.name, source_p->name, "KILL");
    return;
  }

  user = parv[1];

  if (EmptyString(parv[2]))
  {
    reason = def_reason;

    /* hyb6 takes the nick of the killer from the path *sigh* --fl_ */
    path = source_p->name;
  }
  else
  {
    reason = strchr(parv[2], ' ');

    if (reason != NULL)
      *reason++ = '\0';
    else
      reason = def_reason;

    path = parv[2];
  }

  if ((target_p = find_person(client_p, user)) == NULL)
  {
      /* If the user has recently changed nick, but only if its 
       * not an uid, automatically rewrite the KILL for this new nickname.
       * --this keeps servers in synch when nick change and kill collide
       */
    if (IsDigit(*user)) /* Somehow an uid was not found in the hash ! */
      return;
    if ((target_p = get_history(user,
                       (time_t)ConfigFileEntry.kill_chase_time_limit))
       == NULL)
    {
      sendto_one(source_p, form_str(ERR_NOSUCHNICK),
                 me.name, source_p->name, user);
      return;
    }

    sendto_one(source_p,":%s NOTICE %s :KILL changed from %s to %s",
               me.name, source_p->name, user, target_p->name);
  }

  if (IsServer(target_p) || IsMe(target_p))
  {
    sendto_one(source_p, form_str(ERR_CANTKILLSERVER),
               me.name, source_p->name);
    return;
  }

  if (MyConnect(target_p))
  {
    if (IsServer(source_p))
    {
      /* dont send clients kills from a hidden server */
      if ((IsHidden(source_p) || ConfigServerHide.hide_servers) && !HasUMode(target_p, UMODE_OPER))
        sendto_one(target_p, ":%s KILL %s :%s",
                   me.name, target_p->name, reason);
      else
        sendto_one(target_p, ":%s KILL %s :%s",
                   source_p->name, target_p->name, reason);
    }
    else
      sendto_one(target_p, ":%s!%s@%s KILL %s :%s",
                 source_p->name, source_p->username, source_p->host,
                 target_p->name, reason);
  }

  /* Be warned, this message must be From %s, or it confuses clients
   * so dont change it to From: or the case or anything! -- fl -- db */
  /* path must contain at least 2 !'s, or bitchx falsely declares it
   * local --fl
   */
  if (HasUMode(source_p, UMODE_OPER)) /* send it normally */
    sendto_realops_flags(UMODE_ALL, L_ALL,
                         "Received KILL message for %s. From %s Path: %s!%s!%s!%s %s",
                         target_p->name, source_p->name, source_p->servptr->name, 
                         source_p->host, source_p->username, source_p->name, reason);
  else
    sendto_realops_flags(UMODE_SKILL, L_ALL,
                         "Received KILL message for %s. From %s %s",
                         target_p->name, source_p->name, reason);

  ilog(LOG_TYPE_KILL, "KILL From %s For %s Path %s %s",
       source_p->name, target_p->name, source_p->name, reason);

  relay_kill(client_p, source_p, target_p, path, reason);
  AddFlag(target_p, FLAGS_KILLED);

  /* reason comes supplied with its own ()'s */
  if (IsServer(source_p) && (IsHidden(source_p) || ConfigServerHide.hide_servers))
    snprintf(buf, sizeof(buf), "Killed (%s %s)", me.name, reason);
  else
    snprintf(buf, sizeof(buf), "Killed (%s %s)", source_p->name, reason);

  exit_client(target_p, source_p, buf);
}

static void
relay_kill(struct Client *one, struct Client *source_p,
           struct Client *target_p, const char *inpath, const char *reason)
{
  dlink_node *ptr;
  struct Client *client_p;
  const char *from, *to;

  DLINK_FOREACH(ptr, serv_list.head)
  {
    client_p = ptr->data;

    if (client_p == NULL || client_p == one)
      continue;

    /* use UID if possible */
    from = ID_or_name(source_p, client_p);
    to = ID_or_name(target_p, client_p);

    if (MyClient(source_p))
    {
        sendto_one(client_p, ":%s KILL %s :%s!%s!%s!%s (%s)",
                   from, to,
                   me.name, source_p->host, source_p->username,
                   source_p->name, reason);
    }
    else
    {
        sendto_one(client_p, ":%s KILL %s :%s %s",
                   from, to, inpath, reason);
    }
  }
}

static struct Message kill_msgtab = {
  "KILL", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
  {m_unregistered, m_not_oper, ms_kill, m_ignore, mo_kill, m_ignore}
};

static void
module_init(void)
{
  mod_add_cmd(&kill_msgtab);
}

static void
module_exit(void)
{
  mod_del_cmd(&kill_msgtab);
}

struct module module_entry = {
  .node    = { NULL, NULL, NULL },
  .name    = NULL,
  .version = "$Revision$",
  .handle  = NULL,
  .modinit = module_init,
  .modexit = module_exit,
  .flags   = MODULE_FLAG_CORE
};
Revision:	1309
Committed:	Sun Mar 25 11:24:18 2012 UTC (14 years, 6 months ago) by michael
Content type:	text/x-csrc
Original Path:	*ircd-hybrid-8/modules/core/m_kill.c*
File size:	9532 byte(s)
Log Message:	- renaming files: ircd_parser.y -> conf_parser.y ircd_lexer.l -> conf_lexer.l s_conf.c -> conf.c s_conf.h -> conf.h s_log.c -> log.c s_log.h -> log.h
#	User	Rev	Content
1	adx	30	/*
2			* ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3			* m_kill.c: Kills a user.
4			*
5			* Copyright (C) 2002 by the past and present ircd coders, and others.
6			*
7			* This program is free software; you can redistribute it and/or modify
8			* it under the terms of the GNU General Public License as published by
9			* the Free Software Foundation; either version 2 of the License, or
10			* (at your option) any later version.
11			*
12			* This program is distributed in the hope that it will be useful,
13			* but WITHOUT ANY WARRANTY; without even the implied warranty of
14			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15			* GNU General Public License for more details.
16			*
17			* You should have received a copy of the GNU General Public License
18			* along with this program; if not, write to the Free Software
19			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
20			* USA
21			*
22	knight	31	* $Id$
23	adx	30	*/
24
25			#include "stdinc.h"
26	michael	1011	#include "list.h"
27	adx	30	#include "client.h"
28			#include "hash.h" /* for find_client() */
29			#include "ircd.h"
30			#include "numeric.h"
31	michael	1309	#include "log.h"
32	adx	30	#include "s_serv.h"
33	michael	1309	#include "conf.h"
34	adx	30	#include "send.h"
35			#include "whowas.h"
36			#include "irc_string.h"
37			#include "sprintf_irc.h"
38			#include "parse.h"
39			#include "modules.h"
40
41
42			static char buf[IRCD_BUFSIZE];
43
44			static void relay_kill(struct Client , struct Client , struct Client *,
45			const char , const char );
46
47			/* mo_kill()
48			* parv[0] = sender prefix
49			* parv[1] = kill victim
50			* parv[2] = kill path
51			*/
52			static void
53			mo_kill(struct Client client_p, struct Client source_p,
54			int parc, char *parv[])
55			{
56			struct Client *target_p;
57			const char *inpath = client_p->name;
58			char *user;
59			char *reason;
60			char def_reason[] = "No reason";
61
62			user = parv[1];
63			reason = parv[2]; /* Either defined or NULL (parc >= 2!!) */
64
65			if (*user == '\0')
66			{
67			sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
68			me.name, source_p->name, "KILL");
69			return;
70			}
71
72			if (IsDigit(user)) / opers shouldn't be trying uids anyway ;-) */
73			return;
74
75	michael	1219	if (!HasOFlag(source_p, OPER_FLAG_GLOBAL_KILL\|OPER_FLAG_K))
76	adx	30	{
77			sendto_one(source_p, form_str(ERR_NOPRIVILEGES),
78			me.name, source_p->name);
79			return;
80			}
81
82			if (!EmptyString(reason))
83			{
84			if (strlen(reason) > (size_t)KILLLEN)
85			reason[KILLLEN] = '\0';
86			}
87			else
88			reason = def_reason;
89
90	michael	1169	if ((target_p = hash_find_client(user)) == NULL)
91	adx	30	{
92	michael	1136	/*
93			* If the user has recently changed nick, automatically
94	adx	30	* rewrite the KILL for this new nickname--this keeps
95			* servers in synch when nick change and kill collide
96			*/
97			if ((target_p = get_history(user,
98			(time_t)ConfigFileEntry.kill_chase_time_limit))
99			== NULL)
100			{
101			sendto_one(source_p, form_str(ERR_NOSUCHNICK),
102			me.name, source_p->name, user);
103			return;
104			}
105
106			sendto_one(source_p, ":%s NOTICE %s :KILL changed from %s to %s",
107			me.name, source_p->name, user, target_p->name);
108			}
109
110			if (IsServer(target_p) \|\| IsMe(target_p))
111			{
112			sendto_one(source_p, form_str(ERR_CANTKILLSERVER),
113			me.name, source_p->name);
114			return;
115			}
116
117	michael	1219	if (!MyConnect(target_p) && !HasOFlag(source_p, OPER_FLAG_GLOBAL_KILL))
118	adx	30	{
119			sendto_one(source_p, ":%s NOTICE %s :Nick %s isnt on your server",
120			me.name, source_p->name, target_p->name);
121			return;
122			}
123
124			if (MyConnect(target_p))
125			sendto_one(target_p, ":%s!%s@%s KILL %s :%s",
126			source_p->name, source_p->username, source_p->host,
127			target_p->name, reason);
128
129	michael	1136	/*
130			* Do not change the format of this message. There's no point in changing messages
131			* that have been around for ever, for no reason..
132			*/
133	adx	30	sendto_realops_flags(UMODE_ALL, L_ALL,
134			"Received KILL message for %s. From %s Path: %s (%s)",
135			target_p->name, source_p->name, me.name, reason);
136
137	michael	1247	ilog(LOG_TYPE_KILL, "KILL From %s For %s Path %s (%s)",
138	adx	30	source_p->name, target_p->name, me.name, reason);
139
140			/*
141	michael	1136	* And pass on the message to other servers. Note, that if KILL
142			* was changed, the message has to be sent to all links, also
143			* back.
144			* Suicide kills are NOT passed on --SRB
145			*/
146	adx	30	if (!MyConnect(target_p))
147			{
148			relay_kill(client_p, source_p, target_p, inpath, reason);
149			/*
150	michael	1136	* Set FLAGS_KILLED. This prevents exit_one_client from sending
151			* the unnecessary QUIT for this. (This flag should never be
152			* set in any other place)
153			*/
154	michael	1219	AddFlag(target_p, FLAGS_KILLED);
155	adx	30	}
156
157	michael	1136	snprintf(buf, sizeof(buf), "Killed (%s (%s))", source_p->name, reason);
158	adx	30	exit_client(target_p, source_p, buf);
159			}
160
161			/* ms_kill()
162			* parv[0] = sender prefix
163			* parv[1] = kill victim
164			* parv[2] = kill path and reason
165			*/
166			static void
167			ms_kill(struct Client client_p, struct Client source_p,
168			int parc, char *parv[])
169			{
170			struct Client *target_p;
171			char *user;
172			char *reason;
173			const char *path;
174			char def_reason[] = "No reason";
175
176	michael	1136	if (EmptyString(parv[1]))
177	adx	30	{
178			sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
179			me.name, source_p->name, "KILL");
180			return;
181			}
182
183			user = parv[1];
184
185			if (EmptyString(parv[2]))
186			{
187			reason = def_reason;
188
189			/* hyb6 takes the nick of the killer from the path sigh --fl_ */
190			path = source_p->name;
191			}
192			else
193			{
194			reason = strchr(parv[2], ' ');
195
196			if (reason != NULL)
197			*reason++ = '\0';
198			else
199			reason = def_reason;
200
201			path = parv[2];
202			}
203
204			if ((target_p = find_person(client_p, user)) == NULL)
205			{
206			/* If the user has recently changed nick, but only if its
207			* not an uid, automatically rewrite the KILL for this new nickname.
208			* --this keeps servers in synch when nick change and kill collide
209			*/
210	michael	1136	if (IsDigit(user)) / Somehow an uid was not found in the hash ! */
211	adx	30	return;
212	michael	1136	if ((target_p = get_history(user,
213	adx	30	(time_t)ConfigFileEntry.kill_chase_time_limit))
214			== NULL)
215			{
216			sendto_one(source_p, form_str(ERR_NOSUCHNICK),
217			me.name, source_p->name, user);
218			return;
219			}
220	michael	1136
221	adx	30	sendto_one(source_p,":%s NOTICE %s :KILL changed from %s to %s",
222			me.name, source_p->name, user, target_p->name);
223			}
224
225			if (IsServer(target_p) \|\| IsMe(target_p))
226			{
227			sendto_one(source_p, form_str(ERR_CANTKILLSERVER),
228			me.name, source_p->name);
229			return;
230			}
231
232			if (MyConnect(target_p))
233			{
234			if (IsServer(source_p))
235			{
236			/* dont send clients kills from a hidden server */
237	michael	1219	if ((IsHidden(source_p) \|\| ConfigServerHide.hide_servers) && !HasUMode(target_p, UMODE_OPER))
238	adx	30	sendto_one(target_p, ":%s KILL %s :%s",
239			me.name, target_p->name, reason);
240			else
241			sendto_one(target_p, ":%s KILL %s :%s",
242			source_p->name, target_p->name, reason);
243			}
244			else
245			sendto_one(target_p, ":%s!%s@%s KILL %s :%s",
246			source_p->name, source_p->username, source_p->host,
247			target_p->name, reason);
248			}
249
250			/* Be warned, this message must be From %s, or it confuses clients
251			* so dont change it to From: or the case or anything! -- fl -- db */
252			/* path must contain at least 2 !'s, or bitchx falsely declares it
253			* local --fl
254			*/
255	michael	1219	if (HasUMode(source_p, UMODE_OPER)) /* send it normally */
256	adx	30	sendto_realops_flags(UMODE_ALL, L_ALL,
257			"Received KILL message for %s. From %s Path: %s!%s!%s!%s %s",
258			target_p->name, source_p->name, source_p->servptr->name,
259			source_p->host, source_p->username, source_p->name, reason);
260			else
261			sendto_realops_flags(UMODE_SKILL, L_ALL,
262			"Received KILL message for %s. From %s %s",
263			target_p->name, source_p->name, reason);
264
265	michael	1247	ilog(LOG_TYPE_KILL, "KILL From %s For %s Path %s %s",
266	adx	30	source_p->name, target_p->name, source_p->name, reason);
267
268			relay_kill(client_p, source_p, target_p, path, reason);
269	michael	1219	AddFlag(target_p, FLAGS_KILLED);
270	adx	30
271			/* reason comes supplied with its own ()'s */
272			if (IsServer(source_p) && (IsHidden(source_p) \|\| ConfigServerHide.hide_servers))
273	michael	1136	snprintf(buf, sizeof(buf), "Killed (%s %s)", me.name, reason);
274	adx	30	else
275	michael	1136	snprintf(buf, sizeof(buf), "Killed (%s %s)", source_p->name, reason);
276	adx	30
277			exit_client(target_p, source_p, buf);
278			}
279
280			static void
281			relay_kill(struct Client one, struct Client source_p,
282			struct Client target_p, const char inpath, const char *reason)
283			{
284			dlink_node *ptr;
285			struct Client *client_p;
286			const char from, to;
287
288			DLINK_FOREACH(ptr, serv_list.head)
289			{
290			client_p = ptr->data;
291
292			if (client_p == NULL \|\| client_p == one)
293			continue;
294
295			/* use UID if possible */
296			from = ID_or_name(source_p, client_p);
297			to = ID_or_name(target_p, client_p);
298
299			if (MyClient(source_p))
300			{
301			sendto_one(client_p, ":%s KILL %s :%s!%s!%s!%s (%s)",
302			from, to,
303			me.name, source_p->host, source_p->username,
304			source_p->name, reason);
305			}
306			else
307			{
308			sendto_one(client_p, ":%s KILL %s :%s %s",
309			from, to, inpath, reason);
310			}
311			}
312			}
313
314	michael	1230	static struct Message kill_msgtab = {
315			"KILL", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
316			{m_unregistered, m_not_oper, ms_kill, m_ignore, mo_kill, m_ignore}
317			};
318
319			static void
320			module_init(void)
321			{
322			mod_add_cmd(&kill_msgtab);
323			}
324
325			static void
326			module_exit(void)
327			{
328			mod_del_cmd(&kill_msgtab);
329			}
330
331			struct module module_entry = {
332			.node = { NULL, NULL, NULL },
333			.name = NULL,
334			.version = "$Revision$",
335			.handle = NULL,
336			.modinit = module_init,
337			.modexit = module_exit,
338			.flags = MODULE_FLAG_CORE
339			};