Add tubes, tube and tube handler objects

svn path=/trunk/; revision=972

1 files changed, 418 insertions, 0 deletions

diff --git a/libempathy/empathy-tubes.c b/libempathy/empathy-tubes.c
new file mode 100644
index 000000000..4b72a8da2
--- /dev/null
+++ b/libempathy/empathy-tubes.c
@@ -0,0 +1,418 @@
+/*
+ *  Copyright (C) 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: Elliot Fairweather <elliot.fairweather@collabora.co.uk>
+ *           Guillaume Desmottes <guillaume.desmottes@collabora.co.uk>
+ */
+
+#include <string.h>
+#include <dbus/dbus-glib.h>
+
+#include <telepathy-glib/channel.h>
+
+#include "empathy-contact.h"
+#include "empathy-debug.h"
+#include "empathy-marshal.h"
+#include "empathy-tp-contact-factory.h"
+#include "empathy-tube.h"
+#include "empathy-tubes.h"
+#include "empathy-utils.h"
+
+#define DEBUG_DOMAIN "EmpathyTubes"
+
+#define GET_PRIV(object) (G_TYPE_INSTANCE_GET_PRIVATE \
+    ((object), EMPATHY_TYPE_TUBES, EmpathyTubesPriv))
+
+typedef struct _EmpathyTubesPriv EmpathyTubesPriv;
+
+struct _EmpathyTubesPriv
+{
+  TpChannel *channel;
+};
+
+enum
+{
+  NEW_TUBE,
+  TUBE_CLOSED,
+  TUBE_STATE_CHANGED,
+  STREAM_TUBE_NEW_CONNECTION,
+  LAST_SIGNAL
+};
+
+enum
+{
+  PROP_0,
+  PROP_CHANNEL
+};
+
+static guint signals[LAST_SIGNAL];
+
+G_DEFINE_TYPE (EmpathyTubes, empathy_tubes, G_TYPE_OBJECT)
+
+
+static void
+empathy_tubes_new_tube_cb (TpChannel *channel,
+                           guint id,
+                           guint initiator,
+                           guint type,
+                           const gchar *service,
+                           GHashTable *params,
+                           guint state,
+                           gpointer data,
+                           GObject *tubes)
+{
+  EmpathyTube *tube;
+
+  empathy_debug (DEBUG_DOMAIN,
+      "New tube - id: %d, initiator: %d, type: %d, service: %s, state: %d",
+      id, initiator, type, service, state);
+  tube = g_object_new (EMPATHY_TYPE_TUBE, "tubes", tubes, "id", id,
+      "initiator", initiator, "type", type, "service", service,
+      "parameters", params, "state", state, NULL);
+  g_signal_emit (tubes, signals[NEW_TUBE], 0, tube);
+}
+
+
+static void
+empathy_tubes_tube_closed_cb (TpChannel *channel,
+                              guint id,
+                              gpointer data,
+                              GObject *tubes)
+{
+  empathy_debug (DEBUG_DOMAIN, "Tube closed - id: %d", id);
+  g_signal_emit (tubes, signals[TUBE_CLOSED], 0, id);
+}
+
+
+static void
+empathy_tubes_stream_tube_new_connection_cb (TpChannel *channel,
+                                             guint id,
+                                             guint handle,
+                                             gpointer data,
+                                             GObject *tubes)
+{
+  empathy_debug (DEBUG_DOMAIN,
+      "Stream tube new connection - id: %d, handle: %d", id, handle);
+  g_signal_emit (tubes, signals[STREAM_TUBE_NEW_CONNECTION], 0,
+      id, handle);
+}
+
+
+static void
+empathy_tubes_tube_state_changed_cb (TpChannel *channel,
+                                     guint id,
+                                     guint state,
+                                     gpointer data,
+                                     GObject *tubes)
+{
+  empathy_debug (DEBUG_DOMAIN, "Tube state changed - id: %d, state: %d",
+      id, state);
+  g_signal_emit (tubes, signals[TUBE_STATE_CHANGED], 0, id, state);
+}
+
+
+static void
+empathy_tubes_channel_closed_cb (TpChannel *channel,
+                                 gpointer data)
+{
+  EmpathyTubes *tubes = EMPATHY_TUBES (data);
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+
+  empathy_debug (DEBUG_DOMAIN, "Channel closed");
+
+  g_signal_handlers_disconnect_by_func (priv->channel,
+      empathy_tubes_channel_closed_cb, tubes);
+
+  // disconnect tubes interface signals?
+}
+
+
+static void
+empathy_tubes_dispose (GObject *object)
+{
+  EmpathyTubes *tubes = EMPATHY_TUBES (object);
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+
+  empathy_debug (DEBUG_DOMAIN, "Disposing: %p", object);
+
+  if (priv->channel)
+    {
+      g_signal_handlers_disconnect_by_func (priv->channel,
+          empathy_tubes_channel_closed_cb, object);
+      g_object_unref (priv->channel);
+      priv->channel = NULL;
+    }
+
+  (G_OBJECT_CLASS (empathy_tubes_parent_class)->dispose) (object);
+}
+
+
+static void
+empathy_tubes_set_property (GObject *object,
+                            guint prop_id,
+                            const GValue *value,
+                            GParamSpec *pspec)
+{
+  EmpathyTubes *tubes = EMPATHY_TUBES (object);
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+
+  switch (prop_id)
+    {
+      case PROP_CHANNEL:
+        priv->channel = g_value_dup_object (value);
+        break;
+      default:
+        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+        break;
+    }
+}
+
+
+static void
+empathy_tubes_get_property (GObject *object,
+                            guint prop_id,
+                            GValue *value,
+                            GParamSpec *pspec)
+{
+  EmpathyTubes *tubes = EMPATHY_TUBES (object);
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+
+  switch (prop_id)
+    {
+      case PROP_CHANNEL:
+        g_value_set_object (value, priv->channel);
+        break;
+      default:
+        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+        break;
+    }
+}
+
+
+static GObject *
+empathy_tubes_constructor (GType type,
+                           guint n_construct_params,
+                           GObjectConstructParam *construct_params)
+{
+  GObject *object = G_OBJECT_CLASS (empathy_tubes_parent_class)->constructor
+      (type, n_construct_params, construct_params);
+  EmpathyTubes *tubes = EMPATHY_TUBES (object);
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+
+  g_signal_connect (priv->channel, "closed",
+      G_CALLBACK (empathy_tubes_channel_closed_cb), tubes);
+
+  tp_cli_channel_type_tubes_connect_to_new_tube (priv->channel,
+      empathy_tubes_new_tube_cb, NULL, NULL, G_OBJECT (tubes), NULL);
+  tp_cli_channel_type_tubes_connect_to_tube_closed (priv->channel,
+      empathy_tubes_tube_closed_cb, NULL, NULL, G_OBJECT (tubes), NULL);
+  tp_cli_channel_type_tubes_connect_to_tube_state_changed (priv->channel,
+      empathy_tubes_tube_state_changed_cb, NULL, NULL, G_OBJECT (tubes), NULL);
+  tp_cli_channel_type_tubes_connect_to_stream_tube_new_connection
+      (priv->channel, empathy_tubes_stream_tube_new_connection_cb,
+       NULL, NULL, G_OBJECT (tubes), NULL);
+
+  object = G_OBJECT (tubes);
+  return object;
+}
+
+
+static void empathy_tubes_class_init (EmpathyTubesClass *klass)
+{
+  GObjectClass *object_class = G_OBJECT_CLASS (klass);
+
+  object_class->constructor = empathy_tubes_constructor;
+  object_class->dispose = empathy_tubes_dispose;
+  object_class->set_property = empathy_tubes_set_property;
+  object_class->get_property = empathy_tubes_get_property;
+
+  g_type_class_add_private (klass, sizeof (EmpathyTubesPriv));
+
+  signals[NEW_TUBE] =
+      g_signal_new ("new-tube", G_TYPE_FROM_CLASS (klass),
+      G_SIGNAL_RUN_LAST, 0, NULL, NULL, g_cclosure_marshal_VOID__OBJECT,
+      G_TYPE_NONE, 1, EMPATHY_TYPE_TUBE);
+  signals[TUBE_CLOSED] =
+      g_signal_new ("tube-closed", G_TYPE_FROM_CLASS (klass),
+      G_SIGNAL_RUN_LAST, 0, NULL, NULL, g_cclosure_marshal_VOID__UINT,
+      G_TYPE_NONE, 1, G_TYPE_UINT);
+  signals[TUBE_STATE_CHANGED] =
+      g_signal_new ("tube-state-changed", G_TYPE_FROM_CLASS (klass),
+      G_SIGNAL_RUN_LAST, 0, NULL, NULL, _empathy_marshal_VOID__UINT_UINT,
+      G_TYPE_NONE, 2, G_TYPE_UINT, G_TYPE_UINT);
+  signals[STREAM_TUBE_NEW_CONNECTION] =
+      g_signal_new ("stream-tube-new-connection", G_TYPE_FROM_CLASS (klass),
+      G_SIGNAL_RUN_LAST, 0, NULL, NULL, _empathy_marshal_VOID__UINT_UINT,
+      G_TYPE_NONE, 2, G_TYPE_UINT, G_TYPE_UINT);
+
+  g_object_class_install_property (object_class, PROP_CHANNEL,
+      g_param_spec_object ("channel", "channel", "channel",
+      TP_TYPE_CHANNEL, G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE |
+      G_PARAM_STATIC_NICK | G_PARAM_STATIC_BLURB));
+}
+
+
+static void
+empathy_tubes_init (EmpathyTubes *empathy_tubes)
+{
+}
+
+
+EmpathyTubes *
+empathy_tubes_new (TpChannel *channel)
+{
+  return g_object_new (empathy_tubes_get_type (), "channel", channel, NULL);
+}
+
+
+guint
+empathy_tubes_offer_stream_tube_ipv4 (EmpathyTubes *tubes,
+                                      gchar *host,
+                                      guint port,
+                                      gchar *service)
+{
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+  GError *error = NULL;
+  GHashTable *params;
+  GValue *address;
+  GValue *control_param;
+  guint id;
+
+  empathy_debug (DEBUG_DOMAIN, "Offering a new stream tube");
+
+  params = g_hash_table_new (g_str_hash, g_str_equal);
+
+  address = g_new0 (GValue, 1);
+  g_value_init (address,
+      dbus_g_type_get_struct ("GValueArray", G_TYPE_STRING, G_TYPE_UINT,
+      G_TYPE_INVALID));
+  g_value_take_boxed (address,
+      dbus_g_type_specialized_construct (dbus_g_type_get_struct ("GValueArray",
+        G_TYPE_STRING, G_TYPE_UINT, G_TYPE_INVALID)));
+  dbus_g_type_struct_set (address, 0, host, 1, port, G_MAXUINT);
+
+  /* localhost access control, variant is ignored */
+  control_param = g_new0 (GValue, 1);
+  g_value_init (control_param, G_TYPE_STRING);
+
+  if (!tp_cli_channel_type_tubes_run_offer_stream_tube (priv->channel, -1,
+        service, params, TP_SOCKET_ADDRESS_TYPE_IPV4, address,
+        TP_SOCKET_ACCESS_CONTROL_LOCALHOST, control_param, &id, &error, NULL))
+    {
+      empathy_debug (DEBUG_DOMAIN, "Couldn't offer tube: %s", error->message);
+      g_clear_error (&error);
+      return 0;
+    }
+
+  return id;
+}
+
+
+GSList *
+empathy_tubes_list_tubes (EmpathyTubes *tubes)
+{
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+  GPtrArray *tube_infos;
+  GError *error;
+  GSList *list = NULL;
+  guint i;
+
+  if (!tp_cli_channel_type_tubes_run_list_tubes (priv->channel, -1,
+      &tube_infos, &error, NULL))
+    {
+      empathy_debug (DEBUG_DOMAIN, "Couldn't list tubes: %s", error->message);
+      g_clear_error (&error);
+      return NULL;
+    }
+
+  for (i = 0; i < tube_infos->len; i++)
+    {
+      GValueArray *values;
+      guint id;
+      guint initiator;
+      guint type;
+      const gchar *service;
+      GHashTable *params;
+      guint state;
+
+      values = g_ptr_array_index (tube_infos, i);
+      id = g_value_get_uint (g_value_array_get_nth (values, 0));
+      initiator = g_value_get_uint (g_value_array_get_nth (values, 1));
+      type = g_value_get_uint (g_value_array_get_nth (values, 2));
+      service = g_value_get_string (g_value_array_get_nth (values, 3));
+      params = g_value_get_boxed (g_value_array_get_nth (values, 4));
+      state = g_value_get_uint (g_value_array_get_nth (values, 5));
+
+      empathy_debug (DEBUG_DOMAIN,
+          "Listing tubes - %d, id: %d, initiator: %d, service: %s, "
+          "state: %d, type: %d",
+          i + 1, id, initiator, service, state, type);
+
+      list = g_slist_prepend (list,
+          g_object_new (EMPATHY_TYPE_TUBE, "tubes", tubes, "id", id,
+          "initiator", initiator, "type", type, "service", service,
+          "parameters", params, "state", state, NULL));
+
+      g_value_array_free (values);
+    }
+
+  g_ptr_array_free (tube_infos, TRUE);
+  return list;
+}
+
+
+EmpathyTube *
+empathy_tubes_get_tube (EmpathyTubes *tubes,
+                        guint tube_id)
+{
+  // maybe this function should call list tubes directly?
+  EmpathyTube *tube = NULL;
+  GSList *tube_list, *list;
+  tube_list = empathy_tubes_list_tubes (tubes);
+
+  for (list = tube_list; list != NULL; list = g_slist_next (list))
+    {
+      EmpathyTube *t = EMPATHY_TUBE (list->data);
+      guint id;
+      g_object_get (G_OBJECT (t), "id", &id, NULL);
+
+      if (id == tube_id)
+        tube = g_object_ref (t);
+
+      g_object_unref (t);
+    }
+
+  g_slist_free (tube_list);
+  return tube;
+}
+
+
+void
+empathy_tubes_close (EmpathyTubes *tubes)
+{
+  EmpathyTubesPriv *priv = GET_PRIV (tubes);
+  GError *error = NULL;
+
+  empathy_debug (DEBUG_DOMAIN, "Closing channel");
+
+  if (!tp_cli_channel_run_close (priv->channel, -1, &error, NULL))
+    {
+      empathy_debug (DEBUG_DOMAIN, "Error closing channel: %s",
+          error ? error->message : "No error given");
+      g_clear_error (&error);
+    }
+}