8611b21da67ff5aa403be095363d18e4a6ff34d4
[ircu2.10.12-pk.git] / ircd / m_squit.c
1 /*
2  * IRC - Internet Relay Chat, ircd/m_squit.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 #include "config.h"
26
27 #include "client.h"
28 #include "hash.h"
29 #include "ircd.h"
30 #include "ircd_chattr.h"
31 #include "ircd_reply.h"
32 #include "ircd_string.h"
33 #include "numeric.h"
34 #include "numnicks.h"
35 #include "match.h"
36 #include "s_debug.h"
37 #include "s_misc.h"
38 #include "s_user.h"
39 #include "send.h"
40
41 #include <assert.h>
42 #include <stdio.h>
43 #include <stdlib.h>
44 #include <string.h>
45
46 /*
47  *  ms_squit (server)
48  *
49  *    parv[0] = sender prefix
50  *    parv[1] = server name
51  *    parv[2] = timestamp
52  *    parv[parc-1] = comment
53  *
54  * No longer supports wildcards from servers. 
55  * No longer squits a server that gave us an malformed squit message.
56  *    - Isomer 1999-12-18
57  * 
58  */
59 int ms_squit(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
60 {
61   const char* server = parv[1];
62   struct Client *acptr;
63   time_t timestamp = 0;
64   char *comment = 0;
65   
66   if (parc < 2) 
67     return need_more_params(sptr, "SQUIT");
68
69   comment = parv[parc-1];
70   
71   if (BadPtr(parv[parc - 1]))
72         comment = cli_name(sptr);
73         
74   acptr = FindServer(server);
75
76   if (!acptr)
77     acptr = FindNServer(server);
78
79   if (!acptr) {
80     protocol_violation(sptr, "Issued SQUIT for unknown server %s (ignored)",
81                        server);
82     Debug((DEBUG_NOTICE, "Ignoring SQUIT to an unknown server"));
83     return 0;
84   }
85   
86   /* If they are squitting me, we reverse it */
87   if (IsMe(acptr))
88     acptr = cptr; /* Bugfix by Prefect */
89
90   if (parc > 2)
91     timestamp = atoi(parv[2]);
92   else
93     protocol_violation(cptr, "SQUIT with no timestamp/reason");
94
95   /* If atoi(parv[2]) == 0 we must indeed squit !
96    * It will be our neighbour.
97    */
98   if ( timestamp != 0 && timestamp != cli_serv(acptr)->timestamp)
99   {
100     protocol_violation(sptr, "Issued SQUIT for %C with wrong timestamp %Tu "
101                        "(%Tu) (ignored)", acptr, timestamp,
102                        cli_serv(acptr)->timestamp);
103     Debug((DEBUG_NOTICE, "Ignoring SQUIT with the wrong timestamp"));
104     return 0;
105   }
106   
107   return exit_client(cptr, acptr, sptr, comment);
108 }
109
110 /*
111  *  mo_squit (oper)
112  *
113  *    parv[0] = sender prefix
114  *    parv[1] = server name
115  *    parv[2] = comment (optional)
116  *
117  */
118 int mo_squit(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
119 {
120   const char* server;
121   struct Client *acptr;
122   struct Client *acptr2;
123   char *comment;
124       
125   if (parc < 2) 
126     return need_more_params(sptr, "SQUIT");
127
128   if (parc < 3 || BadPtr(parv[2]))
129     comment = cli_name(sptr);
130   else
131     comment = parv[2];
132
133   server = parv[1];
134   /*
135    * The following allows wild cards in SQUIT. Only usefull
136    * when the command is issued by an oper.
137    */
138   for (acptr = GlobalClientList; (acptr = next_client(acptr, server));
139       acptr = cli_next(acptr)) {
140     if (IsServer(acptr) || IsMe(acptr))
141       break;
142   }
143   
144   /* Not found? Bugger. */
145   if (!acptr || IsMe(acptr))
146     return send_reply(sptr, ERR_NOSUCHSERVER, server);
147
148   /*
149    * Look for a matching server that is closer,
150    * that way we won't accidently squit two close
151    * servers like davis.* and davis-r.* when typing
152    * /SQUIT davis*
153    */
154   for (acptr2 = cli_serv(acptr)->up; acptr2 != &me;
155       acptr2 = cli_serv(acptr2)->up)
156     if (!match(server, cli_name(acptr2)))
157       acptr = acptr2;
158   
159   /* Disallow local opers to squit remote servers */
160   if (IsLocOp(sptr) && !MyConnect(acptr))
161     return send_reply(sptr, ERR_NOPRIVILEGES);
162
163   return exit_client(cptr, acptr, sptr, comment);
164 }