view src/protocols/jabber/disco.c @ 12919:248b8b39c671

[gaim-migrate @ 15272] Replace GaimBlistNodeAction with the more generic GaimMenuAction, this is in preparation for letting the chat room user list have extensible menus like the blist entries do. (I know it's not exactly the prettiest, and the callback isn't exactly type-safe, when we eventually gobjectify everything we can get some safety back by using (GObject, gpointer) but that's for later.) I'm planning to look into merging GaimPluginActions into GaimMenuActions as well. committer: Tailor Script <[e-mail]>

+
鐃緒申/*
+
鐃緒申 * gaim - Jabber Protocol Plugin
+
鐃緒申 *
+
鐃緒申 * Copyright (C) 2003, Nathan Walp <[e-mail]>
+
鐃緒申 *
+
鐃緒申 * 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
+
鐃緒申 *
+
鐃緒申 */
+
鐃緒申
+
鐃緒申#include "internal.h"
+
鐃緒申#include "prefs.h"
+
鐃緒申
+
鐃緒申#include "buddy.h"
+
鐃緒申#include "iq.h"
+
鐃緒申#include "disco.h"
+
鐃緒申
+
鐃緒申
+
鐃緒申struct _jabber_disco_info_cb_data {
+
鐃緒申	gpointer data;
+
鐃緒申	JabberDiscoInfoCallback *callback;
+
鐃緒申};
+
鐃緒申
+
鐃緒申#define SUPPORT_FEATURE(x) \
+
鐃緒申	feature = xmlnode_new_child(query, "feature"); \
+
鐃緒申	xmlnode_set_attrib(feature, "var", x);
+
鐃緒申
+
鐃緒申
+
鐃緒申void jabber_disco_info_parse(JabberStream *js, xmlnode *packet) {
+
鐃緒申	const char *from = xmlnode_get_attrib(packet, "from");
+
鐃緒申	const char *type = xmlnode_get_attrib(packet, "type");
+
鐃緒申
+
鐃緒申	if(!from || !type)
+
鐃緒申		return;
+
鐃緒申
+
鐃緒申	if(!strcmp(type, "get")) {
+
鐃緒申		xmlnode *query, *identity, *feature;
+
鐃緒申		JabberIq *iq = jabber_iq_new_query(js, JABBER_IQ_RESULT,
+
鐃緒申				"http://jabber.org/protocol/disco#info");
+
鐃緒申
+
鐃緒申		jabber_iq_set_id(iq, xmlnode_get_attrib(packet, "id"));
+
鐃緒申
+
鐃緒申		xmlnode_set_attrib(iq->node, "to", from);
+
鐃緒申		query = xmlnode_get_child(iq->node, "query");
+
鐃緒申
+
鐃緒申		identity = xmlnode_new_child(query, "identity");
+
鐃緒申		xmlnode_set_attrib(identity, "category", "client");
+
鐃緒申		xmlnode_set_attrib(identity, "type", "pc"); /* XXX: bot, console,
+
鐃緒申													 * handheld, pc, phone,
+
鐃緒申													 * web */
+
鐃緒申
+
鐃緒申		SUPPORT_FEATURE("jabber:iq:last")
+
鐃緒申		SUPPORT_FEATURE("jabber:iq:oob")
+
鐃緒申		SUPPORT_FEATURE("jabber:iq:time")
+
鐃緒申		SUPPORT_FEATURE("jabber:iq:version")
+
鐃緒申		SUPPORT_FEATURE("jabber:x:conference")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/bytestreams")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/disco#info")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/disco#items")
+
鐃緒申#if 0
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/ibb")
+
鐃緒申#endif
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/muc")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/muc#user")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/si")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/si/profile/file-transfer")
+
鐃緒申		SUPPORT_FEATURE("http://jabber.org/protocol/xhtml-im")
+
鐃緒申
+
鐃緒申		jabber_iq_send(iq);
+
鐃緒申	} else if(!strcmp(type, "result")) {
+
鐃緒申		xmlnode *query = xmlnode_get_child(packet, "query");
+
鐃緒申		xmlnode *child;
+
鐃緒申		JabberID *jid;
+
鐃緒申		JabberBuddy *jb;
+
鐃緒申		JabberBuddyResource *jbr = NULL;
+
鐃緒申		JabberCapabilities capabilities = JABBER_CAP_NONE;
+
鐃緒申		struct _jabber_disco_info_cb_data *jdicd;
+
鐃緒申
+
鐃緒申		if((jid = jabber_id_new(from))) {
+
鐃緒申			if(jid->resource && (jb = jabber_buddy_find(js, from, TRUE)))
+
鐃緒申				jbr = jabber_buddy_find_resource(jb, jid->resource);
+
鐃緒申			jabber_id_free(jid);
+
鐃緒申		}
+
鐃緒申
+
鐃緒申		if(jbr)
+
鐃緒申			capabilities = jbr->capabilities;
+
鐃緒申
+
鐃緒申		for(child = query->child; child; child = child->next) {
+
鐃緒申			if(child->type != XMLNODE_TYPE_TAG)
+
鐃緒申				continue;
+
鐃緒申
+
鐃緒申			if(!strcmp(child->name, "identity")) {
+
鐃緒申				const char *category = xmlnode_get_attrib(child, "category");
+
鐃緒申				const char *type = xmlnode_get_attrib(child, "type");
+
鐃緒申				if(!category || !type)
+
鐃緒申					continue;
+
鐃緒申
+
鐃緒申				if(!strcmp(category, "conference") && !strcmp(type, "text")) {
+
鐃緒申					/* we found a groupchat or MUC server, add it to the list */
+
鐃緒申					/* XXX: actually check for protocol/muc or gc-1.0 support */
+
鐃緒申					js->chat_servers = g_list_append(js->chat_servers, g_strdup(from));
+
鐃緒申				} else if(!strcmp(category, "directory") && !strcmp(type, "user")) {
+
鐃緒申					/* we found a JUD */
+
鐃緒申					js->user_directories = g_list_append(js->user_directories, g_strdup(from));
+
鐃緒申				}
+
鐃緒申
+
鐃緒申			} else if(!strcmp(child->name, "feature")) {
+
鐃緒申				const char *var = xmlnode_get_attrib(child, "var");
+
鐃緒申				if(!var)
+
鐃緒申					continue;
+
鐃緒申
+
鐃緒申				if(!strcmp(var, "http://jabber.org/protocol/si"))
+
鐃緒申					capabilities |= JABBER_CAP_SI;
+
鐃緒申				else if(!strcmp(var, "http://jabber.org/protocol/si/profile/file-transfer"))
+
鐃緒申					capabilities |= JABBER_CAP_SI_FILE_XFER;
+
鐃緒申				else if(!strcmp(var, "http://jabber.org/protocol/bytestreams"))
+
鐃緒申					capabilities |= JABBER_CAP_BYTESTREAMS;
+
鐃緒申				else if(!strcmp(var, "jabber:iq:search"))
+
鐃緒申					capabilities |= JABBER_CAP_IQ_SEARCH;
+
鐃緒申				else if(!strcmp(var, "jabber:iq:register"))
+
鐃緒申					capabilities |= JABBER_CAP_IQ_REGISTER;
+
鐃緒申			}
+
鐃緒申		}
+
鐃緒申
+
鐃緒申		capabilities |= JABBER_CAP_RETRIEVED;
+
鐃緒申
+
鐃緒申		if(jbr)
+
鐃緒申			jbr->capabilities = capabilities;
+
鐃緒申
+
鐃緒申		if((jdicd = g_hash_table_lookup(js->disco_callbacks, from))) {
+
鐃緒申			jdicd->callback(js, from, capabilities, jdicd->data);
+
鐃緒申			g_hash_table_remove(js->disco_callbacks, from);
+
鐃緒申		}
+
鐃緒申	} else if(!strcmp(type, "error")) {
+
鐃緒申		JabberID *jid;
+
鐃緒申		JabberBuddy *jb;
+
鐃緒申		JabberBuddyResource *jbr = NULL;
+
鐃緒申		JabberCapabilities capabilities = JABBER_CAP_NONE;
+
鐃緒申		struct _jabber_disco_info_cb_data *jdicd;
+
鐃緒申
+
鐃緒申		if(!(jdicd = g_hash_table_lookup(js->disco_callbacks, from)))
+
鐃緒申			return;
+
鐃緒申
+
鐃緒申		if((jid = jabber_id_new(from))) {
+
鐃緒申			if(jid->resource && (jb = jabber_buddy_find(js, from, TRUE)))
+
鐃緒申				jbr = jabber_buddy_find_resource(jb, jid->resource);
+
鐃緒申			jabber_id_free(jid);
+
鐃緒申		}
+
鐃緒申
+
鐃緒申		if(jbr)
+
鐃緒申			capabilities = jbr->capabilities;
+
鐃緒申
+
鐃緒申		jdicd->callback(js, from, capabilities, jdicd->data);
+
鐃緒申		g_hash_table_remove(js->disco_callbacks, from);
+
鐃緒申	}
+
鐃緒申}
+
鐃緒申
+
鐃緒申void jabber_disco_items_parse(JabberStream *js, xmlnode *packet) {
+
鐃緒申	const char *from = xmlnode_get_attrib(packet, "from");
+
鐃緒申	const char *type = xmlnode_get_attrib(packet, "type");
+
鐃緒申
+
鐃緒申	if(!strcmp(type, "get")) {
+
鐃緒申		JabberIq *iq = jabber_iq_new_query(js, JABBER_IQ_RESULT,
+
鐃緒申				"http://jabber.org/protocol/disco#items");
+
鐃緒申
+
鐃緒申		jabber_iq_set_id(iq, xmlnode_get_attrib(packet, "id"));
+
鐃緒申
+
鐃緒申		xmlnode_set_attrib(iq->node, "to", from);
+
鐃緒申		jabber_iq_send(iq);
+
鐃緒申	}
+
鐃緒申}
+
鐃緒申
+
鐃緒申static void
+
鐃緒申jabber_disco_server_result_cb(JabberStream *js, xmlnode *packet, gpointer data)
+
鐃緒申{
+
鐃緒申	xmlnode *query, *child;
+
鐃緒申	const char *from = xmlnode_get_attrib(packet, "from");
+
鐃緒申	const char *type = xmlnode_get_attrib(packet, "type");
+
鐃緒申
+
鐃緒申	if(!from || !type)
+
鐃緒申		return;
+
鐃緒申
+
鐃緒申	if(strcmp(from, js->user->domain))
+
鐃緒申		return;
+
鐃緒申
+
鐃緒申	if(strcmp(type, "result"))
+
鐃緒申		return;
+
鐃緒申
+
鐃緒申	while(js->chat_servers) {
+
鐃緒申		g_free(js->chat_servers->data);
+
鐃緒申		js->chat_servers = g_list_delete_link(js->chat_servers, js->chat_servers);
+
鐃緒申	}
+
鐃緒申
+
鐃緒申	query = xmlnode_get_child(packet, "query");
+
鐃緒申
+
鐃緒申	for(child = xmlnode_get_child(query, "item"); child;
+
鐃緒申			child = xmlnode_get_next_twin(child)) {
+
鐃緒申		JabberIq *iq;
+
鐃緒申		const char *jid;
+
鐃緒申
+
鐃緒申		if(!(jid = xmlnode_get_attrib(child, "jid")))
+
鐃緒申			continue;
+
鐃緒申
+
鐃緒申		iq = jabber_iq_new_query(js, JABBER_IQ_GET, "http://jabber.org/protocol/disco#info");
+
鐃緒申		xmlnode_set_attrib(iq->node, "to", jid);
+
鐃緒申		jabber_iq_send(iq);
+
鐃緒申	}
+
鐃緒申}
+
鐃緒申
+
鐃緒申void jabber_disco_items_server(JabberStream *js)
+
鐃緒申{
+
鐃緒申	JabberIq *iq = jabber_iq_new_query(js, JABBER_IQ_GET,
+
鐃緒申			"http://jabber.org/protocol/disco#items");
+
鐃緒申
+
鐃緒申	xmlnode_set_attrib(iq->node, "to", js->user->domain);
+
鐃緒申
+
鐃緒申	jabber_iq_set_callback(iq, jabber_disco_server_result_cb, NULL);
+
鐃緒申	jabber_iq_send(iq);
+
鐃緒申}
+
鐃緒申
+
鐃緒申void jabber_disco_info_do(JabberStream *js, const char *who, JabberDiscoInfoCallback *callback, gpointer data)
+
鐃緒申{
+
鐃緒申	JabberID *jid;
+
鐃緒申	JabberBuddy *jb;
+
鐃緒申	JabberBuddyResource *jbr = NULL;
+
鐃緒申	struct _jabber_disco_info_cb_data *jdicd;
+
鐃緒申	JabberIq *iq;
+
鐃緒申
+
鐃緒申	if((jid = jabber_id_new(who))) {
+
鐃緒申		if(jid->resource && (jb = jabber_buddy_find(js, who, TRUE)))
+
鐃緒申			jbr = jabber_buddy_find_resource(jb, jid->resource);
+
鐃緒申		jabber_id_free(jid);
+
鐃緒申	}
+
鐃緒申
+
鐃緒申	if(jbr && jbr->capabilities & JABBER_CAP_RETRIEVED) {
+
鐃緒申		callback(js, who, jbr->capabilities, data);
+
鐃緒申		return;
+
鐃緒申	}
+
鐃緒申
+
鐃緒申	jdicd = g_new0(struct _jabber_disco_info_cb_data, 1);
+
鐃緒申	jdicd->data = data;
+
鐃緒申	jdicd->callback = callback;
+
鐃緒申
+
鐃緒申	g_hash_table_insert(js->disco_callbacks, g_strdup(who), jdicd);
+
鐃緒申
+
鐃緒申	iq = jabber_iq_new_query(js, JABBER_IQ_GET, "http://jabber.org/protocol/disco#info");
+
鐃緒申	xmlnode_set_attrib(iq->node, "to", who);
+
鐃緒申
+
鐃緒申	jabber_iq_send(iq);
+
鐃緒申}
+
鐃緒申
+
鐃緒申