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