Merge branch 'u2_10_12_branch' of git://git.code.sf.net/p/undernet-ircu/ircu2
[ircu2.10.12-pk.git] / ircd / m_burst.c
diff --git a/ircd/m_burst.c b/ircd/m_burst.c
new file mode 100644 (file)
index 0000000..00e4265
--- /dev/null
@@ -0,0 +1,622 @@
+/*
+ * IRC - Internet Relay Chat, ircd/m_burst.c
+ * Copyright (C) 1990 Jarkko Oikarinen and
+ *                    University of Oulu, Computing Center
+ *
+ * See file AUTHORS in IRC package for additional names of
+ * the programmers.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 1, or (at your option)
+ * any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ */
+
+/*
+ * m_functions execute protocol messages on this server:
+ *
+ *    cptr    is always NON-NULL, pointing to a *LOCAL* client
+ *            structure (with an open socket connected!). This
+ *            identifies the physical socket where the message
+ *            originated (or which caused the m_function to be
+ *            executed--some m_functions may call others...).
+ *
+ *    sptr    is the source of the message, defined by the
+ *            prefix part of the message if present. If not
+ *            or prefix not found, then sptr==cptr.
+ *
+ *            (!IsServer(cptr)) => (cptr == sptr), because
+ *            prefixes are taken *only* from servers...
+ *
+ *            (IsServer(cptr))
+ *                    (sptr == cptr) => the message didn't
+ *                    have the prefix.
+ *
+ *                    (sptr != cptr && IsServer(sptr) means
+ *                    the prefix specified servername. (?)
+ *
+ *                    (sptr != cptr && !IsServer(sptr) means
+ *                    that message originated from a remote
+ *                    user (not local).
+ *
+ *            combining
+ *
+ *            (!IsServer(sptr)) means that, sptr can safely
+ *            taken as defining the target structure of the
+ *            message in this server.
+ *
+ *    *Always* true (if 'parse' and others are working correct):
+ *
+ *    1)      sptr->from == cptr  (note: cptr->from == cptr)
+ *
+ *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
+ *            *cannot* be a local connection, unless it's
+ *            actually cptr!). [MyConnect(x) should probably
+ *            be defined as (x == x->from) --msa ]
+ *
+ *    parc    number of variable parameter strings (if zero,
+ *            parv is allowed to be NULL)
+ *
+ *    parv    a NULL terminated list of parameter pointers,
+ *
+ *                    parv[0], sender (prefix string), if not present
+ *                            this points to an empty string.
+ *                    parv[1]...parv[parc-1]
+ *                            pointers to additional parameters
+ *                    parv[parc] == NULL, *always*
+ *
+ *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
+ *                    non-NULL pointers.
+ */
+#include "config.h"
+
+#include "channel.h"
+#include "client.h"
+#include "hash.h"
+#include "ircd.h"
+#include "ircd_alloc.h"
+#include "ircd_features.h"
+#include "ircd_log.h"
+#include "ircd_reply.h"
+#include "ircd_string.h"
+#include "list.h"
+#include "match.h"
+#include "msg.h"
+#include "numeric.h"
+#include "numnicks.h"
+#include "s_conf.h"
+#include "s_misc.h"
+#include "send.h"
+#include "struct.h"
+#include "ircd_snprintf.h"
+
+/* #include <assert.h> -- Now using assert in ircd_log.h */
+#include <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+
+static int
+netride_modes(int parc, char **parv, const char *curr_key)
+{
+  char *modes = parv[0];
+  int result = 0;
+
+  assert(modes && modes[0] == '+');
+  while (*modes) {
+    switch (*modes++) {
+    case '-':
+      return -1;
+    case 'i':
+      result |= MODE_INVITEONLY;
+      break;
+    case 'k':
+      if (strcmp(curr_key, *++parv))
+        result |= MODE_KEY;
+      break;
+    case 'l':
+      ++parv;
+      break;
+    case 'r':
+      result |= MODE_REGONLY;
+      break;
+    }
+  }
+  return result;
+}
+
+/*
+ * ms_burst - server message handler
+ *
+ * --  by Run carlo@runaway.xs4all.nl  december 1995 till march 1997
+ *
+ * parv[0] = sender prefix
+ * parv[1] = channel name
+ * parv[2] = channel timestamp
+ * The meaning of the following parv[]'s depend on their first character:
+ * If parv[n] starts with a '+':
+ * Net burst, additive modes
+ *   parv[n] = <mode>
+ *   parv[n+1] = <param> (optional)
+ *   parv[n+2] = <param> (optional)
+ * If parv[n] starts with a '%', then n will be parc-1:
+ *   parv[n] = %<ban> <ban> <ban> ...
+ * If parv[n] starts with another character:
+ *   parv[n] = <nick>[:<mode>],<nick>[:<mode>],...
+ *   where <mode> defines the mode and op-level
+ *   for nick and all following nicks until the
+ *   next <mode> field.
+ *   Digits in the <mode> field have of two meanings:
+ *   1) if it is the first field in this BURST message
+ *      that contains digits, and/or when a 'v' is
+ *      present in the <mode>:
+ *      The absolute value of the op-level.
+ *   2) if there are only digits in this field and
+ *      it is not the first field with digits:
+ *      An op-level increment relative to the previous
+ *      op-level.
+ *   First all modeless nicks must be emmitted,
+ *   then all combinations of modes without ops
+ *   (currently that is only 'v') followed by the same
+ *   series but then with ops (currently 'o','ov').
+ *
+ * Example:
+ * "A8 B #test 87654321 +ntkAl key secret 123 A8AAG,A8AAC:v,A8AAA:0,A8AAF:2,A8AAD,A8AAB:v1,A8AAE:1 :%ban1 ban2"
+ *
+ * <mode> list example:
+ *
+ * "xxx,sss:v,ttt,aaa:123,bbb,ccc:2,ddd,kkk:v2,lll:2,mmm"
+ *
+ * means
+ *
+ *  xxx                // first modeless nicks
+ *  sss +v     // then opless nicks
+ *  ttt +v     // no ":<mode>": everything stays the same
+ *  aaa -123   // first field with digit: absolute value
+ *  bbb -123
+ *  ccc -125   // only digits, not first field: increment
+ *  ddd -125
+ *  kkk -2 +v  // field with a 'v': absolute value
+ *  lll -4 +v  // only digits: increment
+ *  mmm -4 +v
+ *
+ * Anti net.ride code.
+ *
+ * When the channel already exist, and its TS is larger than
+ * the TS in the BURST message, then we cancel all existing modes.
+ * If its is smaller then the received BURST message is ignored.
+ * If it's equal, then the received modes are just added.
+ *
+ * BURST is also accepted outside a netburst now because it
+ * is sent upstream as reaction to a DESTRUCT message.  For
+ * these BURST messages it is possible that the listed channel
+ * members are already joined.
+ */
+int ms_burst(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
+{
+  struct ModeBuf modebuf, *mbuf = 0;
+  struct Channel *chptr;
+  time_t timestamp;
+  struct Membership *member, *nmember;
+  struct Ban *lp, **lp_p;
+  unsigned int parse_flags = (MODE_PARSE_FORCE | MODE_PARSE_BURST);
+  int param, nickpos = 0, banpos = 0;
+  char modestr[BUFSIZE], nickstr[BUFSIZE], banstr[BUFSIZE];
+
+  if (parc < 3)
+    return protocol_violation(sptr,"Too few parameters for BURST");
+
+  if (!(chptr = get_channel(sptr, parv[1], CGT_CREATE)))
+    return 0; /* can't create the channel? */
+
+  timestamp = atoi(parv[2]);
+
+  if (chptr->creationtime)     /* 0 for new (empty) channels,
+                                   i.e. when this server just restarted. */
+  {
+    if (parc == 3)             /* Zannel BURST? */
+    {
+      /* An empty channel without +A set, will cause a BURST message
+        with exactly 3 parameters (because all modes have been reset).
+        If the timestamp on such channels is only a few seconds older
+        from our own, then we ignore this burst: we do not deop our
+        own side.
+        Likewise, we expect the other (empty) side to copy our timestamp
+        from our own BURST message, even though it is slightly larger.
+
+        The reason for this is to allow people to join an empty
+        non-A channel (a zannel) during a net.split, and not be
+        deopped when the net reconnects (with another zannel). When
+        someone joins a split zannel, their side increments the TS by one.
+        If they cycle a few times then we still don't have a reason to
+        deop them. Theoretically I see no reason not to accept ANY timestamp,
+        but to be sure, we only accept timestamps that are just a few
+        seconds off (one second for each time they cycled the channel). */
+
+      /* Don't even deop users who cycled four times during the net.break. */
+      if (timestamp < chptr->creationtime &&
+          chptr->creationtime <= timestamp + 4 &&
+         chptr->users != 0)    /* Only do this when WE have users, so that
+                                  if we do this the BURST that we sent has
+                                  parc > 3 and the other side will use the
+                                  test below: */
+       timestamp = chptr->creationtime; /* Do not deop our side. */
+    }
+    else if (chptr->creationtime < timestamp &&
+             timestamp <= chptr->creationtime + 4 &&
+            chptr->users == 0)
+    {
+      /* If one side of the net.junction does the above
+         timestamp = chptr->creationtime, then the other
+        side must do this: */
+      chptr->creationtime = timestamp; /* Use the same TS on both sides. */
+    }
+    /* In more complex cases, we might still end up with a
+       creationtime desync of a few seconds, but that should
+       be synced automatically rather quickly (every JOIN
+       caries a timestamp and will sync it; modes by users do
+       not carry timestamps and are accepted regardless).
+       Only when nobody joins the channel on the side with
+       the oldest timestamp before a new net.break occurs
+       precisely inbetween the desync, an unexpected bounce
+       might happen on reconnect. */
+  }
+
+  if (!chptr->creationtime || chptr->creationtime > timestamp) {
+    /*
+     * Kick local members if channel is +i or +k and our TS was larger
+     * than the burst TS (anti net.ride). The modes hack is here because
+     * we have to do this before mode_parse, as chptr may go away.
+     */
+    for (param = 3; param < parc; param++)
+    {
+      int check_modes;
+      if (parv[param][0] != '+')
+        continue;
+      check_modes = netride_modes(parc - param, parv + param, chptr->mode.key);
+      if (check_modes < 0)
+      {
+        if (chptr->users == 0)
+          sub1_from_channel(chptr);
+        return protocol_violation(sptr, "Invalid mode string in BURST");
+      }
+      else if (check_modes)
+      {
+        /* Clear any outstanding rogue invites */
+        mode_invite_clear(chptr);
+        for (member = chptr->members; member; member = nmember)
+        {
+          nmember = member->next_member;
+          if (!MyUser(member->user) || IsZombie(member))
+            continue;
+          /* Kick as netrider if key mismatch *or* remote channel is
+           * +i (unless user is an oper) *or* remote channel is +r
+           * (unless user has an account).
+           */
+          if (!(check_modes & MODE_KEY)
+              && (!(check_modes & MODE_INVITEONLY) || IsAnOper(member->user))
+              && (!(check_modes & MODE_REGONLY) || IsAccount(member->user)))
+            continue;
+          sendcmdto_serv_butone(&me, CMD_KICK, NULL, "%H %C :Net Rider", chptr, member->user);
+          sendcmdto_channel_butserv_butone(&his, CMD_KICK, chptr, NULL, 0, "%H %C :Net Rider", chptr, member->user);
+          make_zombie(member, member->user, &me, &me, chptr);
+        }
+      }
+      break;
+    }
+
+    /* If the channel had only locals, it went away by now. */
+    if (!(chptr = get_channel(sptr, parv[1], CGT_CREATE)))
+      return 0; /* can't create the channel? */
+  }
+
+  /* turn off burst joined flag */
+  for (member = chptr->members; member; member = member->next_member)
+    member->status &= ~(CHFL_BURST_JOINED|CHFL_BURST_ALREADY_OPPED|CHFL_BURST_ALREADY_VOICED);
+
+  if (!chptr->creationtime) /* mark channel as created during BURST */
+    chptr->mode.mode |= MODE_BURSTADDED;
+
+  /* new channel or an older one */
+  if (!chptr->creationtime || chptr->creationtime > timestamp) {
+    chptr->creationtime = timestamp;
+
+    modebuf_init(mbuf = &modebuf, &me, cptr, chptr,
+                MODEBUF_DEST_CHANNEL | MODEBUF_DEST_NOKEY);
+    modebuf_mode(mbuf, MODE_DEL | chptr->mode.mode); /* wipeout modes */
+    chptr->mode.mode &= MODE_BURSTADDED | MODE_WASDELJOINS;
+
+    /* wipeout any limit and keys that are set */
+    parse_flags |= (MODE_PARSE_SET | MODE_PARSE_WIPEOUT);
+
+    /* mark bans for wipeout */
+    for (lp = chptr->banlist; lp; lp = lp->next)
+      lp->flags |= BAN_BURST_WIPEOUT;
+
+    /* clear topic set by netrider (if set) */
+    if (*chptr->topic) {
+      *chptr->topic = '\0';
+      *chptr->topic_nick = '\0';
+      chptr->topic_time = 0;
+      sendcmdto_channel_butserv_butone(&his, CMD_TOPIC, chptr, NULL, 0,
+                                       "%H :%s", chptr, chptr->topic);
+    }
+  } else if (chptr->creationtime == timestamp) {
+    modebuf_init(mbuf = &modebuf, &me, cptr, chptr,
+                MODEBUF_DEST_CHANNEL | MODEBUF_DEST_NOKEY);
+
+    parse_flags |= MODE_PARSE_SET; /* set new modes */
+  }
+
+  param = 3; /* parse parameters */
+  while (param < parc) {
+    switch (*parv[param]) {
+    case '+': /* parameter introduces a mode string */
+      param += mode_parse(mbuf, cptr, sptr, chptr, parc - param,
+                         parv + param, parse_flags, NULL);
+      break;
+
+    case '%': /* parameter contains bans */
+      if (parse_flags & MODE_PARSE_SET) {
+       char *banlist = parv[param] + 1, *p = 0, *ban, *ptr;
+       struct Ban *newban;
+
+       for (ban = ircd_strtok(&p, banlist, " "); ban;
+            ban = ircd_strtok(&p, 0, " ")) {
+         ban = collapse(pretty_mask(ban));
+
+           /*
+            * Yeah, we should probably do this elsewhere, and make it better
+            * and more general; this will hold until we get there, though.
+            * I dislike the current add_banid API... -Kev
+            *
+            * I wish there were a better algo. for this than the n^2 one
+            * shown below *sigh*
+            */
+         for (lp = chptr->banlist; lp; lp = lp->next) {
+           if (!ircd_strcmp(lp->banstr, ban)) {
+             ban = 0; /* don't add ban */
+             lp->flags &= ~BAN_BURST_WIPEOUT; /* not wiping out */
+             break; /* new ban already existed; don't even repropagate */
+           } else if (!(lp->flags & BAN_BURST_WIPEOUT) &&
+                      !mmatch(lp->banstr, ban)) {
+             ban = 0; /* don't add ban unless wiping out bans */
+             break; /* new ban is encompassed by an existing one; drop */
+           } else if (!mmatch(ban, lp->banstr))
+             lp->flags |= BAN_OVERLAPPED; /* remove overlapping ban */
+
+           if (!lp->next)
+             break;
+         }
+
+         if (ban) { /* add the new ban to the end of the list */
+           /* Build ban buffer */
+           if (!banpos) {
+             banstr[banpos++] = ' ';
+             banstr[banpos++] = ':';
+             banstr[banpos++] = '%';
+           } else
+             banstr[banpos++] = ' ';
+           for (ptr = ban; *ptr; ptr++) /* add ban to buffer */
+             banstr[banpos++] = *ptr;
+
+           newban = make_ban(ban); /* create new ban */
+            strcpy(newban->who, "*");
+           newban->when = TStime();
+           newban->flags |= BAN_BURSTED;
+           newban->next = 0;
+           if (lp)
+             lp->next = newban; /* link it in */
+           else
+             chptr->banlist = newban;
+         }
+       }
+      } 
+      param++; /* look at next param */
+      break;
+
+    default: /* parameter contains clients */
+      {
+       struct Client *acptr;
+       char *nicklist = parv[param], *p = 0, *nick, *ptr;
+       int current_mode, last_mode, base_mode;
+       int oplevel = -1;       /* Mark first field with digits: means the same as 'o' (but with level). */
+       int last_oplevel = 0;
+       struct Membership* member;
+
+        base_mode = CHFL_DEOPPED | CHFL_BURST_JOINED;
+        if (chptr->mode.mode & MODE_DELJOINS)
+            base_mode |= CHFL_DELAYED;
+        current_mode = last_mode = base_mode;
+
+       for (nick = ircd_strtok(&p, nicklist, ","); nick;
+            nick = ircd_strtok(&p, 0, ",")) {
+
+         if ((ptr = strchr(nick, ':'))) { /* new flags; deal */
+           *ptr++ = '\0';
+
+           if (parse_flags & MODE_PARSE_SET) {
+             int current_mode_needs_reset;
+             for (current_mode_needs_reset = 1; *ptr; ptr++) {
+               if (*ptr == 'o') { /* has oper status */
+                 /*
+                  * An 'o' is pre-oplevel protocol, so this is only for
+                  * backwards compatibility.  Give them an op-level of
+                  * MAXOPLEVEL so everyone can deop them.
+                  */
+                 oplevel = MAXOPLEVEL;
+                 if (current_mode_needs_reset) {
+                   current_mode = base_mode;
+                   current_mode_needs_reset = 0;
+                 }
+                 current_mode = (current_mode & ~(CHFL_DEOPPED | CHFL_DELAYED)) | CHFL_CHANOP;
+                  /*
+                   * Older servers may send XXYYY:ov, in which case we
+                   * do not want to use the code for 'v' below.
+                   */
+                  if (ptr[1] == 'v') {
+                    current_mode |= CHFL_VOICE;
+                    ptr++;
+                  }
+               }
+               else if (*ptr == 'v') { /* has voice status */
+                 if (current_mode_needs_reset) {
+                    current_mode = base_mode;
+                   current_mode_needs_reset = 0;
+                 }
+                 current_mode = (current_mode & ~CHFL_DELAYED) | CHFL_VOICE;
+                 oplevel = -1; /* subsequent digits are an absolute op-level value. */
+                }
+               else if (IsDigit(*ptr)) {
+                 int level_increment = 0;
+                 if (oplevel == -1) { /* op-level is absolute value? */
+                   if (current_mode_needs_reset) {
+                     current_mode = base_mode;
+                     current_mode_needs_reset = 0;
+                   }
+                   oplevel = 0;
+                 }
+                 current_mode = (current_mode & ~(CHFL_DEOPPED | CHFL_DELAYED)) | CHFL_CHANOP;
+                 do {
+                   level_increment = 10 * level_increment + *ptr++ - '0';
+                 } while (IsDigit(*ptr));
+                 --ptr;
+                 oplevel += level_increment;
+                  if (oplevel > MAXOPLEVEL) {
+                    protocol_violation(sptr, "Invalid cumulative oplevel %u during burst", oplevel);
+                    oplevel = MAXOPLEVEL;
+                    break;
+                  }
+               }
+               else { /* I don't recognize that flag */
+                 protocol_violation(sptr, "Invalid flag '%c' in nick part of burst", *ptr);
+                 break; /* so stop processing */
+               }
+             }
+           }
+         }
+
+         if (!(acptr = findNUser(nick)) || cli_from(acptr) != cptr)
+           continue; /* ignore this client */
+
+         /* Build nick buffer */
+         nickstr[nickpos] = nickpos ? ',' : ' '; /* first char */
+         nickpos++;
+
+         for (ptr = nick; *ptr; ptr++) /* store nick */
+           nickstr[nickpos++] = *ptr;
+
+         if (current_mode != last_mode) { /* if mode changed... */
+           last_mode = current_mode;
+           last_oplevel = oplevel;
+
+           nickstr[nickpos++] = ':'; /* add a specifier */
+           if (current_mode & CHFL_VOICE)
+             nickstr[nickpos++] = 'v';
+           if (current_mode & CHFL_CHANOP)
+            {
+              if (oplevel != MAXOPLEVEL)
+               nickpos += ircd_snprintf(0, nickstr + nickpos, sizeof(nickstr) - nickpos, "%u", oplevel);
+              else
+                nickstr[nickpos++] = 'o';
+            }
+         } else if (current_mode & CHFL_CHANOP && oplevel != last_oplevel) { /* if just op level changed... */
+           nickstr[nickpos++] = ':'; /* add a specifier */
+           nickpos += ircd_snprintf(0, nickstr + nickpos, sizeof(nickstr) - nickpos, "%u", oplevel - last_oplevel);
+            last_oplevel = oplevel;
+         }
+
+         if (!(member = find_member_link(chptr, acptr)))
+         {
+           add_user_to_channel(chptr, acptr, current_mode, oplevel);
+            if (!(current_mode & CHFL_DELAYED))
+              sendcmdto_channel_butserv_butone(acptr, CMD_JOIN, chptr, NULL, 0, "%H", chptr);
+         }
+         else
+         {
+           /* The member was already joined (either by CREATE or JOIN).
+              Remember the current mode. */
+           if (member->status & CHFL_CHANOP)
+             member->status |= CHFL_BURST_ALREADY_OPPED;
+           if (member->status & CHFL_VOICE)
+             member->status |= CHFL_BURST_ALREADY_VOICED;
+           /* Synchronize with the burst. */
+           member->status |= CHFL_BURST_JOINED | (current_mode & (CHFL_CHANOP|CHFL_VOICE));
+           SetOpLevel(member, oplevel);
+         }
+       }
+      }
+      param++;
+      break;
+    } /* switch (*parv[param]) */
+  } /* while (param < parc) */
+
+  nickstr[nickpos] = '\0';
+  banstr[banpos] = '\0';
+
+  if (parse_flags & MODE_PARSE_SET) {
+    modebuf_extract(mbuf, modestr + 1); /* for sending BURST onward */
+    modestr[0] = modestr[1] ? ' ' : '\0';
+  } else
+    modestr[0] = '\0';
+
+  sendcmdto_serv_butone(sptr, CMD_BURST, cptr, "%H %Tu%s%s%s", chptr,
+                       chptr->creationtime, modestr, nickstr, banstr);
+
+  if (parse_flags & MODE_PARSE_WIPEOUT || banpos)
+    mode_ban_invalidate(chptr);
+
+  if (parse_flags & MODE_PARSE_SET) { /* any modes changed? */
+    /* first deal with channel members */
+    for (member = chptr->members; member; member = member->next_member) {
+      if (member->status & CHFL_BURST_JOINED) { /* joined during burst */
+       if ((member->status & CHFL_CHANOP) && !(member->status & CHFL_BURST_ALREADY_OPPED))
+         modebuf_mode_client(mbuf, MODE_ADD | CHFL_CHANOP, member->user, OpLevel(member));
+       if ((member->status & CHFL_VOICE) && !(member->status & CHFL_BURST_ALREADY_VOICED))
+         modebuf_mode_client(mbuf, MODE_ADD | CHFL_VOICE, member->user, OpLevel(member));
+      } else if (parse_flags & MODE_PARSE_WIPEOUT) { /* wipeout old ops */
+       if (member->status & CHFL_CHANOP)
+         modebuf_mode_client(mbuf, MODE_DEL | CHFL_CHANOP, member->user, OpLevel(member));
+       if (member->status & CHFL_VOICE)
+         modebuf_mode_client(mbuf, MODE_DEL | CHFL_VOICE, member->user, OpLevel(member));
+       member->status = (member->status
+                          & ~(CHFL_CHANNEL_MANAGER | CHFL_CHANOP | CHFL_VOICE))
+                        | CHFL_DEOPPED;
+      }
+    }
+
+    /* Now deal with channel bans */
+    lp_p = &chptr->banlist;
+    while (*lp_p) {
+      lp = *lp_p;
+
+      /* remove ban from channel */
+      if (lp->flags & (BAN_OVERLAPPED | BAN_BURST_WIPEOUT)) {
+        char *bandup;
+        DupString(bandup, lp->banstr);
+       modebuf_mode_string(mbuf, MODE_DEL | MODE_BAN,
+                           bandup, 1);
+       *lp_p = lp->next; /* clip out of list */
+        free_ban(lp);
+       continue;
+      } else if (lp->flags & BAN_BURSTED) /* add ban to channel */
+       modebuf_mode_string(mbuf, MODE_ADD | MODE_BAN,
+                           lp->banstr, 0); /* don't free banstr */
+
+      lp->flags &= BAN_IPMASK; /* reset the flag */
+      lp_p = &(*lp_p)->next;
+    }
+  }
+
+  return mbuf ? modebuf_flush(mbuf) : 0;
+}