libempathy/empathy-tp-file.c

   1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
   2 /*
   3  * Copyright (C) 2007-2008 Collabora Ltd.
   4  * Copyright (C) 2007 Marco Barisione <marco@barisione.org>
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * Authors: Marco Barisione <marco@barisione.org>
  21  *          Jonny Lamb <jonny.lamb@collabora.co.uk>
  22  */
  23
  24 #include <config.h>
  25
  26 #include <string.h>
  27 #include <unistd.h>
  28 #include <sys/types.h>
  29 #include <sys/socket.h>
  30 #include <sys/un.h>
  31
  32 #include <glib/gi18n-lib.h>
  33
  34 #include <gio/gio.h>
  35 #include <gio/gunixinputstream.h>
  36 #include <gio/gunixoutputstream.h>
  37
  38 #include <telepathy-glib/proxy-subclass.h>
  39 #include <telepathy-glib/util.h>
  40
  41 #include "empathy-tp-file.h"
  42 #include "empathy-tp-contact-factory.h"
  43 #include "empathy-marshal.h"
  44 #include "empathy-time.h"
  45 #include "empathy-utils.h"
  46
  47 #include "extensions/extensions.h"
  48
  49 #define DEBUG_FLAG EMPATHY_DEBUG_FT
  50 #include "empathy-debug.h"
  51
  52 /**
  53  * SECTION:empathy-tp-file
  54  * @short_description: File channel
  55  * @see_also: #EmpathyTpFile, #EmpathyContact, empathy_dispatcher_send_file()
  56  * @include: libempthy/empathy-tp-file.h
  57  *
  58  * The #EmpathyTpFile object represents a Telepathy file channel.
  59  */
  60
  61 /**
  62  * EMPATHY_TP_FILE_UNKNOWN_SIZE:
  63  *
  64  * Value used for the "size" or "estimated-size" properties when the size of
  65  * the transferred file is unknown.
  66  */
  67
  68 /* Functions to copy the content of a GInputStream to a GOutputStream */
  69
  70 #define N_BUFFERS 2
  71 #define BUFFER_SIZE 4096
  72
  73 typedef struct {
  74   GInputStream *in;
  75   GOutputStream *out;
  76   GCancellable  *cancellable;
  77   char *buff[N_BUFFERS]; /* the temporary buffers */
  78   gsize count[N_BUFFERS]; /* how many bytes are used in the buffers */
  79   gboolean is_full[N_BUFFERS]; /* whether the buffers contain data */
  80   gint curr_read; /* index of the buffer used for reading */
  81   gint curr_write; /* index of the buffer used for writing */
  82   gboolean is_reading; /* we are reading */
  83   gboolean is_writing; /* we are writing */
  84   guint n_closed; /* number of streams that have been closed */
  85   gint ref_count;
  86 } CopyData;
  87
  88 static void schedule_next (CopyData *copy);
  89
  90 static void
  91 copy_data_unref (CopyData *copy)
  92 {
  93   if (--copy->ref_count == 0)
  94     {
  95       gint i;
  96
  97       /* Free the data only if both the input and output streams have
  98        * been closed. */
  99       copy->n_closed++;
 100       if (copy->n_closed < 2)
 101         return;
 102
 103       if (copy->in != NULL)
 104         g_object_unref (copy->in);
 105
 106       if (copy->out != NULL)
 107         g_object_unref (copy->out);
 108
 109       for (i = 0; i < N_BUFFERS; i++)
 110         g_free (copy->buff[i]);
 111
 112       g_object_unref (copy->cancellable);
 113       g_free (copy);
 114     }
 115 }
 116
 117 static void
 118 io_error (CopyData *copy,
 119           GError *error)
 120 {
 121   g_cancellable_cancel (copy->cancellable);
 122
 123   if (error == NULL)
 124     g_warning ("I/O error");
 125   else if (error->domain == G_IO_ERROR && error->code == G_IO_ERROR_CANCELLED)
 126     ; /* Ignore cancellations */
 127   else
 128     g_warning ("I/O error: %d: %s\n", error->code, error->message);
 129
 130   if (copy->in != NULL)
 131     g_input_stream_close (copy->in, NULL, NULL);
 132
 133   if (copy->out != NULL)
 134     g_output_stream_close (copy->out, NULL, NULL);
 135
 136   copy_data_unref (copy);
 137 }
 138
 139 static void
 140 close_done (GObject *source_object,
 141             GAsyncResult *res,
 142             gpointer user_data)
 143 {
 144   CopyData *copy = user_data;
 145
 146   g_object_unref (source_object);
 147   copy_data_unref (copy);
 148 }
 149
 150 static void
 151 write_done_cb (GObject *source_object,
 152                GAsyncResult *res,
 153                gpointer user_data)
 154 {
 155   CopyData *copy = user_data;
 156   gssize count_write;
 157   GError *error = NULL;
 158
 159   count_write = g_output_stream_write_finish (copy->out, res, &error);
 160
 161   if (count_write <= 0)
 162     {
 163       io_error (copy, error);
 164       g_error_free (error);
 165       return;
 166     }
 167
 168   copy->is_full[copy->curr_write] = FALSE;
 169   copy->curr_write = (copy->curr_write + 1) % N_BUFFERS;
 170   copy->is_writing = FALSE;
 171
 172   schedule_next (copy);
 173 }
 174
 175 static void
 176 read_done_cb (GObject *source_object,
 177               GAsyncResult *res,
 178               gpointer user_data)
 179 {
 180   CopyData *copy = user_data;
 181   gssize count_read;
 182   GError *error = NULL;
 183
 184   count_read = g_input_stream_read_finish (copy->in, res, &error);
 185
 186   if (count_read == 0)
 187     {
 188       g_input_stream_close_async (copy->in, 0, copy->cancellable,
 189           close_done, copy);
 190       copy->in = NULL;
 191     }
 192   else if (count_read < 0)
 193     {
 194       io_error (copy, error);
 195       g_error_free (error);
 196       return;
 197     }
 198
 199   copy->count[copy->curr_read] = count_read;
 200   copy->is_full[copy->curr_read] = TRUE;
 201   copy->curr_read = (copy->curr_read + 1) % N_BUFFERS;
 202   copy->is_reading = FALSE;
 203
 204   schedule_next (copy);
 205 }
 206
 207 static void
 208 schedule_next (CopyData *copy)
 209 {
 210   if (copy->in != NULL &&
 211       !copy->is_reading &&
 212       !copy->is_full[copy->curr_read])
 213     {
 214       /* We are not reading and the current buffer is empty, so
 215        * start an async read. */
 216       copy->is_reading = TRUE;
 217       g_input_stream_read_async (copy->in,
 218           copy->buff[copy->curr_read],
 219           BUFFER_SIZE, 0, copy->cancellable,
 220           read_done_cb, copy);
 221     }
 222
 223   if (!copy->is_writing &&
 224       copy->is_full[copy->curr_write])
 225     {
 226       if (copy->count[copy->curr_write] == 0)
 227         {
 228           /* The last read on the buffer read 0 bytes, this
 229            * means that we got an EOF, so we can close
 230            * the output channel. */
 231           g_output_stream_close_async (copy->out, 0,
 232               copy->cancellable,
 233               close_done, copy);
 234       copy->out = NULL;
 235         }
 236       else
 237         {
 238           /* We are not writing and the current buffer contains
 239            * data, so start an async write. */
 240           copy->is_writing = TRUE;
 241           g_output_stream_write_async (copy->out,
 242               copy->buff[copy->curr_write],
 243               copy->count[copy->curr_write],
 244               0, copy->cancellable,
 245               write_done_cb, copy);
 246         }
 247     }
 248 }
 249
 250 static void
 251 copy_stream (GInputStream *in,
 252              GOutputStream *out,
 253              GCancellable *cancellable)
 254 {
 255   CopyData *copy;
 256   gint i;
 257
 258   g_return_if_fail (in != NULL);
 259   g_return_if_fail (out != NULL);
 260
 261   copy = g_new0 (CopyData, 1);
 262   copy->in = g_object_ref (in);
 263   copy->out = g_object_ref (out);
 264   copy->ref_count = 1;
 265
 266   if (cancellable != NULL)
 267     copy->cancellable = g_object_ref (cancellable);
 268   else
 269     copy->cancellable = g_cancellable_new ();
 270
 271   for (i = 0; i < N_BUFFERS; i++)
 272     copy->buff[i] = g_malloc (BUFFER_SIZE);
 273
 274   schedule_next (copy);
 275 }
 276
 277 /* EmpathyTpFile object */
 278
 279 struct _EmpathyTpFilePriv {
 280   EmpathyTpContactFactory *factory;
 281   MissionControl *mc;
 282   TpChannel *channel;
 283   gboolean ready;
 284
 285   EmpathyContact *contact;
 286   GInputStream *in_stream;
 287   GOutputStream *out_stream;
 288
 289   /* org.freedesktop.Telepathy.Channel.Type.FileTransfer D-Bus properties */
 290   TpFileTransferState state;
 291   gchar *content_type;
 292   gchar *filename;
 293   guint64 size;
 294   TpFileHashType content_hash_type;
 295   gchar *content_hash;
 296   gchar *description;
 297   guint64 transferred_bytes;
 298
 299   gboolean incoming;
 300   TpFileTransferStateChangeReason state_change_reason;
 301   time_t start_time;
 302   GValue *socket_address;
 303   GCancellable *cancellable;
 304 };
 305
 306 enum {
 307   PROP_0,
 308   PROP_CHANNEL,
 309   PROP_STATE,
 310   PROP_INCOMING,
 311   PROP_READY,
 312   PROP_FILENAME,
 313   PROP_SIZE,
 314   PROP_CONTENT_TYPE,
 315   PROP_TRANSFERRED_BYTES,
 316   PROP_CONTENT_HASH_TYPE,
 317   PROP_CONTENT_HASH,
 318 };
 319
 320 G_DEFINE_TYPE (EmpathyTpFile, empathy_tp_file, G_TYPE_OBJECT);
 321
 322 static void
 323 empathy_tp_file_init (EmpathyTpFile *tp_file)
 324 {
 325   EmpathyTpFilePriv *priv;
 326
 327   priv = G_TYPE_INSTANCE_GET_PRIVATE ((tp_file),
 328       EMPATHY_TYPE_TP_FILE, EmpathyTpFilePriv);
 329
 330   tp_file->priv = priv;
 331 }
 332
 333 static void
 334 tp_file_invalidated_cb (TpProxy       *proxy,
 335                         guint          domain,
 336                         gint           code,
 337                         gchar         *message,
 338                         EmpathyTpFile *tp_file)
 339 {
 340   DEBUG ("Channel invalidated: %s", message);
 341
 342   if (tp_file->priv->state != TP_FILE_TRANSFER_STATE_COMPLETED &&
 343       tp_file->priv->state != TP_FILE_TRANSFER_STATE_CANCELLED)
 344     {
 345       /* The channel is not in a finished state, an error occured */
 346       tp_file->priv->state = TP_FILE_TRANSFER_STATE_CANCELLED;
 347       tp_file->priv->state_change_reason =
 348           TP_FILE_TRANSFER_STATE_CHANGE_REASON_LOCAL_ERROR;
 349       g_object_notify (G_OBJECT (tp_file), "state");
 350     }
 351 }
 352
 353 static void
 354 tp_file_finalize (GObject *object)
 355 {
 356   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (object);
 357
 358   if (tp_file->priv->channel)
 359     {
 360       g_signal_handlers_disconnect_by_func (tp_file->priv->channel,
 361           tp_file_invalidated_cb, object);
 362       g_object_unref (tp_file->priv->channel);
 363       tp_file->priv->channel = NULL;
 364     }
 365
 366   if (tp_file->priv->factory)
 367     {
 368       g_object_unref (tp_file->priv->factory);
 369     }
 370   if (tp_file->priv->mc)
 371     {
 372       g_object_unref (tp_file->priv->mc);
 373     }
 374
 375   g_free (tp_file->priv->filename);
 376   if (tp_file->priv->socket_address != NULL)
 377     tp_g_value_slice_free (tp_file->priv->socket_address);
 378   g_free (tp_file->priv->description);
 379   g_free (tp_file->priv->content_hash);
 380   g_free (tp_file->priv->content_type);
 381
 382   if (tp_file->priv->in_stream)
 383     g_object_unref (tp_file->priv->in_stream);
 384
 385   if (tp_file->priv->out_stream)
 386     g_object_unref (tp_file->priv->out_stream);
 387
 388   if (tp_file->priv->contact)
 389     g_object_unref (tp_file->priv->contact);
 390
 391   if (tp_file->priv->cancellable)
 392     g_object_unref (tp_file->priv->cancellable);
 393
 394   G_OBJECT_CLASS (empathy_tp_file_parent_class)->finalize (object);
 395 }
 396
 397 static void
 398 tp_file_start_transfer (EmpathyTpFile *tp_file)
 399 {
 400   gint fd;
 401   struct sockaddr_un addr;
 402   GArray *array;
 403
 404   fd = socket (PF_UNIX, SOCK_STREAM, 0);
 405   if (fd < 0)
 406     {
 407       DEBUG ("Failed to create socket, closing channel");
 408       empathy_tp_file_cancel (tp_file);
 409       return;
 410     }
 411
 412   array = g_value_get_boxed (tp_file->priv->socket_address);
 413
 414   memset (&addr, 0, sizeof (addr));
 415   addr.sun_family = AF_UNIX;
 416   strncpy (addr.sun_path, array->data, array->len);
 417
 418   if (connect (fd, (struct sockaddr*) &addr, sizeof (addr)) < 0)
 419     {
 420       DEBUG ("Failed to connect socket, closing channel");
 421       empathy_tp_file_cancel (tp_file);
 422       close (fd);
 423       return;
 424     }
 425
 426   DEBUG ("Start the transfer");
 427
 428   tp_file->priv->start_time = empathy_time_get_current ();
 429   tp_file->priv->cancellable = g_cancellable_new ();
 430   if (tp_file->priv->incoming)
 431     {
 432       GInputStream *socket_stream;
 433
 434       socket_stream = g_unix_input_stream_new (fd, TRUE);
 435       copy_stream (socket_stream, tp_file->priv->out_stream,
 436           tp_file->priv->cancellable);
 437       g_object_unref (socket_stream);
 438     }
 439   else
 440     {
 441       GOutputStream *socket_stream;
 442
 443       socket_stream = g_unix_output_stream_new (fd, TRUE);
 444       copy_stream (tp_file->priv->in_stream, socket_stream,
 445           tp_file->priv->cancellable);
 446       g_object_unref (socket_stream);
 447     }
 448 }
 449
 450 static void
 451 tp_file_state_changed_cb (TpChannel *channel,
 452                           guint state,
 453                           guint reason,
 454                           gpointer user_data,
 455                           GObject *weak_object)
 456 {
 457   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 458
 459   if (state == tp_file->priv->state)
 460     return;
 461
 462   DEBUG ("File transfer state changed:\n"
 463       "\tfilename = %s, old state = %u, state = %u, reason = %u\n"
 464       "\tincoming = %s, in_stream = %s, out_stream = %s",
 465       tp_file->priv->filename, tp_file->priv->state, state, reason,
 466       tp_file->priv->incoming ? "yes" : "no",
 467       tp_file->priv->in_stream ? "present" : "not present",
 468       tp_file->priv->out_stream ? "present" : "not present");
 469
 470   /* If the channel is open AND we have the socket path, we can start the
 471    * transfer. The socket path could be NULL if we are not doing the actual
 472    * data transfer but are just an observer for the channel. */
 473   if (state == TP_FILE_TRANSFER_STATE_OPEN &&
 474       tp_file->priv->socket_address != NULL)
 475     tp_file_start_transfer (tp_file);
 476
 477   tp_file->priv->state = state;
 478   tp_file->priv->state_change_reason = reason;
 479
 480   g_object_notify (G_OBJECT (tp_file), "state");
 481 }
 482
 483 static void
 484 tp_file_transferred_bytes_changed_cb (TpChannel *channel,
 485                                       guint64 count,
 486                                       gpointer user_data,
 487                                       GObject *weak_object)
 488 {
 489   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 490
 491   if (tp_file->priv->transferred_bytes == count)
 492     return;
 493
 494   tp_file->priv->transferred_bytes = count;
 495   g_object_notify (G_OBJECT (tp_file), "transferred-bytes");
 496 }
 497
 498 static void
 499 tp_file_check_if_ready (EmpathyTpFile *tp_file)
 500 {
 501   if (tp_file->priv->ready || tp_file->priv->contact == NULL ||
 502       tp_file->priv->state == 0)
 503     return;
 504
 505   tp_file->priv->ready = TRUE;
 506   g_object_notify (G_OBJECT (tp_file), "ready");
 507 }
 508
 509 static void
 510 tp_file_got_contact_cb (EmpathyTpContactFactory *factory,
 511                         EmpathyContact *contact,
 512                         const GError *error,
 513                         gpointer user_data,
 514                         GObject *weak_object)
 515 {
 516   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 517
 518   if (error)
 519     {
 520       DEBUG ("Error: %s", error->message);
 521       empathy_tp_file_close (tp_file);
 522       return;
 523     }
 524
 525   tp_file->priv->contact = g_object_ref (contact);
 526   tp_file_check_if_ready (tp_file);
 527 }
 528
 529 static void
 530 tp_file_get_all_cb (TpProxy *proxy,
 531                     GHashTable *properties,
 532                     const GError *error,
 533                     gpointer user_data,
 534                     GObject *file_obj)
 535 {
 536   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (file_obj);
 537
 538   if (error)
 539     {
 540       DEBUG ("Error: %s", error->message);
 541       tp_cli_channel_call_close (tp_file->priv->channel, -1, NULL, NULL, NULL,
 542           NULL);
 543       return;
 544     }
 545
 546   tp_file->priv->size = g_value_get_uint64 (
 547       g_hash_table_lookup (properties, "Size"));
 548   g_object_notify (file_obj, "size");
 549
 550   tp_file->priv->state = g_value_get_uint (
 551       g_hash_table_lookup (properties, "State"));
 552   g_object_notify (file_obj, "state");
 553
 554   tp_file->priv->transferred_bytes = g_value_get_uint64 (
 555       g_hash_table_lookup (properties, "TransferredBytes"));
 556   g_object_notify (file_obj, "transferred-bytes");
 557
 558   tp_file->priv->filename = g_value_dup_string (
 559       g_hash_table_lookup (properties, "Filename"));
 560   g_object_notify (file_obj, "filename");
 561
 562   tp_file->priv->content_hash = g_value_dup_string (
 563       g_hash_table_lookup (properties, "ContentHash"));
 564   g_object_notify (file_obj, "content-hash");
 565
 566   tp_file->priv->content_hash_type = g_value_get_uint (
 567       g_hash_table_lookup (properties, "ContentHashType"));
 568   g_object_notify (file_obj, "content-hash-type");
 569
 570   tp_file->priv->content_type = g_value_dup_string (
 571       g_hash_table_lookup (properties, "ContentType"));
 572   g_object_notify (file_obj, "content-type");
 573
 574   tp_file->priv->description = g_value_dup_string (
 575       g_hash_table_lookup (properties, "Description"));
 576
 577   tp_file_check_if_ready (tp_file);
 578 }
 579
 580 static void
 581 tp_file_get_requested_cb (TpProxy *proxy,
 582                           const GValue *requested,
 583                           const GError *error,
 584                           gpointer user_data,
 585                           GObject *weak_object)
 586 {
 587   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 588
 589   if (error)
 590     {
 591       DEBUG ("Error: %s", error->message);
 592       tp_cli_channel_call_close (tp_file->priv->channel, -1, NULL, NULL, NULL,
 593           NULL);
 594       return;
 595     }
 596
 597   tp_file->priv->incoming = !g_value_get_boolean (requested);
 598   g_object_notify (G_OBJECT (tp_file), "incoming");
 599
 600   tp_file_check_if_ready (tp_file);
 601 }
 602
 603 static GObject *
 604 tp_file_constructor (GType type,
 605                      guint n_props,
 606                      GObjectConstructParam *props)
 607 {
 608   GObject *file_obj;
 609   EmpathyTpFile *tp_file;
 610   TpHandle handle;
 611   TpConnection *connection;
 612
 613   file_obj = G_OBJECT_CLASS (empathy_tp_file_parent_class)->constructor (type,
 614       n_props, props);
 615
 616   tp_file = EMPATHY_TP_FILE (file_obj);
 617
 618   connection = tp_channel_borrow_connection (tp_file->priv->channel);
 619   tp_file->priv->factory = empathy_tp_contact_factory_dup_singleton (connection);
 620   tp_file->priv->mc = empathy_mission_control_dup_singleton ();
 621   tp_file->priv->state_change_reason =
 622       TP_FILE_TRANSFER_STATE_CHANGE_REASON_NONE;
 623
 624   g_signal_connect (tp_file->priv->channel, "invalidated",
 625     G_CALLBACK (tp_file_invalidated_cb), tp_file);
 626
 627   tp_cli_channel_type_file_transfer_connect_to_file_transfer_state_changed (
 628       tp_file->priv->channel, tp_file_state_changed_cb, NULL, NULL,
 629       G_OBJECT (tp_file), NULL);
 630
 631   tp_cli_channel_type_file_transfer_connect_to_transferred_bytes_changed (
 632       tp_file->priv->channel, tp_file_transferred_bytes_changed_cb,
 633       NULL, NULL, G_OBJECT (tp_file), NULL);
 634
 635   tp_cli_dbus_properties_call_get (tp_file->priv->channel, -1,
 636       TP_IFACE_CHANNEL, "Requested",
 637       tp_file_get_requested_cb, NULL, NULL, file_obj);
 638
 639   tp_cli_dbus_properties_call_get_all (tp_file->priv->channel, -1,
 640       TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER,
 641       tp_file_get_all_cb, NULL, NULL, file_obj);
 642
 643   handle = tp_channel_get_handle (tp_file->priv->channel, NULL);
 644   empathy_tp_contact_factory_get_from_handle (tp_file->priv->factory,
 645       handle, tp_file_got_contact_cb, NULL, NULL, file_obj);
 646
 647   return file_obj;
 648 }
 649
 650 static void
 651 tp_file_get_property (GObject *object,
 652                       guint param_id,
 653                       GValue *value,
 654                       GParamSpec *pspec)
 655 {
 656   EmpathyTpFile *tp_file;
 657
 658   tp_file = EMPATHY_TP_FILE (object);
 659
 660   switch (param_id)
 661     {
 662       case PROP_CHANNEL:
 663         g_value_set_object (value, tp_file->priv->channel);
 664         break;
 665       case PROP_INCOMING:
 666         g_value_set_boolean (value, tp_file->priv->incoming);
 667         break;
 668       case PROP_STATE:
 669         g_value_set_uint (value, tp_file->priv->state);
 670         break;
 671       case PROP_CONTENT_TYPE:
 672         g_value_set_string (value, tp_file->priv->content_type);
 673         break;
 674       case PROP_FILENAME:
 675         g_value_set_string (value, tp_file->priv->filename);
 676         break;
 677       case PROP_SIZE:
 678         g_value_set_uint64 (value, tp_file->priv->size);
 679         break;
 680       case PROP_CONTENT_HASH_TYPE:
 681         g_value_set_uint (value, tp_file->priv->content_hash_type);
 682         break;
 683       case PROP_CONTENT_HASH:
 684         g_value_set_string (value, tp_file->priv->content_hash);
 685         break;
 686       case PROP_TRANSFERRED_BYTES:
 687         g_value_set_uint64 (value, tp_file->priv->transferred_bytes);
 688         break;
 689       case PROP_READY:
 690         g_value_set_boolean (value, tp_file->priv->ready);
 691         break;
 692       default:
 693         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 694         break;
 695     };
 696 }
 697
 698 static void
 699 tp_file_channel_set_dbus_property (gpointer proxy,
 700                                    const gchar *property,
 701                                    const GValue *value)
 702 {
 703         DEBUG ("Setting %s property", property);
 704         tp_cli_dbus_properties_call_set (TP_PROXY (proxy), -1,
 705             TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER, property, value,
 706             NULL, NULL, NULL, NULL);
 707 }
 708
 709 static void
 710 tp_file_set_property (GObject *object,
 711                       guint param_id,
 712                       const GValue *value,
 713                       GParamSpec *pspec)
 714 {
 715   EmpathyTpFile *tp_file = (EmpathyTpFile *) object;
 716   switch (param_id)
 717     {
 718       case PROP_CHANNEL:
 719         tp_file->priv->channel = g_object_ref (g_value_get_object (value));
 720         break;
 721       case PROP_STATE:
 722         tp_file->priv->state = g_value_get_uint (value);
 723         break;
 724       case PROP_INCOMING:
 725         tp_file->priv->incoming = g_value_get_boolean (value);
 726         break;
 727       case PROP_FILENAME:
 728         g_free (tp_file->priv->filename);
 729         tp_file->priv->filename = g_value_dup_string (value);
 730         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 731             "Filename", value);
 732         break;
 733       case PROP_SIZE:
 734         tp_file->priv->size = g_value_get_uint64 (value);
 735         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 736             "Size", value);
 737         break;
 738       case PROP_CONTENT_TYPE:
 739         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 740             "ContentType", value);
 741         g_free (tp_file->priv->content_type);
 742         tp_file->priv->content_type = g_value_dup_string (value);
 743         break;
 744       case PROP_CONTENT_HASH:
 745         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 746             "ContentHash", value);
 747         g_free (tp_file->priv->content_hash);
 748         tp_file->priv->content_hash = g_value_dup_string (value);
 749         break;
 750       case PROP_READY:
 751         tp_file->priv->ready = g_value_get_boolean (value);
 752         break;
 753       default:
 754         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 755         break;
 756     };
 757 }
 758
 759 static GHashTable *ft_table = NULL;
 760
 761 static void
 762 tp_file_weak_notify_cb (gpointer channel,
 763                         GObject *tp_file)
 764 {
 765   g_hash_table_remove (ft_table, channel);
 766 }
 767
 768 /**
 769  * empathy_tp_file_new:
 770  * @channel: a Telepathy channel
 771  *
 772  * Creates a new #EmpathyTpFile wrapping @channel, or return a new ref to an
 773  * existing #EmpathyTpFile for that channel.
 774  *
 775  * Returns: a new #EmpathyTpFile
 776  */
 777 EmpathyTpFile *
 778 empathy_tp_file_new (TpChannel *channel)
 779 {
 780   EmpathyTpFile *tp_file;
 781
 782   g_return_val_if_fail (TP_IS_CHANNEL (channel), NULL);
 783
 784   if (ft_table != NULL)
 785     {
 786       tp_file = g_hash_table_lookup (ft_table, channel);
 787       if (tp_file != NULL) {
 788         return g_object_ref (tp_file);
 789       }
 790     }
 791   else
 792     ft_table = g_hash_table_new_full (empathy_proxy_hash,
 793       empathy_proxy_equal, (GDestroyNotify) g_object_unref, NULL);
 794
 795   tp_file = g_object_new (EMPATHY_TYPE_TP_FILE,
 796       "channel", channel,
 797       NULL);
 798
 799   g_hash_table_insert (ft_table, g_object_ref (channel), tp_file);
 800   g_object_weak_ref (G_OBJECT (tp_file), tp_file_weak_notify_cb, channel);
 801
 802   return tp_file;
 803 }
 804
 805 /**
 806  * empathy_tp_file_get_channel
 807  * @tp_file: an #EmpathyTpFile
 808  *
 809  * Returns the Telepathy file transfer channel
 810  *
 811  * Returns: the #TpChannel
 812  */
 813 TpChannel *
 814 empathy_tp_file_get_channel (EmpathyTpFile *tp_file)
 815 {
 816   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 817
 818   return tp_file->priv->channel;
 819 }
 820
 821 static void
 822 tp_file_method_cb (TpChannel *channel,
 823                    const GValue *address,
 824                    const GError *error,
 825                    gpointer user_data,
 826                    GObject *weak_object)
 827 {
 828   EmpathyTpFile *tp_file = (EmpathyTpFile *) weak_object;
 829   GArray *array;
 830
 831   if (error)
 832     {
 833       DEBUG ("Error: %s", error->message);
 834       empathy_tp_file_cancel (tp_file);
 835       return;
 836     }
 837
 838   if (G_VALUE_TYPE (address) == DBUS_TYPE_G_UCHAR_ARRAY)
 839     {
 840       tp_file->priv->socket_address = tp_g_value_slice_dup (address);
 841     }
 842   else if (G_VALUE_TYPE (address) == G_TYPE_STRING)
 843     {
 844       /* Old bugged version of telepathy-salut used to store the address
 845        * as a 's' instead of an 'ay' */
 846       const gchar *path;
 847
 848       path = g_value_get_string (address);
 849       array = g_array_sized_new (TRUE, FALSE, sizeof (gchar), strlen (path));
 850       g_array_insert_vals (array, 0, path, strlen (path));
 851
 852       tp_file->priv->socket_address = tp_g_value_slice_new (
 853           DBUS_TYPE_G_UCHAR_ARRAY);
 854       g_value_set_boxed (tp_file->priv->socket_address, array);
 855
 856       g_array_free (array, TRUE);
 857     }
 858   else
 859     {
 860       DEBUG ("Wrong address type: %s", G_VALUE_TYPE_NAME (address));
 861       empathy_tp_file_cancel (tp_file);
 862       return;
 863     }
 864
 865   array = g_value_get_boxed (tp_file->priv->socket_address);
 866   DEBUG ("Got unix socket path: %s", array->data);
 867
 868   if (tp_file->priv->state == TP_FILE_TRANSFER_STATE_OPEN)
 869     tp_file_start_transfer (tp_file);
 870 }
 871
 872 /**
 873  * empathy_tp_file_accept:
 874  * @tp_file: an #EmpathyTpFile
 875  * @offset: position where to start the transfer
 876  * @gfile: a #GFile where to write transfered data
 877  * @error: a #GError set if there is an error when opening @gfile
 878  *
 879  * Accepts a file transfer that's in the "local pending" state (i.e.
 880  * TP_FILE_TRANSFER_STATE_LOCAL_PENDING).
 881  */
 882 void
 883 empathy_tp_file_accept (EmpathyTpFile *tp_file,
 884                         guint64 offset,
 885                         GFile *gfile,
 886                         GError **error)
 887 {
 888   GValue nothing = { 0 };
 889
 890   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
 891   g_return_if_fail (G_IS_FILE (gfile));
 892
 893   tp_file->priv->out_stream = G_OUTPUT_STREAM (g_file_replace (gfile, NULL,
 894         FALSE, 0, NULL, error));
 895   if (error && *error)
 896     return;
 897
 898   g_free (tp_file->priv->filename);
 899   tp_file->priv->filename = g_file_get_basename (gfile);
 900   g_object_notify (G_OBJECT (tp_file), "filename");
 901
 902   DEBUG ("Accepting file: filename=%s", tp_file->priv->filename);
 903
 904   g_value_init (&nothing, G_TYPE_STRING);
 905   g_value_set_static_string (&nothing, "");
 906
 907   tp_cli_channel_type_file_transfer_call_accept_file (tp_file->priv->channel,
 908       -1, TP_SOCKET_ADDRESS_TYPE_UNIX, TP_SOCKET_ACCESS_CONTROL_LOCALHOST,
 909       &nothing, offset, tp_file_method_cb, NULL, NULL, G_OBJECT (tp_file));
 910 }
 911
 912 /**
 913  * empathy_tp_file_offer:
 914  * @tp_file: an #EmpathyTpFile
 915  * @gfile: a #GFile where to read the data to transfer
 916  * @error: a #GError set if there is an error when opening @gfile
 917  *
 918  * Offers a file transfer that's in the "not offered" state (i.e.
 919  * TP_FILE_TRANSFER_STATE_NOT_OFFERED).
 920  */
 921 void
 922 empathy_tp_file_offer (EmpathyTpFile *tp_file, GFile *gfile, GError **error)
 923 {
 924   GValue nothing = { 0 };
 925
 926   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
 927
 928   tp_file->priv->in_stream = G_INPUT_STREAM (g_file_read (gfile, NULL, error));
 929   if (error && *error)
 930         return;
 931
 932   g_value_init (&nothing, G_TYPE_STRING);
 933   g_value_set_static_string (&nothing, "");
 934
 935   tp_cli_channel_type_file_transfer_call_provide_file (tp_file->priv->channel,
 936       -1, TP_SOCKET_ADDRESS_TYPE_UNIX, TP_SOCKET_ACCESS_CONTROL_LOCALHOST,
 937       &nothing, tp_file_method_cb, NULL, NULL, G_OBJECT (tp_file));
 938 }
 939
 940 EmpathyContact *
 941 empathy_tp_file_get_contact (EmpathyTpFile *tp_file)
 942 {
 943   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 944   return tp_file->priv->contact;
 945 }
 946
 947 const gchar *
 948 empathy_tp_file_get_filename (EmpathyTpFile *tp_file)
 949 {
 950   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 951   return tp_file->priv->filename;
 952 }
 953
 954 gboolean
 955 empathy_tp_file_is_incoming (EmpathyTpFile *tp_file)
 956 {
 957   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), FALSE);
 958   return tp_file->priv->incoming;
 959 }
 960
 961 TpFileTransferState
 962 empathy_tp_file_get_state (EmpathyTpFile *tp_file,
 963                            TpFileTransferStateChangeReason *reason)
 964 {
 965   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file),
 966       TP_FILE_TRANSFER_STATE_NONE);
 967
 968   if (reason != NULL)
 969     *reason = tp_file->priv->state_change_reason;
 970
 971   return tp_file->priv->state;
 972 }
 973
 974 guint64
 975 empathy_tp_file_get_size (EmpathyTpFile *tp_file)
 976 {
 977   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file),
 978       EMPATHY_TP_FILE_UNKNOWN_SIZE);
 979   return tp_file->priv->size;
 980 }
 981
 982 guint64
 983 empathy_tp_file_get_transferred_bytes (EmpathyTpFile *tp_file)
 984 {
 985   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), 0);
 986   return tp_file->priv->transferred_bytes;
 987 }
 988
 989 gint
 990 empathy_tp_file_get_remaining_time (EmpathyTpFile *tp_file)
 991 {
 992   time_t curr_time, elapsed_time;
 993   gdouble time_per_byte;
 994   gdouble remaining_time;
 995
 996   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), -1);
 997
 998   if (tp_file->priv->size == EMPATHY_TP_FILE_UNKNOWN_SIZE)
 999     return -1;
1000
1001   if (tp_file->priv->transferred_bytes == tp_file->priv->size)
1002     return 0;
1003
1004   curr_time = empathy_time_get_current ();
1005   elapsed_time = curr_time - tp_file->priv->start_time;
1006   time_per_byte = (gdouble) elapsed_time /
1007       (gdouble) tp_file->priv->transferred_bytes;
1008   remaining_time = time_per_byte * (tp_file->priv->size -
1009       tp_file->priv->transferred_bytes);
1010
1011   return (gint) remaining_time;
1012 }
1013
1014 const gchar *
1015 empathy_tp_file_get_content_type (EmpathyTpFile *tp_file)
1016 {
1017   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
1018   return tp_file->priv->content_type;
1019 }
1020
1021 void
1022 empathy_tp_file_cancel (EmpathyTpFile *tp_file)
1023 {
1024   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
1025
1026   DEBUG ("Closing channel..");
1027   tp_cli_channel_call_close (tp_file->priv->channel, -1,
1028     NULL, NULL, NULL, NULL);
1029
1030   if (tp_file->priv->cancellable != NULL)
1031     g_cancellable_cancel (tp_file->priv->cancellable);
1032 }
1033
1034 void
1035 empathy_tp_file_close (EmpathyTpFile *tp_file)
1036 {
1037   empathy_tp_file_cancel (tp_file);
1038 }
1039
1040 gboolean
1041 empathy_tp_file_is_ready (EmpathyTpFile *tp_file)
1042 {
1043   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), FALSE);
1044
1045   return tp_file->priv->ready;
1046 }
1047
1048 static void
1049 empathy_tp_file_class_init (EmpathyTpFileClass *klass)
1050 {
1051   GObjectClass *object_class = G_OBJECT_CLASS (klass);
1052
1053   object_class->finalize = tp_file_finalize;
1054   object_class->constructor = tp_file_constructor;
1055   object_class->get_property = tp_file_get_property;
1056   object_class->set_property = tp_file_set_property;
1057
1058   /* Construct-only properties */
1059   g_object_class_install_property (object_class,
1060       PROP_CHANNEL,
1061       g_param_spec_object ("channel",
1062           "telepathy channel",
1063           "The file transfer channel",
1064           TP_TYPE_CHANNEL,
1065           G_PARAM_READWRITE |
1066           G_PARAM_CONSTRUCT_ONLY));
1067
1068   g_object_class_install_property (object_class,
1069       PROP_STATE,
1070       g_param_spec_uint ("state",
1071           "state of the transfer",
1072           "The file transfer state",
1073           0,
1074           G_MAXUINT,
1075           G_MAXUINT,
1076           G_PARAM_READWRITE |
1077           G_PARAM_CONSTRUCT));
1078
1079   g_object_class_install_property (object_class,
1080       PROP_INCOMING,
1081       g_param_spec_boolean ("incoming",
1082           "incoming",
1083           "Whether the transfer is incoming",
1084           FALSE,
1085           G_PARAM_READWRITE |
1086           G_PARAM_CONSTRUCT));
1087
1088   g_object_class_install_property (object_class,
1089       PROP_READY,
1090       g_param_spec_boolean ("ready",
1091           "ready",
1092           "Whether the object is ready",
1093           FALSE,
1094           G_PARAM_READWRITE |
1095           G_PARAM_CONSTRUCT));
1096
1097   g_object_class_install_property (object_class,
1098       PROP_FILENAME,
1099       g_param_spec_string ("filename",
1100           "name of the transfer",
1101           "The file transfer filename",
1102           "",
1103           G_PARAM_READWRITE));
1104
1105   g_object_class_install_property (object_class,
1106       PROP_SIZE,
1107       g_param_spec_uint64 ("size",
1108           "size of the file",
1109           "The file transfer size",
1110           0,
1111           G_MAXUINT64,
1112           G_MAXUINT64,
1113           G_PARAM_READWRITE));
1114
1115   g_object_class_install_property (object_class,
1116       PROP_CONTENT_TYPE,
1117       g_param_spec_string ("content-type",
1118           "file transfer content-type",
1119           "The file transfer content-type",
1120           "",
1121           G_PARAM_READWRITE));
1122
1123   g_object_class_install_property (object_class,
1124       PROP_CONTENT_HASH_TYPE,
1125       g_param_spec_uint ("content-hash-type",
1126           "file transfer hash type",
1127           "The type of the file transfer hash",
1128           0,
1129           G_MAXUINT,
1130           0,
1131           G_PARAM_READWRITE));
1132
1133   g_object_class_install_property (object_class,
1134       PROP_CONTENT_HASH,
1135       g_param_spec_string ("content-hash",
1136           "file transfer hash",
1137           "The hash of the transfer's contents",
1138           "",
1139           G_PARAM_READWRITE));
1140
1141   g_object_class_install_property (object_class,
1142       PROP_TRANSFERRED_BYTES,
1143       g_param_spec_uint64 ("transferred-bytes",
1144           "bytes transferred",
1145           "The number of bytes transferred",
1146           0,
1147           G_MAXUINT64,
1148           0,
1149           G_PARAM_READWRITE));
1150
1151   g_type_class_add_private (object_class, sizeof (EmpathyTpFilePriv));
1152 }
1153