/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* Copyright (C) 2007-2008 Collabora Ltd.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*
* Authors: Xavier Claessens <xclaesse@gmail.com>
*/
#include <config.h>
#include <string.h>
#include <telepathy-glib/util.h>
#include <telepathy-glib/connection.h>
#include <telepathy-glib/gtypes.h>
#include <libmissioncontrol/mission-control.h>
#include <extensions/extensions.h>
#include "empathy-tp-contact-factory.h"
#include "empathy-utils.h"
#include "empathy-account-manager.h"
#define DEBUG_FLAG EMPATHY_DEBUG_TP | EMPATHY_DEBUG_CONTACT
#include "empathy-debug.h"
#define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyTpContactFactory)
typedef struct {
EmpathyAccountManager *account_manager;
McAccount *account;
TpConnection *connection;
gboolean ready;
GList *contacts;
EmpathyContact *user;
gchar **avatar_mime_types;
guint avatar_min_width;
guint avatar_min_height;
guint avatar_max_width;
guint avatar_max_height;
guint avatar_max_size;
gboolean can_request_ft;
} EmpathyTpContactFactoryPriv;
G_DEFINE_TYPE (EmpathyTpContactFactory, empathy_tp_contact_factory, G_TYPE_OBJECT);
enum {
PROP_0,
PROP_ACCOUNT,
PROP_READY,
PROP_MIME_TYPES,
PROP_MIN_WIDTH,
PROP_MIN_HEIGHT,
PROP_MAX_WIDTH,
PROP_MAX_HEIGHT,
PROP_MAX_SIZE
};
static EmpathyContact *
tp_contact_factory_find_by_handle (EmpathyTpContactFactory *tp_factory,
guint handle)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
GList *l;
for (l = priv->contacts; l; l = l->next) {
if (empathy_contact_get_handle (l->data) == handle) {
return l->data;
}
}
return NULL;
}
static EmpathyContact *
tp_contact_factory_find_by_id (EmpathyTpContactFactory *tp_factory,
const gchar *id)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
GList *l;
for (l = priv->contacts; l; l = l->next) {
if (!tp_strdiff (empathy_contact_get_id (l->data), id)) {
return l->data;
}
}
return NULL;
}
static void
tp_contact_factory_weak_notify (gpointer data,
GObject *where_the_object_was)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (data);
DEBUG ("Remove finalized contact %p", where_the_object_was);
priv->contacts = g_list_remove (priv->contacts, where_the_object_was);
}
static void
tp_contact_factory_presences_table_foreach (const gchar *state_str,
GHashTable *presences_table,
EmpathyContact *contact)
{
const GValue *message;
const gchar *message_str = NULL;
empathy_contact_set_presence (contact,
empathy_presence_from_str (state_str));
message = g_hash_table_lookup (presences_table, "message");
if (message) {
message_str = g_value_get_string (message);
}
if (!G_STR_EMPTY (message_str)) {
empathy_contact_set_presence_message (contact, message_str);
} else {
empathy_contact_set_presence_message (contact, NULL);
}
}
static void
tp_contact_factory_parse_presence_foreach (guint handle,
GValueArray *presence_struct,
EmpathyTpContactFactory *tp_factory)
{
GHashTable *presences_table;
EmpathyContact *contact;
contact = tp_contact_factory_find_by_handle (tp_factory, handle);
if (!contact) {
return;
}
presences_table = g_value_get_boxed (g_value_array_get_nth (presence_struct, 1));
g_hash_table_foreach (presences_table,
(GHFunc) tp_contact_factory_presences_table_foreach,
contact);
DEBUG ("Changing presence for contact %s (%d) to '%s' (%d)",
empathy_contact_get_id (contact),
handle,
empathy_contact_get_presence_message (contact),
empathy_contact_get_presence (contact));
}
static void
tp_contact_factory_get_presence_cb (TpConnection *connection,
GHashTable *handle_table,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
if (error) {
DEBUG ("Error getting presence: %s", error->message);
if (error->domain == TP_DBUS_ERRORS &&
error->code == TP_DBUS_ERROR_NO_INTERFACE) {
guint *handles = user_data;
/* We have no presence iface, set default presence
* to available */
while (*handles != 0) {
EmpathyContact *contact;
contact = tp_contact_factory_find_by_handle (
(EmpathyTpContactFactory*) tp_factory,
*handles);
if (contact) {
empathy_contact_set_presence (contact,
MC_PRESENCE_AVAILABLE);
}
handles++;
}
}
return;
}
g_hash_table_foreach (handle_table,
(GHFunc) tp_contact_factory_parse_presence_foreach,
EMPATHY_TP_CONTACT_FACTORY (tp_factory));
}
static void
tp_contact_factory_presence_update_cb (TpConnection *connection,
GHashTable *handle_table,
gpointer user_data,
GObject *tp_factory)
{
g_hash_table_foreach (handle_table,
(GHFunc) tp_contact_factory_parse_presence_foreach,
EMPATHY_TP_CONTACT_FACTORY (tp_factory));
}
static void
tp_contact_factory_set_aliases_cb (TpConnection *connection,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
if (error) {
DEBUG ("Error setting alias: %s", error->message);
}
}
static void
tp_contact_factory_request_aliases_cb (TpConnection *connection,
const gchar **contact_names,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
guint *handles = user_data;
guint i = 0;
const gchar **name;
if (error) {
DEBUG ("Error requesting aliases: %s", error->message);
/* If we failed to get alias set it to NULL, like that if
* someone is waiting for the name to be ready it won't wait
* infinitely */
while (*handles != 0) {
EmpathyContact *contact;
contact = tp_contact_factory_find_by_handle (
(EmpathyTpContactFactory*) tp_factory,
*handles);
if (contact) {
empathy_contact_set_name (contact, NULL);
}
handles++;
}
return;
}
for (name = contact_names; *name; name++) {
EmpathyContact *contact;
contact = tp_contact_factory_find_by_handle (EMPATHY_TP_CONTACT_FACTORY (tp_factory),
handles[i]);
if (!contact) {
continue;
}
DEBUG ("Renaming contact %s (%d) to %s (request cb)",
empathy_contact_get_id (contact),
empathy_contact_get_handle (contact),
*name);
empathy_contact_set_name (contact, *name);
i++;
}
}
static void
tp_contact_factory_aliases_changed_cb (TpConnection *connection,
const GPtrArray *renamed_handlers,
gpointer user_data,
GObject *weak_object)
{
EmpathyTpContactFactory *tp_factory = EMPATHY_TP_CONTACT_FACTORY (weak_object);
guint i;
for (i = 0; renamed_handlers->len > i; i++) {
guint handle;
const gchar *alias;
GValueArray *renamed_struct;
EmpathyContact *contact;
renamed_struct = g_ptr_array_index (renamed_handlers, i);
handle = g_value_get_uint (g_value_array_get_nth (renamed_struct, 0));
alias = g_value_get_string (g_value_array_get_nth (renamed_struct, 1));
contact = tp_contact_factory_find_by_handle (tp_factory, handle);
if (!contact) {
/* We don't know this contact, skip */
continue;
}
DEBUG ("Renaming contact %s (%d) to %s (changed cb)",
empathy_contact_get_id (contact),
handle, alias);
empathy_contact_set_name (contact, alias);
}
}
static void
tp_contact_factory_set_avatar_cb (TpConnection *connection,
const gchar *token,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
if (error) {
DEBUG ("Error setting avatar: %s", error->message);
}
}
static void
tp_contact_factory_clear_avatar_cb (TpConnection *connection,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
if (error) {
DEBUG ("Error clearing avatar: %s", error->message);
}
}
static void
tp_contact_factory_avatar_retrieved_cb (TpConnection *connection,
guint handle,
const gchar *token,
const GArray *avatar_data,
const gchar *mime_type,
gpointer user_data,
GObject *tp_factory)
{
EmpathyContact *contact;
contact = tp_contact_factory_find_by_handle (EMPATHY_TP_CONTACT_FACTORY (tp_factory),
handle);
if (!contact) {
return;
}
DEBUG ("Avatar retrieved for contact %s (%d)",
empathy_contact_get_id (contact),
handle);
empathy_contact_load_avatar_data (contact,
avatar_data->data,
avatar_data->len,
mime_type,
token);
}
static void
tp_contact_factory_request_avatars_cb (TpConnection *connection,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
if (error) {
DEBUG ("Error requesting avatars: %s", error->message);
}
}
static gboolean
tp_contact_factory_avatar_maybe_update (EmpathyTpContactFactory *tp_factory,
guint handle,
const gchar *token)
{
EmpathyContact *contact;
EmpathyAvatar *avatar;
contact = tp_contact_factory_find_by_handle (tp_factory, handle);
if (!contact) {
return TRUE;
}
/* Check if we have an avatar */
if (G_STR_EMPTY (token)) {
empathy_contact_set_avatar (contact, NULL);
return TRUE;
}
/* Check if the avatar changed */
avatar = empathy_contact_get_avatar (contact);
if (avatar && !tp_strdiff (avatar->token, token)) {
return TRUE;
}
/* The avatar changed, search the new one in the cache */
if (empathy_contact_load_avatar_cache (contact, token)) {
/* Got from cache, use it */
return TRUE;
}
/* Avatar is not up-to-date, we have to request it. */
return FALSE;
}
typedef struct {
EmpathyTpContactFactory *tp_factory;
GArray *handles;
} TokensData;
static void
tp_contact_factory_avatar_tokens_foreach (gpointer key,
gpointer value,
gpointer user_data)
{
TokensData *data = user_data;
const gchar *token = value;
guint handle = GPOINTER_TO_UINT (key);
if (!tp_contact_factory_avatar_maybe_update (data->tp_factory,
handle, token)) {
g_array_append_val (data->handles, handle);
}
}
static void
tp_contact_factory_get_known_avatar_tokens_cb (TpConnection *connection,
GHashTable *tokens,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
TokensData data;
if (error) {
DEBUG ("Error getting known avatars tokens: %s", error->message);
return;
}
data.tp_factory = EMPATHY_TP_CONTACT_FACTORY (tp_factory);
data.handles = g_array_new (FALSE, FALSE, sizeof (guint));
g_hash_table_foreach (tokens,
tp_contact_factory_avatar_tokens_foreach,
&data);
DEBUG ("Got %d tokens, need to request %d avatars",
g_hash_table_size (tokens), data.handles->len);
/* Request needed avatars */
if (data.handles->len > 0) {
tp_cli_connection_interface_avatars_call_request_avatars (connection,
-1,
data.handles,
tp_contact_factory_request_avatars_cb,
NULL, NULL,
tp_factory);
}
g_array_free (data.handles, TRUE);
}
static void
tp_contact_factory_avatar_updated_cb (TpConnection *connection,
guint handle,
const gchar *new_token,
gpointer user_data,
GObject *tp_factory)
{
GArray *handles;
if (tp_contact_factory_avatar_maybe_update (EMPATHY_TP_CONTACT_FACTORY (tp_factory),
handle, new_token)) {
/* Avatar was cached, nothing to do */
return;
}
DEBUG ("Need to request avatar for token %s", new_token);
handles = g_array_new (FALSE, FALSE, sizeof (guint));
g_array_append_val (handles, handle);
tp_cli_connection_interface_avatars_call_request_avatars (connection,
-1,
handles,
tp_contact_factory_request_avatars_cb,
NULL, NULL,
tp_factory);
g_array_free (handles, TRUE);
}
static void
tp_contact_factory_update_capabilities (EmpathyTpContactFactory *tp_factory,
guint handle,
const gchar *channel_type,
guint generic,
guint specific)
{
EmpathyContact *contact;
EmpathyCapabilities capabilities;
contact = tp_contact_factory_find_by_handle (tp_factory, handle);
if (!contact) {
return;
}
capabilities = empathy_contact_get_capabilities (contact);
capabilities &= ~EMPATHY_CAPABILITIES_UNKNOWN;
if (strcmp (channel_type, TP_IFACE_CHANNEL_TYPE_STREAMED_MEDIA) == 0) {
capabilities &= ~EMPATHY_CAPABILITIES_AUDIO;
capabilities &= ~EMPATHY_CAPABILITIES_VIDEO;
if (specific & TP_CHANNEL_MEDIA_CAPABILITY_AUDIO) {
capabilities |= EMPATHY_CAPABILITIES_AUDIO;
}
if (specific & TP_CHANNEL_MEDIA_CAPABILITY_VIDEO) {
capabilities |= EMPATHY_CAPABILITIES_VIDEO;
}
}
DEBUG ("Changing capabilities for contact %s (%d) to %d",
empathy_contact_get_id (contact),
empathy_contact_get_handle (contact),
capabilities);
empathy_contact_set_capabilities (contact, capabilities);
}
static void
tp_contact_factory_get_capabilities_cb (TpConnection *connection,
const GPtrArray *capabilities,
const GError *error,
gpointer user_data,
GObject *weak_object)
{
EmpathyTpContactFactory *tp_factory = EMPATHY_TP_CONTACT_FACTORY (weak_object);
guint i;
if (error) {
DEBUG ("Error getting capabilities: %s", error->message);
/* FIXME Should set the capabilities of the contacts for which this request
* originated to NONE */
return;
}
for (i = 0; i < capabilities->len; i++) {
GValueArray *values;
guint handle;
const gchar *channel_type;
guint generic;
guint specific;
values = g_ptr_array_index (capabilities, i);
handle = g_value_get_uint (g_value_array_get_nth (values, 0));
channel_type = g_value_get_string (g_value_array_get_nth (values, 1));
generic = g_value_get_uint (g_value_array_get_nth (values, 2));
specific = g_value_get_uint (g_value_array_get_nth (values, 3));
tp_contact_factory_update_capabilities (tp_factory,
handle,
channel_type,
generic,
specific);
}
}
static void
tp_contact_factory_capabilities_changed_cb (TpConnection *connection,
const GPtrArray *capabilities,
gpointer user_data,
GObject *weak_object)
{
EmpathyTpContactFactory *tp_factory = EMPATHY_TP_CONTACT_FACTORY (weak_object);
guint i;
for (i = 0; i < capabilities->len; i++) {
GValueArray *values;
guint handle;
const gchar *channel_type;
guint generic;
guint specific;
values = g_ptr_array_index (capabilities, i);
handle = g_value_get_uint (g_value_array_get_nth (values, 0));
channel_type = g_value_get_string (g_value_array_get_nth (values, 1));
generic = g_value_get_uint (g_value_array_get_nth (values, 3));
specific = g_value_get_uint (g_value_array_get_nth (values, 5));
tp_contact_factory_update_capabilities (tp_factory,
handle,
channel_type,
generic,
specific);
}
}
static void
tp_contact_factory_request_everything (EmpathyTpContactFactory *tp_factory,
const GArray *handles)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
guint *dup_handles;
g_return_if_fail (priv->ready);
dup_handles = g_malloc0 ((handles->len + 1) * sizeof (guint));
g_memmove (dup_handles, handles->data, handles->len * sizeof (guint));
tp_cli_connection_interface_presence_call_get_presence (priv->connection,
-1,
handles,
tp_contact_factory_get_presence_cb,
dup_handles, g_free,
G_OBJECT (tp_factory));
/* FIXME: Sometimes the dbus call timesout because CM takes
* too much time to request all aliases from the server,
* that's why we increase the timeout here. See fd.o bug #14795 */
dup_handles = g_malloc0 ((handles->len + 1) * sizeof (guint));
g_memmove (dup_handles, handles->data, handles->len * sizeof (guint));
tp_cli_connection_interface_aliasing_call_request_aliases (priv->connection,
5*60*1000,
handles,
tp_contact_factory_request_aliases_cb,
dup_handles, g_free,
G_OBJECT (tp_factory));
tp_cli_connection_interface_avatars_call_get_known_avatar_tokens (priv->connection,
-1,
handles,
tp_contact_factory_get_known_avatar_tokens_cb,
NULL, NULL,
G_OBJECT (tp_factory));
tp_cli_connection_interface_capabilities_call_get_capabilities (priv->connection,
-1,
handles,
tp_contact_factory_get_capabilities_cb,
NULL, NULL,
G_OBJECT (tp_factory));
}
static void
tp_contact_factory_list_free (gpointer data)
{
GList *l = data;
g_list_foreach (l, (GFunc) g_object_unref, NULL);
g_list_free (l);
}
static void
tp_contact_factory_request_handles_cb (TpConnection *connection,
const GArray *handles,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
GList *contacts = user_data;
GList *l;
guint i = 0;
if (error) {
DEBUG ("Failed to request handles: %s", error->message);
return;
}
for (l = contacts; l; l = l->next) {
guint handle;
handle = g_array_index (handles, guint, i);
empathy_contact_set_handle (l->data, handle);
i++;
}
tp_contact_factory_request_everything (EMPATHY_TP_CONTACT_FACTORY (tp_factory),
handles);
}
static void
tp_contact_factory_inspect_handles_cb (TpConnection *connection,
const gchar **ids,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
const gchar **id;
GList *contacts = user_data;
GList *l;
if (error) {
DEBUG ("Failed to inspect handles: %s", error->message);
return;
}
id = ids;
for (l = contacts; l; l = l->next) {
empathy_contact_set_id (l->data, *id);
id++;
}
}
static void
tp_contact_factory_disconnect_contact_foreach (gpointer data,
gpointer user_data)
{
EmpathyContact *contact = data;
empathy_contact_set_presence (contact, MC_PRESENCE_UNSET);
empathy_contact_set_handle (contact, 0);
}
static void
tp_contact_factory_connection_invalidated_cb (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
DEBUG ("Connection invalidated");
g_object_unref (priv->connection);
priv->connection = NULL;
priv->ready = FALSE;
g_object_notify (G_OBJECT (tp_factory), "ready");
g_list_foreach (priv->contacts,
tp_contact_factory_disconnect_contact_foreach,
tp_factory);
}
static void
tp_contact_factory_ready (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
GList *l;
GArray *handle_needed;
GArray *id_needed;
GList *handle_needed_contacts = NULL;
GList *id_needed_contacts = NULL;
DEBUG ("Connection ready");
priv->ready = TRUE;
g_object_notify (G_OBJECT (tp_factory), "ready");
/* Connect signals */
tp_cli_connection_interface_aliasing_connect_to_aliases_changed (priv->connection,
tp_contact_factory_aliases_changed_cb,
NULL, NULL,
G_OBJECT (tp_factory),
NULL);
tp_cli_connection_interface_avatars_connect_to_avatar_updated (priv->connection,
tp_contact_factory_avatar_updated_cb,
NULL, NULL,
G_OBJECT (tp_factory),
NULL);
tp_cli_connection_interface_avatars_connect_to_avatar_retrieved (priv->connection,
tp_contact_factory_avatar_retrieved_cb,
NULL, NULL,
G_OBJECT (tp_factory),
NULL);
tp_cli_connection_interface_presence_connect_to_presence_update (priv->connection,
tp_contact_factory_presence_update_cb,
NULL, NULL,
G_OBJECT (tp_factory),
NULL);
tp_cli_connection_interface_capabilities_connect_to_capabilities_changed (priv->connection,
tp_contact_factory_capabilities_changed_cb,
NULL, NULL,
G_OBJECT (tp_factory),
NULL);
/* Request needed info for all existing contacts */
handle_needed = g_array_new (TRUE, FALSE, sizeof (gchar*));
id_needed = g_array_new (FALSE, FALSE, sizeof (guint));
for (l = priv->contacts; l; l = l->next) {
EmpathyContact *contact;
guint handle;
const gchar *id;
contact = l->data;
handle = empathy_contact_get_handle (contact);
id = empathy_contact_get_id (contact);
if (handle == 0) {
g_assert (!G_STR_EMPTY (id));
g_array_append_val (handle_needed, id);
handle_needed_contacts = g_list_prepend (handle_needed_contacts,
g_object_ref (contact));
}
if (G_STR_EMPTY (id)) {
g_array_append_val (id_needed, handle);
id_needed_contacts = g_list_prepend (id_needed_contacts,
g_object_ref (contact));
}
}
handle_needed_contacts = g_list_reverse (handle_needed_contacts);
id_needed_contacts = g_list_reverse (id_needed_contacts);
tp_cli_connection_call_request_handles (priv->connection,
-1,
TP_HANDLE_TYPE_CONTACT,
(const gchar**) handle_needed->data,
tp_contact_factory_request_handles_cb,
handle_needed_contacts, tp_contact_factory_list_free,
G_OBJECT (tp_factory));
tp_cli_connection_call_inspect_handles (priv->connection,
-1,
TP_HANDLE_TYPE_CONTACT,
id_needed,
tp_contact_factory_inspect_handles_cb,
id_needed_contacts, tp_contact_factory_list_free,
G_OBJECT (tp_factory));
tp_contact_factory_request_everything ((EmpathyTpContactFactory*) tp_factory,
id_needed);
g_array_free (handle_needed, TRUE);
g_array_free (id_needed, TRUE);
}
static void
get_requestable_channel_classes_cb (TpProxy *connection,
const GValue *value,
const GError *error,
gpointer user_data,
GObject *weak_object)
{
EmpathyTpContactFactory *self = EMPATHY_TP_CONTACT_FACTORY (weak_object);
EmpathyTpContactFactoryPriv *priv = GET_PRIV (self);
GPtrArray *classes;
guint i;
if (error != NULL) {
DEBUG ("Error: %s", error->message);
tp_contact_factory_ready (self);
return;
}
classes = g_value_get_boxed (value);
for (i = 0; i < classes->len; i++) {
GValue class = {0,};
GValue *chan_type, *handle_type;
GHashTable *fixed_prop;
GList *l;
g_value_init (&class, TP_STRUCT_TYPE_REQUESTABLE_CHANNEL_CLASS);
g_value_set_static_boxed (&class, g_ptr_array_index (classes, i));
dbus_g_type_struct_get (&class,
0, &fixed_prop,
G_MAXUINT);
chan_type = g_hash_table_lookup (fixed_prop,
TP_IFACE_CHANNEL ".ChannelType");
if (chan_type == NULL ||
tp_strdiff (g_value_get_string (chan_type),
EMP_IFACE_CHANNEL_TYPE_FILE_TRANSFER)) {
continue;
}
handle_type = g_hash_table_lookup (fixed_prop,
TP_IFACE_CHANNEL ".TargetHandleType");
if (handle_type == NULL ||
g_value_get_uint (handle_type) != TP_HANDLE_TYPE_CONTACT) {
continue;
}
/* We can request file transfer channel to contacts. */
priv->can_request_ft = TRUE;
/* Update the capabilities of all contacts */
for (l = priv->contacts; l != NULL; l = g_list_next (l)) {
EmpathyContact *contact = l->data;
EmpathyCapabilities caps;
caps = empathy_contact_get_capabilities (contact);
empathy_contact_set_capabilities (contact, caps |
EMPATHY_CAPABILITIES_FT);
}
break;
}
tp_contact_factory_ready (self);
}
static void
tp_contact_factory_got_avatar_requirements_cb (TpConnection *proxy,
const gchar **mime_types,
guint min_width,
guint min_height,
guint max_width,
guint max_height,
guint max_size,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
if (error) {
DEBUG ("Failed to get avatar requirements: %s", error->message);
/* We'll just leave avatar_mime_types as NULL; the
* avatar-setting code can use this as a signal that you can't
* set avatars.
*/
} else {
priv->avatar_mime_types = g_strdupv ((gchar **) mime_types);
priv->avatar_min_width = min_width;
priv->avatar_min_height = min_height;
priv->avatar_max_width = max_width;
priv->avatar_max_height = max_height;
priv->avatar_max_size = max_size;
}
/* Can we request file transfer channels? */
tp_cli_dbus_properties_call_get (priv->connection, -1,
TP_IFACE_CONNECTION_INTERFACE_REQUESTS,
"RequestableChannelClasses",
get_requestable_channel_classes_cb, NULL, NULL,
G_OBJECT (tp_factory));
}
static void
tp_contact_factory_got_self_handle_cb (TpConnection *proxy,
guint handle,
const GError *error,
gpointer user_data,
GObject *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
if (error) {
DEBUG ("Failed to get self handles: %s", error->message);
return;
}
empathy_contact_set_handle (priv->user, handle);
/* Get avatar requirements for this connection */
tp_cli_connection_interface_avatars_call_get_avatar_requirements (
priv->connection,
-1,
tp_contact_factory_got_avatar_requirements_cb,
NULL, NULL,
tp_factory);
}
static void
tp_contact_factory_connection_ready_cb (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
/* Get our own handle */
tp_cli_connection_call_get_self_handle (priv->connection,
-1,
tp_contact_factory_got_self_handle_cb,
NULL, NULL,
G_OBJECT (tp_factory));
}
static void
tp_contact_factory_status_updated (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
gboolean connection_ready;
MissionControl *mc;
if (priv->connection) {
/* We already have our connection object */
return;
}
mc = empathy_mission_control_new ();
priv->connection = mission_control_get_tpconnection (mc, priv->account, NULL);
if (!priv->connection) {
return;
}
/* We got a new connection, wait for it to be ready */
g_signal_connect_swapped (priv->connection, "invalidated",
G_CALLBACK (tp_contact_factory_connection_invalidated_cb),
tp_factory);
g_object_get (priv->connection, "connection-ready", &connection_ready, NULL);
if (connection_ready) {
tp_contact_factory_connection_ready_cb (tp_factory);
} else {
g_signal_connect_swapped (priv->connection, "notify::connection-ready",
G_CALLBACK (tp_contact_factory_connection_ready_cb),
tp_factory);
}
g_object_unref (mc);
}
static void
tp_contact_factory_account_connection_cb (EmpathyAccountManager *account_manager,
McAccount *account,
TpConnectionStatusReason reason,
TpConnectionStatus current,
TpConnectionStatus previous,
EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
if (account && empathy_account_equal (account, priv->account)) {
tp_contact_factory_status_updated (tp_factory);
}
}
static void
tp_contact_factory_add_contact (EmpathyTpContactFactory *tp_factory,
EmpathyContact *contact)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
g_object_weak_ref (G_OBJECT (contact),
tp_contact_factory_weak_notify,
tp_factory);
priv->contacts = g_list_prepend (priv->contacts, contact);
DEBUG ("Contact added: %s (%d)",
empathy_contact_get_id (contact),
empathy_contact_get_handle (contact));
}
static void
tp_contact_factory_hold_handles_cb (TpConnection *connection,
const GError *error,
gpointer userdata,
GObject *tp_factory)
{
if (error) {
DEBUG ("Failed to hold handles: %s", error->message);
}
}
EmpathyContact *
empathy_tp_contact_factory_get_user (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
g_return_val_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory), NULL);
return g_object_ref (priv->user);
}
static void
contact_created (EmpathyTpContactFactory *self,
EmpathyContact *contact)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (self);
if (priv->can_request_ft)
{
/* Set the FT capability */
/* FIXME: We should use the futur ContactCapabilities interface */
EmpathyCapabilities caps;
caps = empathy_contact_get_capabilities (contact);
caps |= EMPATHY_CAPABILITIES_FT;
empathy_contact_set_capabilities (contact, caps);
}
tp_contact_factory_add_contact (self, contact);
}
EmpathyContact *
empathy_tp_contact_factory_get_from_id (EmpathyTpContactFactory *tp_factory,
const gchar *id)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
EmpathyContact *contact;
g_return_val_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory), NULL);
g_return_val_if_fail (id != NULL, NULL);
/* Check if the contact already exists */
contact = tp_contact_factory_find_by_id (tp_factory, id);
if (contact) {
return g_object_ref (contact);
}
/* Create new contact */
contact = g_object_new (EMPATHY_TYPE_CONTACT,
"account", priv->account,
"id", id,
NULL);
contact_created (tp_factory, contact);
if (priv->ready) {
const gchar *contact_ids[] = {id, NULL};
GList *contacts;
contacts = g_list_prepend (NULL, g_object_ref (contact));
tp_cli_connection_call_request_handles (priv->connection,
-1,
TP_HANDLE_TYPE_CONTACT,
contact_ids,
tp_contact_factory_request_handles_cb,
contacts, tp_contact_factory_list_free,
G_OBJECT (tp_factory));
}
return contact;
}
EmpathyContact *
empathy_tp_contact_factory_get_from_handle (EmpathyTpContactFactory *tp_factory,
guint handle)
{
EmpathyContact *contact;
GArray *handles;
GList *contacts;
g_return_val_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory), NULL);
handles = g_array_new (FALSE, FALSE, sizeof (guint));
g_array_append_val (handles, handle);
contacts = empathy_tp_contact_factory_get_from_handles (tp_factory, handles);
g_array_free (handles, TRUE);
contact = contacts ? contacts->data : NULL;
g_list_free (contacts);
return contact;
}
GList *
empathy_tp_contact_factory_get_from_handles (EmpathyTpContactFactory *tp_factory,
const GArray *handles)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
GList *contacts = NULL;
GArray *new_handles;
GList *new_contacts = NULL;
guint i;
g_return_val_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory), NULL);
g_return_val_if_fail (handles != NULL, NULL);
/* Search all contacts we already have */
new_handles = g_array_new (FALSE, FALSE, sizeof (guint));
for (i = 0; i < handles->len; i++) {
EmpathyContact *contact;
guint handle;
handle = g_array_index (handles, guint, i);
if (handle == 0) {
continue;
}
contact = tp_contact_factory_find_by_handle (tp_factory, handle);
if (contact) {
contacts = g_list_prepend (contacts, g_object_ref (contact));
} else {
g_array_append_val (new_handles, handle);
}
}
if (new_handles->len == 0) {
g_array_free (new_handles, TRUE);
return contacts;
}
/* Create new contacts */
for (i = 0; i < new_handles->len; i++) {
EmpathyContact *contact;
guint handle;
handle = g_array_index (new_handles, guint, i);
contact = g_object_new (EMPATHY_TYPE_CONTACT,
"account", priv->account,
"handle", handle,
NULL);
contact_created (tp_factory, contact);
contacts = g_list_prepend (contacts, contact);
new_contacts = g_list_prepend (new_contacts, g_object_ref (contact));
}
new_contacts = g_list_reverse (new_contacts);
if (priv->ready) {
/* Get the IDs of all new handles */
tp_cli_connection_call_inspect_handles (priv->connection,
-1,
TP_HANDLE_TYPE_CONTACT,
new_handles,
tp_contact_factory_inspect_handles_cb,
new_contacts, tp_contact_factory_list_free,
G_OBJECT (tp_factory));
/* Hold all new handles. */
/* FIXME: Should be unholded when removed from the factory */
tp_cli_connection_call_hold_handles (priv->connection,
-1,
TP_HANDLE_TYPE_CONTACT,
new_handles,
tp_contact_factory_hold_handles_cb,
NULL, NULL,
G_OBJECT (tp_factory));
tp_contact_factory_request_everything (tp_factory, new_handles);
}
g_array_free (new_handles, TRUE);
return contacts;
}
void
empathy_tp_contact_factory_set_alias (EmpathyTpContactFactory *tp_factory,
EmpathyContact *contact,
const gchar *alias)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
GHashTable *new_alias;
guint handle;
g_return_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory));
g_return_if_fail (EMPATHY_IS_CONTACT (contact));
g_return_if_fail (priv->ready);
g_return_if_fail (empathy_account_equal (empathy_contact_get_account (contact),
priv->account));
handle = empathy_contact_get_handle (contact);
DEBUG ("Setting alias for contact %s (%d) to %s",
empathy_contact_get_id (contact),
handle, alias);
new_alias = g_hash_table_new_full (g_direct_hash,
g_direct_equal,
NULL,
g_free);
g_hash_table_insert (new_alias,
GUINT_TO_POINTER (handle),
g_strdup (alias));
tp_cli_connection_interface_aliasing_call_set_aliases (priv->connection,
-1,
new_alias,
tp_contact_factory_set_aliases_cb,
NULL, NULL,
G_OBJECT (tp_factory));
g_hash_table_destroy (new_alias);
}
void
empathy_tp_contact_factory_set_avatar (EmpathyTpContactFactory *tp_factory,
const gchar *data,
gsize size,
const gchar *mime_type)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
g_return_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory));
g_return_if_fail (priv->ready);
if (data && size > 0 && size < G_MAXUINT) {
GArray avatar;
avatar.data = (gchar*) data;
avatar.len = size;
DEBUG ("Setting avatar on account %s",
mc_account_get_unique_name (priv->account));
tp_cli_connection_interface_avatars_call_set_avatar (priv->connection,
-1,
&avatar,
mime_type,
tp_contact_factory_set_avatar_cb,
NULL, NULL,
G_OBJECT (tp_factory));
} else {
DEBUG ("Clearing avatar on account %s",
mc_account_get_unique_name (priv->account));
tp_cli_connection_interface_avatars_call_clear_avatar (priv->connection,
-1,
tp_contact_factory_clear_avatar_cb,
NULL, NULL,
G_OBJECT (tp_factory));
}
}
gboolean
empathy_tp_contact_factory_is_ready (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (tp_factory);
g_return_val_if_fail (EMPATHY_IS_TP_CONTACT_FACTORY (tp_factory), FALSE);
return priv->ready;
}
static void
tp_contact_factory_get_property (GObject *object,
guint param_id,
GValue *value,
GParamSpec *pspec)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (object);
switch (param_id) {
case PROP_ACCOUNT:
g_value_set_object (value, priv->account);
break;
case PROP_READY:
g_value_set_boolean (value, priv->ready);
break;
case PROP_MIME_TYPES:
g_value_set_boxed (value, priv->avatar_mime_types);
break;
case PROP_MIN_WIDTH:
g_value_set_uint (value, priv->avatar_min_width);
break;
case PROP_MIN_HEIGHT:
g_value_set_uint (value, priv->avatar_min_height);
break;
case PROP_MAX_WIDTH:
g_value_set_uint (value, priv->avatar_max_width);
break;
case PROP_MAX_HEIGHT:
g_value_set_uint (value, priv->avatar_max_height);
break;
case PROP_MAX_SIZE:
g_value_set_uint (value, priv->avatar_max_size);
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
break;
};
}
static void
tp_contact_factory_set_property (GObject *object,
guint param_id,
const GValue *value,
GParamSpec *pspec)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (object);
switch (param_id) {
case PROP_ACCOUNT:
priv->account = g_object_ref (g_value_get_object (value));
break;
default:
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
break;
};
}
static void
tp_contact_factory_finalize (GObject *object)
{
EmpathyTpContactFactoryPriv *priv = GET_PRIV (object);
GList *l;
DEBUG ("Finalized: %p (%s)", object,
mc_account_get_normalized_name (priv->account));
g_signal_handlers_disconnect_by_func (priv->account_manager,
tp_contact_factory_account_connection_cb,
object);
for (l = priv->contacts; l; l = l->next) {
g_object_weak_unref (G_OBJECT (l->data),
tp_contact_factory_weak_notify,
object);
}
g_list_free (priv->contacts);
g_object_unref (priv->account_manager);
g_object_unref (priv->account);
g_object_unref (priv->user);
if (priv->connection) {
g_signal_handlers_disconnect_by_func (priv->connection,
tp_contact_factory_connection_invalidated_cb,
object);
g_object_unref (priv->connection);
}
g_strfreev (priv->avatar_mime_types);
G_OBJECT_CLASS (empathy_tp_contact_factory_parent_class)->finalize (object);
}
static GObject *
tp_contact_factory_constructor (GType type,
guint n_props,
GObjectConstructParam *props)
{
GObject *tp_factory;
EmpathyTpContactFactoryPriv *priv;
tp_factory = G_OBJECT_CLASS (empathy_tp_contact_factory_parent_class)->constructor (type, n_props, props);
priv = GET_PRIV (tp_factory);
priv->ready = FALSE;
priv->user = empathy_contact_new (priv->account);
empathy_contact_set_is_user (priv->user, TRUE);
tp_contact_factory_add_contact ((EmpathyTpContactFactory*) tp_factory, priv->user);
tp_contact_factory_status_updated (EMPATHY_TP_CONTACT_FACTORY (tp_factory));
return tp_factory;
}
static void
empathy_tp_contact_factory_class_init (EmpathyTpContactFactoryClass *klass)
{
GObjectClass *object_class = G_OBJECT_CLASS (klass);
object_class->finalize = tp_contact_factory_finalize;
object_class->constructor = tp_contact_factory_constructor;
object_class->get_property = tp_contact_factory_get_property;
object_class->set_property = tp_contact_factory_set_property;
g_object_class_install_property (object_class,
PROP_ACCOUNT,
g_param_spec_object ("account",
"Factory's Account",
"The account associated with the factory",
MC_TYPE_ACCOUNT,
G_PARAM_READWRITE |
G_PARAM_CONSTRUCT_ONLY |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_READY,
g_param_spec_boolean ("ready",
"Whether the factory is ready",
"TRUE once the factory is ready to be used",
FALSE,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MIME_TYPES,
g_param_spec_boxed ("avatar-mime-types",
"Supported MIME types for avatars",
"Types of images that may be set as "
"avatars on this connection. Only valid "
"once 'ready' becomes TRUE.",
G_TYPE_STRV,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MIN_WIDTH,
g_param_spec_uint ("avatar-min-width",
"Minimum width for avatars",
"Minimum width of avatar that may be set. "
"Only valid once 'ready' becomes TRUE.",
0,
G_MAXUINT,
0,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MIN_HEIGHT,
g_param_spec_uint ("avatar-min-height",
"Minimum height for avatars",
"Minimum height of avatar that may be set. "
"Only valid once 'ready' becomes TRUE.",
0,
G_MAXUINT,
0,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MAX_WIDTH,
g_param_spec_uint ("avatar-max-width",
"Maximum width for avatars",
"Maximum width of avatar that may be set "
"or 0 if there is no maximum. "
"Only valid once 'ready' becomes TRUE.",
0,
G_MAXUINT,
0,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MAX_HEIGHT,
g_param_spec_uint ("avatar-max-height",
"Maximum height for avatars",
"Maximum height of avatar that may be set "
"or 0 if there is no maximum. "
"Only valid once 'ready' becomes TRUE.",
0,
G_MAXUINT,
0,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_object_class_install_property (object_class,
PROP_MAX_SIZE,
g_param_spec_uint ("avatar-max-size",
"Maximum size for avatars in bytes",
"Maximum file size of avatar that may be "
"set or 0 if there is no maximum. "
"Only valid once 'ready' becomes TRUE.",
0,
G_MAXUINT,
0,
G_PARAM_READABLE |
G_PARAM_STATIC_STRINGS));
g_type_class_add_private (object_class, sizeof (EmpathyTpContactFactoryPriv));
}
static void
empathy_tp_contact_factory_init (EmpathyTpContactFactory *tp_factory)
{
EmpathyTpContactFactoryPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (tp_factory,
EMPATHY_TYPE_TP_CONTACT_FACTORY, EmpathyTpContactFactoryPriv);
tp_factory->priv = priv;
priv->account_manager = empathy_account_manager_dup_singleton ();
g_signal_connect (priv->account_manager, "account-connection-changed",
G_CALLBACK (tp_contact_factory_account_connection_cb),
tp_factory);
priv->can_request_ft = FALSE;
}
EmpathyTpContactFactory *
empathy_tp_contact_factory_new (McAccount *account)
{
return g_object_new (EMPATHY_TYPE_TP_CONTACT_FACTORY,
"account", account,
NULL);
}