2 * IRC - Internet Relay Chat, ircd/m_burst.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
86 * No need to include handlers.h here the signatures must match
87 * and we don't need to force a rebuild of all the handlers everytime
88 * we add a new one to the list. --Bleep
96 #include "ircd_alloc.h"
97 #include "ircd_policy.h"
98 #include "ircd_reply.h"
99 #include "ircd_string.h"
104 #include "numnicks.h"
116 * ms_burst - server message handler
118 * -- by Run carlo@runaway.xs4all.nl december 1995 till march 1997
120 * parv[0] = sender prefix
121 * parv[1] = channel name
122 * parv[2] = channel timestamp
123 * The meaning of the following parv[]'s depend on their first character:
124 * If parv[n] starts with a '+':
125 * Net burst, additive modes
127 * parv[n+1] = <param> (optional)
128 * parv[n+2] = <param> (optional)
129 * If parv[n] starts with a '%', then n will be parc-1:
130 * parv[n] = %<ban> <ban> <ban> ...
131 * If parv[n] starts with another character:
132 * parv[n] = <nick>[:<mode>],<nick>[:<mode>],...
133 * where <mode> is the channel mode (ov) of nick and all following nicks.
136 * "S BURST #channel 87654321 +ntkl key 123 AAA,AAB:o,BAA,BAB:ov :%ban1 ban2"
138 * Anti net.ride code.
140 * When the channel already exist, and its TS is larger then
141 * the TS in the BURST message, then we cancel all existing modes.
142 * If its is smaller then the received BURST message is ignored.
143 * If it's equal, then the received modes are just added.
145 int ms_burst(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
147 struct ModeBuf modebuf, *mbuf = 0;
148 struct Channel *chptr;
150 struct Membership *member;
151 struct SLink *lp, **lp_p;
152 unsigned int parse_flags = (MODE_PARSE_FORCE | MODE_PARSE_BURST);
153 int param, nickpos = 0, banpos = 0;
154 char modestr[BUFSIZE], nickstr[BUFSIZE], banstr[BUFSIZE];
157 return protocol_violation(sptr,"Too few parameters for BURST");
159 if (!IsBurst(sptr)) /* don't allow BURST outside of burst */
160 return exit_client_msg(cptr, cptr, &me, "HACK: BURST message outside "
161 "net.burst from %s", cli_name(sptr));
163 if (!(chptr = get_channel(sptr, parv[1], CGT_CREATE)))
164 return 0; /* can't create the channel? */
166 timestamp = atoi(parv[2]);
168 /* turn off burst joined flag */
169 for (member = chptr->members; member; member = member->next_member)
170 member->status &= ~CHFL_BURST_JOINED;
172 if (!chptr->creationtime) /* mark channel as created during BURST */
173 chptr->mode.mode |= MODE_BURSTADDED;
175 /* new channel or an older one */
176 if (!chptr->creationtime || chptr->creationtime > timestamp) {
177 chptr->creationtime = timestamp;
179 modebuf_init(mbuf = &modebuf, &me, cptr, chptr, MODEBUF_DEST_CHANNEL);
180 modebuf_mode(mbuf, MODE_DEL | chptr->mode.mode); /* wipeout modes */
181 chptr->mode.mode &= ~(MODE_ADD | MODE_DEL | MODE_PRIVATE | MODE_SECRET |
182 MODE_MODERATED | MODE_TOPICLIMIT | MODE_INVITEONLY |
185 parse_flags |= (MODE_PARSE_SET | MODE_PARSE_WIPEOUT); /* wipeout keys */
187 /* mark bans for wipeout */
188 for (lp = chptr->banlist; lp; lp = lp->next)
189 lp->flags |= CHFL_BURST_BAN_WIPEOUT;
190 } else if (chptr->creationtime == timestamp) {
191 modebuf_init(mbuf = &modebuf, &me, cptr, chptr, MODEBUF_DEST_CHANNEL);
193 parse_flags |= MODE_PARSE_SET; /* set new modes */
196 param = 3; /* parse parameters */
197 while (param < parc) {
198 switch (*parv[param]) {
199 case '+': /* parameter introduces a mode string */
200 param += mode_parse(mbuf, cptr, sptr, chptr, parc - param,
201 parv + param, parse_flags);
204 case '%': /* parameter contains bans */
205 if (parse_flags & MODE_PARSE_SET) {
206 char *banlist = parv[param] + 1, *p = 0, *ban, *ptr;
207 struct SLink *newban;
209 for (ban = ircd_strtok(&p, banlist, " "); ban;
210 ban = ircd_strtok(&p, 0, " ")) {
211 ban = collapse(pretty_mask(ban));
214 * Yeah, we should probably do this elsewhere, and make it better
215 * and more general; this will hold until we get there, though.
216 * I dislike the current add_banid API... -Kev
218 * I wish there were a better algo. for this than the n^2 one
221 for (lp = chptr->banlist; lp; lp = lp->next) {
222 if (!ircd_strcmp(lp->value.ban.banstr, ban)) {
223 ban = 0; /* don't add ban */
224 lp->flags &= ~CHFL_BURST_BAN_WIPEOUT; /* not wiping out */
225 break; /* new ban already existed; don't even repropagate */
226 } else if (!(lp->flags & CHFL_BURST_BAN_WIPEOUT) &&
227 !mmatch(lp->value.ban.banstr, ban)) {
228 ban = 0; /* don't add ban unless wiping out bans */
229 break; /* new ban is encompassed by an existing one; drop */
230 } else if (!mmatch(ban, lp->value.ban.banstr))
231 lp->flags |= CHFL_BAN_OVERLAPPED; /* remove overlapping ban */
237 if (ban) { /* add the new ban to the end of the list */
238 /* Build ban buffer */
240 banstr[banpos++] = ' ';
241 banstr[banpos++] = ':';
242 banstr[banpos++] = '%';
244 banstr[banpos++] = ' ';
245 for (ptr = ban; *ptr; ptr++) /* add ban to buffer */
246 banstr[banpos++] = *ptr;
248 newban = make_link(); /* create new ban */
250 DupString(newban->value.ban.banstr, ban);
251 #ifdef HEAD_IN_SAND_BANWHO
252 DupString(newban->value.ban.who, cli_name(&me));
254 DupString(newban->value.ban.who, cli_name(sptr));
256 newban->value.ban.when = TStime();
258 newban->flags = CHFL_BAN | CHFL_BURST_BAN; /* set flags */
259 if ((ptr = strrchr(ban, '@')) && check_if_ipmask(ptr + 1))
260 newban->flags |= CHFL_BAN_IPMASK;
264 lp->next = newban; /* link it in */
266 chptr->banlist = newban;
270 param++; /* look at next param */
273 default: /* parameter contains clients */
275 struct Client *acptr;
276 char *nicklist = parv[param], *p = 0, *nick, *ptr;
277 int default_mode = CHFL_DEOPPED | CHFL_BURST_JOINED;
278 int last_mode = CHFL_DEOPPED | CHFL_BURST_JOINED;
280 for (nick = ircd_strtok(&p, nicklist, ","); nick;
281 nick = ircd_strtok(&p, 0, ",")) {
283 if ((ptr = strchr(nick, ':'))) { /* new flags; deal */
286 if (parse_flags & MODE_PARSE_SET) {
287 for (default_mode = CHFL_DEOPPED | CHFL_BURST_JOINED; *ptr;
289 if (*ptr == 'o') /* has oper status */
290 default_mode = (default_mode & ~CHFL_DEOPPED) | CHFL_CHANOP;
291 else if (*ptr == 'v') /* has voice status */
292 default_mode |= CHFL_VOICE;
293 else /* I don't recognize that flag */
294 break; /* so stop processing */
299 if (!(acptr = findNUser(nick)) || cli_from(acptr) != cptr)
300 continue; /* ignore this client */
302 /* Build nick buffer */
303 nickstr[nickpos] = nickpos ? ',' : ' '; /* first char */
306 for (ptr = nick; *ptr; ptr++) /* store nick */
307 nickstr[nickpos++] = *ptr;
309 if (default_mode != last_mode) { /* if mode changed... */
310 last_mode = default_mode;
312 nickstr[nickpos++] = ':'; /* add a specifier */
313 if (default_mode & CHFL_CHANOP)
314 nickstr[nickpos++] = 'o';
315 if (default_mode & CHFL_VOICE)
316 nickstr[nickpos++] = 'v';
319 add_user_to_channel(chptr, acptr, default_mode);
320 sendcmdto_channel_butserv(acptr, CMD_JOIN, chptr, "%H", chptr);
325 } /* switch (*parv[param]) { */
326 } /* while (param < parc) { */
328 nickstr[nickpos] = '\0';
329 banstr[banpos] = '\0';
331 if (parse_flags & MODE_PARSE_SET) {
332 modebuf_extract(mbuf, modestr + 1); /* for sending BURST onward */
333 modestr[0] = modestr[1] ? ' ' : '\0';
337 sendcmdto_serv_butone(sptr, CMD_BURST, cptr, "%H %Tu%s%s%s", chptr,
338 chptr->creationtime, modestr, nickstr, banstr);
340 if (parse_flags & MODE_PARSE_WIPEOUT || banpos)
341 mode_ban_invalidate(chptr);
343 if (parse_flags & MODE_PARSE_SET) { /* any modes changed? */
344 /* first deal with channel members */
345 for (member = chptr->members; member; member = member->next_member) {
346 if (member->status & CHFL_BURST_JOINED) { /* joined during burst */
347 if (member->status & CHFL_CHANOP)
348 modebuf_mode_client(mbuf, MODE_ADD | CHFL_CHANOP, member->user);
349 if (member->status & CHFL_VOICE)
350 modebuf_mode_client(mbuf, MODE_ADD | CHFL_VOICE, member->user);
351 } else if (parse_flags & MODE_PARSE_WIPEOUT) { /* wipeout old ops */
352 if (member->status & CHFL_CHANOP)
353 modebuf_mode_client(mbuf, MODE_DEL | CHFL_CHANOP, member->user);
354 if (member->status & CHFL_VOICE)
355 modebuf_mode_client(mbuf, MODE_DEL | CHFL_VOICE, member->user);
356 member->status = ((member->status & ~(CHFL_CHANOP | CHFL_VOICE)) |
361 /* Now deal with channel bans */
362 lp_p = &chptr->banlist;
366 /* remove ban from channel */
367 if (lp->flags & (CHFL_BAN_OVERLAPPED | CHFL_BURST_BAN_WIPEOUT)) {
368 modebuf_mode_string(mbuf, MODE_DEL | MODE_BAN,
369 lp->value.ban.banstr, 1); /* let it free banstr */
371 *lp_p = lp->next; /* clip out of list */
372 MyFree(lp->value.ban.who); /* free who */
373 free_link(lp); /* free ban */
375 } else if (lp->flags & CHFL_BURST_BAN) /* add ban to channel */
376 modebuf_mode_string(mbuf, MODE_ADD | MODE_BAN,
377 lp->value.ban.banstr, 0); /* don't free banstr */
379 lp->flags &= (CHFL_BAN | CHFL_BAN_IPMASK); /* reset the flag */
380 lp_p = &(*lp_p)->next;
384 return mbuf ? modebuf_flush(mbuf) : 0;