Author: Kev <klmitch@mit.edu>
[ircu2.10.12-pk.git] / ircd / m_kill.c
1 /*
2  * IRC - Internet Relay Chat, ircd/m_kill.c
3  * Copyright (C) 1990 Jarkko Oikarinen and
4  *                    University of Oulu, Computing Center
5  *
6  * See file AUTHORS in IRC package for additional names of
7  * the programmers.
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 1, or (at your option)
12  * any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  *
23  * $Id$
24  */
25
26 /*
27  * m_functions execute protocol messages on this server:
28  *
29  *    cptr    is always NON-NULL, pointing to a *LOCAL* client
30  *            structure (with an open socket connected!). This
31  *            identifies the physical socket where the message
32  *            originated (or which caused the m_function to be
33  *            executed--some m_functions may call others...).
34  *
35  *    sptr    is the source of the message, defined by the
36  *            prefix part of the message if present. If not
37  *            or prefix not found, then sptr==cptr.
38  *
39  *            (!IsServer(cptr)) => (cptr == sptr), because
40  *            prefixes are taken *only* from servers...
41  *
42  *            (IsServer(cptr))
43  *                    (sptr == cptr) => the message didn't
44  *                    have the prefix.
45  *
46  *                    (sptr != cptr && IsServer(sptr) means
47  *                    the prefix specified servername. (?)
48  *
49  *                    (sptr != cptr && !IsServer(sptr) means
50  *                    that message originated from a remote
51  *                    user (not local).
52  *
53  *            combining
54  *
55  *            (!IsServer(sptr)) means that, sptr can safely
56  *            taken as defining the target structure of the
57  *            message in this server.
58  *
59  *    *Always* true (if 'parse' and others are working correct):
60  *
61  *    1)      sptr->from == cptr  (note: cptr->from == cptr)
62  *
63  *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
64  *            *cannot* be a local connection, unless it's
65  *            actually cptr!). [MyConnect(x) should probably
66  *            be defined as (x == x->from) --msa ]
67  *
68  *    parc    number of variable parameter strings (if zero,
69  *            parv is allowed to be NULL)
70  *
71  *    parv    a NULL terminated list of parameter pointers,
72  *
73  *                    parv[0], sender (prefix string), if not present
74  *                            this points to an empty string.
75  *                    parv[1]...parv[parc-1]
76  *                            pointers to additional parameters
77  *                    parv[parc] == NULL, *always*
78  *
79  *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
80  *                    non-NULL pointers.
81  */
82 #include "config.h"
83
84 #include "client.h"
85 #include "hash.h"
86 #include "ircd.h"
87 #include "ircd_log.h"
88 #include "ircd_reply.h"
89 #include "ircd_snprintf.h"
90 #include "ircd_string.h"
91 #include "msg.h"
92 #include "numeric.h"
93 #include "numnicks.h"
94 #include "s_misc.h"
95 #include "send.h"
96 #include "whowas.h"
97
98 #include <assert.h>
99 #include <string.h>
100
101 /*
102  * ms_kill - server message handler template
103  *
104  * NOTE: IsServer(cptr) == true;
105  *
106  * parv[0]      = sender prefix
107  * parv[1]      = kill victim
108  * parv[parc-1] = kill path
109  */
110 int ms_kill(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
111 {
112   struct Client* victim;
113   const char*    inpath;
114   char*          user;
115   char*          path;
116   char*          killer;
117   char           buf[BUFSIZE];
118
119   assert(0 != cptr);
120   assert(0 != sptr);
121   assert(IsServer(cptr));
122
123   /*
124    * XXX - a server sending less than 3 params could really desync
125    * things
126    */
127   if (parc < 3) {
128     protocol_violation(sptr,"Too few arguments for KILL");
129     return need_more_params(sptr, "KILL");
130   }
131
132   user = parv[1];
133   path = parv[parc - 1];        /* Either defined or NULL (parc >= 3) */
134
135   if (!(victim = findNUser(parv[1]))) {
136     if (IsUser(sptr))
137       sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :KILL target disconnected "
138                     "before I got him :(", sptr);
139     return 0;
140   }
141
142   /*
143    * Notify all *local* opers about the KILL (this includes the one
144    * originating the kill, if from this server--the special numeric
145    * reply message is not generated anymore).
146    *
147    * Note: "victim->name" is used instead of "user" because we may
148    *       have changed the target because of the nickname change.
149    */
150   inpath = cli_name(cptr);
151
152   sendto_opmask_butone(0, IsServer(sptr) ? SNO_SERVKILL : SNO_OPERKILL,
153                        "Received KILL message for %s. From %s Path: %C!%s",
154                        get_client_name(victim,SHOW_IP), parv[0], cptr, path);
155
156   log_write_kill(victim, sptr, cli_name(cptr), path);
157   /*
158    * And pass on the message to other servers. Note, that if KILL
159    * was changed, the message has to be sent to all links, also
160    * back.
161    */
162   sendcmdto_serv_butone(sptr, CMD_KILL, cptr, "%C :%s!%s", victim, cli_name(cptr),
163                         path);
164   /*
165    * We *can* have crossed a NICK with this numeric... --Run
166    *
167    * Note the following situation:
168    *  KILL SAA -->       X
169    *  <-- S NICK ... SAA | <-- SAA QUIT <-- S NICK ... SAA <-- SQUIT S
170    * Where the KILL reaches point X before the QUIT does.
171    * This would then *still* cause an orphan because the KILL doesn't reach S
172    * (because of the SQUIT), the QUIT is ignored (because of the KILL)
173    * and the second NICK ... SAA causes an orphan on the server at the
174    * right (which then isn't removed when the SQUIT arrives).
175    * Therefore we still need to detect numeric nick collisions too.
176    *
177    * Bounce the kill back to the originator, if the client can't be found
178    * by the next hop (short lag) the bounce won't propagate further.
179    */
180   if (MyConnect(victim))
181     sendcmdto_one(&me, CMD_KILL, cptr, "%C :%s!%s (Ghost 5 Numeric Collided)",
182                   victim, cli_name(cptr), path);
183   /*
184    * Set FLAGS_KILLED. This prevents exit_one_client from sending
185    * the unnecessary QUIT for this. (This flag should never be
186    * set in any other place)
187    */
188   cli_flags(victim) |= FLAGS_KILLED;
189
190   /*
191    * Tell the victim she/he has been zapped, but *only* if
192    * the victim is on current server--no sense in sending the
193    * notification chasing the above kill, it won't get far
194    * anyway (as this user don't exist there any more either)
195    */
196   if (MyConnect(victim))
197     sendcmdto_one(sptr, CMD_KILL, victim, "%C :%s!%s", victim, NumServ(cptr),
198                   path);
199   /*
200    * the first space in path will be at the end of the
201    * opers name:
202    * bla.bla.bla!host.net.dom!opername (comment)
203    */
204   if ((killer = strchr(path, ' '))) {
205     while (killer > path && '!' != *killer)
206       --killer;
207     if ('!' == *killer)
208       ++killer;
209   }
210   else
211     killer = path;
212   ircd_snprintf(0, buf, sizeof(buf), "Killed (%s)", killer);
213
214   return exit_client(cptr, victim, sptr, buf);
215 }
216
217 /*
218  * mo_kill - oper message handler template
219  *
220  * NOTE: IsPrivileged(sptr), IsAnOper(sptr) == true
221  *       IsServer(cptr), IsServer(sptr) == false
222  *
223  * parv[0]      = sender prefix
224  * parv[1]      = kill victim
225  * parv[parc-1] = kill path
226  */
227 int mo_kill(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
228 {
229   struct Client* victim;
230   const char*    inpath;
231   char*          user;
232   char*          path;
233   char*          comment;
234   char           buf[BUFSIZE];
235
236   assert(0 != cptr);
237   assert(0 != sptr);
238   /*
239    * oper connection to this server, cptr is always sptr
240    */
241   assert(cptr == sptr);
242   assert(IsAnOper(sptr));
243
244   if (parc < 3 || EmptyString(parv[parc - 1]))
245     return need_more_params(sptr, "KILL");
246
247   user = parv[1];
248   if (!(victim = FindClient(user))) {
249     /*
250      * If the user has recently changed nick, we automaticly
251      * rewrite the KILL for this new nickname--this keeps
252      * servers in synch when nick change and kill collide
253      */
254     if (!(victim = get_history(user, (long)15)))
255       return send_reply(sptr, ERR_NOSUCHNICK, user);
256
257     sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :Changed KILL %s into %s", sptr,
258                   user, cli_name(victim));
259   }
260   if (!HasPriv(sptr, MyConnect(victim) ? PRIV_LOCAL_KILL : PRIV_KILL))
261     return send_reply(sptr, ERR_NOPRIVILEGES);
262
263   if (IsServer(victim) || IsMe(victim)) {
264     return send_reply(sptr, ERR_CANTKILLSERVER);
265   }
266   /*
267    * if the user is +k, prevent a kill from local user
268    */
269   if (IsChannelService(victim))
270     return send_reply(sptr, ERR_ISCHANSERVICE, "KILL", cli_name(victim));
271
272
273   if (!MyConnect(victim) && !HasPriv(sptr, PRIV_KILL)) {
274     sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :Nick %s isnt on your server",
275                   sptr, cli_name(victim));
276     return 0;
277   }
278
279   /*
280    * The kill originates from this server, initialize path.
281    * (In which case the 'path' may contain user suplied
282    * explanation ...or some nasty comment, sigh... >;-)
283    *
284    * ...!operhost!oper
285    * ...!operhost!oper (comment)
286    */
287
288   comment = parv[parc - 1];        /* Either defined or NULL (parc >= 3) */
289
290   if (strlen(comment) > TOPICLEN)
291     comment[TOPICLEN] = '\0';
292
293   inpath = cli_user(sptr)->host;
294
295   ircd_snprintf(0, buf, sizeof(buf), "%s%s (%s)", cli_name(cptr),
296                 IsOper(sptr) ? "" : "(L)", comment);
297   path = buf;
298
299   /*
300    * Notify all *local* opers about the KILL (this includes the one
301    * originating the kill, if from this server--the special numeric
302    * reply message is not generated anymore).
303    *
304    * Note: "victim->name" is used instead of "user" because we may
305    *       have changed the target because of the nickname change.
306    */
307   sendto_opmask_butone(0, SNO_OPERKILL,
308                        "Received KILL message for %s. From %s Path: %s!%s",
309                        get_client_name(victim,SHOW_IP), parv[0], inpath, path);
310
311   log_write_kill(victim, sptr, inpath, path);
312   /*
313    * And pass on the message to other servers. Note, that if KILL
314    * was changed, the message has to be sent to all links, also
315    * back.
316    * Suicide kills are NOT passed on --SRB
317    */
318   if (!MyConnect(victim)) {
319     sendcmdto_serv_butone(sptr, CMD_KILL, cptr, "%C :%s!%s", victim, inpath,
320                           path);
321
322    /*
323     * Set FLAGS_KILLED. This prevents exit_one_client from sending
324     * the unnecessary QUIT for this. (This flag should never be
325     * set in any other place)
326     */
327     cli_flags(victim) |= FLAGS_KILLED;
328
329     ircd_snprintf(0, buf, sizeof(buf), "Killed by %s (%s)", cli_name(sptr),
330                   comment);
331   }
332   else {
333   /*
334    * Tell the victim she/he has been zapped, but *only* if
335    * the victim is on current server--no sense in sending the
336    * notification chasing the above kill, it won't get far
337    * anyway (as this user don't exist there any more either)
338    */
339     sendcmdto_one(sptr, CMD_KILL, victim, "%C :%s!%s", victim, inpath, path);
340     ircd_snprintf(0, buf, sizeof(buf), "Local kill by %s (%s)",
341                   cli_name(sptr), comment);
342   }
343
344   return exit_client(cptr, victim, sptr, buf);
345 }