libempathy/empathy-tp-chat.c

   1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
   2 /*
   3  * Copyright (C) 2007-2008 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 <telepathy-glib/channel.h>
  27 #include <telepathy-glib/dbus.h>
  28 #include <telepathy-glib/util.h>
  29
  30 #include "empathy-tp-chat.h"
  31 #include "empathy-contact-factory.h"
  32 #include "empathy-contact-list.h"
  33 #include "empathy-marshal.h"
  34 #include "empathy-time.h"
  35 #include "empathy-utils.h"
  36
  37 #define DEBUG_FLAG EMPATHY_DEBUG_TP | EMPATHY_DEBUG_CHAT
  38 #include "empathy-debug.h"
  39
  40 #define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyTpChat)
  41 typedef struct {
  42         EmpathyContactFactory *factory;
  43         EmpathyContact        *user;
  44         EmpathyContact        *remote_contact;
  45         EmpathyTpGroup        *group;
  46         McAccount             *account;
  47         TpChannel             *channel;
  48         gchar                 *id;
  49         gboolean               acknowledge;
  50         gboolean               listing_pending_messages;
  51         GSList                *message_queue;
  52         gboolean               had_properties_list;
  53         GPtrArray             *properties;
  54         gboolean               ready;
  55         guint                  members_count;
  56 } EmpathyTpChatPriv;
  57
  58 typedef struct {
  59         gchar          *name;
  60         guint           id;
  61         TpPropertyFlags flags;
  62         GValue         *value;
  63 } TpChatProperty;
  64
  65 static void tp_chat_iface_init         (EmpathyContactListIface *iface);
  66
  67 enum {
  68         PROP_0,
  69         PROP_CHANNEL,
  70         PROP_ACKNOWLEDGE,
  71         PROP_REMOTE_CONTACT,
  72         PROP_READY,
  73 };
  74
  75 enum {
  76         MESSAGE_RECEIVED,
  77         SEND_ERROR,
  78         CHAT_STATE_CHANGED,
  79         PROPERTY_CHANGED,
  80         DESTROY,
  81         LAST_SIGNAL
  82 };
  83
  84 static guint signals[LAST_SIGNAL];
  85
  86 G_DEFINE_TYPE_WITH_CODE (EmpathyTpChat, empathy_tp_chat, G_TYPE_OBJECT,
  87                          G_IMPLEMENT_INTERFACE (EMPATHY_TYPE_CONTACT_LIST,
  88                                                 tp_chat_iface_init));
  89
  90 static void
  91 tp_chat_invalidated_cb (TpProxy       *proxy,
  92                         guint          domain,
  93                         gint           code,
  94                         gchar         *message,
  95                         EmpathyTpChat *chat)
  96 {
  97         DEBUG ("Channel invalidated: %s", message);
  98         g_signal_emit (chat, signals[DESTROY], 0);
  99 }
 100
 101 static void
 102 tp_chat_async_cb (TpChannel *proxy,
 103                   const GError *error,
 104                   gpointer user_data,
 105                   GObject *weak_object)
 106 {
 107         if (error) {
 108                 DEBUG ("Error %s: %s", (gchar*) user_data, error->message);
 109         }
 110 }
 111
 112 static void
 113 tp_chat_member_added_cb (EmpathyTpGroup *group,
 114                          EmpathyContact *contact,
 115                          EmpathyContact *actor,
 116                          guint           reason,
 117                          const gchar    *message,
 118                          EmpathyTpChat  *chat)
 119 {
 120         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 121         guint              handle_type = 0;
 122
 123         priv->members_count++;
 124         g_signal_emit_by_name (chat, "members-changed",
 125                                contact, actor, reason, message,
 126                                TRUE);
 127
 128         g_object_get (priv->channel, "handle-type", &handle_type, NULL);
 129         if (handle_type == TP_HANDLE_TYPE_ROOM) {
 130                 return;
 131         }
 132
 133         if (priv->members_count > 2 && priv->remote_contact) {
 134                 /* We now have more than 2 members, this is not a p2p chat
 135                  * anymore. Remove the remote-contact as it makes no sense, the
 136                  * EmpathyContactList interface must be used now. */
 137                 g_object_unref (priv->remote_contact);
 138                 priv->remote_contact = NULL;
 139                 g_object_notify (G_OBJECT (chat), "remote-contact");
 140         }
 141         if (priv->members_count <= 2 && !priv->remote_contact &&
 142             !empathy_contact_is_user (contact)) {
 143                 /* This is a p2p chat, if it's not ourself that means this is
 144                  * the remote contact with who we are chatting. This is to
 145                  * avoid forcing the usage of the EmpathyContactList interface
 146                  * for p2p chats. */
 147                 priv->remote_contact = g_object_ref (contact);
 148                 g_object_notify (G_OBJECT (chat), "remote-contact");
 149         }
 150 }
 151
 152 static void
 153 tp_chat_member_removed_cb (EmpathyTpGroup *group,
 154                            EmpathyContact *contact,
 155                            EmpathyContact *actor,
 156                            guint           reason,
 157                            const gchar    *message,
 158                            EmpathyTpChat  *chat)
 159 {
 160         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 161         guint              handle_type = 0;
 162
 163         priv->members_count--;
 164         g_signal_emit_by_name (chat, "members-changed",
 165                                contact, actor, reason, message,
 166                                FALSE);
 167
 168         g_object_get (priv->channel, "handle-type", &handle_type, NULL);
 169         if (handle_type == TP_HANDLE_TYPE_ROOM) {
 170                 return;
 171         }
 172
 173         if (priv->members_count <= 2 && !priv->remote_contact) {
 174                 GList *members, *l;
 175
 176                 /* We are not a MUC anymore, get the remote contact back */
 177                 members = empathy_tp_group_get_members (group);
 178                 for (l = members; l; l = l->next) {
 179                         if (!empathy_contact_is_user (l->data)) {
 180                                 priv->remote_contact = g_object_ref (l->data);
 181                                 g_object_notify (G_OBJECT (chat), "remote-contact");
 182                                 break;
 183                         }
 184                 }
 185                 g_list_foreach (members, (GFunc) g_object_unref, NULL);
 186                 g_list_free (members);
 187         }
 188 }
 189
 190 static void
 191 tp_chat_local_pending_cb  (EmpathyTpGroup *group,
 192                            EmpathyContact *contact,
 193                            EmpathyContact *actor,
 194                            guint           reason,
 195                            const gchar    *message,
 196                            EmpathyTpChat  *chat)
 197 {
 198         g_signal_emit_by_name (chat, "pendings-changed",
 199                                contact, actor, reason, message,
 200                                TRUE);
 201 }
 202
 203 static void
 204 tp_chat_add (EmpathyContactList *list,
 205              EmpathyContact     *contact,
 206              const gchar        *message)
 207 {
 208         EmpathyTpChatPriv *priv = GET_PRIV (list);
 209
 210         g_return_if_fail (EMPATHY_IS_TP_CHAT (list));
 211         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
 212
 213         if (priv->group) {
 214                 empathy_tp_group_add_member (priv->group, contact, message);
 215         }
 216 }
 217
 218 static void
 219 tp_chat_remove (EmpathyContactList *list,
 220                 EmpathyContact     *contact,
 221                 const gchar        *message)
 222 {
 223         EmpathyTpChatPriv *priv = GET_PRIV (list);
 224
 225         g_return_if_fail (EMPATHY_IS_TP_CHAT (list));
 226         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
 227
 228         if (priv->group) {
 229                 empathy_tp_group_remove_member (priv->group, contact, message);
 230         }
 231 }
 232
 233 static GList *
 234 tp_chat_get_members (EmpathyContactList *list)
 235 {
 236         EmpathyTpChatPriv *priv = GET_PRIV (list);
 237         GList             *members = NULL;
 238
 239         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (list), NULL);
 240
 241         if (priv->group) {
 242                 members = empathy_tp_group_get_members (priv->group);
 243         } else {
 244                 members = g_list_prepend (members, g_object_ref (priv->user));
 245                 members = g_list_prepend (members, g_object_ref (priv->remote_contact));
 246         }
 247
 248         return members;
 249 }
 250
 251 static EmpathyMessage *
 252 tp_chat_build_message (EmpathyTpChat *chat,
 253                        guint          type,
 254                        guint          timestamp,
 255                        guint          from_handle,
 256                        const gchar   *message_body)
 257 {
 258         EmpathyTpChatPriv *priv;
 259         EmpathyMessage    *message;
 260         EmpathyContact    *sender;
 261
 262         priv = GET_PRIV (chat);
 263
 264         if (from_handle == 0) {
 265                 sender = g_object_ref (priv->user);
 266         } else {
 267                 sender = empathy_contact_factory_get_from_handle (priv->factory,
 268                                                                   priv->account,
 269                                                                   from_handle);
 270         }
 271
 272         message = empathy_message_new (message_body);
 273         empathy_message_set_tptype (message, type);
 274         empathy_message_set_sender (message, sender);
 275         empathy_message_set_receiver (message, priv->user);
 276         empathy_message_set_timestamp (message, timestamp);
 277
 278         g_object_unref (sender);
 279
 280         return message;
 281 }
 282
 283 static void
 284 tp_chat_sender_ready_notify_cb (EmpathyContact *contact,
 285                                 GParamSpec     *param_spec,
 286                                 EmpathyTpChat  *chat)
 287 {
 288         EmpathyTpChatPriv   *priv = GET_PRIV (chat);
 289         EmpathyMessage      *message;
 290         EmpathyContactReady  ready;
 291         EmpathyContact      *sender;
 292         gboolean             removed = FALSE;
 293
 294         /* Emit all messages queued until we find a message with not
 295          * ready sender. When leaving this loop, sender is the first not ready
 296          * contact queued and removed tells if at least one message got removed
 297          * from the queue. */
 298         while (priv->message_queue) {
 299                 message = priv->message_queue->data;
 300                 sender = empathy_message_get_sender (message);
 301                 ready = empathy_contact_get_ready (sender);
 302
 303                 if (!(ready & EMPATHY_CONTACT_READY_NAME)) {
 304                         break;
 305                 }
 306
 307                 DEBUG ("Queued message ready");
 308                 g_signal_emit (chat, signals[MESSAGE_RECEIVED], 0, message);
 309                 priv->message_queue = g_slist_remove (priv->message_queue,
 310                                                       message);
 311                 g_object_unref (message);
 312                 removed = TRUE;
 313         }
 314
 315         if (removed) {
 316                 g_signal_handlers_disconnect_by_func (contact,
 317                                                       tp_chat_sender_ready_notify_cb,
 318                                                       chat);
 319
 320                 if (priv->message_queue) {
 321                         g_signal_connect (sender, "notify::ready",
 322                                           G_CALLBACK (tp_chat_sender_ready_notify_cb),
 323                                           chat);
 324                 }
 325         }
 326 }
 327
 328 static void
 329 tp_chat_emit_or_queue_message (EmpathyTpChat  *chat,
 330                                EmpathyMessage *message)
 331 {
 332         EmpathyTpChatPriv   *priv = GET_PRIV (chat);
 333         EmpathyContact      *sender;
 334         EmpathyContactReady  ready;
 335
 336         if (priv->message_queue != NULL) {
 337                 DEBUG ("Message queue not empty");
 338                 priv->message_queue = g_slist_append (priv->message_queue,
 339                                                       g_object_ref (message));
 340                 return;
 341         }
 342
 343         sender = empathy_message_get_sender (message);
 344         ready = empathy_contact_get_ready (sender);
 345         if (ready & EMPATHY_CONTACT_READY_NAME) {
 346                 DEBUG ("Message queue empty and sender ready");
 347                 g_signal_emit (chat, signals[MESSAGE_RECEIVED], 0, message);
 348                 return;
 349         }
 350
 351         DEBUG ("Sender not ready");
 352         priv->message_queue = g_slist_append (priv->message_queue,
 353                                               g_object_ref (message));
 354         g_signal_connect (sender, "notify::ready",
 355                           G_CALLBACK (tp_chat_sender_ready_notify_cb),
 356                           chat);
 357 }
 358
 359 static void
 360 tp_chat_received_cb (TpChannel   *channel,
 361                      guint        message_id,
 362                      guint        timestamp,
 363                      guint        from_handle,
 364                      guint        message_type,
 365                      guint        message_flags,
 366                      const gchar *message_body,
 367                      gpointer     user_data,
 368                      GObject     *chat)
 369 {
 370         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 371         EmpathyMessage    *message;
 372
 373         if (priv->listing_pending_messages) {
 374                 return;
 375         }
 376
 377         DEBUG ("Message received: %s", message_body);
 378
 379         message = tp_chat_build_message (EMPATHY_TP_CHAT (chat),
 380                                          message_type,
 381                                          timestamp,
 382                                          from_handle,
 383                                          message_body);
 384
 385         tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message);
 386         g_object_unref (message);
 387
 388         if (priv->acknowledge) {
 389                 GArray *message_ids;
 390
 391                 message_ids = g_array_new (FALSE, FALSE, sizeof (guint));
 392                 g_array_append_val (message_ids, message_id);
 393                 tp_cli_channel_type_text_call_acknowledge_pending_messages (priv->channel,
 394                                                                             -1,
 395                                                                             message_ids,
 396                                                                             tp_chat_async_cb,
 397                                                                             "acknowledging received message",
 398                                                                             NULL,
 399                                                                             chat);
 400                 g_array_free (message_ids, TRUE);
 401         }
 402 }
 403
 404 static void
 405 tp_chat_sent_cb (TpChannel   *channel,
 406                  guint        timestamp,
 407                  guint        message_type,
 408                  const gchar *message_body,
 409                  gpointer     user_data,
 410                  GObject     *chat)
 411 {
 412         EmpathyMessage *message;
 413
 414         DEBUG ("Message sent: %s", message_body);
 415
 416         message = tp_chat_build_message (EMPATHY_TP_CHAT (chat),
 417                                          message_type,
 418                                          timestamp,
 419                                          0,
 420                                          message_body);
 421
 422         tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message);
 423         g_object_unref (message);
 424 }
 425
 426 static void
 427 tp_chat_send_error_cb (TpChannel   *channel,
 428                        guint        error_code,
 429                        guint        timestamp,
 430                        guint        message_type,
 431                        const gchar *message_body,
 432                        gpointer     user_data,
 433                        GObject     *chat)
 434 {
 435         EmpathyMessage *message;
 436
 437         DEBUG ("Message sent error: %s (%d)", message_body, error_code);
 438
 439         message = tp_chat_build_message (EMPATHY_TP_CHAT (chat),
 440                                          message_type,
 441                                          timestamp,
 442                                          0,
 443                                          message_body);
 444
 445         g_signal_emit (chat, signals[SEND_ERROR], 0, message, error_code);
 446         g_object_unref (message);
 447 }
 448
 449 static void
 450 tp_chat_state_changed_cb (TpChannel *channel,
 451                           guint      handle,
 452                           guint      state,
 453                           gpointer   user_data,
 454                           GObject   *chat)
 455 {
 456         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 457         EmpathyContact    *contact;
 458
 459         contact = empathy_contact_factory_get_from_handle (priv->factory,
 460                                                            priv->account,
 461                                                            handle);
 462
 463         DEBUG ("Chat state changed for %s (%d): %d",
 464                 empathy_contact_get_name (contact), handle, state);
 465
 466         g_signal_emit (chat, signals[CHAT_STATE_CHANGED], 0, contact, state);
 467         g_object_unref (contact);
 468 }
 469
 470 static void
 471 tp_chat_list_pending_messages_cb (TpChannel       *channel,
 472                                   const GPtrArray *messages_list,
 473                                   const GError    *error,
 474                                   gpointer         user_data,
 475                                   GObject         *chat)
 476 {
 477         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 478         guint              i;
 479         GArray            *message_ids = NULL;
 480
 481         priv->listing_pending_messages = FALSE;
 482
 483         if (error) {
 484                 DEBUG ("Error listing pending messages: %s", error->message);
 485                 return;
 486         }
 487
 488         if (priv->acknowledge) {
 489                 message_ids = g_array_sized_new (FALSE, FALSE, sizeof (guint),
 490                                                  messages_list->len);
 491         }
 492
 493         for (i = 0; i < messages_list->len; i++) {
 494                 EmpathyMessage *message;
 495                 GValueArray    *message_struct;
 496                 const gchar    *message_body;
 497                 guint           message_id;
 498                 guint           timestamp;
 499                 guint           from_handle;
 500                 guint           message_type;
 501                 guint           message_flags;
 502
 503                 message_struct = g_ptr_array_index (messages_list, i);
 504
 505                 message_id = g_value_get_uint (g_value_array_get_nth (message_struct, 0));
 506                 timestamp = g_value_get_uint (g_value_array_get_nth (message_struct, 1));
 507                 from_handle = g_value_get_uint (g_value_array_get_nth (message_struct, 2));
 508                 message_type = g_value_get_uint (g_value_array_get_nth (message_struct, 3));
 509                 message_flags = g_value_get_uint (g_value_array_get_nth (message_struct, 4));
 510                 message_body = g_value_get_string (g_value_array_get_nth (message_struct, 5));
 511
 512                 DEBUG ("Message pending: %s", message_body);
 513
 514                 if (message_ids) {
 515                         g_array_append_val (message_ids, message_id);
 516                 }
 517
 518                 message = tp_chat_build_message (EMPATHY_TP_CHAT (chat),
 519                                                  message_type,
 520                                                  timestamp,
 521                                                  from_handle,
 522                                                  message_body);
 523
 524                 tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message);
 525                 g_object_unref (message);
 526         }
 527
 528         if (message_ids) {
 529                 tp_cli_channel_type_text_call_acknowledge_pending_messages (priv->channel,
 530                                                                             -1,
 531                                                                             message_ids,
 532                                                                             tp_chat_async_cb,
 533                                                                             "acknowledging pending messages",
 534                                                                             NULL,
 535                                                                             chat);
 536                 g_array_free (message_ids, TRUE);
 537         }
 538 }
 539
 540 static void
 541 tp_chat_property_flags_changed_cb (TpProxy         *proxy,
 542                                    const GPtrArray *properties,
 543                                    gpointer         user_data,
 544                                    GObject         *chat)
 545 {
 546         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 547         guint              i, j;
 548
 549         if (!priv->had_properties_list || !properties) {
 550                 return;
 551         }
 552
 553         for (i = 0; i < properties->len; i++) {
 554                 GValueArray    *prop_struct;
 555                 TpChatProperty *property;
 556                 guint           id;
 557                 guint           flags;
 558
 559                 prop_struct = g_ptr_array_index (properties, i);
 560                 id = g_value_get_uint (g_value_array_get_nth (prop_struct, 0));
 561                 flags = g_value_get_uint (g_value_array_get_nth (prop_struct, 1));
 562
 563                 for (j = 0; j < priv->properties->len; j++) {
 564                         property = g_ptr_array_index (priv->properties, j);
 565                         if (property->id == id) {
 566                                 property->flags = flags;
 567                                 DEBUG ("property %s flags changed: %d",
 568                                         property->name, property->flags);
 569                                 break;
 570                         }
 571                 }
 572         }
 573 }
 574
 575 static void
 576 tp_chat_properties_changed_cb (TpProxy         *proxy,
 577                                const GPtrArray *properties,
 578                                gpointer         user_data,
 579                                GObject         *chat)
 580 {
 581         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 582         guint              i, j;
 583
 584         if (!priv->had_properties_list || !properties) {
 585                 return;
 586         }
 587
 588         for (i = 0; i < properties->len; i++) {
 589                 GValueArray    *prop_struct;
 590                 TpChatProperty *property;
 591                 guint           id;
 592                 GValue         *src_value;
 593
 594                 prop_struct = g_ptr_array_index (properties, i);
 595                 id = g_value_get_uint (g_value_array_get_nth (prop_struct, 0));
 596                 src_value = g_value_get_boxed (g_value_array_get_nth (prop_struct, 1));
 597
 598                 for (j = 0; j < priv->properties->len; j++) {
 599                         property = g_ptr_array_index (priv->properties, j);
 600                         if (property->id == id) {
 601                                 if (property->value) {
 602                                         g_value_copy (src_value, property->value);
 603                                 } else {
 604                                         property->value = tp_g_value_slice_dup (src_value);
 605                                 }
 606
 607                                 DEBUG ("property %s changed", property->name);
 608                                 g_signal_emit (chat, signals[PROPERTY_CHANGED], 0,
 609                                                property->name, property->value);
 610                                 break;
 611                         }
 612                 }
 613         }
 614 }
 615
 616 static void
 617 tp_chat_get_properties_cb (TpProxy         *proxy,
 618                            const GPtrArray *properties,
 619                            const GError    *error,
 620                            gpointer         user_data,
 621                            GObject         *chat)
 622 {
 623         if (error) {
 624                 DEBUG ("Error getting properties: %s", error->message);
 625                 return;
 626         }
 627
 628         tp_chat_properties_changed_cb (proxy, properties, user_data, chat);
 629 }
 630
 631 static void
 632 tp_chat_list_properties_cb (TpProxy         *proxy,
 633                             const GPtrArray *properties,
 634                             const GError    *error,
 635                             gpointer         user_data,
 636                             GObject         *chat)
 637 {
 638         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 639         GArray            *ids;
 640         guint              i;
 641
 642         priv->had_properties_list = TRUE;
 643
 644         if (error) {
 645                 DEBUG ("Error listing properties: %s", error->message);
 646                 return;
 647         }
 648
 649         ids = g_array_sized_new (FALSE, FALSE, sizeof (guint), properties->len);
 650         priv->properties = g_ptr_array_sized_new (properties->len);
 651         for (i = 0; i < properties->len; i++) {
 652                 GValueArray    *prop_struct;
 653                 TpChatProperty *property;
 654
 655                 prop_struct = g_ptr_array_index (properties, i);
 656                 property = g_slice_new0 (TpChatProperty);
 657                 property->id = g_value_get_uint (g_value_array_get_nth (prop_struct, 0));
 658                 property->name = g_value_dup_string (g_value_array_get_nth (prop_struct, 1));
 659                 property->flags = g_value_get_uint (g_value_array_get_nth (prop_struct, 3));
 660
 661                 DEBUG ("Adding property name=%s id=%d flags=%d",
 662                         property->name, property->id, property->flags);
 663                 g_ptr_array_add (priv->properties, property);
 664                 if (property->flags & TP_PROPERTY_FLAG_READ) {
 665                         g_array_append_val (ids, property->id);
 666                 }
 667         }
 668
 669         tp_cli_properties_interface_call_get_properties (proxy, -1,
 670                                                          ids,
 671                                                          tp_chat_get_properties_cb,
 672                                                          NULL, NULL,
 673                                                          chat);
 674
 675         g_array_free (ids, TRUE);
 676 }
 677
 678 void
 679 empathy_tp_chat_set_property (EmpathyTpChat *chat,
 680                               const gchar   *name,
 681                               const GValue  *value)
 682 {
 683         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 684         TpChatProperty    *property;
 685         guint              i;
 686
 687         g_return_if_fail (priv->ready);
 688
 689         for (i = 0; i < priv->properties->len; i++) {
 690                 property = g_ptr_array_index (priv->properties, i);
 691                 if (!tp_strdiff (property->name, name)) {
 692                         GPtrArray   *properties;
 693                         GValueArray *prop;
 694                         GValue       id = {0, };
 695                         GValue       dest_value = {0, };
 696
 697                         if (!(property->flags & TP_PROPERTY_FLAG_WRITE)) {
 698                                 break;
 699                         }
 700
 701                         g_value_init (&id, G_TYPE_UINT);
 702                         g_value_init (&dest_value, G_TYPE_VALUE);
 703                         g_value_set_uint (&id, property->id);
 704                         g_value_set_boxed (&dest_value, value);
 705
 706                         prop = g_value_array_new (2);
 707                         g_value_array_append (prop, &id);
 708                         g_value_array_append (prop, &dest_value);
 709
 710                         properties = g_ptr_array_sized_new (1);
 711                         g_ptr_array_add (properties, prop);
 712
 713                         DEBUG ("Set property %s", name);
 714                         tp_cli_properties_interface_call_set_properties (priv->channel, -1,
 715                                                                          properties,
 716                                                                          (tp_cli_properties_interface_callback_for_set_properties)
 717                                                                          tp_chat_async_cb,
 718                                                                          "Seting property", NULL,
 719                                                                          G_OBJECT (chat));
 720
 721                         g_ptr_array_free (properties, TRUE);
 722                         g_value_array_free (prop);
 723
 724                         break;
 725                 }
 726         }
 727 }
 728
 729 static void
 730 tp_chat_channel_ready_cb (EmpathyTpChat *chat)
 731 {
 732         EmpathyTpChatPriv *priv = GET_PRIV (chat);
 733         TpConnection      *connection;
 734         guint              handle, handle_type;
 735
 736         DEBUG ("Channel ready");
 737
 738         g_object_get (priv->channel,
 739                       "connection", &connection,
 740                       "handle", &handle,
 741                       "handle_type", &handle_type,
 742                       NULL);
 743
 744         if (handle_type != TP_HANDLE_TYPE_NONE && handle != 0) {
 745                 GArray *handles;
 746                 gchar **names;
 747
 748                 handles = g_array_new (FALSE, FALSE, sizeof (guint));
 749                 g_array_append_val (handles, handle);
 750                 tp_cli_connection_run_inspect_handles (connection, -1,
 751                                                        handle_type, handles,
 752                                                        &names, NULL, NULL);
 753                 priv->id = *names;
 754                 g_array_free (handles, TRUE);
 755                 g_free (names);
 756         }
 757
 758         if (handle_type == TP_HANDLE_TYPE_CONTACT && handle != 0) {
 759                 priv->remote_contact = empathy_contact_factory_get_from_handle (priv->factory,
 760                                                                                 priv->account,
 761                                                                                 handle);
 762                 g_object_notify (G_OBJECT (chat), "remote-contact");
 763         }
 764
 765         if (tp_proxy_has_interface_by_id (priv->channel,
 766                                           TP_IFACE_QUARK_CHANNEL_INTERFACE_GROUP)) {
 767                 priv->group = empathy_tp_group_new (priv->channel);
 768
 769                 g_signal_connect (priv->group, "member-added",
 770                                   G_CALLBACK (tp_chat_member_added_cb),
 771                                   chat);
 772                 g_signal_connect (priv->group, "member-removed",
 773                                   G_CALLBACK (tp_chat_member_removed_cb),
 774                                   chat);
 775                 g_signal_connect (priv->group, "local-pending",
 776                                   G_CALLBACK (tp_chat_local_pending_cb),
 777                                   chat);
 778                 empathy_run_until_ready (priv->group);
 779         } else {
 780                 priv->members_count = 2;
 781         }
 782
 783         if (tp_proxy_has_interface_by_id (priv->channel,
 784                                           TP_IFACE_QUARK_PROPERTIES_INTERFACE)) {
 785                 tp_cli_properties_interface_call_list_properties (priv->channel, -1,
 786                                                                   tp_chat_list_properties_cb,
 787                                                                   NULL, NULL,
 788                                                                   G_OBJECT (chat));
 789                 tp_cli_properties_interface_connect_to_properties_changed (priv->channel,
 790                                                                            tp_chat_properties_changed_cb,
 791                                                                            NULL, NULL,
 792                                                                            G_OBJECT (chat), NULL);
 793                 tp_cli_properties_interface_connect_to_property_flags_changed (priv->channel,
 794                                                                                tp_chat_property_flags_changed_cb,
 795                                                                                NULL, NULL,
 796                                                                                G_OBJECT (chat), NULL);
 797         }
 798
 799         priv->listing_pending_messages = TRUE;
 800         tp_cli_channel_type_text_call_list_pending_messages (priv->channel, -1,
 801                                                              FALSE,
 802                                                              tp_chat_list_pending_messages_cb,
 803                                                              NULL, NULL,
 804                                                              G_OBJECT (chat));
 805
 806         tp_cli_channel_type_text_connect_to_received (priv->channel,
 807                                                       tp_chat_received_cb,
 808                                                       NULL, NULL,
 809                                                       G_OBJECT (chat), NULL);
 810         tp_cli_channel_type_text_connect_to_sent (priv->channel,
 811                                                   tp_chat_sent_cb,
 812                                                   NULL, NULL,
 813                                                   G_OBJECT (chat), NULL);
 814         tp_cli_channel_type_text_connect_to_send_error (priv->channel,
 815                                                         tp_chat_send_error_cb,
 816                                                         NULL, NULL,
 817                                                         G_OBJECT (chat), NULL);
 818         tp_cli_channel_interface_chat_state_connect_to_chat_state_changed (priv->channel,
 819                                                                            tp_chat_state_changed_cb,
 820                                                                            NULL, NULL,
 821                                                                            G_OBJECT (chat), NULL);
 822         tp_cli_channel_interface_chat_state_connect_to_chat_state_changed (priv->channel,
 823                                                                            tp_chat_state_changed_cb,
 824                                                                            NULL, NULL,
 825                                                                            G_OBJECT (chat), NULL);
 826
 827         priv->ready = TRUE;
 828         g_object_notify (G_OBJECT (chat), "ready");
 829 }
 830
 831 static void
 832 tp_chat_finalize (GObject *object)
 833 {
 834         EmpathyTpChatPriv *priv = GET_PRIV (object);
 835         guint              i;
 836
 837         if (priv->acknowledge && priv->channel) {
 838                 DEBUG ("Closing channel...");
 839                 tp_cli_channel_call_close (priv->channel, -1,
 840                                            tp_chat_async_cb,
 841                                            "closing channel", NULL,
 842                                            NULL);
 843         }
 844
 845         if (priv->channel) {
 846                 g_signal_handlers_disconnect_by_func (priv->channel,
 847                                                       tp_chat_invalidated_cb,
 848                                                       object);
 849                 g_object_unref (priv->channel);
 850         }
 851
 852         if (priv->properties) {
 853                 for (i = 0; i < priv->properties->len; i++) {
 854                         TpChatProperty *property;
 855
 856                         property = g_ptr_array_index (priv->properties, i);
 857                         g_free (property->name);
 858                         if (property->value) {
 859                                 tp_g_value_slice_free (property->value);
 860                         }
 861                         g_slice_free (TpChatProperty, property);
 862                 }
 863                 g_ptr_array_free (priv->properties, TRUE);
 864         }
 865
 866         if (priv->remote_contact) {
 867                 g_object_unref (priv->remote_contact);
 868         }
 869         if (priv->group) {
 870                 g_object_unref (priv->group);
 871         }
 872
 873         g_object_unref (priv->factory);
 874         g_object_unref (priv->user);
 875         g_object_unref (priv->account);
 876         g_free (priv->id);
 877
 878         G_OBJECT_CLASS (empathy_tp_chat_parent_class)->finalize (object);
 879 }
 880
 881 static GObject *
 882 tp_chat_constructor (GType                  type,
 883                      guint                  n_props,
 884                      GObjectConstructParam *props)
 885 {
 886         GObject           *chat;
 887         EmpathyTpChatPriv *priv;
 888         gboolean           channel_ready;
 889
 890         chat = G_OBJECT_CLASS (empathy_tp_chat_parent_class)->constructor (type, n_props, props);
 891
 892         priv = GET_PRIV (chat);
 893         priv->account = empathy_channel_get_account (priv->channel);
 894         priv->factory = empathy_contact_factory_new ();
 895         priv->user = empathy_contact_factory_get_user (priv->factory, priv->account);
 896
 897         g_signal_connect (priv->channel, "invalidated",
 898                           G_CALLBACK (tp_chat_invalidated_cb),
 899                           chat);
 900
 901         g_object_get (priv->channel, "channel-ready", &channel_ready, NULL);
 902         if (channel_ready) {
 903                 tp_chat_channel_ready_cb (EMPATHY_TP_CHAT (chat));
 904         } else {
 905                 g_signal_connect_swapped (priv->channel, "notify::channel-ready",
 906                                           G_CALLBACK (tp_chat_channel_ready_cb),
 907                                           chat);
 908         }
 909
 910         return chat;
 911 }
 912
 913 static void
 914 tp_chat_get_property (GObject    *object,
 915                       guint       param_id,
 916                       GValue     *value,
 917                       GParamSpec *pspec)
 918 {
 919         EmpathyTpChatPriv *priv = GET_PRIV (object);
 920
 921         switch (param_id) {
 922         case PROP_CHANNEL:
 923                 g_value_set_object (value, priv->channel);
 924                 break;
 925         case PROP_ACKNOWLEDGE:
 926                 g_value_set_boolean (value, priv->acknowledge);
 927                 break;
 928         case PROP_REMOTE_CONTACT:
 929                 g_value_set_object (value, priv->remote_contact);
 930                 break;
 931         case PROP_READY:
 932                 g_value_set_boolean (value, priv->ready);
 933                 break;
 934         default:
 935                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 936                 break;
 937         };
 938 }
 939
 940 static void
 941 tp_chat_set_property (GObject      *object,
 942                       guint         param_id,
 943                       const GValue *value,
 944                       GParamSpec   *pspec)
 945 {
 946         EmpathyTpChatPriv *priv = GET_PRIV (object);
 947
 948         switch (param_id) {
 949         case PROP_CHANNEL:
 950                 priv->channel = g_object_ref (g_value_get_object (value));
 951                 break;
 952         case PROP_ACKNOWLEDGE:
 953                 priv->acknowledge = g_value_get_boolean (value);
 954                 break;
 955         default:
 956                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 957                 break;
 958         };
 959 }
 960
 961 static void
 962 empathy_tp_chat_class_init (EmpathyTpChatClass *klass)
 963 {
 964         GObjectClass *object_class = G_OBJECT_CLASS (klass);
 965
 966         object_class->finalize = tp_chat_finalize;
 967         object_class->constructor = tp_chat_constructor;
 968         object_class->get_property = tp_chat_get_property;
 969         object_class->set_property = tp_chat_set_property;
 970
 971         g_object_class_install_property (object_class,
 972                                          PROP_CHANNEL,
 973                                          g_param_spec_object ("channel",
 974                                                               "telepathy channel",
 975                                                               "The text channel for the chat",
 976                                                               TP_TYPE_CHANNEL,
 977                                                               G_PARAM_READWRITE |
 978                                                               G_PARAM_CONSTRUCT_ONLY));
 979         g_object_class_install_property (object_class,
 980                                          PROP_ACKNOWLEDGE,
 981                                          g_param_spec_boolean ("acknowledge",
 982                                                                "acknowledge messages",
 983                                                                "Wheter or not received messages should be acknowledged",
 984                                                                FALSE,
 985                                                                G_PARAM_READWRITE));
 986
 987         g_object_class_install_property (object_class,
 988                                          PROP_REMOTE_CONTACT,
 989                                          g_param_spec_object ("remote-contact",
 990                                                               "The remote contact",
 991                                                               "The remote contact if there is no group iface on the channel",
 992                                                               EMPATHY_TYPE_CONTACT,
 993                                                               G_PARAM_READABLE));
 994         g_object_class_install_property (object_class,
 995                                          PROP_READY,
 996                                          g_param_spec_boolean ("ready",
 997                                                                "Is the object ready",
 998                                                                "This object can't be used until this becomes true",
 999                                                                FALSE,
1000                                                                G_PARAM_READABLE));
1001
1002         /* Signals */
1003         signals[MESSAGE_RECEIVED] =
1004                 g_signal_new ("message-received",
1005                               G_TYPE_FROM_CLASS (klass),
1006                               G_SIGNAL_RUN_LAST,
1007                               0,
1008                               NULL, NULL,
1009                               g_cclosure_marshal_VOID__OBJECT,
1010                               G_TYPE_NONE,
1011                               1, EMPATHY_TYPE_MESSAGE);
1012
1013         signals[SEND_ERROR] =
1014                 g_signal_new ("send-error",
1015                               G_TYPE_FROM_CLASS (klass),
1016                               G_SIGNAL_RUN_LAST,
1017                               0,
1018                               NULL, NULL,
1019                               _empathy_marshal_VOID__OBJECT_UINT,
1020                               G_TYPE_NONE,
1021                               2, EMPATHY_TYPE_MESSAGE, G_TYPE_UINT);
1022
1023         signals[CHAT_STATE_CHANGED] =
1024                 g_signal_new ("chat-state-changed",
1025                               G_TYPE_FROM_CLASS (klass),
1026                               G_SIGNAL_RUN_LAST,
1027                               0,
1028                               NULL, NULL,
1029                               _empathy_marshal_VOID__OBJECT_UINT,
1030                               G_TYPE_NONE,
1031                               2, EMPATHY_TYPE_CONTACT, G_TYPE_UINT);
1032
1033         signals[PROPERTY_CHANGED] =
1034                 g_signal_new ("property-changed",
1035                               G_TYPE_FROM_CLASS (klass),
1036                               G_SIGNAL_RUN_LAST,
1037                               0,
1038                               NULL, NULL,
1039                               _empathy_marshal_VOID__STRING_BOXED,
1040                               G_TYPE_NONE,
1041                               2, G_TYPE_STRING, G_TYPE_VALUE);
1042
1043         signals[DESTROY] =
1044                 g_signal_new ("destroy",
1045                               G_TYPE_FROM_CLASS (klass),
1046                               G_SIGNAL_RUN_LAST,
1047                               0,
1048                               NULL, NULL,
1049                               g_cclosure_marshal_VOID__VOID,
1050                               G_TYPE_NONE,
1051                               0);
1052
1053         g_type_class_add_private (object_class, sizeof (EmpathyTpChatPriv));
1054 }
1055
1056 static void
1057 empathy_tp_chat_init (EmpathyTpChat *chat)
1058 {
1059         EmpathyTpChatPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (chat,
1060                 EMPATHY_TYPE_TP_CHAT, EmpathyTpChatPriv);
1061
1062         chat->priv = priv;
1063 }
1064
1065 static void
1066 tp_chat_iface_init (EmpathyContactListIface *iface)
1067 {
1068         iface->add         = tp_chat_add;
1069         iface->remove      = tp_chat_remove;
1070         iface->get_members = tp_chat_get_members;
1071 }
1072
1073 EmpathyTpChat *
1074 empathy_tp_chat_new (TpChannel *channel)
1075 {
1076         return g_object_new (EMPATHY_TYPE_TP_CHAT,
1077                              "channel", channel,
1078                              NULL);
1079 }
1080
1081 const gchar *
1082 empathy_tp_chat_get_id (EmpathyTpChat *chat)
1083 {
1084         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1085
1086         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL);
1087         g_return_val_if_fail (priv->ready, NULL);
1088
1089         return priv->id;
1090 }
1091
1092 EmpathyContact *
1093 empathy_tp_chat_get_remote_contact (EmpathyTpChat *chat)
1094 {
1095         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1096
1097         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL);
1098
1099         return priv->remote_contact;
1100 }
1101
1102 McAccount *
1103 empathy_tp_chat_get_account (EmpathyTpChat *chat)
1104 {
1105         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1106
1107         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), FALSE);
1108
1109         return priv->account;
1110 }
1111
1112 TpChannel *
1113 empathy_tp_chat_get_channel (EmpathyTpChat *chat)
1114 {
1115         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1116
1117         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL);
1118
1119         return priv->channel;
1120 }
1121
1122 gboolean
1123 empathy_tp_chat_is_ready (EmpathyTpChat *chat)
1124 {
1125         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1126
1127         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), FALSE);
1128
1129         return priv->ready;
1130 }
1131
1132 guint
1133 empathy_tp_chat_get_members_count (EmpathyTpChat *chat)
1134 {
1135         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1136
1137         g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), 0);
1138
1139         return priv->members_count;
1140 }
1141
1142 void
1143 empathy_tp_chat_set_acknowledge (EmpathyTpChat *chat,
1144                                   gboolean      acknowledge)
1145 {
1146         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1147
1148         g_return_if_fail (EMPATHY_IS_TP_CHAT (chat));
1149
1150         priv->acknowledge = acknowledge;
1151         g_object_notify (G_OBJECT (chat), "acknowledge");
1152 }
1153
1154 void
1155 empathy_tp_chat_emit_pendings (EmpathyTpChat *chat)
1156 {
1157         EmpathyTpChatPriv  *priv = GET_PRIV (chat);
1158
1159         g_return_if_fail (EMPATHY_IS_TP_CHAT (chat));
1160         g_return_if_fail (priv->ready);
1161
1162         if (priv->listing_pending_messages) {
1163                 return;
1164         }
1165
1166         priv->listing_pending_messages = TRUE;
1167         tp_cli_channel_type_text_call_list_pending_messages (priv->channel, -1,
1168                                                              FALSE,
1169                                                              tp_chat_list_pending_messages_cb,
1170                                                              NULL, NULL,
1171                                                              G_OBJECT (chat));
1172 }
1173
1174 void
1175 empathy_tp_chat_send (EmpathyTpChat *chat,
1176                       EmpathyMessage *message)
1177 {
1178         EmpathyTpChatPriv        *priv = GET_PRIV (chat);
1179         const gchar              *message_body;
1180         TpChannelTextMessageType  message_type;
1181
1182         g_return_if_fail (EMPATHY_IS_TP_CHAT (chat));
1183         g_return_if_fail (EMPATHY_IS_MESSAGE (message));
1184         g_return_if_fail (priv->ready);
1185
1186         message_body = empathy_message_get_body (message);
1187         message_type = empathy_message_get_tptype (message);
1188
1189         DEBUG ("Sending message: %s", message_body);
1190         tp_cli_channel_type_text_call_send (priv->channel, -1,
1191                                             message_type,
1192                                             message_body,
1193                                             tp_chat_async_cb,
1194                                             "sending message", NULL,
1195                                             G_OBJECT (chat));
1196 }
1197
1198 void
1199 empathy_tp_chat_set_state (EmpathyTpChat      *chat,
1200                            TpChannelChatState  state)
1201 {
1202         EmpathyTpChatPriv *priv = GET_PRIV (chat);
1203
1204         g_return_if_fail (EMPATHY_IS_TP_CHAT (chat));
1205         g_return_if_fail (priv->ready);
1206
1207         DEBUG ("Set state: %d", state);
1208         tp_cli_channel_interface_chat_state_call_set_chat_state (priv->channel, -1,
1209                                                                  state,
1210                                                                  tp_chat_async_cb,
1211                                                                  "setting chat state",
1212                                                                  NULL,
1213                                                                  G_OBJECT (chat));
1214 }
1215