* all:
[modest] / src / modest-mail-operation.c
1 /* Copyright (c) 2006, Nokia Corporation
2  * All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  * * Redistributions of source code must retain the above copyright
9  *   notice, this list of conditions and the following disclaimer.
10  * * Redistributions in binary form must reproduce the above copyright
11  *   notice, this list of conditions and the following disclaimer in the
12  *   documentation and/or other materials provided with the distribution.
13  * * Neither the name of the Nokia Corporation nor the names of its
14  *   contributors may be used to endorse or promote products derived from
15  *   this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29
30 #include "modest-mail-operation.h"
31 /* include other impl specific header files */
32 #include <string.h>
33 #include <stdarg.h>
34 #include <tny-mime-part.h>
35 #include <tny-store-account.h>
36 #include <tny-folder-store.h>
37 #include <tny-folder-store-query.h>
38 #include <tny-camel-stream.h>
39 #include <tny-simple-list.h>
40 #include <camel/camel-stream-mem.h>
41 #include <glib/gi18n.h>
42 #include <modest-tny-account.h>
43 #include <modest-tny-send-queue.h>
44 #include <modest-runtime.h>
45 #include "modest-text-utils.h"
46 #include "modest-tny-msg.h"
47 #include "modest-tny-platform-factory.h"
48 #include "modest-marshal.h"
49 #include "modest-formatter.h"
50 #include "modest-error.h"
51
52 /* 'private'/'protected' functions */
53 static void modest_mail_operation_class_init (ModestMailOperationClass *klass);
54 static void modest_mail_operation_init       (ModestMailOperation *obj);
55 static void modest_mail_operation_finalize   (GObject *obj);
56
57 static void     status_update_cb     (TnyFolder *folder, 
58                                       const gchar *what, 
59                                       gint status, 
60                                       gint oftotal,
61                                       gpointer user_data);
62 static void     folder_refresh_cb    (TnyFolder *folder, 
63                                       gboolean canceled,
64                                       GError **err,
65                                       gpointer user_data);
66 static void     update_folders_cb    (TnyFolderStore *self, 
67                                       TnyList *list, 
68                                       GError **err, 
69                                       gpointer user_data);
70 static void     add_attachments      (TnyMsg *msg, 
71                                       GList *attachments_list);
72
73 static void        modest_mail_operation_xfer_folder       (ModestMailOperation *self,
74                                                             TnyFolder *folder,
75                                                             TnyFolderStore *parent,
76                                                             gboolean delete_original);
77
78 static gboolean    modest_mail_operation_xfer_msg          (ModestMailOperation *self,
79                                                             TnyHeader *header, 
80                                                             TnyFolder *folder, 
81                                                             gboolean delete_original);
82
83 enum _ModestMailOperationSignals 
84 {
85         PROGRESS_CHANGED_SIGNAL,
86
87         NUM_SIGNALS
88 };
89
90 typedef struct _ModestMailOperationPrivate ModestMailOperationPrivate;
91 struct _ModestMailOperationPrivate {
92         guint                      done;
93         guint                      total;
94         ModestMailOperationStatus  status;
95         GError                    *error;
96 };
97
98 #define MODEST_MAIL_OPERATION_GET_PRIVATE(o)      (G_TYPE_INSTANCE_GET_PRIVATE((o), \
99                                                    MODEST_TYPE_MAIL_OPERATION, \
100                                                    ModestMailOperationPrivate))
101
102 #define CHECK_EXCEPTION(priv, new_status, op)  if (priv->error) {\
103                                                    priv->status = new_status;\
104                                                    op;\
105                                                }
106
107 typedef struct _RefreshFolderAsyncHelper
108 {
109         ModestMailOperation *mail_op;
110         TnyIterator *iter;
111         guint failed;
112         guint canceled;
113
114 } RefreshFolderAsyncHelper;
115
116 /* globals */
117 static GObjectClass *parent_class = NULL;
118
119 static guint signals[NUM_SIGNALS] = {0};
120
121 GType
122 modest_mail_operation_get_type (void)
123 {
124         static GType my_type = 0;
125         if (!my_type) {
126                 static const GTypeInfo my_info = {
127                         sizeof(ModestMailOperationClass),
128                         NULL,           /* base init */
129                         NULL,           /* base finalize */
130                         (GClassInitFunc) modest_mail_operation_class_init,
131                         NULL,           /* class finalize */
132                         NULL,           /* class data */
133                         sizeof(ModestMailOperation),
134                         1,              /* n_preallocs */
135                         (GInstanceInitFunc) modest_mail_operation_init,
136                         NULL
137                 };
138                 my_type = g_type_register_static (G_TYPE_OBJECT,
139                                                   "ModestMailOperation",
140                                                   &my_info, 0);
141         }
142         return my_type;
143 }
144
145 static void
146 modest_mail_operation_class_init (ModestMailOperationClass *klass)
147 {
148         GObjectClass *gobject_class;
149         gobject_class = (GObjectClass*) klass;
150
151         parent_class            = g_type_class_peek_parent (klass);
152         gobject_class->finalize = modest_mail_operation_finalize;
153
154         g_type_class_add_private (gobject_class, sizeof(ModestMailOperationPrivate));
155
156         /**
157          * ModestMailOperation::progress-changed
158          * @self: the #MailOperation that emits the signal
159          * @user_data: user data set when the signal handler was connected
160          *
161          * Emitted when the progress of a mail operation changes
162          */
163         signals[PROGRESS_CHANGED_SIGNAL] = 
164                 g_signal_new ("progress_changed",
165                               G_TYPE_FROM_CLASS (gobject_class),
166                               G_SIGNAL_RUN_FIRST,
167                               G_STRUCT_OFFSET (ModestMailOperationClass, progress_changed),
168                               NULL, NULL,
169                               g_cclosure_marshal_VOID__VOID,
170                               G_TYPE_NONE, 0);
171 }
172
173 static void
174 modest_mail_operation_init (ModestMailOperation *obj)
175 {
176         ModestMailOperationPrivate *priv;
177
178         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(obj);
179
180         priv->status   = MODEST_MAIL_OPERATION_STATUS_INVALID;
181         priv->error    = NULL;
182         priv->done     = 0;
183         priv->total    = 0;
184 }
185
186 static void
187 modest_mail_operation_finalize (GObject *obj)
188 {
189         ModestMailOperationPrivate *priv;
190
191         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(obj);
192
193         if (priv->error) {
194                 g_error_free (priv->error);
195                 priv->error = NULL;
196         }
197
198         G_OBJECT_CLASS(parent_class)->finalize (obj);
199 }
200
201 ModestMailOperation*
202 modest_mail_operation_new (void)
203 {
204         return MODEST_MAIL_OPERATION(g_object_new(MODEST_TYPE_MAIL_OPERATION, NULL));
205 }
206
207
208 void
209 modest_mail_operation_send_mail (ModestMailOperation *self,
210                                  TnyTransportAccount *transport_account,
211                                  TnyMsg* msg)
212 {
213         TnySendQueue *send_queue;
214         
215         g_return_if_fail (MODEST_IS_MAIL_OPERATION (self));
216         g_return_if_fail (TNY_IS_TRANSPORT_ACCOUNT (transport_account));
217
218         send_queue = TNY_SEND_QUEUE (modest_runtime_get_send_queue (transport_account));
219         if (!TNY_IS_SEND_QUEUE(send_queue))
220                 g_printerr ("modest: could not find send queue for account\n");
221         else {
222                 GError *err = NULL;
223                 tny_send_queue_add (send_queue, msg, &err);
224                 if (err) {
225                         g_printerr ("modest: error adding msg to send queue: %s\n",
226                                     err->message);
227                         g_error_free (err);
228                 }
229         }
230 }
231
232 void
233 modest_mail_operation_send_new_mail (ModestMailOperation *self,
234                                      TnyTransportAccount *transport_account,
235                                      const gchar *from,  const gchar *to,
236                                      const gchar *cc,  const gchar *bcc,
237                                      const gchar *subject, const gchar *body,
238                                      const GList *attachments_list)
239 {
240         TnyMsg *new_msg;
241         ModestMailOperationPrivate *priv = NULL;
242
243         g_return_if_fail (MODEST_IS_MAIL_OPERATION (self));
244         g_return_if_fail (TNY_IS_TRANSPORT_ACCOUNT (transport_account));
245
246         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(self);
247
248         /* Check parametters */
249         if (to == NULL) {
250                 g_set_error (&(priv->error), MODEST_MAIL_OPERATION_ERROR,
251                              MODEST_MAIL_OPERATION_ERROR_MISSING_PARAMETER,
252                              _("Error trying to send a mail. You need to set at least one recipient"));
253                 return;
254         }
255
256         new_msg = modest_tny_msg_new (to, from, cc, bcc, subject, body, NULL); /* FIXME: attachments */
257         if (!new_msg) {
258                 g_printerr ("modest: failed to create a new msg\n");
259                 return;
260         }
261         
262         modest_mail_operation_send_mail (self, transport_account, new_msg);
263
264         g_object_unref (G_OBJECT(new_msg));
265 }
266
267 static void
268 add_if_attachment (gpointer data, gpointer user_data)
269 {
270         TnyMimePart *part;
271         GList *attachments_list;
272
273         part = TNY_MIME_PART (data);
274         attachments_list = (GList *) user_data;
275
276         if (tny_mime_part_is_attachment (part))
277                 attachments_list = g_list_prepend (attachments_list, part);
278 }
279
280
281 static TnyMsg *
282 create_reply_forward_mail (TnyMsg *msg, const gchar *from, gboolean is_reply, guint type)
283 {
284         TnyPlatformFactory *fact;
285         TnyMsg *new_msg;
286         TnyHeader *new_header, *header;
287         gchar *new_subject;
288         TnyMimePart *body;
289         ModestFormatter *formatter;
290
291         /* Get body from original msg. Always look for the text/plain
292            part of the message to create the reply/forwarded mail */
293         header = tny_msg_get_header (msg);
294         body   = modest_tny_msg_find_body_part (msg, FALSE);
295
296         /* TODO: select the formatter from account prefs */
297         formatter = modest_formatter_new ("text/plain");
298
299         /* Format message body */
300         if (is_reply) {
301                 switch (type) {
302                 case MODEST_MAIL_OPERATION_REPLY_TYPE_CITE:
303                 default:
304                         new_msg = modest_formatter_cite  (formatter, body, header);
305                         break;
306                 case MODEST_MAIL_OPERATION_REPLY_TYPE_QUOTE:
307                         new_msg = modest_formatter_quote (formatter, body, header);
308                         break;
309                 }
310         } else {
311                 switch (type) {
312                 case MODEST_MAIL_OPERATION_FORWARD_TYPE_INLINE:
313                 default:
314                         new_msg = modest_formatter_inline  (formatter, body, header);
315                         break;
316                 case MODEST_MAIL_OPERATION_FORWARD_TYPE_ATTACHMENT:
317                         new_msg = modest_formatter_attach (formatter, body, header);
318                         break;
319                 }
320         }
321         g_object_unref (G_OBJECT(formatter));
322         g_object_unref (G_OBJECT(body));
323         
324         /* Fill the header */
325         fact = modest_tny_platform_factory_get_instance ();
326         new_header = TNY_HEADER (tny_platform_factory_new_header (fact));
327         tny_msg_set_header (new_msg, new_header);
328         tny_header_set_from (new_header, from);
329         tny_header_set_replyto (new_header, from);
330
331         /* Change the subject */
332         new_subject =
333                 (gchar *) modest_text_utils_derived_subject (tny_header_get_subject(header),
334                                                              (is_reply) ? _("Re:") : _("Fwd:"));
335         tny_header_set_subject (new_header, (const gchar *) new_subject);
336         g_free (new_subject);
337
338         /* Clean */
339         g_object_unref (G_OBJECT (new_header));
340         g_object_unref (G_OBJECT (header));
341
342         return new_msg;
343 }
344
345 TnyMsg* 
346 modest_mail_operation_create_forward_mail (TnyMsg *msg, 
347                                            const gchar *from,
348                                            ModestMailOperationForwardType forward_type)
349 {
350         TnyMsg *new_msg;
351         TnyList *parts = NULL;
352         GList *attachments_list = NULL;
353
354         new_msg = create_reply_forward_mail (msg, from, FALSE, forward_type);
355
356         /* Add attachments */
357         parts = TNY_LIST (tny_simple_list_new());
358         tny_mime_part_get_parts (TNY_MIME_PART (msg), parts);
359         tny_list_foreach (parts, add_if_attachment, attachments_list);
360         add_attachments (new_msg, attachments_list);
361
362         /* Clean */
363         if (attachments_list)
364                 g_list_free (attachments_list);
365         g_object_unref (G_OBJECT (parts));
366
367         return new_msg;
368 }
369
370 TnyMsg* 
371 modest_mail_operation_create_reply_mail (TnyMsg *msg, 
372                                          const gchar *from,
373                                          ModestMailOperationReplyType reply_type,
374                                          ModestMailOperationReplyMode reply_mode)
375 {
376         TnyMsg *new_msg = NULL;
377         TnyHeader *new_header, *header;
378         const gchar* reply_to;
379         gchar *new_cc = NULL;
380         const gchar *cc = NULL, *bcc = NULL;
381         GString *tmp = NULL;
382
383         new_msg = create_reply_forward_mail (msg, from, TRUE, reply_type);
384
385         /* Fill the header */
386         header = tny_msg_get_header (msg);
387         new_header = tny_msg_get_header (new_msg);
388         reply_to = tny_header_get_replyto (header);
389
390         if (reply_to)
391                 tny_header_set_to (new_header, reply_to);
392         else
393                 tny_header_set_to (new_header, tny_header_get_from (header));
394
395         switch (reply_mode) {
396         case MODEST_MAIL_OPERATION_REPLY_MODE_SENDER:
397                 /* Do not fill neither cc nor bcc */
398                 break;
399         case MODEST_MAIL_OPERATION_REPLY_MODE_LIST:
400                 /* TODO */
401                 break;
402         case MODEST_MAIL_OPERATION_REPLY_MODE_ALL:
403                 /* Concatenate to, cc and bcc */
404                 cc = tny_header_get_cc (header);
405                 bcc = tny_header_get_bcc (header);
406
407                 tmp = g_string_new (tny_header_get_to (header));
408                 if (cc)  g_string_append_printf (tmp, ",%s",cc);
409                 if (bcc) g_string_append_printf (tmp, ",%s",bcc);
410
411                /* Remove my own address from the cc list. TODO:
412                   remove also the To: of the new message, needed due
413                   to the new reply_to feature */
414                 new_cc = (gchar *)
415                         modest_text_utils_remove_address ((const gchar *) tmp->str,
416                                                           from);
417                 /* FIXME: remove also the mails from the new To: */
418                 tny_header_set_cc (new_header, new_cc);
419
420                 /* Clean */
421                 g_string_free (tmp, TRUE);
422                 g_free (new_cc);
423                 break;
424         }
425
426         /* Clean */
427         g_object_unref (G_OBJECT (new_header));
428         g_object_unref (G_OBJECT (header));
429
430         return new_msg;
431 }
432
433 static void
434 status_update_cb (TnyFolder *folder, const gchar *what, gint status, gint oftotal, gpointer user_data) 
435 {
436         g_print ("%s status: %d, of total %d\n", what, status, oftotal);
437 }
438
439 static void
440 folder_refresh_cb (TnyFolder *folder, gboolean canceled, GError **err, gpointer user_data)
441 {
442         ModestMailOperation *self = NULL;
443         ModestMailOperationPrivate *priv = NULL;
444         RefreshFolderAsyncHelper *helper;
445
446         helper = (RefreshFolderAsyncHelper *) user_data;
447         self = MODEST_MAIL_OPERATION (helper->mail_op);
448         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(self);
449
450         if ((canceled && *err) || *err) {
451                 priv->error = g_error_copy (*err);
452                 helper->failed++;
453         } else if (canceled) {
454                 helper->canceled++;
455                 g_set_error (&(priv->error), MODEST_MAIL_OPERATION_ERROR,
456                              MODEST_MAIL_OPERATION_ERROR_OPERATION_CANCELED,
457                              _("Error trying to refresh folder %s. Operation canceled"),
458                              tny_folder_get_name (folder));
459         } else {
460                 priv->done++;
461         }
462
463         if (priv->done == priv->total)
464                 priv->status = MODEST_MAIL_OPERATION_STATUS_SUCCESS;
465         else if ((priv->done + helper->canceled + helper->failed) == priv->total) {
466                 if (helper->failed == priv->total)
467                         priv->status = MODEST_MAIL_OPERATION_STATUS_FAILED;
468                 else if (helper->failed == priv->total)
469                         priv->status = MODEST_MAIL_OPERATION_STATUS_CANCELED;
470                 else
471                         priv->status = MODEST_MAIL_OPERATION_STATUS_FINISHED_WITH_ERRORS;
472         }
473         tny_iterator_next (helper->iter);
474         if (tny_iterator_is_done (helper->iter)) {
475                 TnyList *list;
476                 list = tny_iterator_get_list (helper->iter);
477                 g_object_unref (G_OBJECT (helper->iter));
478                 g_object_unref (G_OBJECT (list));
479                 g_slice_free (RefreshFolderAsyncHelper, helper);
480         } else {
481                 TnyFolder *folder = TNY_FOLDER (tny_iterator_get_current (helper->iter));
482                 tny_folder_refresh_async (folder, folder_refresh_cb,
483                                           status_update_cb, 
484                                           helper);
485                 g_object_unref (G_OBJECT(folder));
486         }
487         g_signal_emit (G_OBJECT (self), signals[PROGRESS_CHANGED_SIGNAL], 0, NULL);
488 }
489
490
491 static void
492 update_folders_cb (TnyFolderStore *folder_store, TnyList *list, GError **err, gpointer user_data)
493 {
494         ModestMailOperation *self;
495         ModestMailOperationPrivate *priv;
496         RefreshFolderAsyncHelper *helper;
497         TnyFolder *folder;
498         
499         self  = MODEST_MAIL_OPERATION (user_data);
500         priv  = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
501
502         if (*err) {
503                 priv->error = g_error_copy (*err);
504                 priv->status = MODEST_MAIL_OPERATION_STATUS_FAILED;
505                 return;
506         }
507
508         priv->total = tny_list_get_length (list);
509         priv->done = 0;
510         priv->status = MODEST_MAIL_OPERATION_STATUS_IN_PROGRESS;
511
512         helper = g_slice_new0 (RefreshFolderAsyncHelper);
513         helper->mail_op = self;
514         helper->iter = tny_list_create_iterator (list);
515         helper->failed = 0;
516         helper->canceled = 0;
517
518         /* Async refresh folders */
519         folder = TNY_FOLDER (tny_iterator_get_current (helper->iter));
520         tny_folder_refresh_async (folder, folder_refresh_cb,
521                                   status_update_cb, helper);
522         g_object_unref (G_OBJECT(folder));
523 }
524
525 gboolean
526 modest_mail_operation_update_account (ModestMailOperation *self,
527                                       TnyStoreAccount *store_account)
528 {
529         ModestMailOperationPrivate *priv;
530         TnyList *folders;
531         TnyFolderStoreQuery *query;
532
533         g_return_val_if_fail (MODEST_IS_MAIL_OPERATION (self), FALSE);
534         g_return_val_if_fail (TNY_IS_STORE_ACCOUNT(store_account), FALSE);
535
536         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(self);
537
538         /* Get subscribed folders & refresh them */
539         folders = TNY_LIST (tny_simple_list_new ());
540         query = tny_folder_store_query_new ();
541         tny_folder_store_query_add_item (query, NULL, TNY_FOLDER_STORE_QUERY_OPTION_SUBSCRIBED);
542         tny_folder_store_get_folders_async (TNY_FOLDER_STORE (store_account),
543                                             folders, update_folders_cb, query, self);
544         g_object_unref (query);
545
546         return TRUE;
547 }
548
549 ModestMailOperationStatus
550 modest_mail_operation_get_status (ModestMailOperation *self)
551 {
552         ModestMailOperationPrivate *priv;
553
554         g_return_val_if_fail (self, MODEST_MAIL_OPERATION_STATUS_INVALID);
555         g_return_val_if_fail (MODEST_IS_MAIL_OPERATION (self),
556                               MODEST_MAIL_OPERATION_STATUS_INVALID);
557
558         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
559         return priv->status;
560 }
561
562 const GError *
563 modest_mail_operation_get_error (ModestMailOperation *self)
564 {
565         ModestMailOperationPrivate *priv;
566
567         g_return_val_if_fail (self, NULL);
568         g_return_val_if_fail (MODEST_IS_MAIL_OPERATION (self), NULL);
569
570         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
571         return priv->error;
572 }
573
574 gboolean 
575 modest_mail_operation_cancel (ModestMailOperation *self)
576 {
577         /* TODO */
578         return TRUE;
579 }
580
581 guint 
582 modest_mail_operation_get_task_done (ModestMailOperation *self)
583 {
584         ModestMailOperationPrivate *priv;
585
586         g_return_val_if_fail (MODEST_IS_MAIL_OPERATION (self), 0);
587
588         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
589         return priv->done;
590 }
591
592 guint 
593 modest_mail_operation_get_task_total (ModestMailOperation *self)
594 {
595         ModestMailOperationPrivate *priv;
596
597         g_return_val_if_fail (MODEST_IS_MAIL_OPERATION (self), 0);
598
599         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
600         return priv->total;
601 }
602
603 gboolean
604 modest_mail_operation_is_finished (ModestMailOperation *self)
605 {
606         ModestMailOperationPrivate *priv;
607         gboolean retval = FALSE;
608
609         if (!MODEST_IS_MAIL_OPERATION (self)) {
610                 g_warning ("%s: invalid parametter", G_GNUC_FUNCTION);
611                 return retval;
612         }
613
614         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
615
616         if (priv->status == MODEST_MAIL_OPERATION_STATUS_SUCCESS   ||
617             priv->status == MODEST_MAIL_OPERATION_STATUS_FAILED    ||
618             priv->status == MODEST_MAIL_OPERATION_STATUS_CANCELED  ||
619             priv->status == MODEST_MAIL_OPERATION_STATUS_FINISHED_WITH_ERRORS) {
620                 retval = TRUE;
621         } else {
622                 retval = FALSE;
623         }
624
625         return retval;
626 }
627
628 /* ******************************************************************* */
629 /* ************************** STORE  ACTIONS ************************* */
630 /* ******************************************************************* */
631
632
633 TnyFolder *
634 modest_mail_operation_create_folder (ModestMailOperation *self,
635                                      TnyFolderStore *parent,
636                                      const gchar *name)
637 {
638         ModestMailOperationPrivate *priv;
639         TnyFolder *new_folder = NULL;
640         TnyStoreAccount *store_account;
641
642         g_return_val_if_fail (TNY_IS_FOLDER_STORE (parent), NULL);
643         g_return_val_if_fail (name, NULL);
644
645         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
646
647         /* Create the folder */
648         new_folder = tny_folder_store_create_folder (parent, name, &(priv->error));
649         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, return NULL);
650
651         /* Subscribe to folder */
652         if (!tny_folder_is_subscribed (new_folder)) {
653                 store_account = TNY_STORE_ACCOUNT (tny_folder_get_account (TNY_FOLDER (parent)));
654                 tny_store_account_subscribe (store_account, new_folder);
655                 g_object_unref (G_OBJECT (store_account));
656         }
657
658         return new_folder;
659 }
660
661 void
662 modest_mail_operation_remove_folder (ModestMailOperation *self,
663                                      TnyFolder *folder,
664                                      gboolean remove_to_trash)
665 {
666         TnyFolderStore *folder_store;
667
668         g_return_if_fail (TNY_IS_FOLDER (folder));
669
670         /* Get folder store */
671         folder_store = TNY_FOLDER_STORE (tny_folder_get_account (folder));
672
673         /* Delete folder or move to trash */
674         if (remove_to_trash) {
675                 TnyFolder *trash_folder;
676                 trash_folder = modest_tny_account_get_special_folder (TNY_ACCOUNT(folder_store),
677                                                                       TNY_FOLDER_TYPE_TRASH);
678                 /* TODO: error_handling */
679                 modest_mail_operation_move_folder (self, folder, 
680                                                    TNY_FOLDER_STORE (trash_folder));
681         } else {
682                 tny_folder_store_remove_folder (folder_store, folder, NULL); /* FIXME */
683                 g_object_unref (G_OBJECT (folder));
684         }
685
686         /* Free instances */
687         g_object_unref (G_OBJECT (folder_store));
688 }
689
690 void
691 modest_mail_operation_rename_folder (ModestMailOperation *self,
692                                      TnyFolder *folder,
693                                      const gchar *name)
694 {
695         ModestMailOperationPrivate *priv;
696
697         g_return_if_fail (MODEST_IS_MAIL_OPERATION (self));
698         g_return_if_fail (TNY_IS_FOLDER_STORE (folder));
699         g_return_if_fail (name);
700
701         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
702
703         /* FIXME: better error handling */
704         if (strrchr (name, '/') != NULL)
705                 return;
706
707         /* Rename. Camel handles folder subscription/unsubscription */
708         tny_folder_set_name (folder, name, &(priv->error));
709         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, return);
710  }
711
712 void
713 modest_mail_operation_move_folder (ModestMailOperation *self,
714                                    TnyFolder *folder,
715                                    TnyFolderStore *parent)
716 {
717         g_return_if_fail (MODEST_IS_MAIL_OPERATION (self));
718         g_return_if_fail (TNY_IS_FOLDER_STORE (parent));
719         g_return_if_fail (TNY_IS_FOLDER (folder));
720         
721         modest_mail_operation_xfer_folder (self, folder, parent, TRUE);
722 }
723
724 void
725 modest_mail_operation_copy_folder (ModestMailOperation *self,
726                                    TnyFolder *folder,
727                                    TnyFolderStore *parent)
728 {
729         g_return_if_fail (MODEST_IS_MAIL_OPERATION (self));
730         g_return_if_fail (TNY_IS_FOLDER_STORE (parent));
731         g_return_if_fail (TNY_IS_FOLDER (folder));
732
733         modest_mail_operation_xfer_folder (self, folder, parent, FALSE);
734 }
735
736 static void
737 modest_mail_operation_xfer_folder (ModestMailOperation *self,
738                                    TnyFolder *folder,
739                                    TnyFolderStore *parent,
740                                    gboolean delete_original)
741 {
742         ModestMailOperationPrivate *priv;
743         const gchar *folder_name;
744         TnyFolder *dest_folder = NULL, *child = NULL;
745         TnyIterator *iter = NULL;
746         TnyList *folders = NULL, *headers = NULL;
747
748         g_return_if_fail (TNY_IS_FOLDER (folder));
749         g_return_if_fail (TNY_IS_FOLDER_STORE (parent));
750
751         priv = MODEST_MAIL_OPERATION_GET_PRIVATE (self);
752
753         /* Create the destination folder */
754         folder_name = tny_folder_get_name (folder);
755         dest_folder = modest_mail_operation_create_folder (self, parent, folder_name);
756         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, goto clean);
757
758         /* Transfer messages */
759         headers = TNY_LIST (tny_simple_list_new ());
760         tny_folder_get_headers (folder, headers, FALSE, &(priv->error));
761         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, goto clean);
762
763         tny_folder_transfer_msgs (folder, headers, dest_folder, delete_original, &(priv->error));
764         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, goto clean);
765
766         /* Recurse children */
767         folders = TNY_LIST (tny_simple_list_new ());
768         tny_folder_store_get_folders (TNY_FOLDER_STORE (folder), folders, NULL,  &(priv->error));
769         CHECK_EXCEPTION (priv, MODEST_MAIL_OPERATION_STATUS_FAILED, goto clean);
770
771         iter = tny_list_create_iterator (folders);
772         while (!tny_iterator_is_done (iter)) {
773                 child = TNY_FOLDER (tny_iterator_get_current (iter));
774                 modest_mail_operation_xfer_folder (self, child, TNY_FOLDER_STORE (dest_folder),
775                                                    delete_original);
776                 tny_iterator_next (iter);
777                 g_object_unref (G_OBJECT(child));
778         }
779
780         /* Delete source folder (if needed) */
781         if (delete_original)
782                 modest_mail_operation_remove_folder (self, folder, FALSE);
783
784         /* Clean up */
785  clean:
786         if (dest_folder)
787                 g_object_unref (G_OBJECT (dest_folder));
788         if (headers)
789                 g_object_unref (G_OBJECT (headers));
790         if (folders)
791                 g_object_unref (G_OBJECT (folders));
792         if (iter)
793                 g_object_unref (G_OBJECT (iter));
794 }
795
796
797 /* ******************************************************************* */
798 /* **************************  MSG  ACTIONS  ************************* */
799 /* ******************************************************************* */
800
801 gboolean 
802 modest_mail_operation_copy_msg (ModestMailOperation *self,
803                                 TnyHeader *header, 
804                                 TnyFolder *folder)
805 {
806         g_return_val_if_fail (TNY_IS_HEADER (header), FALSE);
807         g_return_val_if_fail (TNY_IS_FOLDER (folder), FALSE);
808
809         return modest_mail_operation_xfer_msg (self, header, folder, FALSE);
810 }
811
812 gboolean 
813 modest_mail_operation_move_msg (ModestMailOperation *self,
814                                 TnyHeader *header, 
815                                 TnyFolder *folder)
816 {
817         g_return_val_if_fail (TNY_IS_HEADER (header), FALSE);
818         g_return_val_if_fail (TNY_IS_FOLDER (folder), FALSE);
819
820         return modest_mail_operation_xfer_msg (self, header, folder, TRUE);
821 }
822
823 void 
824 modest_mail_operation_remove_msg (ModestMailOperation *self,
825                                   TnyHeader *header,
826                                   gboolean remove_to_trash)
827 {
828         TnyFolder *folder;
829
830         g_return_if_fail (TNY_IS_HEADER (header));
831
832         folder = tny_header_get_folder (header);
833
834         /* Delete or move to trash */
835         if (remove_to_trash) {
836                 TnyFolder *trash_folder;
837                 TnyStoreAccount *store_account;
838
839                 store_account = TNY_STORE_ACCOUNT (tny_folder_get_account (folder));
840                 trash_folder = modest_tny_account_get_special_folder (TNY_ACCOUNT(store_account),
841                                                                       TNY_FOLDER_TYPE_TRASH);
842                 if (trash_folder) {
843                         modest_mail_operation_move_msg (self, header, trash_folder);
844 /*                      g_object_unref (trash_folder); */
845                 } else {
846                         ModestMailOperationPrivate *priv;
847
848                         /* Set status failed and set an error */
849                         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(self);
850                         priv->status = MODEST_MAIL_OPERATION_STATUS_FAILED;
851                         g_set_error (&(priv->error), MODEST_MAIL_OPERATION_ERROR,
852                                      MODEST_MAIL_OPERATION_ERROR_ITEM_NOT_FOUND,
853                                      _("Error trying to delete a message. Trash folder not found"));
854                 }
855
856                 g_object_unref (G_OBJECT (store_account));
857         } else {
858                 tny_folder_remove_msg (folder, header, NULL); /* FIXME */
859                 tny_folder_sync(folder, TRUE, NULL); /* FIXME */
860         }
861
862         /* Free */
863         g_object_unref (folder);
864 }
865
866 static void
867 transfer_msgs_cb (TnyFolder *folder, GError **err, gpointer user_data)
868 {
869         ModestMailOperationPrivate *priv;
870
871         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(user_data);
872         priv->done = 1;
873         priv->status = MODEST_MAIL_OPERATION_STATUS_SUCCESS;
874
875         g_signal_emit (G_OBJECT (user_data), signals[PROGRESS_CHANGED_SIGNAL], 0, NULL);
876 }
877
878 static gboolean
879 modest_mail_operation_xfer_msg (ModestMailOperation *self,
880                                 TnyHeader *header, 
881                                 TnyFolder *folder, 
882                                 gboolean delete_original)
883 {
884         ModestMailOperationPrivate *priv;
885         TnyFolder *src_folder;
886         TnyList *headers;
887
888         src_folder = tny_header_get_folder (header);
889         headers = tny_simple_list_new ();
890
891         priv = MODEST_MAIL_OPERATION_GET_PRIVATE(self);
892         priv->total = 1;
893         priv->done = 0;
894         priv->status = MODEST_MAIL_OPERATION_STATUS_IN_PROGRESS;
895
896         tny_list_prepend (headers, G_OBJECT (header));
897         tny_folder_transfer_msgs_async (src_folder, headers, folder, 
898                                         delete_original, transfer_msgs_cb, self);
899
900         /* Free */
901         g_object_unref (headers);
902         g_object_unref (folder);
903
904         return TRUE;
905 }
906
907
908 /* ******************************************************************* */
909 /* ************************* UTILIY FUNCTIONS ************************ */
910 /* ******************************************************************* */
911
912 static void
913 add_attachments (TnyMsg *msg, GList *attachments_list)
914 {
915         GList *pos;
916         TnyMimePart *attachment_part, *old_attachment;
917         const gchar *attachment_content_type;
918         const gchar *attachment_filename;
919         TnyStream *attachment_stream;
920         TnyPlatformFactory *fact;
921
922         fact = modest_tny_platform_factory_get_instance ();
923         for (pos = (GList *)attachments_list; pos; pos = pos->next) {
924
925                 old_attachment = pos->data;
926                 attachment_filename = tny_mime_part_get_filename (old_attachment);
927                 attachment_stream = tny_mime_part_get_stream (old_attachment);
928                 attachment_part = tny_platform_factory_new_mime_part (fact);
929                 
930                 attachment_content_type = tny_mime_part_get_content_type (old_attachment);
931                                  
932                 tny_mime_part_construct_from_stream (attachment_part,
933                                                      attachment_stream,
934                                                      attachment_content_type);
935                 tny_stream_reset (attachment_stream);
936                 
937                 tny_mime_part_set_filename (attachment_part, attachment_filename);
938                 
939                 tny_mime_part_add_part (TNY_MIME_PART (msg), attachment_part);
940 /*              g_object_unref (attachment_part); */
941         }
942 }
943