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 see if there are any control characters
109 HasControlChars(char *mstring)
112 for(j = mstring; *j ; j++) {
113 if(*j <= 32) { return j; }
120 * Helper function to find last 0 in a comma-separated list of
124 last0(char *chanlist)
128 for (p = chanlist; p[0]; p++) /* find last "JOIN 0" */
129 if (p[0] == '0' && (p[1] == ',' || p[1] == '\0' || !IsChannelChar(p[1]))) {
130 chanlist = p; /* we'll start parsing here */
132 if (!p[1]) /* hit the end */
137 while (p[0] != ',' && p[0] != '\0') /* skip past channel name */
140 if (!p[0]) /* hit the end */
148 * Helper function to perform a JOIN 0 if needed; returns 0 if channel
149 * name is not 0, else removes user from all channels and returns 1.
152 join0(struct JoinBuf *join, struct Client *cptr, struct Client *sptr,
155 struct Membership *member;
158 /* is it a JOIN 0? */
159 if (chan[0] != '0' || chan[1] != '\0')
162 joinbuf_join(join, 0, 0); /* join special channel 0 */
164 /* leave all channels */
165 joinbuf_init(&part, sptr, cptr, JOINBUF_TYPE_PARTALL,
166 "Left all channels", 0);
168 while ((member = cli_user(sptr)->channel))
169 joinbuf_join(&part, member->channel,
170 IsZombie(member) ? CHFL_ZOMBIE : 0);
172 joinbuf_flush(&part);
178 * m_join - generic message handler
180 int m_join(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
182 struct Channel *chptr;
184 struct JoinBuf create;
187 unsigned int flags = 0;
194 if (parc < 2 || *parv[1] == '\0')
195 return need_more_params(sptr, "JOIN");
197 joinbuf_init(&join, sptr, cptr, JOINBUF_TYPE_JOIN, 0, 0);
198 joinbuf_init(&create, sptr, cptr, JOINBUF_TYPE_CREATE, 0, TStime());
200 chanlist = last0(parv[1]); /* find last "JOIN 0" */
202 keys = parv[2]; /* remember where keys are */
204 for (name = ircd_strtok(&p, chanlist, ","); name;
205 name = ircd_strtok(&p, 0, ",")) {
206 clean_channelname(name);
208 if (join0(&join, cptr, sptr, name)) /* did client do a JOIN 0? */
211 if (!IsChannelName(name) || HasControlChars(name)) { /* bad channel name */
212 send_reply(sptr, ERR_NOSUCHCHANNEL, name);
216 /* BADCHANed channel */
217 if ((gline = gline_find(name, GLINE_BADCHAN | GLINE_EXACT)) &&
218 GlineIsActive(gline) && !IsAnOper(sptr)) {
219 send_reply(sptr, ERR_BANNEDFROMCHAN, name);
223 if ((chptr = FindChannel(name))) {
224 if (find_member_link(chptr, sptr))
225 continue; /* already on channel */
227 flags = CHFL_DEOPPED;
229 flags = IsModelessChannel(name) ? CHFL_DEOPPED : CHFL_CHANOP;
231 if (cli_user(sptr)->joined >= feature_int(FEAT_MAXCHANNELSPERUSER) &&
232 !HasPriv(sptr, PRIV_CHAN_LIMIT)) {
233 send_reply(sptr, ERR_TOOMANYCHANNELS, chptr ? chptr->chname : name);
234 break; /* no point processing the other channels */
238 int is_level0_op = 0;
239 if (!BadPtr(keys) && *chptr->mode.apass) {
240 /* Don't use compall for the apass, only a single key is allowed.
241 Test Apass first in case someone set Apass and upass equal. */
242 if (strcmp(chptr->mode.apass, keys) == 0) {
244 flags &= ~CHFL_DEOPPED;
245 flags |= CHFL_CHANOP | CHFL_CHANNEL_MANAGER;
247 else if (*chptr->mode.upass && strcmp(chptr->mode.upass, keys) == 0) {
249 flags &= ~CHFL_DEOPPED;
250 flags |= CHFL_CHANOP;
253 if (check_target_limit(sptr, chptr, chptr->chname, 0))
254 continue; /* exceeded target limit */
255 else if (!is_level0_op && (i = can_join(sptr, chptr, keys))) {
256 if (i > MAGIC_OPER_OVERRIDE) { /* oper overrode mode */
257 switch (i - MAGIC_OPER_OVERRIDE) {
258 case ERR_CHANNELISFULL: /* figure out which mode */
262 case ERR_INVITEONLYCHAN:
266 case ERR_BANNEDFROMCHAN:
270 case ERR_BADCHANNELKEY:
275 /* send accountability notice */
276 sendto_opmask_butone(0, SNO_HACK4, "OPER JOIN: %C JOIN %H "
277 "(overriding +%c)", sptr, chptr, i);
279 send_reply(sptr, i, chptr->chname);
282 } /* else if ((i = can_join(sptr, chptr, keys))) */
284 joinbuf_join(&join, chptr, flags);
287 joinbuf_flush(&join);
288 modebuf_init(&mbuf, &me, cptr, chptr,
289 MODEBUF_DEST_CHANNEL | /* Send mode to channel */
290 MODEBUF_DEST_SERVER); /* And send it to the other servers */
291 modebuf_mode_client(&mbuf,
292 MODE_ADD | MODE_CHANOP, sptr); /* Give ops to the level0 op */
293 modebuf_flush(&mbuf);
295 } else if (!(chptr = get_channel(sptr, name, CGT_CREATE)))
296 continue; /* couldn't get channel */
297 else if (check_target_limit(sptr, chptr, chptr->chname, 1)) {
298 /* Note: check_target_limit will only ever return 0 here */
300 destruct_channel(chptr); /* created it... */
303 joinbuf_join(&create, chptr, flags | CHFL_CHANNEL_MANAGER);
305 del_invite(sptr, chptr);
307 if (chptr->topic[0]) {
308 send_reply(sptr, RPL_TOPIC, chptr->chname, chptr->topic);
309 send_reply(sptr, RPL_TOPICWHOTIME, chptr->chname, chptr->topic_nick,
313 do_names(sptr, chptr, NAMES_ALL|NAMES_EON); /* send /names list */
316 joinbuf_flush(&join); /* must be first, if there's a JOIN 0 */
317 joinbuf_flush(&create);
323 * ms_join - server message handler
325 int ms_join(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
327 struct Membership *member;
328 struct Channel *chptr;
330 unsigned int flags = 0;
336 if (IsServer(sptr)) {
337 return protocol_violation(sptr,"%s tried to JOIN a channel, duh!", cli_name(sptr));
340 if (parc < 2 || *parv[1] == '\0')
341 return need_more_params(sptr, "JOIN");
343 if (parc > 2 && parv[2])
344 creation = atoi(parv[2]);
346 joinbuf_init(&join, sptr, cptr, JOINBUF_TYPE_JOIN, 0, 0);
348 chanlist = last0(parv[1]); /* find last "JOIN 0" */
350 for (name = ircd_strtok(&p, chanlist, ","); name;
351 name = ircd_strtok(&p, 0, ",")) {
352 clean_channelname(name);
354 if (join0(&join, cptr, sptr, name)) /* did client do a JOIN 0? */
357 if (IsLocalChannel(name) || !IsChannelName(name)) {
358 protocol_violation(sptr,"%s tried to join %s",cli_name(cptr),name);
362 if (!(chptr = FindChannel(name))) {
363 /* No channel exists, so create one */
364 if (!(chptr = get_channel(sptr, name, CGT_CREATE))) {
365 protocol_violation(sptr,"couldn't get channel %s for %s",
366 name,cli_name(sptr));
369 flags = CHFL_DEOPPED | ((cli_flags(sptr) & FLAGS_TS8) ? CHFL_SERVOPOK : 0);
371 /* when the network is 2.10.11+ then remove MAGIC_REMOTE_JOIN_TS */
372 chptr->creationtime = creation ? creation : MAGIC_REMOTE_JOIN_TS;
374 else { /* We have a valid channel? */
375 if ((member = find_member_link(chptr, sptr))) {
376 /* It is impossible to get here --Run */
377 if (!IsZombie(member)) /* already on channel */
380 flags = member->status & (CHFL_DEOPPED | CHFL_SERVOPOK);
381 remove_user_from_channel(sptr, chptr);
382 chptr = FindChannel(name);
384 flags = CHFL_DEOPPED | ((cli_flags(sptr) & FLAGS_TS8) ? CHFL_SERVOPOK : 0);
385 /* Always copy the timestamp when it is older, that is the only way to
386 ensure network-wide synchronization of creation times. */
387 if (creation && creation < chptr->creationtime)
388 chptr->creationtime = creation;
391 joinbuf_join(&join, chptr, flags);
394 joinbuf_flush(&join); /* flush joins... */