path: root/libempathy/empathy-tp-group.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 * Copyright (C) 2006 Xavier Claessens <xclaesse@gmail.com>
 * 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 <telepathy-glib/channel.h>
#include <telepathy-glib/util.h>
#include <telepathy-glib/interfaces.h>

#include "empathy-tp-group.h"
#include "empathy-contact-factory.h"
#include "empathy-debug.h"
#include "empathy-utils.h"
#include "empathy-marshal.h"

#define GET_PRIV(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), \
               EMPATHY_TYPE_TP_GROUP, EmpathyTpGroupPriv))

#define DEBUG_DOMAIN "TpGroup"

struct _EmpathyTpGroupPriv {
    McAccount             *account;
    TpChan                *tp_chan;
    TpChannel             *channel;

    EmpathyContactFactory *factory;
    gchar                 *group_name;
    guint                  self_handle;
    gboolean               ready;
    GList                 *members;
    GList                 *local_pendings;
    GList                 *remote_pendings;
};

static void empathy_tp_group_class_init (EmpathyTpGroupClass *klass);
static void empathy_tp_group_init       (EmpathyTpGroup      *group);

enum {
    MEMBER_ADDED,
    MEMBER_REMOVED,
    LOCAL_PENDING,
    REMOTE_PENDING,
    DESTROY,
    LAST_SIGNAL
};

enum {
    PROP_0,
    PROP_ACCOUNT,
    PROP_TP_CHAN,
    PROP_CHANNEL,
    PROP_READY
};

static guint signals[LAST_SIGNAL];

G_DEFINE_TYPE (EmpathyTpGroup, empathy_tp_group, G_TYPE_OBJECT);

static EmpathyContact *
tp_group_get_contact (EmpathyTpGroup *group,
              guint           handle)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    EmpathyContact     *contact = NULL;
    
    if (handle != 0) {
        contact = empathy_contact_factory_get_from_handle (priv->factory,
                                   priv->account,
                                   handle);
    }

    if (contact && handle == priv->self_handle) {
        empathy_contact_set_is_user (contact, TRUE);
    }

    return contact;
}

static GList *
tp_group_get_contacts (EmpathyTpGroup *group,
               const GArray   *handles)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    GList              *contacts,  *l;

    if (!handles) {
        return NULL;
    }

    contacts = empathy_contact_factory_get_from_handles (priv->factory,
                                 priv->account,
                                 handles);

    /* FIXME: Only useful if the group has a different self handle than
     * the connection, otherwise the contact factory already set that
     * property. That can be known using group flags. */
    for (l = contacts; l; l = l->next) {
        if (empathy_contact_get_handle (l->data) == priv->self_handle) {
            empathy_contact_set_is_user (l->data, TRUE);
        }
    }

    return contacts;
}

EmpathyPendingInfo *
empathy_pending_info_new (EmpathyContact *member,
              EmpathyContact *actor,
              const gchar    *message)
{
    EmpathyPendingInfo *info;

    info = g_slice_new0 (EmpathyPendingInfo);

    if (member) {
        info->member = g_object_ref (member);
    }
    if (actor) {
        info->actor = g_object_ref (actor);
    }
    if (message) {
        info->message = g_strdup (message);
    }

    return info;
}

void
empathy_pending_info_free (EmpathyPendingInfo *info)
{
    if (!info) {
        return;
    }

    if (info->member) {
        g_object_unref (info->member);
    }
    if (info->actor) {
        g_object_unref (info->actor);
    }
    g_free (info->message);

    g_slice_free (EmpathyPendingInfo, info);
}

static gint
tp_group_local_pending_find (gconstpointer a,
                 gconstpointer b)
{
    const EmpathyPendingInfo *info = a;

    return (info->member != b);
}

static void
tp_group_remove_from_pendings (EmpathyTpGroup *group,
                   EmpathyContact *contact)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    GList              *l;

    /* local pending */
    l = g_list_find_custom (priv->local_pendings,
                contact,
                tp_group_local_pending_find);
    if (l) {
        empathy_pending_info_free (l->data);
        priv->local_pendings = g_list_delete_link (priv->local_pendings, l);
    }

    /* remote pending */
    l = g_list_find (priv->remote_pendings, contact);
    if (l) {
        g_object_unref (l->data);
        priv->remote_pendings = g_list_delete_link (priv->remote_pendings, l);
    }
}

static void
tp_group_update_members (EmpathyTpGroup *group,
             const gchar    *message,
             const GArray   *added,
             const GArray   *removed,
             const GArray   *local_pending,
             const GArray   *remote_pending,
             guint           actor,
             guint           reason)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    EmpathyContact     *actor_contact = NULL;
    GList              *contacts, *l, *ll;

    actor_contact = tp_group_get_contact (group, actor);

    empathy_debug (DEBUG_DOMAIN, "Members changed for list %s:\n"
                     "  added-len=%d, current-len=%d\n"
                     "  removed-len=%d\n"
                     "  local-pending-len=%d, current-len=%d\n"
                     "  remote-pending-len=%d, current-len=%d",
               priv->group_name,
               added ? added->len : 0, g_list_length (priv->members),
               removed ? removed->len : 0,
               local_pending ? local_pending->len : 0,
               g_list_length (priv->local_pendings),
               remote_pending ? remote_pending->len : 0,
               g_list_length (priv->remote_pendings));

    /* Contacts added */
    contacts = tp_group_get_contacts (group, added);
    for (l = contacts; l; l = l->next) {
        tp_group_remove_from_pendings (group, l->data);

        /* If the contact is not yet member, add it and emit signal */
        if (!g_list_find (priv->members, l->data)) {
            priv->members = g_list_prepend (priv->members,
                            g_object_ref (l->data));
            g_signal_emit (group, signals[MEMBER_ADDED], 0,
                       l->data, actor_contact, reason, message);
        }
        g_object_unref (l->data);
    }
    g_list_free (contacts);

    /* Contacts removed */
    contacts = tp_group_get_contacts (group, removed);
    for (l = contacts; l; l = l->next) {
        tp_group_remove_from_pendings (group, l->data);

        /* If the contact is member, remove it and emit signal */
        if ((ll = g_list_find (priv->members, l->data))) {
            g_object_unref (ll->data);
            priv->members = g_list_delete_link (priv->members, ll);
            g_signal_emit (group, signals[MEMBER_REMOVED], 0,
                       l->data, actor_contact, reason, message);
        }
        g_object_unref (l->data);
    }
    g_list_free (contacts);

    /* Contacts local pending */
    contacts = tp_group_get_contacts (group, local_pending);
    for (l = contacts; l; l = l->next) {
        /* If the contact is not yet local-pending, add it and emit signal */
        if (!g_list_find_custom (priv->local_pendings, l->data,
                     tp_group_local_pending_find)) {
            EmpathyPendingInfo *info;

            info = empathy_pending_info_new (l->data,
                             actor_contact,
                             message);

            priv->local_pendings = g_list_prepend (priv->local_pendings, info);
            g_signal_emit (group, signals[LOCAL_PENDING], 0,
                       l->data, actor_contact, reason, message);
        }
        g_object_unref (l->data);
    }
    g_list_free (contacts);

    /* Contacts remote pending */
    contacts = tp_group_get_contacts (group, remote_pending);
    for (l = contacts; l; l = l->next) {
        /* If the contact is not yet remote-pending, add it and emit signal */
        if (!g_list_find (priv->remote_pendings, l->data)) {
            priv->remote_pendings = g_list_prepend (priv->remote_pendings,
                                g_object_ref (l->data));
            g_signal_emit (group, signals[REMOTE_PENDING], 0,
                       l->data, actor_contact, reason, message);
        }
        g_object_unref (l->data);
    }
    g_list_free (contacts);

    if (actor_contact) {
        g_object_unref (actor_contact);
    }

    empathy_debug (DEBUG_DOMAIN, "Members changed done for list %s:\n"
                     "  members-len=%d\n"
                     "  local-pendings-len=%d\n"
                     "  remote-pendings-len=%d",
               priv->group_name,
               g_list_length (priv->members),
               g_list_length (priv->local_pendings),
               g_list_length (priv->remote_pendings));
}

static void
tp_group_members_changed_cb (TpChannel    *channel,
                 const gchar  *message,
                 const GArray *added,
                 const GArray *removed,
                 const GArray *local_pending,
                 const GArray *remote_pending,
                 guint         actor,
                 guint         reason,
                 gpointer      user_data,
                 GObject      *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    if (priv->ready) {
        tp_group_update_members (EMPATHY_TP_GROUP (group), message,
                     added, removed,
                     local_pending, remote_pending,
                     actor, reason);
    }
}

static void
tp_group_get_members_cb (TpChannel    *channel,
             const GArray *handles,
             const GError *error,
             gpointer      user_data,
             GObject      *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    if (error) {
        empathy_debug (DEBUG_DOMAIN, "Failed to get members: %s",
                   error->message);
        return;
    }

    tp_group_update_members (EMPATHY_TP_GROUP (group),
                 NULL,    /* message */
                 handles, /* added */
                 NULL,    /* removed */
                 NULL,    /* local_pending */
                 NULL,    /* remote_pending */
                 0,       /* actor */
                 0);      /* reason */

    empathy_debug (DEBUG_DOMAIN, "Ready");
    priv->ready = TRUE;
    g_object_notify (group, "ready");
}

static void
tp_group_get_local_pending_cb (TpChannel        *channel,
                   const GPtrArray  *array,
                   const GError     *error,
                   gpointer          user_data,
                   GObject          *group)
{
    GArray *handles;
    guint   i = 0;
    
    if (error) {
        empathy_debug (DEBUG_DOMAIN, "Failed to get local pendings: %s",
                   error->message);
        return;
    }

    handles = g_array_sized_new (FALSE, FALSE, sizeof (guint), 1);
    g_array_append_val (handles, i);
    for (i = 0; array->len > i; i++) {
        GValueArray *pending_struct;
        const gchar *message;
        guint        member_handle;
        guint        actor_handle;
        guint        reason;

        pending_struct = g_ptr_array_index (array, i);
        member_handle = g_value_get_uint (g_value_array_get_nth (pending_struct, 0));
        actor_handle = g_value_get_uint (g_value_array_get_nth (pending_struct, 1));
        reason = g_value_get_uint (g_value_array_get_nth (pending_struct, 2));
        message = g_value_get_string (g_value_array_get_nth (pending_struct, 3));

        g_array_index (handles, guint, 0) = member_handle;

        tp_group_update_members (EMPATHY_TP_GROUP (group),
                     message,      /* message */
                     NULL,         /* added */
                     NULL,         /* removed */
                     handles,      /* local_pending */
                     NULL,         /* remote_pending */
                     actor_handle, /* actor */
                     reason);      /* reason */
    }
    g_array_free (handles, TRUE);
}

static void
tp_group_get_remote_pending_cb (TpChannel    *channel,
                const GArray *handles,
                const GError *error,
                gpointer      user_data,
                GObject      *group)
{
    if (error) {
        empathy_debug (DEBUG_DOMAIN, "Failed to get remote pendings: %s",
                   error->message);
        return;
    }

    tp_group_update_members (EMPATHY_TP_GROUP (group),
                 NULL,    /* message */
                 NULL,    /* added */
                 NULL,    /* removed */
                 NULL,    /* local_pending */
                 handles, /* remote_pending */
                 0,       /* actor */
                 0);      /* reason */
}

static void
tp_group_inspect_handles_cb (TpConnection  *connection,
                 const gchar  **names,
                 const GError  *error,
                 gpointer       user_data,
                 GObject       *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    if (error) {
        empathy_debug (DEBUG_DOMAIN, "Failed to inspect channel handle: %s",
                   error->message);
        return;
    }

    priv->group_name = g_strdup (*names);
}

static void
tp_group_invalidated_cb (TpProxy        *proxy,
             guint           domain,
             gint            code,
             gchar          *message,
             EmpathyTpGroup *group)
{
    empathy_debug (DEBUG_DOMAIN, "Channel invalidated: %s", message);
    g_signal_emit (group, signals[DESTROY], 0);
}

static void
tp_group_get_self_handle_cb (TpChannel    *proxy,
                 guint         handle,
                 const GError *error,
                 gpointer      user_data,
                 GObject      *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    TpConnection       *connection;
    guint               channel_handle;
    guint               channel_handle_type;
    GArray             *handles;

    if (error) {
        empathy_debug (DEBUG_DOMAIN, "Failed to get self handle: %s",
                   error->message);
        return;
    }

    priv->self_handle = handle;
    tp_cli_channel_interface_group_connect_to_members_changed (priv->channel,
                                   tp_group_members_changed_cb,
                                   NULL, NULL,
                                   group, NULL);

    /* GetMembers is called last, so it will be the last to get the reply,
     * so we'll be ready once that call return. */
    g_object_get (priv->channel,
              "connection", &connection,
              "handle-type", &channel_handle_type,
              "handle", &channel_handle,
              NULL);
    handles = g_array_sized_new (FALSE, FALSE, sizeof (guint), 1);
    g_array_prepend_val (handles, channel_handle);
    tp_cli_connection_call_inspect_handles (connection, -1,
                        channel_handle_type,
                        handles,
                        tp_group_inspect_handles_cb,
                        NULL, NULL,
                        group);
    g_array_free (handles, TRUE);

    tp_cli_channel_interface_group_call_get_local_pending_members_with_info
                            (priv->channel, -1,
                             tp_group_get_local_pending_cb,
                             NULL, NULL, 
                             group);
    tp_cli_channel_interface_group_call_get_remote_pending_members
                            (priv->channel, -1,
                             tp_group_get_remote_pending_cb,
                             NULL, NULL, 
                             group);
    tp_cli_channel_interface_group_call_get_members (priv->channel, -1,
                             tp_group_get_members_cb,
                             NULL, NULL, 
                             group);
}

static void
tp_group_factory_ready_cb (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv      *priv = GET_PRIV (group);
    EmpathyTpContactFactory *tp_factory;

    tp_factory = empathy_contact_factory_get_tp_factory (priv->factory, priv->account);
    g_signal_handlers_disconnect_by_func (tp_factory, tp_group_factory_ready_cb, group);
    tp_cli_channel_interface_group_call_get_self_handle (priv->channel, -1,
                                 tp_group_get_self_handle_cb,
                                 NULL, NULL,
                                 G_OBJECT (group));
}

static void
tp_group_channel_ready_cb (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv      *priv = GET_PRIV (group);
    EmpathyTpContactFactory *tp_factory;

    tp_factory = empathy_contact_factory_get_tp_factory (priv->factory,
                                 priv->account);
    if (empathy_tp_contact_factory_is_ready (tp_factory)) {
        tp_group_factory_ready_cb (group);
    } else {
        g_signal_connect_swapped (tp_factory, "notify::ready",
                      G_CALLBACK (tp_group_factory_ready_cb),
                      group);
    }
}

static void
tp_group_finalize (GObject *object)
{
    EmpathyTpGroupPriv      *priv = GET_PRIV (object);
    EmpathyTpContactFactory *tp_factory;

    empathy_debug (DEBUG_DOMAIN, "finalize: %p", object);

    tp_factory = empathy_contact_factory_get_tp_factory (priv->factory, priv->account);
    g_signal_handlers_disconnect_by_func (tp_factory, tp_group_factory_ready_cb, object);

    if (priv->tp_chan) {
        g_object_unref (priv->tp_chan);
    }
    if (priv->channel) {
        g_signal_handlers_disconnect_by_func (priv->channel,
                              tp_group_invalidated_cb,
                              object);
        g_object_unref (priv->channel);
    }
    if (priv->account) {
        g_object_unref (priv->account);
    }
    if (priv->factory) {
        g_object_unref (priv->factory);
    }
    g_free (priv->group_name);

    g_list_foreach (priv->members, (GFunc) g_object_unref, NULL);
    g_list_free (priv->members);

    g_list_foreach (priv->local_pendings, (GFunc) empathy_pending_info_free, NULL);
    g_list_free (priv->local_pendings);

    g_list_foreach (priv->remote_pendings, (GFunc) g_object_unref, NULL);
    g_list_free (priv->remote_pendings);

    G_OBJECT_CLASS (empathy_tp_group_parent_class)->finalize (object);
}

static void
tp_group_constructed (GObject *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    gboolean            channel_ready;

    priv->factory = empathy_contact_factory_new ();

    g_signal_connect (priv->channel, "invalidated",
              G_CALLBACK (tp_group_invalidated_cb),
              group);

    g_object_get (priv->channel, "channel-ready", &channel_ready, NULL);
    if (channel_ready) {
        tp_group_channel_ready_cb (EMPATHY_TP_GROUP (group));
    } else {
        g_signal_connect_swapped (priv->channel, "notify::channel-ready",
                      G_CALLBACK (tp_group_channel_ready_cb),
                      group);
    }
}

static void
tp_group_get_property (GObject    *object,
               guint       param_id,
               GValue     *value,
               GParamSpec *pspec)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (object);

    switch (param_id) {
    case PROP_ACCOUNT:
        g_value_set_object (value, priv->account);
        break;
    case PROP_TP_CHAN:
        g_value_set_object (value, priv->tp_chan);
        break;
    case PROP_CHANNEL:
        g_value_set_object (value, priv->channel);
        break;
    case PROP_READY:
        g_value_set_boolean (value, priv->ready);
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
        break;
    };
}

static void
tp_group_set_property (GObject      *object,
               guint         param_id,
               const GValue *value,
               GParamSpec   *pspec)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (object);

    switch (param_id) {
    case PROP_ACCOUNT:
        priv->account = g_object_ref (g_value_get_object (value));
        break;
    case PROP_TP_CHAN:
        priv->tp_chan = g_object_ref (g_value_get_object (value));
        break;
    case PROP_CHANNEL:
        priv->channel = g_object_ref (g_value_get_object (value));
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
        break;
    };
}

static void
empathy_tp_group_class_init (EmpathyTpGroupClass *klass)
{
    GObjectClass *object_class = G_OBJECT_CLASS (klass);

    object_class->finalize = tp_group_finalize;
    object_class->constructed = tp_group_constructed;
    object_class->get_property = tp_group_get_property;
    object_class->set_property = tp_group_set_property;

    g_object_class_install_property (object_class,
                     PROP_ACCOUNT,
                     g_param_spec_object ("account",
                                  "channel Account",
                                  "The account associated with the channel",
                                  MC_TYPE_ACCOUNT,
                                  G_PARAM_READWRITE |
                                  G_PARAM_CONSTRUCT_ONLY));
    g_object_class_install_property (object_class,
                     PROP_TP_CHAN,
                     g_param_spec_object ("tp-chan",
                                  "telepathy channel",
                                  "The old TpChan",
                                  TELEPATHY_CHAN_TYPE,
                                  G_PARAM_READWRITE |
                                  G_PARAM_CONSTRUCT_ONLY));
    g_object_class_install_property (object_class,
                     PROP_CHANNEL,
                     g_param_spec_object ("channel",
                                  "telepathy channel",
                                  "The channel for the group",
                                  TP_TYPE_CHANNEL,
                                  G_PARAM_READWRITE |
                                  G_PARAM_CONSTRUCT_ONLY));
    g_object_class_install_property (object_class,
                     PROP_READY,
                     g_param_spec_boolean ("ready",
                                   "Is the object ready",
                                   "This object can't be used until this becomes true",
                                   FALSE,
                                   G_PARAM_READABLE));

    signals[MEMBER_ADDED] =
        g_signal_new ("member-added",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  _empathy_marshal_VOID__OBJECT_OBJECT_UINT_STRING,
                  G_TYPE_NONE,
                  4, EMPATHY_TYPE_CONTACT, EMPATHY_TYPE_CONTACT, G_TYPE_UINT, G_TYPE_STRING);

    signals[MEMBER_REMOVED] =
        g_signal_new ("member-removed",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  _empathy_marshal_VOID__OBJECT_OBJECT_UINT_STRING,
                  G_TYPE_NONE,
                  4, EMPATHY_TYPE_CONTACT, EMPATHY_TYPE_CONTACT, G_TYPE_UINT, G_TYPE_STRING);

    signals[LOCAL_PENDING] =
        g_signal_new ("local-pending",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  _empathy_marshal_VOID__OBJECT_OBJECT_UINT_STRING,
                  G_TYPE_NONE,
                  4, EMPATHY_TYPE_CONTACT, EMPATHY_TYPE_CONTACT, G_TYPE_UINT, G_TYPE_STRING);

    signals[REMOTE_PENDING] =
        g_signal_new ("remote-pending",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  _empathy_marshal_VOID__OBJECT_OBJECT_UINT_STRING,
                  G_TYPE_NONE,
                  4, EMPATHY_TYPE_CONTACT, EMPATHY_TYPE_CONTACT, G_TYPE_UINT, G_TYPE_STRING);

    signals[DESTROY] =
        g_signal_new ("destroy",
                  G_TYPE_FROM_CLASS (klass),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  g_cclosure_marshal_VOID__VOID,
                  G_TYPE_NONE,
                  0);

    g_type_class_add_private (object_class, sizeof (EmpathyTpGroupPriv));
}

static void
empathy_tp_group_init (EmpathyTpGroup *group)
{
}

EmpathyTpGroup *
empathy_tp_group_new (McAccount *account,
              TpChan    *tp_chan)
{
    EmpathyTpGroup  *group;
    TpChannel       *channel;
    TpConnection    *connection;
    MissionControl  *mc;

    g_return_val_if_fail (MC_IS_ACCOUNT (account), NULL);
    g_return_val_if_fail (TELEPATHY_IS_CHAN (tp_chan), NULL);

    mc = empathy_mission_control_new ();
    connection = mission_control_get_tpconnection (mc, account, NULL);
    channel = tp_chan_dup_channel (tp_chan, connection, NULL);

    group = g_object_new (EMPATHY_TYPE_TP_GROUP, 
                  "account", account,
                  "channel", channel,
                  "tp-chan", tp_chan,
                  NULL);

    g_object_unref (channel);
    g_object_unref (connection);
    g_object_unref (mc);

    return group;
}

static void
tp_group_async_cb (TpChannel    *channel,
           const GError *error,
           gpointer      user_data,
           GObject      *weak_object)
{
    const gchar *msg = user_data;

    if (error) {
        empathy_debug (DEBUG_DOMAIN, "%s: %s", msg, error->message);
    }
}

void
empathy_tp_group_close (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_if_fail (EMPATHY_IS_TP_GROUP (group));
    g_return_if_fail (priv->ready);

    tp_cli_channel_call_close (priv->channel, -1,
                   tp_group_async_cb,
                   "Failed to close", NULL,
                   G_OBJECT (group));
}

static GArray *
tp_group_get_handles (GList *contacts)
{
    GArray *handles;
    guint   length;
    GList  *l;

    length = g_list_length (contacts);
    handles = g_array_sized_new (FALSE, FALSE, sizeof (guint), length);

    for (l = contacts; l; l = l->next) {
        guint handle;

        handle = empathy_contact_get_handle (l->data);
        g_array_append_val (handles, handle);
    }

    return handles;
}

void
empathy_tp_group_add_members (EmpathyTpGroup *group,
                  GList          *contacts,
                  const gchar    *message)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    GArray             *handles;

    g_return_if_fail (EMPATHY_IS_TP_GROUP (group));
    g_return_if_fail (contacts != NULL);
    g_return_if_fail (priv->ready);

    handles = tp_group_get_handles (contacts);
    tp_cli_channel_interface_group_call_add_members (priv->channel, -1,
                             handles,
                             message,
                             tp_group_async_cb,
                             "Failed to add members", NULL,
                             G_OBJECT (group));
    g_array_free (handles, TRUE);
}

void
empathy_tp_group_remove_members (EmpathyTpGroup *group,
                 GList          *contacts,
                 const gchar    *message)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    GArray             *handles;

    g_return_if_fail (EMPATHY_IS_TP_GROUP (group));
    g_return_if_fail (contacts != NULL);
    g_return_if_fail (priv->ready);

    handles = tp_group_get_handles (contacts);
    tp_cli_channel_interface_group_call_remove_members (priv->channel, -1,
                                handles,
                                message,
                                tp_group_async_cb,
                                "Failed to remove members", NULL,
                                G_OBJECT (group));
    g_array_free (handles, TRUE);
}

void
empathy_tp_group_add_member (EmpathyTpGroup *group,
                 EmpathyContact *contact,
                 const gchar    *message)
{
    GList *contacts;

    contacts = g_list_prepend (NULL, contact);
    empathy_tp_group_add_members (group, contacts, message);
    g_list_free (contacts);
}

void
empathy_tp_group_remove_member (EmpathyTpGroup *group,
                EmpathyContact *contact,
                const gchar    *message)
{
    GList *contacts;

    contacts = g_list_prepend (NULL, contact);
    empathy_tp_group_remove_members (group, contacts, message);
    g_list_free (contacts);
}

GList *
empathy_tp_group_get_members (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);

    g_list_foreach (priv->members, (GFunc) g_object_ref, NULL);

    return g_list_copy (priv->members);
}

GList *
empathy_tp_group_get_local_pendings (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);
    GList              *pendings = NULL, *l;

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);

    for (l = priv->local_pendings; l; l = l->next) {
        EmpathyPendingInfo *info;
        EmpathyPendingInfo *new_info;

        info = l->data;
        new_info = empathy_pending_info_new (info->member,
                             info->actor,
                             info->message);
        pendings = g_list_prepend (pendings, new_info);
    }

    return pendings;
}

GList *
empathy_tp_group_get_remote_pendings (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);

    g_list_foreach (priv->remote_pendings, (GFunc) g_object_ref, NULL);

    return g_list_copy (priv->remote_pendings);
}

const gchar *
empathy_tp_group_get_name (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);
    g_return_val_if_fail (priv->ready, NULL);

    return priv->group_name;
}

EmpathyContact *
empathy_tp_group_get_self_contact (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);
    g_return_val_if_fail (priv->ready, NULL);

    return tp_group_get_contact (group, priv->self_handle);
}

TpChan *
empathy_tp_group_get_channel (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv;

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), NULL);

    priv = GET_PRIV (group);

    return priv->tp_chan;
}

gboolean
empathy_tp_group_is_member (EmpathyTpGroup *group,
                EmpathyContact *contact)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), FALSE);
    g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), FALSE);

    return g_list_find (priv->members, contact) != NULL;
}

gboolean
empathy_tp_group_is_ready (EmpathyTpGroup *group)
{
    EmpathyTpGroupPriv *priv = GET_PRIV (group);

    g_return_val_if_fail (EMPATHY_IS_TP_GROUP (group), FALSE);

    return priv->ready;
}