--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mcabber/libjabber/jpacket.c	Sun Mar 27 20:18:21 2005 +0000
@@ -0,0 +1,132 @@
+/*
+ *  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.
+ *
+ *  Jabber
+ *  Copyright (C) 1998-1999 The Jabber Team http://jabber.org/
+ */
+
+#include "jabber.h"
+
+jpacket jpacket_new(xmlnode x)
+{
+    jpacket p;
+
+    if(x == NULL)
+	return NULL;
+
+    p = pmalloc(xmlnode_pool(x),sizeof(_jpacket));
+    p->x = x;
+
+    return jpacket_reset(p);
+}
+
+jpacket jpacket_reset(jpacket p)
+{
+    char *val;
+    xmlnode x;
+
+    x = p->x;
+    memset(p,0,sizeof(_jpacket));
+    p->x = x;
+    p->p = xmlnode_pool(x);
+
+    if(strncmp(xmlnode_get_name(x),"message",7) == 0)
+    {
+	p->type = JPACKET_MESSAGE;
+    }else if(strncmp(xmlnode_get_name(x),"presence",8) == 0)
+    {
+	p->type = JPACKET_PRESENCE;
+	val = xmlnode_get_attrib(x, "type");
+	if(val == NULL)
+	    p->subtype = JPACKET__AVAILABLE;
+	else if(strcmp(val,"unavailable") == 0)
+	    p->subtype = JPACKET__UNAVAILABLE;
+	else if(strcmp(val,"probe") == 0)
+	    p->subtype = JPACKET__PROBE;
+	else if(*val == 's' || *val == 'u')
+	    p->type = JPACKET_S10N;
+	else if(strcmp(val,"available") == 0)
+	{ /* someone is using type='available' which is frowned upon */
+	    xmlnode_hide_attrib(x,"type");
+	    p->subtype = JPACKET__AVAILABLE;
+	}else
+	    p->type = JPACKET_UNKNOWN;
+    }else if(strncmp(xmlnode_get_name(x),"iq",2) == 0)
+    {
+	p->type = JPACKET_IQ;
+	p->iq = xmlnode_get_tag(x,"?xmlns");
+	p->iqns = xmlnode_get_attrib(p->iq,"xmlns");
+    }
+
+    /* set up the jids if any, flag packet as unknown if they are unparseable */
+    val = xmlnode_get_attrib(x,"to");
+    if(val != NULL)
+	if((p->to = jid_new(p->p, val)) == NULL)
+	    p->type = JPACKET_UNKNOWN;
+    val = xmlnode_get_attrib(x,"from");
+    if(val != NULL)
+	if((p->from = jid_new(p->p, val)) == NULL)
+	    p->type = JPACKET_UNKNOWN;
+
+    return p;
+}
+
+
+int jpacket_subtype(jpacket p)
+{
+    char *type;
+    int ret = p->subtype;
+
+    if(ret != JPACKET__UNKNOWN)
+	return ret;
+
+    ret = JPACKET__NONE; /* default, when no type attrib is specified */
+    type = xmlnode_get_attrib(p->x, "type");
+    if(j_strcmp(type,"error") == 0)
+	ret = JPACKET__ERROR;
+    else
+	switch(p->type)
+	{
+	case JPACKET_MESSAGE:
+	    if(j_strcmp(type,"chat") == 0)
+		ret = JPACKET__CHAT;
+	    else if(j_strcmp(type,"groupchat") == 0)
+		ret = JPACKET__GROUPCHAT;
+	    else if(j_strcmp(type,"headline") == 0)
+		ret = JPACKET__HEADLINE;
+	    break;
+	case JPACKET_S10N:
+	    if(j_strcmp(type,"subscribe") == 0)
+		ret = JPACKET__SUBSCRIBE;
+	    else if(j_strcmp(type,"subscribed") == 0)
+		ret = JPACKET__SUBSCRIBED;
+	    else if(j_strcmp(type,"unsubscribe") == 0)
+		ret = JPACKET__UNSUBSCRIBE;
+	    else if(j_strcmp(type,"unsubscribed") == 0)
+		ret = JPACKET__UNSUBSCRIBED;
+	    break;
+	case JPACKET_IQ:
+	    if(j_strcmp(type,"get") == 0)
+		ret = JPACKET__GET;
+	    else if(j_strcmp(type,"set") == 0)
+		ret = JPACKET__SET;
+	    else if(j_strcmp(type,"result") == 0)
+		ret = JPACKET__RESULT;
+	    break;
+	}
+
+    p->subtype = ret;
+    return ret;
+}