]> git.0d.be Git - empathy.git/blob - libempathy/empathy-contact.c
License to publish the author's pastebin API developer key in open
[empathy.git] / libempathy / empathy-contact.c
1 /* -*- Mode: C; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2; -*- */
2 /*
3  * Copyright (C) 2007-2009 Collabora Ltd.
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Lesser General Public
7  * License as published by the Free Software Foundation; either
8  * version 2.1 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Lesser General Public License for more details.
14  *
15  * You should have received a copy of the GNU Lesser General Public
16  * License along with this library; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
18  *
19  * Authors: Xavier Claessens <xclaesse@gmail.com>
20  */
21
22 #include "config.h"
23
24 #include <string.h>
25
26 #include <glib/gi18n-lib.h>
27
28 #include <telepathy-glib/account-manager.h>
29 #include <telepathy-glib/interfaces.h>
30 #include <telepathy-glib/util.h>
31 #include <telepathy-yell/telepathy-yell.h>
32
33 #include <telepathy-logger/log-manager.h>
34
35 #include <folks/folks.h>
36 #include <folks/folks-telepathy.h>
37
38 #ifdef HAVE_GEOCODE
39 #include <geocode-glib/geocode-glib.h>
40 #endif
41
42 #include "empathy-contact.h"
43 #include "empathy-camera-monitor.h"
44 #include "empathy-individual-manager.h"
45 #include "empathy-utils.h"
46 #include "empathy-enum-types.h"
47 #include "empathy-location.h"
48
49 #define DEBUG_FLAG EMPATHY_DEBUG_CONTACT
50 #include "empathy-debug.h"
51
52 #define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyContact)
53 typedef struct {
54   TpContact *tp_contact;
55   TpAccount *account;
56   FolksPersona *persona;
57   gchar *id;
58   gchar *alias;
59   gchar *logged_alias;
60   EmpathyAvatar *avatar;
61   TpConnectionPresenceType presence;
62   guint handle;
63   EmpathyCapabilities capabilities;
64   gboolean is_user;
65   guint hash;
66   /* Location is composed of string keys and GValues.
67    * Example: a "city" key would have "Helsinki" as string GValue,
68    *          a "latitude" would have 65.0 as double GValue.
69    *
70    * This is a super set of the location stored in TpContact as we can try add
71    * more fields by searching the address using geoclue.
72    */
73   GHashTable *location;
74   GeeHashSet *groups;
75   gchar **client_types;
76 } EmpathyContactPriv;
77
78 static void contact_finalize (GObject *object);
79 static void contact_get_property (GObject *object, guint param_id,
80     GValue *value, GParamSpec *pspec);
81 static void contact_set_property (GObject *object, guint param_id,
82     const GValue *value, GParamSpec *pspec);
83
84 #ifdef HAVE_GEOCODE
85 static void update_geocode (EmpathyContact *contact);
86 #endif
87
88 static void empathy_contact_set_location (EmpathyContact *contact,
89     GHashTable *location);
90
91 static void contact_set_client_types (EmpathyContact *contact,
92     const gchar * const *types);
93
94 static void set_capabilities_from_tp_caps (EmpathyContact *self,
95     TpCapabilities *caps);
96
97 static void contact_set_avatar (EmpathyContact *contact,
98     EmpathyAvatar *avatar);
99 static void contact_set_avatar_from_tp_contact (EmpathyContact *contact);
100 static gboolean contact_load_avatar_cache (EmpathyContact *contact,
101     const gchar *token);
102
103 G_DEFINE_TYPE (EmpathyContact, empathy_contact, G_TYPE_OBJECT);
104
105 enum
106 {
107   PROP_0,
108   PROP_TP_CONTACT,
109   PROP_ACCOUNT,
110   PROP_PERSONA,
111   PROP_ID,
112   PROP_ALIAS,
113   PROP_LOGGED_ALIAS,
114   PROP_AVATAR,
115   PROP_PRESENCE,
116   PROP_PRESENCE_MESSAGE,
117   PROP_HANDLE,
118   PROP_CAPABILITIES,
119   PROP_IS_USER,
120   PROP_LOCATION,
121   PROP_CLIENT_TYPES
122 };
123
124 enum {
125   PRESENCE_CHANGED,
126   LAST_SIGNAL
127 };
128
129 static guint signals[LAST_SIGNAL];
130
131 /* TpContact* -> EmpathyContact*, both borrowed ref */
132 static GHashTable *contacts_table = NULL;
133
134 static void
135 tp_contact_notify_cb (TpContact *tp_contact,
136                       GParamSpec *param,
137                       GObject *contact)
138 {
139   EmpathyContactPriv *priv = GET_PRIV (contact);
140
141   /* Forward property notifications */
142   if (!tp_strdiff (param->name, "alias"))
143     g_object_notify (contact, "alias");
144   else if (!tp_strdiff (param->name, "presence-type")) {
145     TpConnectionPresenceType presence;
146
147     presence = empathy_contact_get_presence (EMPATHY_CONTACT (contact));
148     g_signal_emit (contact, signals[PRESENCE_CHANGED], 0, presence,
149       priv->presence);
150     priv->presence = presence;
151     g_object_notify (contact, "presence");
152   }
153   else if (!tp_strdiff (param->name, "identifier"))
154     g_object_notify (contact, "id");
155   else if (!tp_strdiff (param->name, "handle"))
156     g_object_notify (contact, "handle");
157   else if (!tp_strdiff (param->name, "location"))
158     {
159       GHashTable *location;
160
161       location = tp_contact_get_location (tp_contact);
162       /* This will start a geoclue search to find the address if needed */
163       empathy_contact_set_location (EMPATHY_CONTACT (contact), location);
164     }
165   else if (!tp_strdiff (param->name, "capabilities"))
166     {
167       set_capabilities_from_tp_caps (EMPATHY_CONTACT (contact),
168           tp_contact_get_capabilities (tp_contact));
169     }
170   else if (!tp_strdiff (param->name, "avatar-file"))
171     {
172       contact_set_avatar_from_tp_contact (EMPATHY_CONTACT (contact));
173     }
174   else if (!tp_strdiff (param->name, "client-types"))
175     {
176       contact_set_client_types (EMPATHY_CONTACT (contact),
177           tp_contact_get_client_types (tp_contact));
178     }
179 }
180
181 static void
182 folks_persona_notify_cb (FolksPersona *folks_persona,
183                          GParamSpec *param,
184                          GObject *contact)
185 {
186   if (!tp_strdiff (param->name, "presence-message"))
187     g_object_notify (contact, "presence-message");
188 }
189
190 static void
191 contact_dispose (GObject *object)
192 {
193   EmpathyContactPriv *priv = GET_PRIV (object);
194
195   if (priv->tp_contact != NULL)
196     {
197       g_signal_handlers_disconnect_by_func (priv->tp_contact,
198           tp_contact_notify_cb, object);
199     }
200   tp_clear_object (&priv->tp_contact);
201
202   if (priv->account)
203     g_object_unref (priv->account);
204   priv->account = NULL;
205
206   if (priv->persona)
207     {
208       g_signal_handlers_disconnect_by_func (priv->persona,
209           folks_persona_notify_cb, object);
210       g_object_unref (priv->persona);
211     }
212   priv->persona = NULL;
213
214   if (priv->avatar != NULL)
215     {
216       empathy_avatar_unref (priv->avatar);
217       priv->avatar = NULL;
218     }
219
220   if (priv->location != NULL)
221     {
222       g_hash_table_unref (priv->location);
223       priv->location = NULL;
224     }
225
226   G_OBJECT_CLASS (empathy_contact_parent_class)->dispose (object);
227 }
228
229 static void
230 contact_constructed (GObject *object)
231 {
232   EmpathyContact *contact = (EmpathyContact *) object;
233   EmpathyContactPriv *priv = GET_PRIV (contact);
234   GHashTable *location;
235   TpHandle self_handle;
236   TpHandle handle;
237   const gchar * const *client_types;
238
239   if (priv->tp_contact == NULL)
240     return;
241
242   priv->presence = empathy_contact_get_presence (contact);
243
244   location = tp_contact_get_location (priv->tp_contact);
245   if (location != NULL)
246     empathy_contact_set_location (contact, location);
247
248   client_types = tp_contact_get_client_types (priv->tp_contact);
249   if (client_types != NULL)
250     contact_set_client_types (contact, client_types);
251
252   set_capabilities_from_tp_caps (contact,
253       tp_contact_get_capabilities (priv->tp_contact));
254
255   contact_set_avatar_from_tp_contact (contact);
256
257   /* Set is-user property. Note that it could still be the handle is
258    * different from the connection's self handle, in the case the handle
259    * comes from a group interface. */
260   self_handle = tp_connection_get_self_handle (
261       tp_contact_get_connection (priv->tp_contact));
262   handle = tp_contact_get_handle (priv->tp_contact);
263   empathy_contact_set_is_user (contact, self_handle == handle);
264
265   g_signal_connect (priv->tp_contact, "notify",
266     G_CALLBACK (tp_contact_notify_cb), contact);
267 }
268
269 static void
270 empathy_contact_class_init (EmpathyContactClass *class)
271 {
272   GObjectClass *object_class;
273
274   object_class = G_OBJECT_CLASS (class);
275
276   object_class->finalize = contact_finalize;
277   object_class->dispose = contact_dispose;
278   object_class->get_property = contact_get_property;
279   object_class->set_property = contact_set_property;
280   object_class->constructed = contact_constructed;
281
282   g_object_class_install_property (object_class,
283       PROP_TP_CONTACT,
284       g_param_spec_object ("tp-contact",
285         "TpContact",
286         "The TpContact associated with the contact",
287         TP_TYPE_CONTACT,
288         G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
289
290   g_object_class_install_property (object_class,
291       PROP_ACCOUNT,
292       g_param_spec_object ("account",
293         "The account",
294         "The account associated with the contact",
295         TP_TYPE_ACCOUNT,
296         G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
297
298   g_object_class_install_property (object_class,
299       PROP_PERSONA,
300       g_param_spec_object ("persona",
301         "Persona",
302         "The FolksPersona associated with the contact",
303         FOLKS_TYPE_PERSONA,
304         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
305
306   g_object_class_install_property (object_class,
307       PROP_ID,
308       g_param_spec_string ("id",
309         "Contact id",
310         "String identifying contact",
311         NULL,
312         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
313
314   g_object_class_install_property (object_class,
315       PROP_ALIAS,
316       g_param_spec_string ("alias",
317         "Contact alias",
318         "An alias for the contact",
319         NULL,
320         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
321
322   g_object_class_install_property (object_class,
323       PROP_LOGGED_ALIAS,
324       g_param_spec_string ("logged-alias",
325         "Logged alias",
326         "The alias the user had when a message was logged, "
327         "only set when using empathy_contact_from_tpl_contact()",
328         NULL,
329         G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
330
331   g_object_class_install_property (object_class,
332       PROP_AVATAR,
333       g_param_spec_boxed ("avatar",
334         "Avatar image",
335         "The avatar image",
336         EMPATHY_TYPE_AVATAR,
337         G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
338
339   g_object_class_install_property (object_class,
340       PROP_PRESENCE,
341       g_param_spec_uint ("presence",
342         "Contact presence",
343         "Presence of contact",
344         TP_CONNECTION_PRESENCE_TYPE_UNSET,
345         NUM_TP_CONNECTION_PRESENCE_TYPES,
346         TP_CONNECTION_PRESENCE_TYPE_UNSET,
347         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
348
349   g_object_class_install_property (object_class,
350       PROP_PRESENCE_MESSAGE,
351       g_param_spec_string ("presence-message",
352         "Contact presence message",
353         "Presence message of contact",
354         NULL,
355         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
356
357   g_object_class_install_property (object_class,
358       PROP_HANDLE,
359       g_param_spec_uint ("handle",
360         "Contact Handle",
361         "The handle of the contact",
362         0,
363         G_MAXUINT,
364         0,
365         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
366
367   g_object_class_install_property (object_class,
368       PROP_CAPABILITIES,
369       g_param_spec_flags ("capabilities",
370         "Contact Capabilities",
371         "Capabilities of the contact",
372         EMPATHY_TYPE_CAPABILITIES,
373         EMPATHY_CAPABILITIES_UNKNOWN,
374         G_PARAM_CONSTRUCT | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
375
376   g_object_class_install_property (object_class,
377       PROP_IS_USER,
378       g_param_spec_boolean ("is-user",
379         "Contact is-user",
380         "Is contact the user",
381         FALSE,
382         G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
383
384
385   g_object_class_install_property (object_class,
386       PROP_LOCATION,
387       g_param_spec_boxed ("location",
388         "Contact location",
389         "Physical location of the contact",
390         G_TYPE_HASH_TABLE,
391         G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
392
393   g_object_class_install_property (object_class,
394       PROP_CLIENT_TYPES,
395       g_param_spec_boxed ("client-types",
396         "Contact client types",
397         "Client types of the contact",
398         G_TYPE_STRV,
399         G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
400
401   signals[PRESENCE_CHANGED] =
402     g_signal_new ("presence-changed",
403                   G_TYPE_FROM_CLASS (class),
404                   G_SIGNAL_RUN_LAST,
405                   0,
406                   NULL, NULL,
407                   g_cclosure_marshal_generic,
408                   G_TYPE_NONE,
409                   2, G_TYPE_UINT,
410                   G_TYPE_UINT);
411
412   g_type_class_add_private (object_class, sizeof (EmpathyContactPriv));
413 }
414
415 static void
416 empathy_contact_init (EmpathyContact *contact)
417 {
418   EmpathyContactPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (contact,
419     EMPATHY_TYPE_CONTACT, EmpathyContactPriv);
420
421   contact->priv = priv;
422
423   priv->location = NULL;
424   priv->client_types = NULL;
425   priv->groups = NULL;
426 }
427
428 static void
429 contact_finalize (GObject *object)
430 {
431   EmpathyContactPriv *priv;
432
433   priv = GET_PRIV (object);
434
435   DEBUG ("finalize: %p", object);
436
437   g_clear_object (&priv->groups);
438   g_free (priv->alias);
439   g_free (priv->id);
440   g_strfreev (priv->client_types);
441
442   G_OBJECT_CLASS (empathy_contact_parent_class)->finalize (object);
443 }
444
445 static void
446 empathy_contact_set_capabilities (EmpathyContact *contact,
447                                   EmpathyCapabilities capabilities)
448 {
449   EmpathyContactPriv *priv;
450
451   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
452
453   priv = GET_PRIV (contact);
454
455   if (priv->capabilities == capabilities)
456     return;
457
458   priv->capabilities = capabilities;
459
460   g_object_notify (G_OBJECT (contact), "capabilities");
461 }
462
463 static void
464 empathy_contact_set_id (EmpathyContact *contact,
465                         const gchar *id)
466 {
467   EmpathyContactPriv *priv;
468
469   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
470   g_return_if_fail (id != NULL);
471
472   priv = GET_PRIV (contact);
473
474   /* We temporally ref the contact because it could be destroyed
475    * during the signal emition */
476   g_object_ref (contact);
477   if (tp_strdiff (id, priv->id))
478     {
479       g_free (priv->id);
480       priv->id = g_strdup (id);
481
482       g_object_notify (G_OBJECT (contact), "id");
483       if (EMP_STR_EMPTY (priv->alias))
484           g_object_notify (G_OBJECT (contact), "alias");
485     }
486
487   g_object_unref (contact);
488 }
489
490 static void
491 empathy_contact_set_presence (EmpathyContact *contact,
492                               TpConnectionPresenceType presence)
493 {
494   EmpathyContactPriv *priv;
495   TpConnectionPresenceType old_presence;
496
497   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
498
499   priv = GET_PRIV (contact);
500
501   if (presence == priv->presence)
502     return;
503
504   old_presence = priv->presence;
505   priv->presence = presence;
506
507   g_signal_emit (contact, signals[PRESENCE_CHANGED], 0, presence, old_presence);
508
509   g_object_notify (G_OBJECT (contact), "presence");
510 }
511
512 static void
513 empathy_contact_set_presence_message (EmpathyContact *contact,
514                                       const gchar *message)
515 {
516   EmpathyContactPriv *priv = GET_PRIV (contact);
517
518   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
519
520   if (priv->persona != NULL)
521     {
522       folks_presence_details_set_presence_message (
523           FOLKS_PRESENCE_DETAILS (priv->persona), message);
524     }
525 }
526
527 static void
528 empathy_contact_set_handle (EmpathyContact *contact,
529                             guint handle)
530 {
531   EmpathyContactPriv *priv;
532
533   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
534
535   priv = GET_PRIV (contact);
536
537   g_object_ref (contact);
538   if (handle != priv->handle)
539     {
540       priv->handle = handle;
541       g_object_notify (G_OBJECT (contact), "handle");
542     }
543   g_object_unref (contact);
544 }
545
546 static void
547 contact_get_property (GObject *object,
548                       guint param_id,
549                       GValue *value,
550                       GParamSpec *pspec)
551 {
552   EmpathyContact *contact = EMPATHY_CONTACT (object);
553
554   switch (param_id)
555     {
556       case PROP_TP_CONTACT:
557         g_value_set_object (value, empathy_contact_get_tp_contact (contact));
558         break;
559       case PROP_ACCOUNT:
560         g_value_set_object (value, empathy_contact_get_account (contact));
561         break;
562       case PROP_PERSONA:
563         g_value_set_object (value, empathy_contact_get_persona (contact));
564         break;
565       case PROP_ID:
566         g_value_set_string (value, empathy_contact_get_id (contact));
567         break;
568       case PROP_ALIAS:
569         g_value_set_string (value, empathy_contact_get_alias (contact));
570         break;
571       case PROP_LOGGED_ALIAS:
572         g_value_set_string (value, empathy_contact_get_logged_alias (contact));
573         break;
574       case PROP_AVATAR:
575         g_value_set_boxed (value, empathy_contact_get_avatar (contact));
576         break;
577       case PROP_PRESENCE:
578         g_value_set_uint (value, empathy_contact_get_presence (contact));
579         break;
580       case PROP_PRESENCE_MESSAGE:
581         g_value_set_string (value, empathy_contact_get_presence_message (contact));
582         break;
583       case PROP_HANDLE:
584         g_value_set_uint (value, empathy_contact_get_handle (contact));
585         break;
586       case PROP_CAPABILITIES:
587         g_value_set_flags (value, empathy_contact_get_capabilities (contact));
588         break;
589       case PROP_IS_USER:
590         g_value_set_boolean (value, empathy_contact_is_user (contact));
591         break;
592       default:
593         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
594         break;
595     };
596 }
597
598 static void
599 contact_set_property (GObject *object,
600                       guint param_id,
601                       const GValue *value,
602                       GParamSpec *pspec)
603 {
604   EmpathyContact *contact = EMPATHY_CONTACT (object);
605   EmpathyContactPriv *priv = GET_PRIV (object);
606
607   switch (param_id)
608     {
609       case PROP_TP_CONTACT:
610         priv->tp_contact = g_value_dup_object (value);
611         break;
612       case PROP_ACCOUNT:
613         g_assert (priv->account == NULL);
614         priv->account = g_value_dup_object (value);
615         break;
616       case PROP_PERSONA:
617         empathy_contact_set_persona (contact, g_value_get_object (value));
618         break;
619       case PROP_ID:
620         empathy_contact_set_id (contact, g_value_get_string (value));
621         break;
622       case PROP_ALIAS:
623         empathy_contact_set_alias (contact, g_value_get_string (value));
624         break;
625       case PROP_LOGGED_ALIAS:
626         g_assert (priv->logged_alias == NULL);
627         priv->logged_alias = g_value_dup_string (value);
628         break;
629       case PROP_PRESENCE:
630         empathy_contact_set_presence (contact, g_value_get_uint (value));
631         break;
632       case PROP_PRESENCE_MESSAGE:
633         empathy_contact_set_presence_message (contact, g_value_get_string (value));
634         break;
635       case PROP_HANDLE:
636         empathy_contact_set_handle (contact, g_value_get_uint (value));
637         break;
638       case PROP_CAPABILITIES:
639         empathy_contact_set_capabilities (contact, g_value_get_flags (value));
640         break;
641       case PROP_IS_USER:
642         empathy_contact_set_is_user (contact, g_value_get_boolean (value));
643         break;
644       default:
645         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
646         break;
647     };
648 }
649
650 static void
651 remove_tp_contact (gpointer data,
652     GObject *object)
653 {
654   g_hash_table_remove (contacts_table, data);
655 }
656
657 static EmpathyContact *
658 empathy_contact_new (TpContact *tp_contact)
659 {
660   EmpathyContact *retval;
661
662   g_return_val_if_fail (TP_IS_CONTACT (tp_contact), NULL);
663
664   retval = g_object_new (EMPATHY_TYPE_CONTACT,
665       "tp-contact", tp_contact,
666       NULL);
667
668   g_object_weak_ref (G_OBJECT (retval), remove_tp_contact, tp_contact);
669
670   return retval;
671 }
672
673 typedef struct
674 {
675   TplEntity *entity;
676   TpAccount *account;
677 } FindContactData;
678
679 static gboolean
680 contact_is_tpl_entity (gpointer key,
681     gpointer value,
682     gpointer user_data)
683 {
684   EmpathyContact *contact = value;
685   FindContactData *data = user_data;
686   TpAccount *account = empathy_contact_get_account (contact);
687   const gchar *path = NULL;
688
689   if (account != NULL)
690     path = tp_proxy_get_object_path (account);
691
692   return !tp_strdiff (empathy_contact_get_id (contact),
693               tpl_entity_get_identifier (data->entity)) &&
694          !tp_strdiff (tp_proxy_get_object_path (data->account), path);
695 }
696
697 static void
698 get_contacts_cb (TpConnection *connection,
699     guint n_contacts,
700     TpContact * const *contacts,
701     const gchar * const *requested_ids,
702     GHashTable *failed_id_errors,
703     const GError *error,
704     gpointer user_data,
705     GObject *weak_object)
706 {
707   EmpathyContact *self = (EmpathyContact *) weak_object;
708   EmpathyContactPriv *priv = GET_PRIV (self);
709   TpContact *tp_contact;
710
711   if (n_contacts != 1)
712     return;
713
714   tp_contact = contacts[0];
715
716   g_return_if_fail (priv->tp_contact == NULL);
717   priv->tp_contact = g_object_ref (tp_contact);
718   g_object_notify (G_OBJECT (self), "tp-contact");
719
720   /* Update capabilities now that we have a TpContact */
721   set_capabilities_from_tp_caps (self,
722       tp_contact_get_capabilities (tp_contact));
723 }
724
725 EmpathyContact *
726 empathy_contact_from_tpl_contact (TpAccount *account,
727     TplEntity *tpl_entity)
728 {
729   EmpathyContact *retval;
730   gboolean is_user;
731   EmpathyContact *existing_contact = NULL;
732
733   g_return_val_if_fail (TPL_IS_ENTITY (tpl_entity), NULL);
734
735   if (contacts_table != NULL)
736     {
737       FindContactData data;
738
739       data.entity = tpl_entity;
740       data.account = account;
741
742       existing_contact = g_hash_table_find (contacts_table,
743         contact_is_tpl_entity, &data);
744     }
745
746   if (existing_contact != NULL)
747     {
748       retval = g_object_new (EMPATHY_TYPE_CONTACT,
749           "tp-contact", empathy_contact_get_tp_contact (existing_contact),
750           "logged-alias", tpl_entity_get_alias (tpl_entity),
751           NULL);
752     }
753   else
754     {
755       TpConnection *conn;
756       const gchar *id;
757
758       is_user = (TPL_ENTITY_SELF == tpl_entity_get_entity_type (tpl_entity));
759
760       id = tpl_entity_get_identifier (tpl_entity);
761
762       retval = g_object_new (EMPATHY_TYPE_CONTACT,
763           "id", id,
764           "alias", tpl_entity_get_alias (tpl_entity),
765           "account", account,
766           "is-user", is_user,
767           NULL);
768
769       /* Try to get a TpContact associated to have at least contact
770        * capabilities if possible. This is useful for CM supporting calling
771        * offline contacts for example. */
772       conn = tp_account_get_connection (account);
773       if (conn != NULL)
774         {
775           TpContactFeature features[] = { TP_CONTACT_FEATURE_CAPABILITIES };
776           conn = tp_account_get_connection (account);
777
778           tp_connection_get_contacts_by_id (conn, 1, &id,
779               G_N_ELEMENTS (features), features, get_contacts_cb,
780               NULL, NULL, G_OBJECT (retval));
781         }
782     }
783
784   if (!EMP_STR_EMPTY (tpl_entity_get_avatar_token (tpl_entity)))
785     contact_load_avatar_cache (retval,
786         tpl_entity_get_avatar_token (tpl_entity));
787
788   return retval;
789 }
790
791 TpContact *
792 empathy_contact_get_tp_contact (EmpathyContact *contact)
793 {
794   EmpathyContactPriv *priv;
795
796   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
797
798   priv = GET_PRIV (contact);
799
800   return priv->tp_contact;
801 }
802
803 const gchar *
804 empathy_contact_get_id (EmpathyContact *contact)
805 {
806   EmpathyContactPriv *priv;
807
808   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
809
810   priv = GET_PRIV (contact);
811
812   if (priv->tp_contact != NULL)
813     return tp_contact_get_identifier (priv->tp_contact);
814
815   return priv->id;
816 }
817
818 const gchar *
819 empathy_contact_get_alias (EmpathyContact *contact)
820 {
821   EmpathyContactPriv *priv;
822   const gchar        *alias = NULL;
823
824   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
825
826   priv = GET_PRIV (contact);
827
828   if (!EMP_STR_EMPTY (priv->alias))
829     alias = priv->alias;
830   else if (priv->tp_contact != NULL)
831     alias = tp_contact_get_alias (priv->tp_contact);
832
833   if (!EMP_STR_EMPTY (alias))
834     return alias;
835   else
836     return empathy_contact_get_id (contact);
837 }
838
839 const gchar *
840 empathy_contact_get_logged_alias (EmpathyContact *contact)
841 {
842   EmpathyContactPriv *priv;
843
844   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
845
846   priv = GET_PRIV (contact);
847
848   if (priv->logged_alias != NULL)
849     return priv->logged_alias;
850   else
851     return empathy_contact_get_alias (contact);
852 }
853
854 void
855 empathy_contact_set_alias (EmpathyContact *contact,
856                           const gchar *alias)
857 {
858   EmpathyContactPriv *priv;
859   FolksPersona *persona;
860
861   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
862
863   priv = GET_PRIV (contact);
864
865   g_object_ref (contact);
866
867   /* Set the alias on the persona if possible */
868   persona = empathy_contact_get_persona (contact);
869   if (persona != NULL && FOLKS_IS_ALIAS_DETAILS (persona))
870     {
871       DEBUG ("Setting alias for contact %s to %s",
872           empathy_contact_get_id (contact), alias);
873
874       folks_alias_details_set_alias (FOLKS_ALIAS_DETAILS (persona), alias);
875     }
876
877   if (tp_strdiff (alias, priv->alias))
878     {
879       g_free (priv->alias);
880       priv->alias = g_strdup (alias);
881       g_object_notify (G_OBJECT (contact), "alias");
882     }
883
884   g_object_unref (contact);
885 }
886
887 static void
888 groups_change_group_cb (GObject *source,
889     GAsyncResult *result,
890     gpointer user_data)
891 {
892   FolksGroupDetails *group_details = FOLKS_GROUP_DETAILS (source);
893   GError *error = NULL;
894
895   folks_group_details_change_group_finish (group_details, result, &error);
896   if (error != NULL)
897     {
898       g_warning ("failed to change group: %s", error->message);
899       g_clear_error (&error);
900     }
901 }
902
903 void
904 empathy_contact_change_group (EmpathyContact *contact, const gchar *group,
905     gboolean is_member)
906 {
907   EmpathyContactPriv *priv;
908   FolksPersona *persona;
909
910   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
911   g_return_if_fail (group != NULL);
912
913   priv = GET_PRIV (contact);
914
915   /* Normally pass through the changes to the persona */
916   persona = empathy_contact_get_persona (contact);
917   if (persona != NULL)
918     {
919       if (FOLKS_IS_GROUP_DETAILS (persona))
920         folks_group_details_change_group (FOLKS_GROUP_DETAILS (persona), group,
921             is_member, groups_change_group_cb, contact);
922       return;
923     }
924
925   /* If the persona doesn't exist yet, we have to cache the changes until it
926    * does */
927   if (priv->groups == NULL)
928     {
929       priv->groups = gee_hash_set_new (G_TYPE_STRING, (GBoxedCopyFunc) g_strdup,
930           g_free, g_str_hash, g_str_equal);
931     }
932
933   gee_collection_add (GEE_COLLECTION (priv->groups), group);
934 }
935
936 EmpathyAvatar *
937 empathy_contact_get_avatar (EmpathyContact *contact)
938 {
939   EmpathyContactPriv *priv;
940
941   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
942
943   priv = GET_PRIV (contact);
944
945   return priv->avatar;
946 }
947
948 static void
949 contact_set_avatar (EmpathyContact *contact,
950                     EmpathyAvatar *avatar)
951 {
952   EmpathyContactPriv *priv;
953
954   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
955
956   priv = GET_PRIV (contact);
957
958   if (priv->avatar == avatar)
959     return;
960
961   if (priv->avatar)
962     {
963       empathy_avatar_unref (priv->avatar);
964       priv->avatar = NULL;
965     }
966
967   if (avatar)
968       priv->avatar = empathy_avatar_ref (avatar);
969
970   g_object_notify (G_OBJECT (contact), "avatar");
971 }
972
973 TpAccount *
974 empathy_contact_get_account (EmpathyContact *contact)
975 {
976   EmpathyContactPriv *priv;
977
978   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
979
980   priv = GET_PRIV (contact);
981
982   if (priv->account == NULL && priv->tp_contact != NULL)
983     {
984       TpConnection *connection;
985
986       /* FIXME: This assume the account manager already exists */
987       connection = tp_contact_get_connection (priv->tp_contact);
988       priv->account =
989         g_object_ref (tp_connection_get_account (connection));
990     }
991
992   return priv->account;
993 }
994
995 FolksPersona *
996 empathy_contact_get_persona (EmpathyContact *contact)
997 {
998   EmpathyContactPriv *priv;
999
1000   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
1001
1002   priv = GET_PRIV (contact);
1003
1004   if (priv->persona == NULL && priv->tp_contact != NULL)
1005     {
1006       TpfPersona *persona;
1007
1008       persona = tpf_persona_dup_for_contact (priv->tp_contact);
1009       if (persona != NULL)
1010         {
1011           empathy_contact_set_persona (contact, (FolksPersona *) persona);
1012           g_object_unref (persona);
1013         }
1014     }
1015
1016   return priv->persona;
1017 }
1018
1019 void
1020 empathy_contact_set_persona (EmpathyContact *contact,
1021     FolksPersona *persona)
1022 {
1023   EmpathyContactPriv *priv;
1024
1025   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1026   g_return_if_fail (TPF_IS_PERSONA (persona));
1027
1028   priv = GET_PRIV (contact);
1029
1030   if (persona == priv->persona)
1031     return;
1032
1033   if (priv->persona != NULL)
1034     {
1035       g_signal_handlers_disconnect_by_func (priv->persona,
1036           folks_persona_notify_cb, contact);
1037       g_object_unref (priv->persona);
1038     }
1039   priv->persona = g_object_ref (persona);
1040
1041   g_signal_connect (priv->persona, "notify",
1042     G_CALLBACK (folks_persona_notify_cb), contact);
1043
1044   g_object_notify (G_OBJECT (contact), "persona");
1045
1046   /* Set the persona's alias, since ours could've been set using
1047    * empathy_contact_set_alias() before we had a persona; this happens when
1048    * adding a contact. */
1049   if (priv->alias != NULL)
1050     empathy_contact_set_alias (contact, priv->alias);
1051
1052   /* Set the persona's groups */
1053   if (priv->groups != NULL)
1054     {
1055       folks_group_details_set_groups (FOLKS_GROUP_DETAILS (persona),
1056           GEE_SET (priv->groups));
1057       g_object_unref (priv->groups);
1058       priv->groups = NULL;
1059     }
1060 }
1061
1062 TpConnection *
1063 empathy_contact_get_connection (EmpathyContact *contact)
1064 {
1065   EmpathyContactPriv *priv;
1066
1067   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
1068
1069   priv = GET_PRIV (contact);
1070
1071   if (priv->tp_contact != NULL)
1072     return tp_contact_get_connection (priv->tp_contact);
1073
1074   return NULL;
1075 }
1076
1077 TpConnectionPresenceType
1078 empathy_contact_get_presence (EmpathyContact *contact)
1079 {
1080   EmpathyContactPriv *priv;
1081
1082   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact),
1083     TP_CONNECTION_PRESENCE_TYPE_UNSET);
1084
1085   priv = GET_PRIV (contact);
1086
1087   if (priv->tp_contact != NULL)
1088     return tp_contact_get_presence_type (priv->tp_contact);
1089
1090   return priv->presence;
1091 }
1092
1093 const gchar *
1094 empathy_contact_get_presence_message (EmpathyContact *contact)
1095 {
1096   EmpathyContactPriv *priv;
1097
1098   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
1099
1100   priv = GET_PRIV (contact);
1101
1102   if (priv->persona != NULL)
1103     return folks_presence_details_get_presence_message (
1104         FOLKS_PRESENCE_DETAILS (priv->persona));
1105
1106   if (priv->tp_contact != NULL)
1107     return tp_contact_get_presence_message (priv->tp_contact);
1108
1109   return NULL;
1110 }
1111
1112 guint
1113 empathy_contact_get_handle (EmpathyContact *contact)
1114 {
1115   EmpathyContactPriv *priv;
1116
1117   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), 0);
1118
1119   priv = GET_PRIV (contact);
1120
1121   if (priv->tp_contact != NULL)
1122     return tp_contact_get_handle (priv->tp_contact);
1123
1124   return priv->handle;
1125 }
1126
1127 EmpathyCapabilities
1128 empathy_contact_get_capabilities (EmpathyContact *contact)
1129 {
1130   EmpathyContactPriv *priv;
1131
1132   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), 0);
1133
1134   priv = GET_PRIV (contact);
1135
1136   return priv->capabilities;
1137 }
1138
1139 gboolean
1140 empathy_contact_is_user (EmpathyContact *contact)
1141 {
1142   EmpathyContactPriv *priv;
1143
1144   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1145
1146   priv = GET_PRIV (contact);
1147
1148   return priv->is_user;
1149 }
1150
1151 void
1152 empathy_contact_set_is_user (EmpathyContact *contact,
1153                              gboolean is_user)
1154 {
1155   EmpathyContactPriv *priv;
1156
1157   g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1158
1159   priv = GET_PRIV (contact);
1160
1161   if (priv->is_user == is_user)
1162     return;
1163
1164   priv->is_user = is_user;
1165
1166   g_object_notify (G_OBJECT (contact), "is-user");
1167 }
1168
1169 gboolean
1170 empathy_contact_is_online (EmpathyContact *contact)
1171 {
1172   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1173
1174   switch (empathy_contact_get_presence (contact))
1175     {
1176       case TP_CONNECTION_PRESENCE_TYPE_OFFLINE:
1177       case TP_CONNECTION_PRESENCE_TYPE_UNKNOWN:
1178       case TP_CONNECTION_PRESENCE_TYPE_ERROR:
1179         return FALSE;
1180       /* Contacts without presence are considered online so we can display IRC
1181        * contacts in rooms. */
1182       case TP_CONNECTION_PRESENCE_TYPE_UNSET:
1183       case TP_CONNECTION_PRESENCE_TYPE_AVAILABLE:
1184       case TP_CONNECTION_PRESENCE_TYPE_AWAY:
1185       case TP_CONNECTION_PRESENCE_TYPE_EXTENDED_AWAY:
1186       case TP_CONNECTION_PRESENCE_TYPE_HIDDEN:
1187       case TP_CONNECTION_PRESENCE_TYPE_BUSY:
1188       default:
1189         return TRUE;
1190     }
1191 }
1192
1193 const gchar *
1194 empathy_contact_get_status (EmpathyContact *contact)
1195 {
1196   const gchar *message;
1197
1198   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), "");
1199
1200   message = empathy_contact_get_presence_message (contact);
1201   if (!EMP_STR_EMPTY (message))
1202     return message;
1203
1204   return empathy_presence_get_default_message (
1205       empathy_contact_get_presence (contact));
1206 }
1207
1208 gboolean
1209 empathy_contact_can_sms (EmpathyContact *contact)
1210 {
1211   EmpathyContactPriv *priv;
1212
1213   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1214
1215   priv = GET_PRIV (contact);
1216
1217   return priv->capabilities & EMPATHY_CAPABILITIES_SMS;
1218 }
1219
1220 gboolean
1221 empathy_contact_can_voip (EmpathyContact *contact)
1222 {
1223   EmpathyContactPriv *priv;
1224
1225   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1226
1227   priv = GET_PRIV (contact);
1228
1229   return priv->capabilities & (EMPATHY_CAPABILITIES_AUDIO |
1230       EMPATHY_CAPABILITIES_VIDEO);
1231 }
1232
1233 gboolean
1234 empathy_contact_can_voip_audio (EmpathyContact *contact)
1235 {
1236   EmpathyContactPriv *priv;
1237
1238   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1239
1240   priv = GET_PRIV (contact);
1241
1242   return priv->capabilities & EMPATHY_CAPABILITIES_AUDIO;
1243 }
1244
1245 gboolean
1246 empathy_contact_can_voip_video (EmpathyContact *contact)
1247 {
1248   EmpathyContactPriv *priv;
1249
1250   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1251
1252   priv = GET_PRIV (contact);
1253
1254   return priv->capabilities & EMPATHY_CAPABILITIES_VIDEO;
1255 }
1256
1257 gboolean
1258 empathy_contact_can_send_files (EmpathyContact *contact)
1259 {
1260   EmpathyContactPriv *priv;
1261
1262   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1263
1264   priv = GET_PRIV (contact);
1265
1266   return priv->capabilities & EMPATHY_CAPABILITIES_FT;
1267 }
1268
1269 gboolean
1270 empathy_contact_can_use_rfb_stream_tube (EmpathyContact *contact)
1271 {
1272   EmpathyContactPriv *priv;
1273
1274   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1275
1276   priv = GET_PRIV (contact);
1277
1278   return priv->capabilities & EMPATHY_CAPABILITIES_RFB_STREAM_TUBE;
1279 }
1280
1281 static gboolean
1282 contact_has_log (EmpathyContact *contact)
1283 {
1284   TplLogManager *manager;
1285   TplEntity *entity;
1286   gboolean have_log;
1287
1288   manager = tpl_log_manager_dup_singleton ();
1289   entity = tpl_entity_new (empathy_contact_get_id (contact),
1290       TPL_ENTITY_CONTACT, NULL, NULL);
1291
1292   have_log = tpl_log_manager_exists (manager,
1293       empathy_contact_get_account (contact), entity, TPL_EVENT_MASK_TEXT);
1294
1295   g_object_unref (entity);
1296   g_object_unref (manager);
1297
1298   return have_log;
1299 }
1300
1301 gboolean
1302 empathy_contact_can_do_action (EmpathyContact *self,
1303     EmpathyActionType action_type)
1304 {
1305   gboolean sensitivity = FALSE;
1306
1307   switch (action_type)
1308     {
1309       case EMPATHY_ACTION_CHAT:
1310         sensitivity = TRUE;
1311         break;
1312       case EMPATHY_ACTION_SMS:
1313         sensitivity = empathy_contact_can_sms (self);
1314         break;
1315       case EMPATHY_ACTION_AUDIO_CALL:
1316         sensitivity = empathy_contact_can_voip_audio (self);
1317         break;
1318       case EMPATHY_ACTION_VIDEO_CALL:
1319         sensitivity = empathy_contact_can_voip_video (self);
1320         break;
1321       case EMPATHY_ACTION_VIEW_LOGS:
1322         sensitivity = contact_has_log (self);
1323         break;
1324       case EMPATHY_ACTION_SEND_FILE:
1325         sensitivity = empathy_contact_can_send_files (self);
1326         break;
1327       case EMPATHY_ACTION_SHARE_MY_DESKTOP:
1328         sensitivity = empathy_contact_can_use_rfb_stream_tube (self);
1329         break;
1330       default:
1331         g_assert_not_reached ();
1332     }
1333
1334   return (sensitivity ? TRUE : FALSE);
1335 }
1336
1337 static gchar *
1338 contact_get_avatar_filename (EmpathyContact *contact,
1339                              const gchar *token)
1340 {
1341   TpAccount *account;
1342   gchar *avatar_path;
1343   gchar *avatar_file;
1344   gchar *token_escaped;
1345
1346   if (EMP_STR_EMPTY (empathy_contact_get_id (contact)))
1347     return NULL;
1348
1349   token_escaped = tp_escape_as_identifier (token);
1350   account = empathy_contact_get_account (contact);
1351
1352   avatar_path = g_build_filename (g_get_user_cache_dir (),
1353       "telepathy",
1354       "avatars",
1355       tp_account_get_connection_manager (account),
1356       tp_account_get_protocol (account),
1357       NULL);
1358   g_mkdir_with_parents (avatar_path, 0700);
1359
1360   avatar_file = g_build_filename (avatar_path, token_escaped, NULL);
1361
1362   g_free (token_escaped);
1363   g_free (avatar_path);
1364
1365   return avatar_file;
1366 }
1367
1368 static gboolean
1369 contact_load_avatar_cache (EmpathyContact *contact,
1370                            const gchar *token)
1371 {
1372   EmpathyAvatar *avatar = NULL;
1373   gchar *filename;
1374   gchar *data = NULL;
1375   gsize len;
1376   GError *error = NULL;
1377
1378   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);
1379   g_return_val_if_fail (!EMP_STR_EMPTY (token), FALSE);
1380
1381   /* Load the avatar from file if it exists */
1382   filename = contact_get_avatar_filename (contact, token);
1383   if (filename && g_file_test (filename, G_FILE_TEST_EXISTS))
1384     {
1385       if (!g_file_get_contents (filename, &data, &len, &error))
1386         {
1387           DEBUG ("Failed to load avatar from cache: %s",
1388             error ? error->message : "No error given");
1389           g_clear_error (&error);
1390         }
1391     }
1392
1393   if (data != NULL)
1394     {
1395       DEBUG ("Avatar loaded from %s", filename);
1396       avatar = empathy_avatar_new ((guchar *) data, len, NULL, filename);
1397       contact_set_avatar (contact, avatar);
1398       empathy_avatar_unref (avatar);
1399     }
1400
1401   g_free (data);
1402   g_free (filename);
1403
1404   return data != NULL;
1405 }
1406
1407 GType
1408 empathy_avatar_get_type (void)
1409 {
1410   static GType type_id = 0;
1411
1412   if (!type_id)
1413     {
1414       type_id = g_boxed_type_register_static ("EmpathyAvatar",
1415           (GBoxedCopyFunc) empathy_avatar_ref,
1416           (GBoxedFreeFunc) empathy_avatar_unref);
1417     }
1418
1419   return type_id;
1420 }
1421
1422 /**
1423  * empathy_avatar_new:
1424  * @data: the avatar data
1425  * @len: the size of avatar data
1426  * @format: the mime type of the avatar image
1427  * @filename: the filename where the avatar is stored in cache
1428  *
1429  * Create a #EmpathyAvatar from the provided data.
1430  *
1431  * Returns: a new #EmpathyAvatar
1432  */
1433 EmpathyAvatar *
1434 empathy_avatar_new (const guchar *data,
1435                     gsize len,
1436                     const gchar *format,
1437                     const gchar *filename)
1438 {
1439   EmpathyAvatar *avatar;
1440
1441   avatar = g_slice_new0 (EmpathyAvatar);
1442   avatar->data = g_memdup (data, len);
1443   avatar->len = len;
1444   avatar->format = g_strdup (format);
1445   avatar->filename = g_strdup (filename);
1446   avatar->refcount = 1;
1447
1448   return avatar;
1449 }
1450
1451 void
1452 empathy_avatar_unref (EmpathyAvatar *avatar)
1453 {
1454   g_return_if_fail (avatar != NULL);
1455
1456   avatar->refcount--;
1457   if (avatar->refcount == 0)
1458     {
1459       g_free (avatar->data);
1460       g_free (avatar->format);
1461       g_free (avatar->filename);
1462       g_slice_free (EmpathyAvatar, avatar);
1463     }
1464 }
1465
1466 EmpathyAvatar *
1467 empathy_avatar_ref (EmpathyAvatar *avatar)
1468 {
1469   g_return_val_if_fail (avatar != NULL, NULL);
1470
1471   avatar->refcount++;
1472
1473   return avatar;
1474 }
1475
1476 /**
1477  * empathy_avatar_save_to_file:
1478  * @avatar: the avatar
1479  * @filename: name of a file to write avatar to
1480  * @error: return location for a GError, or NULL
1481  *
1482  * Save the avatar to a file named filename
1483  *
1484  * Returns: %TRUE on success, %FALSE if an error occurred
1485  */
1486 gboolean
1487 empathy_avatar_save_to_file (EmpathyAvatar *self,
1488                              const gchar *filename,
1489                              GError **error)
1490 {
1491   return g_file_set_contents (filename, (const gchar *) self->data, self->len,
1492       error);
1493 }
1494
1495 /**
1496  * empathy_contact_get_location:
1497  * @contact: an #EmpathyContact
1498  *
1499  * Returns the user's location if available.  The keys are defined in
1500  * empathy-location.h. If the contact doesn't have location
1501  * information, the GHashTable will be empthy. Use #g_hash_table_unref when
1502  * you are done with the #GHashTable.
1503  *
1504  * It is composed of string keys and GValues.  Keys are
1505  * defined in empathy-location.h such as #EMPATHY_LOCATION_COUNTRY.
1506  * Example: a "city" key would have "Helsinki" as string GValue,
1507  *          a "latitude" would have 65.0 as double GValue.
1508  *
1509  * Returns: a #GHashTable of location values
1510  */
1511 GHashTable *
1512 empathy_contact_get_location (EmpathyContact *contact)
1513 {
1514   EmpathyContactPriv *priv;
1515
1516   g_return_val_if_fail (EMPATHY_CONTACT (contact), NULL);
1517
1518   priv = GET_PRIV (contact);
1519
1520   return priv->location;
1521 }
1522
1523 /**
1524  * empathy_contact_set_location:
1525  * @contact: an #EmpathyContact
1526  * @location: a #GHashTable of the location
1527  *
1528  * Sets the user's location based on the location #GHashTable passed.
1529  * It is composed of string keys and GValues.  Keys are
1530  * defined in empathy-location.h such as #EMPATHY_LOCATION_COUNTRY.
1531  * Example: a "city" key would have "Helsinki" as string GValue,
1532  *          a "latitude" would have 65.0 as double GValue.
1533  */
1534 static void
1535 empathy_contact_set_location (EmpathyContact *contact,
1536     GHashTable *location)
1537 {
1538   EmpathyContactPriv *priv;
1539
1540   g_return_if_fail (EMPATHY_CONTACT (contact));
1541   g_return_if_fail (location != NULL);
1542
1543   priv = GET_PRIV (contact);
1544
1545   if (priv->location != NULL)
1546     g_hash_table_unref (priv->location);
1547
1548   priv->location = g_hash_table_ref (location);
1549 #ifdef HAVE_GEOCODE
1550   update_geocode (contact);
1551 #endif
1552   g_object_notify (G_OBJECT (contact), "location");
1553 }
1554
1555 const gchar * const *
1556 empathy_contact_get_client_types (EmpathyContact *contact)
1557 {
1558   EmpathyContactPriv *priv;
1559
1560   g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
1561
1562   priv = GET_PRIV (contact);
1563
1564   return (const gchar * const *) priv->client_types;
1565 }
1566
1567 static void
1568 contact_set_client_types (EmpathyContact *contact,
1569     const gchar * const *client_types)
1570 {
1571   EmpathyContactPriv *priv = GET_PRIV (contact);
1572
1573   if (priv->client_types != NULL)
1574     g_strfreev (priv->client_types);
1575
1576   priv->client_types = g_strdupv ((gchar **) client_types);
1577   g_object_notify (G_OBJECT (contact), "client-types");
1578 }
1579
1580 /**
1581  * empathy_contact_equal:
1582  * @contact1: an #EmpathyContact
1583  * @contact2: an #EmpathyContact
1584  *
1585  * Returns FALSE if one of the contacts is NULL but the other is not.
1586  * Otherwise returns TRUE if both pointer are equal or if they bith
1587  * refer to the same id.
1588  * It's only necessary to call this function if your contact objects
1589  * come from logs where contacts are created dynamically and comparing
1590  * pointers is not enough.
1591  */
1592 gboolean
1593 empathy_contact_equal (gconstpointer contact1,
1594                        gconstpointer contact2)
1595 {
1596   EmpathyContact *c1;
1597   EmpathyContact *c2;
1598   const gchar *id1;
1599   const gchar *id2;
1600
1601   if ((contact1 == NULL) != (contact2 == NULL)) {
1602     return FALSE;
1603   }
1604   if (contact1 == contact2) {
1605     return TRUE;
1606   }
1607   c1 = EMPATHY_CONTACT (contact1);
1608   c2 = EMPATHY_CONTACT (contact2);
1609   id1 = empathy_contact_get_id (c1);
1610   id2 = empathy_contact_get_id (c2);
1611   if (!tp_strdiff (id1, id2)) {
1612     return TRUE;
1613   }
1614   return FALSE;
1615 }
1616
1617 #ifdef HAVE_GEOCODE
1618 /* This callback is called by geocode-glib when it found a position
1619  * for the given address.  A position is necessary for a contact
1620  * to show up on the map
1621  */
1622 static void
1623 geocode_cb (GObject *source,
1624     GAsyncResult *result,
1625     gpointer user_data)
1626 {
1627   EmpathyContact *contact = user_data;
1628   EmpathyContactPriv *priv = GET_PRIV (contact);
1629   GError *error = NULL;
1630   GHashTable *new_location;
1631   GHashTable *resolved = NULL;
1632   gdouble latitude, longitude;
1633
1634   if (priv->location == NULL)
1635     goto out;
1636
1637   resolved = geocode_object_resolve_finish (GEOCODE_OBJECT (source), result,
1638       &error);
1639
1640   if (resolved == NULL)
1641     {
1642       DEBUG ("Failed to resolve geocode: %s", error->message);
1643       g_error_free (error);
1644       goto out;
1645     }
1646
1647   if (!geocode_object_get_coords (resolved, &longitude, &latitude))
1648     goto out;
1649
1650   new_location = tp_asv_new (
1651       EMPATHY_LOCATION_LAT, G_TYPE_DOUBLE, latitude,
1652       EMPATHY_LOCATION_LON, G_TYPE_DOUBLE, longitude,
1653       NULL);
1654
1655   DEBUG ("\t - Latitude: %f", latitude);
1656   DEBUG ("\t - Longitude: %f", longitude);
1657
1658   /* Copy remaning fields. LAT and LON were not defined so we won't overwrite
1659    * the values we just set. */
1660   tp_g_hash_table_update (new_location, priv->location,
1661       (GBoxedCopyFunc) g_strdup, (GBoxedCopyFunc) tp_g_value_slice_dup);
1662
1663   /* Don't change the accuracy as we used an address to get this position */
1664   g_hash_table_unref (priv->location);
1665   priv->location = new_location;
1666   g_object_notify ((GObject *) contact, "location");
1667
1668 out:
1669   tp_clear_pointer (&resolved, g_hash_table_unref);
1670   g_object_unref (contact);
1671 }
1672
1673 static void
1674 update_geocode (EmpathyContact *contact)
1675 {
1676   GeocodeObject *geocode;
1677   GHashTable *location;
1678
1679   location = empathy_contact_get_location (contact);
1680   if (location == NULL ||
1681       g_hash_table_size (location) == 0)
1682     return;
1683
1684   /* No need to search for position if contact published it */
1685   if (g_hash_table_lookup (location, EMPATHY_LOCATION_LAT) != NULL ||
1686       g_hash_table_lookup (location, EMPATHY_LOCATION_LON) != NULL)
1687     return;
1688
1689   geocode = geocode_object_new_for_params (location);
1690   if (geocode == NULL)
1691     return;
1692
1693   geocode_object_resolve_async (geocode, NULL, geocode_cb,
1694       g_object_ref (contact));
1695
1696   g_object_unref (geocode);
1697 }
1698 #endif
1699
1700 static EmpathyCapabilities
1701 tp_caps_to_capabilities (TpCapabilities *caps)
1702 {
1703   EmpathyCapabilities capabilities = 0;
1704   guint i;
1705   GPtrArray *classes;
1706
1707   classes = tp_capabilities_get_channel_classes (caps);
1708
1709   for (i = 0; i < classes->len; i++)
1710     {
1711       GValueArray *class_struct;
1712       GHashTable *fixed_prop;
1713       GStrv allowed_prop;
1714       TpHandleType handle_type;
1715       const gchar *chan_type;
1716
1717       class_struct = g_ptr_array_index (classes, i);
1718       tp_value_array_unpack (class_struct, 2,
1719           &fixed_prop,
1720           &allowed_prop);
1721
1722       handle_type = tp_asv_get_uint32 (fixed_prop,
1723           TP_PROP_CHANNEL_TARGET_HANDLE_TYPE, NULL);
1724       if (handle_type != TP_HANDLE_TYPE_CONTACT)
1725         continue;
1726
1727       chan_type = tp_asv_get_string (fixed_prop,
1728           TP_PROP_CHANNEL_CHANNEL_TYPE);
1729
1730       if (!tp_strdiff (chan_type, TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER))
1731         {
1732           capabilities |= EMPATHY_CAPABILITIES_FT;
1733         }
1734       else if (!tp_strdiff (chan_type, TP_IFACE_CHANNEL_TYPE_STREAM_TUBE))
1735         {
1736           const gchar *service;
1737
1738           service = tp_asv_get_string (fixed_prop,
1739               TP_PROP_CHANNEL_TYPE_STREAM_TUBE_SERVICE);
1740
1741           if (!tp_strdiff (service, "rfb"))
1742             capabilities |= EMPATHY_CAPABILITIES_RFB_STREAM_TUBE;
1743         }
1744       else if (!tp_strdiff (chan_type,
1745         TP_IFACE_CHANNEL_TYPE_STREAMED_MEDIA))
1746         {
1747           guint j;
1748
1749           for (j = 0; allowed_prop[j] != NULL; j++)
1750             {
1751               if (!tp_strdiff (allowed_prop[j],
1752                     TP_PROP_CHANNEL_TYPE_STREAMED_MEDIA_INITIAL_AUDIO))
1753                 capabilities |= EMPATHY_CAPABILITIES_AUDIO;
1754               else if (!tp_strdiff (allowed_prop[j],
1755                     TP_PROP_CHANNEL_TYPE_STREAMED_MEDIA_INITIAL_VIDEO))
1756                 capabilities |= EMPATHY_CAPABILITIES_VIDEO;
1757             }
1758
1759           if (tp_asv_get_boolean (fixed_prop,
1760                     TP_PROP_CHANNEL_TYPE_STREAMED_MEDIA_INITIAL_AUDIO, NULL))
1761             capabilities |= EMPATHY_CAPABILITIES_AUDIO;
1762           if (tp_asv_get_boolean (fixed_prop,
1763                     TP_PROP_CHANNEL_TYPE_STREAMED_MEDIA_INITIAL_VIDEO, NULL))
1764             capabilities |= EMPATHY_CAPABILITIES_VIDEO;
1765         }
1766       else if (!tp_strdiff (chan_type, TP_IFACE_CHANNEL_TYPE_TEXT))
1767         {
1768           if (tp_asv_get_boolean (fixed_prop,
1769                 TP_PROP_CHANNEL_INTERFACE_SMS_SMS_CHANNEL, NULL))
1770             capabilities |= EMPATHY_CAPABILITIES_SMS;
1771         }
1772       else if (!tp_strdiff (chan_type,
1773         TPY_IFACE_CHANNEL_TYPE_CALL))
1774         {
1775           guint j;
1776
1777           if (tp_asv_get_boolean (fixed_prop,
1778               TPY_PROP_CHANNEL_TYPE_CALL_INITIAL_AUDIO, NULL))
1779             capabilities |= EMPATHY_CAPABILITIES_AUDIO;
1780
1781           if (tp_asv_get_boolean (fixed_prop,
1782               TPY_PROP_CHANNEL_TYPE_CALL_INITIAL_VIDEO, NULL))
1783             capabilities |= EMPATHY_CAPABILITIES_VIDEO;
1784
1785           for (j = 0; allowed_prop[j] != NULL; j++)
1786             {
1787               if (!tp_strdiff (allowed_prop[j],
1788                     TPY_PROP_CHANNEL_TYPE_CALL_INITIAL_AUDIO))
1789                 capabilities |= EMPATHY_CAPABILITIES_AUDIO;
1790               else if (!tp_strdiff (allowed_prop[j],
1791                     TPY_PROP_CHANNEL_TYPE_CALL_INITIAL_VIDEO))
1792                 capabilities |= EMPATHY_CAPABILITIES_VIDEO;
1793             }
1794         }
1795     }
1796
1797   return capabilities;
1798 }
1799
1800 static void
1801 set_capabilities_from_tp_caps (EmpathyContact *self,
1802     TpCapabilities *caps)
1803 {
1804   EmpathyCapabilities capabilities;
1805
1806   if (caps == NULL)
1807     return;
1808
1809   capabilities = tp_caps_to_capabilities (caps);
1810   empathy_contact_set_capabilities (self, capabilities);
1811 }
1812
1813 static void
1814 contact_set_avatar_from_tp_contact (EmpathyContact *contact)
1815 {
1816   EmpathyContactPriv *priv = GET_PRIV (contact);
1817   const gchar *mime;
1818   GFile *file;
1819
1820   mime = tp_contact_get_avatar_mime_type (priv->tp_contact);
1821   file = tp_contact_get_avatar_file (priv->tp_contact);
1822
1823   if (file != NULL)
1824     {
1825       EmpathyAvatar *avatar;
1826       gchar *data;
1827       gsize len;
1828       gchar *path;
1829       GError *error = NULL;
1830
1831       if (!g_file_load_contents (file, NULL, &data, &len, NULL, &error))
1832         {
1833           DEBUG ("Failed to load avatar: %s", error->message);
1834
1835           g_error_free (error);
1836           contact_set_avatar (contact, NULL);
1837           return;
1838         }
1839
1840       path = g_file_get_path (file);
1841
1842       avatar = empathy_avatar_new ((guchar *) data, len, mime, path);
1843
1844       contact_set_avatar (contact, avatar);
1845       empathy_avatar_unref (avatar);
1846       g_free (path);
1847       g_free (data);
1848     }
1849   else
1850     {
1851       contact_set_avatar (contact, NULL);
1852     }
1853 }
1854
1855 EmpathyContact *
1856 empathy_contact_dup_from_tp_contact (TpContact *tp_contact)
1857 {
1858   EmpathyContact *contact = NULL;
1859
1860   g_return_val_if_fail (TP_IS_CONTACT (tp_contact), NULL);
1861
1862   if (contacts_table == NULL)
1863     contacts_table = g_hash_table_new (g_direct_hash, g_direct_equal);
1864   else
1865     contact = g_hash_table_lookup (contacts_table, tp_contact);
1866
1867   if (contact == NULL)
1868     {
1869       contact = empathy_contact_new (tp_contact);
1870
1871       /* The hash table does not keep any ref.
1872        * contact keeps a ref to tp_contact, and is removed from the table in
1873        * contact_dispose() */
1874       g_hash_table_insert (contacts_table, tp_contact, contact);
1875     }
1876   else
1877     {
1878       g_object_ref (contact);
1879     }
1880
1881   return contact;
1882 }
1883
1884 static int
1885 presence_cmp_func (EmpathyContact *a,
1886     EmpathyContact *b)
1887 {
1888   FolksPresenceDetails *presence_a, *presence_b;
1889
1890   presence_a = FOLKS_PRESENCE_DETAILS (empathy_contact_get_persona (a));
1891   presence_b = FOLKS_PRESENCE_DETAILS (empathy_contact_get_persona (b));
1892
1893   /* We negate the result because we're sorting in reverse order (i.e. such that
1894    * the Personas with the highest presence are at the beginning of the list. */
1895   return -folks_presence_details_typecmp (
1896       folks_presence_details_get_presence_type (presence_a),
1897       folks_presence_details_get_presence_type (presence_b));
1898 }
1899
1900 static gint
1901 voip_cmp_func (EmpathyContact *a,
1902     EmpathyContact *b)
1903 {
1904   gboolean has_audio_a, has_audio_b;
1905   gboolean has_video_a, has_video_b;
1906
1907   has_audio_a = empathy_contact_can_voip_audio (a);
1908   has_audio_b = empathy_contact_can_voip_audio (b);
1909   has_video_a = empathy_contact_can_voip_video (a);
1910   has_video_b = empathy_contact_can_voip_video (b);
1911
1912   /* First check video */
1913   if (has_video_a == has_video_b)
1914     {
1915       /* Use audio to to break tie */
1916       if (has_audio_a == has_audio_b)
1917         return 0;
1918       else if (has_audio_a)
1919         return -1;
1920       else
1921         return 1;
1922     }
1923   else if (has_video_a)
1924     return -1;
1925   else
1926     return 1;
1927 }
1928
1929 static gint
1930 ft_cmp_func (EmpathyContact *a,
1931     EmpathyContact *b)
1932 {
1933   gboolean can_send_files_a, can_send_files_b;
1934
1935   can_send_files_a = empathy_contact_can_send_files (a);
1936   can_send_files_b = empathy_contact_can_send_files (b);
1937
1938   if (can_send_files_a == can_send_files_b)
1939     return 0;
1940   else if (can_send_files_a)
1941     return -1;
1942   else
1943     return 1;
1944 }
1945
1946 static gint
1947 rfb_stream_tube_cmp_func (EmpathyContact *a,
1948     EmpathyContact *b)
1949 {
1950   gboolean rfb_a, rfb_b;
1951
1952   rfb_a = empathy_contact_can_use_rfb_stream_tube (a);
1953   rfb_b = empathy_contact_can_use_rfb_stream_tube (b);
1954
1955   if (rfb_a == rfb_b)
1956     return 0;
1957   else if (rfb_a)
1958     return -1;
1959   else
1960     return 1;
1961 }
1962
1963 /* Sort by presence as with presence_cmp_func(), but if the two contacts have
1964  * the same presence, prefer the one which can do both audio *and* video calls,
1965  * over the one which can only do one of the two. */
1966 static int
1967 voip_sort_func (EmpathyContact *a, EmpathyContact *b)
1968 {
1969   gint presence_sort = presence_cmp_func (a, b);
1970
1971   if (presence_sort != 0)
1972     return presence_sort;
1973
1974   return voip_cmp_func (a, b);
1975 }
1976
1977 /* Sort by presence as with presence_cmp_func() and then break ties using the
1978  * most "capable" individual. So users will be able to pick more actions on
1979  * the contact in the "Contact" menu of the chat window. */
1980 static gint
1981 chat_sort_func (EmpathyContact *a,
1982     EmpathyContact *b)
1983 {
1984   gint result;
1985
1986   result = presence_cmp_func (a, b);
1987   if (result != 0)
1988     return result;
1989
1990   /* Prefer individual supporting file transfer */
1991   result = ft_cmp_func (a, b);
1992   if (result != 0)
1993     return result;
1994
1995   /* Check audio/video capabilities */
1996   result = voip_cmp_func (a, b);
1997   if (result != 0)
1998     return result;
1999
2000   /* Check 'Share my destop' feature */
2001   return rfb_stream_tube_cmp_func (a, b);
2002 }
2003
2004 static GCompareFunc
2005 get_sort_func_for_action (EmpathyActionType action_type)
2006 {
2007   switch (action_type)
2008     {
2009       case EMPATHY_ACTION_AUDIO_CALL:
2010       case EMPATHY_ACTION_VIDEO_CALL:
2011         return (GCompareFunc) voip_sort_func;
2012       case EMPATHY_ACTION_CHAT:
2013         return (GCompareFunc) chat_sort_func;
2014       case EMPATHY_ACTION_VIEW_LOGS:
2015       case EMPATHY_ACTION_SEND_FILE:
2016       case EMPATHY_ACTION_SHARE_MY_DESKTOP:
2017       default:
2018         return (GCompareFunc) presence_cmp_func;
2019     }
2020 }
2021
2022 /**
2023  * empathy_contact_dup_best_for_action:
2024  * @individual: a #FolksIndividual
2025  * @action_type: the type of action to be performed on the contact
2026  *
2027  * Chooses a #FolksPersona from the given @individual which is best-suited for
2028  * the given @action_type. "Best-suited" is determined by choosing the persona
2029  * with the highest presence out of all the personas which can perform the given
2030  * @action_type (e.g. are capable of video calling).
2031  *
2032  * Return value: an #EmpathyContact for the best persona, or %NULL;
2033  * unref with g_object_unref()
2034  */
2035 EmpathyContact *
2036 empathy_contact_dup_best_for_action (FolksIndividual *individual,
2037     EmpathyActionType action_type)
2038 {
2039   GeeSet *personas;
2040   GeeIterator *iter;
2041   GList *contacts;
2042   EmpathyContact *best_contact = NULL;
2043
2044   /* Build a list of EmpathyContacts that we can sort */
2045   personas = folks_individual_get_personas (individual);
2046   contacts = NULL;
2047
2048   iter = gee_iterable_iterator (GEE_ITERABLE (personas));
2049   while (gee_iterator_next (iter))
2050     {
2051       FolksPersona *persona = gee_iterator_get (iter);
2052       TpContact *tp_contact;
2053       EmpathyContact *contact = NULL;
2054
2055       if (!empathy_folks_persona_is_interesting (persona))
2056         goto while_finish;
2057
2058       tp_contact = tpf_persona_get_contact (TPF_PERSONA (persona));
2059       if (tp_contact == NULL)
2060         goto while_finish;
2061
2062       contact = empathy_contact_dup_from_tp_contact (tp_contact);
2063       empathy_contact_set_persona (contact, FOLKS_PERSONA (persona));
2064
2065       /* Only choose the contact if they're actually capable of the specified
2066        * action. */
2067       if (empathy_contact_can_do_action (contact, action_type))
2068         contacts = g_list_prepend (contacts, g_object_ref (contact));
2069
2070 while_finish:
2071       g_clear_object (&contact);
2072       g_clear_object (&persona);
2073     }
2074   g_clear_object (&iter);
2075
2076   /* Sort the contacts by some heuristic based on the action type, then take
2077    * the top contact. */
2078   if (contacts != NULL)
2079     {
2080       contacts = g_list_sort (contacts, get_sort_func_for_action (action_type));
2081       best_contact = g_object_ref (contacts->data);
2082     }
2083
2084   g_list_foreach (contacts, (GFunc) g_object_unref, NULL);
2085   g_list_free (contacts);
2086
2087   return best_contact;
2088 }
2089
2090 #define declare_contact_cb(name) \
2091 static void \
2092 contact_##name##_cb (GObject *source, \
2093     GAsyncResult *result, \
2094     gpointer user_data) \
2095 { \
2096   TpContact *contact = (TpContact *) source; \
2097   GError *error = NULL; \
2098   \
2099   if (!tp_contact_##name##_finish (contact, result, &error)) \
2100     { \
2101       DEBUG ("Failed to ##name## on %s\n", \
2102           tp_contact_get_identifier (contact)); \
2103       g_error_free (error); \
2104     } \
2105 }
2106
2107 declare_contact_cb (request_subscription)
2108 declare_contact_cb (authorize_publication)
2109 declare_contact_cb (unblock)
2110
2111 void
2112 empathy_contact_add_to_contact_list (EmpathyContact *self,
2113     const gchar *message)
2114 {
2115   EmpathyContactPriv *priv = GET_PRIV (self);
2116
2117   g_return_if_fail (priv->tp_contact != NULL);
2118
2119   tp_contact_request_subscription_async (priv->tp_contact, message,
2120       contact_request_subscription_cb, NULL);
2121
2122   tp_contact_authorize_publication_async (priv->tp_contact,
2123       contact_authorize_publication_cb, NULL);
2124
2125   tp_contact_unblock_async (priv->tp_contact, contact_unblock_cb, NULL);
2126 }
2127
2128 declare_contact_cb (remove)
2129
2130 void
2131 empathy_contact_remove_from_contact_list (EmpathyContact *self)
2132 {
2133   EmpathyContactPriv *priv = GET_PRIV (self);
2134
2135   g_return_if_fail (priv->tp_contact != NULL);
2136
2137   tp_contact_remove_async (priv->tp_contact, contact_remove_cb, NULL);
2138 }