]> git.0d.be Git - empathy.git/blob - libempathy/empathy-dispatcher.c
factor out connect_account
[empathy.git] / libempathy / empathy-dispatcher.c
1 /* * Copyright (C) 2007-2009 Collabora Ltd.
2  *
3  * This library is free software; you can redistribute it and/or
4  * modify it under the terms of the GNU Lesser General Public
5  * License as published by the Free Software Foundation; either
6  * version 2.1 of the License, or (at your option) any later version.
7  *
8  * This library is distributed in the hope that it will be useful,
9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * Lesser General Public License for more details.
12  *
13  * You should have received a copy of the GNU Lesser General Public
14  * License along with this library; if not, write to the Free Software
15  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
16  *
17  * Authors: Xavier Claessens <xclaesse@gmail.com>
18  *          Sjoerd Simons <sjoerd.simons@collabora.co.uk>
19  *          Cosimo Cecchi <cosimo.cecchi@collabora.co.uk>
20  */
21
22 #define DISPATCHER_BUS_NAME TP_CLIENT_BUS_NAME_BASE "Empathy"
23 #define DISPATCHER_OBJECT_PATH TP_CLIENT_OBJECT_PATH_BASE "Empathy"
24
25 #include <config.h>
26
27 #include <string.h>
28
29 #include <glib/gi18n-lib.h>
30
31 #include <telepathy-glib/account-manager.h>
32 #include <telepathy-glib/enums.h>
33 #include <telepathy-glib/connection.h>
34 #include <telepathy-glib/util.h>
35 #include <telepathy-glib/dbus.h>
36 #include <telepathy-glib/proxy-subclass.h>
37 #include <telepathy-glib/gtypes.h>
38 #include <telepathy-glib/defs.h>
39 #include <telepathy-glib/svc-client.h>
40 #include <telepathy-glib/svc-generic.h>
41 #include <telepathy-glib/interfaces.h>
42
43 #include <extensions/extensions.h>
44
45 #include "empathy-dispatcher.h"
46 #include "empathy-handler.h"
47 #include "empathy-utils.h"
48 #include "empathy-tube-handler.h"
49 #include "empathy-tp-contact-factory.h"
50 #include "empathy-chatroom-manager.h"
51 #include "empathy-utils.h"
52
53 #define DEBUG_FLAG EMPATHY_DEBUG_DISPATCHER
54 #include <libempathy/empathy-debug.h>
55
56 #define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyDispatcher)
57 typedef struct
58 {
59   gboolean dispose_has_run;
60
61   TpAccountManager *account_manager;
62   /* connection to connection data mapping */
63   GHashTable *connections;
64   GHashTable *outstanding_classes_requests;
65   gpointer token;
66   GSList *tubes;
67
68   /* channels which the dispatcher is listening "invalidated" */
69   GList *channels;
70   GPtrArray *array;
71
72   /* main handler */
73   EmpathyHandler *handler;
74
75   /* extra handlers */
76   GList *handlers;
77
78   GHashTable *request_channel_class_async_ids;
79 } EmpathyDispatcherPriv;
80
81 static GList *
82 empathy_dispatcher_get_channels (EmpathyHandler *handler,
83     gpointer user_data);
84
85 static gboolean
86 empathy_dispatcher_handle_channels (EmpathyHandler *handler,
87     const gchar *account_path,
88     const gchar *connection_path,
89     const GPtrArray *channels,
90     const GPtrArray *requests_satisfied,
91     guint64 timestamp,
92     GHashTable *handler_info,
93     gpointer user_data,
94     GError **error);
95
96 G_DEFINE_TYPE (EmpathyDispatcher, empathy_dispatcher, G_TYPE_OBJECT);
97
98 enum
99 {
100   PROP_INTERFACES = 1,
101   PROP_HANDLER,
102 };
103
104 enum
105 {
106   OBSERVE,
107   APPROVE,
108   DISPATCH,
109   LAST_SIGNAL
110 };
111
112 static guint signals[LAST_SIGNAL];
113 static EmpathyDispatcher *dispatcher = NULL;
114
115 static void dispatcher_init_connection_if_needed (
116     EmpathyDispatcher *dispatcher,
117     TpConnection *connection);
118
119 static GList * empathy_dispatcher_find_channel_classes
120   (EmpathyDispatcher *dispatcher, TpConnection *connection,
121    const gchar *channel_type, guint handle_type, GArray *fixed_properties);
122
123
124 typedef struct
125 {
126   EmpathyDispatcher *dispatcher;
127   EmpathyDispatchOperation *operation;
128   TpConnection *connection;
129   gboolean should_ensure;
130   gchar *channel_type;
131   guint handle_type;
132   guint handle;
133   EmpathyContact *contact;
134   TpProxyPendingCall *pending_call;
135
136   /* Properties to pass to the channel when requesting it */
137   GHashTable *request;
138   EmpathyDispatcherRequestCb *cb;
139   gpointer user_data;
140   gpointer *request_data;
141 } DispatcherRequestData;
142
143 typedef struct
144 {
145   TpChannel *channel;
146   /* Channel type specific wrapper object */
147   GObject *channel_wrapper;
148 } DispatchData;
149
150 typedef struct
151 {
152   /* ObjectPath => DispatchData.. */
153   GHashTable *dispatched_channels;
154   /* ObjectPath -> EmpathyDispatchOperations */
155   GHashTable *dispatching_channels;
156
157   /* ObjectPath -> EmpathyDispatchOperations
158    *
159    * This holds channels which were announced with NewChannel while we have an
160    * outstanding channel request for a channel of this type. On the Requests
161    * interface, CreateChannel and EnsureChannel are guaranteed by the spec to
162    * return before NewChannels is emitted, but there was no guarantee of the
163    * ordering of RequestChannel vs. NewChannel. So if necessary, channels are
164    * held in limbo here until we know whether they were requested.
165    */
166   GHashTable *outstanding_channels;
167   /* List of DispatcherRequestData */
168   GList *outstanding_requests;
169   /* List of requestable channel classes */
170   GPtrArray *requestable_channels;
171 } ConnectionData;
172
173 typedef struct
174 {
175   EmpathyDispatcher *dispatcher;
176   TpConnection *connection;
177   char *channel_type;
178   guint handle_type;
179   GArray *properties;
180   EmpathyDispatcherFindChannelClassCb *callback;
181   gpointer user_data;
182 } FindChannelRequest;
183
184 static void
185 empathy_dispatcher_call_create_or_ensure_channel (
186     EmpathyDispatcher *dispatcher,
187     DispatcherRequestData *request_data);
188
189 static DispatchData *
190 new_dispatch_data (TpChannel *channel,
191                    GObject *channel_wrapper)
192 {
193   DispatchData *d = g_slice_new0 (DispatchData);
194   d->channel = g_object_ref (channel);
195   if (channel_wrapper != NULL)
196     d->channel_wrapper = g_object_ref (channel_wrapper);
197
198   return d;
199 }
200
201 static void
202 free_dispatch_data (DispatchData *data)
203 {
204   g_object_unref (data->channel);
205   if (data->channel_wrapper != NULL)
206     g_object_unref (data->channel_wrapper);
207
208   g_slice_free (DispatchData, data);
209 }
210
211 static DispatcherRequestData *
212 new_dispatcher_request_data (EmpathyDispatcher *self,
213                              TpConnection *connection,
214                              const gchar *channel_type,
215                              guint handle_type,
216                              guint handle,
217                              GHashTable *request,
218                              EmpathyContact *contact,
219                              EmpathyDispatcherRequestCb *cb,
220                              gpointer user_data)
221 {
222   DispatcherRequestData *result = g_slice_new0 (DispatcherRequestData);
223
224   result->dispatcher = g_object_ref (self);
225   result->connection = connection;
226
227   result->should_ensure = FALSE;
228
229   result->channel_type = g_strdup (channel_type);
230   result->handle_type = handle_type;
231   result->handle = handle;
232   result->request = request;
233
234   if (contact != NULL)
235     result->contact = g_object_ref (contact);
236
237   result->cb = cb;
238   result->user_data = user_data;
239
240   return result;
241 }
242
243 static void
244 free_dispatcher_request_data (DispatcherRequestData *r)
245 {
246   g_free (r->channel_type);
247
248   if (r->dispatcher != NULL)
249     g_object_unref (r->dispatcher);
250
251   if (r->contact != NULL)
252     g_object_unref (r->contact);
253
254   if (r->request != NULL)
255     g_hash_table_unref (r->request);
256
257   if (r->pending_call != NULL)
258     tp_proxy_pending_call_cancel (r->pending_call);
259
260   g_slice_free (DispatcherRequestData, r);
261 }
262
263 static ConnectionData *
264 new_connection_data (void)
265 {
266   ConnectionData *cd = g_slice_new0 (ConnectionData);
267
268   cd->dispatched_channels = g_hash_table_new_full (g_str_hash, g_str_equal,
269       g_free, (GDestroyNotify) free_dispatch_data);
270
271   cd->dispatching_channels = g_hash_table_new_full (g_str_hash, g_str_equal,
272       g_free, g_object_unref);
273
274   cd->outstanding_channels = g_hash_table_new_full (g_str_hash, g_str_equal,
275       g_free, NULL);
276
277   return cd;
278 }
279
280 static void
281 free_connection_data (ConnectionData *cd)
282 {
283   GList *l;
284   guint i;
285
286   g_hash_table_destroy (cd->dispatched_channels);
287   g_hash_table_destroy (cd->dispatching_channels);
288
289   for (l = cd->outstanding_requests ; l != NULL; l = g_list_delete_link (l,l))
290     {
291       free_dispatcher_request_data (l->data);
292     }
293
294   if (cd->requestable_channels  != NULL)
295     {
296       for (i = 0 ; i < cd->requestable_channels->len ; i++)
297           g_value_array_free (
298             g_ptr_array_index (cd->requestable_channels, i));
299       g_ptr_array_free (cd->requestable_channels, TRUE);
300     }
301 }
302
303 static void
304 free_find_channel_request (FindChannelRequest *r)
305 {
306   guint idx;
307   char *str;
308
309   g_object_unref (r->dispatcher);
310   g_free (r->channel_type);
311
312   if (r->properties != NULL)
313     {
314       for (idx = 0; idx < r->properties->len ; idx++)
315         {
316           str = g_array_index (r->properties, char *, idx);
317           g_free (str);
318         }
319
320       g_array_free (r->properties, TRUE);
321     }
322
323   g_slice_free (FindChannelRequest, r);
324 }
325
326 static void
327 dispatcher_connection_invalidated_cb (TpConnection *connection,
328                                       guint domain,
329                                       gint code,
330                                       gchar *message,
331                                       EmpathyDispatcher *self)
332 {
333   EmpathyDispatcherPriv *priv = GET_PRIV (self);
334
335   DEBUG ("Error: %s", message);
336   g_hash_table_remove (priv->connections, connection);
337 }
338
339 static gboolean
340 dispatcher_operation_can_start (EmpathyDispatcher *self,
341                                 EmpathyDispatchOperation *operation,
342                                 ConnectionData *cd)
343 {
344   GList *l;
345   const gchar *channel_type =
346     empathy_dispatch_operation_get_channel_type (operation);
347
348   for (l = cd->outstanding_requests; l != NULL; l = g_list_next (l))
349     {
350       DispatcherRequestData *d = (DispatcherRequestData *) l->data;
351
352       if (d->operation == NULL && !tp_strdiff (d->channel_type, channel_type))
353         {
354           return FALSE;
355         }
356     }
357
358   return TRUE;
359 }
360
361 static void
362 dispatch_operation_flush_requests (EmpathyDispatcher *self,
363                                    EmpathyDispatchOperation *operation,
364                                    GError *error,
365                                    ConnectionData *cd)
366 {
367   GList *l;
368
369   l = cd->outstanding_requests;
370   while (l != NULL)
371     {
372       DispatcherRequestData *d = (DispatcherRequestData *) l->data;
373       GList *lt = l;
374
375       l = g_list_next (l);
376
377       if (d->operation == operation)
378         {
379           if (d->cb != NULL)
380             {
381               if (error != NULL)
382                 d->cb (NULL, error, d->user_data);
383               else
384                 d->cb (operation, NULL, d->user_data);
385             }
386
387           cd->outstanding_requests = g_list_delete_link
388             (cd->outstanding_requests, lt);
389
390           free_dispatcher_request_data (d);
391         }
392     }
393 }
394
395 static void
396 dispatcher_channel_invalidated_cb (TpProxy *proxy,
397                                    guint domain,
398                                    gint code,
399                                    gchar *message,
400                                    EmpathyDispatcher *self)
401 {
402   /* Channel went away... */
403   EmpathyDispatcherPriv *priv = GET_PRIV (self);
404   TpConnection *connection;
405   EmpathyDispatchOperation *operation;
406   ConnectionData *cd;
407   const gchar *object_path;
408
409   connection = tp_channel_borrow_connection (TP_CHANNEL (proxy));
410
411   cd = g_hash_table_lookup (priv->connections, connection);
412   /* Connection itself invalidated? */
413   if (cd == NULL)
414     return;
415
416   object_path = tp_proxy_get_object_path (proxy);
417
418   DEBUG ("Channel %s invalidated", object_path);
419
420   g_hash_table_remove (cd->dispatched_channels, object_path);
421   g_hash_table_remove (cd->dispatching_channels, object_path);
422
423   priv->channels = g_list_remove (priv->channels, proxy);
424
425   operation = g_hash_table_lookup (cd->outstanding_channels, object_path);
426   if (operation != NULL)
427     {
428       GError error = { domain, code, message };
429       dispatch_operation_flush_requests (self, operation, &error, cd);
430       g_hash_table_remove (cd->outstanding_channels, object_path);
431       g_object_unref (operation);
432     }
433 }
434
435 static void
436 dispatch_operation_approved_cb (EmpathyDispatchOperation *operation,
437                                 EmpathyDispatcher *self)
438 {
439   g_assert (empathy_dispatch_operation_is_incoming (operation));
440   DEBUG ("Send of for dispatching: %s",
441     empathy_dispatch_operation_get_object_path (operation));
442   g_signal_emit (self, signals[DISPATCH], 0, operation);
443 }
444
445 static void
446 dispatch_operation_claimed_cb (EmpathyDispatchOperation *operation,
447                                EmpathyDispatcher *self)
448 {
449   /* Our job is done, remove the dispatch operation and mark the channel as
450    * dispatched */
451   EmpathyDispatcherPriv *priv = GET_PRIV (self);
452   TpConnection *connection;
453   ConnectionData *cd;
454   const gchar *object_path;
455
456   connection = empathy_dispatch_operation_get_tp_connection (operation);
457   cd = g_hash_table_lookup (priv->connections, connection);
458   g_assert (cd != NULL);
459
460   object_path = empathy_dispatch_operation_get_object_path (operation);
461
462   if (g_hash_table_lookup (cd->dispatched_channels, object_path) == NULL)
463     {
464       DispatchData *d;
465       d = new_dispatch_data (
466         empathy_dispatch_operation_get_channel (operation),
467         empathy_dispatch_operation_get_channel_wrapper (operation));
468       g_hash_table_insert (cd->dispatched_channels,
469         g_strdup (object_path), d);
470     }
471   g_hash_table_remove (cd->dispatching_channels, object_path);
472
473   DEBUG ("Channel claimed: %s", object_path);
474 }
475
476 static void
477 dispatch_operation_ready_cb (EmpathyDispatchOperation *operation,
478                              EmpathyDispatcher *self)
479 {
480   EmpathyDispatcherPriv *priv = GET_PRIV (self);
481   TpConnection *connection;
482   ConnectionData *cd;
483   EmpathyDispatchOperationState status;
484
485   g_signal_connect (operation, "approved",
486     G_CALLBACK (dispatch_operation_approved_cb), self);
487
488   g_signal_connect (operation, "claimed",
489     G_CALLBACK (dispatch_operation_claimed_cb), self);
490
491   /* Signal the observers */
492   DEBUG ("Send to observers: %s",
493     empathy_dispatch_operation_get_object_path (operation));
494   g_signal_emit (self, signals[OBSERVE], 0, operation);
495
496   empathy_dispatch_operation_start (operation);
497
498   /* Signal potential requestors */
499   connection =  empathy_dispatch_operation_get_tp_connection (operation);
500   cd = g_hash_table_lookup (priv->connections, connection);
501   g_assert (cd != NULL);
502
503   g_object_ref (operation);
504   g_object_ref (self);
505
506   dispatch_operation_flush_requests (self, operation, NULL, cd);
507   status = empathy_dispatch_operation_get_status (operation);
508   g_object_unref (operation);
509
510   if (status == EMPATHY_DISPATCHER_OPERATION_STATE_CLAIMED)
511     return;
512
513   if (status == EMPATHY_DISPATCHER_OPERATION_STATE_APPROVING)
514     {
515       DEBUG ("Send to approvers: %s",
516         empathy_dispatch_operation_get_object_path (operation));
517       g_signal_emit (self, signals[APPROVE], 0, operation);
518     }
519   else
520     {
521       g_assert (status == EMPATHY_DISPATCHER_OPERATION_STATE_DISPATCHING);
522       DEBUG ("Send of for dispatching: %s",
523         empathy_dispatch_operation_get_object_path (operation));
524       g_signal_emit (self, signals[DISPATCH], 0, operation);
525     }
526
527   g_object_unref (self);
528 }
529
530 static void
531 dispatcher_start_dispatching (EmpathyDispatcher *self,
532                               EmpathyDispatchOperation *operation,
533                               ConnectionData *cd)
534 {
535   const gchar *object_path =
536     empathy_dispatch_operation_get_object_path (operation);
537
538   DEBUG ("Dispatching process started for %s", object_path);
539
540   if (g_hash_table_lookup (cd->dispatching_channels, object_path) == NULL)
541     {
542       g_assert (g_hash_table_lookup (cd->outstanding_channels,
543         object_path) == NULL);
544
545       g_hash_table_insert (cd->dispatching_channels,
546         g_strdup (object_path), operation);
547
548       switch (empathy_dispatch_operation_get_status (operation))
549         {
550           case EMPATHY_DISPATCHER_OPERATION_STATE_PREPARING:
551             g_signal_connect (operation, "ready",
552               G_CALLBACK (dispatch_operation_ready_cb), self);
553             break;
554           case EMPATHY_DISPATCHER_OPERATION_STATE_PENDING:
555             dispatch_operation_ready_cb (operation, self);
556             break;
557           default:
558             g_assert_not_reached ();
559         }
560
561     }
562   else if (empathy_dispatch_operation_get_status (operation) >=
563       EMPATHY_DISPATCHER_OPERATION_STATE_PENDING)
564     {
565       /* Already dispatching and the operation is pending, thus the observers
566        * have seen it (if applicable), so we can flush the request right away.
567        */
568       dispatch_operation_flush_requests (self, operation, NULL, cd);
569     }
570 }
571
572 static void
573 dispatcher_flush_outstanding_operations (EmpathyDispatcher *self,
574                                          ConnectionData *cd)
575 {
576   GHashTableIter iter;
577   gpointer value;
578
579   g_hash_table_iter_init (&iter, cd->outstanding_channels);
580   while (g_hash_table_iter_next (&iter, NULL, &value))
581     {
582       EmpathyDispatchOperation *operation = EMPATHY_DISPATCH_OPERATION (value);
583
584       if (dispatcher_operation_can_start (self, operation, cd))
585         {
586           g_hash_table_iter_remove (&iter);
587           dispatcher_start_dispatching (self, operation, cd);
588         }
589     }
590 }
591
592 static void
593 dispatcher_connection_new_channel (EmpathyDispatcher *self,
594                                    TpConnection *connection,
595                                    const gchar *object_path,
596                                    const gchar *channel_type,
597                                    guint handle_type,
598                                    guint handle,
599                                    GHashTable *properties,
600                                    gboolean incoming)
601 {
602   EmpathyDispatcherPriv *priv = GET_PRIV (self);
603   TpChannel         *channel;
604   ConnectionData *cd;
605   EmpathyDispatchOperation *operation;
606   int i;
607   /* Channel types we never want to dispatch because they're either deprecated
608    * or can't sensibly be dispatch (e.g. channels that should always be
609    * requested) */
610   const char *blacklist[] = {
611     TP_IFACE_CHANNEL_TYPE_CONTACT_LIST,
612     TP_IFACE_CHANNEL_TYPE_TUBES,
613     TP_IFACE_CHANNEL_TYPE_ROOM_LIST,
614     NULL
615   };
616
617   dispatcher_init_connection_if_needed (self, connection);
618
619   cd = g_hash_table_lookup (priv->connections, connection);
620
621   /* Don't bother with channels we have already dispatched or are dispatching
622    * currently. This can happen when NewChannel(s) is fired after
623    * RequestChannel/CreateChannel/EnsureChannel */
624   if (g_hash_table_lookup (cd->dispatched_channels, object_path) != NULL)
625     return;
626
627   if (g_hash_table_lookup (cd->dispatching_channels, object_path) != NULL)
628     return;
629
630   /* Should never occur, but just in case a CM fires spurious NewChannel(s)
631    * signals */
632   if (g_hash_table_lookup (cd->outstanding_channels, object_path) != NULL)
633     return;
634
635   /* Only pick up non-requested text and file channels. For all other it
636    * doesn't make sense to handle it if we didn't request it. The same goes
637    * for channels we discovered by the Channels property or ListChannels */
638   if (!incoming && tp_strdiff (channel_type, TP_IFACE_CHANNEL_TYPE_TEXT)
639         && tp_strdiff (channel_type, TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER))
640     {
641       DEBUG ("Ignoring incoming channel of type %s on %s",
642         channel_type, object_path);
643       return;
644     }
645
646   for (i = 0 ; blacklist[i] != NULL; i++)
647     {
648       if (!tp_strdiff (channel_type, blacklist[i]))
649         {
650           DEBUG ("Ignoring blacklisted channel type %s on %s",
651             channel_type, object_path);
652           return;
653         }
654     }
655
656   DEBUG ("New channel of type %s on %s", channel_type, object_path);
657
658   if (properties == NULL)
659     channel = tp_channel_new (connection, object_path, channel_type,
660       handle_type, handle, NULL);
661   else
662     channel = tp_channel_new_from_properties (connection, object_path,
663       properties, NULL);
664
665   g_signal_connect (channel, "invalidated",
666     G_CALLBACK (dispatcher_channel_invalidated_cb),
667     self);
668
669   priv->channels = g_list_prepend (priv->channels, channel);
670
671   operation = empathy_dispatch_operation_new (connection, channel, NULL,
672     incoming);
673
674   g_object_unref (channel);
675
676   if (incoming)
677     {
678       /* Request could either be by us or by a remote party. If there are no
679        * outstanding requests for this channel type we can assume it's remote.
680        * Otherwise we wait untill they are all satisfied */
681       if (dispatcher_operation_can_start (self, operation, cd))
682         dispatcher_start_dispatching (self, operation, cd);
683       else
684         g_hash_table_insert (cd->outstanding_channels,
685           g_strdup (object_path), operation);
686     }
687   else
688     {
689       dispatcher_start_dispatching (self, operation, cd);
690     }
691 }
692
693 static void
694 dispatcher_connection_new_channel_with_properties (
695     EmpathyDispatcher *self,
696     TpConnection *connection,
697     const gchar *object_path,
698     GHashTable *properties)
699 {
700   const gchar *channel_type;
701   guint handle_type;
702   guint handle;
703   gboolean requested;
704   gboolean valid;
705
706
707   channel_type = tp_asv_get_string (properties,
708     TP_IFACE_CHANNEL ".ChannelType");
709   if (channel_type == NULL)
710     {
711       g_message ("%s had an invalid ChannelType property", object_path);
712       return;
713     }
714
715   handle_type = tp_asv_get_uint32 (properties,
716     TP_IFACE_CHANNEL ".TargetHandleType", &valid);
717   if (!valid)
718     {
719       g_message ("%s had an invalid TargetHandleType property", object_path);
720       return;
721     }
722
723   handle = tp_asv_get_uint32 (properties,
724     TP_IFACE_CHANNEL ".TargetHandle", &valid);
725   if (!valid)
726     {
727       g_message ("%s had an invalid TargetHandle property", object_path);
728       return;
729     }
730
731   /* We assume there is no channel dispather, so we're the only one dispatching
732    * it. Which means that a requested channel it is outgoing one */
733   requested = tp_asv_get_boolean (properties,
734     TP_IFACE_CHANNEL ".Requested", &valid);
735   if (!valid)
736     {
737       g_message ("%s had an invalid Requested property", object_path);
738       requested = FALSE;
739     }
740
741   dispatcher_connection_new_channel (self, connection,
742     object_path, channel_type, handle_type, handle, properties, !requested);
743 }
744
745 static void
746 dispatcher_connection_got_all (TpProxy *proxy,
747                                GHashTable *properties,
748                                const GError *error,
749                                gpointer user_data,
750                                GObject *object)
751 {
752   EmpathyDispatcher *self = EMPATHY_DISPATCHER (object);
753   EmpathyDispatcherPriv *priv = GET_PRIV (self);
754   GPtrArray *requestable_channels;
755   GPtrArray *existing_channels;
756
757   if (error) {
758     DEBUG ("Error: %s", error->message);
759     return;
760   }
761
762   requestable_channels = tp_asv_get_boxed (properties,
763     "RequestableChannelClasses", TP_ARRAY_TYPE_REQUESTABLE_CHANNEL_CLASS_LIST);
764
765   if (requestable_channels == NULL)
766     DEBUG ("No RequestableChannelClasses property !?! on connection");
767   else
768     {
769       ConnectionData *cd;
770       GList *requests, *l;
771       FindChannelRequest *request;
772       GList *retval;
773
774       cd = g_hash_table_lookup (priv->connections, proxy);
775       g_assert (cd != NULL);
776
777       cd->requestable_channels = g_boxed_copy (
778         TP_ARRAY_TYPE_REQUESTABLE_CHANNEL_CLASS_LIST, requestable_channels);
779
780       requests = g_hash_table_lookup (priv->outstanding_classes_requests,
781           proxy);
782
783       for (l = requests; l != NULL; l = l->next)
784         {
785           request = l->data;
786
787           retval = empathy_dispatcher_find_channel_classes (self,
788               TP_CONNECTION (proxy), request->channel_type,
789               request->handle_type, request->properties);
790           request->callback (retval, request->user_data);
791
792           free_find_channel_request (request);
793           g_list_free (retval);
794         }
795
796       g_list_free (requests);
797
798       g_hash_table_remove (priv->outstanding_classes_requests, proxy);
799     }
800
801   existing_channels = tp_asv_get_boxed (properties,
802       "Channels", TP_ARRAY_TYPE_CHANNEL_DETAILS_LIST);
803
804   if (existing_channels != NULL)
805     {
806       guint idx;
807
808       for (idx = 0; idx < existing_channels->len; idx++)
809         {
810           GValueArray *values = g_ptr_array_index (existing_channels, idx);
811           const gchar *object_path;
812           GHashTable *props;
813
814           object_path = g_value_get_boxed (g_value_array_get_nth (values, 0));
815           props = g_value_get_boxed (g_value_array_get_nth (values, 1));
816
817           if (tp_strdiff (tp_asv_get_string (props,
818                       TP_IFACE_CHANNEL ".ChannelType"),
819                   TP_IFACE_CHANNEL_TYPE_TEXT))
820             continue;
821
822           dispatcher_connection_new_channel_with_properties (self,
823               TP_CONNECTION (proxy), object_path, props);
824         }
825     }
826 }
827
828 static void
829 dispatcher_connection_advertise_capabilities_cb (TpConnection    *connection,
830                                                  const GPtrArray *capabilities,
831                                                  const GError    *error,
832                                                  gpointer         user_data,
833                                                  GObject         *self)
834 {
835   if (error)
836     DEBUG ("Error: %s", error->message);
837 }
838
839 static void
840 connection_ready_cb (TpConnection *connection,
841     const GError *error,
842     gpointer user_data)
843 {
844   EmpathyDispatcher *self = EMPATHY_DISPATCHER (user_data);
845   GPtrArray   *capabilities;
846   GType        cap_type;
847   GValue       cap = {0, };
848   const gchar *remove_ = NULL;
849
850   if (error != NULL)
851     {
852       DEBUG ("Error: %s", error->message);
853       goto out;
854     }
855
856   if (tp_proxy_has_interface_by_id (TP_PROXY (connection),
857       TP_IFACE_QUARK_CONNECTION_INTERFACE_REQUESTS))
858     {
859       tp_cli_dbus_properties_call_get_all (connection, -1,
860         TP_IFACE_CONNECTION_INTERFACE_REQUESTS,
861         dispatcher_connection_got_all,
862         NULL, NULL, G_OBJECT (self));
863     }
864
865   /* Advertise VoIP capabilities */
866   capabilities = g_ptr_array_sized_new (1);
867   cap_type = dbus_g_type_get_struct ("GValueArray", G_TYPE_STRING,
868     G_TYPE_UINT, G_TYPE_INVALID);
869   g_value_init (&cap, cap_type);
870   g_value_take_boxed (&cap, dbus_g_type_specialized_construct (cap_type));
871   dbus_g_type_struct_set (&cap,
872         0, TP_IFACE_CHANNEL_TYPE_STREAMED_MEDIA,
873         1, TP_CHANNEL_MEDIA_CAPABILITY_AUDIO |
874            TP_CHANNEL_MEDIA_CAPABILITY_VIDEO |
875            TP_CHANNEL_MEDIA_CAPABILITY_NAT_TRAVERSAL_STUN  |
876            TP_CHANNEL_MEDIA_CAPABILITY_NAT_TRAVERSAL_GTALK_P2P |
877            TP_CHANNEL_MEDIA_CAPABILITY_NAT_TRAVERSAL_ICE_UDP,
878            G_MAXUINT);
879   g_ptr_array_add (capabilities, g_value_get_boxed (&cap));
880
881   tp_cli_connection_interface_capabilities_call_advertise_capabilities (
882     connection, -1, capabilities, &remove_,
883     dispatcher_connection_advertise_capabilities_cb,
884     NULL, NULL, G_OBJECT (self));
885
886   g_value_unset (&cap);
887   g_ptr_array_free (capabilities, TRUE);
888 out:
889   g_object_unref (self);
890 }
891
892 static void
893 dispatcher_init_connection_if_needed (EmpathyDispatcher *self,
894     TpConnection *connection)
895 {
896   EmpathyDispatcherPriv *priv = GET_PRIV (self);
897
898   if (g_hash_table_lookup (priv->connections, connection) != NULL)
899     return;
900
901   g_hash_table_insert (priv->connections, g_object_ref (connection),
902     new_connection_data ());
903
904   g_signal_connect (connection, "invalidated",
905     G_CALLBACK (dispatcher_connection_invalidated_cb), self);
906
907   /* Ensure to keep the self object alive while the call_when_ready is
908    * running */
909   g_object_ref (self);
910   tp_connection_call_when_ready (connection, connection_ready_cb, self);
911 }
912
913 static void
914 dispatcher_status_changed_cb (TpAccount *account,
915                               guint old_status,
916                               guint new_status,
917                               guint reason,
918                               gchar *dbus_error_name,
919                               GHashTable *details,
920                               EmpathyDispatcher *self)
921 {
922   TpConnection *conn = tp_account_get_connection (account);
923
924   if (conn != NULL)
925     dispatcher_init_connection_if_needed (self, conn);
926 }
927
928 static void
929 remove_idle_handlers (gpointer key,
930                       gpointer value,
931                       gpointer user_data)
932 {
933   guint source_id;
934
935   source_id = GPOINTER_TO_UINT (value);
936   g_source_remove (source_id);
937 }
938
939 static GObject *
940 dispatcher_constructor (GType type,
941                         guint n_construct_params,
942                         GObjectConstructParam *construct_params)
943 {
944   GObject *retval;
945   EmpathyDispatcherPriv *priv;
946
947   if (dispatcher != NULL)
948     return g_object_ref (dispatcher);
949
950   retval = G_OBJECT_CLASS (empathy_dispatcher_parent_class)->constructor
951     (type, n_construct_params, construct_params);
952
953   dispatcher = EMPATHY_DISPATCHER (retval);
954   g_object_add_weak_pointer (retval, (gpointer) &dispatcher);
955
956   priv = GET_PRIV (dispatcher);
957
958   if (priv->handler == NULL)
959     priv->handler = empathy_handler_new (NULL, NULL, NULL);
960
961   empathy_handler_set_handle_channels_func (priv->handler,
962     empathy_dispatcher_handle_channels,
963     dispatcher);
964
965   empathy_handler_set_channels_func (priv->handler,
966     empathy_dispatcher_get_channels,
967     dispatcher);
968
969   return retval;
970 }
971
972 static void
973 dispatcher_dispose (GObject *object)
974 {
975   EmpathyDispatcherPriv *priv = GET_PRIV (object);
976   GHashTableIter iter;
977   gpointer connection;
978   GList *l;
979
980   if (priv->dispose_has_run)
981     return;
982
983   priv->dispose_has_run = TRUE;
984
985   for (l = priv->handlers ; l != NULL; l = g_list_next (l))
986     g_object_unref (G_OBJECT (l->data));
987
988   g_list_free (priv->handlers);
989   priv->handlers = NULL;
990
991   if (priv->handler != NULL)
992     g_object_unref (priv->handler);
993   priv->handler = NULL;
994
995   g_hash_table_iter_init (&iter, priv->connections);
996   while (g_hash_table_iter_next (&iter, &connection, NULL))
997     {
998       g_signal_handlers_disconnect_by_func (connection,
999           dispatcher_connection_invalidated_cb, object);
1000     }
1001
1002   g_hash_table_destroy (priv->connections);
1003   priv->connections = NULL;
1004
1005   G_OBJECT_CLASS (empathy_dispatcher_parent_class)->dispose (object);
1006 }
1007
1008 static void
1009 dispatcher_finalize (GObject *object)
1010 {
1011   EmpathyDispatcherPriv *priv = GET_PRIV (object);
1012   GList *l;
1013   GHashTableIter iter;
1014   gpointer connection;
1015   GList *list;
1016
1017   if (priv->request_channel_class_async_ids != NULL)
1018     {
1019       g_hash_table_foreach (priv->request_channel_class_async_ids,
1020         remove_idle_handlers, NULL);
1021       g_hash_table_destroy (priv->request_channel_class_async_ids);
1022     }
1023
1024   for (l = priv->channels; l; l = l->next)
1025     {
1026       g_signal_handlers_disconnect_by_func (l->data,
1027           dispatcher_channel_invalidated_cb, object);
1028     }
1029
1030   g_list_free (priv->channels);
1031
1032   g_hash_table_iter_init (&iter, priv->outstanding_classes_requests);
1033   while (g_hash_table_iter_next (&iter, &connection, (gpointer *) &list))
1034     {
1035       g_list_foreach (list, (GFunc) free_find_channel_request, NULL);
1036       g_list_free (list);
1037     }
1038
1039   g_object_unref (priv->account_manager);
1040
1041   g_hash_table_destroy (priv->outstanding_classes_requests);
1042 }
1043
1044 static void
1045 dispatcher_set_property (GObject *object,
1046   guint property_id,
1047   const GValue *value,
1048   GParamSpec *pspec)
1049 {
1050   EmpathyDispatcher *self = EMPATHY_DISPATCHER (object);
1051   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1052
1053   switch (property_id)
1054     {
1055       case PROP_HANDLER:
1056         priv->handler = g_value_dup_object (value);
1057         break;
1058       default:
1059         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
1060         break;
1061     }
1062 }
1063
1064 static void
1065 dispatcher_get_property (GObject *object,
1066   guint property_id,
1067   GValue *value,
1068   GParamSpec *pspec)
1069 {
1070   EmpathyDispatcher *self = EMPATHY_DISPATCHER (object);
1071   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1072
1073   switch (property_id)
1074     {
1075       case PROP_HANDLER:
1076         g_value_set_object (value, priv->handler);
1077         break;
1078       default:
1079         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
1080         break;
1081     }
1082 }
1083
1084 static void
1085 empathy_dispatcher_class_init (EmpathyDispatcherClass *klass)
1086 {
1087   GObjectClass *object_class = G_OBJECT_CLASS (klass);
1088   GParamSpec *param_spec;
1089
1090   object_class->dispose = dispatcher_dispose;
1091   object_class->finalize = dispatcher_finalize;
1092   object_class->constructor = dispatcher_constructor;
1093
1094   object_class->get_property = dispatcher_get_property;
1095   object_class->set_property = dispatcher_set_property;
1096
1097   param_spec = g_param_spec_object ("handler", "handler",
1098     "The main Telepathy Client Hander object",
1099     EMPATHY_TYPE_HANDLER,
1100     G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS | G_PARAM_CONSTRUCT_ONLY);
1101   g_object_class_install_property (object_class,
1102     PROP_HANDLER, param_spec);
1103
1104   signals[OBSERVE] =
1105     g_signal_new ("observe",
1106       G_TYPE_FROM_CLASS (klass),
1107       G_SIGNAL_RUN_LAST,
1108       0,
1109       NULL, NULL,
1110       g_cclosure_marshal_VOID__OBJECT,
1111       G_TYPE_NONE,
1112       1, EMPATHY_TYPE_DISPATCH_OPERATION);
1113
1114   signals[APPROVE] =
1115     g_signal_new ("approve",
1116       G_TYPE_FROM_CLASS (klass),
1117       G_SIGNAL_RUN_LAST,
1118       0,
1119       NULL, NULL,
1120       g_cclosure_marshal_VOID__OBJECT,
1121       G_TYPE_NONE,
1122       1, EMPATHY_TYPE_DISPATCH_OPERATION);
1123
1124   signals[DISPATCH] =
1125     g_signal_new ("dispatch",
1126       G_TYPE_FROM_CLASS (klass),
1127       G_SIGNAL_RUN_LAST,
1128       0,
1129       NULL, NULL,
1130       g_cclosure_marshal_VOID__OBJECT,
1131       G_TYPE_NONE,
1132       1, EMPATHY_TYPE_DISPATCH_OPERATION);
1133
1134
1135   g_type_class_add_private (object_class, sizeof (EmpathyDispatcherPriv));
1136 }
1137
1138 static void
1139 connect_account (EmpathyDispatcher *self,
1140     TpAccount *account)
1141 {
1142   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1143   TpConnection *conn = tp_account_get_connection (account);
1144   if (conn != NULL)
1145     dispatcher_status_changed_cb (account, 0, 0, 0, NULL, NULL, self);
1146
1147   id = g_signal_connect (account, "status-changed",
1148       G_CALLBACK (dispatcher_status_changed_cb), self);
1149 }
1150
1151 static void
1152 account_manager_prepared_cb (GObject *source_object,
1153                              GAsyncResult *result,
1154                              gpointer user_data)
1155 {
1156   GList *accounts, *l;
1157   EmpathyDispatcher *self = user_data;
1158   TpAccountManager *account_manager = TP_ACCOUNT_MANAGER (source_object);
1159   GError *error = NULL;
1160
1161   if (!tp_account_manager_prepare_finish (account_manager, result, &error))
1162     {
1163       DEBUG ("Failed to prepare account manager: %s", error->message);
1164       g_error_free (error);
1165       return;
1166     }
1167
1168   accounts = tp_account_manager_get_valid_accounts (account_manager);
1169   for (l = accounts; l; l = l->next)
1170     {
1171       TpAccount *a = l->data;
1172
1173       connect_account (self, a);
1174     }
1175   g_list_free (accounts);
1176 }
1177
1178 static void
1179 empathy_dispatcher_init (EmpathyDispatcher *self)
1180 {
1181   EmpathyDispatcherPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (self,
1182     EMPATHY_TYPE_DISPATCHER, EmpathyDispatcherPriv);
1183
1184   self->priv = priv;
1185   priv->account_manager = tp_account_manager_dup ();
1186
1187   priv->connections = g_hash_table_new_full (g_direct_hash, g_direct_equal,
1188     g_object_unref, (GDestroyNotify) free_connection_data);
1189
1190   priv->outstanding_classes_requests = g_hash_table_new_full (g_direct_hash,
1191     g_direct_equal, g_object_unref, NULL);
1192
1193   priv->channels = NULL;
1194
1195   tp_account_manager_prepare_async (priv->account_manager, NULL,
1196       account_manager_prepared_cb, self);
1197
1198   priv->request_channel_class_async_ids = g_hash_table_new (g_direct_hash,
1199     g_direct_equal);
1200 }
1201
1202 EmpathyDispatcher *
1203 empathy_dispatcher_new (const gchar *name,
1204   GPtrArray *filters,
1205   GStrv capabilities)
1206 {
1207   EmpathyHandler *handler;
1208   EmpathyDispatcher *ret;
1209
1210   g_assert (dispatcher == NULL);
1211   handler = empathy_handler_new (name, filters, capabilities);
1212
1213   ret = EMPATHY_DISPATCHER (
1214     g_object_new (EMPATHY_TYPE_DISPATCHER,
1215       "handler", handler,
1216       NULL));
1217   g_object_unref (handler);
1218
1219   return ret;
1220 }
1221
1222 EmpathyDispatcher *
1223 empathy_dispatcher_dup_singleton (void)
1224 {
1225   return EMPATHY_DISPATCHER (g_object_new (EMPATHY_TYPE_DISPATCHER, NULL));
1226 }
1227
1228 static void
1229 dispatcher_request_failed (EmpathyDispatcher *self,
1230                            DispatcherRequestData *request_data,
1231                            const GError *error)
1232 {
1233   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1234   ConnectionData *conn_data;
1235
1236   conn_data = g_hash_table_lookup (priv->connections,
1237       request_data->connection);
1238   if (request_data->cb != NULL)
1239     request_data->cb (NULL, error, request_data->user_data);
1240
1241   if (conn_data != NULL)
1242     {
1243       conn_data->outstanding_requests =
1244           g_list_remove (conn_data->outstanding_requests, request_data);
1245     }
1246   /* else Connection has been invalidated */
1247
1248   free_dispatcher_request_data (request_data);
1249 }
1250
1251 static void
1252 dispatcher_connection_new_requested_channel (EmpathyDispatcher *self,
1253   DispatcherRequestData *request_data,
1254   const gchar *object_path,
1255   GHashTable *properties,
1256   const GError *error)
1257 {
1258   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1259   EmpathyDispatchOperation *operation = NULL;
1260   ConnectionData *conn_data;
1261
1262   conn_data = g_hash_table_lookup (priv->connections,
1263     request_data->connection);
1264
1265   if (error)
1266     {
1267       DEBUG ("Channel request failed: %s", error->message);
1268
1269       dispatcher_request_failed (self, request_data, error);
1270
1271       goto out;
1272     }
1273
1274   operation = g_hash_table_lookup (conn_data->outstanding_channels,
1275     object_path);
1276
1277   if (operation != NULL)
1278     g_hash_table_remove (conn_data->outstanding_channels, object_path);
1279   else
1280     operation = g_hash_table_lookup (conn_data->dispatching_channels,
1281         object_path);
1282
1283   if (operation == NULL)
1284     {
1285       DispatchData *data = g_hash_table_lookup (conn_data->dispatched_channels,
1286         object_path);
1287
1288       if (data != NULL)
1289         {
1290           operation = empathy_dispatch_operation_new_with_wrapper (
1291             request_data->connection,
1292             data->channel, request_data->contact, FALSE,
1293             data->channel_wrapper);
1294         }
1295       else
1296         {
1297           TpChannel *channel;
1298
1299           if (properties != NULL)
1300             channel = tp_channel_new_from_properties (request_data->connection,
1301               object_path, properties, NULL);
1302           else
1303             channel = tp_channel_new (request_data->connection, object_path,
1304               request_data->channel_type, request_data->handle_type,
1305               request_data->handle, NULL);
1306
1307           g_signal_connect (channel, "invalidated",
1308             G_CALLBACK (dispatcher_channel_invalidated_cb),
1309             request_data->dispatcher);
1310
1311           priv->channels = g_list_prepend (priv->channels, channel);
1312
1313           operation = empathy_dispatch_operation_new (request_data->connection,
1314              channel, request_data->contact, FALSE);
1315           g_object_unref (channel);
1316         }
1317     }
1318   else
1319     {
1320       /* Already existed set potential extra information */
1321       g_object_set (G_OBJECT (operation),
1322         "contact", request_data->contact,
1323         NULL);
1324     }
1325
1326   request_data->operation = operation;
1327
1328   /* (pre)-approve this right away as we requested it
1329    * This might cause the channel to be claimed, in which case the operation
1330    * will disappear. So ref it, and check the status before starting the
1331    * dispatching */
1332
1333   g_object_ref (operation);
1334   empathy_dispatch_operation_approve (operation);
1335
1336    if (empathy_dispatch_operation_get_status (operation) <
1337      EMPATHY_DISPATCHER_OPERATION_STATE_APPROVING)
1338       dispatcher_start_dispatching (request_data->dispatcher, operation,
1339           conn_data);
1340
1341   g_object_unref (operation);
1342
1343 out:
1344   dispatcher_flush_outstanding_operations (request_data->dispatcher,
1345     conn_data);
1346 }
1347
1348 static void
1349 dispatcher_request_channel_cb (TpConnection *connection,
1350                                const gchar  *object_path,
1351                                const GError *error,
1352                                gpointer user_data,
1353                                GObject *weak_object)
1354 {
1355   DispatcherRequestData *request_data = (DispatcherRequestData *) user_data;
1356   EmpathyDispatcher *self =
1357       EMPATHY_DISPATCHER (request_data->dispatcher);
1358
1359   request_data->pending_call = NULL;
1360
1361   dispatcher_connection_new_requested_channel (self,
1362     request_data, object_path, NULL, error);
1363 }
1364
1365 static void
1366 dispatcher_request_channel (DispatcherRequestData *request_data)
1367 {
1368   if (tp_proxy_has_interface_by_id (TP_PROXY (request_data->connection),
1369       TP_IFACE_QUARK_CONNECTION_INTERFACE_REQUESTS))
1370     {
1371       /* Extend the request_data to be a valid request */
1372       g_assert (request_data->request == NULL);
1373       request_data->request = tp_asv_new (
1374         TP_IFACE_CHANNEL ".ChannelType",
1375           G_TYPE_STRING, request_data->channel_type,
1376         TP_IFACE_CHANNEL ".TargetHandleType",
1377           G_TYPE_UINT, request_data->handle_type,
1378         NULL);
1379
1380       if (request_data->handle_type != TP_HANDLE_TYPE_NONE)
1381         tp_asv_set_uint32 (request_data->request,
1382           TP_IFACE_CHANNEL ".TargetHandle", request_data->handle);
1383
1384       empathy_dispatcher_call_create_or_ensure_channel (
1385         request_data->dispatcher, request_data);
1386     }
1387   else
1388     {
1389       request_data->pending_call = tp_cli_connection_call_request_channel (
1390         request_data->connection, -1,
1391         request_data->channel_type,
1392         request_data->handle_type,
1393         request_data->handle,
1394         TRUE, dispatcher_request_channel_cb,
1395         request_data, NULL, NULL);
1396     }
1397 }
1398
1399 void
1400 empathy_dispatcher_chat_with_contact (EmpathyContact *contact,
1401                                       EmpathyDispatcherRequestCb *callback,
1402                                       gpointer user_data)
1403 {
1404   EmpathyDispatcher *self;
1405   EmpathyDispatcherPriv *priv;
1406   TpConnection *connection;
1407   ConnectionData *connection_data;
1408   DispatcherRequestData *request_data;
1409
1410   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1411
1412   self = empathy_dispatcher_dup_singleton ();
1413   priv = GET_PRIV (self);
1414
1415   connection = empathy_contact_get_connection (contact);
1416   connection_data = g_hash_table_lookup (priv->connections, connection);
1417
1418   /* The contact handle might not be known yet */
1419   request_data = new_dispatcher_request_data (self, connection,
1420     TP_IFACE_CHANNEL_TYPE_TEXT, TP_HANDLE_TYPE_CONTACT,
1421     empathy_contact_get_handle (contact), NULL, contact, callback, user_data);
1422   request_data->should_ensure = TRUE;
1423
1424   connection_data->outstanding_requests = g_list_prepend
1425     (connection_data->outstanding_requests, request_data);
1426
1427   dispatcher_request_channel (request_data);
1428
1429   g_object_unref (self);
1430 }
1431
1432 typedef struct
1433 {
1434   EmpathyDispatcher *dispatcher;
1435   EmpathyDispatcherRequestCb *callback;
1436   gpointer user_data;
1437 } ChatWithContactIdData;
1438
1439 static void
1440 dispatcher_chat_with_contact_id_cb (EmpathyTpContactFactory *factory,
1441                                     EmpathyContact          *contact,
1442                                     const GError            *error,
1443                                     gpointer                 user_data,
1444                                     GObject                 *weak_object)
1445 {
1446   ChatWithContactIdData *data = user_data;
1447
1448   if (error)
1449     {
1450       /* FIXME: Should call data->callback with the error */
1451       DEBUG ("Error: %s", error->message);
1452     }
1453   else
1454     {
1455       empathy_dispatcher_chat_with_contact (contact, data->callback,
1456           data->user_data);
1457     }
1458
1459   g_object_unref (data->dispatcher);
1460   g_slice_free (ChatWithContactIdData, data);
1461 }
1462
1463 void
1464 empathy_dispatcher_chat_with_contact_id (TpConnection *connection,
1465                                          const gchar *contact_id,
1466                                          EmpathyDispatcherRequestCb *callback,
1467                                          gpointer user_data)
1468 {
1469   EmpathyDispatcher *self;
1470   EmpathyTpContactFactory *factory;
1471   ChatWithContactIdData *data;
1472
1473   g_return_if_fail (TP_IS_CONNECTION (connection));
1474   g_return_if_fail (!EMP_STR_EMPTY (contact_id));
1475
1476   self = empathy_dispatcher_dup_singleton ();
1477   factory = empathy_tp_contact_factory_dup_singleton (connection);
1478   data = g_slice_new0 (ChatWithContactIdData);
1479   data->dispatcher = self;
1480   data->callback = callback;
1481   data->user_data = user_data;
1482   empathy_tp_contact_factory_get_from_id (factory, contact_id,
1483       dispatcher_chat_with_contact_id_cb, data, NULL, NULL);
1484
1485   g_object_unref (factory);
1486 }
1487
1488 static void
1489 dispatcher_request_handles_cb (TpConnection *connection,
1490                                const GArray *handles,
1491                                const GError *error,
1492                                gpointer user_data,
1493                                GObject *object)
1494 {
1495   DispatcherRequestData *request_data = (DispatcherRequestData *) user_data;
1496
1497   request_data->pending_call = NULL;
1498
1499   if (error != NULL)
1500     {
1501       EmpathyDispatcher *self = request_data->dispatcher;
1502       EmpathyDispatcherPriv *priv = GET_PRIV (self);
1503       ConnectionData *cd;
1504
1505       cd = g_hash_table_lookup (priv->connections, request_data->connection);
1506
1507       if (request_data->cb)
1508         request_data->cb (NULL, error, request_data->user_data);
1509
1510       cd->outstanding_requests = g_list_remove (cd->outstanding_requests,
1511         request_data);
1512
1513       free_dispatcher_request_data (request_data);
1514
1515       dispatcher_flush_outstanding_operations (self, cd);
1516       return;
1517     }
1518
1519   request_data->handle = g_array_index (handles, guint, 0);
1520   dispatcher_request_channel (request_data);
1521 }
1522
1523 void
1524 empathy_dispatcher_join_muc (TpConnection *connection,
1525                              const gchar *roomname,
1526                              EmpathyDispatcherRequestCb *callback,
1527                              gpointer user_data)
1528 {
1529   EmpathyDispatcher *self;
1530   EmpathyDispatcherPriv *priv;
1531   DispatcherRequestData *request_data;
1532   ConnectionData *connection_data;
1533   const gchar *names[] = { roomname, NULL };
1534
1535   g_return_if_fail (TP_IS_CONNECTION (connection));
1536   g_return_if_fail (!EMP_STR_EMPTY (roomname));
1537
1538   self = empathy_dispatcher_dup_singleton ();
1539   priv = GET_PRIV (self);
1540
1541   connection_data = g_hash_table_lookup (priv->connections, connection);
1542   g_assert (connection_data != NULL);
1543
1544   /* Don't know the room handle yet */
1545   request_data  = new_dispatcher_request_data (self, connection,
1546     TP_IFACE_CHANNEL_TYPE_TEXT, TP_HANDLE_TYPE_ROOM, 0, NULL,
1547     NULL, callback, user_data);
1548   request_data->should_ensure = TRUE;
1549
1550   connection_data->outstanding_requests = g_list_prepend
1551     (connection_data->outstanding_requests, request_data);
1552
1553   request_data->pending_call = tp_cli_connection_call_request_handles (
1554     connection, -1,
1555     TP_HANDLE_TYPE_ROOM, names,
1556     dispatcher_request_handles_cb, request_data, NULL, NULL);
1557
1558   g_object_unref (self);
1559 }
1560
1561 static void
1562 dispatcher_create_channel_cb (TpConnection *connect,
1563                               const gchar *object_path,
1564                               GHashTable *properties,
1565                               const GError *error,
1566                               gpointer user_data,
1567                               GObject *weak_object)
1568 {
1569   DispatcherRequestData *request_data = (DispatcherRequestData *) user_data;
1570   EmpathyDispatcher *self =
1571       EMPATHY_DISPATCHER (request_data->dispatcher);
1572
1573   request_data->pending_call = NULL;
1574
1575   dispatcher_connection_new_requested_channel (self,
1576     request_data, object_path, properties, error);
1577 }
1578
1579 static void
1580 dispatcher_ensure_channel_cb (TpConnection *connect,
1581                               gboolean is_ours,
1582                               const gchar *object_path,
1583                               GHashTable *properties,
1584                               const GError *error,
1585                               gpointer user_data,
1586                               GObject *weak_object)
1587 {
1588   DispatcherRequestData *request_data = (DispatcherRequestData *) user_data;
1589   EmpathyDispatcher *self =
1590       EMPATHY_DISPATCHER (request_data->dispatcher);
1591
1592   request_data->pending_call = NULL;
1593
1594   dispatcher_connection_new_requested_channel (self,
1595     request_data, object_path, properties, error);
1596 }
1597
1598 static void
1599 empathy_dispatcher_call_create_or_ensure_channel (
1600     EmpathyDispatcher *self,
1601     DispatcherRequestData *request_data)
1602 {
1603   if (request_data->should_ensure)
1604     {
1605       request_data->pending_call =
1606           tp_cli_connection_interface_requests_call_ensure_channel (
1607           request_data->connection, -1,
1608           request_data->request, dispatcher_ensure_channel_cb,
1609           request_data, NULL, NULL);
1610     }
1611   else
1612     {
1613       request_data->pending_call =
1614           tp_cli_connection_interface_requests_call_create_channel (
1615           request_data->connection, -1,
1616           request_data->request, dispatcher_create_channel_cb,
1617           request_data, NULL, NULL);
1618     }
1619 }
1620
1621 /**
1622  * empathy_dispatcher_create_channel:
1623  * @self: the EmpathyDispatcher
1624  * @connection: the Connection to dispatch on
1625  * @request: an a{sv} map of properties for the request, i.e. using tp_asv_new()
1626  * @callback: a callback for when the channel arrives (or NULL)
1627  * @user_data: optional user data (or NULL)
1628  *
1629  * When calling this function, #EmpathyDispatcher takes ownership of your
1630  * reference to @request. DO NOT unref or destroy @request. When the request is
1631  * done, @request will be unreferenced. Take another reference if you want to
1632  * keep it around.
1633  */
1634 void
1635 empathy_dispatcher_create_channel (EmpathyDispatcher *self,
1636                                    TpConnection *connection,
1637                                    GHashTable *request,
1638                                    EmpathyDispatcherRequestCb *callback,
1639                                    gpointer user_data)
1640 {
1641   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1642   ConnectionData *connection_data;
1643   DispatcherRequestData *request_data;
1644   const gchar *channel_type;
1645   guint handle_type;
1646   guint handle;
1647   gboolean valid;
1648
1649   g_return_if_fail (EMPATHY_IS_DISPATCHER (self));
1650   g_return_if_fail (TP_IS_CONNECTION (connection));
1651   g_return_if_fail (request != NULL);
1652
1653   connection_data = g_hash_table_lookup (priv->connections, connection);
1654   g_assert (connection_data != NULL);
1655
1656   channel_type = tp_asv_get_string (request, TP_IFACE_CHANNEL ".ChannelType");
1657
1658   handle_type = tp_asv_get_uint32 (request,
1659     TP_IFACE_CHANNEL ".TargetHandleType", &valid);
1660   if (!valid)
1661     handle_type = TP_UNKNOWN_HANDLE_TYPE;
1662
1663   handle = tp_asv_get_uint32 (request, TP_IFACE_CHANNEL ".TargetHandle", NULL);
1664
1665   request_data  = new_dispatcher_request_data (self, connection,
1666     channel_type, handle_type, handle, request,
1667     NULL, callback, user_data);
1668
1669   connection_data->outstanding_requests = g_list_prepend
1670     (connection_data->outstanding_requests, request_data);
1671
1672   empathy_dispatcher_call_create_or_ensure_channel (self, request_data);
1673 }
1674
1675 static gboolean
1676 channel_class_matches (GValueArray *class,
1677                        const char *channel_type,
1678                        guint handle_type,
1679                        GArray *fixed_properties)
1680 {
1681   GHashTable *fprops;
1682   GValue *v;
1683   const char *c_type;
1684   guint h_type;
1685   gboolean valid;
1686
1687   v = g_value_array_get_nth (class, 0);
1688
1689   /* if the class doesn't match channel type discard it. */
1690   fprops = g_value_get_boxed (v);
1691   c_type = tp_asv_get_string (fprops, TP_IFACE_CHANNEL ".ChannelType");
1692
1693   if (tp_strdiff (channel_type, c_type))
1694     return FALSE;
1695
1696   /* we have the right channel type, see if the handle type matches */
1697   h_type = tp_asv_get_uint32 (fprops,
1698                               TP_IFACE_CHANNEL ".TargetHandleType", &valid);
1699
1700   if (!valid || handle_type != h_type)
1701     return FALSE;
1702
1703   if (fixed_properties != NULL)
1704     {
1705       gpointer h_key, h_val;
1706       guint idx;
1707       GHashTableIter iter;
1708       gboolean found;
1709
1710       g_hash_table_iter_init (&iter, fprops);
1711
1712       while (g_hash_table_iter_next (&iter, &h_key, &h_val))
1713         {
1714           /* discard ChannelType and TargetHandleType, as we already
1715            * checked them.
1716            */
1717           if (!tp_strdiff ((char *) h_key, TP_IFACE_CHANNEL ".ChannelType") ||
1718               !tp_strdiff
1719                 ((char *) h_key, TP_IFACE_CHANNEL ".TargetHandleType"))
1720             continue;
1721
1722           found = FALSE;
1723
1724           for (idx = 0; idx < fixed_properties->len; idx++)
1725             {
1726               /* if |key| doesn't exist in |fixed_properties|, discard
1727                * the class.
1728                */
1729               if (!tp_strdiff
1730                     ((char *) h_key,
1731                      g_array_index (fixed_properties, char *, idx)))
1732                 {
1733                   found = TRUE;
1734                   /* exit the for() loop */
1735                   break;
1736                 }
1737             }
1738
1739           if (!found)
1740             return FALSE;
1741         }
1742     }
1743   else
1744     {
1745       /* if no fixed_properties are specified, discard the classes
1746        * with some fixed properties other than the two we already
1747        * checked.
1748        */
1749       if (g_hash_table_size (fprops) > 2)
1750         return FALSE;
1751     }
1752
1753   return TRUE;
1754 }
1755
1756 static GList *
1757 empathy_dispatcher_find_channel_classes (EmpathyDispatcher *self,
1758                                          TpConnection *connection,
1759                                          const gchar *channel_type,
1760                                          guint handle_type,
1761                                          GArray *fixed_properties)
1762 {
1763   EmpathyDispatcherPriv *priv = GET_PRIV (self);
1764   GValueArray *class;
1765   GPtrArray *classes;
1766   GList *matching_classes;
1767   guint i;
1768   ConnectionData *cd;
1769
1770   g_return_val_if_fail (channel_type != NULL, NULL);
1771   g_return_val_if_fail (handle_type != 0, NULL);
1772
1773   cd = g_hash_table_lookup (priv->connections, connection);
1774
1775   if (cd == NULL)
1776     return NULL;
1777
1778   classes = cd->requestable_channels;
1779   if (classes == NULL)
1780     return NULL;
1781
1782   matching_classes = NULL;
1783
1784   for (i = 0; i < classes->len; i++)
1785     {
1786       class = g_ptr_array_index (classes, i);
1787
1788       if (!channel_class_matches
1789           (class, channel_type, handle_type, fixed_properties))
1790         continue;
1791
1792       matching_classes = g_list_prepend (matching_classes, class);
1793     }
1794
1795   return matching_classes;
1796 }
1797
1798 static gboolean
1799 find_channel_class_idle_cb (gpointer user_data)
1800 {
1801   GList *retval;
1802   GList *requests;
1803   FindChannelRequest *request = user_data;
1804   ConnectionData *cd;
1805   gboolean is_ready = TRUE;
1806   EmpathyDispatcherPriv *priv = GET_PRIV (request->dispatcher);
1807
1808   g_hash_table_remove (priv->request_channel_class_async_ids, request);
1809
1810   cd = g_hash_table_lookup (priv->connections, request->connection);
1811
1812   if (cd == NULL)
1813     is_ready = FALSE;
1814   else if (cd->requestable_channels == NULL)
1815     is_ready = FALSE;
1816
1817   if (is_ready)
1818     {
1819       retval = empathy_dispatcher_find_channel_classes (request->dispatcher,
1820           request->connection, request->channel_type, request->handle_type,
1821           request->properties);
1822
1823       request->callback (retval, request->user_data);
1824       free_find_channel_request (request);
1825       g_list_free (retval);
1826
1827       return FALSE;
1828     }
1829
1830   requests = g_hash_table_lookup (priv->outstanding_classes_requests,
1831       request->connection);
1832   requests = g_list_prepend (requests, request);
1833
1834   g_hash_table_insert (priv->outstanding_classes_requests,
1835       request->connection, requests);
1836
1837   return FALSE;
1838 }
1839
1840 static GArray *
1841 setup_varargs (va_list var_args,
1842                const char *channel_namespace,
1843                const char *first_property_name)
1844 {
1845   const char *name;
1846   char *name_full;
1847   GArray *properties;
1848
1849   if (first_property_name == NULL)
1850     return NULL;
1851
1852   name = first_property_name;
1853   properties = g_array_new (TRUE, TRUE, sizeof (char *));
1854
1855   while (name != NULL)
1856     {
1857       name_full = g_strdup (name);
1858       properties = g_array_append_val (properties, name_full);
1859       name = va_arg (var_args, char *);
1860     }
1861
1862   return properties;
1863 }
1864
1865 /**
1866  * empathy_dispatcher_find_requestable_channel_classes:
1867  * @dispatcher: an #EmpathyDispatcher
1868  * @connection: a #TpConnection
1869  * @channel_type: a string identifying the type of the channel to lookup
1870  * @handle_type: the handle type for the channel
1871  * @first_property_name: %NULL, or the name of the first fixed property,
1872  * followed optionally by more names, followed by %NULL.
1873  *
1874  * Returns all the channel classes that a client can request for the connection
1875  * @connection, of the type identified by @channel_type, @handle_type and the
1876  * fixed properties list.
1877  * The classes which are compatible with a fixed properties list (i.e. those
1878  * that will be returned by this function) are intended as those that do not
1879  * contain any fixed property other than those in the list; note that this
1880  * doesn't guarantee that all the classes compatible with the list will contain
1881  * all the requested fixed properties, so the clients will have to filter
1882  * the returned list themselves.
1883  * If @first_property_name is %NULL, only the classes with no other fixed
1884  * properties than ChannelType and TargetHandleType will be returned.
1885  * Note that this function may return %NULL without performing any lookup if
1886  * @connection is not ready. To ensure that @connection is always ready,
1887  * use the empathy_dispatcher_find_requestable_channel_classes_async() variant.
1888  *
1889  * Return value: a #GList of #GValueArray objects, where the first element in
1890  * the array is a #GHashTable of the fixed properties, and the second is
1891  * a #GStrv of the allowed properties for the class. The list should be free'd
1892  * with g_list_free() when done, but the objects inside the list are owned
1893  * by the #EmpathyDispatcher and must not be modified.
1894  */
1895 GList *
1896 empathy_dispatcher_find_requestable_channel_classes
1897                                  (EmpathyDispatcher *self,
1898                                   TpConnection *connection,
1899                                   const gchar *channel_type,
1900                                   guint handle_type,
1901                                   const char *first_property_name,
1902                                   ...)
1903 {
1904   va_list var_args;
1905   GArray *properties;
1906   EmpathyDispatcherPriv *priv;
1907   GList *retval;
1908   guint idx;
1909   char *str;
1910
1911   g_return_val_if_fail (EMPATHY_IS_DISPATCHER (self), NULL);
1912   g_return_val_if_fail (TP_IS_CONNECTION (connection), NULL);
1913   g_return_val_if_fail (channel_type != NULL, NULL);
1914   g_return_val_if_fail (handle_type != 0, NULL);
1915
1916   priv = GET_PRIV (self);
1917
1918   va_start (var_args, first_property_name);
1919
1920   properties = setup_varargs (var_args, channel_type, first_property_name);
1921
1922   va_end (var_args);
1923
1924   retval = empathy_dispatcher_find_channel_classes (self, connection,
1925     channel_type, handle_type, properties);
1926
1927   if (properties != NULL)
1928     {
1929       /* free the properties array */
1930       for (idx = 0; idx < properties->len ; idx++)
1931         {
1932           str = g_array_index (properties, char *, idx);
1933           g_free (str);
1934         }
1935
1936       g_array_free (properties, TRUE);
1937     }
1938
1939   return retval;
1940 }
1941
1942 /**
1943  * empathy_dispatcher_find_requestable_channel_classes_async:
1944  * @dispatcher: an #EmpathyDispatcher
1945  * @connection: a #TpConnection
1946  * @channel_type: a string identifying the type of the channel to lookup
1947  * @handle_type: the handle type for the channel
1948  * @callback: the callback to call when @connection is ready
1949  * @user_data: the user data to pass to @callback
1950  * @first_property_name: %NULL, or the name of the first fixed property,
1951  * followed optionally by more names, followed by %NULL.
1952  *
1953  * Please see the documentation of
1954  * empathy_dispatcher_find_requestable_channel_classes() for a detailed
1955  * description of this function.
1956  */
1957 void
1958 empathy_dispatcher_find_requestable_channel_classes_async
1959                                  (EmpathyDispatcher *self,
1960                                   TpConnection *connection,
1961                                   const gchar *channel_type,
1962                                   guint handle_type,
1963                                   EmpathyDispatcherFindChannelClassCb callback,
1964                                   gpointer user_data,
1965                                   const char *first_property_name,
1966                                   ...)
1967 {
1968   va_list var_args;
1969   GArray *properties;
1970   FindChannelRequest *request;
1971   EmpathyDispatcherPriv *priv;
1972   guint source_id;
1973
1974   g_return_if_fail (EMPATHY_IS_DISPATCHER (self));
1975   g_return_if_fail (TP_IS_CONNECTION (connection));
1976   g_return_if_fail (channel_type != NULL);
1977   g_return_if_fail (handle_type != 0);
1978
1979   priv = GET_PRIV (self);
1980
1981   va_start (var_args, first_property_name);
1982
1983   properties = setup_varargs (var_args, channel_type, first_property_name);
1984
1985   va_end (var_args);
1986
1987   /* append another request for this connection */
1988   request = g_slice_new0 (FindChannelRequest);
1989   request->dispatcher = g_object_ref (self);
1990   request->channel_type = g_strdup (channel_type);
1991   request->handle_type = handle_type;
1992   request->connection = connection;
1993   request->callback = callback;
1994   request->user_data = user_data;
1995   request->properties = properties;
1996
1997   source_id = g_idle_add (find_channel_class_idle_cb, request);
1998
1999   g_hash_table_insert (priv->request_channel_class_async_ids,
2000     request, GUINT_TO_POINTER (source_id));
2001 }
2002
2003 static GList *
2004 empathy_dispatcher_get_channels (EmpathyHandler *handler,
2005   gpointer user_data)
2006 {
2007   EmpathyDispatcher *self = EMPATHY_DISPATCHER (user_data);
2008   EmpathyDispatcherPriv *priv = GET_PRIV (self);
2009
2010   return priv->channels;
2011 }
2012
2013 static gboolean
2014 empathy_dispatcher_handle_channels (EmpathyHandler *handler,
2015     const gchar *account_path,
2016     const gchar *connection_path,
2017     const GPtrArray *channels,
2018     const GPtrArray *requests_satisfied,
2019     guint64 timestamp,
2020     GHashTable *handler_info,
2021     gpointer user_data,
2022     GError **error)
2023 {
2024   EmpathyDispatcher *self = EMPATHY_DISPATCHER (user_data);
2025   EmpathyDispatcherPriv *priv = GET_PRIV (self);
2026   guint i;
2027   TpAccount *account;
2028   TpConnection *connection;
2029
2030   /* FIXME: should probably find out whether the account manager is prepared
2031    * before ensuring. See bug #600111. */
2032   account = tp_account_manager_ensure_account (priv->account_manager,
2033     account_path);
2034   g_assert (account != NULL);
2035
2036   connection = tp_account_ensure_connection (account, connection_path);
2037   if (connection == NULL)
2038     {
2039       g_set_error_literal (error, TP_ERRORS, TP_ERROR_INVALID_ARGUMENT,
2040         "Invalid connection argument");
2041       return FALSE;
2042     }
2043
2044   for (i = 0; i < channels->len ; i++)
2045     {
2046       GValueArray *arr = g_ptr_array_index (channels, i);
2047       const gchar *object_path;
2048       GHashTable *properties;
2049
2050       object_path = g_value_get_boxed (g_value_array_get_nth (arr, 0));
2051       properties = g_value_get_boxed (g_value_array_get_nth (arr, 1));
2052
2053       dispatcher_connection_new_channel_with_properties (self,
2054         connection, object_path, properties);
2055     }
2056
2057   return TRUE;
2058 }
2059
2060
2061 EmpathyHandler *
2062 empathy_dispatcher_add_handler (EmpathyDispatcher *self,
2063     const gchar *name,
2064     GPtrArray *filters,
2065     GStrv capabilities)
2066 {
2067   EmpathyDispatcherPriv *priv = GET_PRIV (self);
2068   EmpathyHandler *handler;
2069
2070   handler = empathy_handler_new (name, filters, capabilities);
2071   priv->handlers = g_list_prepend (priv->handlers, handler);
2072
2073   /* Only set the handle_channels function, the Channel property on the main
2074    * handler will always report all dispatched channels even if they came from
2075    * a different Handler */
2076   empathy_handler_set_handle_channels_func (handler,
2077     empathy_dispatcher_handle_channels, self);
2078
2079   return handler;
2080 }
2081
2082 void
2083 empathy_dispatcher_remove_handler (EmpathyDispatcher *self,
2084   EmpathyHandler *handler)
2085 {
2086   EmpathyDispatcherPriv *priv = GET_PRIV (self);
2087   GList *h;
2088
2089   h = g_list_find (priv->handlers, handler);
2090   g_return_if_fail (h != NULL);
2091
2092   priv->handlers = g_list_delete_link (priv->handlers, h);
2093
2094   g_object_unref (handler);
2095 }