From 0827f524e0ce124dc9c99c6c8c52165aa35e49ed Mon Sep 17 00:00:00 2001
From: William Pitcock <nenolod@atheme.org>
Date: Tue, 2 Jun 2009 01:45:43 -0500
Subject: [PATCH] presence: Add m_presence module.  This provides an ENCAP s2s
 interface and lowlevel client interface.

---
 modules/Makefile.in  |   1 +
 modules/m_presence.c | 133 +++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 134 insertions(+)
 create mode 100644 modules/m_presence.c

diff --git a/modules/Makefile.in b/modules/Makefile.in
index f1807cf..1d54267 100644
--- a/modules/Makefile.in
+++ b/modules/Makefile.in
@@ -83,6 +83,7 @@ TSRCS =                          \
   m_ping.c \
   m_pong.c \
   m_post.c \
+  m_presence.c \
   m_privs.c \
   m_rehash.c \
   m_restart.c \
diff --git a/modules/m_presence.c b/modules/m_presence.c
new file mode 100644
index 0000000..28ce8e4
--- /dev/null
+++ b/modules/m_presence.c
@@ -0,0 +1,133 @@
+/*
+ *  charybdis: an advanced ircd.
+ *  m_presence.c: IRC presence protocol implementation
+ *
+ *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
+ *  Copyright (C) 1996-2002 Hybrid Development Team
+ *  Copyright (C) 2002-2005 ircd-ratbox development team
+ *  Copyright (c) 2009 William Pitcock <nenolod@dereferenced.org>
+ *
+ *  This program is free software; you can redistribute it and/or modify
+ *  it under the terms of the GNU General Public License as published by
+ *  the Free Software Foundation; either version 2 of the License, or
+ *  (at your option) any later version.
+ *
+ *  This program is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ *  GNU General Public License for more details.
+ *
+ *  You should have received a copy of the GNU General Public License
+ *  along with this program; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
+ *  USA
+ *
+ *  $Id: m_away.c 3370 2007-04-03 10:15:39Z nenolod $
+ */
+
+#include "stdinc.h"
+#include "client.h"
+#include "match.h"
+#include "ircd.h"
+#include "numeric.h"
+#include "send.h"
+#include "msg.h"
+#include "parse.h"
+#include "modules.h"
+#include "s_conf.h"
+#include "s_serv.h"
+#include "packet.h"
+
+static int m_presence(struct Client *, struct Client *, int, const char **);
+static int me_presence(struct Client *, struct Client *, int, const char **);
+
+struct Message presence_msgtab = {
+	"PRESENCE", 0, 0, 0, MFLG_SLOW,
+	{mg_unreg, {m_presence, 1}, {m_presence, 1}, mg_ignore, {me_presence, 1}, {m_presence, 1}}
+};
+
+mapi_clist_av1 presence_clist[] = { &presence_msgtab, NULL };
+DECLARE_MODULE_AV1(presence, NULL, NULL, presence_clist, NULL, NULL, "$Revision$");
+
+/*
+** m_presence
+**      parv[1] = key
+**      parv[2] = setting
+*/
+static int
+m_presence(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
+{
+	char *val;
+
+	if(MyClient(source_p) && !IsFloodDone(source_p))
+		flood_endgrace(source_p);
+
+	if(!IsClient(source_p))
+		return 0;
+
+	if((parc < 3 || EmptyString(parv[2])) && !EmptyString(parv[1]))
+	{
+		if ((val = irc_dictionary_retrieve(source_p->user->metadata, parv[1])) != NULL)
+		{
+			delete_metadata(source_p, parv[1]);
+
+			sendto_server(client_p, NULL, CAP_TS6, NOCAPS,
+					":%s ENCAP * PRESENCE %s", use_id(source_p), parv[1]);
+		}
+		if (MyConnect(source_p))
+			sendto_one_numeric(source_p, RPL_METADATAREM, form_str(RPL_METADATAREM), parv[1]);
+		return 0;
+	}
+
+	if ((val = irc_dictionary_retrieve(source_p->user->metadata, parv[1])) != NULL)
+	{
+		if (!strcmp(parv[2], val))
+			return 0;
+
+		delete_metadata(source_p, parv[1]);
+	}
+
+	set_metadata(source_p, parv[1], parv[2]);
+	sendto_server(client_p, NULL, CAP_TS6, NOCAPS, 
+		      ":%s ENCAP * PRESENCE %s :%s", use_id(source_p), parv[1], parv[2]);
+
+	if(MyConnect(source_p))
+		sendto_one_numeric(source_p, RPL_METADATASET, form_str(RPL_METADATASET), parv[1]);
+
+	return 0;
+}
+
+/*
+** me_presence
+**      parv[1] = key
+**      parv[2] = setting
+*/
+static int
+me_presence(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
+{
+	char *val;
+
+	if(MyClient(source_p) && !IsFloodDone(source_p))
+		flood_endgrace(source_p);
+
+	if(!IsClient(source_p))
+		return 0;
+
+	if((parc < 3 || EmptyString(parv[2])) && !EmptyString(parv[1]))
+	{
+		delete_metadata(source_p, parv[1]);
+		return 0;
+	}
+
+	if ((val = irc_dictionary_retrieve(source_p->user->metadata, parv[1])) != NULL)
+	{
+		if (!strcmp(parv[2], val))
+			return 0;
+
+		delete_metadata(source_p, parv[1]);
+	}
+
+	set_metadata(source_p, parv[1], parv[2]);
+
+	return 0;
+}