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                         GList *contacts,
 512                         gpointer user_data,
 513                         GObject *weak_object)
 514 {
 515   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 516
 517   tp_file->priv->contact = g_object_ref (contacts->data);
 518   g_object_notify (G_OBJECT (tp_file), "contact");
 519
 520   tp_file_check_if_ready (tp_file);
 521 }
 522
 523 static void
 524 tp_file_get_all_cb (TpProxy *proxy,
 525                     GHashTable *properties,
 526                     const GError *error,
 527                     gpointer user_data,
 528                     GObject *file_obj)
 529 {
 530   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (file_obj);
 531
 532   if (error)
 533     {
 534       DEBUG ("Error: %s", error->message);
 535       tp_cli_channel_call_close (tp_file->priv->channel, -1, NULL, NULL, NULL,
 536           NULL);
 537       return;
 538     }
 539
 540   tp_file->priv->size = g_value_get_uint64 (
 541       g_hash_table_lookup (properties, "Size"));
 542   g_object_notify (file_obj, "size");
 543
 544   tp_file->priv->state = g_value_get_uint (
 545       g_hash_table_lookup (properties, "State"));
 546   g_object_notify (file_obj, "state");
 547
 548   tp_file->priv->transferred_bytes = g_value_get_uint64 (
 549       g_hash_table_lookup (properties, "TransferredBytes"));
 550   g_object_notify (file_obj, "transferred-bytes");
 551
 552   tp_file->priv->filename = g_value_dup_string (
 553       g_hash_table_lookup (properties, "Filename"));
 554   g_object_notify (file_obj, "filename");
 555
 556   tp_file->priv->content_hash = g_value_dup_string (
 557       g_hash_table_lookup (properties, "ContentHash"));
 558   g_object_notify (file_obj, "content-hash");
 559
 560   tp_file->priv->content_hash_type = g_value_get_uint (
 561       g_hash_table_lookup (properties, "ContentHashType"));
 562   g_object_notify (file_obj, "content-hash-type");
 563
 564   tp_file->priv->content_type = g_value_dup_string (
 565       g_hash_table_lookup (properties, "ContentType"));
 566   g_object_notify (file_obj, "content-type");
 567
 568   tp_file->priv->description = g_value_dup_string (
 569       g_hash_table_lookup (properties, "Description"));
 570
 571   tp_file_check_if_ready (tp_file);
 572 }
 573
 574 static void
 575 tp_file_get_requested_cb (TpProxy *proxy,
 576                           const GValue *requested,
 577                           const GError *error,
 578                           gpointer user_data,
 579                           GObject *weak_object)
 580 {
 581   EmpathyTpFile *tp_file = EMPATHY_TP_FILE (weak_object);
 582
 583   if (error)
 584     {
 585       DEBUG ("Error: %s", error->message);
 586       tp_cli_channel_call_close (tp_file->priv->channel, -1, NULL, NULL, NULL,
 587           NULL);
 588       return;
 589     }
 590
 591   tp_file->priv->incoming = !g_value_get_boolean (requested);
 592   g_object_notify (G_OBJECT (tp_file), "incoming");
 593
 594   tp_file_check_if_ready (tp_file);
 595 }
 596
 597 static GObject *
 598 tp_file_constructor (GType type,
 599                      guint n_props,
 600                      GObjectConstructParam *props)
 601 {
 602   GObject *file_obj;
 603   EmpathyTpFile *tp_file;
 604   TpHandle handle;
 605   TpConnection *connection;
 606
 607   file_obj = G_OBJECT_CLASS (empathy_tp_file_parent_class)->constructor (type,
 608       n_props, props);
 609
 610   tp_file = EMPATHY_TP_FILE (file_obj);
 611
 612   connection = tp_channel_borrow_connection (tp_file->priv->channel);
 613   tp_file->priv->factory = empathy_tp_contact_factory_dup_singleton (connection);
 614   tp_file->priv->mc = empathy_mission_control_dup_singleton ();
 615   tp_file->priv->state_change_reason =
 616       TP_FILE_TRANSFER_STATE_CHANGE_REASON_NONE;
 617
 618   g_signal_connect (tp_file->priv->channel, "invalidated",
 619     G_CALLBACK (tp_file_invalidated_cb), tp_file);
 620
 621   tp_cli_channel_type_file_transfer_connect_to_file_transfer_state_changed (
 622       tp_file->priv->channel, tp_file_state_changed_cb, NULL, NULL,
 623       G_OBJECT (tp_file), NULL);
 624
 625   tp_cli_channel_type_file_transfer_connect_to_transferred_bytes_changed (
 626       tp_file->priv->channel, tp_file_transferred_bytes_changed_cb,
 627       NULL, NULL, G_OBJECT (tp_file), NULL);
 628
 629   tp_cli_dbus_properties_call_get (tp_file->priv->channel, -1,
 630       TP_IFACE_CHANNEL, "Requested",
 631       tp_file_get_requested_cb, NULL, NULL, file_obj);
 632
 633   tp_cli_dbus_properties_call_get_all (tp_file->priv->channel, -1,
 634       TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER,
 635       tp_file_get_all_cb, NULL, NULL, file_obj);
 636
 637   handle = tp_channel_get_handle (tp_file->priv->channel, NULL);
 638   empathy_tp_contact_factory_get_from_handles (tp_file->priv->factory,
 639       1, &handle, tp_file_got_contact_cb, NULL, NULL, file_obj);
 640
 641   return file_obj;
 642 }
 643
 644 static void
 645 tp_file_get_property (GObject *object,
 646                       guint param_id,
 647                       GValue *value,
 648                       GParamSpec *pspec)
 649 {
 650   EmpathyTpFile *tp_file;
 651
 652   tp_file = EMPATHY_TP_FILE (object);
 653
 654   switch (param_id)
 655     {
 656       case PROP_CHANNEL:
 657         g_value_set_object (value, tp_file->priv->channel);
 658         break;
 659       case PROP_INCOMING:
 660         g_value_set_boolean (value, tp_file->priv->incoming);
 661         break;
 662       case PROP_STATE:
 663         g_value_set_uint (value, tp_file->priv->state);
 664         break;
 665       case PROP_CONTENT_TYPE:
 666         g_value_set_string (value, tp_file->priv->content_type);
 667         break;
 668       case PROP_FILENAME:
 669         g_value_set_string (value, tp_file->priv->filename);
 670         break;
 671       case PROP_SIZE:
 672         g_value_set_uint64 (value, tp_file->priv->size);
 673         break;
 674       case PROP_CONTENT_HASH_TYPE:
 675         g_value_set_uint (value, tp_file->priv->content_hash_type);
 676         break;
 677       case PROP_CONTENT_HASH:
 678         g_value_set_string (value, tp_file->priv->content_hash);
 679         break;
 680       case PROP_TRANSFERRED_BYTES:
 681         g_value_set_uint64 (value, tp_file->priv->transferred_bytes);
 682         break;
 683       default:
 684         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 685         break;
 686     };
 687 }
 688
 689 static void
 690 tp_file_channel_set_dbus_property (gpointer proxy,
 691                                    const gchar *property,
 692                                    const GValue *value)
 693 {
 694         DEBUG ("Setting %s property", property);
 695         tp_cli_dbus_properties_call_set (TP_PROXY (proxy), -1,
 696             TP_IFACE_CHANNEL_TYPE_FILE_TRANSFER, property, value,
 697             NULL, NULL, NULL, NULL);
 698 }
 699
 700 static void
 701 tp_file_set_property (GObject *object,
 702                       guint param_id,
 703                       const GValue *value,
 704                       GParamSpec *pspec)
 705 {
 706   EmpathyTpFile *tp_file = (EmpathyTpFile *) object;
 707   switch (param_id)
 708     {
 709       case PROP_CHANNEL:
 710         tp_file->priv->channel = g_object_ref (g_value_get_object (value));
 711         break;
 712       case PROP_STATE:
 713         tp_file->priv->state = g_value_get_uint (value);
 714         break;
 715       case PROP_INCOMING:
 716         tp_file->priv->incoming = g_value_get_boolean (value);
 717         break;
 718       case PROP_FILENAME:
 719         g_free (tp_file->priv->filename);
 720         tp_file->priv->filename = g_value_dup_string (value);
 721         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 722             "Filename", value);
 723         break;
 724       case PROP_SIZE:
 725         tp_file->priv->size = g_value_get_uint64 (value);
 726         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 727             "Size", value);
 728         break;
 729       case PROP_CONTENT_TYPE:
 730         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 731             "ContentType", value);
 732         g_free (tp_file->priv->content_type);
 733         tp_file->priv->content_type = g_value_dup_string (value);
 734         break;
 735       case PROP_CONTENT_HASH:
 736         tp_file_channel_set_dbus_property (tp_file->priv->channel,
 737             "ContentHash", value);
 738         g_free (tp_file->priv->content_hash);
 739         tp_file->priv->content_hash = g_value_dup_string (value);
 740         break;
 741       default:
 742         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
 743         break;
 744     };
 745 }
 746
 747 static GHashTable *ft_table = NULL;
 748
 749 static void
 750 tp_file_weak_notify_cb (gpointer channel,
 751                         GObject *tp_file)
 752 {
 753   g_hash_table_remove (ft_table, channel);
 754 }
 755
 756 /**
 757  * empathy_tp_file_new:
 758  * @channel: a Telepathy channel
 759  *
 760  * Creates a new #EmpathyTpFile wrapping @channel, or return a new ref to an
 761  * existing #EmpathyTpFile for that channel.
 762  *
 763  * Returns: a new #EmpathyTpFile
 764  */
 765 EmpathyTpFile *
 766 empathy_tp_file_new (TpChannel *channel)
 767 {
 768   EmpathyTpFile *tp_file;
 769
 770   g_return_val_if_fail (TP_IS_CHANNEL (channel), NULL);
 771
 772   if (ft_table != NULL)
 773     {
 774       tp_file = g_hash_table_lookup (ft_table, channel);
 775       if (tp_file != NULL) {
 776         return g_object_ref (tp_file);
 777       }
 778     }
 779   else
 780     ft_table = g_hash_table_new_full (empathy_proxy_hash,
 781       empathy_proxy_equal, (GDestroyNotify) g_object_unref, NULL);
 782
 783   tp_file = g_object_new (EMPATHY_TYPE_TP_FILE,
 784       "channel", channel,
 785       NULL);
 786
 787   g_hash_table_insert (ft_table, g_object_ref (channel), tp_file);
 788   g_object_weak_ref (G_OBJECT (tp_file), tp_file_weak_notify_cb, channel);
 789
 790   return tp_file;
 791 }
 792
 793 /**
 794  * empathy_tp_file_get_channel
 795  * @tp_file: an #EmpathyTpFile
 796  *
 797  * Returns the Telepathy file transfer channel
 798  *
 799  * Returns: the #TpChannel
 800  */
 801 TpChannel *
 802 empathy_tp_file_get_channel (EmpathyTpFile *tp_file)
 803 {
 804   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 805
 806   return tp_file->priv->channel;
 807 }
 808
 809 static void
 810 tp_file_method_cb (TpChannel *channel,
 811                    const GValue *address,
 812                    const GError *error,
 813                    gpointer user_data,
 814                    GObject *weak_object)
 815 {
 816   EmpathyTpFile *tp_file = (EmpathyTpFile *) weak_object;
 817   GArray *array;
 818
 819   if (error)
 820     {
 821       DEBUG ("Error: %s", error->message);
 822       empathy_tp_file_cancel (tp_file);
 823       return;
 824     }
 825
 826   if (G_VALUE_TYPE (address) == DBUS_TYPE_G_UCHAR_ARRAY)
 827     {
 828       tp_file->priv->socket_address = tp_g_value_slice_dup (address);
 829     }
 830   else if (G_VALUE_TYPE (address) == G_TYPE_STRING)
 831     {
 832       /* Old bugged version of telepathy-salut used to store the address
 833        * as a 's' instead of an 'ay' */
 834       const gchar *path;
 835
 836       path = g_value_get_string (address);
 837       array = g_array_sized_new (TRUE, FALSE, sizeof (gchar), strlen (path));
 838       g_array_insert_vals (array, 0, path, strlen (path));
 839
 840       tp_file->priv->socket_address = tp_g_value_slice_new (
 841           DBUS_TYPE_G_UCHAR_ARRAY);
 842       g_value_set_boxed (tp_file->priv->socket_address, array);
 843
 844       g_array_free (array, TRUE);
 845     }
 846   else
 847     {
 848       DEBUG ("Wrong address type: %s", G_VALUE_TYPE_NAME (address));
 849       empathy_tp_file_cancel (tp_file);
 850       return;
 851     }
 852
 853   array = g_value_get_boxed (tp_file->priv->socket_address);
 854   DEBUG ("Got unix socket path: %s", array->data);
 855
 856   if (tp_file->priv->state == TP_FILE_TRANSFER_STATE_OPEN)
 857     tp_file_start_transfer (tp_file);
 858 }
 859
 860 /**
 861  * empathy_tp_file_accept:
 862  * @tp_file: an #EmpathyTpFile
 863  * @offset: position where to start the transfer
 864  * @gfile: a #GFile where to write transfered data
 865  * @error: a #GError set if there is an error when opening @gfile
 866  *
 867  * Accepts a file transfer that's in the "local pending" state (i.e.
 868  * TP_FILE_TRANSFER_STATE_LOCAL_PENDING).
 869  */
 870 void
 871 empathy_tp_file_accept (EmpathyTpFile *tp_file,
 872                         guint64 offset,
 873                         GFile *gfile,
 874                         GError **error)
 875 {
 876   GValue nothing = { 0 };
 877
 878   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
 879   g_return_if_fail (G_IS_FILE (gfile));
 880
 881   tp_file->priv->out_stream = G_OUTPUT_STREAM (g_file_replace (gfile, NULL,
 882         FALSE, 0, NULL, error));
 883   if (error && *error)
 884     return;
 885
 886   g_free (tp_file->priv->filename);
 887   tp_file->priv->filename = g_file_get_basename (gfile);
 888   g_object_notify (G_OBJECT (tp_file), "filename");
 889
 890   DEBUG ("Accepting file: filename=%s", tp_file->priv->filename);
 891
 892   g_value_init (&nothing, G_TYPE_STRING);
 893   g_value_set_static_string (&nothing, "");
 894
 895   tp_cli_channel_type_file_transfer_call_accept_file (tp_file->priv->channel,
 896       -1, TP_SOCKET_ADDRESS_TYPE_UNIX, TP_SOCKET_ACCESS_CONTROL_LOCALHOST,
 897       &nothing, offset, tp_file_method_cb, NULL, NULL, G_OBJECT (tp_file));
 898 }
 899
 900 /**
 901  * empathy_tp_file_offer:
 902  * @tp_file: an #EmpathyTpFile
 903  * @gfile: a #GFile where to read the data to transfer
 904  * @error: a #GError set if there is an error when opening @gfile
 905  *
 906  * Offers a file transfer that's in the "not offered" state (i.e.
 907  * TP_FILE_TRANSFER_STATE_NOT_OFFERED).
 908  */
 909 void
 910 empathy_tp_file_offer (EmpathyTpFile *tp_file, GFile *gfile, GError **error)
 911 {
 912   GValue nothing = { 0 };
 913
 914   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
 915
 916   tp_file->priv->in_stream = G_INPUT_STREAM (g_file_read (gfile, NULL, error));
 917   if (error && *error)
 918         return;
 919
 920   g_value_init (&nothing, G_TYPE_STRING);
 921   g_value_set_static_string (&nothing, "");
 922
 923   tp_cli_channel_type_file_transfer_call_provide_file (tp_file->priv->channel,
 924       -1, TP_SOCKET_ADDRESS_TYPE_UNIX, TP_SOCKET_ACCESS_CONTROL_LOCALHOST,
 925       &nothing, tp_file_method_cb, NULL, NULL, G_OBJECT (tp_file));
 926 }
 927
 928 EmpathyContact *
 929 empathy_tp_file_get_contact (EmpathyTpFile *tp_file)
 930 {
 931   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 932   return tp_file->priv->contact;
 933 }
 934
 935 const gchar *
 936 empathy_tp_file_get_filename (EmpathyTpFile *tp_file)
 937 {
 938   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
 939   return tp_file->priv->filename;
 940 }
 941
 942 gboolean
 943 empathy_tp_file_is_incoming (EmpathyTpFile *tp_file)
 944 {
 945   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), FALSE);
 946   return tp_file->priv->incoming;
 947 }
 948
 949 TpFileTransferState
 950 empathy_tp_file_get_state (EmpathyTpFile *tp_file,
 951                            TpFileTransferStateChangeReason *reason)
 952 {
 953   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file),
 954       TP_FILE_TRANSFER_STATE_NONE);
 955
 956   if (reason != NULL)
 957     *reason = tp_file->priv->state_change_reason;
 958
 959   return tp_file->priv->state;
 960 }
 961
 962 guint64
 963 empathy_tp_file_get_size (EmpathyTpFile *tp_file)
 964 {
 965   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file),
 966       EMPATHY_TP_FILE_UNKNOWN_SIZE);
 967   return tp_file->priv->size;
 968 }
 969
 970 guint64
 971 empathy_tp_file_get_transferred_bytes (EmpathyTpFile *tp_file)
 972 {
 973   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), 0);
 974   return tp_file->priv->transferred_bytes;
 975 }
 976
 977 gint
 978 empathy_tp_file_get_remaining_time (EmpathyTpFile *tp_file)
 979 {
 980   time_t curr_time, elapsed_time;
 981   gdouble time_per_byte;
 982   gdouble remaining_time;
 983
 984   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), -1);
 985
 986   if (tp_file->priv->size == EMPATHY_TP_FILE_UNKNOWN_SIZE)
 987     return -1;
 988
 989   if (tp_file->priv->transferred_bytes == tp_file->priv->size)
 990     return 0;
 991
 992   curr_time = empathy_time_get_current ();
 993   elapsed_time = curr_time - tp_file->priv->start_time;
 994   time_per_byte = (gdouble) elapsed_time /
 995       (gdouble) tp_file->priv->transferred_bytes;
 996   remaining_time = time_per_byte * (tp_file->priv->size -
 997       tp_file->priv->transferred_bytes);
 998
 999   return (gint) remaining_time;
1000 }
1001
1002 const gchar *
1003 empathy_tp_file_get_content_type (EmpathyTpFile *tp_file)
1004 {
1005   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), NULL);
1006   return tp_file->priv->content_type;
1007 }
1008
1009 void
1010 empathy_tp_file_cancel (EmpathyTpFile *tp_file)
1011 {
1012   g_return_if_fail (EMPATHY_IS_TP_FILE (tp_file));
1013
1014   DEBUG ("Closing channel..");
1015   tp_cli_channel_call_close (tp_file->priv->channel, -1,
1016     NULL, NULL, NULL, NULL);
1017
1018   if (tp_file->priv->cancellable != NULL)
1019     g_cancellable_cancel (tp_file->priv->cancellable);
1020 }
1021
1022 void
1023 empathy_tp_file_close (EmpathyTpFile *tp_file)
1024 {
1025   empathy_tp_file_cancel (tp_file);
1026 }
1027
1028 gboolean
1029 empathy_tp_file_is_ready (EmpathyTpFile *tp_file)
1030 {
1031   g_return_val_if_fail (EMPATHY_IS_TP_FILE (tp_file), FALSE);
1032
1033   return tp_file->priv->ready;
1034 }
1035
1036 static void
1037 empathy_tp_file_class_init (EmpathyTpFileClass *klass)
1038 {
1039   GObjectClass *object_class = G_OBJECT_CLASS (klass);
1040
1041   object_class->finalize = tp_file_finalize;
1042   object_class->constructor = tp_file_constructor;
1043   object_class->get_property = tp_file_get_property;
1044   object_class->set_property = tp_file_set_property;
1045
1046   /* Construct-only properties */
1047   g_object_class_install_property (object_class,
1048       PROP_CHANNEL,
1049       g_param_spec_object ("channel",
1050           "telepathy channel",
1051           "The file transfer channel",
1052           TP_TYPE_CHANNEL,
1053           G_PARAM_READWRITE |
1054           G_PARAM_CONSTRUCT_ONLY));
1055
1056   g_object_class_install_property (object_class,
1057       PROP_STATE,
1058       g_param_spec_uint ("state",
1059           "state of the transfer",
1060           "The file transfer state",
1061           0,
1062           G_MAXUINT,
1063           G_MAXUINT,
1064           G_PARAM_READWRITE |
1065           G_PARAM_CONSTRUCT));
1066
1067   g_object_class_install_property (object_class,
1068       PROP_INCOMING,
1069       g_param_spec_boolean ("incoming",
1070           "incoming",
1071           "Whether the transfer is incoming",
1072           FALSE,
1073           G_PARAM_READWRITE |
1074           G_PARAM_CONSTRUCT));
1075
1076   g_object_class_install_property (object_class,
1077       PROP_READY,
1078       g_param_spec_boolean ("ready",
1079           "ready",
1080           "Whether the object is ready",
1081           FALSE,
1082           G_PARAM_READWRITE |
1083           G_PARAM_CONSTRUCT));
1084
1085   g_object_class_install_property (object_class,
1086       PROP_FILENAME,
1087       g_param_spec_string ("filename",
1088           "name of the transfer",
1089           "The file transfer filename",
1090           "",
1091           G_PARAM_READWRITE));
1092
1093   g_object_class_install_property (object_class,
1094       PROP_SIZE,
1095       g_param_spec_uint64 ("size",
1096           "size of the file",
1097           "The file transfer size",
1098           0,
1099           G_MAXUINT64,
1100           G_MAXUINT64,
1101           G_PARAM_READWRITE));
1102
1103   g_object_class_install_property (object_class,
1104       PROP_CONTENT_TYPE,
1105       g_param_spec_string ("content-type",
1106           "file transfer content-type",
1107           "The file transfer content-type",
1108           "",
1109           G_PARAM_READWRITE));
1110
1111   g_object_class_install_property (object_class,
1112       PROP_CONTENT_HASH_TYPE,
1113       g_param_spec_uint ("content-hash-type",
1114           "file transfer hash type",
1115           "The type of the file transfer hash",
1116           0,
1117           G_MAXUINT,
1118           0,
1119           G_PARAM_READWRITE));
1120
1121   g_object_class_install_property (object_class,
1122       PROP_CONTENT_HASH,
1123       g_param_spec_string ("content-hash",
1124           "file transfer hash",
1125           "The hash of the transfer's contents",
1126           "",
1127           G_PARAM_READWRITE));
1128
1129   g_object_class_install_property (object_class,
1130       PROP_TRANSFERRED_BYTES,
1131       g_param_spec_uint64 ("transferred-bytes",
1132           "bytes transferred",
1133           "The number of bytes transferred",
1134           0,
1135           G_MAXUINT64,
1136           0,
1137           G_PARAM_READWRITE));
1138
1139   g_type_class_add_private (object_class, sizeof (EmpathyTpFilePriv));
1140 }
1141