added ssl cipher notice on connect
[ircu2.10.12-pk.git] / ircd / s_user.c
index 6cce3293f6a96dbcb783212472c05c9370bedcee..9853ed237b74e818dfa53267eaaf08767595e065 100644 (file)
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  */
+/** @file
+ * @brief Miscellaneous user-related helper functions.
+ * @version $Id$
+ */
+#include "config.h"
 
-#include "sys.h"
-#include <sys/stat.h>
-#include <utmp.h>
-#if HAVE_FCNTL_H
-#include <fcntl.h>
-#endif
-#include <stdlib.h>
-#if HAVE_UNISTD_H
-#include <unistd.h>
-#endif
-#ifdef USE_SYSLOG
-#include <syslog.h>
-#endif
-#include "h.h"
-#include "struct.h"
-#include "common.h"
-#include "s_serv.h"
-#include "numeric.h"
-#include "send.h"
-#include "s_conf.h"
-#include "s_misc.h"
-#include "match.h"
-#include "hash.h"
-#include "s_bsd.h"
-#include "whowas.h"
-#include "list.h"
-#include "s_err.h"
-#include "parse.h"
-#include "ircd.h"
-#include "s_user.h"
-#include "support.h"
 #include "s_user.h"
+#include "IPcheck.h"
 #include "channel.h"
-#include "random.h"
-#include "version.h"
+#include "class.h"
+#include "client.h"
+#include "hash.h"
+#include "ircd.h"
+#include "ircd_alloc.h"
+#include "ircd_chattr.h"
+#include "ircd_features.h"
+#include "ircd_log.h"
+#include "ircd_reply.h"
+#include "ircd_snprintf.h"
+#include "ircd_string.h"
+#include "list.h"
+#include "match.h"
+#include "motd.h"
 #include "msg.h"
-#include "userload.h"
+#include "msgq.h"
+#include "numeric.h"
 #include "numnicks.h"
-#include "sprintf_irc.h"
+#include "parse.h"
 #include "querycmds.h"
-#include "IPcheck.h"
-#include "class.h"
+#include "random.h"
+#include "s_auth.h"
+#include "s_bsd.h"
+#include "s_conf.h"
+#include "s_debug.h"
+#include "s_misc.h"
+#include "s_serv.h" /* max_client_count */
+#include "send.h"
+#include "ssl.h"
+#include "struct.h"
+#include "supported.h"
+#include "sys.h"
+#include "userload.h"
+#include "version.h"
+#include "whowas.h"
 
-RCSTAG_CC("$Id$");
+#include "handlers.h" /* m_motd and m_lusers */
 
-/* *INDENT-OFF* */
+/* #include <assert.h> -- Now using assert in ircd_log.h */
+#include <fcntl.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
 
-/* This is not ANSI, but we have it anyway... */
-__BEGIN_DECLS
-char *crypt(const char *key, const char *salt);
-__END_DECLS
+/** Count of allocated User structures. */
+static int userCount = 0;
 
-/* *INDENT-ON* */
+/** Makes sure that \a cptr has a User information block.
+ * If cli_user(cptr) != NULL, does nothing.
+ * @param[in] cptr Client to attach User struct to.
+ * @return User struct associated with \a cptr.
+ */
+struct User *make_user(struct Client *cptr)
+{
+  assert(0 != cptr);
 
-static char buf[BUFSIZE], buf2[BUFSIZE];
+  if (!cli_user(cptr)) {
+    cli_user(cptr) = (struct User*) MyMalloc(sizeof(struct User));
+    assert(0 != cli_user(cptr));
 
-/*
- * 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.
+    /* All variables are 0 by default */
+    memset(cli_user(cptr), 0, sizeof(struct User));
+    ++userCount;
+    cli_user(cptr)->refcnt = 1;
+  }
+  return cli_user(cptr);
+}
+
+/** Dereference \a user.
+ * User structures are reference-counted; if the refcount of \a user
+ * becomes zero, free it.
+ * @param[in] user User to dereference.
  */
+void free_user(struct User* user)
+{
+  assert(0 != user);
+  assert(0 < user->refcnt);
 
-/*
- * next_client
- *
- * Local function to find the next matching client. The search
- * can be continued from the specified client entry. Normal
- * usage loop is:
- *
+  if (--user->refcnt == 0) {
+    if (user->away)
+      MyFree(user->away);
+    /*
+     * sanity check
+     */
+    assert(0 == user->joined);
+    assert(0 == user->invited);
+    assert(0 == user->channel);
+
+    MyFree(user);
+    assert(userCount>0);
+    --userCount;
+  }
+}
+
+/** Find number of User structs allocated and memory used by them.
+ * @param[out] count_out Receives number of User structs allocated.
+ * @param[out] bytes_out Receives number of bytes used by User structs.
+ */
+void user_count_memory(size_t* count_out, size_t* bytes_out)
+{
+  assert(0 != count_out);
+  assert(0 != bytes_out);
+  *count_out = userCount;
+  *bytes_out = userCount * sizeof(struct User);
+}
+
+
+/** Find the next client (starting at \a next) with a name that matches \a ch.
+ * Normal usage loop is:
  * for (x = client; x = next_client(x,mask); x = x->next)
  *     HandleMatchingClient;
  *
+ * @param[in] next First client to check.
+ * @param[in] ch Name mask to check against.
+ * @return Next matching client found, or NULL if none.
  */
-aClient *next_client(aClient *next, char *ch)
+struct Client *next_client(struct Client *next, const char* ch)
 {
-  Reg3 aClient *tmp = next;
+  struct Client *tmp = next;
 
   if (!tmp)
     return NULL;
 
   next = FindClient(ch);
   next = next ? next : tmp;
-  if (tmp->prev == next)
+  if (cli_prev(tmp) == next)
     return NULL;
   if (next != tmp)
     return next;
-  for (; next; next = next->next)
-    if (!match(ch, next->name))
+  for (; next; next = cli_next(next))
+    if (!match(ch, cli_name(next)))
       break;
   return next;
 }
 
-/*
- * hunt_server
- *
- *    Do the basic thing in delivering the message (command)
- *    across the relays to the specific server (server) for
- *    actions.
- *
- *    Note:   The command is a format string and *MUST* be
- *            of prefixed style (e.g. ":%s COMMAND %s ...").
- *            Command can have only max 8 parameters.
- *
- *    server  parv[server] is the parameter identifying the
- *            target server.
- *
- *    *WARNING*
- *            parv[server] is replaced with the pointer to the
- *            real servername from the matched client (I'm lazy
- *            now --msa).
- *
- *    returns: (see #defines)
+/** Find the destination server for a command, and forward it if that is not us.
+ *
+ * \a server may be a nickname, server name, server mask (if \a from
+ * is a local user) or server numnick (if \a is a server or remote
+ * user).
+ *
+ * @param[in] from Client that sent the command to us.
+ * @param[in] cmd Long-form command text.
+ * @param[in] tok Token-form command text.
+ * @param[in] one Client that originated the command (ignored).
+ * @param[in] MustBeOper If non-zero and \a from is not an operator, return HUNTED_NOSUCH.
+ * @param[in] pattern Format string of arguments to command.
+ * @param[in] server Index of target name or mask in \a parv.
+ * @param[in] parc Number of valid elements in \a parv (must be less than 9).
+ * @param[in] parv Array of arguments to command.
+ * @return One of HUNTED_ISME, HUNTED_NOSUCH or HUNTED_PASS.
  */
-int hunt_server(int MustBeOper, aClient *cptr, aClient *sptr, char *command,
-    int server, int parc, char *parv[])
+int hunt_server_cmd(struct Client *from, const char *cmd, const char *tok,
+                    struct Client *one, int MustBeOper, const char *pattern,
+                    int server, int parc, char *parv[])
 {
-  aClient *acptr;
-  char y[8];
+  struct Client *acptr;
+  char *to;
 
   /* Assume it's me, if no server or an unregistered client */
-  if (parc <= server || BadPtr(parv[server]) || IsUnknown(sptr))
+  if (parc <= server || EmptyString((to = parv[server])) || IsUnknown(from))
     return (HUNTED_ISME);
 
-  /* Make sure it's a server */
-  if (MyUser(sptr) || Protocol(cptr) < 10)
+  if (MustBeOper && !IsPrivileged(from))
   {
+    send_reply(from, ERR_NOPRIVILEGES);
+    return HUNTED_NOSUCH;
+  }
+
+  /* Make sure it's a server */
+  if (MyUser(from)) {
     /* Make sure it's a server */
-    if (!strchr(parv[server], '*'))
-    {
-      if (0 == (acptr = FindClient(parv[server])))
-       return HUNTED_NOSUCH;
-      if (acptr->user)
-       acptr = acptr->user->server;
-    }
-    else if (!(acptr = find_match_server(parv[server])))
-    {
-      sendto_one(sptr, err_str(ERR_NOSUCHSERVER),
-         me.name, parv[0], parv[server]);
+    if (!strchr(to, '*')) {
+      if (0 == (acptr = FindClient(to))) {
+        send_reply(from, ERR_NOSUCHSERVER, to);
+        return HUNTED_NOSUCH;
+      }
+
+      if (cli_user(acptr))
+        acptr = cli_user(acptr)->server;
+    } else if (!(acptr = find_match_server(to))) {
+      send_reply(from, ERR_NOSUCHSERVER, to);
       return (HUNTED_NOSUCH);
     }
+  } else if (!(acptr = FindNServer(to))) {
+    send_reply(from, SND_EXPLICIT | ERR_NOSUCHSERVER, "* :Server has disconnected");
+    return (HUNTED_NOSUCH);        /* Server broke off in the meantime */
   }
-  else if (!(acptr = FindNServer(parv[server])))
-    return (HUNTED_NOSUCH);    /* Server broke off in the meantime */
 
   if (IsMe(acptr))
     return (HUNTED_ISME);
 
-  if (MustBeOper && !IsPrivileged(sptr))
-  {
-    sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, sptr->name);
+  if (MustBeOper && !IsPrivileged(from)) {
+    send_reply(from, ERR_NOPRIVILEGES);
     return HUNTED_NOSUCH;
   }
 
-#ifdef NO_PROTOCOL9
-  if (MyUser(sptr))
-  {
-    strcpy(y, acptr->yxx);
-    parv[server] = y;
-  }
-#else
-  if (Protocol(acptr->from) > 9)
-  {
-    strcpy(y, acptr->yxx);
-    parv[server] = y;
-  }
-  else
-    parv[server] = acptr->name;
-#endif
+  /* assert(!IsServer(from)); */
+
+  parv[server] = (char *) acptr; /* HACK! HACK! HACK! ARGH! */
 
-  sendto_one(acptr, command, parv[0], parv[1], parv[2], parv[3], parv[4],
-      parv[5], parv[6], parv[7], parv[8]);
+  sendcmdto_one(from, cmd, tok, acptr, pattern, parv[1], parv[2], parv[3],
+                parv[4], parv[5], parv[6], parv[7], parv[8]);
 
   return (HUNTED_PASS);
 }
 
-/*
- * 'do_nick_name' ensures that the given parameter (nick) is really a proper
- * string for a nickname (note, the 'nick' may be modified in the process...)
- *
- * RETURNS the length of the final NICKNAME (0, if nickname is invalid)
- *
- * Nickname characters are in range 'A'..'}', '_', '-', '0'..'9'
- *  anything outside the above set will terminate nickname.
- * In addition, the first character cannot be '-' or a Digit.
- *
- * Note:
- *  The '~'-character should be allowed, but a change should be global,
- *  some confusion would result if only few servers allowed it...
+/** Find the destination server for a command, and forward it (as a
+ * high-priority command) if that is not us.
+ *
+ * \a server may be a nickname, server name, server mask (if \a from
+ * is a local user) or server numnick (if \a is a server or remote
+ * user).
+ * Unlike hunt_server_cmd(), this appends the message to the
+ * high-priority message queue for the destination server.
+ *
+ * @param[in] from Client that sent the command to us.
+ * @param[in] cmd Long-form command text.
+ * @param[in] tok Token-form command text.
+ * @param[in] one Client that originated the command (ignored).
+ * @param[in] MustBeOper If non-zero and \a from is not an operator, return HUNTED_NOSUCH.
+ * @param[in] pattern Format string of arguments to command.
+ * @param[in] server Index of target name or mask in \a parv.
+ * @param[in] parc Number of valid elements in \a parv (must be less than 9).
+ * @param[in] parv Array of arguments to command.
+ * @return One of HUNTED_ISME, HUNTED_NOSUCH or HUNTED_PASS.
  */
-
-static int do_nick_name(char *nick)
+int hunt_server_prio_cmd(struct Client *from, const char *cmd, const char *tok,
+                        struct Client *one, int MustBeOper,
+                        const char *pattern, int server, int parc,
+                        char *parv[])
 {
-  Reg1 char *ch;
-
-  if (*nick == '-' || isDigit(*nick))  /* first character in [0..9-] */
-    return 0;
-
-  for (ch = nick; *ch && (ch - nick) < NICKLEN; ch++)
-    if (!isIrcNk(*ch))
-      break;
+  struct Client *acptr;
+  char *to;
 
-  *ch = '\0';
+  /* Assume it's me, if no server or an unregistered client */
+  if (parc <= server || EmptyString((to = parv[server])) || IsUnknown(from))
+    return (HUNTED_ISME);
 
-  return (ch - nick);
-}
+  /* Make sure it's a server */
+  if (MyUser(from)) {
+    /* Make sure it's a server */
+    if (!strchr(to, '*')) {
+      if (0 == (acptr = FindClient(to))) {
+        send_reply(from, ERR_NOSUCHSERVER, to);
+        return HUNTED_NOSUCH;
+      }
 
-/*
- * canonize
- *
- * reduce a string of duplicate list entries to contain only the unique
- * items.  Unavoidably O(n^2).
- */
-char *canonize(char *buffer)
-{
-  static char cbuf[BUFSIZ];
-  register char *s, *t, *cp = cbuf;
-  register int l = 0;
-  char *p = NULL, *p2;
+      if (cli_user(acptr))
+        acptr = cli_user(acptr)->server;
+    } else if (!(acptr = find_match_server(to))) {
+      send_reply(from, ERR_NOSUCHSERVER, to);
+      return (HUNTED_NOSUCH);
+    }
+  } else if (!(acptr = FindNServer(to)))
+    return (HUNTED_NOSUCH);        /* Server broke off in the meantime */
 
-  *cp = '\0';
+  if (IsMe(acptr))
+    return (HUNTED_ISME);
 
-  for (s = strtoken(&p, buffer, ","); s; s = strtoken(&p, NULL, ","))
-  {
-    if (l)
-    {
-      p2 = NULL;
-      for (t = strtoken(&p2, cbuf, ","); t; t = strtoken(&p2, NULL, ","))
-       if (!strCasediff(s, t))
-         break;
-       else if (p2)
-         p2[-1] = ',';
-    }
-    else
-      t = NULL;
-    if (!t)
-    {
-      if (l)
-       *(cp - 1) = ',';
-      else
-       l = 1;
-      strcpy(cp, s);
-      if (p)
-       cp += (p - s);
-    }
-    else if (p2)
-      p2[-1] = ',';
+  if (MustBeOper && !IsPrivileged(from)) {
+    send_reply(from, ERR_NOPRIVILEGES);
+    return HUNTED_NOSUCH;
   }
-  return cbuf;
-}
 
-/*
- * clean_user_id
- *
- * Copy `source' to `dest', replacing all occurances of '~' and characters that
- * are not `isIrcUi' by an underscore.
- * Copies at most USERLEN - 1 characters or up till the first control character.
- * If `tilde' is true, then a tilde is prepended to `dest'.
- * Note that `dest' and `source' can point to the same area or to different
- * non-overlapping areas.
- */
+  /* assert(!IsServer(from)); SETTIME to particular destinations permitted */
 
-static char *clean_user_id(char *dest, char *source, int tilde)
-{
-  register char ch;
-  char *d = dest;
-  char *s = source;
-  int rlen = USERLEN;
+  parv[server] = (char *) acptr; /* HACK! HACK! HACK! ARGH! */
 
-  ch = *s++;                   /* Store first character to copy: */
-  if (tilde)
-  {
-    *d++ = '~';                        /* If `dest' == `source', then this overwrites `ch' */
-    --rlen;
-  }
-  while (ch && !isCntrl(ch) && rlen--)
-  {
-    register char nch = *s++;  /* Store next character to copy */
-    *d++ = isIrcUi(ch) ? ch : '_';     /* This possibly overwrites it */
-    if (nch == '~')
-      ch = '_';
-    else
-      ch = nch;
-  }
-  *d = 0;
-  return dest;
+  sendcmdto_prio_one(from, cmd, tok, acptr, pattern, parv[1], parv[2], parv[3],
+                    parv[4], parv[5], parv[6], parv[7], parv[8]);
+
+  return (HUNTED_PASS);
 }
 
+
 /*
  * register_user
  *
@@ -380,744 +327,254 @@ static char *clean_user_id(char *dest, char *source, int tilde)
  *    this is not fair. It should actually request another
  *    nick from local user or kill him/her...
  */
-
-static int register_user(aClient *cptr, aClient *sptr,
-    char *nick, char *username)
+/** Finish registering a user who has sent both NICK and USER.
+ * For local connections, possibly check IAuth; make sure there is a
+ * matching Client config block; clean the username field; check
+ * K/k-lines; check for "hacked" looking usernames; assign a numnick;
+ * and send greeting (WELCOME, ISUPPORT, MOTD, etc).
+ * For all connections, update the invisible user and operator counts;
+ * run IPcheck against their address; and forward the NICK.
+ *
+ * @param[in] cptr Client who introduced the user.
+ * @param[in,out] sptr Client who has been fully introduced.
+ * @return Zero or CPTR_KILLED.
+ */
+int register_user(struct Client *cptr, struct Client *sptr)
 {
-  Reg1 aConfItem *aconf;
-  char *parv[3], *tmpstr, *tmpstr2;
-  char c = 0 /* not alphanum */ , d = 'a' /* not a digit */ ;
-  short upper = 0;
-  short lower = 0;
-  short pos = 0, leadcaps = 0, other = 0, digits = 0, badid = 0;
-  short digitgroups = 0;
-  anUser *user = sptr->user;
-  Dlink *lp;
-  char ip_base64[8];
-
-  user->last = now;
-  parv[0] = sptr->name;
+  char*            parv[4];
+  char*            tmpstr;
+  struct User*     user = cli_user(sptr);
+  char             ip_base64[25];
+
+  user->last = CurrentTime;
+  parv[0] = cli_name(sptr);
   parv[1] = parv[2] = NULL;
 
   if (MyConnect(sptr))
   {
-    static time_t last_too_many1, last_too_many2;
-    switch (check_client(sptr))
-    {
-      case ACR_OK:
-       break;
-      case ACR_NO_AUTHORIZATION:
-       sendto_op_mask(SNO_UNAUTH, "Unauthorized connection from %s.",
-           get_client_host(sptr));
-       ircstp->is_ref++;
-       return exit_client(cptr, sptr, &me,
-           "No Authorization - use another server");
-      case ACR_TOO_MANY_IN_CLASS:
-       if (now - last_too_many1 >= (time_t) 60)
-       {
-         last_too_many1 = now;
-         sendto_op_mask(SNO_TOOMANY, "Too many connections in class for %s.",
-             get_client_host(sptr));
-       }
-       IPcheck_connect_fail(sptr);
-       ircstp->is_ref++;
-       return exit_client(cptr, sptr, &me,
-           "Sorry, your connection class is full - try again later or try another server");
-      case ACR_TOO_MANY_FROM_IP:
-       if (now - last_too_many2 >= (time_t) 60)
-       {
-         last_too_many2 = now;
-         sendto_op_mask(SNO_TOOMANY,
-             "Too many connections from same IP for %s.",
-             get_client_host(sptr));
-       }
-       ircstp->is_ref++;
-       return exit_client(cptr, sptr, &me,
-           "Too many connections from your host");
-      case ACR_ALREADY_AUTHORIZED:
-       /* Can this ever happen? */
-      case ACR_BAD_SOCKET:
-       IPcheck_connect_fail(sptr);
-       return exit_client(cptr, sptr, &me, "Unknown error -- Try again");
-    }
-    if (IsUnixSocket(sptr))
-      strncpy(user->host, me.sockhost, HOSTLEN);
-    else
-      strncpy(user->host, sptr->sockhost, HOSTLEN);
-    aconf = sptr->confs->value.aconf;
-
-    clean_user_id(user->username,
-       (sptr->flags & FLAGS_GOTID) ? sptr->username : username,
-       (sptr->flags & FLAGS_DOID) && !(sptr->flags & FLAGS_GOTID));
-
-    if ((user->username[0] == '\000')
-       || ((user->username[0] == '~') && (user->username[1] == '\000')))
-      return exit_client(cptr, sptr, &me, "USER: Bogus userid.");
-
-    if (!BadPtr(aconf->passwd)
-       && !(isDigit(*aconf->passwd) && !aconf->passwd[1])
-#ifdef USEONE
-       && strcmp("ONE", aconf->passwd)
-#endif
-       && strcmp(sptr->passwd, aconf->passwd))
-    {
-      ircstp->is_ref++;
-      sendto_one(sptr, err_str(ERR_PASSWDMISMATCH), me.name, parv[0]);
-      IPcheck_connect_fail(sptr);
-      return exit_client(cptr, sptr, &me, "Bad Password");
-    }
-    memset(sptr->passwd, 0, sizeof(sptr->passwd));
+    assert(cptr == sptr);
+
+    Count_unknownbecomesclient(sptr, UserStats);
+
     /*
-     * following block for the benefit of time-dependent K:-lines
+     * Set user's initial modes
      */
-    if (find_kill(sptr))
-    {
-      ircstp->is_ref++;
-      return exit_client(cptr, sptr, &me, "K-lined");
-    }
-#ifdef R_LINES
-    if (find_restrict(sptr))
-    {
-      ircstp->is_ref++;
-      return exit_client(cptr, sptr, &me, "R-lined");
+    tmpstr = (char*)client_get_default_umode(sptr);
+    if (tmpstr) {
+      char *umodev[] = { NULL, NULL, NULL, NULL };
+      umodev[2] = tmpstr;
+      set_user_mode(cptr, sptr, 3, umodev, ALLOWMODES_ANY);
     }
-#endif
 
+    SetUser(sptr);
+    cli_handler(sptr) = CLIENT_HANDLER;
+    SetLocalNumNick(sptr);
+    send_reply(sptr,
+               RPL_WELCOME,
+               feature_str(FEAT_NETWORK),
+               feature_str(FEAT_PROVIDER) ? " via " : "",
+               feature_str(FEAT_PROVIDER) ? feature_str(FEAT_PROVIDER) : "",
+               cli_name(sptr));
     /*
-     * Check for mixed case usernames, meaning probably hacked.  Jon2 3-94
-     * Summary of rules now implemented in this patch:         Ensor 11-94
-     * In a mixed-case name, if first char is upper, one more upper may
-     * appear anywhere.  (A mixed-case name *must* have an upper first
-     * char, and may have one other upper.)
-     * A third upper may appear if all 3 appear at the beginning of the
-     * name, separated only by "others" (-/_/.).
-     * A single group of digits is allowed anywhere.
-     * Two groups of digits are allowed if at least one of the groups is
-     * at the beginning or the end.
-     * Only one '-', '_', or '.' is allowed (or two, if not consecutive).
-     * But not as the first or last char.
-     * No other special characters are allowed.
-     * Name must contain at least one letter.
+     * This is a duplicate of the NOTICE but see below...
      */
-    tmpstr2 = tmpstr = (username[0] == '~' ? &username[1] : username);
-    while (*tmpstr && !badid)
-    {
-      pos++;
-      c = *tmpstr;
-      tmpstr++;
-      if (isLower(c))
-      {
-       lower++;
-      }
-      else if (isUpper(c))
-      {
-       upper++;
-       if ((leadcaps || pos == 1) && !lower && !digits)
-         leadcaps++;
-      }
-      else if (isDigit(c))
-      {
-       digits++;
-       if (pos == 1 || !isDigit(d))
-       {
-         digitgroups++;
-         if (digitgroups > 2)
-           badid = 1;
-       }
-      }
-      else if (c == '-' || c == '_' || c == '.')
-      {
-       other++;
-       if (pos == 1)
-         badid = 1;
-       else if (d == '-' || d == '_' || d == '.' || other > 2)
-         badid = 1;
-      }
-      else
-       badid = 1;
-      d = c;
-    }
-    if (!badid)
-    {
-      if (lower && upper && (!leadcaps || leadcaps > 3 ||
-         (upper > 2 && upper > leadcaps)))
-       badid = 1;
-      else if (digitgroups == 2 && !(isDigit(tmpstr2[0]) || isDigit(c)))
-       badid = 1;
-      else if ((!lower && !upper) || !isAlnum(c))
-       badid = 1;
-    }
-    if (badid && (!(sptr->flags & FLAGS_GOTID) ||
-       strcmp(sptr->username, username) != 0))
-    {
-      ircstp->is_ref++;
-      sendto_one(cptr, ":%s %d %s :Your username is invalid.",
-         me.name, ERR_INVALIDUSERNAME, cptr->name);
-      sendto_one(cptr,
-         ":%s %d %s :Connect with your real username, in lowercase.",
-         me.name, ERR_INVALIDUSERNAME, cptr->name);
-      sendto_one(cptr, ":%s %d %s :If your mail address were foo@bar.com, "
-         "your username would be foo.",
-         me.name, ERR_INVALIDUSERNAME, cptr->name);
-      return exit_client(cptr, sptr, &me, "USER: Bad username");
-    }
-    Count_unknownbecomesclient(sptr, nrof);
-  }
-  else
-  {
-    strncpy(user->username, username, USERLEN);
-    Count_newremoteclient(nrof);
-  }
-  SetUser(sptr);
-  if (IsInvisible(sptr))
-    ++nrof.inv_clients;
-  if (IsOper(sptr))
-    ++nrof.opers;
-
-  if (MyConnect(sptr))
-  {
-    sendto_one(sptr, rpl_str(RPL_WELCOME), me.name, nick, nick);
-    /* This is a duplicate of the NOTICE but see below... */
-    sendto_one(sptr, rpl_str(RPL_YOURHOST), me.name, nick,
-       get_client_name(&me, FALSE), version);
-    sendto_one(sptr, rpl_str(RPL_CREATED), me.name, nick, creation);
-    sendto_one(sptr, rpl_str(RPL_MYINFO), me.name, parv[0], me.name, version);
+    send_reply(sptr, RPL_YOURHOST, cli_name(&me), version);
+    send_reply(sptr, RPL_CREATED, creation);
+    send_reply(sptr, RPL_MYINFO, cli_name(&me), version, infousermodes,
+               infochanmodes, infochanmodeswithparams);
+    send_supported(sptr);
     m_lusers(sptr, sptr, 1, parv);
     update_load();
-#ifdef NODEFAULTMOTD
-    m_motd(sptr, NULL, 1, parv);
-#else
-    m_motd(sptr, sptr, 1, parv);
-#endif
-    nextping = now;
-    if (sptr->snomask & SNO_NOISY)
-      set_snomask(sptr, sptr->snomask & SNO_NOISY, SNO_ADD);
-#ifdef ALLOW_SNO_CONNEXIT
-#ifdef SNO_CONNEXIT_IP
-    sprintf_irc(sendbuf,
-       ":%s NOTICE * :*** Notice -- Client connecting: %s (%s@%s) [%s] {%d}",
-       me.name, nick, user->username, user->host, inetntoa(sptr->ip),
-       get_client_class(sptr));
-    sendbufto_op_mask(SNO_CONNEXIT);
-#else /* SNO_CONNEXIT_IP */
-    sprintf_irc(sendbuf,
-       ":%s NOTICE * :*** Notice -- Client connecting: %s (%s@%s)",
-       me.name, nick, user->username, user->host);
-    sendbufto_op_mask(SNO_CONNEXIT);
-#endif /* SNO_CONNEXIT_IP */
-#endif /* ALLOW_SNO_CONNEXIT */
+    motd_signon(sptr);
+    if (cli_snomask(sptr) & SNO_NOISY)
+      set_snomask(sptr, cli_snomask(sptr) & SNO_NOISY, SNO_ADD);
+    if (feature_bool(FEAT_CONNEXIT_NOTICES))
+      sendto_opmask_butone(0, SNO_CONNEXIT,
+                           "Client connecting: %s (%s@%s) [%s] {%s} [%s] <%s%s>",
+                           cli_name(sptr), user->username, user->host,
+                           cli_sock_ip(sptr), get_client_class(sptr),
+                           cli_info(sptr), NumNick(cptr) /* two %s's */);
+
     IPcheck_connect_succeeded(sptr);
+    
+    if(cli_connect(sptr)->con_ssl) {
+      SetSSLConn(sptr);
+      
+      const char *cipher = ssl_get_cipher(cli_connect(sptr)->con_ssl);
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :You are connected to %s with %s", sptr, cli_name(&me), cipher);
+    }
   }
-  else
-    /* if (IsServer(cptr)) */
-  {
-    aClient *acptr;
+  else {
+    struct Client *acptr = user->server;
 
-    acptr = user->server;
-    if (acptr->from != sptr->from)
+    if (cli_from(acptr) != cli_from(sptr))
     {
-      if (Protocol(cptr) < 10)
-       sendto_one(cptr, ":%s KILL %s :%s (%s != %s[%s])",
-           me.name, sptr->name, me.name, user->server->name, acptr->from->name,
-           acptr->from->sockhost);
-      else
-       sendto_one(cptr, "%s KILL %s%s :%s (%s != %s[%s])",
-           NumServ(&me), NumNick(sptr), me.name, user->server->name,
-           acptr->from->name, acptr->from->sockhost);
-      sptr->flags |= FLAGS_KILLED;
+      sendcmdto_one(&me, CMD_KILL, cptr, "%C :%s (%s != %s[%s])",
+                    sptr, cli_name(&me), cli_name(user->server), cli_name(cli_from(acptr)),
+                    cli_sockhost(cli_from(acptr)));
+      SetFlag(sptr, FLAG_KILLED);
       return exit_client(cptr, sptr, &me, "NICK server wrong direction");
     }
-    else
-      sptr->flags |= (acptr->flags & FLAGS_TS8);
+    else if (HasFlag(acptr, FLAG_TS8))
+      SetFlag(sptr, FLAG_TS8);
 
     /*
-     * Check to see if this user is being propogated
+     * Check to see if this user is being propagated
      * as part of a net.burst, or is using protocol 9.
-     * FIXME: This can be speeded up - its stupid to check it for
+     * FIXME: This can be sped up - its stupid to check it for
      * every NICK message in a burst again  --Run.
      */
-    for (acptr = user->server; acptr != &me; acptr = acptr->serv->up)
+    for (; acptr != &me; acptr = cli_serv(acptr)->up)
+    {
       if (IsBurst(acptr) || Protocol(acptr) < 10)
-       break;
-    if (IPcheck_remote_connect(sptr, user->host, (acptr != &me)) == -1)
-      /* We ran out of bits to count this */
-      return exit_client(cptr, sptr, &me,
-         "More then 255 connections from this IP number");
-  }
-#ifdef NO_PROTOCOL9            /* Use this when all servers are 2.10 (but test it first) --Run */
-
-  tmpstr = umode_str(sptr);
-  sendto_serv_butone(cptr, *tmpstr ?
-      "%s NICK %s %d %d %s %s +%s %s %s%s :%s" :
-      "%s NICK %s %d %d %s %s %s%s %s%s :%s",
-      NumServ(user->server), nick, sptr->hopcount + 1, sptr->lastnick,
-      user->username, user->host, tmpstr,
-      inttobase64(ip_base64, ntohl(sptr->ip.s_addr), 6),
-      NumNick(sptr), sptr->info);
-
-#else /* Remove the following when all servers are 2.10 */
-
-  /* First send message to all 2.9 servers */
-  sprintf_irc(sendbuf, ":%s NICK %s %d " TIME_T_FMT " %s %s %s :%s",
-      user->server->name, nick, sptr->hopcount + 1, sptr->lastnick,
-      user->username, user->host, user->server->name, sptr->info);
-  for (lp = me.serv->down; lp; lp = lp->next)
-  {
-    if (lp->value.cptr == cptr)
-      continue;
-    if (Protocol(lp->value.cptr) < 10)
-      sendbufto_one(lp->value.cptr);
-  }
-
-  /* If the user has no umode, no need to generate a user MODE */
-  if (*(tmpstr = umode_str(sptr)) && (MyConnect(sptr) || Protocol(cptr) > 9))
-    /* Is it necessary to generate an user MODE message ? */
-  {
-    for (lp = me.serv->down; lp; lp = lp->next)
+        break;
+    }
+    if (!IPcheck_remote_connect(sptr, (acptr != &me)))
     {
-      if (lp->value.cptr == cptr)
-       continue;
-      if (Protocol(lp->value.cptr) < 10)
-       sendto_one(lp->value.cptr, ":%s MODE %s :%s", sptr->name,
-           sptr->name, tmpstr);
+      /*
+       * We ran out of bits to count this
+       */
+      sendcmdto_one(&me, CMD_KILL, sptr, "%C :%s (Too many connections from your host -- Ghost)",
+                    sptr, cli_name(&me));
+      return exit_client(cptr, sptr, &me,"Too many connections from your host -- throttled");
     }
+    SetUser(sptr);
   }
 
-  /* Now send message to all 2.10 servers */
-  sprintf_irc(sendbuf, *tmpstr ?
-      "%s NICK %s %d %d %s %s +%s %s %s%s :%s" :
-      "%s NICK %s %d %d %s %s %s%s %s%s :%s",
-      NumServ(user->server), nick, sptr->hopcount + 1, sptr->lastnick,
-      user->username, user->host, tmpstr,
-      inttobase64(ip_base64, ntohl(sptr->ip.s_addr), 6),
-      NumNick(sptr), sptr->info);
-  for (lp = me.serv->down; lp; lp = lp->next)
-  {
-    if (lp->value.cptr == cptr || Protocol(lp->value.cptr) < 10)
-      continue;
-    sendbufto_one(lp->value.cptr);
-  }
-
-#endif
+  /* If they get both +x and an account during registration, hide
+   * their hostmask here.  Calling hide_hostmask() from IAuth's
+   * account assignment causes a numeric reply during registration.
+   */
+  if (HasHiddenHost(sptr))
+    hide_hostmask(sptr, FLAG_HIDDENHOST);
+  if (IsInvisible(sptr))
+    ++UserStats.inv_clients;
+  if (IsOper(sptr))
+    ++UserStats.opers;
 
-  /* Send umode to client */
+  tmpstr = umode_str(sptr);
+  /* Send full IP address to IPv6-grokking servers. */
+  sendcmdto_flag_serv_butone(user->server, CMD_NICK, cptr,
+                             FLAG_IPV6, FLAG_LAST_FLAG,
+                             "%s %d %Tu %s %s %s%s%s%s %s%s :%s",
+                             cli_name(sptr), cli_hopcount(sptr) + 1,
+                             cli_lastnick(sptr),
+                             user->username, user->realhost,
+                             *tmpstr ? "+" : "", tmpstr, *tmpstr ? " " : "",
+                             iptobase64(ip_base64, &cli_ip(sptr), sizeof(ip_base64), 1),
+                             NumNick(sptr), cli_info(sptr));
+  /* Send fake IPv6 addresses to pre-IPv6 servers. */
+  sendcmdto_flag_serv_butone(user->server, CMD_NICK, cptr,
+                             FLAG_LAST_FLAG, FLAG_IPV6,
+                             "%s %d %Tu %s %s %s%s%s%s %s%s :%s",
+                             cli_name(sptr), cli_hopcount(sptr) + 1,
+                             cli_lastnick(sptr),
+                             user->username, user->realhost,
+                             *tmpstr ? "+" : "", tmpstr, *tmpstr ? " " : "",
+                             iptobase64(ip_base64, &cli_ip(sptr), sizeof(ip_base64), 0),
+                             NumNick(sptr), cli_info(sptr));
+
+  /* Send user mode to client */
   if (MyUser(sptr))
   {
-    send_umode(cptr, sptr, 0, ALL_UMODES);
-    if (sptr->snomask != SNO_DEFAULT && (sptr->flags & FLAGS_SERVNOTICE))
-      sendto_one(sptr, rpl_str(RPL_SNOMASK), me.name, sptr->name,
-         sptr->snomask, sptr->snomask);
+    static struct Flags flags; /* automatically initialized to zeros */
+    /* To avoid sending +r to the client due to auth-on-connect, set
+     * the "old" FLAG_ACCOUNT bit to match the client's value.
+     */
+    if (IsAccount(cptr))
+      FlagSet(&flags, FLAG_ACCOUNT);
+    else
+      FlagClr(&flags, FLAG_ACCOUNT);
+    client_set_privs(sptr, NULL);
+    send_umode(cptr, sptr, &flags, ALL_UMODES);
+    if ((cli_snomask(sptr) != SNO_DEFAULT) && HasFlag(sptr, FLAG_SERVNOTICE))
+      send_reply(sptr, RPL_SNOMASK, cli_snomask(sptr), cli_snomask(sptr));
   }
-
   return 0;
 }
 
-/* *INDENT-OFF* */
-
-static int user_modes[] = {
-  FLAGS_OPER,          'o',
-  FLAGS_LOCOP,         'O',
-  FLAGS_INVISIBLE,     'i',
-  FLAGS_WALLOP,                'w',
-  FLAGS_SERVNOTICE,    's',
-  FLAGS_DEAF,          'd',
-  FLAGS_CHSERV,                'k',
-  FLAGS_DEBUG,          'g',
-  0,                   0
+/** List of user mode characters. */
+static const struct UserMode {
+  unsigned int flag; /**< User mode constant. */
+  char         c;    /**< Character corresponding to the mode. */
+} userModeList[] = {
+  { FLAG_OPER,        'o' },
+  { FLAG_LOCOP,       'O' },
+  { FLAG_INVISIBLE,   'i' },
+  { FLAG_WALLOP,      'w' },
+  { FLAG_SERVNOTICE,  's' },
+  { FLAG_DEAF,        'd' },
+  { FLAG_CHSERV,      'k' },
+  { FLAG_DEBUG,       'g' },
+  { FLAG_ACCOUNT,     'r' },
+  { FLAG_HIDDENHOST,  'x' },
+  { FLAG_SSLCONN,     'S' }
 };
 
-/* *INDENT-ON* */
-
-#define COOKIE_VERIFIED ((unsigned int)-1)
+/** Length of #userModeList. */
+#define USERMODELIST_SIZE sizeof(userModeList) / sizeof(struct UserMode)
 
 /*
- * m_nick
- *
- * parv[0] = sender prefix
- * parv[1] = nickname
- *
- * If from server, source is client:
- *   parv[2] = timestamp
- *
- * Source is server:
- *   parv[2] = hopcount
- *   parv[3] = timestamp
- *   parv[4] = username
- *   parv[5] = hostname
- *   parv[6] = umode (optional)
- *   parv[parc-3] = IP#                 <- Only Protocol >= 10
- *   parv[parc-2] = YXX, numeric nick   <- Only Protocol >= 10
- *   parv[parc-1] = info
- *   parv[0] = server
+ * XXX - find a way to get rid of this
  */
-int m_nick(aClient *cptr, aClient *sptr, int parc, char *parv[])
+/** Nasty global buffer used for communications with umode_str() and others. */
+static char umodeBuf[BUFSIZE];
+
+/** Try to set a user's nickname.
+ * If \a sptr is a server, the client is being introduced for the first time.
+ * @param[in] cptr Client to set nickname.
+ * @param[in] sptr Client sending the NICK.
+ * @param[in] nick New nickname.
+ * @param[in] parc Number of arguments to NICK.
+ * @param[in] parv Argument list to NICK.
+ * @return CPTR_KILLED if \a cptr was killed, else 0.
+ */
+int set_nick_name(struct Client* cptr, struct Client* sptr,
+                  const char* nick, int parc, char* parv[])
 {
-  aClient* acptr;
-  aClient* server = NULL;
-  char     nick[NICKLEN + 2];
-  char*    s;
-  Link*    lp;
-  time_t   lastnick = (time_t) 0;
-  int      differ = 1;
-
-  if (parc < 2)
-  {
-    sendto_one(sptr, err_str(ERR_NONICKNAMEGIVEN), me.name, parv[0]);
-    return 0;
-  }
-  else if ((IsServer(sptr) && parc < 8) || (IsServer(cptr) && parc < 3))
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "NICK");
-    sendto_ops("bad NICK param count for %s from %s",
-       parv[1], get_client_name(cptr, FALSE));
-    return 0;
-  }
-  if (MyConnect(sptr) && (s = strchr(parv[1], '~')))
-    *s = '\0';
-  strncpy(nick, parv[1], NICKLEN + 1);
-  nick[sizeof(nick) - 1] = 0;
-  /*
-   * If do_nick_name() returns a null name OR if the server sent a nick
-   * name and do_nick_name() changed it in some way (due to rules of nick
-   * creation) then reject it. If from a server and we reject it,
-   * and KILL it. -avalon 4/4/92
-   */
-  if (do_nick_name(nick) == 0 || (IsServer(cptr) && strcmp(nick, parv[1])))
-  {
-    sendto_one(sptr, err_str(ERR_ERRONEUSNICKNAME), me.name, parv[0], parv[1]);
-
-    if (IsServer(cptr))
-    {
-      ircstp->is_kill++;
-      sendto_ops("Bad Nick: %s From: %s %s",
-         parv[1], parv[0], get_client_name(cptr, FALSE));
-      if (Protocol(cptr) < 10)
-       sendto_one(cptr, ":%s KILL %s :%s (%s <- %s[%s])",
-           me.name, parv[1], me.name, parv[1], nick, cptr->name);
-      else
-       sendto_one(cptr, "%s KILL %s :%s (%s <- %s[%s])",
-           NumServ(&me), IsServer(sptr) ? parv[parc - 2] : parv[0], me.name,
-           parv[1], nick, cptr->name);
-      if (!IsServer(sptr))     /* bad nick _change_ */
-      {
-       sendto_lowprot_butone(cptr, 9, ":%s KILL %s :%s (%s <- %s!%s@%s)",
-           me.name, parv[0], me.name, get_client_name(cptr, FALSE), parv[0],
-           sptr->user ? sptr->username : "",
-           sptr->user ? sptr->user->server->name : cptr->name);
-       sendto_highprot_butone(cptr, 10, "%s KILL %s :%s (%s <- %s!%s@%s)",
-           NumServ(&me), parv[0], me.name, get_client_name(cptr, FALSE),
-           parv[0], sptr->user ? sptr->username : "",
-           sptr->user ? sptr->user->server->name : cptr->name);
-       sptr->flags |= FLAGS_KILLED;
-       return exit_client(cptr, sptr, &me, "BadNick");
-      }
-    }
-    return 0;
-  }
+  if (IsServer(sptr)) {
 
-  /* 
-   * Check if this is a LOCAL user trying to use a reserved (Juped)
-   * nick, if so tell him that it's a nick in use...
-   */
+    /*
+     * A server introducing a new client, change source
+     */
+    struct Client* new_client = make_client(cptr, STAT_UNKNOWN);
+    assert(0 != new_client);
 
-  if ((!IsServer(cptr)) && isNickJuped(nick))
-  {
-    sendto_one(sptr, err_str(ERR_NICKNAMEINUSE), me.name,
-       /* parv[0] is empty when connecting */
-       BadPtr(parv[0]) ? "*" : parv[0], nick);
-    return 0;                  /* NICK message ignored */
-  }
+    cli_hopcount(new_client) = atoi(parv[2]);
+    cli_lastnick(new_client) = atoi(parv[3]);
 
-  /*
-   * Check against nick name collisions.
-   *
-   * Put this 'if' here so that the nesting goes nicely on the screen :)
-   * We check against server name list before determining if the nickname
-   * is present in the nicklist (due to the way the below for loop is
-   * constructed). -avalon
-   */
-  if ((acptr = FindServer(nick))) {
-    if (MyConnect(sptr))
-    {
-      sendto_one(sptr, err_str(ERR_NICKNAMEINUSE), me.name,
-         BadPtr(parv[0]) ? "*" : parv[0], nick);
-      return 0;                        /* NICK message ignored */
-    }
     /*
-     * We have a nickname trying to use the same name as
-     * a server. Send out a nick collision KILL to remove
-     * the nickname. As long as only a KILL is sent out,
-     * there is no danger of the server being disconnected.
-     * Ultimate way to jupiter a nick ? >;-). -avalon
+     * Set new nick name.
      */
-    sendto_ops("Nick collision on %s(%s <- %s)",
-       sptr->name, acptr->from->name, get_client_name(cptr, FALSE));
-    ircstp->is_kill++;
-    if (Protocol(cptr) < 10)
-      sendto_one(cptr, ":%s KILL %s :%s (%s <- %s)",
-         me.name, sptr->name, me.name, acptr->from->name,
-         get_client_name(cptr, FALSE));
-    else
-      sendto_one(cptr, "%s KILL %s%s :%s (%s <- %s)",
-         NumServ(&me), NumNick(sptr), me.name, acptr->from->name,
-         /*
-          * NOTE: Cannot use get_client_name twice here, it returns static
-          *       string pointer--the other info would be lost.
-          */
-         get_client_name(cptr, FALSE));
-    sptr->flags |= FLAGS_KILLED;
-    return exit_client(cptr, sptr, &me, "Nick/Server collision");
-  }
-
-  if (!(acptr = FindClient(nick)))
-    goto nickkilldone;         /* No collisions, all clear... */
-  /*
-   * If acptr == sptr, then we have a client doing a nick
-   * change between *equivalent* nicknames as far as server
-   * is concerned (user is changing the case of his/her
-   * nickname or somesuch)
-   */
-  if (acptr == sptr)
-  {
-    if (strcmp(acptr->name, nick) != 0)
-      /*
-       * Allows change of case in his/her nick
-       */
-      goto nickkilldone;       /* -- go and process change */
-    else
-      /*
-       * This is just ':old NICK old' type thing.
-       * Just forget the whole thing here. There is
-       * no point forwarding it to anywhere,
-       * especially since servers prior to this
-       * version would treat it as nick collision.
-       */
-      return 0;                        /* NICK Message ignored */
-  }
-
-  /*
-   * Note: From this point forward it can be assumed that
-   * acptr != sptr (point to different client structures).
-   */
-  /*
-   * If the older one is "non-person", the new entry is just
-   * allowed to overwrite it. Just silently drop non-person,
-   * and proceed with the nick. This should take care of the
-   * "dormant nick" way of generating collisions...
-   */
-  if (IsUnknown(acptr) && MyConnect(acptr))
-  {
-    IPcheck_connect_fail(acptr);
-    exit_client(cptr, acptr, &me, "Overridden by other sign on");
-    goto nickkilldone;
-  }
-  /*
-   * Decide, we really have a nick collision and deal with it
-   */
-  if (!IsServer(cptr))
-  {
-    /*
-     * NICK is coming from local client connection. Just
-     * send error reply and ignore the command.
-     */
-    sendto_one(sptr, err_str(ERR_NICKNAMEINUSE), me.name,
-       /* parv[0] is empty when connecting */
-       BadPtr(parv[0]) ? "*" : parv[0], nick);
-    return 0;                  /* NICK message ignored */
-  }
-  /*
-   * NICK was coming from a server connection.
-   * This means we have a race condition (two users signing on
-   * at the same time), or two net fragments reconnecting with the same nick.
-   * The latter can happen because two different users connected
-   * or because one and the same user switched server during a net break.
-   * If the TimeStamps are equal, we kill both (or only 'new'
-   * if it was a ":server NICK new ...").
-   * Otherwise we kill the youngest when user@host differ,
-   * or the oldest when they are the same.
-   * We treat user and ~user as different, because if it wasn't
-   * a faked ~user the AUTH wouldn't have added the '~'.
-   * --Run
-   *
-   */
-  if (IsServer(sptr))
-  {
-    /*
-     * A new NICK being introduced by a neighbouring
-     * server (e.g. message type ":server NICK new ..." received)
-     */
-    lastnick = atoi(parv[3]);
-    differ = (strCasediff(acptr->user->username, parv[4]) ||
-       strCasediff(acptr->user->host, parv[5]));
-    sendto_ops("Nick collision on %s (%s " TIME_T_FMT " <- %s " TIME_T_FMT
-       " (%s user@host))", acptr->name, acptr->from->name, acptr->lastnick,
-       get_client_name(cptr, FALSE), lastnick, differ ? "Different" : "Same");
-  }
-  else
-  {
+    strcpy(cli_name(new_client), nick);
+    cli_user(new_client) = make_user(new_client);
+    cli_user(new_client)->server = sptr;
+    SetRemoteNumNick(new_client, parv[parc - 2]);
     /*
-     * A NICK change has collided (e.g. message type ":old NICK new").
+     * IP# of remote client
      */
-    lastnick = atoi(parv[2]);
-    differ = (strCasediff(acptr->user->username, sptr->user->username) ||
-       strCasediff(acptr->user->host, sptr->user->host));
-    sendto_ops("Nick change collision from %s to %s (%s " TIME_T_FMT " <- %s "
-       TIME_T_FMT ")", sptr->name, acptr->name, acptr->from->name,
-       acptr->lastnick, get_client_name(cptr, FALSE), lastnick);
-  }
-  /*
-   * Now remove (kill) the nick on our side if it is the youngest.
-   * If no timestamp was received, we ignore the incoming nick
-   * (and expect a KILL for our legit nick soon ):
-   * When the timestamps are equal we kill both nicks. --Run
-   * acptr->from != cptr should *always* be true (?).
-   */
-  if (acptr->from != cptr)
-  {
-    if ((differ && lastnick >= acptr->lastnick) ||
-       (!differ && lastnick <= acptr->lastnick))
-    {
-      if (!IsServer(sptr))
-      {
-       ircstp->is_kill++;
-       sendto_lowprot_butone(cptr, 9,  /* Kill old from outgoing servers */
-           ":%s KILL %s :%s (%s <- %s (Nick collision))",
-           me.name, sptr->name, me.name, acptr->from->name,
-           get_client_name(cptr, FALSE));
-       sendto_highprot_butone(cptr, 10,        /* Kill old from outgoing servers */
-           "%s KILL %s%s :%s (%s <- %s (Nick collision))",
-           NumServ(&me), NumNick(sptr), me.name, acptr->from->name,
-           get_client_name(cptr, FALSE));
-       if (MyConnect(sptr) && IsServer(cptr) && Protocol(cptr) > 9)
-         sendto_one(cptr, "%s KILL %s%s :%s (Ghost2)",
-             NumServ(&me), NumNick(sptr), me.name);
-       sptr->flags |= FLAGS_KILLED;
-       exit_client(cptr, sptr, &me, "Nick collision (you're a ghost)");
-      }
-      if (lastnick != acptr->lastnick)
-       return 0;               /* Ignore the NICK */
-    }
-    sendto_one(acptr, err_str(ERR_NICKCOLLISION), me.name, acptr->name, nick);
-  }
-  ircstp->is_kill++;
-  acptr->flags |= FLAGS_KILLED;
-  if (differ)
-  {
-    sendto_lowprot_butone(cptr, 9,     /* Kill our old from outgoing servers */
-       ":%s KILL %s :%s (%s <- %s (older nick overruled))",
-       me.name, acptr->name, me.name, acptr->from->name,
-       get_client_name(cptr, FALSE));
-    sendto_highprot_butone(cptr, 10,   /* Kill our old from outgoing servers */
-       "%s KILL %s%s :%s (%s <- %s (older nick overruled))",
-       NumServ(&me), NumNick(acptr), me.name, acptr->from->name,
-       get_client_name(cptr, FALSE));
-    if (MyConnect(acptr) && IsServer(cptr) && Protocol(cptr) > 9)
-      sendto_one(cptr, "%s%s QUIT :Local kill by %s (Ghost)",
-         NumNick(acptr), me.name);
-    exit_client(cptr, acptr, &me, "Nick collision (older nick overruled)");
-  }
-  else
-  {
-    sendto_lowprot_butone(cptr, 9,     /* Kill our old from outgoing servers */
-       ":%s KILL %s :%s (%s <- %s (nick collision from same user@host))",
-       me.name, acptr->name, me.name, acptr->from->name,
-       get_client_name(cptr, FALSE));
-    sendto_highprot_butone(cptr, 10,   /* Kill our old from outgoing servers */
-       "%s KILL %s%s :%s (%s <- %s (nick collision from same user@host))",
-       NumServ(&me), NumNick(acptr), me.name, acptr->from->name,
-       get_client_name(cptr, FALSE));
-    if (MyConnect(acptr) && IsServer(cptr) && Protocol(cptr) > 9)
-      sendto_one(cptr,
-         "%s%s QUIT :Local kill by %s (Ghost: switched servers too fast)",
-         NumNick(acptr), me.name);
-    exit_client(cptr, acptr, &me, "Nick collision (You collided yourself)");
-  }
-  if (lastnick == acptr->lastnick)
-    return 0;
+    base64toip(parv[parc - 3], &cli_ip(new_client));
 
-nickkilldone:
-  if (IsServer(sptr))
-  {
-    int flag, *s;
-    char *p;
-#ifndef NO_PROTOCOL9
-    const char *nnp9 = NULL;   /* Init. to avoid compiler warning */
-#endif
-
-    /* A server introducing a new client, change source */
-    if (!server)
-      server = sptr;
-#ifndef NO_PROTOCOL9
-    /*
-     * Numeric Nicks does, in contrast to all other protocol enhancements,
-     * translation from protocol 9 -> protocol 10 !
-     * The reason is that I just can't know what protocol it is when I
-     * receive a "MODE #channel +o Run", because I can't 'find' "Run"
-     * before I know the protocol, and I can't know the protocol if I
-     * first have to find the server of "Run".
-     * Therefore, in THIS case, the protocol is determined by the Connected
-     * server: cptr.
-     */
-    if (Protocol(cptr) < 10 && !(nnp9 = CreateNNforProtocol9server(server)))
-      return exit_client_msg(cptr, server, &me,
-         "Too many clients (> %d) from P09 server (%s)", 64, server->name);
-#endif
-    sptr = make_client(cptr, STAT_UNKNOWN);
-    sptr->hopcount = atoi(parv[2]);
-    sptr->lastnick = atoi(parv[3]);
-    if (Protocol(cptr) > 9 && parc > 7 && *parv[6] == '+')
-      for (p = parv[6] + 1; *p; p++)
-       for (s = user_modes; (flag = *s); s += 2)
-         if (((char)*(s + 1)) == *p)
-         {
-           sptr->flags |= flag;
-           break;
-         }
-    /*
-     * Set new nick name.
-     */
-    strcpy(sptr->name, nick);
-    sptr->user = make_user(sptr);
-    sptr->user->server = server;
-#ifndef NO_PROTOCOL9
-    if (Protocol(cptr) < 10)
-    {
-      if (!SetRemoteNumNick(sptr, nnp9))
-      {
-       /*
-        * if this fails squit the server and free the client
-        */
-       free_client(sptr);
-       return exit_client_msg(cptr, server, &me, "Invalid numeric index");
-      }
-      sptr->ip.s_addr = 0;
-    }
-    else
-    {
-#endif
-      if (!SetRemoteNumNick(sptr, parv[parc - 2]))
-      {
-       /*
-        * if this fails squit the server and free the client
-        */
-       free_client(sptr);
-       return exit_client_msg(cptr, server, &me, "Invalid numeric index");
-      }
-      sptr->ip.s_addr = htonl(base64toint(parv[parc - 3]));
-      /* IP# of remote client */
-#ifndef NO_PROTOCOL9
+    add_client_to_list(new_client);
+    hAddClient(new_client);
+
+    cli_serv(sptr)->ghost = 0;        /* :server NICK means end of net.burst */
+    ircd_strncpy(cli_username(new_client), parv[4], USERLEN);
+    ircd_strncpy(cli_user(new_client)->username, parv[4], USERLEN);
+    ircd_strncpy(cli_user(new_client)->host, parv[5], HOSTLEN);
+    ircd_strncpy(cli_user(new_client)->realhost, parv[5], HOSTLEN);
+    ircd_strncpy(cli_info(new_client), parv[parc - 1], REALLEN);
+
+    Count_newremoteclient(UserStats, sptr);
+
+    if (parc > 7 && *parv[6] == '+') {
+      /* (parc-4) -3 for the ip, numeric nick, realname */
+      set_user_mode(cptr, new_client, parc-7, parv+4, ALLOWMODES_ANY);
     }
-#endif
-    add_client_to_list(sptr);
-    hAddClient(sptr);
 
-    server->serv->ghost = 0;   /* :server NICK means end of net.burst */
-    strncpy(sptr->info, parv[parc - 1], sizeof(sptr->info) - 1);
-    strncpy(sptr->user->host, parv[5], sizeof(sptr->user->host) - 1);
-    return register_user(cptr, sptr, sptr->name, parv[4]);
+    return register_user(cptr, new_client);
   }
-  else if (sptr->name[0])
-  {
+  else if ((cli_name(sptr))[0]) {
     /*
      * Client changing its nick
      *
@@ -1125,1595 +582,783 @@ nickkilldone:
      * if client is on any channels where it is currently
      * banned.  If so, do not allow the nick change to occur.
      */
-    if (MyUser(sptr))
-    {
-      for (lp = cptr->user->channel; lp; lp = lp->next)
-       if (can_send(cptr, lp->value.chptr) == MODE_BAN)
-       {
-         sendto_one(cptr, err_str(ERR_BANNICKCHANGE), me.name, parv[0],
-             lp->value.chptr->chname);
-         return 0;
-       }
+    if (MyUser(sptr)) {
+      const char* channel_name;
+      struct Membership *member;
+      if ((channel_name = find_no_nickchange_channel(sptr))) {
+        return send_reply(cptr, ERR_BANNICKCHANGE, channel_name);
+      }
       /*
        * Refuse nick change if the last nick change was less
        * then 30 seconds ago. This is intended to get rid of
        * clone bots doing NICK FLOOD. -SeKs
        * If someone didn't change their nick for more then 60 seconds
-       * however, allow to do two nick changes immedately after another
+       * however, allow to do two nick changes immediately after another
        * before limiting the nick flood. -Run
        */
-      if (now < cptr->nextnick)
+      if (CurrentTime < cli_nextnick(cptr))
       {
-       cptr->nextnick += 2;
-       sendto_one(cptr, err_str(ERR_NICKTOOFAST),
-           me.name, parv[0], parv[1], cptr->nextnick - now);
-       /* Send error message */
-       sendto_prefix_one(cptr, cptr, ":%s NICK %s", parv[0], parv[0]);
-       /* bounce NICK to user */
-       return 0;               /* ignore nick change! */
+        cli_nextnick(cptr) += 2;
+        send_reply(cptr, ERR_NICKTOOFAST, parv[1],
+                   cli_nextnick(cptr) - CurrentTime);
+        /* Send error message */
+        sendcmdto_one(cptr, CMD_NICK, cptr, "%s", cli_name(cptr));
+        /* bounce NICK to user */
+        return 0;                /* ignore nick change! */
       }
-      else
-      {
-       /* Limit total to 1 change per NICK_DELAY seconds: */
-       cptr->nextnick += NICK_DELAY;
-       /* However allow _maximal_ 1 extra consecutive nick change: */
-       if (cptr->nextnick < now)
-         cptr->nextnick = now;
+      else {
+        /* Limit total to 1 change per NICK_DELAY seconds: */
+        cli_nextnick(cptr) += NICK_DELAY;
+        /* However allow _maximal_ 1 extra consecutive nick change: */
+        if (cli_nextnick(cptr) < CurrentTime)
+          cli_nextnick(cptr) = CurrentTime;
       }
+      /* Invalidate all bans against the user so we check them again */
+      for (member = (cli_user(cptr))->channel; member;
+          member = member->next_channel)
+       ClearBanValid(member);
     }
     /*
      * Also set 'lastnick' to current time, if changed.
      */
-    if (strCasediff(parv[0], nick))
-      sptr->lastnick = (sptr == cptr) ? TStime() : atoi(parv[2]);
+    if (0 != ircd_strcmp(parv[0], nick))
+      cli_lastnick(sptr) = (sptr == cptr) ? TStime() : atoi(parv[2]);
 
     /*
      * Client just changing his/her nick. If he/she is
      * on a channel, send note of change to all clients
      * on that channel. Propagate notice to other servers.
      */
-    if (IsUser(sptr))
-    {
-      sendto_common_channels(sptr, ":%s NICK :%s", parv[0], nick);
-      add_history(sptr, 1);
-#ifdef NO_PROTOCOL9
-      sendto_serv_butone(cptr,
-         "%s%s NICK %s " TIME_T_FMT, NumNick(sptr), nick, sptr->lastnick);
-#else
-      sendto_lowprot_butone(cptr, 9,
-         ":%s NICK %s " TIME_T_FMT, parv[0], nick, sptr->lastnick);
-      sendto_highprot_butone(cptr, 10,
-         "%s%s NICK %s " TIME_T_FMT, NumNick(sptr), nick, sptr->lastnick);
-#endif
-    }
-    else
-      sendto_one(sptr, ":%s NICK :%s", parv[0], nick);
-    if (sptr->name[0])
-      hRemClient(sptr);
-    strcpy(sptr->name, nick);
-    hAddClient(sptr);
-  }
-  else
-  {
-    /* Local client setting NICK the first time */
-
-    strcpy(sptr->name, nick);
-    if (!sptr->user)
-    {
-      sptr->user = make_user(sptr);
-      sptr->user->server = &me;
-    }
-    SetLocalNumNick(sptr);
-    hAddClient(sptr);
-
-    /*
-     * If the client hasn't gotten a cookie-ping yet,
-     * choose a cookie and send it. -record!jegelhof@cloud9.net
-     */
-    if (!sptr->cookie)
-    {
-      do
-       sptr->cookie = (ircrandom() & 0x7fffffff);
-      while (!sptr->cookie);
-      sendto_one(cptr, "PING :%u", sptr->cookie);
-    }
-    else if (*sptr->user->host && sptr->cookie == COOKIE_VERIFIED)
-    {
-      /*
-       * USER and PONG already received, now we have NICK.
-       * register_user may reject the client and call exit_client
-       * for it - must test this and exit m_nick too !
-       */
-      sptr->lastnick = TStime();       /* Always local client */
-      if (register_user(cptr, sptr, nick, sptr->user->username) == CPTR_KILLED)
-       return CPTR_KILLED;
-    }
-  }
-  return 0;
-}
-
-/*
- * add_target
- *
- * sptr must be a local client!
- *
- * Cannonifies target for client `sptr'.
- */
-void add_target(aClient *sptr, void *target)
-{
-  register unsigned char *p;
-  register unsigned int tmp = ((size_t)target & 0xffff00) >> 8;
-  unsigned char hash = (tmp * tmp) >> 12;
-  if (sptr->targets[0] == hash)        /* Last person that we messaged ourself? */
-    return;
-  for (p = sptr->targets; p < &sptr->targets[MAXTARGETS - 1];)
-    if (*++p == hash)
-      return;                  /* Already in table */
-
-  /* New target */
-  memmove(&sptr->targets[RESERVEDTARGETS + 1],
-      &sptr->targets[RESERVEDTARGETS], MAXTARGETS - RESERVEDTARGETS - 1);
-  sptr->targets[RESERVEDTARGETS] = hash;
-  return;
-}
-
-/*
- * check_target_limit
- *
- * sptr must be a local client !
- *
- * Returns 'true' (1) when too many targets are addressed.
- * Returns 'false' (0) when it's ok to send to this target.
- */
-int check_target_limit(aClient *sptr, void *target, const char *name,
-    int created)
-{
-  register unsigned char *p;
-  register unsigned int tmp = ((size_t)target & 0xffff00) >> 8;
-  unsigned char hash = (tmp * tmp) >> 12;
-  if (sptr->targets[0] == hash)        /* Same target as last time ? */
-    return 0;
-  for (p = sptr->targets; p < &sptr->targets[MAXTARGETS - 1];)
-    if (*++p == hash)
-    {
-      memmove(&sptr->targets[1], &sptr->targets[0], p - sptr->targets);
-      sptr->targets[0] = hash;
-      return 0;
-    }
-
-  /* New target */
-  if (!created)
-  {
-    if (now < sptr->nexttarget)
-    {
-      if (sptr->nexttarget - now < TARGET_DELAY + 8)   /* No server flooding */
-      {
-       sptr->nexttarget += 2;
-       sendto_one(sptr, err_str(ERR_TARGETTOOFAST),
-           me.name, sptr->name, name, sptr->nexttarget - now);
-      }
-      return 1;
-    }
-    else
-    {
-#ifdef GODMODE
-      sendto_one(sptr, ":%s NOTICE %s :New target: %s; ft " TIME_T_FMT,
-         me.name, sptr->name, name, (now - sptr->nexttarget) / TARGET_DELAY);
-#endif
-      sptr->nexttarget += TARGET_DELAY;
-      if (sptr->nexttarget < now - (TARGET_DELAY * (MAXTARGETS - 1)))
-       sptr->nexttarget = now - (TARGET_DELAY * (MAXTARGETS - 1));
-    }
-  }
-  memmove(&sptr->targets[1], &sptr->targets[0], MAXTARGETS - 1);
-  sptr->targets[0] = hash;
-  return 0;
-}
-
-/*
- * m_message (used in m_private() and m_notice())
- *
- * The general function to deliver MSG's between users/channels
- *
- * parv[0] = sender prefix
- * parv[1] = receiver list
- * parv[parc-1] = message text
- *
- * massive cleanup
- * rev argv 6/91
- */
-static int m_message(aClient *cptr, aClient *sptr,
-    int parc, char *parv[], int notice)
-{
-  Reg1 aClient *acptr;
-  Reg2 char *s;
-  aChannel *chptr;
-  char *nick, *server, *p, *cmd, *host;
-
-  sptr->flags &= ~FLAGS_TS8;
-
-  cmd = notice ? MSG_NOTICE : MSG_PRIVATE;
-
-  if (parc < 2 || *parv[1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NORECIPIENT), me.name, parv[0], cmd);
-    return -1;
-  }
-
-  if (parc < 3 || *parv[parc - 1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NOTEXTTOSEND), me.name, parv[0]);
-    return -1;
-  }
-
-  if (MyUser(sptr))
-    parv[1] = canonize(parv[1]);
-  for (p = NULL, nick = strtoken(&p, parv[1], ","); nick;
-      nick = strtoken(&p, NULL, ","))
-  {
-    /*
-     * channel msg?
-     */
-    if (IsChannelName(nick))
-    {
-      if ((chptr = FindChannel(nick)))
-      {
-       if (can_send(sptr, chptr) == 0  /* This first: Almost never a server/service */
-           || IsChannelService(sptr) || IsServer(sptr))
-       {
-         if (MyUser(sptr) && (chptr->mode.mode & MODE_NOPRIVMSGS) &&
-             check_target_limit(sptr, chptr, chptr->chname, 0))
-           continue;
-         sendto_channel_butone(cptr, sptr, chptr,
-             ":%s %s %s :%s", parv[0], cmd, chptr->chname, parv[parc - 1]);
-       }
-       else if (!notice)
-         sendto_one(sptr, err_str(ERR_CANNOTSENDTOCHAN),
-             me.name, parv[0], chptr->chname);
-       continue;
-      }
-    }
-    else if (*nick != '$' && !strchr(nick, '@'))
-    {
-      /*
-       * nickname addressed?
-       */
-      if (MyUser(sptr) || Protocol(cptr) < 10)
-       acptr = FindUser(nick);
-      else if ((acptr = findNUser(nick)) && !IsUser(acptr))
-       acptr = NULL;
-      if (acptr)
-      {
-       if (MyUser(sptr) && check_target_limit(sptr, acptr, acptr->name, 0))
-         continue;
-       if (!is_silenced(sptr, acptr))
-       {
-         if (!notice && MyConnect(sptr) && acptr->user && acptr->user->away)
-           sendto_one(sptr, rpl_str(RPL_AWAY),
-               me.name, parv[0], acptr->name, acptr->user->away);
-         if (MyUser(acptr) || Protocol(acptr->from) < 10)
-         {
-           if (MyUser(acptr))
-             add_target(acptr, sptr);
-           sendto_prefix_one(acptr, sptr, ":%s %s %s :%s",
-               parv[0], cmd, acptr->name, parv[parc - 1]);
-         }
-         else
-           sendto_prefix_one(acptr, sptr, ":%s %s %s%s :%s",
-               parv[0], cmd, NumNick(acptr), parv[parc - 1]);
-       }
-      }
-      else if (MyUser(sptr) || Protocol(cptr) < 10)
-       sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick);
-      else
-       sendto_one(sptr,
-           ":%s %d %s * :Target left UnderNet. Failed to deliver: [%.50s]",
-           me.name, ERR_NOSUCHNICK, sptr->name, parv[parc - 1]);
-      continue;
-    }
-    /*
-     * The following two cases allow masks in NOTICEs
-     * (for OPERs only)
-     *
-     * Armin, 8Jun90 (gruner@informatik.tu-muenchen.de)
-     */
-    if ((*nick == '$' || *nick == '#') && IsAnOper(sptr))
-    {
-      if (MyConnect(sptr))
-      {
-       if (!(s = strrchr(nick, '.')))
-       {
-         sendto_one(sptr, err_str(ERR_NOTOPLEVEL), me.name, parv[0], nick);
-         continue;
-       }
-       while (*++s)
-         if (*s == '.' || *s == '*' || *s == '?')
-           break;
-       if (*s == '*' || *s == '?')
-       {
-         sendto_one(sptr, err_str(ERR_WILDTOPLEVEL), me.name, parv[0], nick);
-         continue;
-       }
-      }
-      sendto_match_butone(IsServer(cptr) ? cptr : NULL,
-         sptr, nick + 1, (*nick == '#') ? MATCH_HOST : MATCH_SERVER,
-         ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]);
-      continue;
-    }
-    else if ((server = strchr(nick, '@')) && (acptr = FindServer(server + 1)))
-    {
-      /*
-       * NICK[%host]@server addressed? See if <server> is me first
-       */
-      if (!IsMe(acptr))
-      {
-       sendto_one(acptr, ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]);
-       continue;
-      }
-
-      /* Look for an user whose NICK is equal to <nick> and then
-       * check if it's hostname matches <host> and if it's a local
-       * user. */
-      *server = '\0';
-      if ((host = strchr(nick, '%')))
-       *host++ = '\0';
-
-      if ((!(acptr = FindUser(nick))) ||
-         (!(MyUser(acptr))) ||
-         ((!(BadPtr(host))) && match(host, acptr->user->host)))
-       acptr = NULL;
-
-      *server = '@';
-      if (host)
-       *--host = '%';
-
-      if (acptr)
-      {
-       if (!(is_silenced(sptr, acptr)))
-         sendto_prefix_one(acptr, sptr, ":%s %s %s :%s",
-             parv[0], cmd, nick, parv[parc - 1]);
-       continue;
-      }
-    }
-    if (IsChannelName(nick))
-      sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], nick);
-    else
-      sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick);
-  }
-  return 0;
-}
-
-/*
- * m_private
- *
- * parv[0] = sender prefix
- * parv[1] = receiver list
- * parv[parc-1] = message text
- */
-int m_private(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  return m_message(cptr, sptr, parc, parv, 0);
-}
-
-/*
- * m_notice
- *
- * parv[0] = sender prefix
- * parv[1] = receiver list
- * parv[parc-1] = notice text
- */
-int m_notice(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  if (MyUser(sptr) && parv[1] && parv[1][0] == '@' &&
-      IsChannelName(&parv[1][1]))
-  {
-    parv[1]++;                 /* Get rid of '@' */
-    return m_wallchops(cptr, sptr, parc, parv);
-  }
-  return m_message(cptr, sptr, parc, parv, 1);
-}
-
-
-/*
- * whisper - called from m_cnotice and m_cprivmsg.
- *
- * parv[0] = sender prefix
- * parv[1] = nick
- * parv[2] = #channel
- * parv[3] = Private message text
- *
- * Added 971023 by Run.
- * Reason: Allows channel operators to sent an arbitrary number of private
- *   messages to users on their channel, avoiding the max.targets limit.
- *   Building this into m_private would use too much cpu because we'd have
- *   to a cross channel lookup for every private message!
- * Note that we can't allow non-chan ops to use this command, it would be
- *   abused by mass advertisers.
- */
-int whisper(aClient *sptr, int parc, char *parv[], int notice)
-{
-  int s_is_member = 0, s_is_voiced = 0, t_is_member = 0;
-  aClient *tcptr;
-  aChannel *chptr;
-  register Link *lp;
-
-  if (!MyUser(sptr))
-    return 0;
-  if (parc < 4 || BadPtr(parv[3]))
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS),
-       me.name, parv[0], notice ? "CNOTICE" : "CPRIVMSG");
-    return 0;
-  }
-  if (!(chptr = FindChannel(parv[2])))
-  {
-    sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], parv[2]);
-    return 0;
-  }
-  if (!(tcptr = FindUser(parv[1])))
-  {
-    sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], parv[1]);
-    return 0;
-  }
-  for (lp = chptr->members; lp; lp = lp->next)
-  {
-    register aClient *mcptr = lp->value.cptr;
-    if (mcptr == sptr)
-    {
-      s_is_member = 1;
-      if ((lp->flags & (CHFL_CHANOP | CHFL_VOICE)))
-       s_is_voiced = 1;
-      else
-       break;
-      if (t_is_member)
-       break;
-    }
-    if (mcptr == tcptr)
-    {
-      t_is_member = 1;
-      if (s_is_voiced)
-       break;
-    }
-  }
-  if (!s_is_voiced)
-  {
-    sendto_one(sptr, err_str(s_is_member ? ERR_VOICENEEDED : ERR_NOTONCHANNEL),
-       me.name, parv[0], chptr->chname);
-    return 0;
-  }
-  if (!t_is_member)
-  {
-    sendto_one(sptr, err_str(ERR_USERNOTINCHANNEL),
-       me.name, parv[0], tcptr->name, chptr->chname);
-    return 0;
-  }
-  if (is_silenced(sptr, tcptr))
-    return 0;
-
-  if (tcptr->user && tcptr->user->away)
-    sendto_one(sptr, rpl_str(RPL_AWAY),
-       me.name, parv[0], tcptr->name, tcptr->user->away);
-  if (MyUser(tcptr) || Protocol(tcptr->from) < 10)
-    sendto_prefix_one(tcptr, sptr, ":%s %s %s :%s",
-       parv[0], notice ? "NOTICE" : "PRIVMSG", tcptr->name, parv[3]);
-  else
-    sendto_prefix_one(tcptr, sptr, ":%s %s %s%s :%s",
-       parv[0], notice ? "NOTICE" : "PRIVMSG", NumNick(tcptr), parv[3]);
-
-  return 0;
-}
-
-int m_cnotice(aClient *UNUSED(cptr), aClient *sptr, int parc, char *parv[])
-{
-  return whisper(sptr, parc, parv, 1);
-}
-
-int m_cprivmsg(aClient *UNUSED(cptr), aClient *sptr, int parc, char *parv[])
-{
-  return whisper(sptr, parc, parv, 0);
-}
-
-/*
- * m_wallchops
- *
- * parv[0] = sender prefix
- * parv[1] = target channel
- * parv[parc - 1] = wallchops text
- */
-int m_wallchops(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  aChannel *chptr;
-
-  sptr->flags &= ~FLAGS_TS8;
-
-  if (parc < 2 || *parv[1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NORECIPIENT), me.name, parv[0], "WALLCHOPS");
-    return -1;
-  }
-
-  if (parc < 3 || *parv[parc - 1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NOTEXTTOSEND), me.name, parv[0]);
-    return -1;
-  }
-
-  if (MyUser(sptr))
-    parv[1] = canonize(parv[1]);
-
-  if (IsChannelName(parv[1]))
-  {
-    if ((chptr = FindChannel(parv[1])))
-    {
-      if (can_send(sptr, chptr) == 0)
-      {
-       if (MyUser(sptr) && (chptr->mode.mode & MODE_NOPRIVMSGS) &&
-           check_target_limit(sptr, chptr, chptr->chname, 0))
-         return 0;
-       /* Send to local clients: */
-       sendto_lchanops_butone(cptr, sptr, chptr,
-           ":%s NOTICE @%s :%s", parv[0], parv[1], parv[parc - 1]);
-#ifdef NO_PROTOCOL9
-       /* And to other servers: */
-       sendto_chanopsserv_butone(cptr, sptr, chptr,
-           ":%s WC %s :%s", parv[0], parv[1], parv[parc - 1]);
-#else
-       /*
-        * WARNING: `sendto_chanopsserv_butone' is heavily hacked when
-        * `NO_PROTOCOL9' is not defined ! Therefore this is the ONLY
-        * place you may use `sendto_chanopsserv_butone', until all
-        * servers are 2.10.
-        */
-       sendto_chanopsserv_butone(cptr, sptr, chptr,
-           ":%s WC %s :%s", parv[0], parv[1], parv[parc - 1]);
-#endif
-      }
-      else
-       sendto_one(sptr, err_str(ERR_CANNOTSENDTOCHAN),
-           me.name, parv[0], parv[1]);
-    }
-  }
-  else
-    sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], parv[1]);
-
-  return 0;
-}
-
-/*
- * m_user
- *
- * parv[0] = sender prefix
- * parv[1] = username (login name, account)
- * parv[2] = umode mask
- * parv[3] = server notice mask
- * parv[4] = users real name info
- */
-int m_user(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-#define UFLAGS (FLAGS_INVISIBLE|FLAGS_WALLOP|FLAGS_SERVNOTICE)
-  char *username, *host, *server, *realname;
-  anUser *user;
-
-  if (IsServer(cptr))
-    return 0;
-
-  if (IsServerPort(cptr))
-    return exit_client(cptr, cptr, &me, "Use a different port");
-
-  if (parc > 2 && (username = strchr(parv[1], '@')))
-    *username = '\0';
-  if (parc < 5 || *parv[1] == '\0' || *parv[2] == '\0' ||
-      *parv[3] == '\0' || *parv[4] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "USER");
-    return 0;
-  }
-
-  /* Copy parameters into better documenting variables */
-
-  username = (parc < 2 || BadPtr(parv[1])) ? "<bad-boy>" : parv[1];
-  host = (parc < 3 || BadPtr(parv[2])) ? "<nohost>" : parv[2];
-  server = (parc < 4 || BadPtr(parv[3])) ? "<noserver>" : parv[3];
-  realname = (parc < 5 || BadPtr(parv[4])) ? "<bad-realname>" : parv[4];
-
-  user = make_user(sptr);
-
-  if (!IsUnknown(sptr))
-  {
-    sendto_one(sptr, err_str(ERR_ALREADYREGISTRED), me.name, parv[0]);
-    return 0;
-  }
-
-  if (!strchr(host, '.'))      /* Not an IP# as hostname ? */
-    sptr->flags |= (UFLAGS & atoi(host));
-  if ((sptr->flags & FLAGS_SERVNOTICE))
-    set_snomask(sptr, (isDigit(*server) && !strchr(server, '.')) ?
-       (atoi(server) & SNO_USER) : SNO_DEFAULT, SNO_SET);
-  user->server = &me;
-  strncpy(sptr->info, realname, sizeof(sptr->info) - 1);
-  if (sptr->name[0] && sptr->cookie == COOKIE_VERIFIED)
-    /* NICK and PONG already received, now we have USER... */
-    return register_user(cptr, sptr, sptr->name, username);
-  else
-  {
-    strncpy(sptr->user->username, username, USERLEN);
-    strncpy(user->host, host, sizeof(user->host) - 1);
-  }
-  return 0;
-}
-
-/*
- * m_quit
- *
- * parv[0] = sender prefix
- * parv[parc-1] = comment
- */
-int m_quit(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  register char *comment = (parc > 1
-      && parv[parc - 1]) ? parv[parc - 1] : cptr->name;
-
-  if (MyUser(sptr))
-  {
-    if (!strncmp("Local Kill", comment, 10) || !strncmp(comment, "Killed", 6))
-      comment = parv[0];
-    if (sptr->user)
-    {
-      Link *lp;
-      for (lp = sptr->user->channel; lp; lp = lp->next)
-       if (can_send(sptr, lp->value.chptr) != 0)
-         return exit_client(cptr, sptr, sptr, "Signed off");
-    }
-  }
-  if (strlen(comment) > (size_t)TOPICLEN)
-    comment[TOPICLEN] = '\0';
-  return IsServer(sptr) ? 0 : exit_client(cptr, sptr, sptr, comment);
-}
-
-/*
- * m_kill
- *
- * parv[0] = sender prefix
- * parv[1] = kill victim
- * parv[parc-1] = kill path
- */
-int m_kill(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  aClient *acptr;
-  char *inpath = get_client_name(cptr, FALSE);
-  char *user, *path, *killer;
-  int chasing = 0;
-
-  if (parc < 3 || *parv[1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "KILL");
-    return 0;
-  }
-
-  user = parv[1];
-  path = parv[parc - 1];       /* Either defined or NULL (parc >= 3) */
-
-#ifdef OPER_KILL
-  if (!IsPrivileged(cptr))
-  {
-    sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, parv[0]);
-    return 0;
-  }
-#else
-  if (!IsServer(cptr))
-  {
-    sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, parv[0]);
-    return 0;
-  }
-#endif
-  if (IsAnOper(cptr))
-  {
-    if (BadPtr(path))
-    {
-      sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "KILL");
-      return 0;
-    }
-    if (strlen(path) > (size_t)TOPICLEN)
-      path[TOPICLEN] = '\0';
-  }
-
-  if (MyUser(sptr) || Protocol(cptr) < 10)
-  {
-    if (!(acptr = FindClient(user)))
-    {
-      /*
-       * If the user has recently changed nick, we automaticly
-       * rewrite the KILL for this new nickname--this keeps
-       * servers in synch when nick change and kill collide
-       */
-      if (!(acptr = get_history(user, (long)15)))
-      {
-       sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], user);
-       return 0;
-      }
-      sendto_one(sptr, ":%s NOTICE %s :Changed KILL %s into %s",
-         me.name, parv[0], user, acptr->name);
-      chasing = 1;
-    }
-  }
-  else if (!(acptr = findNUser(user)))
-  {
-    if (Protocol(cptr) < 10 && IsUser(sptr))
-      sendto_one(sptr,
-         ":%s NOTICE %s :KILL target disconnected before I got him :(",
-         me.name, parv[0]);
-    else if (IsUser(sptr))
-      sendto_one(sptr,
-         "%s NOTICE %s%s :KILL target disconnected before I got him :(",
-         NumServ(&me), NumNick(sptr));
-    return 0;
-  }
-  if (!MyConnect(acptr) && IsLocOp(cptr))
-  {
-    sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, parv[0]);
-    return 0;
-  }
-  if (IsServer(acptr) || IsMe(acptr))
-  {
-    sendto_one(sptr, err_str(ERR_CANTKILLSERVER), me.name, parv[0]);
-    return 0;
-  }
-
-  /* if the user is +k, prevent a kill from local user */
-  if (IsChannelService(acptr) && MyUser(sptr))
-  {
-    sendto_one(sptr, err_str(ERR_ISCHANSERVICE), me.name,
-       parv[0], "KILL", acptr->name);
-    return 0;
-  }
-
-#ifdef LOCAL_KILL_ONLY
-  if (MyConnect(sptr) && !MyConnect(acptr))
-  {
-    sendto_one(sptr, ":%s NOTICE %s :Nick %s isnt on your server",
-       me.name, parv[0], acptr->name);
-    return 0;
-  }
-#endif
-  if (!IsServer(cptr))
-  {
-    /*
-     * The kill originates from this server, initialize path.
-     * (In which case the 'path' may contain user suplied
-     * explanation ...or some nasty comment, sigh... >;-)
-     *
-     * ...!operhost!oper
-     * ...!operhost!oper (comment)
-     */
-    if (IsUnixSocket(cptr))    /* Don't use get_client_name syntax */
-      inpath = me.sockhost;
-    else
-      inpath = cptr->sockhost;
-    if (!BadPtr(path))
-    {
-      sprintf_irc(buf,
-         "%s%s (%s)", cptr->name, IsOper(sptr) ? "" : "(L)", path);
-      path = buf;
-    }
-    else
-      path = cptr->name;
-  }
-  else if (BadPtr(path))
-    path = "*no-path*";                /* Bogus server sending??? */
-  /*
-   * Notify all *local* opers about the KILL (this includes the one
-   * originating the kill, if from this server--the special numeric
-   * reply message is not generated anymore).
-   *
-   * Note: "acptr->name" is used instead of "user" because we may
-   *       have changed the target because of the nickname change.
-   */
-  if (IsLocOp(sptr) && !MyConnect(acptr))
-  {
-    sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, parv[0]);
-    return 0;
-  }
-  sendto_op_mask(IsServer(sptr) ? SNO_SERVKILL : SNO_OPERKILL,
-      "Received KILL message for %s. From %s Path: %s!%s",
-      acptr->name, parv[0], inpath, path);
-#if defined(USE_SYSLOG) && defined(SYSLOG_KILL)
-  if (MyUser(acptr))
-  {                            /* get more infos when your local
-                                  clients are killed -- _dl */
-    if (IsServer(sptr))
-      syslog(LOG_DEBUG,
-         "A local client %s!%s@%s KILLED from %s [%s] Path: %s!%s)",
-         acptr->name, acptr->user->username, acptr->user->host,
-         parv[0], sptr->name, inpath, path);
-    else
-      syslog(LOG_DEBUG,
-         "A local client %s!%s@%s KILLED by %s [%s!%s@%s] (%s!%s)",
-         acptr->name, acptr->user->username, acptr->user->host,
-         parv[0], sptr->name, sptr->user->username, sptr->user->host,
-         inpath, path);
-  }
-  else if (IsOper(sptr))
-    syslog(LOG_DEBUG, "KILL From %s For %s Path %s!%s",
-       parv[0], acptr->name, inpath, path);
-#endif
-  /*
-   * And pass on the message to other servers. Note, that if KILL
-   * was changed, the message has to be sent to all links, also
-   * back.
-   * Suicide kills are NOT passed on --SRB
-   */
-  if (!MyConnect(acptr) || !MyConnect(sptr) || !IsAnOper(sptr))
-  {
-    sendto_lowprot_butone(cptr, 9, ":%s KILL %s :%s!%s",
-       parv[0], acptr->name, inpath, path);
-    sendto_highprot_butone(cptr, 10, ":%s KILL %s%s :%s!%s",
-       parv[0], NumNick(acptr), inpath, path);
-#ifndef NO_PROTOCOL9
-    if (chasing && IsServer(cptr))     /* Can be removed when all are Protocol 10 */
-      sendto_one(cptr, ":%s KILL %s :%s!%s",
-         me.name, acptr->name, inpath, path);
-#endif
-    /* We *can* have crossed a NICK with this numeric... --Run */
-    /* Note the following situation:
-     *  KILL SAA -->       X
-     *  <-- S NICK ... SAA | <-- SAA QUIT <-- S NICK ... SAA <-- SQUIT S
-     * Where the KILL reaches point X before the QUIT does.
-     * This would then *still* cause an orphan because the KILL doesn't reach S
-     * (because of the SQUIT), the QUIT is ignored (because of the KILL)
-     * and the second NICK ... SAA causes an orphan on the server at the
-     * right (which then isn't removed when the SQUIT arrives).
-     * Therefore we still need to detect numeric nick collisions too.
-     */
-    if (MyConnect(acptr) && IsServer(cptr) && Protocol(cptr) > 9)
-      sendto_one(cptr, "%s KILL %s%s :%s!%s (Ghost5)",
-         NumServ(&me), NumNick(acptr), inpath, path);
-    acptr->flags |= FLAGS_KILLED;
-  }
-
-  /*
-   * Tell the victim she/he has been zapped, but *only* if
-   * the victim is on current server--no sense in sending the
-   * notification chasing the above kill, it won't get far
-   * anyway (as this user don't exist there any more either)
-   */
-  if (MyConnect(acptr))
-    sendto_prefix_one(acptr, sptr, ":%s KILL %s :%s!%s",
-       parv[0], acptr->name, inpath, path);
-  /*
-   * Set FLAGS_KILLED. This prevents exit_one_client from sending
-   * the unnecessary QUIT for this. (This flag should never be
-   * set in any other place)
-   */
-  if (MyConnect(acptr) && MyConnect(sptr) && IsAnOper(sptr))
-    sprintf_irc(buf2, "Local kill by %s (%s)", sptr->name,
-       BadPtr(parv[parc - 1]) ? sptr->name : parv[parc - 1]);
-  else
-  {
-    if ((killer = strchr(path, ' ')))
-    {
-      while (*killer && *killer != '!')
-       killer--;
-      if (!*killer)
-       killer = path;
-      else
-       killer++;
-    }
-    else
-      killer = path;
-    sprintf_irc(buf2, "Killed (%s)", killer);
-  }
-  return exit_client(cptr, acptr, sptr, buf2);
-}
-
-/*
- * m_away                               - Added 14 Dec 1988 by jto.
- *
- * parv[0] = sender prefix
- * parv[1] = away message
- */
-int m_away(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  Reg1 char *away, *awy2 = parv[1];
-
-  away = sptr->user->away;
-
-  if (parc < 2 || !*awy2)
-  {
-    /* Marking as not away */
-    if (away)
-    {
-      RunFree(away);
-      sptr->user->away = NULL;
-    }
-    sendto_serv_butone(cptr, ":%s AWAY", parv[0]);
-    if (MyConnect(sptr))
-      sendto_one(sptr, rpl_str(RPL_UNAWAY), me.name, parv[0]);
-    return 0;
-  }
-
-  /* Marking as away */
-
-  if (strlen(awy2) > (size_t)TOPICLEN)
-    awy2[TOPICLEN] = '\0';
-  sendto_serv_butone(cptr, ":%s AWAY :%s", parv[0], awy2);
-
-  if (away)
-    away = (char *)RunRealloc(away, strlen(awy2) + 1);
-  else
-    away = (char *)RunMalloc(strlen(awy2) + 1);
-
-  sptr->user->away = away;
-  strcpy(away, awy2);
-  if (MyConnect(sptr))
-    sendto_one(sptr, rpl_str(RPL_NOWAWAY), me.name, parv[0]);
-  return 0;
-}
-
-/*
- * m_ping
- *
- * parv[0] = sender prefix
- * parv[1] = origin
- * parv[2] = destination
- */
-int m_ping(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  aClient *acptr;
-  char *origin, *destination;
-
-  if (parc < 2 || *parv[1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NOORIGIN), me.name, parv[0]);
-    return 0;
-  }
-  origin = parv[1];
-  destination = parv[2];       /* Will get NULL or pointer (parc >= 2!!) */
-
-  acptr = FindClient(origin);
-  if (acptr && acptr != sptr)
-    origin = cptr->name;
-
-  if (!BadPtr(destination) && strCasediff(destination, me.name) != 0)
-  {
-    if ((acptr = FindServer(destination)))
-      sendto_one(acptr, ":%s PING %s :%s", parv[0], origin, destination);
-    else
-    {
-      sendto_one(sptr, err_str(ERR_NOSUCHSERVER),
-         me.name, parv[0], destination);
-      return 0;
-    }
-  }
-  else
-    sendto_one(sptr, ":%s PONG %s :%s", me.name, me.name, origin);
-  return 0;
-}
-
-/*
- * m_pong
- *
- * parv[0] = sender prefix
- * parv[1] = origin
- * parv[2] = destination
- */
-int m_pong(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  aClient *acptr;
-  char *origin, *destination;
-
-  if (MyUser(sptr))
-    return 0;
-
-  /* Check to see if this is a PONG :cookie reply from an
-   * unregistered user.  If so, process it. -record       */
-
-  if ((!IsRegistered(sptr)) && (sptr->cookie != 0) &&
-      (sptr->cookie != COOKIE_VERIFIED) && (parc > 1))
-  {
-    if (atol(parv[parc - 1]) == (long)sptr->cookie)
-    {
-      sptr->cookie = COOKIE_VERIFIED;
-      if (sptr->user && *sptr->user->host && sptr->name[0])    /* NICK and
-                                                                  USER OK */
-       return register_user(cptr, sptr, sptr->name, sptr->user->username);
-    }
-    else
-      sendto_one(sptr, ":%s %d %s :To connect, type /QUOTE PONG %u",
-         me.name, ERR_BADPING, sptr->name, sptr->cookie);
-
-    return 0;
-  }
-
-  if (parc < 2 || *parv[1] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NOORIGIN), me.name, parv[0]);
-    return 0;
-  }
-
-  origin = parv[1];
-  destination = parv[2];
-  cptr->flags &= ~FLAGS_PINGSENT;
-  sptr->flags &= ~FLAGS_PINGSENT;
-
-  if (!BadPtr(destination) && strCasediff(destination, me.name) != 0)
-  {
-    if ((acptr = FindClient(destination)))
-      sendto_one(acptr, ":%s PONG %s %s", parv[0], origin, destination);
-    else
-    {
-      sendto_one(sptr, err_str(ERR_NOSUCHSERVER),
-         me.name, parv[0], destination);
-      return 0;
-    }
-  }
-#ifdef DEBUGMODE
-  else
-    Debug((DEBUG_NOTICE, "PONG: %s %s",
-       origin, destination ? destination : "*"));
-#endif
-  return 0;
-}
-
-static char umode_buf[2 * sizeof(user_modes) / sizeof(int)];
-
-/*
- * added Sat Jul 25 07:30:42 EST 1992
- */
-static void send_umode_out(aClient *cptr, aClient *sptr, int old)
-{
-  Reg1 int i;
-  Reg2 aClient *acptr;
-
-  send_umode(NULL, sptr, old, SEND_UMODES);
-
-  for (i = highest_fd; i >= 0; i--)
-    if ((acptr = loc_clients[i]) && IsServer(acptr) &&
-       (acptr != cptr) && (acptr != sptr) && *umode_buf)
-      sendto_one(acptr, ":%s MODE %s :%s", sptr->name, sptr->name, umode_buf);
-
-  if (cptr && MyUser(cptr))
-    send_umode(cptr, sptr, old, ALL_UMODES);
-}
-
-/*
- *  m_oper
- *    parv[0] = sender prefix
- *    parv[1] = oper name
- *    parv[2] = oper password
- */
-int m_oper(aClient *cptr, aClient *sptr, int parc, char *parv[])
-{
-  aConfItem *aconf;
-  char *name, *password, *encr;
-#ifdef CRYPT_OPER_PASSWORD
-  char salt[3];
-#endif /* CRYPT_OPER_PASSWORD */
-
-  name = parc > 1 ? parv[1] : NULL;
-  password = parc > 2 ? parv[2] : NULL;
-
-  if (!IsServer(cptr) && (BadPtr(name) || BadPtr(password)))
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "OPER");
-    return 0;
-  }
-
-  /* if message arrived from server, trust it, and set to oper */
-
-  if ((IsServer(cptr) || IsMe(cptr)) && !IsOper(sptr))
-  {
-    ++nrof.opers;
-    sptr->flags |= FLAGS_OPER;
-    sendto_serv_butone(cptr, ":%s MODE %s :+o", parv[0], parv[0]);
-    if (IsMe(cptr))
-      sendto_one(sptr, rpl_str(RPL_YOUREOPER), me.name, parv[0]);
-    return 0;
-  }
-  else if (IsAnOper(sptr))
-  {
-    if (MyConnect(sptr))
-      sendto_one(sptr, rpl_str(RPL_YOUREOPER), me.name, parv[0]);
-    return 0;
-  }
-  if (!(aconf = find_conf_exact(name, sptr->username, sptr->sockhost,
-      CONF_OPS)) && !(aconf = find_conf_exact(name, sptr->username,
-      inetntoa(cptr->ip), CONF_OPS)))
-  {
-    sendto_one(sptr, err_str(ERR_NOOPERHOST), me.name, parv[0]);
-    sendto_realops("Failed OPER attempt by %s (%s@%s)",
-       parv[0], sptr->user->username, sptr->sockhost);
-    return 0;
-  }
-#ifdef CRYPT_OPER_PASSWORD
-  /* use first two chars of the password they send in as salt */
-
-  /* passwd may be NULL. Head it off at the pass... */
-  salt[0] = '\0';
-  if (password && aconf->passwd)
-  {
-    salt[0] = aconf->passwd[0];
-    salt[1] = aconf->passwd[1];
-    salt[2] = '\0';
-    encr = crypt(password, salt);
-  }
-  else
-    encr = "";
-#else
-  encr = password;
-#endif /* CRYPT_OPER_PASSWORD */
-
-  if ((aconf->status & CONF_OPS) &&
-      !strcmp(encr, aconf->passwd) && attach_conf(sptr, aconf) == ACR_OK)
-  {
-    int old = (sptr->flags & ALL_UMODES);
-    char *s;
-
-    s = strchr(aconf->host, '@');
-    *s++ = '\0';
-#ifdef OPER_REMOTE
-    if (aconf->status == CONF_LOCOP)
-    {
-#else
-    if ((match(s, me.sockhost) && !IsLocal(sptr)) ||
-       aconf->status == CONF_LOCOP)
-    {
-#endif
-      ClearOper(sptr);
-      SetLocOp(sptr);
-    }
-    else
-    {
-      /* prevent someone from being both oper and local oper */
-      ClearLocOp(sptr);
-      SetOper(sptr);
-      ++nrof.opers;
+    if (IsUser(sptr)) {
+      sendcmdto_common_channels_butone(sptr, CMD_NICK, NULL, ":%s", nick);
+      add_history(sptr, 1);
+      sendcmdto_serv_butone(sptr, CMD_NICK, cptr, "%s %Tu", nick,
+                            cli_lastnick(sptr));
     }
-    *--s = '@';
-    sendto_ops("%s (%s@%s) is now operator (%c)", parv[0],
-       sptr->user->username, sptr->sockhost, IsOper(sptr) ? 'O' : 'o');
-    sptr->flags |= (FLAGS_WALLOP | FLAGS_SERVNOTICE | FLAGS_DEBUG);
-    set_snomask(sptr, SNO_OPERDEFAULT, SNO_ADD);
-    send_umode_out(cptr, sptr, old);
-    sendto_one(sptr, rpl_str(RPL_YOUREOPER), me.name, parv[0]);
-#if !defined(CRYPT_OPER_PASSWORD) && (defined(FNAME_OPERLOG) ||\
-    (defined(USE_SYSLOG) && defined(SYSLOG_OPER)))
-    encr = "";
-#endif
-#if defined(USE_SYSLOG) && defined(SYSLOG_OPER)
-    syslog(LOG_INFO, "OPER (%s) (%s) by (%s!%s@%s)",
-       name, encr, parv[0], sptr->user->username, sptr->sockhost);
-#endif
-#ifdef FNAME_OPERLOG
-    if (IsUser(sptr))
-      write_log(FNAME_OPERLOG,
-         "%s OPER (%s) (%s) by (%s!%s@%s)\n", myctime(now), name,
-         encr, parv[0], sptr->user->username, sptr->sockhost);
-#endif
+    else
+      sendcmdto_one(sptr, CMD_NICK, sptr, ":%s", nick);
+
+    if ((cli_name(sptr))[0])
+      hRemClient(sptr);
+    strcpy(cli_name(sptr), nick);
+    hAddClient(sptr);
   }
-  else
-  {
-    detach_conf(sptr, aconf);
-    sendto_one(sptr, err_str(ERR_PASSWDMISMATCH), me.name, parv[0]);
-    sendto_realops("Failed OPER attempt by %s (%s@%s)",
-       parv[0], sptr->user->username, sptr->sockhost);
+  else {
+    /* Local client setting NICK the first time */
+    strcpy(cli_name(sptr), nick);
+    hAddClient(sptr);
+    return auth_set_nick(cli_auth(sptr), nick);
   }
   return 0;
 }
 
-/*
- * m_pass
- *
- * parv[0] = sender prefix
- * parv[1] = password
+/** Calculate the hash value for a target.
+ * @param[in] target Pointer to target, cast to unsigned int.
+ * @return Hash value constructed from the pointer.
  */
-int m_pass(aClient *cptr, aClient *sptr, int parc, char *parv[])
+static unsigned char hash_target(unsigned int target)
 {
-  char *password = parc > 1 ? parv[1] : NULL;
+  return (unsigned char) (target >> 16) ^ (target >> 8);
+}
 
-  if (BadPtr(password))
-  {
-    sendto_one(cptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "PASS");
-    return 0;
-  }
-  if (!MyConnect(sptr) || (!IsUnknown(cptr) && !IsHandshake(cptr)))
-  {
-    sendto_one(cptr, err_str(ERR_ALREADYREGISTRED), me.name, parv[0]);
-    return 0;
+/** Records \a target as a recent target for \a sptr.
+ * @param[in] sptr User who has sent to a new target.
+ * @param[in] target Target to add.
+ */
+void
+add_target(struct Client *sptr, void *target)
+{
+  /* Ok, this shouldn't work esp on alpha
+  */
+  unsigned char  hash = hash_target((unsigned long) target);
+  unsigned char* targets;
+  int            i;
+  assert(0 != sptr);
+  assert(cli_local(sptr));
+
+  targets = cli_targets(sptr);
+
+  /* 
+   * Already in table?
+   */
+  for (i = 0; i < MAXTARGETS; ++i) {
+    if (targets[i] == hash)
+      return;
   }
-  strncpy(cptr->passwd, password, sizeof(cptr->passwd) - 1);
-  return 0;
+  /*
+   * New target
+   */
+  memmove(&targets[RESERVEDTARGETS + 1],
+          &targets[RESERVEDTARGETS], MAXTARGETS - RESERVEDTARGETS - 1);
+  targets[RESERVEDTARGETS] = hash;
 }
 
-/*
- * m_userhost
- *
- * Added by Darren Reed 13/8/91 to aid clients and reduce the need for
- * complicated requests like WHOIS.
- *
- * Returns user/host information only (no spurious AWAY labels or channels).
- *
- * Rewritten to speed it up by Carlo Wood 3/8/97.
+/** Check whether \a sptr can send to or join \a target yet.
+ * @param[in] sptr User trying to join a channel or send a message.
+ * @param[in] target Target of the join or message.
+ * @param[in] name Name of the target.
+ * @param[in] created If non-zero, trying to join a new channel.
+ * @return Non-zero if too many target changes; zero if okay to send.
  */
-int m_userhost(aClient *UNUSED(cptr), aClient *sptr, int parc, char *parv[])
+int check_target_limit(struct Client *sptr, void *target, const char *name,
+    int created)
 {
-  Reg1 char *s;
-  Reg2 int i, j = 5;
-  char *p = NULL, *sbuf;
-  aClient *acptr;
+  unsigned char hash = hash_target((unsigned long) target);
+  int            i;
+  unsigned char* targets;
 
-  if (parc < 2)
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "USERHOST");
+  assert(0 != sptr);
+  assert(cli_local(sptr));
+  targets = cli_targets(sptr);
+
+  /*
+   * Same target as last time?
+   */
+  if (targets[0] == hash)
     return 0;
+  for (i = 1; i < MAXTARGETS; ++i) {
+    if (targets[i] == hash) {
+      memmove(&targets[1], &targets[0], i);
+      targets[0] = hash;
+      return 0;
+    }
   }
-
-  sbuf = sprintf_irc(sendbuf, rpl_str(RPL_USERHOST), me.name, parv[0]);
-  for (i = j, s = strtoken(&p, parv[1], " "); i && s;
-      s = strtoken(&p, (char *)NULL, " "), i--)
-    if ((acptr = FindUser(s)))
-    {
-      if (i < j)
-       *sbuf++ = ' ';
-      sbuf = sprintf_irc(sbuf, "%s%s=%c%s@%s", acptr->name,
-         IsAnOper(acptr) ? "*" : "", (acptr->user->away) ? '-' : '+',
-         acptr->user->username, acptr->user->host);
+  /*
+   * New target
+   */
+  if (!created) {
+    if (CurrentTime < cli_nexttarget(sptr)) {
+      /* If user is invited to channel, give him/her a free target */
+      if (IsChannelName(name) && IsInvited(sptr, target))
+        return 0;
+
+      if (cli_nexttarget(sptr) - CurrentTime < TARGET_DELAY + 8) {
+        /*
+         * No server flooding
+         */
+        cli_nexttarget(sptr) += 2;
+        send_reply(sptr, ERR_TARGETTOOFAST, name,
+                   cli_nexttarget(sptr) - CurrentTime);
+      }
+      return 1;
     }
-    else
-    {
-      if (i < j)
-       sendbufto_one(sptr);
-      sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], s);
-      sbuf = sprintf_irc(sendbuf, rpl_str(RPL_USERHOST), me.name, parv[0]);
-      j = i - 1;
+    else {
+      cli_nexttarget(sptr) += TARGET_DELAY;
+      if (cli_nexttarget(sptr) < CurrentTime - (TARGET_DELAY * (MAXTARGETS - 1)))
+        cli_nexttarget(sptr) = CurrentTime - (TARGET_DELAY * (MAXTARGETS - 1));
     }
-  if (j)
-    sendbufto_one(sptr);
+  }
+  memmove(&targets[1], &targets[0], MAXTARGETS - 1);
+  targets[0] = hash;
   return 0;
 }
 
-/*
- * m_userip added by Carlo Wood 3/8/97.
- *
- * The same as USERHOST, but with the IP-number instead of the hostname.
+/** Allows a channel operator to avoid target change checks when
+ * sending messages to users on their channel.
+ * @param[in] source User sending the message.
+ * @param[in] nick Destination of the message.
+ * @param[in] channel Name of channel being sent to.
+ * @param[in] text Message to send.
+ * @param[in] is_notice If non-zero, use CNOTICE instead of CPRIVMSG.
  */
-int m_userip(aClient *UNUSED(cptr), aClient *sptr, int parc, char *parv[])
+/* Added 971023 by Run. */
+int whisper(struct Client* source, const char* nick, const char* channel,
+            const char* text, int is_notice)
 {
-  Reg1 char *s;
-  Reg3 int i, j = 5;
-  char *p = NULL, *sbuf;
-  aClient *acptr;
+  struct Client*     dest;
+  struct Channel*    chptr;
+  struct Membership* membership;
 
-  if (parc < 2)
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "USERIP");
+  assert(0 != source);
+  assert(0 != nick);
+  assert(0 != channel);
+  assert(MyUser(source));
+
+  if (!(dest = FindUser(nick))) {
+    return send_reply(source, ERR_NOSUCHNICK, nick);
+  }
+  if (!(chptr = FindChannel(channel))) {
+    return send_reply(source, ERR_NOSUCHCHANNEL, channel);
+  }
+  /*
+   * compare both users channel lists, instead of the channels user list
+   * since the link is the same, this should be a little faster for channels
+   * with a lot of users
+   */
+  for (membership = cli_user(source)->channel; membership; membership = membership->next_channel) {
+    if (chptr == membership->channel)
+      break;
+  }
+  if (0 == membership) {
+    return send_reply(source, ERR_NOTONCHANNEL, chptr->chname);
+  }
+  if (!IsVoicedOrOpped(membership)) {
+    return send_reply(source, ERR_VOICENEEDED, chptr->chname);
+  }
+  /*
+   * lookup channel in destination
+   */
+  assert(0 != cli_user(dest));
+  for (membership = cli_user(dest)->channel; membership; membership = membership->next_channel) {
+    if (chptr == membership->channel)
+      break;
+  }
+  if (0 == membership || IsZombie(membership)) {
+    return send_reply(source, ERR_USERNOTINCHANNEL, cli_name(dest), chptr->chname);
+  }
+  if (is_silenced(source, dest))
     return 0;
+          
+  if (is_notice)
+    sendcmdto_one(source, CMD_NOTICE, dest, "%C :%s", dest, text);
+  else
+  {
+    if (cli_user(dest)->away)
+      send_reply(source, RPL_AWAY, cli_name(dest), cli_user(dest)->away);
+    sendcmdto_one(source, CMD_PRIVATE, dest, "%C :%s", dest, text);
   }
-
-  sbuf = sprintf_irc(sendbuf, rpl_str(RPL_USERIP), me.name, parv[0]);
-  for (i = j, s = strtoken(&p, parv[1], " "); i && s;
-      s = strtoken(&p, (char *)NULL, " "), i--)
-    if ((acptr = FindUser(s)))
-    {
-      if (i < j)
-       *sbuf++ = ' ';
-      sbuf = sprintf_irc(sbuf, "%s%s=%c%s@%s", acptr->name,
-         IsAnOper(acptr) ? "*" : "", (acptr->user->away) ? '-' : '+',
-         acptr->user->username, inetntoa(acptr->ip));
-    }
-    else
-    {
-      if (i < j)
-       sendbufto_one(sptr);
-      sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], s);
-      sbuf = sprintf_irc(sendbuf, rpl_str(RPL_USERIP), me.name, parv[0]);
-      j = i - 1;
-    }
-  if (i < j)
-    sendbufto_one(sptr);
   return 0;
 }
 
-/*
- * m_ison
- *
- * Added by Darren Reed 13/8/91 to act as an efficent user indicator
- * with respect to cpu/bandwidth used. Implemented for NOTIFY feature in
- * clients. Designed to reduce number of whois requests. Can process
- * nicknames in batches as long as the maximum buffer length.
- *
- * format:
- * ISON :nicklist
- */
 
-int m_ison(aClient *UNUSED(cptr), aClient *sptr, int parc, char *parv[])
+/** Send a user mode change for \a cptr to neighboring servers.
+ * @param[in] cptr User whose mode is changing.
+ * @param[in] sptr Client who sent us the mode change message.
+ * @param[in] old Prior set of user flags.
+ * @param[in] prop If non-zero, also include FLAG_OPER.
+ */
+void send_umode_out(struct Client *cptr, struct Client *sptr,
+                    struct Flags *old, int prop)
 {
-  Reg1 aClient *acptr;
-  Reg2 char *s, **pav = parv;
-  Reg3 size_t len;
-  char *p = NULL;
+  int i;
+  struct Client *acptr;
+
+  send_umode(NULL, sptr, old, prop ? SEND_UMODES : SEND_UMODES_BUT_OPER);
 
-  if (parc < 2)
+  for (i = HighestFd; i >= 0; i--)
   {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "ISON");
-    return 0;
+    if ((acptr = LocalClientArray[i]) && IsServer(acptr) &&
+        (acptr != cptr) && (acptr != sptr) && *umodeBuf)
+      sendcmdto_one(sptr, CMD_MODE, acptr, "%s :%s", cli_name(sptr), umodeBuf);
   }
+  if (cptr && MyUser(cptr))
+    send_umode(cptr, sptr, old, ALL_UMODES);
+}
 
-  sprintf_irc(buf, rpl_str(RPL_ISON), me.name, *parv);
-  len = strlen(buf);
-  buf[sizeof(buf) - 1] = 0;
 
-  for (s = strtoken(&p, *++pav, " "); s; s = strtoken(&p, NULL, " "))
-    if ((acptr = FindUser(s)))
-    {
-      strncat(buf, acptr->name, sizeof(buf) - 1 - len);
-      len += strlen(acptr->name);
-      if (len >= sizeof(buf) - 1)
-       break;
-      strcat(buf, " ");
-      len++;
+/** Call \a fmt for each Client named in \a names.
+ * @param[in] sptr Client requesting information.
+ * @param[in] names Space-delimited list of nicknames.
+ * @param[in] rpl Base reply string for messages.
+ * @param[in] fmt Formatting callback function.
+ */
+void send_user_info(struct Client* sptr, char* names, int rpl, InfoFormatter fmt)
+{
+  char*          name;
+  char*          p = 0;
+  int            arg_count = 0;
+  int            users_found = 0;
+  struct Client* acptr;
+  struct MsgBuf* mb;
+
+  assert(0 != sptr);
+  assert(0 != names);
+  assert(0 != fmt);
+
+  mb = msgq_make(sptr, rpl_str(rpl), cli_name(&me), cli_name(sptr));
+
+  for (name = ircd_strtok(&p, names, " "); name; name = ircd_strtok(&p, 0, " ")) {
+    if ((acptr = FindUser(name))) {
+      if (users_found++)
+       msgq_append(0, mb, " ");
+      (*fmt)(acptr, sptr, mb);
     }
-  sendto_one(sptr, "%s", buf);
-  return 0;
+    if (5 == ++arg_count)
+      break;
+  }
+  send_buffer(sptr, mb, 0);
+  msgq_clean(mb);
 }
 
-/*
- * m_umode() added 15/10/91 By Darren Reed.
- *
- * parv[0] - sender
- * parv[1] - username to change mode for
- * parv[2] - modes to change
+/** Set \a flag on \a cptr and possibly hide the client's hostmask.
+ * @param[in,out] cptr User who is getting a new flag.
+ * @param[in] flag Some flag that affects host-hiding (FLAG_HIDDENHOST, FLAG_ACCOUNT).
+ * @return Zero.
  */
-int m_umode(aClient *cptr, aClient *sptr, int parc, char *parv[])
+int
+hide_hostmask(struct Client *cptr, unsigned int flag)
 {
-  Reg1 int flag;
-  Reg2 int *s;
-  Reg3 char **p, *m;
-  aClient *acptr;
-  int what, setflags;
-  snomask_t tmpmask = 0;
-  int snomask_given = 0;
+  struct Membership *chan;
 
-  what = MODE_ADD;
-
-  if (parc < 2)
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "MODE");
+  switch (flag) {
+  case FLAG_HIDDENHOST:
+    /* Local users cannot set +x unless FEAT_HOST_HIDING is true. */
+    if (MyConnect(cptr) && !feature_bool(FEAT_HOST_HIDING))
+      return 0;
+    break;
+  case FLAG_ACCOUNT:
+    /* Invalidate all bans against the user so we check them again */
+    for (chan = (cli_user(cptr))->channel; chan;
+         chan = chan->next_channel)
+      ClearBanValid(chan);
+    break;
+  default:
     return 0;
   }
 
-  if (!(acptr = FindUser(parv[1])))
-  {
-    if (MyConnect(sptr))
-      sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], parv[1]);
+  SetFlag(cptr, flag);
+  if (!HasFlag(cptr, FLAG_HIDDENHOST) || !HasFlag(cptr, FLAG_ACCOUNT))
     return 0;
-  }
 
-  if (IsServer(sptr) || sptr != acptr)
+  sendcmdto_common_channels_butone(cptr, CMD_QUIT, cptr, ":Registered");
+  ircd_snprintf(0, cli_user(cptr)->host, HOSTLEN, "%s.%s",
+                cli_user(cptr)->account, feature_str(FEAT_HIDDEN_HOST));
+
+  /* ok, the client is now fully hidden, so let them know -- hikari */
+  if (MyConnect(cptr))
+   send_reply(cptr, RPL_HOSTHIDDEN, cli_user(cptr)->host);
+
+  /*
+   * Go through all channels the client was on, rejoin him
+   * and set the modes, if any
+   */
+  for (chan = cli_user(cptr)->channel; chan; chan = chan->next_channel)
   {
-    if (IsServer(cptr))
-      sendto_ops_butone(NULL, &me, ":%s WALLOPS :MODE for User %s From %s!%s",
-         me.name, parv[1], get_client_name(cptr, FALSE), sptr->name);
-    else
-      sendto_one(sptr, err_str(ERR_USERSDONTMATCH), me.name, parv[0]);
-    return 0;
+    if (IsZombie(chan))
+      continue;
+    /* Send a JOIN unless the user's join has been delayed. */
+    if (!IsDelayedJoin(chan))
+      sendcmdto_channel_butserv_butone(cptr, CMD_JOIN, chan->channel, cptr, 0,
+                                         "%H", chan->channel);
+    if (IsChanOp(chan) && HasVoice(chan))
+      sendcmdto_channel_butserv_butone(&his, CMD_MODE, chan->channel, cptr, 0,
+                                       "%H +ov %C %C", chan->channel, cptr,
+                                       cptr);
+    else if (IsChanOp(chan) || HasVoice(chan))
+      sendcmdto_channel_butserv_butone(&his, CMD_MODE, chan->channel, cptr, 0,
+        "%H +%c %C", chan->channel, IsChanOp(chan) ? 'o' : 'v', cptr);
   }
+  return 0;
+}
+
+/** Set a user's mode.  This function checks that \a cptr is trying to
+ * set his own mode, prevents local users from setting inappropriate
+ * modes through this function, and applies any other side effects of
+ * a successful mode change.
+ *
+ * @param[in,out] cptr User setting someone's mode.
+ * @param[in] sptr Client who sent the mode change message.
+ * @param[in] parc Number of parameters in \a parv.
+ * @param[in] parv Parameters to MODE.
+ * @param[in] allow_modes ALLOWMODES_ANY for any mode, ALLOWMODES_DEFAULT for 
+ *                        only permitting legitimate default user modes.
+ * @return Zero.
+ */
+int set_user_mode(struct Client *cptr, struct Client *sptr, int parc, 
+               char *parv[], int allow_modes)
+{
+  char** p;
+  char*  m;
+  int what;
+  int i;
+  struct Flags setflags;
+  unsigned int tmpmask = 0;
+  int snomask_given = 0;
+  char buf[BUFSIZE];
+  int prop = 0;
+  int do_host_hiding = 0;
+  char* account = NULL;
+
+  what = MODE_ADD;
 
   if (parc < 3)
   {
     m = buf;
     *m++ = '+';
-    for (s = user_modes; (flag = *s) && (m - buf < BUFSIZE - 4); s += 2)
-      if (sptr->flags & flag)
-       *m++ = (char)(*(s + 1));
+    for (i = 0; i < USERMODELIST_SIZE; i++)
+    {
+      if (HasFlag(sptr, userModeList[i].flag) &&
+          userModeList[i].flag != FLAG_ACCOUNT)
+        *m++ = userModeList[i].c;
+    }
     *m = '\0';
-    sendto_one(sptr, rpl_str(RPL_UMODEIS), me.name, parv[0], buf);
-    if ((sptr->flags & FLAGS_SERVNOTICE) && MyConnect(sptr)
-       && sptr->snomask !=
-       (unsigned int)(IsOper(sptr) ? SNO_OPERDEFAULT : SNO_DEFAULT))
-      sendto_one(sptr, rpl_str(RPL_SNOMASK), me.name, parv[0], sptr->snomask,
-         sptr->snomask);
+    send_reply(sptr, RPL_UMODEIS, buf);
+    if (HasFlag(sptr, FLAG_SERVNOTICE) && MyConnect(sptr)
+        && cli_snomask(sptr) !=
+        (unsigned int)(IsOper(sptr) ? SNO_OPERDEFAULT : SNO_DEFAULT))
+      send_reply(sptr, RPL_SNOMASK, cli_snomask(sptr), cli_snomask(sptr));
     return 0;
   }
 
-  /* find flags already set for user */
-  setflags = 0;
-  for (s = user_modes; (flag = *s); s += 2)
-    if (sptr->flags & flag)
-      setflags |= flag;
+  /*
+   * find flags already set for user
+   * why not just copy them?
+   */
+  setflags = cli_flags(sptr);
+
   if (MyConnect(sptr))
-    tmpmask = sptr->snomask;
+    tmpmask = cli_snomask(sptr);
 
   /*
    * parse mode change string(s)
    */
-  for (p = &parv[2]; *p; p++)  /* p is changed in loop too */
-    for (m = *p; *m; m++)
-      switch (*m)
-      {
-       case '+':
-         what = MODE_ADD;
-         break;
-       case '-':
-         what = MODE_DEL;
-         break;
-       case 's':
-         if (*(p + 1) && is_snomask(*(p + 1)))
-         {
-           snomask_given = 1;
-           tmpmask = umode_make_snomask(tmpmask, *++p, what);
-           tmpmask &= (IsAnOper(sptr) ? SNO_ALL : SNO_USER);
-         }
-         else
-           tmpmask = (what == MODE_ADD) ?
-               (IsAnOper(sptr) ? SNO_OPERDEFAULT : SNO_DEFAULT) : 0;
-         if (tmpmask)
-           sptr->flags |= FLAGS_SERVNOTICE;
-         else
-           sptr->flags &= ~FLAGS_SERVNOTICE;
-         break;
-         /*
-          * We may not get these, but they shouldnt be in default:
-          */
-       case ' ':
-       case '\n':
-       case '\r':
-       case '\t':
-         break;
-       default:
-         for (s = user_modes; (flag = *s); s += 2)
-           if (*m == (char)(*(s + 1)))
-           {
-             if (what == MODE_ADD)
-               sptr->flags |= flag;
-             else if ((flag & (FLAGS_OPER | FLAGS_LOCOP)))
-             {
-               sptr->flags &= ~(FLAGS_OPER | FLAGS_LOCOP);
-               if (MyConnect(sptr))
-                 tmpmask = sptr->snomask & ~SNO_OPER;
-             }
-             /* allow either -o or -O to reset all operator status's... */
-             else
-               sptr->flags &= ~flag;
-             break;
-           }
-         if (flag == 0 && MyConnect(sptr))
-           sendto_one(sptr, err_str(ERR_UMODEUNKNOWNFLAG), me.name, parv[0]);
-         break;
+  for (p = &parv[2]; *p && p<&parv[parc]; p++) {       /* p is changed in loop too */
+    for (m = *p; *m; m++) {
+      switch (*m) {
+      case '+':
+        what = MODE_ADD;
+        break;
+      case '-':
+        what = MODE_DEL;
+        break;
+      case 's':
+        if (*(p + 1) && is_snomask(*(p + 1))) {
+          snomask_given = 1;
+          tmpmask = umode_make_snomask(tmpmask, *++p, what);
+          tmpmask &= (IsAnOper(sptr) ? SNO_ALL : SNO_USER);
+        }
+        else
+          tmpmask = (what == MODE_ADD) ?
+              (IsAnOper(sptr) ? SNO_OPERDEFAULT : SNO_DEFAULT) : 0;
+        if (tmpmask)
+         SetServNotice(sptr);
+        else
+         ClearServNotice(sptr);
+        break;
+      case 'w':
+        if (what == MODE_ADD)
+          SetWallops(sptr);
+        else
+          ClearWallops(sptr);
+        break;
+      case 'o':
+        if (what == MODE_ADD)
+          SetOper(sptr);
+        else {
+          ClrFlag(sptr, FLAG_OPER);
+          ClrFlag(sptr, FLAG_LOCOP);
+          if (MyConnect(sptr))
+          {
+            tmpmask = cli_snomask(sptr) & ~SNO_OPER;
+            cli_handler(sptr) = CLIENT_HANDLER;
+          }
+        }
+        break;
+      case 'O':
+        if (what == MODE_ADD)
+          SetLocOp(sptr);
+        else
+        { 
+          ClrFlag(sptr, FLAG_OPER);
+          ClrFlag(sptr, FLAG_LOCOP);
+          if (MyConnect(sptr))
+          {
+            tmpmask = cli_snomask(sptr) & ~SNO_OPER;
+            cli_handler(sptr) = CLIENT_HANDLER;
+          }
+        }
+        break;
+      case 'i':
+        if (what == MODE_ADD)
+          SetInvisible(sptr);
+        else
+          ClearInvisible(sptr);
+        break;
+      case 'd':
+        if (what == MODE_ADD)
+          SetDeaf(sptr);
+        else
+          ClearDeaf(sptr);
+        break;
+      case 'k':
+        if (what == MODE_ADD)
+          SetChannelService(sptr);
+        else
+          ClearChannelService(sptr);
+        break;
+      case 'g':
+        if (what == MODE_ADD)
+          SetDebug(sptr);
+        else
+          ClearDebug(sptr);
+        break;
+      case 'x':
+        if (what == MODE_ADD)
+         do_host_hiding = 1;
+      case 'S':
+        if (what == MODE_ADD)
+          SetSSLConn(sptr);
+        else
+          ClearSSLConn(sptr);
+        break;
+       break;
+      case 'r':
+       if (*(p + 1) && (what == MODE_ADD)) {
+         account = *(++p);
+         SetAccount(sptr);
+       }
+       /* There is no -r */
+       break;
+      default:
+        send_reply(sptr, ERR_UMODEUNKNOWNFLAG, *m);
+        break;
       }
+    }
+  }
   /*
+   * Evaluate rules for new user mode
    * Stop users making themselves operators too easily:
    */
-  if (!(setflags & FLAGS_OPER) && IsOper(sptr) && !IsServer(cptr))
-    ClearOper(sptr);
-  if (!(setflags & FLAGS_LOCOP) && IsLocOp(sptr) && !IsServer(cptr))
-    sptr->flags &= ~FLAGS_LOCOP;
-  if ((setflags & (FLAGS_OPER | FLAGS_LOCOP)) && !IsAnOper(sptr) &&
-      MyConnect(sptr))
-    det_confs_butmask(sptr, CONF_CLIENT & ~CONF_OPS);
-  /* new umode; servers can set it, local users cannot;
-   * prevents users from /kick'ing or /mode -o'ing */
-  if (!(setflags & FLAGS_CHSERV) && !IsServer(cptr))
-    sptr->flags &= ~FLAGS_CHSERV;
+  if (!IsServer(cptr))
+  {
+    if (!FlagHas(&setflags, FLAG_OPER) && IsOper(sptr))
+      ClearOper(sptr);
+    if (!FlagHas(&setflags, FLAG_LOCOP) && IsLocOp(sptr))
+      ClearLocOp(sptr);
+    if (!FlagHas(&setflags, FLAG_ACCOUNT) && IsAccount(sptr))
+      ClrFlag(sptr, FLAG_ACCOUNT);
+    if (!FlagHas(&setflags, FLAG_SSLCONN) && IsSSLConn(sptr))
+      ClrFlag(sptr, FLAG_SSLCONN);
+    else if (FlagHas(&setflags, FLAG_SSLCONN) && !IsSSLConn(sptr))
+      SetFlag(sptr, FLAG_SSLCONN);
+    /*
+     * new umode; servers can set it, local users cannot;
+     * prevents users from /kick'ing or /mode -o'ing
+     */
+    if (!FlagHas(&setflags, FLAG_CHSERV))
+      ClearChannelService(sptr);
+    /*
+     * only send wallops to opers
+     */
+    if (feature_bool(FEAT_WALLOPS_OPER_ONLY) && !IsAnOper(sptr) &&
+       !FlagHas(&setflags, FLAG_WALLOP))
+      ClearWallops(sptr);
+    if (feature_bool(FEAT_HIS_SNOTICES_OPER_ONLY) && MyConnect(sptr) &&
+        !IsAnOper(sptr) && !FlagHas(&setflags, FLAG_SERVNOTICE))
+    {
+      ClearServNotice(sptr);
+      set_snomask(sptr, 0, SNO_SET);
+    }
+    if (feature_bool(FEAT_HIS_DEBUG_OPER_ONLY) &&
+        !IsAnOper(sptr) && !FlagHas(&setflags, FLAG_DEBUG))
+      ClearDebug(sptr);
+  }
+  if (MyConnect(sptr))
+  {
+    if ((FlagHas(&setflags, FLAG_OPER) || FlagHas(&setflags, FLAG_LOCOP)) &&
+        !IsAnOper(sptr))
+    {
+      det_confs_butmask(sptr, CONF_CLIENT & ~CONF_OPERATOR);
+      client_set_privs(sptr, NULL);
+    }
+
+    if (SendServNotice(sptr))
+    {
+      if (tmpmask != cli_snomask(sptr))
+       set_snomask(sptr, tmpmask, SNO_SET);
+      if (cli_snomask(sptr) && snomask_given)
+       send_reply(sptr, RPL_SNOMASK, cli_snomask(sptr), cli_snomask(sptr));
+    }
+    else
+      set_snomask(sptr, 0, SNO_SET);
+  }
   /*
    * Compare new flags with old flags and send string which
    * will cause servers to update correctly.
    */
-  if ((setflags & FLAGS_OPER) && !IsOper(sptr))
-    --nrof.opers;
-  if (!(setflags & FLAGS_OPER) && IsOper(sptr))
-    ++nrof.opers;
-  if ((setflags & FLAGS_INVISIBLE) && !IsInvisible(sptr))
-    --nrof.inv_clients;
-  if (!(setflags & FLAGS_INVISIBLE) && IsInvisible(sptr))
-    ++nrof.inv_clients;
-  send_umode_out(cptr, sptr, setflags);
+  if (!FlagHas(&setflags, FLAG_ACCOUNT) && IsAccount(sptr)) {
+      int len = ACCOUNTLEN;
+      char *ts;
+      if ((ts = strchr(account, ':'))) {
+       len = (ts++) - account;
+       cli_user(sptr)->acc_create = atoi(ts);
+       Debug((DEBUG_DEBUG, "Received timestamped account in user mode; "
+             "account \"%s\", timestamp %Tu", account,
+             cli_user(sptr)->acc_create));
+      }
+      ircd_strncpy(cli_user(sptr)->account, account, len);
+  }
+  if (!FlagHas(&setflags, FLAG_HIDDENHOST) && do_host_hiding && allow_modes != ALLOWMODES_DEFAULT)
+    hide_hostmask(sptr, FLAG_HIDDENHOST);
 
-  if (MyConnect(sptr))
-  {
-    if (tmpmask != sptr->snomask)
-      set_snomask(sptr, tmpmask, SNO_SET);
-    if (sptr->snomask && snomask_given)
-      sendto_one(sptr, rpl_str(RPL_SNOMASK), me.name, sptr->name,
-         sptr->snomask, sptr->snomask);
+  if (IsRegistered(sptr)) {
+    if (!FlagHas(&setflags, FLAG_OPER) && IsOper(sptr)) {
+      /* user now oper */
+      ++UserStats.opers;
+      client_set_privs(sptr, NULL); /* may set propagate privilege */
+    }
+    /* remember propagate privilege setting */
+    if (HasPriv(sptr, PRIV_PROPAGATE)) {
+      prop = 1;
+    }
+    if (FlagHas(&setflags, FLAG_OPER) && !IsOper(sptr)) {
+      /* user no longer oper */
+      assert(UserStats.opers > 0);
+      --UserStats.opers;
+      client_set_privs(sptr, NULL); /* will clear propagate privilege */
+    }
+    if (FlagHas(&setflags, FLAG_INVISIBLE) && !IsInvisible(sptr)) {
+      assert(UserStats.inv_clients > 0);
+      --UserStats.inv_clients;
+    }
+    if (!FlagHas(&setflags, FLAG_INVISIBLE) && IsInvisible(sptr)) {
+      ++UserStats.inv_clients;
+    }
+    assert(UserStats.opers <= UserStats.clients + UserStats.unknowns);
+    assert(UserStats.inv_clients <= UserStats.clients + UserStats.unknowns);
+    send_umode_out(cptr, sptr, &setflags, prop);
   }
 
   return 0;
 }
 
-/*
- * Build umode string for BURST command
- * --Run
+/** Build a mode string to describe modes for \a cptr.
+ * @param[in] cptr Some user.
+ * @return Pointer to a static buffer.
  */
-char *umode_str(aClient *cptr)
+char *umode_str(struct Client *cptr)
 {
-  char *m = umode_buf;         /* Maximum string size: "owidg\0" */
-  int *s, flag, c_flags;
+  /* Maximum string size: "owidgrx\0" */
+  char *m = umodeBuf;
+  int i;
+  struct Flags c_flags = cli_flags(cptr);
+
+  if (!HasPriv(cptr, PRIV_PROPAGATE))
+    FlagClr(&c_flags, FLAG_OPER);
+
+  for (i = 0; i < USERMODELIST_SIZE; ++i)
+  {
+    if (FlagHas(&c_flags, userModeList[i].flag) &&
+        userModeList[i].flag >= FLAG_GLOBAL_UMODES)
+      *m++ = userModeList[i].c;
+  }
 
-  c_flags = cptr->flags & SEND_UMODES; /* cleaning up the original code */
+  if (IsAccount(cptr))
+  {
+    char* t = cli_user(cptr)->account;
+
+    *m++ = ' ';
+    while ((*m++ = *t++))
+      ; /* Empty loop */
+
+    if (cli_user(cptr)->acc_create) {
+      char nbuf[20];
+      Debug((DEBUG_DEBUG, "Sending timestamped account in user mode for "
+            "account \"%s\"; timestamp %Tu", cli_user(cptr)->account,
+            cli_user(cptr)->acc_create));
+      ircd_snprintf(0, t = nbuf, sizeof(nbuf), ":%Tu",
+                   cli_user(cptr)->acc_create);
+      m--; /* back up over previous nul-termination */
+      while ((*m++ = *t++))
+       ; /* Empty loop */
+    }
+  }
 
-  for (s = user_modes; (flag = *s); s += 2)
-    if ((c_flags & flag))
-      *m++ = *(s + 1);
   *m = '\0';
 
-  return umode_buf;            /* Note: static buffer, gets
-                                  overwritten by send_umode() */
+  return umodeBuf;                /* Note: static buffer, gets
+                                   overwritten by send_umode() */
 }
 
-/*
- * Send the MODE string for user (user) to connection cptr
- * -avalon
+/** Send a mode change string for \a sptr to \a cptr.
+ * @param[in] cptr Destination of mode change message.
+ * @param[in] sptr User whose mode has changed.
+ * @param[in] old Pre-change set of modes for \a sptr.
+ * @param[in] sendset One of ALL_UMODES, SEND_UMODES_BUT_OPER,
+ * SEND_UMODES, to select which changed user modes to send.
  */
-void send_umode(aClient *cptr, aClient *sptr, int old, int sendmask)
+void send_umode(struct Client *cptr, struct Client *sptr, struct Flags *old,
+                int sendset)
 {
-  Reg1 int *s, flag;
-  Reg2 char *m;
+  int i;
+  int flag;
+  char *m;
   int what = MODE_NULL;
 
   /*
-   * Build a string in umode_buf to represent the change in the user's
-   * mode between the new (sptr->flag) and 'old'.
+   * Build a string in umodeBuf to represent the change in the user's
+   * mode between the new (cli_flags(sptr)) and 'old', but skipping
+   * the modes indicated by sendset.
    */
-  m = umode_buf;
+  m = umodeBuf;
   *m = '\0';
-  for (s = user_modes; (flag = *s); s += 2)
+  for (i = 0; i < USERMODELIST_SIZE; ++i)
   {
-    if (MyUser(sptr) && !(flag & sendmask))
+    flag = userModeList[i].flag;
+    if (FlagHas(old, flag)
+        == HasFlag(sptr, flag))
       continue;
-    if ((flag & old) && !(sptr->flags & flag))
+    switch (sendset)
+    {
+    case ALL_UMODES:
+      break;
+    case SEND_UMODES_BUT_OPER:
+      if (flag == FLAG_OPER)
+        continue;
+      /* and fall through */
+    case SEND_UMODES:
+      if (flag < FLAG_GLOBAL_UMODES)
+        continue;
+      break;      
+    }
+    if (FlagHas(old, flag))
     {
       if (what == MODE_DEL)
-       *m++ = *(s + 1);
+        *m++ = userModeList[i].c;
       else
       {
-       what = MODE_DEL;
-       *m++ = '-';
-       *m++ = *(s + 1);
+        what = MODE_DEL;
+        *m++ = '-';
+        *m++ = userModeList[i].c;
       }
     }
-    else if (!(flag & old) && (sptr->flags & flag))
+    else /* !FlagHas(old, flag) */
     {
       if (what == MODE_ADD)
-       *m++ = *(s + 1);
+        *m++ = userModeList[i].c;
       else
       {
-       what = MODE_ADD;
-       *m++ = '+';
-       *m++ = *(s + 1);
+        what = MODE_ADD;
+        *m++ = '+';
+        *m++ = userModeList[i].c;
       }
     }
   }
   *m = '\0';
-  if (*umode_buf && cptr)
-    sendto_one(cptr, ":%s MODE %s :%s", sptr->name, sptr->name, umode_buf);
+  if (*umodeBuf && cptr)
+    sendcmdto_one(sptr, CMD_MODE, cptr, "%s :%s", cli_name(sptr), umodeBuf);
 }
 
-/*
+/**
  * Check to see if this resembles a sno_mask.  It is if 1) there is
  * at least one digit and 2) The first digit occurs before the first
  * alphabetic character.
+ * @param[in] word Word to check for sno_mask-ness.
+ * @return Non-zero if \a word looks like a server notice mask; zero if not.
  */
 int is_snomask(char *word)
 {
   if (word)
   {
     for (; *word; word++)
-      if (isDigit(*word))
-       return 1;
-      else if (isAlpha(*word))
-       return 0;
+      if (IsDigit(*word))
+        return 1;
+      else if (IsAlpha(*word))
+        return 0;
   }
   return 0;
 }
 
-/*
- * If it begins with a +, count this as an additive mask instead of just
- * a replacement.  If what == MODE_DEL, "+" has no special effect.
+/** Update snomask \a oldmask according to \a arg and \a what.
+ * @param[in] oldmask Original user mask.
+ * @param[in] arg Update string (either a number or '+'/'-' followed by a number).
+ * @param[in] what MODE_ADD if adding the mask.
+ * @return New value of service notice mask.
  */
-snomask_t umode_make_snomask(snomask_t oldmask, char *arg, int what)
+unsigned int umode_make_snomask(unsigned int oldmask, char *arg, int what)
 {
-  snomask_t sno_what;
-  snomask_t newmask;
+  unsigned int sno_what;
+  unsigned int newmask;
   if (*arg == '+')
   {
     arg++;
@@ -2733,7 +1378,7 @@ snomask_t umode_make_snomask(snomask_t oldmask, char *arg, int what)
   else
     sno_what = (what == MODE_ADD) ? SNO_SET : SNO_DEL;
   /* pity we don't have strtoul everywhere */
-  newmask = (snomask_t)atoi(arg);
+  newmask = (unsigned int)atoi(arg);
   if (sno_what == SNO_DEL)
     newmask = oldmask & ~newmask;
   else if (sno_what == SNO_ADD)
@@ -2741,261 +1386,136 @@ snomask_t umode_make_snomask(snomask_t oldmask, char *arg, int what)
   return newmask;
 }
 
-/*
- * This function sets a Client's server notices mask, according to
- * the parameter 'what'.  This could be even faster, but the code
- * gets mighty hard to read :)
+/** Remove \a cptr from the singly linked list \a list.
+ * @param[in] cptr Client to remove from list.
+ * @param[in,out] list Pointer to head of list containing \a cptr.
+ */
+static void delfrom_list(struct Client *cptr, struct SLink **list)
+{
+  struct SLink* tmp;
+  struct SLink* prv = NULL;
+
+  for (tmp = *list; tmp; tmp = tmp->next) {
+    if (tmp->value.cptr == cptr) {
+      if (prv)
+        prv->next = tmp->next;
+      else
+        *list = tmp->next;
+      free_link(tmp);
+      break;
+    }
+    prv = tmp;
+  }
+}
+
+/** Set \a cptr's server notice mask, according to \a what.
+ * @param[in,out] cptr Client whose snomask is updating.
+ * @param[in] newmask Base value for new snomask.
+ * @param[in] what One of SNO_ADD, SNO_DEL, SNO_SET, to choose operation.
  */
-void delfrom_list(aClient *, Link **);
-void set_snomask(aClient *cptr, snomask_t newmask, int what)
+void set_snomask(struct Client *cptr, unsigned int newmask, int what)
 {
-  snomask_t oldmask, diffmask; /* unsigned please */
+  unsigned int oldmask, diffmask;        /* unsigned please */
   int i;
-  Link *tmp;
+  struct SLink *tmp;
 
-  oldmask = cptr->snomask;
+  oldmask = cli_snomask(cptr);
 
   if (what == SNO_ADD)
     newmask |= oldmask;
   else if (what == SNO_DEL)
     newmask = oldmask & ~newmask;
-  else if (what != SNO_SET)    /* absolute set, no math needed */
-    sendto_ops("setsnomask called with %d ?!", what);
+  else if (what != SNO_SET)        /* absolute set, no math needed */
+    sendto_opmask_butone(0, SNO_OLDSNO, "setsnomask called with %d ?!", what);
 
   newmask &= (IsAnOper(cptr) ? SNO_ALL : SNO_USER);
 
   diffmask = oldmask ^ newmask;
 
-  for (i = 0; diffmask >> i; i++)
+  for (i = 0; diffmask >> i; i++) {
     if (((diffmask >> i) & 1))
     {
       if (((newmask >> i) & 1))
       {
-       tmp = make_link();
-       tmp->next = opsarray[i];
-       tmp->value.cptr = cptr;
-       opsarray[i] = tmp;
+        tmp = make_link();
+        tmp->next = opsarray[i];
+        tmp->value.cptr = cptr;
+        opsarray[i] = tmp;
       }
       else
-       /* not real portable :( */
-       delfrom_list(cptr, &opsarray[i]);
-    }
-  cptr->snomask = newmask;
-}
-
-void delfrom_list(aClient *cptr, Link **list)
-{
-  Link *tmp, *prv = NULL;
-  for (tmp = *list; tmp; tmp = tmp->next)
-  {
-    if (tmp->value.cptr == cptr)
-    {
-      if (prv)
-       prv->next = tmp->next;
-      else
-       *list = tmp->next;
-      free_link(tmp);
-      break;
+        /* not real portable :( */
+        delfrom_list(cptr, &opsarray[i]);
     }
-    prv = tmp;
   }
+  cli_snomask(cptr) = newmask;
 }
 
-/*
- * is_silenced : Does the actual check wether sptr is allowed
- *               to send a message to acptr.
- *               Both must be registered persons.
- * If sptr is silenced by acptr, his message should not be propagated,
- * but more over, if this is detected on a server not local to sptr
- * the SILENCE mask is sent upstream.
+/** Check whether \a sptr is allowed to send a message to \a acptr.
+ * If \a sptr is a remote user, it means some server has an outdated
+ * SILENCE list for \a acptr, so send the missing SILENCE mask(s) back
+ * in the direction of \a sptr.  Skip the check if \a sptr is a server.
+ * @param[in] sptr Client trying to send a message.
+ * @param[in] acptr Destination of message.
+ * @return Non-zero if \a sptr is SILENCEd by \a acptr, zero if not.
  */
-int is_silenced(aClient *sptr, aClient *acptr)
+int is_silenced(struct Client *sptr, struct Client *acptr)
 {
-  Reg1 Link *lp;
-  Reg2 anUser *user;
-  static char sender[HOSTLEN + NICKLEN + USERLEN + 5];
-  static char senderip[16 + NICKLEN + USERLEN + 5];
+  struct Ban *found;
+  struct User *user;
+  size_t buf_used, slen;
+  char buf[BUFSIZE];
 
-  if (!(acptr->user) || !(lp = acptr->user->silence) || !(user = sptr->user))
+  if (IsServer(sptr) || !(user = cli_user(acptr))
+      || !(found = find_ban(sptr, user->silence)))
     return 0;
-  sprintf_irc(sender, "%s!%s@%s", sptr->name, user->username, user->host);
-  sprintf_irc(senderip, "%s!%s@%s", sptr->name, user->username,
-      inetntoa(sptr->ip));
-  for (; lp; lp = lp->next)
-  {
-    if ((!(lp->flags & CHFL_SILENCE_IPMASK) && !match(lp->value.cp, sender)) ||
-       ((lp->flags & CHFL_SILENCE_IPMASK) && !match(lp->value.cp, senderip)))
-    {
-      if (!MyConnect(sptr))
-      {
-       if (Protocol(sptr->from) < 10)
-         sendto_one(sptr->from, ":%s SILENCE %s %s", acptr->name,
-             sptr->name, lp->value.cp);
-       else
-         sendto_one(sptr->from, ":%s SILENCE %s%s %s", acptr->name,
-             NumNick(sptr), lp->value.cp);
+  assert(!(found->flags & BAN_EXCEPTION));
+  if (!MyConnect(sptr)) {
+    /* Buffer positive silence to send back. */
+    buf_used = strlen(found->banstr);
+    memcpy(buf, found->banstr, buf_used);
+    /* Add exceptions to buffer. */
+    for (found = user->silence; found; found = found->next) {
+      if (!(found->flags & BAN_EXCEPTION))
+        continue;
+      slen = strlen(found->banstr);
+      if (buf_used + slen + 4 > 400) {
+        buf[buf_used] = '\0';
+        sendcmdto_one(acptr, CMD_SILENCE, cli_from(sptr), "%C %s", sptr, buf);
+        buf_used = 0;
       }
-      return 1;
-    }
-  }
-  return 0;
-}
-
-/*
- * del_silence
- *
- * Removes all silence masks from the list of sptr that fall within `mask'
- * Returns -1 if none where found, 0 otherwise.
- */
-int del_silence(aClient *sptr, char *mask)
-{
-  Reg1 Link **lp;
-  Reg2 Link *tmp;
-  int ret = -1;
-
-  for (lp = &sptr->user->silence; *lp;)
-    if (!mmatch(mask, (*lp)->value.cp))
-    {
-      tmp = *lp;
-      *lp = tmp->next;
-      RunFree(tmp->value.cp);
-      free_link(tmp);
-      ret = 0;
-    }
-    else
-      lp = &(*lp)->next;
-
-  return ret;
-}
-
-static int add_silence(aClient *sptr, char *mask)
-{
-  Reg1 Link *lp, **lpp;
-  Reg3 int cnt = 0, len = strlen(mask);
-  char *ip_start;
-
-  for (lpp = &sptr->user->silence, lp = *lpp; lp;)
-  {
-    if (!strCasediff(mask, lp->value.cp))
-      return -1;
-    if (!mmatch(mask, lp->value.cp))
-    {
-      Link *tmp = lp;
-      *lpp = lp = lp->next;
-      RunFree(tmp->value.cp);
-      free_link(tmp);
-      continue;
+      if (buf_used)
+        buf[buf_used++] = ',';
+      buf[buf_used++] = '+';
+      buf[buf_used++] = '~';
+      memcpy(buf + buf_used, found->banstr, slen);
+      buf_used += slen;
     }
-    if (MyUser(sptr))
-    {
-      len += strlen(lp->value.cp);
-      if ((len > MAXSILELENGTH) || (++cnt >= MAXSILES))
-      {
-       sendto_one(sptr, err_str(ERR_SILELISTFULL), me.name, sptr->name, mask);
-       return -1;
-      }
-      else if (!mmatch(lp->value.cp, mask))
-       return -1;
+    /* Flush silence buffer. */
+    if (buf_used) {
+      buf[buf_used] = '\0';
+      sendcmdto_one(acptr, CMD_SILENCE, cli_from(sptr), "%C %s", sptr, buf);
+      buf_used = 0;
     }
-    lpp = &lp->next;
-    lp = *lpp;
   }
-  lp = make_link();
-  memset(lp, 0, sizeof(Link));
-  lp->next = sptr->user->silence;
-  lp->value.cp = (char *)RunMalloc(strlen(mask) + 1);
-  strcpy(lp->value.cp, mask);
-  if ((ip_start = strrchr(mask, '@')) && check_if_ipmask(ip_start + 1))
-    lp->flags = CHFL_SILENCE_IPMASK;
-  sptr->user->silence = lp;
-  return 0;
+  return 1;
 }
 
-/*
- * m_silence() - Added 19 May 1994 by Run.
- *
- *   parv[0] = sender prefix
- * From local client:
- *   parv[1] = mask (NULL sends the list)
- * From remote client:
- *   parv[1] = Numeric nick that must be silenced
- *   parv[2] = mask
+/** Send RPL_ISUPPORT lines to \a cptr.
+ * @param[in] cptr Client to send ISUPPORT to.
+ * @return Zero.
  */
-int m_silence(aClient *cptr, aClient *sptr, int parc, char *parv[])
+int
+send_supported(struct Client *cptr)
 {
-  Link *lp;
-  aClient *acptr;
-  char c, *cp;
+  char featurebuf[512];
 
-  if (MyUser(sptr))
-  {
-    acptr = sptr;
-    if (parc < 2 || *parv[1] == '\0' || (acptr = FindUser(parv[1])))
-    {
-      if (!(acptr->user))
-       return 0;
-      for (lp = acptr->user->silence; lp; lp = lp->next)
-       sendto_one(sptr, rpl_str(RPL_SILELIST), me.name,
-           sptr->name, acptr->name, lp->value.cp);
-      sendto_one(sptr, rpl_str(RPL_ENDOFSILELIST), me.name, sptr->name,
-         acptr->name);
-      return 0;
-    }
-    cp = parv[1];
-    c = *cp;
-    if (c == '-' || c == '+')
-      cp++;
-    else if (!(strchr(cp, '@') || strchr(cp, '.') ||
-       strchr(cp, '!') || strchr(cp, '*')))
-    {
-      sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], parv[1]);
-      return -1;
-    }
-    else
-      c = '+';
-    cp = pretty_mask(cp);
-    if ((c == '-' && !del_silence(sptr, cp)) ||
-       (c != '-' && !add_silence(sptr, cp)))
-    {
-      sendto_prefix_one(sptr, sptr, ":%s SILENCE %c%s", parv[0], c, cp);
-      if (c == '-')
-       sendto_serv_butone(NULL, ":%s SILENCE * -%s", sptr->name, cp);
-    }
-  }
-  else if (parc < 3 || *parv[2] == '\0')
-  {
-    sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "SILENCE");
-    return -1;
-  }
-  else
-  {
-    if (Protocol(cptr) < 10)
-      acptr = FindClient(parv[1]);     /* In case of NOTE notice, parv[1] */
-    else if (parv[1][1])       /* can be a server */
-      acptr = findNUser(parv[1]);
-    else
-      acptr = FindNServer(parv[1]);
+  ircd_snprintf(0, featurebuf, sizeof(featurebuf), FEATURES1, FEATURESVALUES1);
+  send_reply(cptr, RPL_ISUPPORT, featurebuf);
+  ircd_snprintf(0, featurebuf, sizeof(featurebuf), FEATURES2, FEATURESVALUES2);
+  send_reply(cptr, RPL_ISUPPORT, featurebuf);
 
-    if (*parv[2] == '-')
-    {
-      if (!del_silence(sptr, parv[2] + 1))
-       sendto_serv_butone(cptr, ":%s SILENCE * %s", parv[0], parv[2]);
-    }
-    else
-    {
-      add_silence(sptr, parv[2]);
-      if (acptr && IsServer(acptr->from))
-      {
-       if (Protocol(acptr->from) < 10)
-         sendto_one(acptr, ":%s SILENCE %s %s", parv[0], acptr->name, parv[2]);
-       else if (IsServer(acptr))
-         sendto_one(acptr, ":%s SILENCE %s %s",
-             parv[0], NumServ(acptr), parv[2]);
-       else
-         sendto_one(acptr, ":%s SILENCE %s%s %s",
-             parv[0], NumNick(acptr), parv[2]);
-      }
-    }
-  }
-  return 0;
+  return 0; /* convenience return, if it's ever needed */
 }
+
+/* vim: shiftwidth=2 
+ */