These are (now) horribly out of date. When we're ready to implement what ones we need, we can grab them back out of SVN (or more likely just do them from scratch..)

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

1 files changed, 0 insertions, 1799 deletions

diff --git a/src/protocol/obsolete/ptlink.c b/src/protocol/obsolete/ptlink.c
deleted file mode 100644
index d65fde541..000000000
--- a/src/protocol/obsolete/ptlink.c
+++ /dev/null
@@ -1,1799 +0,0 @@
-/* PTLink IRCD functions
- *
- * (C) 2003-2009 Anope Team
- * Contact us at team@anope.org
- *
- * Please read COPYING and README for further details.
- *
- * Based on the original code of Epona by Lara.
- * Based on the original code of Services by Andy Church.
- *
- *
- */
-
-#include "services.h"
-#include "pseudo.h"
-#include "ptlink.h"
-
-IRCDVar myIrcd[] = {
-	{"PTlink 6.15.*+",		  /* ircd name */
-	 "+o",					  /* nickserv mode */
-	 "+o",					  /* chanserv mode */
-	 "+o",					  /* memoserv mode */
-	 "+o",					  /* hostserv mode */
-	 "+io",					 /* operserv mode */
-	 "+o",					  /* botserv mode  */
-	 "+h",					  /* helpserv mode */
-	 "+i",					  /* Dev/Null mode */
-	 "+io",					 /* Global mode   */
-	 "+o",					  /* nickserv alias mode */
-	 "+o",					  /* chanserv alias mode */
-	 "+o",					  /* memoserv alias mode */
-	 "+io",					 /* hostserv alias mode */
-	 "+io",					 /* operserv alias mode */
-	 "+o",					  /* botserv alias mode  */
-	 "+h",					  /* helpserv alias mode */
-	 "+i",					  /* Dev/Null alias mode */
-	 "+io",					 /* Global alias mode   */
-	 "+",					   /* Used by BotServ Bots */
-	 2,						 /* Chan Max Symbols	 */
-	 "-inpsmtCRKOASdcqBNl",	 /* Modes to Remove */
-	 "+ao",					 /* 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 chan admin */
-	 "-a",					  /* Mode to unset for chan admin */
-	 "+r",					  /* Mode On Reg		  */
-	 NULL,					  /* Mode on ID for Roots */
-	 NULL,					  /* Mode on ID for Admins */
-	 NULL,					  /* Mode on ID for Opers */
-	 "-r",					  /* Mode on UnReg		*/
-	 NULL,					  /* Mode on Nick Change  */
-	 1,						 /* Supports SGlines	 */
-	 1,						 /* Supports SQlines	 */
-	 1,						 /* Supports SZlines	 */
-	 0,						 /* 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	  */
-	 0,						 /* Has Admin			*/
-	 0,						 /* Chan SQlines		 */
-	 0,						 /* Quit on Kill		 */
-	 0,						 /* SVSMODE unban		*/
-	 1,						 /* Has Protect		  */
-	 0,						 /* Reverse			  */
-	 1,						 /* Chan Reg			 */
-	 CMODE_r,				   /* Channel Mode		 */
-	 1,						 /* vidents			  */
-	 0,						 /* svshold			  */
-	 0,						 /* time stamp on mode   */
-	 0,						 /* NICKIP			   */
-	 0,						 /* O:LINE			   */
-	 1,						 /* UMODE				*/
-	 1,						 /* VHOST ON NICK		*/
-	 0,						 /* Change RealName	  */
-	 CMODE_K,				   /* No Knock			 */
-	 CMODE_A,				   /* Admin Only		   */
-	 DEFAULT_MLOCK,			 /* Default MLOCK		*/
-	 UMODE_VH,				  /* Vhost Mode		   */
-	 1,						 /* +f				   */
-	 0,						 /* +L				   */
-	 CMODE_f,
-	 0,
-	 1,
-	 1,						 /* No Knock requires +i */
-	 NULL,					  /* CAPAB Chan Modes			 */
-	 0,						 /* We support TOKENS */
-	 1,						 /* TOKENS are CASE inSensitive */
-	 0,						 /* TIME STAMPS are BASE64 */
-	 0,						 /* +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 */
-	 NULL,					  /* vhost char */
-	 0,						 /* ts6 */
-	 1,						 /* support helper umode */
-	 0,						 /* p10 */
-	 NULL,					  /* character set */
-	 0,						 /* reports sync state */
-	 0,						 /* CIDR channelbans */
-	 }
-	,
-	{NULL}
-};
-
-IRCDCAPAB myIrcdcap[] = {
-	{
-	 0,						 /* NOQUIT	   */
-	 0,						 /* TSMODE	   */
-	 0,						 /* UNCONNECT	*/
-	 0,						 /* NICKIP	   */
-	 0,						 /* SJOIN		*/
-	 CAPAB_ZIP,				 /* ZIP		  */
-	 0,						 /* BURST		*/
-	 0,						 /* TS5		  */
-	 0,						 /* TS3		  */
-	 0,						 /* DKEY		 */
-	 CAPAB_PT4,				 /* PT4		  */
-	 CAPAB_SCS,				 /* SCS		  */
-	 CAPAB_QS,				  /* 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}
-};
-
-
-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, UMODE_B, 0,		/* A B C */
-	0, 0, 0,					/* D E F */
-	0, UMODE_H, 0,			  /* G H I */
-	0, 0, 0,					/* J K L */
-	0, UMODE_N, UMODE_O,		/* M N O */
-	0, 0, UMODE_R,			  /* P Q R */
-	UMODE_S, UMODE_T, 0,		/* S T U */
-	0, 0, 0,					/* V W X */
-	0,						  /* Y */
-	0,						  /* Z */
-	0, 0, 0,					/* [ \ ] */
-	0, 0, 0,					/* ^ _ ` */
-	UMODE_a, 0, 0,			  /* a b c */
-	0, 0, 0,					/* d e f */
-	0, UMODE_h, UMODE_i,		/* g h i */
-	0, 0, 0,					/* j k l */
-	0, 0, UMODE_o,			  /* m n o */
-	UMODE_p, 0, UMODE_r,		/* p q r */
-	UMODE_s, 0, 0,			  /* s t u */
-	UMODE_v, UMODE_w, 0,		/* v w x */
-	UMODE_y,					/* y */
-	UMODE_z,					/* 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,
-	0,
-	0, 0, 0,
-	0,
-	0, 0, 0, 0,
-	0,
-
-	'v', 0, 0, 'a', 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}, {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},
-	{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 */
-	{CMODE_B, 0, NULL, NULL},   /* B */
-	{CMODE_C, 0, NULL, NULL},   /* C */
-	{0},						/* D */
-	{0},						/* E */
-	{0},						/* F */
-	{0},						/* G */
-	{0},						/* H */
-	{0},						/* I */
-	{0},						/* J */
-	{CMODE_K, 0, NULL, NULL},   /* K */
-	{0},						/* L */
-	{0},						/* M */
-	{CMODE_N, 0, NULL, NULL},   /* N */
-	{CMODE_O, 0, NULL, NULL},   /* O */
-	{0},						/* P */
-	{0},						/* Q */
-	{CMODE_R, 0, NULL, NULL},   /* R */
-	{CMODE_S, 0, NULL, NULL},   /* S */
-	{0},						/* T */
-	{0},						/* U */
-	{0},						/* V */
-	{0},						/* W */
-	{0},						/* X */
-	{0},						/* Y */
-	{0},						/* Z */
-	{0}, {0}, {0}, {0}, {0}, {0},
-	{0},						/* a */
-	{0},						/* b */
-	{CMODE_c, 0, NULL, NULL},
-	{CMODE_d, 0, NULL, NULL},
-	{0},						/* e */
-	{CMODE_f, 0, set_flood, cs_set_flood},
-	{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},
-	{CMODE_q, 0, NULL, NULL},
-	{CMODE_r, CBM_NO_MLOCK, NULL, NULL},
-	{CMODE_s, 0, NULL, NULL},
-	{CMODE_t, 0, NULL, NULL},
-	{0},
-	{0},						/* v */
-	{0},						/* w */
-	{0},						/* x */
-	{0},						/* y */
-	{0},						/* z */
-	{0}, {0}, {0}, {0}
-};
-
-CBModeInfo myCbmodeinfos[] = {
-	{'c', CMODE_c, 0, NULL, NULL},
-	{'d', CMODE_d, 0, NULL, NULL},
-	{'f', CMODE_f, 0, get_flood, cs_get_flood},
-	{'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},
-	{'q', CMODE_q, 0, NULL, NULL},
-	{'r', CMODE_r, 0, NULL, NULL},
-	{'s', CMODE_s, 0, NULL, NULL},
-	{'t', CMODE_t, 0, NULL, NULL},
-	{'A', CMODE_A, 0, NULL, NULL},
-	{'B', CMODE_B, 0, NULL, NULL},
-	{'C', CMODE_C, 0, NULL, NULL},
-	{'K', CMODE_K, 0, NULL, NULL},
-	{'N', CMODE_N, 0, NULL, NULL},
-	{'O', CMODE_O, 0, NULL, NULL},
-	{'R', CMODE_R, 0, NULL, NULL},
-	{'S', CMODE_S, 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},
-
-	{0},						/* a */
-	{0},						/* b */
-	{0},						/* c */
-	{0},						/* d */
-	{0},						/* e */
-	{0},						/* f */
-	{0},						/* g */
-	{0},						/* h */
-	{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 ptlink_SendBotOp(const char *nick, const char *chan)
-{
-	anope_SendMode(s_ChanServ, chan, "%s %s %s", ircd->botchanumode, nick,
-				   nick);
-}
-
-/*
-  :%s SJOIN %lu %s %s %s :%s
-	parv[0] = sender
-	parv[1] = channel TS (channel creation time)
-	parv[2] = channel
-	parv[3] = modes + n arguments (key and/or limit)
-	... [n]  = if(key and/or limit) mode arguments
-	parv[4+n] = flags+nick list (all in one parameter)
-	NOTE: ignore channel modes if we already have the channel with a gr
-*/
-int anope_event_sjoin(const char *source, int ac, const char **av)
-{
-	do_sjoin(source, ac, av);
-	return MOD_CONT;
-}
-
-/*
- * Note: This function has no validation whatsoever. Also, as of PTlink6.15.1
- * when you /deoper you get to keep your vindent, but you lose your vhost. In
- * that case serives will *NOT* modify it's internal record for the vhost. We
- * need to address this in the future.
- */
-/*
-  :%s NEWMASK %s
-	parv[0] = sender
-	parv[1] = new mask (if no '@', hostname is assumed)
-*/
-int anope_event_newmask(const char *source, int ac, const char **av)
-{
-	User *u;
-	const char *newhost = NULL, *newuser = NULL;
-	int tofree = 0;
-
-	if (ac != 1)
-		return MOD_CONT;
-	u = finduser(source);
-
-	if (!u) {
-		if (debug) {
-			alog("debug: NEWMASK for nonexistent user %s", av[0]);
-		}
-		return MOD_CONT;
-	}
-
-	if ((u->mode & (UMODE_NM | UMODE_VH)) == (UMODE_NM | UMODE_VH)) {
-		/* This NEWMASK should be discarded because it's sent due to a +r by
-		 * someone with a ptlink-masked host. PTlink has our correct host, so
-		 * we can just ignore this :) Or we'll get ptlink's old host which is
-		 * not what we want. -GD
-		 */
-		u->mode &= ~UMODE_NM;
-		if (debug)
-			alog("debug: Ignoring NEWMASK because it's send because of SVSMODE +r");
-		return MOD_CONT;
-	}
-
-	newuser = myStrGetOnlyToken(av[0], '@', 0);
-	if (newuser) {
-		newhost = myStrGetTokenRemainder(av[0], '@', 1);
-		tofree = 1;
-		u->SetIdent(newuser);
-		free((char *)newuser);
-	} else {
-		newhost = av[0];
-	}
-
-	if (newhost && *newhost == '@')
-		newhost++;
-
-	u->mode |= UMODE_VH;
-
-	if (newhost)
-		u->SetDisplayedHost(newhost);
-
-	if (tofree)
-		free((char *)newhost);
-
-	return MOD_CONT;
-}
-
-/*
- NICK %s %d %lu %s %s %s %s %s :%s
-	parv[0] = nickname
-	parv[1] = hopcount
-	parv[2] = nick TS (nick introduction time)
-	parv[3] = umodes
-	parv[4] = username
-	parv[5] = hostname
-	parv[6] = spoofed hostname
-	parv[7] = server
-	parv[8] = nick info
-*/
-/*
- Change NICK
-	parv[0] = old nick
-	parv[1] = new nick
-	parv[2] = TS (timestamp from user's server when nick changed was received)
-*/
-/*
- NICK xpto 2 561264 +rw irc num.myisp.pt mask.myisp.pt uc.ptlink.net :Just me
-	   0   1  2	  3   4   5			6			  7			 8
-
-*/
-int anope_event_nick(const char *source, int ac, const char **av)
-{
-	User *user;
-
-	if (ac != 2) {
-		user = do_nick(source, av[0], av[4], av[5], av[7], av[8],
-					   strtoul(av[2], NULL, 10), 0, 0, av[6], NULL);
-		if (user)
-			anope_ProcessUsermodes(user, 1, &av[3]);
-	} else {
-		do_nick(source, av[0], NULL, NULL, NULL, NULL,
-				strtoul(av[1], NULL, 10), 0, 0, NULL, NULL);
-	}
-	return MOD_CONT;
-}
-
-/*
-  :%s SERVER %s %d %s :%s
-	parv[0] = server from where the server was introduced to us
-  	parv[1] = server name
-	parv[2] = hop count (1 wen are directly connected)
-	parv[3] = server version
-	parv[4] = server description
-*/
-int anope_event_server(const char *source, int ac, const char **av)
-{
-	if (!stricmp(av[1], "1")) {
-		uplink = sstrdup(av[0]);
-	}
-	do_server(source, av[0], av[1], av[3], NULL);
-	return MOD_CONT;
-}
-
-int anope_event_436(const char *source, int ac, const char **av)
-{
-	if (ac < 1)
-		return MOD_CONT;
-
-	m_nickcoll(av[0]);
-	return MOD_CONT;
-}
-
-
-void moduleAddIRCDMsgs()
-{
-	Message *m;
-
-	updateProtectDetails("PROTECT", "PROTECTME", "protect", "deprotect",
-						 "AUTOPROTECT", "+a", "-a");
-
-	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("461", anope_event_null);
-	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("MODE", anope_event_mode);
-	addCoreMessage(IRCD, m);
-	m = createMessage("MOTD", anope_event_motd);
-	addCoreMessage(IRCD, m);
-	m = createMessage("NICK", 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("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("AKILL", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("GLOBOPS", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("GNOTICE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("GOPER", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("RAKILL", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SILENCE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVSKILL", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVSMODE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVSNICK", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVSNOOP", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SQLINE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("UNSQLINE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("NEWMASK", anope_event_newmask);
-	addCoreMessage(IRCD, m);
-	m = createMessage("CAPAB", anope_event_capab);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVINFO", anope_event_svinfo);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SVSINFO", anope_event_svsinfo);
-	addCoreMessage(IRCD, m);
-	m = createMessage("SJOIN", anope_event_sjoin);
-	addCoreMessage(IRCD, m);
-	m = createMessage("REHASH", anope_event_rehash);
-	addCoreMessage(IRCD, m);
-	m = createMessage("ADMIN", anope_event_admin);
-	addCoreMessage(IRCD, m);
-	m = createMessage("CREDITS", anope_event_credits);
-	addCoreMessage(IRCD, m);
-	m = createMessage("ERROR", anope_event_error);
-	addCoreMessage(IRCD, m);
-	m = createMessage("NJOIN", anope_event_sjoin);
-	addCoreMessage(IRCD, m);
-	m = createMessage("NNICK", anope_event_nick);
-	addCoreMessage(IRCD, m);
-	m = createMessage("ZLINE", anope_event_null);
-	addCoreMessage(IRCD, m);
-	m = createMessage("UNZLINE", anope_event_null);
-	addCoreMessage(IRCD, m);
-}
-
-int anope_event_svsinfo(const char *source, int ac, const char **av)
-{
-	return MOD_CONT;
-}
-
-int anope_event_svinfo(const char *source, int ac, const char **av)
-{
-	return MOD_CONT;
-}
-
-/* Event: PROTOCTL */
-int anope_event_capab(const char *source, int ac, const char **av)
-{
-	capab_parse(ac, av);
-	return MOD_CONT;
-}
-
-/*
-   :%s SQLINE %s :%s
-	parv[0] = sender
-	parv[1] = sqlined nick/mask
-	parv[2] = reason
-*/
-void ptlink_SendSQLine(const char *mask, const char *reason)
-{
-	send_cmd(ServerName, "SQLINE %s :%s", mask, reason);
-}
-
-/*
-  :%s SVSADMIN %s :%s
-  	parv[0] = sender (services client)
-	parv[1]	= target server
-	parv[2] = operation
-	  operations:
-		noopers - remove existing opers and disable o:lines
-*/
-void PTlinkProto::SendSVSNOOP(const char *server, int set)
-{
-	send_cmd(NULL, "SVSADMIN %s :%s", server, set ? "noopers" : "rehash");
-}
-
-void ptlink_cmd_svsadmin(const char *server, int set)
-{
-	ircd_proto.SendSVSNOOP(server, set);
-}
-
-/*
-  :%s UNGLINE %s
-	parv[0] = sender (server if on network synchronization)
-	parv[1] = glined usert@host mask or ALL to remove all glines
-*/
-void PTlinkProto::SendAkillDel(const char *user, const char *host)
-{
-	send_cmd(NULL, "UNGLINE %s@%s", user, host);
-}
-
-
-void anope_part(char *nick, char *chan)
-{
-	send_cmd(nick, "PART %s", chan);
-}
-void anope_topic(char *whosets, char *chan, char *whosetit, char *topic,
-				 time_t when)
-{
-	send_cmd(whosets, "TOPIC %s %s %lu :%s", chan, whosetit,
-			 (unsigned long int) when, topic);
-}
-
-/*
- :%s UNSQLINE %s
-	parv[0] = sender
-	parv[1] = sqlined nick/mask
-*/
-void ptlink_SendSQLineDel(const char *user)
-{
-	send_cmd(NULL, "UNSQLINE %s", user);
-}
-
-void ptlink_SendJoin(const char *user, const char *channel, time_t chantime)
-{
-	send_cmd(ServerName, "SJOIN %ld %s + :%s", (long int) chantime,
-			 channel, user);
-}
-
-/*
-   :%s GLINE %s %lu %s %s
-	parv[0] = sender (server if on network synchronization)
-	parv[1] = glined usert@host mask
-	parv[2] = gline duration time (seconds)
-	parv[3] = who added the gline
-	parv[4] = reason
-*/
-void ptlink_SendAkill(const char *user, const char *host, const char *who, time_t when,
-					  time_t expires, const char *reason)
-{
-	send_cmd(ServerName, "GLINE %s@%s %i %s :%s", user, host, 86400 * 2,
-			 who, reason);
-}
-
-
-void ptlink_SendSVSKill(const char *source, const char *user, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	if (!source || !user) {
-		return;
-	}
-
-	send_cmd(source, "KILL %s :%s", user, buf);
-}
-
-/*
-  :%s SVSMODE %s %s :%s
-  	parv[0] = sender (services client)
-	parv[1]	= target client nick
-	parv[2] = mode changes
-	parv[3] = extra parameter ( if news setting mode(+n) )
-  e.g.:	:NickServ SVSMODE Lamego +rn 1991234
-*/
-void ptlink_SendSVSMode(User * u, int ac, const char **av)
-{
-	send_cmd(ServerName, "SVSMODE %s %s%s%s", u->nick, av[0],
-			 (ac == 2 ? " " : ""), (ac == 2 ? av[1] : ""));
-
-	/* If we set +r on someone +NRah (1 or more of those modes), PTlink will
-	 * send us a NEWMASK with their ptlink-masked-host. If we want HostServ
-	 * to work for them, we will need to send our NEWMASK after we receive
-	 * theirs. Thus we make a hack and store in moduleData that we need to
-	 * look out for that.
-	 */
-	if ((strchr(av[0], 'r')
-		 && ((u->mode & UMODE_N) || (u->mode & UMODE_R)
-			 || (u->mode & UMODE_a) || (u->mode & UMODE_h))))
-		u->mode |= UMODE_NM;
-}
-
-int anope_event_error(const char *source, int ac, const char **av)
-{
-	if (ac >= 1) {
-		if (debug) {
-			alog("debug: %s", av[0]);
-		}
-	}
-	return MOD_CONT;
-}
-
-void ptlink_SendSquit(const char *servname, const char *message)
-{
-	send_cmd(NULL, "SQUIT %s :%s", servname, message);
-}
-
-/* PONG */
-void ptlink_SendPong(const char *servname, const char *who)
-{
-	send_cmd(servname, "PONG %s", who);
-}
-
-/*
-  SVINFO %d %d
-	parv[0] = server name
-	parv[1] = current supported protocol version
-	parv[2] = minimum supported protocol version
-
-  See the ptlink.h for information on PTLINK_TS_CURRENT, and
-  PTLINK_TS_MIN
-*/
-void ptlink_cmd_svinfo()
-{
-#if defined(PTLINK_TS_CURRENT) && defined(PTLINK_TS_MIN)
-	send_cmd(NULL, "SVINFO %d %d %lu", PTLINK_TS_CURRENT, PTLINK_TS_MIN,
-			 (unsigned long int) time(NULL));
-#else
-	/* hardwired if the defs some how go missing */
-	send_cmd(NULL, "SVINFO 6 3 %lu", (unsigned long int) time(NULL));
-#endif
-}
-
-/*
-  SVSINFO %lu %d
-  	parv[0] = sender (server name)
-	parv[1] = local services data TS
-	parv[1] = max global users
-*/
-void ptlink_cmd_svsinfo()
-{
-	send_cmd(NULL, "SVSINFO %lu %d", (unsigned long int) time(NULL),
-			 maxusercnt);
-}
-
-/*
-  PASS %s :TS
-	parv[1] = connection password
-	(TS indicates this is server uses TS protocol and SVINFO will be sent
-	for protocol compatibility checking)
-*/
-void ptlink_cmd_pass(const char *pass)
-{
-	send_cmd(NULL, "PASS %s :TS", pass);
-}
-
-/*
-  CAPAB :%s
-	parv[1] = capability list
-*/
-void ptlink_cmd_capab()
-{
-	send_cmd(NULL, "CAPAB :QS PTS4");
-}
-
-
-void ptlink_SendServer(const char *servname, int hop, const char *descript)
-{
-	send_cmd(NULL, "SERVER %s %d Anope.Services%s :%s", servname, hop,
-			 version_number_dotted, descript);
-}
-void ptlink_SendConnect(int servernum)
-{
-	me_server =
-		new_server(NULL, ServerName, ServerDesc, SERVER_ISME, NULL);
-
-	if (servernum == 1)
-		ptlink_cmd_pass(RemotePassword);
-	else if (servernum == 2)
-		ptlink_cmd_pass(RemotePassword2);
-	else if (servernum == 3)
-		ptlink_cmd_pass(RemotePassword3);
-
-	ptlink_cmd_capab();
-	ptlink_SendServer(ServerName, 1, ServerDesc);
-	ptlink_cmd_svinfo();
-	ptlink_cmd_svsinfo();
-}
-
-
-
-int anope_event_privmsg(const char *source, int ac, const char **av)
-{
-	if (ac != 2)
-		return MOD_CONT;
-	m_privmsg(source, av[0], av[1]);
-	return MOD_CONT;
-}
-
-int anope_event_part(const char *source, int ac, const char **av)
-{
-	if (ac < 1 || ac > 2)
-		return MOD_CONT;
-	do_part(source, ac, av);
-	return MOD_CONT;
-}
-
-int anope_event_whois(const char *source, int ac, const char **av)
-{
-	if (source && ac >= 1) {
-		m_whois(source, av[0]);
-	}
-	return MOD_CONT;
-}
-
-/*
-  :%s TOPIC %s %s %lu :%s
-	parv[0] = sender prefix
-	parv[1] = channel
-	parv[2] = topic nick
-	parv[3] = topic time
-	parv[4] = topic text
-*/
-int anope_event_topic(const char *source, int ac, const char **av)
-{
-	if (ac != 4)
-		return MOD_CONT;
-	do_topic(source, ac, av);
-	return MOD_CONT;
-}
-
-int anope_event_squit(const char *source, int ac, const char **av)
-{
-	if (ac != 2)
-		return MOD_CONT;
-	do_squit(source, ac, av);
-	return MOD_CONT;
-}
-
-int anope_event_quit(const char *source, int ac, const char **av)
-{
-	if (ac != 1)
-		return MOD_CONT;
-	do_quit(source, ac, av);
-	return MOD_CONT;
-}
-
-/*
-  :%s MODE %s :%s
-	parv[0] = sender
-	parv[1] = target nick (==sender)
-	parv[2] = mode change string
-*/
-int anope_event_mode(const char *source, int ac, const char **av)
-{
-	if (ac < 2)
-		return MOD_CONT;
-
-	if (*av[0] == '#' || *av[0] == '&') {
-		do_cmode(source, ac, av);
-	} else {
-		do_umode(source, ac, av);
-	}
-	return MOD_CONT;
-}
-
-
-int anope_event_kill(const char *source, int ac, const char **av)
-{
-	if (ac != 2)
-		return MOD_CONT;
-
-	m_kill(av[0], av[1]);
-	return MOD_CONT;
-}
-
-int anope_event_kick(const char *source, int ac, const char **av)
-{
-	if (ac != 3)
-		return MOD_CONT;
-	do_kick(source, ac, av);
-	return MOD_CONT;
-}
-
-
-int anope_event_join(const char *source, int ac, const char **av)
-{
-	if (ac != 1)
-		return MOD_CONT;
-	do_join(source, ac, av);
-	return MOD_CONT;
-}
-
-int anope_event_motd(const char *source, int ac, const char **av)
-{
-	if (!source) {
-		return MOD_CONT;
-	}
-
-	m_motd(source);
-	return MOD_CONT;
-}
-
-void ptlink_SendNoticeChanops(const char *source, const char *dest, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(NULL, "NOTICE @%s :%s", dest, buf);
-}
-
-
-void ptlink_cmd_notice(const char *source, const char *dest, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	if (NSDefFlags & NI_MSG) {
-		ptlink_cmd_privmsg2(source, dest, buf);
-	} else {
-		send_cmd(source, "NOTICE %s :%s", dest, buf);
-	}
-}
-
-void ptlink_cmd_notice2(const char *source, const char *dest, const char *msg)
-{
-	send_cmd(source, "NOTICE %s :%s", dest, msg);
-}
-
-void ptlink_cmd_privmsg(const char *source, const char *dest, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(source, "PRIVMSG %s :%s", dest, buf);
-}
-
-void ptlink_cmd_privmsg2(const char *source, const char *dest, const char *msg)
-{
-	send_cmd(source, "PRIVMSG %s :%s", dest, msg);
-}
-
-void ptlink_SendGlobalNotice(const char *source, const char *dest, const char *msg)
-{
-	send_cmd(source, "NOTICE $%s :%s", dest, msg);
-}
-
-void ptlink_SendGlobalPrivmsg(const char *source, const char *dest, const char *msg)
-{
-	send_cmd(source, "PRIVMSG $%s :%s", dest, msg);
-}
-
-/* GLOBOPS */
-void ptlink_SendGlobops(const char *source, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(source ? source : ServerName, "GLOBOPS :%s", buf);
-}
-
-/* 391 */
-void ptlink_cmd_391(const char *source, const char *timestr)
-{
-	if (!timestr) {
-		return;
-	}
-	send_cmd(NULL, "391 :%s %s :%s", source, ServerName, timestr);
-}
-
-/* 250 */
-void ptlink_cmd_250(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(NULL, "250 %s", buf);
-}
-
-/* 307 */
-void ptlink_cmd_307(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(ServerName, "307 %s", buf);
-}
-
-/* 311 */
-void ptlink_cmd_311(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(ServerName, "311 %s", buf);
-}
-
-/* 312 */
-void ptlink_cmd_312(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(ServerName, "312 %s", buf);
-}
-
-/* 317 */
-void ptlink_cmd_317(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(ServerName, "317 %s", buf);
-}
-
-/* 219 */
-void ptlink_cmd_219(const char *source, const 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 ptlink_cmd_401(const char *source, const char *who)
-{
-	if (!source || !who) {
-		return;
-	}
-	send_cmd(ServerName, "401 %s %s :No such service.", source, who);
-}
-
-/* 318 */
-void ptlink_cmd_318(const char *source, const char *who)
-{
-	if (!source || !who) {
-		return;
-	}
-
-	send_cmd(ServerName, "318 %s %s :End of /WHOIS list.", source, who);
-}
-
-/* 242 */
-void ptlink_cmd_242(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(NULL, "242 %s", buf);
-}
-
-/* 243 */
-void ptlink_cmd_243(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(NULL, "243 %s", buf);
-}
-
-/* 211 */
-void ptlink_cmd_211(const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(NULL, "211 %s", buf);
-}
-
-void ptlink_SendMode(const char *source, const char *dest, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	send_cmd(source, "MODE %s %s", dest, buf);
-}
-
-/*
- NICK %s %d %lu %s %s %s %s %s :%s
-	parv[1] = nickname
-	parv[2] = hopcount
-	parv[3] = nick TS (nick introduction time)
-	parv[4] = umodes
-	parv[5] = username
-	parv[6] = hostname
-	parv[7] = spoofed hostname
-	parv[8] = server
-	parv[9] = nick info
-*/
-void ptlink_cmd_nick(const char *nick, const char *name, const char *mode)
-{
-	EnforceQlinedNick(nick, NULL);
-	send_cmd(NULL, "NICK %s 1 %lu %s %s %s %s %s :%s", nick,
-			 (unsigned long int) time(NULL), mode, ServiceUser,
-			 ServiceHost, ServiceHost, ServerName, name);
-	ptlink_SendSQLine(nick, "Reserved for services");
-}
-
-void ptlink_SendKick(const char *source, const char *chan, const char *user, const char *buf)
-{
-	if (!buf) {
-		return;
-	}
-
-	if (buf) {
-		send_cmd(source, "KICK %s %s :%s", chan, user, buf);
-	} else {