41f319b314270acd2a23aa40f5c682789fe98d78
[empathy.git] / 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