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