Anope Stable Branch

git-svn-id: http://anope.svn.sourceforge.net/svnroot/anope/stable@1902 5417fbe8-f217-4b02-8779-1006273d7864

1 files changed, 1833 insertions, 0 deletions

diff --git a/src/protocol/shadowircd.c b/src/protocol/shadowircd.c
new file mode 100644
index 000000000..0061a538b
--- /dev/null
+++ b/src/protocol/shadowircd.c
@@ -0,0 +1,1833 @@
+/* ShadowIRCd functions
+ *
+ * (C) 2003-2008 Anope Team
+ * Contact us at info@anope.org
+ *
+ * Please read COPYING and README for furhter details.
+ *
+ * Based on the original code of Epona by Lara.
+ * Based on the original code of Services by Andy Church. 
+ * 
+ * Provided by the ShadowIRCd development group. See 
+ * http://www.shadowircd.net for details.
+ */
+
+#include "services.h"
+#include "pseudo.h"
+#include "shadowircd.h"
+
+IRCDVar myIrcd[] = {
+    {"ShadowIRCd 4.0+",         /* ircd name */
+     "+oiqSK",                  /* nickserv mode */
+     "+oiqSK",                  /* chanserv mode */
+     "+oiqSK",                  /* memoserv mode */
+     "+oiqSK",                  /* hostserv mode */
+     "+oiqSK",                  /* operserv mode */
+     "+oiqSK",                  /* botserv mode  */
+     "+oiqSK",                  /* helpserv mode */
+     "+oiqSK",                  /* Dev/Null mode */
+     "+oiqSK",                  /* Global mode   */
+     "+oiqSK",                  /* nickserv alias mode */
+     "+oiqSK",                  /* chanserv alias mode */
+     "+oiqSK",                  /* memoserv alias mode */
+     "+oiqSK",                  /* hostserv alias mode */
+     "+oiqSK",                  /* operserv alias mode */
+     "+oiqSK",                  /* botserv alias mode  */
+     "+oiqSK",                  /* helpserv alias mode */
+     "+oiqSK",                  /* Dev/Null alias mode */
+     "+oiqSK",                  /* Global alias mode   */
+     "+oiqSK",                  /* Used by BotServ Bots */
+     4,                         /* Chan Max Symbols     */
+     "-cimnprstvzAEFGKLNOPRSTV",        /* Modes to Remove */
+     "+o",                      /* Channel Umode used by Botserv bots */
+     1,                         /* SVSNICK */
+     1,                         /* Vhost  */
+     0,                         /* Has Owner */
+     NULL,                      /* Mode to set for an owner */
+     NULL,                      /* Mode to unset for an owner */
+     "+a",                      /* Mode to set for channel admin */
+     "-a",                      /* Mode to unset for channel admin */
+     "+e",                      /* Mode On Reg          */
+     NULL,                      /* Mode on ID for Roots */
+     NULL,                      /* Mode on ID for Admins */
+     NULL,                      /* Mode on ID for Opers */
+     "-e",                      /* Mode on UnReg        */
+     "-e",                      /* Mode on Nick Change  */
+     0,                         /* Supports SGlines     */
+     1,                         /* Supports SQlines     */
+     0,                         /* Supports SZlines     */
+     1,                         /* Supports Halfop +h   */
+     4,                         /* Number of server args */
+     0,                         /* Join 2 Set           */
+     0,                         /* Join 2 Message       */
+     1,                         /* Has exceptions +e    */
+     0,                         /* TS Topic Forward     */
+     0,                         /* TS Topci Backward    */
+     0,                         /* Protected Umode      */
+     1,                         /* Has Admin            */
+     1,                         /* Chan SQlines         */
+     1,                         /* Quit on Kill         */
+     0,                         /* SVSMODE unban        */
+     0,                         /* Has Protect          */
+     0,                         /* Reverse              */
+     1,                         /* Chan Reg             */
+     1,                         /* Channel Mode         */
+     1,                         /* vidents              */
+     0,                         /* svshold              */
+     0,                         /* time stamp on mode   */
+     0,                         /* NICKIP               */
+     1,                         /* UMODE                */
+     0,                         /* O:LINE               */
+     1,                         /* VHOST ON NICK        */
+     1,                         /* Change RealName      */
+     CMODE_K,                   /* No Knock             */
+     CMODE_A,                   /* Admin Only           */
+     DEFAULT_MLOCK,             /* Default MLOCK        */
+     UMODE_v,                   /* Vhost Mode           */
+     0,                         /* +f                   */
+     0,                         /* +L                   */
+     0,                         /* +f Mode                          */
+     0,                         /* +L Mode                              */
+     1,                         /* On nick change check if they could be identified */
+     0,                         /* No Knock requires +i */
+     NULL,                      /* CAPAB Chan Modes             */
+     0,                         /* We support TOKENS */
+     1,                         /* TOKENS are CASE inSensitive */
+     0,                         /* TIME STAMPS are BASE64 */
+     1,                         /* +I support */
+     0,                         /* SJOIN ban char */
+     0,                         /* SJOIN except char */
+     0,                         /* SJOIN invite char */
+     0,                         /* Can remove User Channel Modes with SVSMODE */
+     0,                         /* Sglines are not enforced until user reconnects */
+     "v",                       /* vhost char */
+     1,                         /* ts6 */
+     0,                         /* support helper umode */
+     0,                         /* p10 */
+     NULL,                      /* character set */
+     1,                         /* reports sync state */
+     0,                         /* CIDR channelbans */
+     }
+    ,
+    {NULL}
+};
+
+/* ShadowIRCd does not use CAPAB */
+IRCDCAPAB myIrcdcap[] = {
+    {
+     0,                         /* NOQUIT       */
+     0,                         /* TSMODE       */
+     0,                         /* UNCONNECT    */
+     0,                         /* NICKIP       */
+     0,                         /* SJOIN        */
+     0,                         /* ZIP          */
+     0,                         /* BURST        */
+     0,                         /* TS5          */
+     0,                         /* TS3          */
+     0,                         /* DKEY         */
+     0,                         /* PT4          */
+     0,                         /* SCS          */
+     0,                         /* QS           */
+     0,                         /* UID          */
+     0,                         /* KNOCK        */
+     0,                         /* CLIENT       */
+     0,                         /* IPV6         */
+     0,                         /* SSJ5         */
+     0,                         /* SN2          */
+     0,                         /* TOKEN        */
+     0,                         /* VHOST        */
+     0,                         /* SSJ3         */
+     0,                         /* NICK2        */
+     0,                         /* UMODE2       */
+     0,                         /* VL           */
+     0,                         /* TLKEXT       */
+     0,                         /* DODKEY       */
+     0,                         /* DOZIP        */
+     0, 0, 0}
+};
+
+void shadowircd_set_umode(User * user, int ac, char **av)
+{
+    int add = 1;                /* 1 if adding modes, 0 if deleting */
+    char *modes = av[0];
+
+    ac--;
+
+    if (debug)
+        alog("debug: Changing mode for %s to %s", user->nick, modes);
+
+    while (*modes) {
+
+        /* This looks better, much better than "add ? (do_add) : (do_remove)".
+         * At least this is readable without paying much attention :) -GD
+         */
+        if (add)
+            user->mode |= umodes[(int) *modes];
+        else
+            user->mode &= ~umodes[(int) *modes];
+
+        switch (*modes++) {
+        case '+':
+            add = 1;
+            break;
+        case '-':
+            add = 0;
+            break;
+        case 'o':
+            if (add) {
+                opcnt++;
+
+                if (WallOper)
+                    anope_cmd_global(s_OperServ,
+                                     "\2%s\2 is now an IRC operator.",
+                                     user->nick);
+                display_news(user, NEWS_OPER);
+
+            } else {
+                opcnt--;
+            }
+            break;
+        }
+    }
+}
+
+unsigned long umodes[128] = {
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused, Unused, Horzontal Tab */
+    0, 0, 0,                    /* Line Feed, Unused, Unused */
+    0, 0, 0,                    /* Carriage Return, Unused, Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused */
+    0, 0, 0,                    /* Unused, Unused, Space */
+    0, 0, 0,                    /* ! " #  */
+    0, 0, 0,                    /* $ % &  */
+    0, 0, 0,                    /* ! ( )  */
+    0, 0, 0,                    /* * + ,  */
+    0, 0, 0,                    /* - . /  */
+    0, 0,                       /* 0 1 */
+    0, 0,                       /* 2 3 */
+    0, 0,                       /* 4 5 */
+    0, 0,                       /* 6 7 */
+    0, 0,                       /* 8 9 */
+    0, 0,                       /* : ; */
+    0, 0, 0,                    /* < = > */
+    0, 0,                       /* ? @ */
+    UMODE_A, 0, 0,              /* A B C */
+    0, UMODE_E, 0,              /* D E F */
+    UMODE_G, 0, 0,              /* G H I */
+    0, 0, 0,                    /* J K L */
+    0, 0, UMODE_O,              /* M N O */
+    0, 0, UMODE_R,              /* P Q R */
+    0, 0, 0,                    /* S T U */
+    0, 0, 0,                    /* V W X */
+    0,                          /* Y */
+    0,                          /* Z */
+    0, 0, 0,                    /* [ \ ] */
+    0, 0, 0,                    /* ^ _ ` */
+    UMODE_a, UMODE_b, 0,        /* a b c */
+    UMODE_d, UMODE_e, 0,        /* d e f */
+    UMODE_g, 0, UMODE_i,              /* g h i */
+    0, 0, UMODE_l,              /* j k l */
+    0, UMODE_n, UMODE_o,  /* m n o */
+    0, 0, 0,                    /* p q r */
+    0, 0, UMODE_u,              /* s t u */
+    UMODE_v, UMODE_w, UMODE_x,  /* v w x */
+    0,                          /* y */
+    0,                          /* z */
+    0, 0, 0,                    /* { | } */
+    0, 0                        /* ~ � */
+};
+
+
+char myCsmodes[128] = {
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+
+    0,
+    'a',
+    0, 0, 0,
+    'h',
+    0, 0, 0, 0,
+    0,
+
+    'v', 0, 0, 0, 0,
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+
+    'o', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
+};
+
+CMMode myCmmodes[128] = {
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL},     /* BCD */
+    {NULL}, {NULL}, {NULL},     /* EFG */
+    {NULL},                     /* H */
+    {add_invite, del_invite},
+    {NULL},                     /* J */
+    {NULL}, {NULL}, {NULL},     /* KLM */
+    {NULL}, {NULL}, {NULL},     /* NOP */
+    {NULL}, {NULL}, {NULL},     /* QRS */
+    {NULL}, {NULL}, {NULL},     /* TUV */
+    {NULL}, {NULL}, {NULL},     /* WXY */
+    {NULL},                     /* Z */
+    {NULL}, {NULL},             /* (char 91 - 92) */
+    {NULL}, {NULL}, {NULL},     /* (char 93 - 95) */
+    {NULL},                     /* ` (char 96) */
+    {NULL},                     /* a (char 97) */
+    {add_ban, del_ban},
+    {NULL},
+    {NULL},
+    {add_exception, del_exception},
+    {NULL},
+    {NULL},
+    {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL},
+    {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}, {NULL}
+};
+
+
+CBMode myCbmodes[128] = {
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0},
+    {CMODE_A, 0, NULL, NULL},   /* A */
+    {0},                        /* B */
+    {0},                        /* C */
+    {0},                        /* D */
+    {CMODE_E, 0, NULL, NULL},   /* E */
+    {CMODE_F, 0, NULL, NULL},   /* F */
+    {CMODE_G, 0, NULL, NULL},   /* G */
+    {0},                        /* H */
+    {0},                        /* I */
+    {0},                        /* J */
+    {CMODE_K, 0, NULL, NULL},   /* K */
+    {CMODE_L, 0, NULL, NULL},   /* L */
+    {0},                        /* M */
+    {CMODE_N, 0, NULL, NULL},   /* N */
+    {CMODE_O, 0, NULL, NULL},   /* O */
+    {CMODE_P, 0, NULL, NULL},   /* P */
+    {0},                        /* Q */
+    {CMODE_R, 0, NULL, NULL},   /* R */
+    {CMODE_S, 0, NULL, NULL},   /* S */
+    {CMODE_T, 0, NULL, NULL},   /* T */
+    {0},                        /* U */
+    {CMODE_V, 0, NULL, NULL},   /* V */
+    {0},                        /* W */
+    {0},                        /* X */
+    {0},                        /* Y */
+    {0},                        /* Z */
+    {0}, {0}, {0}, {0}, {0}, {0},
+    {0},
+    {0},                        /* b */
+    {CMODE_c, 0, NULL, NULL},
+    {0},                        /* d */
+    {0},                        /* e */
+    {0},                        /* f */
+    {0},                        /* g */
+    {0},                        /* h */
+    {CMODE_i, 0, NULL, NULL},
+    {0},                        /* j */
+    {CMODE_k, 0, chan_set_key, cs_set_key},
+    {CMODE_l, CBM_MINUS_NO_ARG, set_limit, cs_set_limit},
+    {CMODE_m, 0, NULL, NULL},
+    {CMODE_n, 0, NULL, NULL},
+    {0},                        /* o */
+    {CMODE_p, 0, NULL, NULL},
+    {0},                        /* q */
+    {CMODE_r, 0, NULL, NULL},
+    {CMODE_s, 0, NULL, NULL},
+    {CMODE_t, 0, NULL, NULL},
+    {0},
+    {0},                        /* v */
+    {0},                        /* w */
+    {0},                        /* x */
+    {0},                        /* y */
+    {CMODE_z, 0, NULL, NULL},   /* z */
+    {0}, {0}, {0}, {0}
+};
+
+CBModeInfo myCbmodeinfos[] = {
+    {'c', CMODE_c, 0, NULL, NULL},
+    {'i', CMODE_i, 0, NULL, NULL},
+    {'k', CMODE_k, 0, get_key, cs_get_key},
+    {'l', CMODE_l, CBM_MINUS_NO_ARG, get_limit, cs_get_limit},
+    {'m', CMODE_m, 0, NULL, NULL},
+    {'n', CMODE_n, 0, NULL, NULL},
+    {'p', CMODE_p, 0, NULL, NULL},
+    {'r', CMODE_r, 0, NULL, NULL},
+    {'s', CMODE_s, 0, NULL, NULL},
+    {'t', CMODE_t, 0, NULL, NULL},
+    {'z', CMODE_z, 0, NULL, NULL},
+    {'A', CMODE_A, 0, NULL, NULL},
+    {'E', CMODE_E, 0, NULL, NULL},
+    {'F', CMODE_F, 0, NULL, NULL},
+    {'G', CMODE_G, 0, NULL, NULL},
+    {'K', CMODE_K, 0, NULL, NULL},
+    {'L', CMODE_L, 0, NULL, NULL},
+    {'N', CMODE_N, 0, NULL, NULL},
+    {'O', CMODE_O, 0, NULL, NULL},
+    {'P', CMODE_P, 0, NULL, NULL},
+    {'S', CMODE_S, 0, NULL, NULL},
+    {'T', CMODE_T, 0, NULL, NULL},
+    {'V', CMODE_V, 0, NULL, NULL},
+    {0}
+};
+
+
+CUMode myCumodes[128] = {
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+    {0}, {0}, {0}, {0}, {0}, {0}, {0}, {0},
+
+    {0},
+
+    {CUS_PROTECT, CUF_PROTECT_BOTSERV, check_valid_admin},      /* a */
+    {0},                        /* b */
+    {0},                        /* c */
+    {0},                        /* d */
+    {0},                        /* e */
+    {0},                        /* f */
+    {0},                        /* g */
+    {CUS_HALFOP, 0, check_valid_op},
+    {0},                        /* i */
+    {0},                        /* j */
+    {0},                        /* k */
+    {0},                        /* l */
+    {0},                        /* m */
+    {0},                        /* n */
+    {CUS_OP, CUF_PROTECT_BOTSERV, check_valid_op},
+    {0},                        /* p */
+    {0},                        /* q */
+    {0},                        /* r */
+    {0},                        /* s */
+    {0},                        /* t */
+    {0},                        /* u */
+    {CUS_VOICE, 0, NULL},
+    {0},                        /* w */
+    {0},                        /* x */
+    {0},                        /* y */
+    {0},                        /* z */
+    {0}, {0}, {0}, {0}, {0}
+};
+
+
+
+void shadowircd_cmd_notice(char *source, char *dest, char *buf)
+{
+    Uid *ud;
+    User *u;
+
+    if (!buf) {
+        return;
+    }
+
+    if (NSDefFlags & NI_MSG) {
+        shadowircd_cmd_privmsg2(source, dest, buf);
+    } else {
+        ud = find_uid(source);
+        u = finduser(dest);
+        send_cmd((ud ? ud->uid : source), "NOTICE %s :%s",
+                 (u ? u->uid : dest), buf);
+    }
+}
+
+void shadowircd_cmd_notice2(char *source, char *dest, char *msg)
+{
+    Uid *ud;
+    User *u;
+
+    ud = find_uid(source);
+    u = finduser(dest);
+    send_cmd((ud ? ud->uid : source), "NOTICE %s :%s", (u ? u->uid : dest),
+             msg);
+}
+
+void shadowircd_cmd_privmsg(char *source, char *dest, char *buf)
+{
+    Uid *ud, *ud2;
+
+    if (!buf) {
+        return;
+    }
+    ud = find_uid(source);
+    ud2 = find_uid(dest);
+
+    send_cmd((ud ? ud->uid : source), "PRIVMSG %s :%s",
+             (ud2 ? ud2->uid : dest), buf);
+}
+
+void shadowircd_cmd_privmsg2(char *source, char *dest, char *msg)
+{
+    Uid *ud, *ud2;
+
+    ud = find_uid(source);
+    ud2 = find_uid(dest);
+
+    send_cmd((ud ? ud->uid : source), "PRIVMSG %s :%s",
+             (ud2 ? ud2->uid : dest), msg);
+}
+
+void shadowircd_cmd_serv_notice(char *source, char *dest, char *msg)
+{
+    send_cmd(source, "NOTICE $$%s :%s", dest, msg);
+}
+
+void shadowircd_cmd_serv_privmsg(char *source, char *dest, char *msg)
+{
+    send_cmd(source, "PRIVMSG $$%s :%s", dest, msg);
+}
+
+
+void shadowircd_cmd_global(char *source, char *buf)
+{
+    Uid *u;
+
+    if (!buf) {
+        return;
+    }
+
+    if (source) {
+        u = find_uid(source);
+        if (u) {
+            send_cmd((u ? u->uid : source), "OPERWALL :%s", buf);
+        } else {
+            send_cmd(TS6SID, "OPERWALL :%s", buf);
+        }
+    } else {
+        send_cmd(TS6SID, "OPERWALL :%s", buf);
+    }
+}
+
+/* GLOBOPS - to handle old WALLOPS */
+void shadowircd_cmd_global_legacy(char *source, char *fmt)
+{
+    Uid *u;
+
+    if (source) {
+        u = find_uid(source);
+        if (u) {
+            send_cmd((u ? u->uid : source), "OPERWALL :%s", fmt);
+        } else {
+            send_cmd(TS6SID, "OPERWALL :%s", fmt);
+        }
+    } else {
+        send_cmd(TS6SID, "OPERWALL :%s", fmt);
+    }
+
+    send_cmd(source ? source : ServerName, "OPERWALL :%s", fmt);
+}
+
+int anope_event_sjoin(char *source, int ac, char **av)
+{
+    do_sjoin(source, ac, av);
+    return MOD_CONT;
+}
+
+/*
+   Non TS6
+
+   av[0] = nick
+   av[1] = hop
+   av[2] = ts
+   av[3] = modes
+   av[4] = user
+   av[5] = host
+   av[6] = server
+   av[7] = info
+
+   TS6
+   av[0] = nick
+   av[1] = hop
+   av[2] = ts
+   av[3] = modes
+   av[4] = user
+   av[5] = host
+   av[6] = IP
+   av[7] = UID
+   av[8] = vhost
+   av[9] = info
+
+*/
+int anope_event_nick(char *source, int ac, char **av)
+{
+    Server *s = NULL;
+    User *user, *u2;
+
+    if (ac == 10) {
+        s = findserver_uid(servlist, source);
+        /* Source is always the server */
+        *source = '\0';
+        user = do_nick(source, av[0], av[4], av[5], s->name, av[9],
+                       strtoul(av[2], NULL, 10), 0, 0, av[8], av[7]);
+        if (user) {
+            anope_set_umode(user, 1, &av[3]);
+        }
+    } else if (ac == 8) {
+        /* Changed use of s->name to av[6], as s will be NULL 
+         * if i can believe the above comments, this should be fine
+         * if anyone from shadowircd see's this, and its wrong, let
+         * me know? :)    
+         */
+        user = do_nick(source, av[0], av[4], av[5], av[6], av[7],
+                       strtoul(av[2], NULL, 10), 0, 0, NULL, NULL);
+        if (user) {
+            anope_set_umode(user, 1, &av[3]);
+        }
+    } else {
+        u2 = find_byuid(source);
+        do_nick((u2 ? u2->nick : source), av[0], NULL, NULL, NULL, NULL,
+                strtoul(av[1], NULL, 10), 0, 0, NULL, NULL);
+    }
+    return MOD_CONT;
+}
+
+
+int anope_event_chghost(char *source, int ac, char **av)
+{
+    User *u;
+
+    if (ac != 2)
+        return MOD_CONT;
+
+    u = find_byuid(av[0]);
+    if (!u) {
+        if (debug) {
+            alog("debug: CHGHOST for nonexistent user %s", av[0]);
+        }
+        return MOD_CONT;
+    }
+
+    change_user_host(u, av[1]);
+    return MOD_CONT;
+}
+
+int anope_event_topic(char *source, int ac, char **av)
+{
+    User *u;
+
+    if (ac == 4) {
+        do_topic(source, ac, av);
+    } else {
+        Channel *c = findchan(av[0]);
+        time_t topic_time = time(NULL);
+
+        if (!c) {
+            if (debug) {
+                alog("debug: TOPIC %s for nonexistent channel %s",
+                     merge_args(ac - 1, av + 1), av[0]);
+            }
+            return MOD_CONT;
+        }
+
+        if (check_topiclock(c, topic_time))
+            return MOD_CONT;
+
+        if (c->topic) {
+            free(c->topic);
+            c->topic = NULL;
+        }
+        if (ac > 1 && *av[1])
+            c->topic = sstrdup(av[1]);
+
+        u = find_byuid(source);
+        if (u) {
+            strscpy(c->topic_setter, u->nick, sizeof(c->topic_setter));
+        } else {
+            strscpy(c->topic_setter, source, sizeof(c->topic_setter));
+        }
+        c->topic_time = topic_time;
+
+        record_topic(av[0]);
+		
+		if (ac > 1 && *av[1])
+		    send_event(EVENT_TOPIC_UPDATED, 2, av[0], av[1]);
+		else
+		    send_event(EVENT_TOPIC_UPDATED, 2, av[0], "");
+    }
+    return MOD_CONT;
+}
+
+int anope_event_tburst(char *source, int ac, char **av)
+{
+    char *setter;
+    Channel *c;
+    time_t topic_time;
+
+    if (ac != 4) {
+        return MOD_CONT;
+    }
+
+    setter = myStrGetToken(av[2], '!', 0);
+
+    c = findchan(av[0]);
+    topic_time = strtol(av[1], NULL, 10);
+
+    if (!c) {
+        if (debug) {
+            alog("debug: TOPIC %s for nonexistent channel %s",
+                 merge_args(ac - 1, av + 1), av[0]);
+        }
+        if (setter)
+            free(setter);
+        return MOD_CONT;
+    }
+
+    if (check_topiclock(c, topic_time)) {
+        if (setter)
+            free(setter);
+        return MOD_CONT;
+    }
+
+    if (c->topic) {
+        free(c->topic);
+        c->topic = NULL;
+    }
+    if (ac > 1 && *av[3])
+        c->topic = sstrdup(av[3]);
+
+    strscpy(c->topic_setter, setter, sizeof(c->topic_setter));
+    c->topic_time = topic_time;
+
+    record_topic(av[0]);
+	
+	if (ac > 1 && *av[3])
+	    send_event(EVENT_TOPIC_UPDATED, 2, av[0], av[3]);
+	else
+	    send_event(EVENT_TOPIC_UPDATED, 2, av[0], "");
+			
+    if (setter)
+        free(setter);
+	
+    return MOD_CONT;
+}
+
+int anope_event_436(char *source, int ac, char **av)
+{
+    if (ac < 1)
+        return MOD_CONT;
+
+    m_nickcoll(av[0]);
+    return MOD_CONT;
+}
+
+
+/* *INDENT-OFF* */
+void moduleAddIRCDMsgs(void) 
+{
+    Message *m;
+    
+    updateProtectDetails("PROTECT","PROTECTME","protect","deprotect","AUTOPROTECT","+a","-a");
+
+    TS6SID = sstrdup(Numeric);
+    UseTS6 = 1;
+
+    m = createMessage("401",       anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("402",       anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("436",       anope_event_436); addCoreMessage(IRCD,m);
+    m = createMessage("AWAY",      anope_event_away); addCoreMessage(IRCD,m);
+    m = createMessage("INVITE",    anope_event_invite); addCoreMessage(IRCD,m);
+    m = createMessage("JOIN",      anope_event_join); addCoreMessage(IRCD,m);
+    m = createMessage("KICK",      anope_event_kick); addCoreMessage(IRCD,m);
+    m = createMessage("KILL",      anope_event_kill); addCoreMessage(IRCD,m);
+    m = createMessage("SVSKILL",   anope_event_kill); addCoreMessage(IRCD,m);
+    m = createMessage("MODE",      anope_event_mode); addCoreMessage(IRCD,m);
+    m = createMessage("TMODE",     anope_event_tmode); addCoreMessage(IRCD,m);
+    m = createMessage("MOTD",      anope_event_motd); addCoreMessage(IRCD,m);
+    m = createMessage("NICK",      anope_event_nick); addCoreMessage(IRCD,m);
+    m = createMessage("BMASK",     anope_event_bmask); addCoreMessage(IRCD,m);
+    m = createMessage("UID",       anope_event_nick); addCoreMessage(IRCD,m);
+    m = createMessage("NOTICE",    anope_event_notice); addCoreMessage(IRCD,m);
+    m = createMessage("PART",      anope_event_part); addCoreMessage(IRCD,m);
+    m = createMessage("PASS",      anope_event_pass); addCoreMessage(IRCD,m);
+    m = createMessage("PING",      anope_event_ping); addCoreMessage(IRCD,m);
+    m = createMessage("PRIVMSG",   anope_event_privmsg); addCoreMessage(IRCD,m);
+    m = createMessage("QUIT",      anope_event_quit); addCoreMessage(IRCD,m);
+    m = createMessage("SERVER",    anope_event_server); addCoreMessage(IRCD,m);
+    m = createMessage("SQUIT",     anope_event_squit); addCoreMessage(IRCD,m);
+    m = createMessage("TOPIC",     anope_event_topic); addCoreMessage(IRCD,m);
+    m = createMessage("TBURST",    anope_event_tburst); addCoreMessage(IRCD,m);
+    m = createMessage("USER",      anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("WALLOPS",   anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("WHOIS",     anope_event_whois); addCoreMessage(IRCD,m);
+    m = createMessage("SVSMODE",   anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("SVSNICK",   anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("CAPAB",     anope_event_capab); addCoreMessage(IRCD,m);
+    m = createMessage("SJOIN",     anope_event_sjoin); addCoreMessage(IRCD,m);
+    m = createMessage("SVINFO",    anope_event_svinfo); addCoreMessage(IRCD,m);
+    m = createMessage("ADMIN",     anope_event_admin); addCoreMessage(IRCD,m);
+    m = createMessage("ERROR",     anope_event_error); addCoreMessage(IRCD,m);
+    m = createMessage("421",       anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("ENCAP",     anope_event_null); addCoreMessage(IRCD,m);   
+    m = createMessage("SID",       anope_event_sid); addCoreMessage(IRCD,m);
+    m = createMessage("EOB",       anope_event_eos); addCoreMessage(IRCD,m);
+    m = createMessage("TSSYNC",    anope_event_null); addCoreMessage(IRCD,m);
+    m = createMessage("SVSCLOAK",    anope_event_chghost); addCoreMessage(IRCD,m);
+
+}
+
+/* *INDENT-ON* */
+
+
+void shadowircd_cmd_sqline(char *mask, char *reason)
+{
+    send_cmd(NULL, "RESV * %s :%s", mask, reason);
+}
+
+void shadowircd_cmd_unsgline(char *mask)
+{
+    /* Does not support */
+}
+
+void shadowircd_cmd_unszline(char *mask)
+{
+    /* Does not support */
+}
+
+void shadowircd_cmd_szline(char *mask, char *reason, char *whom)
+{
+    /* Does not support */
+}
+
+void shadowircd_cmd_svsnoop(char *server, int set)
+{
+    /* does not support */
+}
+
+void shadowircd_cmd_svsadmin(char *server, int set)
+{
+    shadowircd_cmd_svsnoop(server, set);
+}
+
+void shadowircd_cmd_sgline(char *mask, char *reason)
+{
+    /* does not support */
+}
+
+void shadowircd_cmd_remove_akill(char *user, char *host)
+{
+    Uid *ud;
+
+    ud = find_uid(s_OperServ);
+    send_cmd((ud ? ud->uid : s_OperServ), "UNKLINE * %s %s", user, host);
+}
+
+void shadowircd_cmd_topic(char *whosets, char *chan, char *whosetit,
+                          char *topic, time_t when)
+{
+    Uid *ud;
+
+    ud = find_uid(whosets);
+    send_cmd((ud ? ud->uid : whosets), "TOPIC %s %s %ld :%s", chan,
+             whosetit, (long int) when, topic);
+}
+
+void shadowircd_cmd_vhost_off(User * u)
+{
+    send_cmd(NULL, "MODE %s -v", (u->uid ? u->uid : u->nick));
+}
+
+void shadowircd_cmd_vhost_on(char *nick, char *vIdent, char *vhost)
+{
+    send_cmd(NULL, "SVSCLOAK %s %s", nick, vhost);
+
+    if (vIdent)
+        send_cmd(NULL, "SVSIDENT %s %s", nick, vIdent);
+}
+
+void shadowircd_cmd_unsqline(char *user)
+{
+    send_cmd(NULL, "UNRESV * %s", user);
+}
+
+void shadowircd_cmd_join(char *user, char *channel, time_t chantime)
+{
+    Uid *ud;
+
+    ud = find_uid(user);
+    send_cmd(NULL, "SJOIN %ld %s + :%s", (long int) chantime,
+             channel, (ud ? ud->uid : user));
+}
+
+/*
+oper:		the nick of the oper performing the kline
+target.server:	the server(s) this kline is destined for
+duration:	the duration if a tkline, 0 if permanent.
+user:		the 'user' portion of the kline
+host:		the 'host' portion of the kline
+reason:		the reason for the kline.
+*/
+
+void shadowircd_cmd_akill(char *user, char *host, char *who, time_t when,
+                          time_t expires, char *reason)
+{
+    Uid *ud;
+
+    ud = find_uid(s_OperServ);
+
+    send_cmd((ud ? ud->uid : s_OperServ), "KLINE * %ld %s %s :%s",
+             (long int) (expires - (long) time(NULL)), user, host, reason);
+}
+
+void shadowircd_cmd_svskill(char *source, char *user, char *buf)
+{
+    Uid *ud;
+
+    if (!buf) {
+        return;
+    }
+
+    if (!source || !user) {
+        return;
+    }
+
+    ud = find_uid(user);
+    send_cmd(NULL, "SVSKILL %s :%s", (ud ? ud->uid : user), buf);
+}
+
+void shadowircd_cmd_svsmode(User * u, int ac, char **av)
+{
+    send_cmd(TS6SID, "MODE %s %s", u->uid, av[0]);
+}
+
+void shadowircd_cmd_svsinfo()
+{
+    /* not used */
+}
+
+/*
+ * SVINFO
+ *      parv[0] = sender prefix
+ *      parv[1] = TS_CURRENT for the server
+ *      parv[2] = TS_MIN for the server
+ *      parv[3] = server is standalone or connected to non-TS only
+ *      parv[4] = server's idea of UTC time
+ */
+void shadowircd_cmd_svinfo()
+{
+    send_cmd(NULL, "SVINFO 6 3 0 :%ld", (long int) time(NULL));
+}
+
+void shadowircd_cmd_capab()
+{
+    /* ShadowIRCd does not use CAPAB */
+}
+
+/* PASS */
+void shadowircd_cmd_pass(char *pass)
+{
+    send_cmd(NULL, "PASS %s TS 6 %s", pass, TS6SID);
+}
+
+/* SERVER name protocol hop descript */
+void shadowircd_cmd_server(char *servname, int hop, char *descript)
+{
+    send_cmd(NULL, "SERVER %s %d %d :%s", servname, hop, PROTOCOL_REVISION,
+             descript);
+}
+
+
+void shadowircd_cmd_connect(int servernum)
+{
+    me_server =
+        new_server(NULL, ServerName, ServerDesc, SERVER_ISME, TS6SID);
+    if (servernum == 1)
+        shadowircd_cmd_pass(RemotePassword);
+    else if (servernum == 2)
+        shadowircd_cmd_pass(RemotePassword2);
+    else if (servernum == 3)
+        shadowircd_cmd_pass(RemotePassword3);
+
+    shadowircd_cmd_capab();
+    shadowircd_cmd_server(ServerName, 1, ServerDesc);
+    shadowircd_cmd_svinfo();
+}
+
+void shadowircd_cmd_bot_nick(char *nick, char *user, char *host,
+                             char *real, char *modes)
+{
+	char *uidbuf = ts6_uid_retrieve();
+	
+    EnforceQlinedNick(nick, NULL);
+    send_cmd(TS6SID, "UID %s 1 %ld %s %s %s 0.0.0.0 %s %s :%s", nick,
+             (long int) time(NULL), modes, user, host, uidbuf, host,
+             real);
+    new_uid(nick, uidbuf);
+    shadowircd_cmd_sqline(nick, "Reserved for services");
+}
+
+void shadowircd_cmd_part(char *nick, char *chan, char *buf)
+{
+    Uid *ud;
+
+    ud = find_uid(nick);
+
+    if (buf) {
+        send_cmd((ud ? ud->uid : nick), "PART %s :%s", chan, buf);
+    } else {
+        send_cmd((ud ? ud->uid : nick), "PART %s", chan);
+    }
+}
+
+int anope_event_ping(char *source, int ac, char **av)
+{
+    if (ac < 1)
+        return MOD_CONT;
+    shadowircd_cmd_pong(ac > 1 ? av[1] : ServerName, av[0]);
+    return MOD_CONT;
+}
+
+int anope_event_away(char *source, int ac, char **av)
+{
+    User *u = NULL;
+
+    u = find_byuid(source);
+
+    m_away(u->nick, (ac ? av[0] : NULL));
+    return MOD_CONT;
+}
+
+int anope_event_kill(char *source, int ac, char **av)
+{
+    if (ac != 2)
+        return MOD_CONT;
+
+    m_kill(av[0], av[1]);
+    return MOD_CONT;
+}
+
+int anope_event_kick(char *source, int ac, char **av)
+{
+    if (ac != 3)
+        return MOD_CONT;
+    do_kick(source, ac, av);
+    return MOD_CONT;
+}
+
+void shadowircd_cmd_eob()
+{
+    send_cmd(TS6SID, "EOB");
+}
+
+int anope_event_join(char *source, int ac, char **av)
+{
+    if (ac != 1) {
+        do_sjoin(source, ac, av);
+        return MOD_CONT;
+    } else {
+        do_join(source, ac, av);
+    }
+    return MOD_CONT;
+}
+
+int anope_event_motd(char *source, int ac, char **av)
+{
+    if (!source) {
+        return MOD_CONT;
+    }
+
+    m_motd(source);
+    return MOD_CONT;
+}
+
+int anope_event_privmsg(char *source, int ac, char **av)
+{
+    User *u;
+    Uid *ud;
+
+    if (ac != 2) {
+        return MOD_CONT;
+    }
+
+    u = find_byuid(source);
+    ud = find_nickuid(av[0]);
+
+    m_privmsg((u ? u->nick : source), (ud ? ud->nick : av[0]), av[1]);
+    return MOD_CONT;
+}
+
+int anope_event_part(char *source, int ac, char **av)
+{
+    User *u;
+
+    if (ac < 1 || ac > 2) {
+        return MOD_CONT;
+    }
+
+    u = find_byuid(source);
+    do_part(u->nick, ac, av);
+
+    return MOD_CONT;
+}
+
+int anope_event_whois(char *source, int ac, char **av)
+{
+    Uid *ud;
+
+    if (source && ac >= 1) {
+        ud = find_nickuid(av[0]);
+        m_whois(source, (ud ? ud->nick : source));
+    }
+    return MOD_CONT;
+}
+
+/* EVENT: SERVER */
+int anope_event_server(char *source, int ac, char **av)
+{
+    if (!stricmp(av[1], "1")) {
+        uplink = sstrdup(av[0]);
+        if (TS6UPLINK) {
+            do_server(source, av[0], av[1], av[2], TS6UPLINK);
+        } else {
+            do_server(source, av[0], av[1], av[2], NULL);
+        }
+    } else {
+        do_server(source, av[0], av[1], av[2], NULL);
+    }
+    return MOD_CONT;
+}
+
+int anope_event_sid(char *source, int ac, char **av)
+{
+    Server *s;
+
+    /* :42X SID trystan.nomadirc.net 2 43X :ircd-ratbox test server */
+
+    s = findserver_uid(servlist, source);
+    do_server(s->name, av[0], av[1], av[3], av[2]);
+    return MOD_CONT;
+}
+
+int anope_event_eos(char *source, int ac, char **av)
+{
+    Server *s;
+    s = findserver_uid(servlist, source);
+    /* If we found a server with the given source, that one just
+     * finished bursting. If there was no source, then our uplink
+     * server finished bursting. -GD
+     */
+    if (!s && serv_uplink)
+        s = serv_uplink;
+    finish_sync(s, 1);
+
+    return MOD_CONT;
+}
+
+int anope_event_squit(char *source, int ac, char **av)
+{
+    if (ac != 2)
+        return MOD_CONT;
+    do_squit(source, ac, av);
+    return MOD_CONT;
+}
+
+int anope_event_quit(char *source, int ac, char **av)
+{
+    User *u;
+
+    if (ac != 1) {
+        return MOD_CONT;
+    }
+
+    u = find_byuid(source);
+
+    do_quit(u->nick, ac, av);
+    return MOD_CONT;
+}
+
+void shadowircd_cmd_372(char *source, char *msg)
+{
+    send_cmd(TS6SID, "372 %s :- %s", source, msg);
+}
+
+void shadowircd_cmd_372_error(char *source)
+{
+    send_cmd(TS6SID,
+             "422 %s :- MOTD file not found!  Please "
+             "contact your IRC administrator.", source);
+}
+
+void shadowircd_cmd_375(char *source)
+{
+    send_cmd(TS6SID,
+             "375 %s :- %s Message of the Day", source, ServerName);
+}
+
+void shadowircd_cmd_376(char *source)
+{
+    send_cmd(TS6SID, "376 %s :End of /MOTD command.", source);
+}
+
+/* 391 */
+void shadowircd_cmd_391(char *source, char *timestr)
+{
+    if (!timestr) {
+        return;
+    }
+    send_cmd(NULL, "391 :%s %s :%s", source, ServerName, timestr);
+}
+
+/* 250 */
+void shadowircd_cmd_250(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "250 %s", buf);
+}
+
+/* 307 */
+void shadowircd_cmd_307(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(TS6SID, "307 %s", buf);
+}
+
+/* 311 */
+void shadowircd_cmd_311(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(TS6SID, "311 %s", buf);
+}
+
+/* 312 */
+void shadowircd_cmd_312(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(TS6SID, "312 %s", buf);
+}
+
+/* 317 */
+void shadowircd_cmd_317(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(TS6SID, "317 %s", buf);
+}
+
+/* 219 */
+void shadowircd_cmd_219(char *source, char *letter)
+{
+    if (!source) {
+        return;
+    }
+
+    if (letter) {
+        send_cmd(NULL, "219 %s %c :End of /STATS report.", source,
+                 *letter);
+    } else {
+        send_cmd(NULL, "219 %s l :End of /STATS report.", source);
+    }
+}
+
+/* 401 */
+void shadowircd_cmd_401(char *source, char *who)
+{
+    if (!source || !who) {
+        return;
+    }
+    send_cmd(TS6SID, "401 %s %s :No such service.", source, who);
+}
+
+/* 318 */
+void shadowircd_cmd_318(char *source, char *who)
+{
+    if (!source || !who) {
+        return;
+    }
+
+    send_cmd(TS6SID, "318 %s %s :End of /WHOIS list.", source, who);
+}
+
+/* 242 */
+void shadowircd_cmd_242(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "242 %s", buf);
+}
+
+/* 243 */
+void shadowircd_cmd_243(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "243 %s", buf);
+}
+
+/* 211 */
+void shadowircd_cmd_211(char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "211 %s", buf);
+}
+
+void shadowircd_cmd_mode(char *source, char *dest, char *buf)
+{
+    Uid *ud;
+    if (!buf) {
+        return;
+    }
+
+    if (source) {
+        ud = find_uid(source);
+        send_cmd((ud ? ud->uid : source), "MODE %s %s", dest, buf);
+    } else {
+        send_cmd(source, "MODE %s %s", dest, buf);
+    }
+}
+
+void shadowircd_cmd_tmode(char *source, char *dest, char *buf)
+{
+
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "MODE %s %s", dest, buf);
+}
+
+void shadowircd_cmd_nick(char *nick, char *name, char *mode)
+{
+	char *uidbuf = ts6_uid_retrieve();
+	
+    EnforceQlinedNick(nick, NULL);
+    send_cmd(TS6SID, "UID %s 1 %ld %s %s %s 0.0.0.0 %s %s :%s", nick,
+             (long int) time(NULL), mode, ServiceUser, ServiceHost,
+             uidbuf, ServiceHost, name);
+    new_uid(nick, uidbuf);
+    shadowircd_cmd_sqline(nick, "Reserved for services");
+}
+
+void shadowircd_cmd_kick(char *source, char *chan, char *user, char *buf)
+{
+    Uid *ud;
+    User *u;
+
+    ud = find_uid(source);
+    u = finduser(user);
+
+    if (buf) {
+        send_cmd((ud ? ud->uid : source), "KICK %s %s :%s", chan,
+                 (u ? u->uid : user), buf);
+    } else {
+        send_cmd((ud ? ud->uid : source), "KICK %s %s", chan,
+                 (u ? u->uid : user));
+    }
+}
+
+void shadowircd_cmd_notice_ops(char *source, char *dest, char *buf)
+{
+    if (!buf) {
+        return;
+    }
+
+    send_cmd(NULL, "NOTICE @%s :%s", dest, buf);
+}
+
+void shadowircd_cmd_bot_chan_mode(char *nick, char *chan)
+{
+    Uid *u;
+
+    u = find_uid(nick);
+    anope_cmd_mode(nick, chan, "%s %s", ircd->botchanumode,
+                   (u ? u->uid : nick));
+}
+
+/* QUIT */
+void shadowircd_cmd_quit(char *source, char *buf)
+{
+    Uid *ud;
+
+    ud = find_uid(source);
+
+    if (buf) {
+        send_cmd((ud ? ud->uid : source), "QUIT :%s", buf);
+    } else {
+        send_cmd((ud ? ud->uid : source), "QUIT");
+    }
+}
+
+/* PONG */
+void shadowircd_cmd_pong(char *servname, char *who)
+{
+    send_cmd(TS6SID, "PONG %s", who);
+}
+
+/* INVITE */
+void shadowircd_cmd_invite(char *source, char *chan, char *nick)
+{
+    Uid *ud;
+    User *u;
+
+    if (!source || !chan || !nick) {
+        return;
+    }
+
+    ud = find_uid(source);
+    u = finduser(nick);
+
+    send_cmd((ud ? ud->uid : source), "INVITE %s %s",
+             (u ? u->uid : nick), chan);
+}
+
+/* SQUIT */
+void shadowircd_cmd_squit(char *servname, char *message)
+{
+    if (!servname || !message) {
+        return;
+    }
+
+    send_cmd(NULL, "SQUIT %s :%s", servname, message);
+}
+
+int anope_event_mode(char *source, int ac, char **av)
+{
+    User *u, *u2;
+
+    if (ac < 2 || *av[0] == '&') {
+        return MOD_CONT;
+    }
+
+    if (*av[0] == '#') {
+        do_cmode(source, ac, av);
+    } else {
+        u = find_byuid(source);
+        u2 = find_byuid(av[0]);
+        av[0] = u2->nick;
+        do_umode2((u ? u->nick : source), ac, av);
+    }
+    return MOD_CONT;
+}
+
+int anope_event_tmode(char *source, int ac, char **av)
+{
+    if (*av[1] == '#' || *av[1] == '&') {
+        do_cmode(source, ac, av);
+    }
+    return MOD_CONT;
+}
+
+void shadowircd_cmd_351(char *source)
+{
+    send_cmd(TS6SID,
+             "351 %s Anope-%s %s :%s (ShadowProtocol %d) - %s (%s) -- %s",
+             source, version_number, ServerName, ircd->name,
+             PROTOCOL_REVISION, version_flags, EncModule, version_build);
+}
+
+/* Event: PROTOCTL */
+int anope_event_capab(char *source, int ac, char **av)
+{
+    /* Not supported by ShadowIRCd. */
+    return MOD_CONT;
+}
+
+/* SVSHOLD - set */
+void shadowircd_cmd_svshold(char *nick)
+{
+    /* Not supported by this IRCD */
+}
+
+/* SVSHOLD - release */
+void shadowircd_cmd_release_svshold(char *nick)
+{
+    /* Not Supported by this IRCD */
+}
+
+/* SVSNICK */
+void shadowircd_cmd_svsnick(char *nick, char *newnick, time_t when)
+{
+    if (!nick || !newnick) {
+        return;
+    }
+    send_cmd(NULL, "SVSNICK %s %s %ld", nick, newnick, (long int) when);
+}
+
+void shadowircd_cmd_guest_nick(char *nick, char *user, char *host,
+                               char *real, char *modes)
+{
+    /* not supported  */
+}
+
+void shadowircd_cmd_svso(char *source, char *nick, char *flag)
+{
+    /* Not Supported by this IRCD */
+}
+
+void shadowircd_cmd_unban(char *name, char *nick)
+{
+    /* Not Supported by this IRCD */
+}
+
+/* SVSMODE channel modes */
+
+void shadowircd_cmd_svsmode_chan(char *name, char *mode, char *nick)
+{
+    /* Not Supported by this IRCD */
+}
+
+/* SVSMODE +d */
+/* sent if svid is something weird */
+void shadowircd_cmd_svid_umode(char *nick, time_t ts)
+{
+    /* not supported */
+}
+
+/* SVSMODE +d */
+/* nc_change was = 1, and there is no na->status */
+void shadowircd_cmd_nc_change(User * u)
+{
+    /* not supported */
+}
+
+/* SVSMODE +d */
+void shadowircd_cmd_svid_umode2(User * u, char *ts)
+{
+    /* not supported */
+}
+
+void shadowircd_cmd_svid_umode3(User * u, char *ts)
+{
+    /* not used */
+}
+
+/* NICK <newnick>  */
+void shadowircd_cmd_chg_nick(char *oldnick, char *newnick)
+{
+    if (!oldnick || !newnick) {
+        return;
+    }
+
+    send_cmd(oldnick, "NICK %s", newnick);
+}
+
+/*
+ * SVINFO
+ *      parv[0] = sender prefix
+ *      parv[1] = TS_CURRENT for the server
+ *      parv[2] = TS_MIN for the server
+ *      parv[3] = server is standalone or connected to non-TS only
+ *      parv[4] = server's idea of UTC time
+ */
+int anope_event_svinfo(char *source, int ac, char **av)
+{
+    /* currently not used but removes the message : unknown message from server */
+    return MOD_CONT;
+}
+
+int anope_event_pass(char *source, int ac, char **av)
+{
+    TS6UPLINK = sstrdup(av[3]);
+    return MOD_CONT;
+}
+
+void shadowircd_cmd_svsjoin(char *source, char *nick, char *chan, char *param)
+{
+    /* Not Supported by this IRCD */
+}
+
+void shadowircd_cmd_svspart(char *source, char *nick, char *chan)
+{
+    /* Not Supported by this IRCD */
+}
+
+void shadowircd_cmd_swhois(char *source, char *who, char *mask)
+{
+    /* not supported */
+}
+
+int anope_event_notice(char *source, int ac, char **av)
+{
+    return MOD_CONT;
+}
+
+int anope_event_admin(char *source, int ac, char **av)
+{
+    return MOD_CONT;
+}
+
+int anope_event_invite(char *source, int ac, char **av)
+{
+    return MOD_CONT;
+}
+
+int anope_event_bmask(char *source, int ac, char **av)
+{
+    Channel *c;
+    char *bans;
+    char *b;
+    int count, i;
+
+    /* :42X BMASK 1106409026 #ircops b :*!*@*.aol.com */
+    /*             0          1      2   3            */
+    c = findchan(av[1]);
+
+    if (c) {
+        bans = sstrdup(av[3]);
+        count = myNumToken(bans, ' ');
+        for (i = 0; i <= count - 1; i++) {
+            b = myStrGetToken(bans, ' ', i);
+            if (!stricmp(av[2], "b")) {
+                add_ban(c, b);
+            }
+            if (!stricmp(av[2], "e")) {
+                add_exception(c, b);
+            }
+            if (!stricmp(av[2], "I")) {
+                add_invite(c, b);
+            }
+            if (b)
+                free(b);
+        }
+        free(bans);
+    }
+    return MOD_CONT;
+}
+
+int shadowircd_flood_mode_check(char *value)
+{
+    return 0;
+}
+
+int anope_event_error(char *source, int ac, char **av)
+{
+    if (ac >= 1) {
+        if (debug) {
+            alog("debug: %s", av[0]);
+        }
+    }
+    return MOD_CONT;
+}
+
+void shadowircd_cmd_jupe(char *jserver, char *who, char *reason)
+{
+    char rbuf[256];
+
+    snprintf(rbuf, sizeof(rbuf), "Juped by %s%s%s", who,
+             reason ? ": " : "", reason ? reason : "");
+
+    if (findserver(servlist, jserver))
+        shadowircd_cmd_squit(jserver, rbuf);
+    shadowircd_cmd_server(jserver, 2, rbuf);
+    new_server(me_server, jserver, rbuf, SERVER_JUPED, NULL);
+}
+
+/* 
+  1 = valid nick
+  0 = nick is in valid
+*/
+int shadowircd_valid_nick(char *nick)
+{
+    /* TS6 Save extension -Certus */
+    if (isdigit(*nick))
+        return 0;
+    return 1;
+}
+
+/* 
+  1 = valid chan
+  0 = chan is in valid
+*/
+int shadowircd_valid_chan(char *chan)
+{
+    /* no hard coded invalid chan */
+    return 1;
+}
+
+
+void shadowircd_cmd_ctcp(char *source, char *dest, char *buf)
+{
+    char *s;
+
+    if (!buf) {
+        return;
+    } else {
+        s = normalizeBuffer(buf);
+    }
+
+    send_cmd(source, "NOTICE %s :\1%s \1", dest, s);
+    free(s);
+}
+
+/**
+ * Tell anope which function we want to perform each task inside of anope.
+ * These prototypes must match what anope expects.
+ **/
+void moduleAddAnopeCmds()
+{
+    pmodule_cmd_svsnoop(shadowircd_cmd_svsnoop);
+    pmodule_cmd_remove_akill(shadowircd_cmd_remove_akill);
+    pmodule_cmd_topic(shadowircd_cmd_topic);
+    pmodule_cmd_vhost_off(shadowircd_cmd_vhost_off);
+    pmodule_cmd_akill(shadowircd_cmd_akill);
+    pmodule_cmd_svskill(shadowircd_cmd_svskill);
+    pmodule_cmd_svsmode(shadowircd_cmd_svsmode);
+    pmodule_cmd_372(shadowircd_cmd_372);
+    pmodule_cmd_372_error(shadowircd_cmd_372_error);
+    pmodule_cmd_375(shadowircd_cmd_375);
+    pmodule_cmd_376(shadowircd_cmd_376);
+    pmodule_cmd_nick(shadowircd_cmd_nick);
+    pmodule_cmd_guest_nick(shadowircd_cmd_guest_nick);
+    pmodule_cmd_mode(shadowircd_cmd_mode);
+    pmodule_cmd_bot_nick(shadowircd_cmd_bot_nick);
+    pmodule_cmd_kick(shadowircd_cmd_kick);
+    pmodule_cmd_notice_ops(shadowircd_cmd_notice_ops);
+    pmodule_cmd_notice(shadowircd_cmd_notice);
+    pmodule_cmd_notice2(shadowircd_cmd_notice2);
+    pmodule_cmd_privmsg(shadowircd_cmd_privmsg);
+    pmodule_cmd_privmsg2(shadowircd_cmd_privmsg2);
+    pmodule_cmd_serv_notice(shadowircd_cmd_serv_notice);
+    pmodule_cmd_serv_privmsg(shadowircd_cmd_serv_privmsg);
+    pmodule_cmd_bot_chan_mode(shadowircd_cmd_bot_chan_mode);
+    pmodule_cmd_351(shadowircd_cmd_351);
+    pmodule_cmd_quit(shadowircd_cmd_quit);
+    pmodule_cmd_pong(shadowircd_cmd_pong);
+    pmodule_cmd_join(shadowircd_cmd_join);
+    pmodule_cmd_unsqline(shadowircd_cmd_unsqline);
+    pmodule_cmd_invite(shadowircd_cmd_invite);
+    pmodule_cmd_part(shadowircd_cmd_part);
+    pmodule_cmd_391(shadowircd_cmd_391);
+    pmodule_cmd_250(shadowircd_cmd_250);
+    pmodule_cmd_307(shadowircd_cmd_307);
+    pmodule_cmd_311(shadowircd_cmd_311);
+    pmodule_cmd_312(shadowircd_cmd_312);
+    pmodule_cmd_317(shadowircd_cmd_317);
+    pmodule_cmd_219(shadowircd_cmd_219);
+    pmodule_cmd_401(shadowircd_cmd_401);
+    pmodule_cmd_318(shadowircd_cmd_318);
+    pmodule_cmd_242(shadowircd_cmd_242);
+    pmodule_cmd_243(shadowircd_cmd_243);
+    pmodule_cmd_211(shadowircd_cmd_211);
+    pmodule_cmd_global(shadowircd_cmd_global);
+    pmodule_cmd_global_legacy(shadowircd_cmd_global_legacy);
+    pmodule_cmd_sqline(shadowircd_cmd_sqline);
+    pmodule_cmd_squit(shadowircd_cmd_squit);
+    pmodule_cmd_svso(shadowircd_cmd_svso);
+    pmodule_cmd_chg_nick(shadowircd_cmd_chg_nick);
+    pmodule_cmd_svsnick(shadowircd_cmd_svsnick);
+    pmodule_cmd_vhost_on(shadowircd_cmd_vhost_on);
+    pmodule_cmd_connect(shadowircd_cmd_connect);
+    pmodule_cmd_svshold(shadowircd_cmd_svshold);
+    pmodule_cmd_release_svshold(shadowircd_cmd_release_svshold);
+    pmodule_cmd_unsgline(shadowircd_cmd_unsgline);
+    pmodule_cmd_unszline(shadowircd_cmd_unszline);
+    pmodule_cmd_szline(shadowircd_cmd_szline);
+    pmodule_cmd_sgline(shadowircd_cmd_sgline);
+    pmodule_cmd_unban(shadowircd_cmd_unban);
+    pmodule_cmd_svsmode_chan(shadowircd_cmd_svsmode_chan);
+    pmodule_cmd_svid_umode(shadowircd_cmd_svid_umode);
+    pmodule_cmd_nc_change(shadowircd_cmd_nc_change);
+    pmodule_cmd_svid_umode2(shadowircd_cmd_svid_umode2);
+    pmodule_cmd_svid_umode3(shadowircd_cmd_svid_umode3);
+    pmodule_cmd_svsjoin(shadowircd_cmd_svsjoin);
+    pmodule_cmd_svspart(shadowircd_cmd_svspart);
+    pmodule_cmd_swhois(shadowircd_cmd_swhois);
+    pmodule_cmd_eob(shadowircd_cmd_eob);
+    pmodule_flood_mode_check(shadowircd_flood_mode_check);
+    pmodule_cmd_jupe(shadowircd_cmd_jupe);
+    pmodule_valid_nick(shadowircd_valid_nick);
+    pmodule_valid_chan(shadowircd_valid_chan);
+    pmodule_cmd_ctcp(shadowircd_cmd_ctcp);
+    pmodule_set_umode(shadowircd_set_umode);
+}
+
+/**
+ * Now tell anope how to use us.
+ **/
+int AnopeInit(int argc, char **argv)
+{
+
+    moduleAddAuthor("Anope");
+    moduleAddVersion("$Id$");
+    moduleSetType(PROTOCOL);
+
+    pmodule_ircd_version("ShadowIRCd 4.0+");
+    pmodule_ircd_cap(myIrcdcap);
+    pmodule_ircd_var(myIrcd);
+    pmodule_ircd_cbmodeinfos(myCbmodeinfos);
+    pmodule_ircd_cumodes(myCumodes);
+    pmodule_ircd_flood_mode_char_set("");
+    pmodule_ircd_flood_mode_char_remove("");
+    pmodule_ircd_cbmodes(myCbmodes);
+    pmodule_ircd_cmmodes(myCmmodes);
+    pmodule_ircd_csmodes(myCsmodes);
+    pmodule_ircd_useTSMode(1);
+
+        /** Deal with modes anope _needs_ to know **/
+    pmodule_invis_umode(UMODE_i);
+    pmodule_oper_umode(UMODE_o);
+    pmodule_invite_cmode(CMODE_i);
+    pmodule_secret_cmode(CMODE_s);
+    pmodule_private_cmode(CMODE_p);
+    pmodule_key_mode(CMODE_k);
+    pmodule_limit_mode(CMODE_l);
+
+    moduleAddAnopeCmds();
+    moduleAddIRCDMsgs();
+
+    return MOD_CONT;
+}