Implement invitation announcements (RPL_ISSUEDINVITE).
[ircu2.10.12-pk.git] / ircd / m_invite.c
1 /*
2  * IRC - Internet Relay Chat, ircd/m_invite.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 "channel.h"
85 #include "client.h"
86 #include "hash.h"
87 #include "ircd.h"
88 #include "ircd_features.h"
89 #include "ircd_reply.h"
90 #include "ircd_string.h"
91 #include "list.h"
92 #include "msg.h"
93 #include "numeric.h"
94 #include "numnicks.h"
95 #include "s_user.h"
96 #include "send.h"
97 #include "struct.h"
98
99 #include <assert.h>
100
101 /*
102  * m_invite - generic message handler
103  *
104  *   parv[0] - sender prefix
105  *   parv[1] - user to invite
106  *   parv[2] - channel name
107  *
108  * - INVITE now is accepted only if who does it is chanop (this of course
109  *   implies that channel must exist and he must be on it).
110  *
111  * - On the other side it IS processed even if channel is NOT invite only
112  *   leaving room for other enhancements like inviting banned ppl.  -- Nemesi
113  *
114  * - Invite with no parameters now lists the channels you are invited to.
115  *                                                         - Isomer 23 Oct 99
116  */
117 int m_invite(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
118 {
119   struct Client *acptr;
120   struct Channel *chptr;
121   
122   if (parc < 2 ) { 
123     /*
124      * list the channels you have an invite to.
125      */
126     struct SLink *lp;
127     for (lp = cli_user(sptr)->invited; lp; lp = lp->next)
128       send_reply(cptr, RPL_INVITELIST, lp->value.chptr->chname);
129     send_reply(cptr, RPL_ENDOFINVITELIST);
130     return 0;
131   }
132   
133   if (parc < 3 || EmptyString(parv[2]))
134     return need_more_params(sptr, "INVITE");
135
136   if (!(acptr = FindUser(parv[1]))) {
137     send_reply(sptr, ERR_NOSUCHNICK, parv[1]);
138     return 0;
139   }
140
141   if (is_silenced(sptr, acptr))
142     return 0;
143
144   clean_channelname(parv[2]);
145
146   if (!IsChannelPrefix(*parv[2]))
147     return 0;
148
149   if (!(chptr = FindChannel(parv[2]))) {
150     send_reply(sptr, ERR_NOTONCHANNEL, parv[2]);
151     return 0;
152   }
153
154   if (!find_channel_member(sptr, chptr)) {
155     send_reply(sptr, ERR_NOTONCHANNEL, chptr->chname);
156     return 0;
157   }
158
159   if (find_channel_member(acptr, chptr)) {
160     send_reply(sptr, ERR_USERONCHANNEL, cli_name(acptr), chptr->chname);
161     return 0;
162   }
163
164   if (!is_chan_op(sptr, chptr)) {
165     send_reply(sptr, ERR_CHANOPRIVSNEEDED, chptr->chname);
166     return 0;
167   }
168
169   /* If we get here, it was a VALID and meaningful INVITE */
170
171   if (check_target_limit(sptr, acptr, cli_name(acptr), 0))
172     return 0;
173
174   send_reply(sptr, RPL_INVITING, cli_name(acptr), chptr->chname);
175
176   if (cli_user(acptr)->away)
177     send_reply(sptr, RPL_AWAY, cli_name(acptr), cli_user(acptr)->away);
178
179   if (MyConnect(acptr))
180     add_invite(acptr, chptr);
181
182   if (!IsLocalChannel(chptr->chname) || MyConnect(acptr)) {
183     if (feature_bool(FEAT_ANNOUNCE_INVITES)) {
184       sendcmdto_channel_butserv_butone(&me, get_error_numeric(RPL_ISSUEDINVITE)->str,
185                                        NULL, chptr, sptr, SKIP_NONOPS, 
186                                        "%C %C :%C has been invited by %C",
187                                        acptr, sptr, acptr, sptr);
188       sendcmdto_channel_servers_butone(sptr, NULL, TOK_INVITE, chptr, sptr, 0,
189                                        "%s :%H", cli_name(acptr), chptr);
190       if (MyConnect(acptr))
191         sendcmdto_one(sptr, CMD_INVITE, acptr, "%s :%H", cli_name(acptr), chptr);
192     }
193     else
194       sendcmdto_one(sptr, CMD_INVITE, acptr, "%s :%H", cli_name(acptr), chptr);
195   }
196
197   return 0;
198 }
199
200 /*
201  * ms_invite - server message handler
202  *
203  *   parv[0] - sender prefix
204  *   parv[1] - user to invite
205  *   parv[2] - channel name
206  *
207  * - INVITE now is accepted only if who does it is chanop (this of course
208  *   implies that channel must exist and he must be on it).
209  *
210  * - On the other side it IS processed even if channel is NOT invite only
211  *   leaving room for other enhancements like inviting banned ppl.  -- Nemesi
212  *
213  * - Invite with no parameters now lists the channels you are invited to.
214  *                                                         - Isomer 23 Oct 99
215  */
216 int ms_invite(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
217 {
218   struct Client *acptr;
219   struct Channel *chptr;
220   
221   if (IsServer(sptr)) {
222     /*
223      * this will blow up if we get an invite from a server
224      * we look for channel membership in sptr below. 
225      */
226     return protocol_violation(sptr,"Server attempting to invite");
227   }
228   if (parc < 3 || EmptyString(parv[2])) {
229     /*
230      * should have been handled upstream, ignore it.
231      */
232     protocol_violation(sptr,"Too few arguments to invite");
233     return need_more_params(sptr,"INVITE");
234   }
235   if (!IsGlobalChannel(parv[2])) {
236     /*
237      * should not be sent
238      */
239     return protocol_violation(sptr, "Invite to a non-standard channel %s",parv[2]);
240   }
241   if (!(acptr = FindUser(parv[1]))) {
242     send_reply(sptr, ERR_NOSUCHNICK, parv[1]);
243     return 0;
244   }
245   if (feature_bool(FEAT_ANNOUNCE_INVITES)) {
246     sendcmdto_channel_butserv_butone(&me, get_error_numeric(RPL_ISSUEDINVITE)->str,
247                                      NULL, chptr, sptr, SKIP_NONOPS, 
248                                      "%C %C :%C has been invited by %C",
249                                      acptr, sptr, acptr, sptr);
250     sendcmdto_channel_servers_butone(sptr, NULL, TOK_INVITE, chptr, sptr, 0,
251                                      "%s :%H", cli_name(acptr), chptr);
252     if (MyConnect(acptr))
253       sendcmdto_one(sptr, CMD_INVITE, acptr, "%s :%H", cli_name(acptr), chptr);
254     return 0;
255   }
256   if (!MyUser(acptr)) {
257     /*
258      * just relay the message
259      */
260     sendcmdto_one(sptr, CMD_INVITE, acptr, "%s :%s", cli_name(acptr), parv[2]);
261     return 0;
262   }
263
264   if (is_silenced(sptr, acptr))
265     return 0;
266
267   if (!(chptr = FindChannel(parv[2]))) {
268     /*
269      * allow invites to non existant channels, bleah
270      * avoid JOIN, INVITE, PART abuse
271      */
272     sendcmdto_one(sptr, CMD_INVITE, acptr, "%C :%s", acptr, parv[2]);
273     return 0;
274   }
275
276   if (!IsChannelService(sptr) && !find_channel_member(sptr, chptr)) {
277     send_reply(sptr, ERR_NOTONCHANNEL, chptr->chname);
278     return 0;
279   }
280   if (find_channel_member(acptr, chptr)) {
281     send_reply(sptr, ERR_USERONCHANNEL, cli_name(acptr), chptr->chname);
282     return 0;
283   }
284   add_invite(acptr, chptr);
285   sendcmdto_one(sptr, CMD_INVITE, acptr, "%s :%H", cli_name(acptr), chptr);
286   return 0;
287 }
288
289