/* -*- 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 */ #include #include #include #include #include "empathy-tp-chat.h" #include "empathy-contact-factory.h" #include "empathy-marshal.h" #include "empathy-debug.h" #include "empathy-time.h" #include "empathy-utils.h" #define GET_PRIV(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), \ EMPATHY_TYPE_TP_CHAT, EmpathyTpChatPriv)) #define DEBUG_DOMAIN "TpChat" struct _EmpathyTpChatPriv { EmpathyContactFactory *factory; EmpathyContact *user; McAccount *account; TpChannel *channel; gchar *id; MissionControl *mc; gboolean acknowledge; TpChan *tp_chan; gboolean had_pending_messages; GSList *message_queue; }; static void empathy_tp_chat_class_init (EmpathyTpChatClass *klass); static void empathy_tp_chat_init (EmpathyTpChat *chat); enum { PROP_0, PROP_ACCOUNT, PROP_CHANNEL, PROP_ACKNOWLEDGE, }; enum { MESSAGE_RECEIVED, SEND_ERROR, CHAT_STATE_CHANGED, DESTROY, LAST_SIGNAL }; static guint signals[LAST_SIGNAL]; G_DEFINE_TYPE (EmpathyTpChat, empathy_tp_chat, G_TYPE_OBJECT); static void tp_chat_invalidated_cb (TpProxy *proxy, guint domain, gint code, gchar *message, EmpathyTpChat *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); empathy_debug (DEBUG_DOMAIN, "Channel invalidated: %s", message); g_object_unref (priv->channel); g_object_unref (priv->tp_chan); priv->channel = NULL; priv->tp_chan = NULL; g_signal_emit (chat, signals[DESTROY], 0); } static void tp_chat_async_cb (TpChannel *proxy, const GError *error, gpointer user_data, GObject *weak_object) { if (error) { empathy_debug (DEBUG_DOMAIN, "Error %s: %s", user_data, error->message); } } static EmpathyMessage * tp_chat_build_message (EmpathyTpChat *chat, guint type, guint timestamp, guint from_handle, const gchar *message_body) { EmpathyTpChatPriv *priv; EmpathyMessage *message; EmpathyContact *sender; priv = GET_PRIV (chat); if (from_handle == 0) { sender = g_object_ref (priv->user); } else { sender = empathy_contact_factory_get_from_handle (priv->factory, priv->account, from_handle); } message = empathy_message_new (message_body); empathy_message_set_type (message, type); empathy_message_set_sender (message, sender); empathy_message_set_receiver (message, priv->user); empathy_message_set_timestamp (message, timestamp); g_object_unref (sender); return message; } static void tp_chat_sender_ready_notify_cb (EmpathyContact *contact, GParamSpec *param_spec, EmpathyTpChat *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); EmpathyMessage *message; EmpathyContactReady ready; EmpathyContact *sender; gboolean removed = FALSE; /* Emit all messages queued until we find a message with not * ready sender. When leaving this loop, sender is the first not ready * contact queued and removed tells if at least one message got removed * from the queue. */ while (priv->message_queue) { message = priv->message_queue->data; sender = empathy_message_get_sender (message); ready = empathy_contact_get_ready (sender); if (!(ready & EMPATHY_CONTACT_READY_NAME)) { break; } empathy_debug (DEBUG_DOMAIN, "Queued message ready"); g_signal_emit (chat, signals[MESSAGE_RECEIVED], 0, message); priv->message_queue = g_slist_remove (priv->message_queue, message); g_object_unref (message); removed = TRUE; } if (removed) { g_signal_handlers_disconnect_by_func (contact, tp_chat_sender_ready_notify_cb, chat); if (priv->message_queue) { g_signal_connect (sender, "notify::ready", G_CALLBACK (tp_chat_sender_ready_notify_cb), chat); } } } static void tp_chat_emit_or_queue_message (EmpathyTpChat *chat, EmpathyMessage *message) { EmpathyTpChatPriv *priv = GET_PRIV (chat); EmpathyContact *sender; EmpathyContactReady ready; if (priv->message_queue != NULL) { empathy_debug (DEBUG_DOMAIN, "Message queue not empty"); priv->message_queue = g_slist_append (priv->message_queue, g_object_ref (message)); return; } sender = empathy_message_get_sender (message); ready = empathy_contact_get_ready (sender); if (ready & EMPATHY_CONTACT_READY_NAME) { empathy_debug (DEBUG_DOMAIN, "Message queue empty and sender ready"); g_signal_emit (chat, signals[MESSAGE_RECEIVED], 0, message); return; } empathy_debug (DEBUG_DOMAIN, "Sender not ready"); priv->message_queue = g_slist_append (priv->message_queue, g_object_ref (message)); g_signal_connect (sender, "notify::ready", G_CALLBACK (tp_chat_sender_ready_notify_cb), chat); } static void tp_chat_received_cb (TpChannel *channel, guint message_id, guint timestamp, guint from_handle, guint message_type, guint message_flags, const gchar *message_body, gpointer user_data, GObject *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); EmpathyMessage *message; if (!priv->had_pending_messages) { return; } empathy_debug (DEBUG_DOMAIN, "Message received: %s", message_body); message = tp_chat_build_message (EMPATHY_TP_CHAT (chat), message_type, timestamp, from_handle, message_body); tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message); g_object_unref (message); if (priv->acknowledge) { GArray *message_ids; message_ids = g_array_new (FALSE, FALSE, sizeof (guint)); g_array_append_val (message_ids, message_id); tp_cli_channel_type_text_call_acknowledge_pending_messages (priv->channel, -1, message_ids, tp_chat_async_cb, "acknowledging pending messages", NULL, chat); g_array_free (message_ids, TRUE); } } static void tp_chat_sent_cb (TpChannel *channel, guint timestamp, guint message_type, const gchar *message_body, gpointer user_data, GObject *chat) { EmpathyMessage *message; empathy_debug (DEBUG_DOMAIN, "Message sent: %s", message_body); message = tp_chat_build_message (EMPATHY_TP_CHAT (chat), message_type, timestamp, 0, message_body); tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message); g_object_unref (message); } static void tp_chat_send_error_cb (TpChannel *channel, guint error_code, guint timestamp, guint message_type, const gchar *message_body, gpointer user_data, GObject *chat) { EmpathyMessage *message; empathy_debug (DEBUG_DOMAIN, "Message sent error: %s (%d)", message_body, error_code); message = tp_chat_build_message (EMPATHY_TP_CHAT (chat), message_type, timestamp, 0, message_body); g_signal_emit (chat, signals[SEND_ERROR], 0, message, error_code); g_object_unref (message); } static void tp_chat_state_changed_cb (TpChannel *channel, guint handle, guint state, gpointer user_data, GObject *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); EmpathyContact *contact; contact = empathy_contact_factory_get_from_handle (priv->factory, priv->account, handle); empathy_debug (DEBUG_DOMAIN, "Chat state changed for %s (%d): %d", empathy_contact_get_name (contact), handle, state); g_signal_emit (chat, signals[CHAT_STATE_CHANGED], 0, contact, state); g_object_unref (contact); } static void tp_chat_list_pending_messages_cb (TpChannel *channel, const GPtrArray *messages_list, const GError *error, gpointer user_data, GObject *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); guint i; priv->had_pending_messages = TRUE; for (i = 0; i < messages_list->len; i++) { EmpathyMessage *message; GValueArray *message_struct; const gchar *message_body; guint message_id; guint timestamp; guint from_handle; guint message_type; guint message_flags; message_struct = g_ptr_array_index (messages_list, i); message_id = g_value_get_uint (g_value_array_get_nth (message_struct, 0)); timestamp = g_value_get_uint (g_value_array_get_nth (message_struct, 1)); from_handle = g_value_get_uint (g_value_array_get_nth (message_struct, 2)); message_type = g_value_get_uint (g_value_array_get_nth (message_struct, 3)); message_flags = g_value_get_uint (g_value_array_get_nth (message_struct, 4)); message_body = g_value_get_string (g_value_array_get_nth (message_struct, 5)); empathy_debug (DEBUG_DOMAIN, "Message pending: %s", message_body); message = tp_chat_build_message (EMPATHY_TP_CHAT (chat), message_type, timestamp, from_handle, message_body); tp_chat_emit_or_queue_message (EMPATHY_TP_CHAT (chat), message); g_object_unref (message); } } static void tp_chat_properties_changed_cb (TpProxy *proxy, const GPtrArray *properties, gpointer user_data, GObject *chat) { } static void tp_chat_get_properties_cb (TpProxy *proxy, const GPtrArray *properties, const GError *error, gpointer user_data, GObject *chat) { tp_chat_properties_changed_cb (proxy, properties, user_data, chat); } static void tp_chat_list_properties_cb (TpProxy *proxy, const GPtrArray *properties, const GError *error, gpointer user_data, GObject *chat) { GArray *ids; guint i; ids = g_array_sized_new (FALSE, FALSE, sizeof (guint), properties->len); for (i = 0; i < properties->len; i++) { GValueArray *prop_struct; guint id; prop_struct = g_ptr_array_index (properties, i); id = g_value_get_uint (g_value_array_get_nth (prop_struct, 0)); g_array_append_val (ids, id); } tp_cli_properties_interface_call_get_properties (proxy, -1, ids, tp_chat_get_properties_cb, NULL, NULL, chat); g_array_free (ids, TRUE); } static gboolean tp_chat_channel_ready_cb (EmpathyTpChat *chat) { EmpathyTpChatPriv *priv = GET_PRIV (chat); empathy_debug (DEBUG_DOMAIN, "Channel ready"); tp_cli_channel_type_text_call_list_pending_messages (priv->channel, -1, priv->acknowledge, tp_chat_list_pending_messages_cb, NULL, NULL, G_OBJECT (chat)); tp_cli_properties_interface_call_list_properties (priv->channel, -1, tp_chat_list_properties_cb, NULL, NULL, G_OBJECT (chat)); tp_cli_channel_type_text_connect_to_received (priv->channel, tp_chat_received_cb, NULL, NULL, G_OBJECT (chat), NULL); tp_cli_channel_type_text_connect_to_sent (priv->channel, tp_chat_sent_cb, NULL, NULL, G_OBJECT (chat), NULL); tp_cli_channel_type_text_connect_to_send_error (priv->channel, tp_chat_send_error_cb, NULL, NULL, G_OBJECT (chat), NULL); tp_cli_channel_interface_chat_state_connect_to_chat_state_changed (priv->channel, tp_chat_state_changed_cb, NULL, NULL, G_OBJECT (chat), NULL); tp_cli_channel_interface_chat_state_connect_to_chat_state_changed (priv->channel, tp_chat_state_changed_cb, NULL, NULL, G_OBJECT (chat), NULL); tp_cli_properties_interface_connect_to_properties_changed (priv->channel, tp_chat_properties_changed_cb, NULL, NULL, G_OBJECT (chat), NULL); return FALSE; } static void tp_chat_finalize (GObject *object) { EmpathyTpChatPriv *priv = GET_PRIV (object); if (priv->acknowledge && priv->channel) { empathy_debug (DEBUG_DOMAIN, "Closing channel..."); tp_cli_channel_call_close (priv->channel, -1, tp_chat_async_cb, "closing channel", NULL, NULL); } if (priv->channel) { g_signal_handlers_disconnect_by_func (priv->channel, tp_chat_invalidated_cb, object); g_object_unref (priv->channel); } if (priv->tp_chan) { g_object_unref (priv->tp_chan); } g_object_unref (priv->factory); g_object_unref (priv->user); g_object_unref (priv->account); g_object_unref (priv->mc); g_free (priv->id); G_OBJECT_CLASS (empathy_tp_chat_parent_class)->finalize (object); } static GObject * tp_chat_constructor (GType type, guint n_props, GObjectConstructParam *props) { GObject *chat; EmpathyTpChatPriv *priv; gboolean channel_ready; chat = G_OBJECT_CLASS (empathy_tp_chat_parent_class)->constructor (type, n_props, props); priv = GET_PRIV (chat); priv->factory = empathy_contact_factory_new (); priv->user = empathy_contact_factory_get_user (priv->factory, priv->account); priv->mc = empathy_mission_control_new (); g_signal_connect (priv->channel, "invalidated", G_CALLBACK (tp_chat_invalidated_cb), chat); g_object_get (priv->channel, "channel-ready", &channel_ready, NULL); if (channel_ready) { /* FIXME: We do that in a cb to let time to set the acknowledge * property, this property should be required for construct. */ g_idle_add ((GSourceFunc) tp_chat_channel_ready_cb, chat); } else { g_signal_connect_swapped (priv->channel, "notify::channel-ready", G_CALLBACK (tp_chat_channel_ready_cb), chat); } return chat; } static void tp_chat_get_property (GObject *object, guint param_id, GValue *value, GParamSpec *pspec) { EmpathyTpChatPriv *priv = GET_PRIV (object); switch (param_id) { case PROP_ACCOUNT: g_value_set_object (value, priv->account); break; case PROP_CHANNEL: g_value_set_object (value, priv->channel); break; case PROP_ACKNOWLEDGE: g_value_set_boolean (value, priv->acknowledge); break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec); break; }; } static void tp_chat_set_property (GObject *object, guint param_id, const GValue *value, GParamSpec *pspec) { EmpathyTpChatPriv *priv = GET_PRIV (object); switch (param_id) { case PROP_ACCOUNT: priv->account = g_object_ref (g_value_get_object (value)); break; case PROP_CHANNEL: priv->channel = g_object_ref (g_value_get_object (value)); break; case PROP_ACKNOWLEDGE: empathy_tp_chat_set_acknowledge (EMPATHY_TP_CHAT (object), g_value_get_boolean (value)); break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec); break; }; } static void empathy_tp_chat_class_init (EmpathyTpChatClass *klass) { GObjectClass *object_class = G_OBJECT_CLASS (klass); object_class->finalize = tp_chat_finalize; object_class->constructor = tp_chat_constructor; object_class->get_property = tp_chat_get_property; object_class->set_property = tp_chat_set_property; /* Construct properties */ 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_CHANNEL, g_param_spec_object ("channel", "telepathy channel", "The text channel for the chat", TP_TYPE_CHANNEL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY)); g_object_class_install_property (object_class, PROP_ACKNOWLEDGE, g_param_spec_boolean ("acknowledge", "acknowledge messages", "Wheter or not received messages should be acknowledged", FALSE, G_PARAM_READWRITE | G_PARAM_CONSTRUCT)); /* Signals */ signals[MESSAGE_RECEIVED] = g_signal_new ("message-received", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, 0, NULL, NULL, g_cclosure_marshal_VOID__OBJECT, G_TYPE_NONE, 1, EMPATHY_TYPE_MESSAGE); signals[SEND_ERROR] = g_signal_new ("send-error", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, 0, NULL, NULL, _empathy_marshal_VOID__OBJECT_UINT, G_TYPE_NONE, 2, EMPATHY_TYPE_MESSAGE, G_TYPE_UINT); signals[CHAT_STATE_CHANGED] = g_signal_new ("chat-state-changed", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, 0, NULL, NULL, _empathy_marshal_VOID__OBJECT_UINT, G_TYPE_NONE, 2, EMPATHY_TYPE_CONTACT, G_TYPE_UINT); 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 (EmpathyTpChatPriv)); } static void empathy_tp_chat_init (EmpathyTpChat *chat) { } EmpathyTpChat * empathy_tp_chat_new (McAccount *account, TpChan *tp_chan) { EmpathyTpChat *chat; EmpathyTpChatPriv *priv; TpChannel *channel; TpConnection *connection; MissionControl *mc; TpConn *tp_conn; mc = empathy_mission_control_new (); tp_conn = mission_control_get_connection (mc, account, NULL); connection = tp_conn_dup_connection (tp_conn); channel = tp_chan_dup_channel (tp_chan, connection, NULL); chat = g_object_new (EMPATHY_TYPE_TP_CHAT, "account", account, "channel", channel, NULL); priv = GET_PRIV (chat); priv->tp_chan = g_object_ref (tp_chan); g_object_unref (channel); g_object_unref (tp_conn); g_object_unref (connection); g_object_unref (mc); return chat; } EmpathyTpChat * empathy_tp_chat_new_with_contact (EmpathyContact *contact) { EmpathyTpChat *chat; MissionControl *mc; McAccount *account; TpConn *tp_conn; TpChan *text_chan; const gchar *bus_name; guint handle; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); mc = empathy_mission_control_new (); account = empathy_contact_get_account (contact); if (mission_control_get_connection_status (mc, account, NULL) != 0) { /* The account is not connected. */ return NULL; } tp_conn = mission_control_get_connection (mc, account, NULL); g_return_val_if_fail (tp_conn != NULL, NULL); bus_name = dbus_g_proxy_get_bus_name (DBUS_G_PROXY (tp_conn)); handle = empathy_contact_get_handle (contact); text_chan = tp_conn_new_channel (tp_get_bus (), tp_conn, bus_name, TP_IFACE_CHANNEL_TYPE_TEXT, TP_HANDLE_TYPE_CONTACT, handle, TRUE); chat = empathy_tp_chat_new (account, text_chan); g_object_unref (tp_conn); g_object_unref (text_chan); g_object_unref (mc); return chat; } gboolean empathy_tp_chat_get_acknowledge (EmpathyTpChat *chat) { EmpathyTpChatPriv *priv; g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), FALSE); priv = GET_PRIV (chat); return priv->acknowledge; } void empathy_tp_chat_set_acknowledge (EmpathyTpChat *chat, gboolean acknowledge) { EmpathyTpChatPriv *priv; g_return_if_fail (EMPATHY_IS_TP_CHAT (chat)); priv = GET_PRIV (chat); priv->acknowledge = acknowledge; g_object_notify (G_OBJECT (chat), "acknowledge"); } TpChan * empathy_tp_chat_get_channel (EmpathyTpChat *chat) { EmpathyTpChatPriv *priv; g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL); priv = GET_PRIV (chat); return priv->tp_chan; } McAccount * empathy_tp_chat_get_account (EmpathyTpChat *chat) { EmpathyTpChatPriv *priv; g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL); priv = GET_PRIV (chat); return priv->account; } void empathy_tp_chat_send (EmpathyTpChat *chat, EmpathyMessage *message) { EmpathyTpChatPriv *priv; const gchar *message_body; EmpathyMessageType message_type; g_return_if_fail (EMPATHY_IS_TP_CHAT (chat)); g_return_if_fail (EMPATHY_IS_MESSAGE (message)); priv = GET_PRIV (chat); message_body = empathy_message_get_body (message); message_type = empathy_message_get_type (message); empathy_debug (DEBUG_DOMAIN, "Sending message: %s", message_body); tp_cli_channel_type_text_call_send (priv->channel, -1, message_type, message_body, tp_chat_async_cb, "sending message", NULL, G_OBJECT (chat)); } void empathy_tp_chat_set_state (EmpathyTpChat *chat, TpChannelChatState state) { EmpathyTpChatPriv *priv; g_return_if_fail (EMPATHY_IS_TP_CHAT (chat)); priv = GET_PRIV (chat); empathy_debug (DEBUG_DOMAIN, "Set state: %d", state); tp_cli_channel_interface_chat_state_call_set_chat_state (priv->channel, -1, state, tp_chat_async_cb, "setting chat state", NULL, G_OBJECT (chat)); } const gchar * empathy_tp_chat_get_id (EmpathyTpChat *chat) { EmpathyTpChatPriv *priv; g_return_val_if_fail (EMPATHY_IS_TP_CHAT (chat), NULL); priv = GET_PRIV (chat); if (!priv->id) { priv->id = empathy_inspect_channel (priv->account, priv->tp_chan); } return priv->id; }