pidgin/pidgin

closing merged branch
port-changes-from-branch-2.x.y-to-default
2020-02-03, Gary Kramlich
2f836435c33c
closing merged branch
/*
* purple - Bonjour XMPP XML parser stuff
*
* Purple is the legal property of its developers, whose names are too numerous
* to list here. Please refer to the COPYRIGHT file distributed with this
* source distribution.
*
* 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., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
*
*/
#include "internal.h"
#include <purple.h>
#include <libxml/parser.h>
#include "parser.h"
#include "xmpp.h"
static gboolean
parse_from_attrib_and_find_buddy(BonjourXMPPConversation *bconv, int nb_attributes, const xmlChar **attributes) {
int i;
/* If the "from" attribute is specified, attach it to the conversation. */
for(i=0; i < nb_attributes * 5; i+=5) {
if(!xmlStrcmp(attributes[i], (xmlChar*) "from")) {
int len = attributes[i+4] - attributes[i+3];
bconv->buddy_name = g_strndup((char *)attributes[i+3], len);
bonjour_xmpp_conv_match_by_name(bconv);
return (bconv->pb != NULL);
}
}
return FALSE;
}
static void
bonjour_parser_element_start_libxml(void *user_data,
const xmlChar *element_name, const xmlChar *prefix, const xmlChar *namespace,
int nb_namespaces, const xmlChar **namespaces,
int nb_attributes, int nb_defaulted, const xmlChar **attributes)
{
BonjourXMPPConversation *bconv = user_data;
PurpleXmlNode *node;
int i;
g_return_if_fail(element_name != NULL);
if(!xmlStrcmp(element_name, (xmlChar*) "stream")) {
if(!bconv->recv_stream_start) {
bconv->recv_stream_start = TRUE;
if (bconv->pb == NULL)
parse_from_attrib_and_find_buddy(bconv, nb_attributes, attributes);
bonjour_xmpp_stream_started(bconv);
}
} else {
/* If we haven't yet attached a buddy and this isn't "<stream:features />",
* try to get a "from" attribute as a last resort to match our buddy. */
if(bconv->pb == NULL
&& !(prefix && !xmlStrcmp(prefix, (xmlChar*) "stream")
&& !xmlStrcmp(element_name, (xmlChar*) "features"))
&& !parse_from_attrib_and_find_buddy(bconv, nb_attributes, attributes))
/* We've run out of options for finding who the conversation is from
using explicitly specified stuff; see if we can make a good match
by using the IP */
bonjour_xmpp_conv_match_by_ip(bconv);
if(bconv->current)
node = purple_xmlnode_new_child(bconv->current, (const char*) element_name);
else
node = purple_xmlnode_new((const char*) element_name);
purple_xmlnode_set_namespace(node, (const char*) namespace);
for(i=0; i < nb_attributes * 5; i+=5) {
const char *name = (const char *)attributes[i];
const char *prefix = (const char *)attributes[i+1];
const char *attrib_ns = (const char *)attributes[i+2];
char *txt;
int attrib_len = attributes[i+4] - attributes[i+3];
char *attrib = g_malloc(attrib_len + 1);
memcpy(attrib, attributes[i+3], attrib_len);
attrib[attrib_len] = '\0';
txt = attrib;
attrib = purple_unescape_text(txt);
g_free(txt);
purple_xmlnode_set_attrib_full(node, name, attrib_ns, prefix, attrib);
g_free(attrib);
}
bconv->current = node;
}
}
static void
bonjour_parser_element_end_libxml(void *user_data, const xmlChar *element_name,
const xmlChar *prefix, const xmlChar *namespace)
{
BonjourXMPPConversation *bconv = user_data;
if(!bconv->current) {
/* We don't keep a reference to the start stream PurpleXmlNode,
* so we have to check for it here to close the conversation */
if(!xmlStrcmp(element_name, (xmlChar*) "stream"))
/* Asynchronously close the conversation to prevent bonjour_parser_setup()
* being called from within this context */
async_bonjour_xmpp_close_conversation(bconv);
return;
}
if(bconv->current->parent) {
if(!xmlStrcmp((xmlChar*) bconv->current->name, element_name))
bconv->current = bconv->current->parent;
} else {
PurpleXmlNode *packet = bconv->current;
bconv->current = NULL;
bonjour_xmpp_process_packet(bconv->pb, packet);
purple_xmlnode_free(packet);
}
}
static void
bonjour_parser_element_text_libxml(void *user_data, const xmlChar *text, int text_len)
{
BonjourXMPPConversation *bconv = user_data;
if(!bconv->current)
return;
if(!text || !text_len)
return;
purple_xmlnode_insert_data(bconv->current, (const char*) text, text_len);
}
static void
bonjour_parser_structured_error_handler(void *user_data, xmlErrorPtr error)
{
BonjourXMPPConversation *bconv = user_data;
purple_debug_error("bonjour", "XML parser error for BonjourXMPPConversation %p: "
"Domain %i, code %i, level %i: %s",
bconv,
error->domain, error->code, error->level,
(error->message ? error->message : "(null)\n"));
}
static xmlSAXHandler bonjour_parser_libxml = {
NULL, /*internalSubset*/
NULL, /*isStandalone*/
NULL, /*hasInternalSubset*/
NULL, /*hasExternalSubset*/
NULL, /*resolveEntity*/
NULL, /*getEntity*/
NULL, /*entityDecl*/
NULL, /*notationDecl*/
NULL, /*attributeDecl*/
NULL, /*elementDecl*/
NULL, /*unparsedEntityDecl*/
NULL, /*setDocumentLocator*/
NULL, /*startDocument*/
NULL, /*endDocument*/
NULL, /*startElement*/
NULL, /*endElement*/
NULL, /*reference*/
bonjour_parser_element_text_libxml, /*characters*/
NULL, /*ignorableWhitespace*/
NULL, /*processingInstruction*/
NULL, /*comment*/
NULL, /*warning*/
NULL, /*error*/
NULL, /*fatalError*/
NULL, /*getParameterEntity*/
NULL, /*cdataBlock*/
NULL, /*externalSubset*/
XML_SAX2_MAGIC, /*initialized*/
NULL, /*_private*/
bonjour_parser_element_start_libxml, /*startElementNs*/
bonjour_parser_element_end_libxml, /*endElementNs*/
bonjour_parser_structured_error_handler /*serror*/
};
void
bonjour_parser_setup(BonjourXMPPConversation *bconv)
{
/* This seems backwards, but it makes sense. The libxml code creates
* the parser context when you try to use it (this way, it can figure
* out the encoding at creation time. So, setting up the parser is
* just a matter of destroying any current parser. */
if (bconv->context) {
xmlParseChunk(bconv->context, NULL,0,1);
xmlFreeParserCtxt(bconv->context);
bconv->context = NULL;
}
}
void bonjour_parser_process(BonjourXMPPConversation *bconv, const char *buf, int len)
{
if (bconv->context == NULL) {
/* libxml inconsistently starts parsing on creating the
* parser, so do a ParseChunk right afterwards to force it. */
bconv->context = xmlCreatePushParserCtxt(&bonjour_parser_libxml, bconv, buf, len, NULL);
xmlParseChunk(bconv->context, "", 0, 0);
} else if (xmlParseChunk(bconv->context, buf, len, 0) < 0)
/* TODO: What should we do here - I assume we should display an error or something (maybe just print something to the conv?) */
purple_debug_error("bonjour", "Error parsing xml.\n");
}