Move non-gtk parts of EmpathyFilter to EmpathyDispatcher in libempathy, gtk parts are now in EmpathyStatusIcon

svn path=/trunk/; revision=1093

1 files changed, 681 insertions, 0 deletions

diff --git a/libempathy/empathy-dispatcher.c b/libempathy/empathy-dispatcher.c
new file mode 100644
index 000000000..741b01db6
--- /dev/null
+++ b/libempathy/empathy-dispatcher.c
@@ -0,0 +1,681 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
+/*
+ * Copyright (C) 2007-2008 Collabora Ltd.
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+ * 
+ * Authors: Xavier Claessens <xclaesse@gmail.com>
+ */
+
+#include <config.h>
+
+#include <string.h>
+
+#include <glib/gi18n.h>
+
+#include <telepathy-glib/enums.h>
+#include <telepathy-glib/connection.h>
+#include <telepathy-glib/util.h>
+#include <telepathy-glib/dbus.h>
+#include <telepathy-glib/proxy-subclass.h>
+
+#include <libmissioncontrol/mission-control.h>
+#include <libmissioncontrol/mc-account.h>
+
+#include <extensions/extensions.h>
+
+#include "empathy-dispatcher.h"
+#include "empathy-utils.h"
+#include "empathy-tube-handler.h"
+#include "empathy-contact-factory.h"
+
+#define DEBUG_FLAG EMPATHY_DEBUG_DISPATCHER
+#include <libempathy/empathy-debug.h>
+
+#define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyDispatcher)
+typedef struct {
+	GHashTable     *connections;
+	gpointer        token;
+	MissionControl *mc;
+	GHashTable     *tubes;
+} EmpathyDispatcherPriv;
+
+G_DEFINE_TYPE (EmpathyDispatcher, empathy_dispatcher, G_TYPE_OBJECT);
+
+enum {
+	DISPATCH_CHANNEL,
+	FILTER_CHANNEL,
+	FILTER_TUBE,
+	LAST_SIGNAL
+};
+
+static guint signals[LAST_SIGNAL];
+static EmpathyDispatcher *dispatcher = NULL;
+
+void
+empathy_dispatcher_channel_process (EmpathyDispatcher *dispatcher,
+				    TpChannel         *channel)
+{
+	g_signal_emit (dispatcher, signals[DISPATCH_CHANNEL], 0, channel);
+}
+
+typedef struct {
+	EmpathyDispatcherTube  public;
+	EmpathyContactFactory *factory;
+	gchar                 *bus_name;
+	gchar                 *object_path;
+	guint                  ref_count;
+	gboolean               handled;
+} DispatcherTube;
+
+GType
+empathy_dispatcher_tube_get_type (void)
+{
+	static GType type_id = 0;
+
+	if (!type_id) {
+		type_id = g_boxed_type_register_static ("EmpathyDispatcherTube",
+							(GBoxedCopyFunc) empathy_dispatcher_tube_ref,
+							(GBoxedFreeFunc) empathy_dispatcher_tube_unref);
+	}
+
+	return type_id;
+}
+
+EmpathyDispatcherTube *
+empathy_dispatcher_tube_ref (EmpathyDispatcherTube *data)
+{
+	DispatcherTube *tube = (DispatcherTube*) data;
+
+	g_return_val_if_fail (tube != NULL, NULL);
+
+	tube->ref_count++;
+
+	return data;
+}
+
+void
+empathy_dispatcher_tube_unref (EmpathyDispatcherTube *data)
+{
+	DispatcherTube *tube = (DispatcherTube*) data;
+
+	g_return_if_fail (tube != NULL);
+
+	if (--tube->ref_count == 0) {
+		if (!tube->handled) {
+			DEBUG ("Tube can't be handled, closing");
+			tp_cli_channel_type_tubes_call_close_tube (tube->public.channel, -1,
+								   tube->public.id,
+								   NULL, NULL, NULL,
+								   NULL);
+		}
+
+		g_free (tube->bus_name);
+		g_free (tube->object_path);
+		g_object_unref (tube->factory);
+		g_object_unref (tube->public.channel);
+		g_object_unref (tube->public.initiator);
+		g_slice_free (DispatcherTube, tube);
+	}
+}
+
+static void
+dispatcher_tubes_handle_tube_cb (TpProxy      *channel,
+				 const GError *error,
+				 gpointer      user_data,
+				 GObject      *dispatcher)
+{
+	DispatcherTube *tube = user_data;
+
+	if (error) {
+		DEBUG ("Error: %s", error->message);
+	} else {
+		tube->handled = TRUE;
+	}
+}
+
+void
+empathy_dispatcher_tube_process (EmpathyDispatcher     *dispatcher,
+				 EmpathyDispatcherTube *user_data)
+{
+	DispatcherTube *tube = (DispatcherTube*) user_data;
+
+	if (tube->public.activatable) {
+		TpProxy *connection;
+		TpProxy *thandler;
+		gchar   *object_path;
+		guint    handle_type;
+		guint    handle;
+
+		/* Create the proxy for the tube handler */
+		thandler = g_object_new (TP_TYPE_PROXY,
+					 "dbus-connection", tp_get_bus (),
+					 "bus-name", tube->bus_name,
+					 "object-path", tube->object_path,
+					 NULL);
+		tp_proxy_add_interface_by_id (thandler, EMP_IFACE_QUARK_TUBE_HANDLER);
+
+		/* Give the tube to the handler */
+		g_object_get (tube->public.channel,
+			      "connection", &connection,
+			      "object-path", &object_path,
+			      "handle_type", &handle_type,
+			      "handle", &handle,
+			      NULL);
+
+		DEBUG ("Dispatching tube");
+		emp_cli_tube_handler_call_handle_tube (thandler, -1,
+						       connection->bus_name,
+						       connection->object_path,
+						       object_path, handle_type,
+						       handle, tube->public.id,
+						       dispatcher_tubes_handle_tube_cb,
+						       empathy_dispatcher_tube_ref (user_data),
+						       (GDestroyNotify) empathy_dispatcher_tube_unref,
+						       G_OBJECT (dispatcher));
+
+		g_object_unref (thandler);
+		g_object_unref (connection);
+		g_free (object_path);
+	}
+}
+
+static void
+dispatcher_tubes_new_tube_cb (TpChannel   *channel,
+			      guint        id,
+			      guint        initiator,
+			      guint        type,
+			      const gchar *service,
+			      GHashTable  *parameters,
+			      guint        state,
+			      gpointer     user_data,
+			      GObject     *dispatcher)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+	static TpDBusDaemon   *daemon = NULL;
+	DispatcherTube        *tube;
+	McAccount             *account;
+	guint                  number;
+	gchar                **names;
+	gboolean               running = FALSE;
+	GError                *error = NULL;
+
+	/* Increase tube count */
+	number = GPOINTER_TO_UINT (g_hash_table_lookup (priv->tubes, channel));
+	g_hash_table_replace (priv->tubes, g_object_ref (channel),
+			      GUINT_TO_POINTER (++number));
+	DEBUG ("Increased tube count for channel %p: %d", channel, number);
+
+	/* We dispatch only local pending tubes */
+	if (state != TP_TUBE_STATE_LOCAL_PENDING) {
+		return;
+	}
+
+	if (!daemon) {
+		daemon = tp_dbus_daemon_new (tp_get_bus ());
+	}
+
+	account = empathy_channel_get_account (channel);
+	tube = g_slice_new (DispatcherTube);
+	tube->ref_count = 1;
+	tube->handled = FALSE;
+	tube->factory = empathy_contact_factory_new ();
+	tube->bus_name = empathy_tube_handler_build_bus_name (type, service);
+	tube->object_path = empathy_tube_handler_build_object_path (type, service);
+	tube->public.activatable = FALSE;
+	tube->public.id = id;
+	tube->public.channel = g_object_ref (channel);
+	tube->public.initiator = empathy_contact_factory_get_from_handle (tube->factory,
+									  account,
+									  initiator);
+	g_object_unref (account);
+
+	/* Check if that bus-name has an owner, if it has one that means the
+	 * app is already running and we can directly give the channel. */
+	tp_cli_dbus_daemon_run_name_has_owner (daemon, -1, tube->bus_name,
+					       &running, NULL, NULL);
+	if (running) {
+		DEBUG ("Tube handler running");
+		tube->public.activatable = TRUE;
+		empathy_dispatcher_tube_process (EMPATHY_DISPATCHER (dispatcher),
+						 (EmpathyDispatcherTube*) tube);
+		empathy_dispatcher_tube_unref ((EmpathyDispatcherTube*) tube);
+		return;
+	}
+
+	/* Check if that bus-name is activatable, if not that means the
+	 * application needed to handle this tube isn't installed. */
+	if (!tp_cli_dbus_daemon_run_list_activatable_names (daemon, -1,
+							    &names, &error,
+							    NULL)) {
+		DEBUG ("Error listing activatable names: %s", error->message);
+		g_clear_error (&error);
+	} else {
+		gchar **name;
+
+		for (name = names; *name; name++) {
+			if (!tp_strdiff (*name, tube->bus_name)) {
+				tube->public.activatable = TRUE;
+				break;
+			}
+		}
+		g_strfreev (names);
+	}
+
+	g_signal_emit (dispatcher, signals[FILTER_TUBE], 0, tube);
+	empathy_dispatcher_tube_unref ((EmpathyDispatcherTube*) tube);
+}
+
+static void
+dispatcher_tubes_list_tubes_cb (TpChannel       *channel,
+				const GPtrArray *tubes,
+				const GError    *error,
+				gpointer         user_data,
+				GObject         *dispatcher)
+{
+	guint i;
+
+	if (error) {
+		DEBUG ("Error: %s", error->message);
+		return;
+	}
+
+	for (i = 0; i < tubes->len; i++) {
+		GValueArray *values;
+
+		values = g_ptr_array_index (tubes, i);
+		dispatcher_tubes_new_tube_cb (channel,
+					      g_value_get_uint (g_value_array_get_nth (values, 0)),
+					      g_value_get_uint (g_value_array_get_nth (values, 1)),
+					      g_value_get_uint (g_value_array_get_nth (values, 2)),
+					      g_value_get_string (g_value_array_get_nth (values, 3)),
+					      g_value_get_boxed (g_value_array_get_nth (values, 4)),
+					      g_value_get_uint (g_value_array_get_nth (values, 5)),
+					      user_data, dispatcher);
+	}
+}
+
+static void
+dispatcher_tubes_channel_invalidated_cb (TpProxy       *proxy,
+					 guint          domain,
+					 gint           code,
+					 gchar         *message,
+					 EmpathyDispatcher *dispatcher)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+
+	DEBUG ("Error: %s", message);
+
+	g_hash_table_remove (priv->tubes, proxy);
+}
+
+static void
+dispatcher_tubes_tube_closed_cb (TpChannel *channel,
+				 guint      id,
+				 gpointer   user_data,
+				 GObject   *dispatcher)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+	guint                  number;
+
+	number = GPOINTER_TO_UINT (g_hash_table_lookup (priv->tubes, channel));
+	if (number == 1) {
+		DEBUG ("No more tube, closing channel");
+		tp_cli_channel_call_close (channel, -1, NULL, NULL, NULL, NULL);
+	}
+	else if (number > 1) {
+		DEBUG ("Decrease tube count: %d", number);
+		g_hash_table_replace (priv->tubes, g_object_ref (channel),
+				      GUINT_TO_POINTER (--number));
+	}
+}
+
+static void
+dispatcher_tubes_handle_channel (EmpathyDispatcher *dispatcher,
+				 TpChannel         *channel)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+
+	if (g_hash_table_lookup (priv->tubes, channel)) {
+		return;
+	}
+
+	DEBUG ("Handling new channel");
+
+	g_hash_table_insert (priv->tubes, g_object_ref (channel),
+			     GUINT_TO_POINTER (0));
+
+	g_signal_connect (channel, "invalidated",
+			  G_CALLBACK (dispatcher_tubes_channel_invalidated_cb),
+			  dispatcher);
+
+	tp_cli_channel_type_tubes_connect_to_tube_closed (channel,
+							  dispatcher_tubes_tube_closed_cb,
+							  NULL, NULL,
+							  G_OBJECT (dispatcher), NULL);
+	tp_cli_channel_type_tubes_connect_to_new_tube (channel,
+						       dispatcher_tubes_new_tube_cb,
+						       NULL, NULL,
+						       G_OBJECT (dispatcher), NULL);
+	tp_cli_channel_type_tubes_call_list_tubes (channel, -1,
+						   dispatcher_tubes_list_tubes_cb,
+						   NULL, NULL,
+						   G_OBJECT (dispatcher));
+}
+
+static void
+dispatcher_connection_invalidated_cb (TpConnection  *connection,
+				      guint          domain,
+				      gint           code,
+				      gchar         *message,
+				      EmpathyDispatcher *dispatcher)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+	GHashTableIter         iter;
+	gpointer               key, value;
+
+	DEBUG ("Error: %s", message);
+
+	g_hash_table_iter_init (&iter, priv->connections);
+	while (g_hash_table_iter_next (&iter, &key, &value)) {
+		if (value == connection) {
+			g_hash_table_remove (priv->connections, key);
+			break;
+		}
+	}
+}
+
+static void
+dispatcher_connection_new_channel_cb (TpConnection *connection,
+				      const gchar  *object_path,
+				      const gchar  *channel_type,
+				      guint         handle_type,
+				      guint         handle,
+				      gboolean      suppress_handler,
+				      gpointer      user_data,
+				      GObject      *object)
+{
+	EmpathyDispatcher *dispatcher = EMPATHY_DISPATCHER (object);
+	TpChannel         *channel;
+	gpointer           had_channels;
+
+	had_channels = g_object_get_data (G_OBJECT (connection), "had-channels");
+	if (had_channels == NULL) {
+		/* ListChannels didn't return yet, return to avoid duplicate
+		 * dispatching */
+		return;
+	}
+
+	channel = tp_channel_new (connection, object_path, channel_type,
+				  handle_type, handle, NULL);
+	tp_channel_run_until_ready (channel, NULL, NULL);
+
+	if (!tp_strdiff (channel_type, TP_IFACE_CHANNEL_TYPE_TUBES)) {
+		dispatcher_tubes_handle_channel (dispatcher, channel);
+	}
+
+	if (suppress_handler) {
+		g_signal_emit (dispatcher, signals[DISPATCH_CHANNEL], 0, channel);
+	} else {
+		g_signal_emit (dispatcher, signals[FILTER_CHANNEL], 0, channel);
+	}
+
+	g_object_unref (channel);
+}
+
+static void
+dispatcher_connection_list_channels_cb (TpConnection    *connection,
+					const GPtrArray *channels,
+					const GError    *error,
+					gpointer         user_data,
+					GObject         *dispatcher)
+{
+	guint i;
+
+	if (error) {
+		DEBUG ("Error: %s", error->message);
+		return;
+	}
+
+	g_object_set_data (G_OBJECT (connection), "had-channels",
+			   GUINT_TO_POINTER (1));
+
+	for (i = 0; i < channels->len; i++) {
+		GValueArray *values;
+
+		values = g_ptr_array_index (channels, i);
+		dispatcher_connection_new_channel_cb (connection,
+			g_value_get_boxed (g_value_array_get_nth (values, 0)),
+			g_value_get_string (g_value_array_get_nth (values, 1)),
+			g_value_get_uint (g_value_array_get_nth (values, 2)),
+			g_value_get_uint (g_value_array_get_nth (values, 3)),
+			FALSE, user_data, dispatcher);
+	}
+}
+
+static void
+dispatcher_connection_advertise_capabilities_cb (TpConnection    *connection,
+						 const GPtrArray *capabilities,
+						 const GError    *error,
+						 gpointer         user_data,
+						 GObject         *dispatcher)
+{
+	if (error) {
+		DEBUG ("Error: %s", error->message);
+	}
+}
+
+static void
+dispatcher_connection_ready_cb (TpConnection  *connection,
+				const GError  *error,
+				gpointer       dispatcher)
+{
+	GPtrArray   *capabilities;
+	GType        cap_type;
+	GValue       cap = {0, };
+	const gchar *remove = NULL;
+
+	if (error) {
+		dispatcher_connection_invalidated_cb (connection,
+						      error->domain,
+						      error->code,
+						      error->message,
+						      dispatcher);
+		return;
+	}
+
+	g_signal_connect (connection, "invalidated",
+			  G_CALLBACK (dispatcher_connection_invalidated_cb),
+			  dispatcher);
+	tp_cli_connection_connect_to_new_channel (connection,
+						  dispatcher_connection_new_channel_cb,
+						  NULL, NULL,
+						  G_OBJECT (dispatcher), NULL);
+	tp_cli_connection_call_list_channels (connection, -1,
+					      dispatcher_connection_list_channels_cb,
+					      NULL, NULL,
+					      G_OBJECT (dispatcher));
+
+	/* Advertise VoIP capabilities */
+	capabilities = g_ptr_array_sized_new (1);
+	cap_type = dbus_g_type_get_struct ("GValueArray", G_TYPE_STRING,
+					   G_TYPE_UINT, G_TYPE_INVALID);
+	g_value_init (&cap, cap_type);
+	g_value_take_boxed (&cap, dbus_g_type_specialized_construct (cap_type));
+	dbus_g_type_struct_set (&cap,
+				0, TP_IFACE_CHANNEL_TYPE_STREAMED_MEDIA,
+				1, TP_CHANNEL_MEDIA_CAPABILITY_AUDIO |
+				   TP_CHANNEL_MEDIA_CAPABILITY_VIDEO |
+				   TP_CHANNEL_MEDIA_CAPABILITY_NAT_TRAVERSAL_STUN  |
+				   TP_CHANNEL_MEDIA_CAPABILITY_NAT_TRAVERSAL_GTALK_P2P,
+				G_MAXUINT);
+	g_ptr_array_add (capabilities, g_value_get_boxed (&cap));
+
+	tp_cli_connection_interface_capabilities_call_advertise_capabilities (
+		connection, -1,
+		capabilities, &remove,
+		dispatcher_connection_advertise_capabilities_cb,
+		NULL, NULL, G_OBJECT (dispatcher));
+	/* FIXME: Is that leaked? */
+}
+
+static void
+dispatcher_update_account (EmpathyDispatcher *dispatcher,
+			   McAccount         *account)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (dispatcher);
+	TpConnection          *connection;
+
+	connection = g_hash_table_lookup (priv->connections, account);
+	if (connection) {
+		return;
+	}
+
+	connection = mission_control_get_tpconnection (priv->mc, account, NULL);
+	if (!connection) {
+		return;
+	}
+
+	g_hash_table_insert (priv->connections, g_object_ref (account), connection);
+	tp_connection_call_when_ready (connection,
+				       dispatcher_connection_ready_cb,
+				       dispatcher);
+}
+
+static void
+dispatcher_status_changed_cb (MissionControl           *mc,
+			      TpConnectionStatus        status,
+			      McPresence                presence,
+			      TpConnectionStatusReason  reason,
+			      const gchar              *unique_name,
+			      EmpathyDispatcher            *dispatcher)
+{
+	McAccount *account;
+
+	account = mc_account_lookup (unique_name);
+	dispatcher_update_account (dispatcher, account);
+	g_object_unref (account);
+}
+
+static guint
+dispatcher_channel_hash (gconstpointer key)
+{
+	TpProxy *channel = TP_PROXY (key);
+
+	return g_str_hash (channel->object_path);
+}
+
+static gboolean
+dispatcher_channel_equal (gconstpointer a,
+		      gconstpointer b)
+{
+	TpProxy *channel_a = TP_PROXY (a);
+	TpProxy *channel_b = TP_PROXY (b);
+
+	return g_str_equal (channel_a->object_path, channel_b->object_path);
+}
+
+static void
+dispatcher_finalize (GObject *object)
+{
+	EmpathyDispatcherPriv *priv = GET_PRIV (object);
+
+	empathy_disconnect_account_status_changed (priv->token);
+	g_object_unref (priv->mc);
+
+	g_hash_table_destroy (priv->connections);
+	g_hash_table_destroy (priv->tubes);
+}
+
+static void
+empathy_dispatcher_class_init (EmpathyDispatcherClass *klass)
+{
+	GObjectClass *object_class = G_OBJECT_CLASS (klass);
+
+	object_class->finalize = dispatcher_finalize;
+
+	signals[DISPATCH_CHANNEL] =
+		g_signal_new ("dispatch-channel",
+			      G_TYPE_FROM_CLASS (klass),
+			      G_SIGNAL_RUN_LAST,
+			      0,
+			      NULL, NULL,
+			      g_cclosure_marshal_VOID__OBJECT,
+			      G_TYPE_NONE,
+			      1, TP_TYPE_CHANNEL);
+	signals[FILTER_CHANNEL] =
+		g_signal_new ("filter-channel",
+			      G_TYPE_FROM_CLASS (klass),
+			      G_SIGNAL_RUN_LAST,
+			      0,
+			      NULL, NULL,
+			      g_cclosure_marshal_VOID__OBJECT,
+			      G_TYPE_NONE,
+			      1, TP_TYPE_CHANNEL);
+	signals[FILTER_TUBE] =
+		g_signal_new ("filter-tube",
+			      G_TYPE_FROM_CLASS (klass),
+			      G_SIGNAL_RUN_LAST,
+			      0,
+			      NULL, NULL,
+			      g_cclosure_marshal_VOID__BOXED,
+			      G_TYPE_NONE,
+			      1, EMPATHY_TYPE_DISPATCHER_TUBE);
+
+	g_type_class_add_private (object_class, sizeof (EmpathyDispatcherPriv));
+}
+
+static void
+empathy_dispatcher_init (EmpathyDispatcher *dispatcher)
+{
+	GList                 *accounts, *l;
+	EmpathyDispatcherPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (dispatcher,
+		EMPATHY_TYPE_DISPATCHER, EmpathyDispatcherPriv);
+
+	dispatcher->priv = priv;
+	priv->tubes = g_hash_table_new_full (dispatcher_channel_hash,
+					     dispatcher_channel_equal,
+					     g_object_unref, NULL);
+
+	priv->mc = empathy_mission_control_new ();
+	priv->token = empathy_connect_to_account_status_changed (priv->mc,
+		G_CALLBACK (dispatcher_status_changed_cb),
+		dispatcher, NULL);
+
+	priv->connections = g_hash_table_new_full (empathy_account_hash,
+						   empathy_account_equal,
+						   g_object_unref,
+						   g_object_unref);
+	accounts = mc_accounts_list_by_enabled (TRUE);
+	for (l = accounts; l; l = l->next) {
+		dispatcher_update_account (dispatcher, l->data);
+		g_object_unref (l->data);
+	}
+	g_list_free (accounts);
+}
+
+EmpathyDispatcher *
+empathy_dispatcher_new (void)
+{
+	if (!dispatcher) {
+		dispatcher = g_object_new (EMPATHY_TYPE_DISPATCHER, NULL);
+		g_object_add_weak_pointer (G_OBJECT (dispatcher), (gpointer) &dispatcher);
+	} else {
+		g_object_ref (dispatcher);
+	}
+
+	return dispatcher;
+}
+