--- a/telepathygabble/src/im-factory.c Wed Mar 31 22:32:38 2010 +0300
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,474 +0,0 @@
-/*
- * im-factory.c - Source for GabbleImFactory
- * Copyright (C) 2006 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
- */
-
-
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-
-#include <glib.h>
-
-#include <dbus/dbus-glib.h>
-#include <dbus/dbus-glib-lowlevel.h>
-
-#include "loudmouth/loudmouth.h"
-
-#include "debug.h"
-#include "disco.h"
-#include "gabble-connection.h"
-#include "gabble-im-channel.h"
-#include "handles.h"
-#include "telepathy-interfaces.h"
-#include "text-mixin.h"
-#include "tp-channel-factory-iface.h"
-
-#include "im-factory.h"
-
-static void gabble_im_factory_iface_init (gpointer g_iface, gpointer iface_data);
-
-#ifndef EMULATOR
-G_DEFINE_TYPE_WITH_CODE (GabbleImFactory, gabble_im_factory, G_TYPE_OBJECT,
- G_IMPLEMENT_INTERFACE (TP_TYPE_CHANNEL_FACTORY_IFACE, gabble_im_factory_iface_init));
-#endif
-
-#ifdef EMULATOR
-#include "libgabble_wsd_solution.h"
-
- GET_STATIC_VAR_FROM_TLS(gabble_im_factory_parent_class,im_factory,gpointer)
- #define gabble_im_factory_parent_class (*GET_WSD_VAR_NAME(gabble_im_factory_parent_class,im_factory,s)())
-
- GET_STATIC_VAR_FROM_TLS(g_define_type_id,im_factory,GType)
- #define g_define_type_id (*GET_WSD_VAR_NAME(g_define_type_id,im_factory,s)())
-
-static void gabble_im_factory_init (GabbleImFactory *self);
-static void gabble_im_factory_class_init (GabbleImFactoryClass *klass);
-static void gabble_im_factory_class_intern_init (gpointer klass)
-{
- gabble_im_factory_parent_class = g_type_class_peek_parent (klass);
- gabble_im_factory_class_init ((GabbleImFactoryClass*) klass);
- }
- EXPORT_C GType gabble_im_factory_get_type (void)
- {
- if ((g_define_type_id == 0)) { static const GTypeInfo g_define_type_info = { sizeof (GabbleImFactoryClass), (GBaseInitFunc) ((void *)0), (GBaseFinalizeFunc) ((void *)0), (GClassInitFunc) gabble_im_factory_class_intern_init, (GClassFinalizeFunc) ((void *)0), ((void *)0), sizeof (GabbleImFactory), 0, (GInstanceInitFunc) gabble_im_factory_init, ((void *)0) }; g_define_type_id = g_type_register_static ( ((GType) ((20) << (2))), g_intern_static_string ("GabbleImFactory"), &g_define_type_info, (GTypeFlags) 0); { { static const GInterfaceInfo g_implement_interface_info = { (GInterfaceInitFunc) gabble_im_factory_iface_init }; g_type_add_interface_static (g_define_type_id, tp_channel_factory_iface_get_type(), &g_implement_interface_info); } ; } } return g_define_type_id; } ;
-
-#endif
-
-#define DBUS_API_SUBJECT_TO_CHANGE
-#define DEBUG_FLAG GABBLE_DEBUG_IM
-
-#ifdef DEBUG_FLAG
-//#define DEBUG(format, ...)
-#define DEBUGGING 0
-#define NODE_DEBUG(n, s)
-#endif /* DEBUG_FLAG */
-
-/* properties */
-enum
-{
- PROP_CONNECTION = 1,
- LAST_PROPERTY
-};
-
-typedef struct _GabbleImFactoryPrivate GabbleImFactoryPrivate;
-struct _GabbleImFactoryPrivate
-{
- GabbleConnection *conn;
- LmMessageHandler *message_cb;
- GHashTable *channels;
-
- gboolean dispose_has_run;
-};
-
-#define GABBLE_IM_FACTORY_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), GABBLE_TYPE_IM_FACTORY, GabbleImFactoryPrivate))
-
-static GObject *gabble_im_factory_constructor (GType type, guint n_props, GObjectConstructParam *props);
-
-static void
-gabble_im_factory_init (GabbleImFactory *fac)
-{
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- priv->channels = g_hash_table_new_full (g_direct_hash, g_direct_equal,
- NULL, g_object_unref);
-
- priv->message_cb = NULL;
-
- priv->conn = NULL;
- priv->dispose_has_run = FALSE;
-}
-
-static GObject *
-gabble_im_factory_constructor (GType type, guint n_props,
- GObjectConstructParam *props)
-{
- GObject *obj;
- /* GabbleImFactoryPrivate *priv; */
-
- obj = G_OBJECT_CLASS (gabble_im_factory_parent_class)->
- constructor (type, n_props, props);
- /* priv = GABBLE_IM_FACTORY_GET_PRIVATE (obj); */
-
- return obj;
-}
-
-
-static void
-gabble_im_factory_dispose (GObject *object)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (object);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- if (priv->dispose_has_run)
- return;
-
- gabble_debug (DEBUG_FLAG, "dispose called");
- priv->dispose_has_run = TRUE;
-
- tp_channel_factory_iface_close_all (TP_CHANNEL_FACTORY_IFACE (object));
- g_assert (priv->channels == NULL);
-
- if (G_OBJECT_CLASS (gabble_im_factory_parent_class)->dispose)
- G_OBJECT_CLASS (gabble_im_factory_parent_class)->dispose (object);
-}
-
-static void
-gabble_im_factory_get_property (GObject *object,
- guint property_id,
- GValue *value,
- GParamSpec *pspec)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (object);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- switch (property_id) {
- case PROP_CONNECTION:
- g_value_set_object (value, priv->conn);
- break;
- default:
- G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
- break;
- }
-}
-
-static void
-gabble_im_factory_set_property (GObject *object,
- guint property_id,
- const GValue *value,
- GParamSpec *pspec)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (object);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- switch (property_id) {
- case PROP_CONNECTION:
- priv->conn = g_value_get_object (value);
- break;
- default:
- G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
- break;
- }
-}
-
-static void
-gabble_im_factory_class_init (GabbleImFactoryClass *gabble_im_factory_class)
-{
- GObjectClass *object_class = G_OBJECT_CLASS (gabble_im_factory_class);
- GParamSpec *param_spec;
-
- g_type_class_add_private (gabble_im_factory_class, sizeof (GabbleImFactoryPrivate));
-
- object_class->constructor = gabble_im_factory_constructor;
- object_class->dispose = gabble_im_factory_dispose;
-
- object_class->get_property = gabble_im_factory_get_property;
- object_class->set_property = gabble_im_factory_set_property;
-
- param_spec = g_param_spec_object ("connection", "GabbleConnection object",
- "Gabble connection object that owns this "
- "IM channel factory object.",
- GABBLE_TYPE_CONNECTION,
- G_PARAM_CONSTRUCT_ONLY |
- G_PARAM_READWRITE |
- G_PARAM_STATIC_NICK |
- G_PARAM_STATIC_BLURB);
- g_object_class_install_property (object_class, PROP_CONNECTION, param_spec);
-
-}
-
-static GabbleIMChannel *new_im_channel (GabbleImFactory *fac, GabbleHandle handle);
-
-static void im_channel_closed_cb (GabbleIMChannel *chan, gpointer user_data);
-
-
-/**
- * im_factory_message_cb:
- *
- * Called by loudmouth when we get an incoming <message>.
- */
-static LmHandlerResult
-im_factory_message_cb (LmMessageHandler *handler,
- LmConnection *lmconn,
- LmMessage *message,
- gpointer user_data)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (user_data);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- const gchar *from, *body, *body_offset;
- time_t stamp;
- TpChannelTextMessageType msgtype;
- GabbleHandle handle;
- GabbleIMChannel *chan;
- GabbleTextMixinSendError send_error;
-
- if (!gabble_text_mixin_parse_incoming_message (message, &from, &stamp, &msgtype, &body, &body_offset, &send_error))
- return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
-
- if (body == NULL)
- {
- NODE_DEBUG (message->node, "got a message without a body field, ignoring");
- return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
- }
-
- handle = gabble_handle_for_contact (priv->conn->handles, from, FALSE);
- if (handle == 0)
- {
- NODE_DEBUG (message->node, "ignoring message node from malformed jid");
- return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
- }
-
- gabble_debug (DEBUG_FLAG, "message from %s (handle %u), msgtype %d, body:\n%s",
- from, handle, msgtype, body_offset);
-
- chan = g_hash_table_lookup (priv->channels, GINT_TO_POINTER (handle));
-
- if (chan == NULL)
- {
- if (send_error != CHANNEL_TEXT_SEND_NO_ERROR)
- {
- gabble_debug (DEBUG_FLAG, "ignoring message error; no sending channel");
- return LM_HANDLER_RESULT_REMOVE_MESSAGE;
- }
-
- gabble_debug (DEBUG_FLAG, "found no IM channel, creating one");
-
- chan = new_im_channel (fac, handle);
- }
-
- if (send_error != CHANNEL_TEXT_SEND_NO_ERROR)
- {
- _gabble_text_mixin_send_error_signal (G_OBJECT (chan), send_error, stamp,
- msgtype, body_offset);
- return LM_HANDLER_RESULT_REMOVE_MESSAGE;
- }
-
- if (_gabble_im_channel_receive (chan, msgtype, handle, from,
- stamp, body_offset))
- return LM_HANDLER_RESULT_REMOVE_MESSAGE;
-
- return LM_HANDLER_RESULT_ALLOW_MORE_HANDLERS;
-}
-
-/**
- * im_channel_closed_cb:
- *
- * Signal callback for when an IM channel is closed. Removes the references
- * that #GabbleConnection holds to them.
- */
-static void
-im_channel_closed_cb (GabbleIMChannel *chan, gpointer user_data)
-{
- GabbleImFactory *conn = GABBLE_IM_FACTORY (user_data);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (conn);
- GabbleHandle contact_handle;
-
- if (priv->channels)
- {
- g_object_get (chan, "handle", &contact_handle, NULL);
-
- gabble_debug (DEBUG_FLAG, "removing channel with handle %d", contact_handle);
-
- g_hash_table_remove (priv->channels, GINT_TO_POINTER (contact_handle));
- }
-}
-
-/**
- * new_im_channel
- */
-static GabbleIMChannel *
-new_im_channel (GabbleImFactory *fac, GabbleHandle handle)
-{
- GabbleImFactoryPrivate *priv;
- GabbleIMChannel *chan;
- char *object_path;
-
- g_assert (GABBLE_IS_IM_FACTORY (fac));
-
- priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- object_path = g_strdup_printf ("%s/ImChannel%u", priv->conn->object_path, handle);
-
- chan = g_object_new (GABBLE_TYPE_IM_CHANNEL,
- "connection", priv->conn,
- "object-path", object_path,
- "handle", handle,
- NULL);
-
- gabble_debug (DEBUG_FLAG, "object path %s", object_path);
-
- g_signal_connect (chan, "closed", (GCallback) im_channel_closed_cb, fac);
-
- g_hash_table_insert (priv->channels, GINT_TO_POINTER (handle), chan);
-
- g_signal_emit_by_name (fac, "new-channel", chan);
-
- g_free (object_path);
-
- return chan;
-}
-
-static void
-gabble_im_factory_iface_close_all (TpChannelFactoryIface *iface)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (iface);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- gabble_debug (DEBUG_FLAG, "closing channels");
-
- if (priv->channels)
- {
- GHashTable *tmp = priv->channels;
- priv->channels = NULL;
- g_hash_table_destroy (tmp);
- }
-}
-
-static void
-gabble_im_factory_iface_connecting (TpChannelFactoryIface *iface)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (iface);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- gabble_debug (DEBUG_FLAG, "adding callbacks");
-
- g_assert (priv->message_cb == NULL);
-
- priv->message_cb = lm_message_handler_new (im_factory_message_cb, fac, NULL);
- lm_connection_register_message_handler (priv->conn->lmconn, priv->message_cb,
- LM_MESSAGE_TYPE_MESSAGE,
- LM_HANDLER_PRIORITY_LAST);
-}
-
-
-
-static void
-gabble_im_factory_iface_connected (TpChannelFactoryIface *iface)
-{
- /* nothing to do */
-}
-
-static void
-gabble_im_factory_iface_disconnected (TpChannelFactoryIface *iface)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (iface);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
-
- gabble_debug (DEBUG_FLAG, "removing callbacks");
-
- g_assert (priv->message_cb != NULL);
-
- lm_connection_unregister_message_handler (priv->conn->lmconn, priv->message_cb,
- LM_MESSAGE_TYPE_MESSAGE);
- lm_message_handler_unref (priv->message_cb);
- priv->message_cb = NULL;
-}
-
-struct _ForeachData
-{
- TpChannelFunc foreach;
- gpointer user_data;
-};
-
-static void
-_foreach_slave (gpointer key, gpointer value, gpointer user_data)
-{
- struct _ForeachData *data = (struct _ForeachData *) user_data;
- TpChannelIface *chan = TP_CHANNEL_IFACE (value);
-
- data->foreach (chan, data->user_data);
-}
-
-static void
-gabble_im_factory_iface_foreach (TpChannelFactoryIface *iface, TpChannelFunc foreach, gpointer user_data)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (iface);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
- struct _ForeachData data;
-
- data.user_data = user_data;
- data.foreach = foreach;
-
- g_hash_table_foreach (priv->channels, _foreach_slave, &data);
-}
-
-static TpChannelFactoryRequestStatus
-gabble_im_factory_iface_request (TpChannelFactoryIface *iface,
- const gchar *chan_type,
- TpHandleType handle_type,
- guint handle,
- TpChannelIface **ret,
- GError **error)
-{
- GabbleImFactory *fac = GABBLE_IM_FACTORY (iface);
- GabbleImFactoryPrivate *priv = GABBLE_IM_FACTORY_GET_PRIVATE (fac);
- GabbleIMChannel *chan;
-
- if (strcmp (chan_type, TP_IFACE_CHANNEL_TYPE_TEXT))
- return TP_CHANNEL_FACTORY_REQUEST_STATUS_NOT_IMPLEMENTED;
-
- if (handle_type != TP_HANDLE_TYPE_CONTACT)
- return TP_CHANNEL_FACTORY_REQUEST_STATUS_NOT_AVAILABLE;
-
- if (!gabble_handle_is_valid (priv->conn->handles, handle_type, handle, error))
- return TP_CHANNEL_FACTORY_REQUEST_STATUS_ERROR;
-
- chan = g_hash_table_lookup (priv->channels, GINT_TO_POINTER (handle));
-
- if (!chan)
- chan = new_im_channel (fac, handle);
-
- g_assert (chan);
- *ret = TP_CHANNEL_IFACE (chan);
- return TP_CHANNEL_FACTORY_REQUEST_STATUS_DONE;
-}
-
-static void
-gabble_im_factory_iface_init (gpointer g_iface,
- gpointer iface_data)
-{
- TpChannelFactoryIfaceClass *klass = (TpChannelFactoryIfaceClass *) g_iface;
-
- klass->close_all = gabble_im_factory_iface_close_all;
- klass->connecting = gabble_im_factory_iface_connecting;
- klass->connected = gabble_im_factory_iface_connected;
- klass->disconnected = gabble_im_factory_iface_disconnected;
- klass->foreach = gabble_im_factory_iface_foreach;
- klass->request = gabble_im_factory_iface_request;
-}
-