2 * IRC - Internet Relay Chat, ircd/m_join.c
3 * Copyright (C) 1990 Jarkko Oikarinen and
4 * University of Oulu, Computing Center
6 * See file AUTHORS in IRC package for additional names of
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)
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.
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.
27 * m_functions execute protocol messages on this server:
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...).
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.
39 * (!IsServer(cptr)) => (cptr == sptr), because
40 * prefixes are taken *only* from servers...
43 * (sptr == cptr) => the message didn't
46 * (sptr != cptr && IsServer(sptr) means
47 * the prefix specified servername. (?)
49 * (sptr != cptr && !IsServer(sptr) means
50 * that message originated from a remote
55 * (!IsServer(sptr)) means that, sptr can safely
56 * taken as defining the target structure of the
57 * message in this server.
59 * *Always* true (if 'parse' and others are working correct):
61 * 1) sptr->from == cptr (note: cptr->from == cptr)
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 ]
68 * parc number of variable parameter strings (if zero,
69 * parv is allowed to be NULL)
71 * parv a NULL terminated list of parameter pointers,
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*
79 * note: it is guaranteed that parv[0]..parv[parc-1] are all
89 #include "ircd_chattr.h"
90 #include "ircd_features.h"
91 #include "ircd_reply.h"
92 #include "ircd_string.h"
105 * Helper function to find last 0 in a comma-separated list of
109 last0(char *chanlist)
113 for (p = chanlist; p[0]; p++) /* find last "JOIN 0" */
114 if (p[0] == '0' && (p[1] == ',' || p[1] == '\0' || !IsChannelChar(p[1]))) {
115 chanlist = p; /* we'll start parsing here */
117 if (!p[1]) /* hit the end */
122 while (p[0] != ',' && p[0] != '\0') /* skip past channel name */
125 if (!p[0]) /* hit the end */
133 * Helper function to perform a JOIN 0 if needed; returns 0 if channel
134 * name is not 0, else removes user from all channels and returns 1.
137 join0(struct JoinBuf *join, struct Client *cptr, struct Client *sptr,
140 struct Membership *member;
143 /* is it a JOIN 0? */
144 if (chan[0] != '0' || chan[1] != '\0')
147 joinbuf_join(join, 0, 0); /* join special channel 0 */
149 /* leave all channels */
150 joinbuf_init(&part, sptr, cptr, JOINBUF_TYPE_PARTALL,
151 "Left all channels", 0);
153 while ((member = cli_user(sptr)->channel))
154 joinbuf_join(&part, member->channel,
155 IsZombie(member) ? CHFL_ZOMBIE : 0);
157 joinbuf_flush(&part);
163 * m_join - generic message handler
165 int m_join(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
167 struct Channel *chptr;
169 struct JoinBuf create;
172 unsigned int flags = 0;
179 if (parc < 2 || *parv[1] == '\0')
180 return need_more_params(sptr, "JOIN");
182 joinbuf_init(&join, sptr, cptr, JOINBUF_TYPE_JOIN, 0, 0);
183 joinbuf_init(&create, sptr, cptr, JOINBUF_TYPE_CREATE, 0, TStime());
185 chanlist = last0(parv[1]); /* find last "JOIN 0" */
187 keys = parv[2]; /* remember where keys are */
189 for (name = ircd_strtok(&p, chanlist, ","); name;
190 name = ircd_strtok(&p, 0, ",")) {
191 clean_channelname(name);
193 if (join0(&join, cptr, sptr, name)) /* did client do a JOIN 0? */
196 if (!IsChannelName(name))
198 /* bad channel name */
199 send_reply(sptr, ERR_NOSUCHCHANNEL, name);
203 /* This checks if the channel contains control codes and rejects em
204 * until they are gone, then we will do it otherwise - *SOB Mode*
206 for (k = 0, j = 0; name[j]; j++)
207 if (IsCntrl(name[j]))
211 send_reply(sptr, ERR_NOSUCHCHANNEL, name);
215 /* BADCHANed channel */
216 if ((gline = gline_find(name, GLINE_BADCHAN | GLINE_EXACT)) &&
217 GlineIsActive(gline) && !IsAnOper(sptr)) {
218 send_reply(sptr, ERR_BANNEDFROMCHAN, name);
222 if ((chptr = FindChannel(name)))
224 if (find_member_link(chptr, sptr))
225 continue; /* already on channel */
227 flags = CHFL_DEOPPED;
232 if (cli_user(sptr)->joined >= feature_int(FEAT_MAXCHANNELSPERUSER) &&
233 !HasPriv(sptr, PRIV_CHAN_LIMIT)) {
234 send_reply(sptr, ERR_TOOMANYCHANNELS, chptr ? chptr->chname : name);
235 break; /* no point processing the other channels */
239 int is_level0_op = 0;
240 if (!BadPtr(keys) && *chptr->mode.apass) {
241 /* Don't use compall for the apass, only a single key is allowed.
242 Test Apass first in case someone set Apass and upass equal. */
243 if (strcmp(chptr->mode.apass, keys) == 0) {
245 flags &= ~CHFL_DEOPPED;
246 flags |= CHFL_CHANOP | CHFL_CHANNEL_MANAGER;
248 else if (*chptr->mode.upass && strcmp(chptr->mode.upass, keys) == 0) {
250 flags &= ~CHFL_DEOPPED;
251 flags |= CHFL_CHANOP;
254 if (check_target_limit(sptr, chptr, chptr->chname, 0))
255 continue; /* exceeded target limit */
256 else if (!is_level0_op && (i = can_join(sptr, chptr, keys))) {
257 if (i > MAGIC_OPER_OVERRIDE)
258 { /* oper overrode mode */
259 switch (i - MAGIC_OPER_OVERRIDE)
261 case ERR_CHANNELISFULL: /* figure out which mode */
265 case ERR_INVITEONLYCHAN:
269 case ERR_BANNEDFROMCHAN:
273 case ERR_BADCHANNELKEY:
277 case ERR_NEEDREGGEDNICK:
286 /* send accountability notice */
287 sendto_opmask_butone(0, SNO_HACK4, "OPER JOIN: %C JOIN %H "
288 "(overriding +%c)", sptr, chptr, i);
292 send_reply(sptr, i, chptr->chname);
295 } /* else if ((i = can_join(sptr, chptr, keys))) */
297 joinbuf_join(&join, chptr, flags);
300 joinbuf_flush(&join);
301 modebuf_init(&mbuf, &me, cptr, chptr,
302 MODEBUF_DEST_CHANNEL | /* Send mode to channel */
303 MODEBUF_DEST_SERVER); /* And send it to the other servers */
304 modebuf_mode_client(&mbuf,
305 MODE_ADD | MODE_CHANOP, sptr); /* Give ops to the level0 op */
306 modebuf_flush(&mbuf);
308 } else if (!(chptr = get_channel(sptr, name, CGT_CREATE)))
309 continue; /* couldn't get channel */
310 else if (check_target_limit(sptr, chptr, chptr->chname, 1))
312 /* Note: check_target_limit will only ever return 0 here */
314 destruct_channel(chptr); /* created it... */
318 joinbuf_join(&create, chptr, flags | CHFL_CHANNEL_MANAGER);
320 del_invite(sptr, chptr);
322 if (chptr->topic[0]) {
323 send_reply(sptr, RPL_TOPIC, chptr->chname, chptr->topic);
324 send_reply(sptr, RPL_TOPICWHOTIME, chptr->chname, chptr->topic_nick,
328 do_names(sptr, chptr, NAMES_ALL|NAMES_EON); /* send /names list */
331 joinbuf_flush(&join); /* must be first, if there's a JOIN 0 */
332 joinbuf_flush(&create);
338 * ms_join - server message handler
340 int ms_join(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
342 struct Membership *member;
343 struct Channel *chptr;
345 unsigned int flags = 0;
353 return protocol_violation(cptr,
354 "%s tried to JOIN %s, duh!",
356 (parc < 2 || *parv[1] == '\0') ? "a channel" :
361 if (parc < 2 || *parv[1] == '\0')
362 return need_more_params(sptr, "JOIN");
364 if (parc > 2 && parv[2])
365 creation = atoi(parv[2]);
367 joinbuf_init(&join, sptr, cptr, JOINBUF_TYPE_JOIN, 0, 0);
369 chanlist = last0(parv[1]); /* find last "JOIN 0" */
371 for (name = ircd_strtok(&p, chanlist, ","); name;
372 name = ircd_strtok(&p, 0, ",")) {
373 clean_channelname(name);
375 if (join0(&join, cptr, sptr, name)) /* did client do a JOIN 0? */
378 if (IsLocalChannel(name) || !IsChannelName(name))
380 protocol_violation(cptr, "%s tried to join %s", cli_name(sptr), name);
384 if (!(chptr = FindChannel(name)))
386 /* No channel exists, so create one */
387 if (!(chptr = get_channel(sptr, name, CGT_CREATE)))
389 protocol_violation(sptr,"couldn't get channel %s for %s",
390 name,cli_name(sptr));
393 flags = CHFL_DEOPPED | (HasFlag(sptr, FLAG_TS8) ? CHFL_SERVOPOK : 0);
395 /* when the network is 2.10.11+ then remove MAGIC_REMOTE_JOIN_TS */
396 chptr->creationtime = creation ? creation : MAGIC_REMOTE_JOIN_TS;
398 else { /* We have a valid channel? */
399 if ((member = find_member_link(chptr, sptr)))
401 /* It is impossible to get here --Run */
402 if (!IsZombie(member)) /* already on channel */
405 flags = member->status & (CHFL_DEOPPED | CHFL_SERVOPOK);
406 remove_user_from_channel(sptr, chptr);
407 chptr = FindChannel(name);
410 flags = CHFL_DEOPPED | (HasFlag(sptr, FLAG_TS8) ? CHFL_SERVOPOK : 0);
411 /* Always copy the timestamp when it is older, that is the only way to
412 ensure network-wide synchronization of creation times. */
413 if (creation && creation < chptr->creationtime)
414 chptr->creationtime = creation;
417 joinbuf_join(&join, chptr, flags);
420 joinbuf_flush(&join); /* flush joins... */